本帖最後由 gg2255 於 2010-4-24 19:21 編輯
F1吃料理
***裝備不夠比較會被打死_不是很好用_但好處不分那個陸地
自己選擇使用
(好像顯示不出來_因顯示不出來複製後將註明的(複製後將這句中文刪除)把這句刪除)
使用方法=先把npc用手打死_打死後在原地不要移動按下按精
Plugin hwnd=Window.Foreground()
Plugin rect = Window.GetClientRect(hwnd)
//MessageBox rect
className=""
Plugin className=Window.GetClass(hwnd)
If className<>"Greate Voyages Online Game MainFrame"
EndScript
EndIf
Plugin Window.Move(hwnd,0,0)
tmp=0
Enable=0
winx=0
winy=0
tlx=0
tly=0
rectArray = Split(rect, "|", -1, 1)
If rectArray(2)=800 And rectArray(3)=600
tmp=rectArray(0)
winx =-5+tmp
tlx=-5+tmp
tmp=rectArray(1)
winy = -31+tmp
tly=-31+tmp
Enable=1
EndIf
If rectArray(2)=1024 And rectArray(3)=768
tmp=rectArray(0)
winx =tmp-5+224
tmp=rectArray(1)
winy = tmp-31+168
tlx=-5+tmp
tly=-31+tmp
Enable=1
EndIf
If Enable=0
MessageBox "不支援當前的分辨率，請選擇使用800×600或1024×768的視窗或全屏模式"
EndScript
EndIf
rectArray(2) = rectArray(0) + rectArray(2)
rectArray(3) = rectArray(1) + rectArray(3)
//swapWeapon為切換武器開關 0-不切換武器 1-切換武器
swapWeapon=0
//modeOpen為是否開啟戰鬥模式 0-關閉 1-開啟
modeOpen=0
//mode為戰鬥模式，分別為0-畜力、1-防禦 、2-敏捷、3-回複、4-標準
mode=4
lltj=6 -----這邊是吃料理的時間依你的需求修改
For 99999
If lltj=6 -----修改時跟上面的6要相同
Gosub 吃料理
EndIf
Gosub 找怪
Gosub 開戰
If swapWeapon=1
Gosub 切換武器
EndIf
If modeOpen=1
Gosub 切換戰鬥模式
EndIf
Gosub 攻擊
Delay 6000
EndFor
EndScript
Sub 找怪
i=0
KeyDown 27,1
KeyDown 27,1
Delay 2000
While i=0
KeyPress 9,1
Delay 200
KeyPress 13,1
Delay 300
IfColor (複製後將這句中文刪除)winx+640,winy+384,ffffff,2
IfColor (複製後將這句中文刪除)winx+760,winy+408,ffffff,2
IfColor (複製後將這句中文刪除)winx+772,winy+413,eedd88,2
i=1
EndIf
EndIf
EndIf
EndWhile
KeyUp 27,1
KeyUp 27,1
Return 找怪
Sub 開戰
i=0
While i=0
MoveTo winx+651,winy+389
Delay 200
LeftClick 1
Delay 300
IfColor (複製後將這句中文刪除)winx+650,winy+558,ff,2
IfColor (複製後將這句中文刪除)winx+650,winy+577,ff,2
IfColor (複製後將這句中文刪除)winx+650,winy+584,ff,2
IfColor (複製後將這句中文刪除)winx+649,winy+603,ff,2
i=1
EndIf
EndIf
EndIf
EndIf
EndWhile
lltj=lltj+1
Return 開戰
Sub 切換戰鬥模式
i=0
While i=0
MoveTo winx+731,winy+569
Delay 200
LeftClick 1
Delay 400
IfColor (複製後將這句中文刪除)winx+740,winy+471,8888ff,2
IfColor (複製後將這句中文刪除)winx+740,winy+489,ffff88,2
IfColor (複製後將這句中文刪除)winx+740,winy+507,88ffff,2
IfColor (複製後將這句中文刪除)winx+740,winy+525,66dd00,2
IfColor (複製後將這句中文刪除)winx+740,winy+543,ffffff,2
MoveTo winx+740,winy+470+mode*18
Delay 200
LeftClick 1
Delay 100
i=1
EndIf
EndIf
EndIf
EndIf
EndIf
EndWhile
Return 切換戰鬥模式
Sub 切換武器
Delay 1000
MoveTo winx+770,winy+569
Delay 100
LeftClick 1
Delay 1500
Return 切換武器
Sub 攻擊
i=0
j=0
js=0
While i=0
j=0
IfColor (複製後將這句中文刪除)winx+638,winy+439,ddccff,2
IfColor (複製後將這句中文刪除)winx+644,winy+443,6655aa,2
IfColor (複製後將這句中文刪除)winx+637,winy+424,ffffff,2
MoveTo winx+650,winy+568
Delay 200 -----這邊是按下攻擊的時間依你的需求可以修改
LeftClick 1
Delay 300
j=1
EndIf
EndIf
EndIf
Delay 300
If j=0
js=js+1
j=0
EndIf
//js為判斷結束的計數器
If js>15
i=1
EndIf
EndWhile
Return 攻擊
Sub 吃料理
KeyPress 112 1
Delay 2000
KeyPress 112 1
Delay 2000
lltj=0
Return 吃料理 |
收藏
分享
讚
幹
分享
分享
