KKMacro - 自動喝水腳本 (3/2增訂)

無聊的時候寫出來的，非常簡陋的腳本
全螢幕適用，不支援視窗化..
版本號：0227

腳本：

1. 
   
2. [Name]
   
3. 【彩虹島】自動喝水0227
   
4. [HotKey]
   
5. 121
   
6. [TargetName]
   
7. LaTale Client
   
8. [Script]
   
9. Sub main
   
10.   Dim SetHP
    
11.   Dim SetSP
    
12.   Dim color
    
13.   //------用戶設置區段開始------
    
14.   //設置HP不到幾%就喝水
    
15.   SetHP=50
    
16.   //設置SP不到幾%就喝水
    
17.   SetSP=50
    
18.   //------用戶設置區段結束------
    
19.   While True
    
20.     Call CheckHP
    
21.     Call CheckSP
    
22.     Sleep 100
    
23.   EndWhile
    
24. EndSub
    
25. Sub CheckHP
    
26.   color=GetPixel(10+(128-10)*(SetHP/100),30)
    
27.   If color==16777215
    
28.     //可自行修改HP藥水的按鍵
    
29.     KeyPressH 1
    
30.   EndIf
    
31. EndSub
    
32. Sub CheckSP
    
33.   color=GetPixel(10+(128-10)*(SetSP/100),46)
    
34.   If color==16777215
    
35.     //可自行修改SP藥水的按鍵
    
36.     KeyPressH 2
    
37.   EndIf
    
38. EndSub

複製代碼

把腳本複製到記事本裡面，存成txt檔，再放到按鍵之王的Script目錄下即可！

2009年3月1日 10:16 PM
大家好，關於有人發短訊問我說螢幕尺寸的問題，這個我沒有去做測試，不過我想應該沒差吧，解析度都是800x600，有空的話我會用我哥的電腦測試，他的螢幕比我大一些
抓補血魔座標的公式在這裡大公開，假設血條最左端的X軸為X1；最右端的X軸為X2；Y軸為Y，則：
GetPixel(X1+(X2-X1)*(%數/100),Y)
P.S. 不要忘掉了先乘除後加減唷!

2009年3月2日 06:33 PM
安安，有人要抓點抓色的程式對吧，我就分享給大家吧！
下載點：http://www.xun6.com/file/daa1dfb10/%E6%8A%93%E9%BB%9E%E6%8A%93%E8%89%B2.rar.html

[ 本帖最後由 shin50611 於 2009-3-2 18:44 編輯 ]