熱那亞練冒險科系繞港讀書(前台)

免費的忍耐著用吧

F1料理ㄦ-F2測量-F3警戒-F4操帆

快傑鍵F1自定欄-F2城市地圖

船隻使用武裝快艇_其他船自己修改一下船的速度

(保證能用)



                For 9999999
                    Gosub 補給出港
                    Gosub 轉向找城
                    Gosub 出港
                    Gosub 回到熱那亞
                    Gosub 書庫
                    Gosub 找碼頭官員
                EndFor
                Sub 補給出港
                    Delay 1000
                    MoveTo 690 389
                    Delay 1000
                    LeftClick 1
                    Delay 2000
                    MoveTo 182 375
                    Delay 1000
                    LeftClick 1
                    Delay 1500
                    MoveTo 604 417
                    Delay 1000
                    LeftClick 1
                    Delay 1000
                    MoveTo 652 388
                    Delay 1000
                    LeftClick 1
                    Delay 1000
                    MoveTo 642 411
                    Delay 500
                    LeftClick 1
                    Delay 7000
                    MoveTo 86 146
                    Delay 250
                    IfColor 86 146 F77CF7 1
                        Delay 500
                        Goto 吃料理
                    Else
                        IfColor 86 146 F77CF7 0
                            Delay 500
                            Goto 起航
                            Delay 500
                        EndIf
                    EndIf
                    Rem 吃料理
                    Delay 1000
                    KeyPress 112 1
                    Delay 2000
                    KeyPress 112 1
                    Rem 起航
                    Delay 500
                    KeyPress 112 1
                    Delay 1500
                    KeyPress 113 1
                    Delay 1000
                    KeyPress 114 1
                    Delay 500
                    MoveTo 783 553
                    Delay 1000
                    LeftClick 1
                    Delay 1500
                    KeyPress 115 1
                    Delay 1000
                    KeyPress 115 1
                    Delay 2000
                    KeyPress 27 1
                    Delay 7000
                    KeyDown 39 1
                    Delay 70
                    KeyUp 39 1
                    Delay 32000
                    MoveTo 782 612
                    Delay 500
                    LeftClick 1
                    Delay 1000
                Return
                Sub 轉向找城
                    For 10
                        KeyPress 9 1
                        Delay 500
                        IfColor 640 365 ffffff 0
                            Delay 250
                            IfColor 676 366 ffffff 0
                                Delay 500
                                IfColor 652 362 ffffff 0
                                    Delay 250
                                    IfColor 668 367 ffffff 0
                                        Delay 500
                                        KeyPress 13 1
                                        Delay 500
                                        KeyPress 13 1
                                        Goto 轉向找城結束
                                        Delay 250
                                        IfColor 668 367 ffffff 1
                                            Goto 轉向找城
                                            Delay 1000
                                        Else
                                        EndIf
                                    Else
                                    EndIf
                                Else
                                EndIf
                            Else
                            EndIf
                        Else
                        EndIf
                    EndFor
                    Rem 轉向找城結束
                    Delay 4500
                    MoveTo 652 389
                    Delay 2500
                    LeftClick 1
                    Delay 1500
                    MoveTo 652 417
                    Delay 500
                    LeftClick 1
                    Delay 6000
                Return
                Sub 出港
                    MoveTo 86 146
                    Delay 250
                    IfColor 86 146 F77CF7 1
                        Delay 500
                        Goto 吃補
                    Else
                        IfColor 86 146 F77CF7 0
                            Delay 500
                            Goto 定航
                            Delay 500
                        EndIf
                    EndIf
                    Rem 吃補
                    Delay 1000
                    KeyPress 112 1
                    Delay 2000
                    KeyPress 112 1
                    Rem 定航
                    Delay 500
                    KeyPress 112 1
                    Delay 1500
                    KeyPress 113 1
                    Delay 1000
                    KeyPress 114 1
                    Delay 500
                    MoveTo 783 553
                    Delay 1000
                    LeftClick 1
                    Delay 1000
                    KeyDown 39 1
                    Delay 1100
                    KeyUp 39 1
                    Delay 1000
                    KeyPress 115 1
                    Delay 500
                    KeyPress 115 1
                    Delay 2000
                    KeyPress 27 1
                    Delay 1000
                    KeyDown 17 1
                    Delay 1000
                    KeyDown 39,1
                    Delay 1000
                    KeyUp 39 1
                    Delay 141
                    KeyUp 17 1
                    Delay 7000
                    MoveTo 666 107
                    Delay 500
                    LeftClick 1
                    Delay 33500
                    MoveTo 782 612
                    Delay 500
                    LeftClick 1
                    Delay 1000
                Return
                Sub 回到熱那亞
                    For 10
                        KeyPress 9 1
                        Delay 500
                        IfColor 636 367 ffffff 0
                            Delay 250
                            IfColor 652 367 ffffff 0
                                Delay 500
                                IfColor 673 360 ffffff 0
                                    Delay 250
                                    IfColor 670 373 ffffff 0
                                        Delay 500
                                        KeyPress 13 1
                                        Delay 500
                                        KeyPress 13 1
                                        Delay 500
                                        KeyPress 13 1
                                        Delay 500
                                        KeyPress 13 1
                                        Goto 回到熱那亞結束
                                        Delay 250
                                        IfColor 670 373 ffffff 1
                                            Goto 回到熱那亞
                                            Delay 1000
                                        Else
                                        EndIf
                                    Else
                                    EndIf
                                Else
                                EndIf
                            Else
                            EndIf
                        Else
                        EndIf
                    EndFor
                    Rem 回到熱那亞結束
                    Delay 2000
                    MoveTo 652 412
                    Delay 1000
                    LeftClick 1
                    Delay 4000
                Return
                Sub 書庫
                    Delay 1000
                    MoveTo 649 414
                    Delay 500
                    LeftClick 1
                    Delay 10000
                    KeyPress 113 1
                    Delay 500
                    MoveTo 487 186
                    Delay 1000
                    LeftClick 1
                    Delay 8000
                    Rem 找書庫
                    For 10
                        KeyPress 9 1
                        Delay 500
                        IfColor 638 361 ffffff 0
                            Delay 250
                            IfColor 639 369 ffffff 0
                                Delay 250
                                IfColor 658 363 ffffff 0
                                    Delay 250
                                    IfColor 660 370 ffffff 0
                                        Delay 500
                                        KeyPress 13 1
                                        Delay 1000
                                        KeyPress 13 1
                                        Goto 找書庫結束
                                        Delay 2000
                                    Else
                                    EndIf
                                Else
                                EndIf
                            Else
                            EndIf
                        Else
                        EndIf
                    EndFor
                    Rem 找書庫結束
                    Delay 6000
                    For 10
                        KeyPress 9 1
                        Delay 500
                        IfColor 637 360 ffffff 0
                            Delay 250
                            IfColor 641 371 ffffff 0
                                Delay 250
                                IfColor 656 361 ffffff 0
                                    Delay 250
                                    IfColor 655 372 ffffff 0
                                        Delay 500
                                        KeyPress 13 1
                                        Delay 1000
                                        KeyPress 13 1
                                        Goto 找官員結束
                                        Delay 2000
                                    Else
                                    EndIf
                                Else
                                EndIf
                            Else
                            EndIf
                        Else
                        EndIf
                    EndFor
                    Rem 找官員結束
                    Delay 1000
                    MoveTo 652 391
                    Delay 500
                    LeftClick 1
                    Delay 1500
                    MoveTo 319 221
                    Delay 500
                    LeftClick 1
                    Delay 500
                    MoveTo 513 273
                    Delay 500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    LeftClick 1
                    Delay 1500
                    MoveTo 547 369
                    Delay 500
                    LeftClick 1
                    Delay 2000
                    For 10
                        KeyPress 9 1
                        Delay 500
                        IfColor 635 362 ffffff 0
                            Delay 250
                            IfColor 642 373 ffffff 0
                                Delay 250
                                IfColor 653 361 ffffff 0
                                    Delay 250
                                    IfColor 662 369 ffffff 0
                                        Delay 500
                                        KeyPress 13 1
                                        Delay 1000
                                        KeyPress 13 1
                                        Goto 讀書結束
                                        Delay 2000
                                    Else
                                    EndIf
                                Else
                                EndIf
                            Else
                            EndIf
                        Else
                        EndIf
                    EndFor
                    Rem 讀書結束
                    Delay 8000
                    KeyPress 113 1
                    Delay 500
                    MoveTo 449 184
                    Delay 1000
                    LeftClick 1
                    Delay 8000
                    
                    Return


                     Sub 找碼頭官員
                        For 10
                            Delay 5000
                            KeyPress 9 1
                            Delay 500
                            IfColor 635 366 ffffff 0
                                Delay 250
                                IfColor 658 365 ffffff 0
                                    Delay 250
                                    IfColor 673 361 ffffff 0
                                        Delay 250
                                        IfColor 692 369 ffffff 0
                                            Delay 500
                                            KeyPress 13 1
                                            Delay 500
                                            KeyPress 13 1
                                            Goto 找碼頭官員結束
                                            Delay 1000
                                        Else
                                        EndIf
                                    Else
                                    EndIf
                                Else
                                EndIf
                            Else
                            EndIf
                        EndFor
                        Rem 找碼頭官員結束
                        Delay 1000
                        MoveTo 652 387
                        Delay 1000
                        LeftClick 1
                        Delay 8000
                    Return

感謝分享，
請問大大是要使用哪一版的按精?8.0?7.0?6.0?
使用程式的起使點在那?
視窗是800*600?

謝謝您的分享
準備往熱那亞出發
呵呵

我的習慣都是800x600
在船員補給那邊按下按精

好有用  多謝多謝 感謝大大的分享!!!!

請問按鍵精靈是要自己去下載嗎
請問按鍵精靈是要自己去下載嗎

4# gg2255

請問能否留下您得連絡方是呢

有關於繞港的問題，想請教您~

如需要一些諮詢費也是很OK的

謝謝

您好:
        可否請您留下聯絡方是呢!?
        有關程式內容想跟您請教!!
        不會讓您平白無故的幫助喔(OK?) ^^

看看夠不夠錢。。。。。。。。。

謝謝了~~不知道好不好用~~而且重點不知道還要不要改。
本文章轉自外掛聯合國http://www.wgun.net