If Ft8=1 Gosub 移動船 //清除異常窗口 KeyPress 27 1 Delay 50 // 技能8 Gosub 開啟自定義欄 // Plugin Window.SendKeyPress(hwn,119) //Delay 500 Gosub 移動船 //除錯用,關閉自定義欄 KeyPress 122 1 // Plugin Window.SendKeyPress(hwn,122) Delay 500 KeyPress 122 1 // Plugin Window.SendKeyPress(hwn,122) Delay 500 EndIf Return 使用航海技能 Sub 遇難處理 If Ft8=1 Gosub 移動船 //清除異常窗口 Plugin Window.SendKeyPress(hwn,27) Delay 50 // 技能8 Gosub 開啟自定義欄 Plugin Window.SendKeyPress(hwn,119) Delay 500 Gosub 移動船 //除錯用,關閉自定義欄 Plugin Window.SendKeyPress(hwn,122) Delay 1500 Plugin Window.SendKeyPress(hwn,122) Delay 500 EndIf Return 遇難處理 Sub 補行動力 For 50 //清除異常窗口 Plugin Window.SendKeyPress(hwn,27) Delay 50 // 料理 F2 //判斷是否需要補充體力 Bp=50+Bldp IfColor Bp 146 f77cf7 0 Goto 補行動力結束 Else Gosub 開啟自定義欄 //判斷有無料理 IfColor 694 139 ffffff 0 Plugin Window.SendKeyPress(hwn,113) Delay 500 //除錯用,關閉自定義欄 Plugin Window.SendKeyPress(hwn,122) Delay 1500 Plugin Window.SendKeyPress(hwn,122) Delay 500 Else If Pd4=1 //除錯用,關閉自定義欄 Plugin Window.SendKeyPress(hwn,122) Delay 1500 Plugin Window.SendKeyPress(hwn,122) Delay 500 Gosub 登出 EndIf EndIf EndIf EndFor Rem 補行動力結束 Return 補行動力 Sub 開啟自定義欄 Rem 判斷是否已被開啟功能欄 //判斷是否已被開啟功能欄 KeyPress 27 1 Delay 50 KeyPress 27 1 Delay 50 MoveTo 786 110 Delay 500 IfColor 786 110 4dcdf1 0 //開啟自定義欄視窗 KeyPress 27 1 Delay 50 KeyPress 123 1 Delay 1500 Gosub 移動船 For 3 //判斷是否開啟自定義欄 KeyPress 27 1 Delay 50 MoveTo 670 110 Delay 500 IfColor 670 110 1cbfec 0 Goto 開啟自定義欄結束 Else Delay 1000 EndIf EndFor