========================================
[General]
Description=機械士
BeginHotkey=191
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=0
AutoRun=0
[Repeat]
Type=0
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=機械士.
F9----臂力增強.
F2紅水.
F8藍水.
F3-F4技能=靈箭<<空格為普打>>
[Script]
Rem aaaaaa
VBS Dim h,m,s,a,b,c,z,e
VBS a=0:b=0:c=0:z=0:e=0
VBS h=Hour(Now):m=Minute(Now):s=Second(Now)
VBS z=cint(h)
Rem AAA1
Rem AAA2
IfColor 206,96,10ff,2
Gosub 輔助技能1
IfColor 396,584,111e1d,2
Gosub 普打
Goto AAA3
EndIf
Gosub 補藍水
Delay 100
KeyPress 114,1
Goto AAA3
EndIf
Gosub 補紅水1
Delay 300
Goto AAA2
Rem AAA3
IfColor 206,96,10ff,2
IfColor 352,96,3e4a50,0
Gosub 尋黃色線
IfColor 432,584,111e1d,2
Delay 100
Gosub 普打
Goto AAA5
EndIf
Gosub 補藍水
KeyPress 115,1
Gosub 補紅水2
Goto AAA5
EndIf
Gosub 補紅水1
Delay 300
Goto AAA3
EndIf
Rem AAA4
Delay 300
KeyPress 192 1
Delay 300
Goto AAA2
Rem AAA5
IfColor 352,96,3e4a50,0
Gosub 尋黃色線
IfColor 396,584,111e1d,2
Gosub 普打
Goto AAA6
EndIf
Gosub 補藍水
KeyPress 114,1
Gosub 補紅水2
Goto AAA6
EndIf
Goto AAA4
Rem AAA6
IfColor 352,96,3e4a50,0
Gosub 尋黃色線
IfColor 432,584,111e1d,2
Gosub 普打
Goto AAA5
EndIf
Gosub 補藍水
KeyPress 115,1
Gosub 補紅水2
Goto AAA5
EndIf
Goto AAA4
Rem AAA7
Rem AAA10
EndScript
Sub 補紅水1
IfColor 147,72,3e4a50,0
KeyPress 113 1
Goto RRR1
EndIf
IfColor 147,72,31455A,0
KeyPress 113 1
Goto RRR1
EndIf
IfColor 147,72,314552,0
KeyPress 113 1
Goto RRR1
EndIf
IfColor 147,72,39455A,0
KeyPress 113 1
EndIf
Rem RRR1
Return 補紅水1
Sub 補紅水2
VBS e=1
Delay 200
Rem RRR2
IfColor 147,72,3e4a50,0
KeyPress 113 1
Goto RRR3
EndIf
IfColor 147,72,31455A,0
KeyPress 113 1
Goto RRR3
EndIf
IfColor 147,72,314552,0
KeyPress 113 1
Goto RRR3
EndIf
IfColor 147,72,39455A,0
KeyPress 113 1
Goto RRR3
EndIf
Goto RRR4
Rem RRR3
VBS e=e+1
Delay 500
If e>=5
Goto RRR5
EndIf
Rem RRR4
Delay 360
If e>=5
Goto RRR5
EndIf
VBS e=e+1
Goto RRR2
Rem RRR5
Return 補紅水2
Sub 補藍水
IfColor 122,85,3e4a50,0
KeyPress 119 1
Goto RRR6
EndIf
IfColor 122,85,31455A,0
KeyPress 119 1
Goto RRR6
EndIf
IfColor 122,85,314552,0
KeyPress 119 1
Goto RRR6
EndIf
IfColor 122,85,39455A,0
KeyPress 119 1
EndIf
Rem RRR6
Return 補藍水
Sub 尋黃色線
Rem RRR8
VBSCall FindCenterColor(328,112,486,345,"00E0E0",x,y)
If x>=0 and y>=0
Delay 500
Gosub 補紅水1
Goto RRR8
EndIf
Return 尋黃色線
Sub 普打
KeyPress 65,1
For 3
Gosub 補紅水1
Delay 300
EndFor
Return 普打
Sub 輔助技能1
VBS h=Hour(Now):m=Minute(Now):s=Second(Now)
If cint(h)>z
VBS b=b-3599
VBS z=cint(h)
EndIf
If cint(h)<z
VBS b=0
VBS z=cint(h)
EndIf
VBS a=cint(m)*60+cint(s)
If a>=b
KeyPress 120 1
Delay 1500
VBS b=a+60
EndIf
Return 輔助技能1
=============================================================
作業系統800*600 高彩(32位元)
遊戲螢幕 視窗800*600
按鍵精靈版本:6.71試用版 來源按精官網
腳本適用於 Win2000
XP使用要將(我的電腦─內容─進階─效能)改為 <調整成最佳效能>
F9鍵----臂力增強
F2鍵=紅水
F8鍵=藍水
F3-F4鍵=技能=>靈箭<<空格為普打>>
?/ 鍵:開始
F12鍵:結束 |
收藏
分享
讚
幹
分享
分享
