我自己用是都還OK
如果大家用有問題要說唷
各職業適用
只是要喝水
還沒寫出自動休息
大家期待吧
[[General]
Description=我的腳本1打怪
BeginHotkey=65
BeginHotkeyMod=6
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=FiestaOnline
Enable=1
AutoRun=0
[Repeat]
Type=1
Number=1943232333
[CallBack]
OnSetup=
[Comment]
Content=
[Script]
Rem pp
LockMouse
KeyDown 9,1
Delay 250
KeyUp 9,1
Delay 400
KeyDown 49,1
Delay 150
KeyUp 49,1
Delay 250
KeyDown 49,1
Delay 150
KeyUp 49,1
Delay 1000
KeyPress 50,2
Delay 300
KeyPress 50,2
Delay 300
KeyPress 50,2
Delay 300
KeyPress 50,2
Delay 300
KeyPress 50,2
Delay 300
EndIf
Goto pp
--------------------------------------------------------分隔線----------------------
以下是自動喝水
這個自動喝水是抓記憶體位置的
所以只要遊戲更新
就要重抓記憶體位置唷
設定是HP跟SP都剩下50就喝水
HP放3 SP放4
[General]
Description=我的腳本3
BeginHotkey=65
BeginHotkeyMod=6
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=FiestaOnline
Enable=1
AutoRun=0
[Repeat]
Type=1
Number=1943232333
[CallBack]
OnSetup=
[Comment]
Content=
[Script]
VBS Dim red blue redbj bluebj ys cs
VBS ys=200R
VBS cs=0
Rem 開始
VBSCall Call ReadMemory(&h0074B0C7,1,red)
VBSCall Call ReadMemory(&h0074B0CB,1,blue)
VBS redbj=int(50)
VBS bluebj=int(50)
If red<redbj
KeyPressH 51,1
Delay 1000
VBS ys=ys-50
EndIf
If blue<bluebj and cs>7
KeyPressH 52,1
Delay 1250
VBS ys=ys-50
VBS cs=1
EndIf
VBSCall Call Delay(ys)
VBS cs=cs+1
Goto 開始 |