3-2 西瓜RURU无图火器会计脚本
F1 操帆 F2 自定义 F3 运用 F4 警戒 F5 烹饪 。海平面对准最左上方西瓜国旗的白线
Rem 主程序开始处
For 2000
Gosub 进巴港
Delay 2200
Gosub 找巴交易所老板
Delay 500
Gosub 巴卖掉
Delay 1000
Gosub 巴买货
Delay 1500
Gosub 服用料理
Delay 800
Gosub 找巴官员
Delay 2000
Gosub 补给出港2
Delay 1500
Gosub 巴-帕
Delay 3000
Gosub 进帕港
Delay 2500
Gosub 找帕老板
Delay 2000
Gosub 帕卖掉
Delay 2000
Gosub 帕买货
Delay 2000
Gosub 服用料理
Delay 800
Gosub 找帕官员
Delay 2500
Gosub 直接出港1
Delay 1000
Gosub 帕-巴
Delay 2000
EndFor
Rem 主程序结束处
//---------------------------------
Sub 进巴港
Delay 2000
For 20
IfColor 646 409 FFFFFF 0
MoveTo 648 414
Delay 500
LeftClick 1
Delay 1200
Goto 进巴港结束
Else
EndIf
EndFor
Rem 进巴港结束
Delay 2000
Return 进巴港
//---------------------------------
Sub 找巴交易所老板
Delay 2000
KeyDown 27,1
Delay 200
KeyDown 37,1
Delay 150
KeyUp 37,1
Delay 500
KeyDown 38 1
Delay 14000
KeyUp 38 1
Delay 500
KeyUp 27,1
Delay 500
For 5
KeyPress 9 1
Delay 500
IfColor 639,362,FFFFFF,0
Delay 250
IfColor 691,370,FFFFFF,0
Delay 250
IfColor 711,372,FFFFFF,0
Delay 250
IfColor 691,373,FFFFFF,0
KeyPress 13,2
Delay 500
KeyPress 13,2
Delay 500
Goto 找巴交易所老板结束
Else
EndIf
Else
EndIf
Else
EndIf
Else
EndIf
EndFor
Rem 找巴交易所老板结束
Delay 500
Return 找巴交易所老板
//---------------------------------
Sub 巴卖掉
MoveTo 690 387
Delay 800
LeftClick 1
Delay 2000
MoveTo 121 147
Delay 800
LeftClick 1
Delay 1000
MoveTo 629 441 //卖出确定键
Delay 800
LeftClick 1
Delay 1000
Return 巴卖掉
//---------------------------------
Sub 巴买货
Delay 500
MoveTo 654 389 //点击买入,弹出窗口
Delay 800
LeftClick 1 //点击购买
Delay 2000
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
Delay 800
Gosub 买20
KeyPress 40 1
Delay 800
Gosub 买20
Delay 500
MoveTo 489,352
Delay 1200
LeftClick 1
Delay 1200
MoveTo 668,442
Delay 1500
LeftClick 1
Delay 1200
MoveTo 654 389 //点击买入,弹出窗口
Delay 800
LeftClick 1 //点击购买
Delay 2000
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
Delay 800
Gosub 买20
KeyPress 40 1
Delay 800
Gosub 买20
Delay 800
KeyPress 40 1
Delay 800
MoveTo 489,352
Delay 1200
LeftClick 1
Delay 1200
MoveTo 668,442
Delay 1500
LeftClick 1
Delay 1200
KeyPress 113,1
Delay 1500
KeyPress 113,1
Delay 1500
Delay 500
MoveTo 654 389 //点击买入,弹出窗口
Delay 800
LeftClick 1 //点击购买
Delay 2000
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
Delay 800
Gosub 买20
KeyPress 40 1
Delay 800
Gosub 买20
Delay 500
MoveTo 489,352
Delay 1200
LeftClick 1
Delay 1200
MoveTo 668,442
Delay 1500
LeftClick 1
Delay 1200
MoveTo 654 389 //点击买入,弹出窗口
Delay 800
LeftClick 1 //点击购买
Delay 2000
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
KeyPress 40 1
Delay 800
Gosub 买20
KeyPress 40 1
Delay 800
Gosub 买20
Delay 800
KeyPress 40 1
Delay 800
MoveTo 489,352
Delay 1200
LeftClick 1
Delay 1200
MoveTo 668,442
Delay 1500
LeftClick 1
Delay 1200
For 20
MoveTo 654 389
Delay 1000
LeftClick 1
Delay 2000
Delay 400
MoveTo 380 198
Delay 600
LeftClick 1
Delay 600
IfColor 652 438 FEFEFE 2 //判断是否可以购买
Delay 400
Else
KeyPress 40 1
Delay 400
MoveTo 380 198
Delay 600
LeftClick 1
Delay 600
EndIf
IfColor 471 348 FFFEFE 2
MoveTo 485 351
Delay 600
LeftClick 1
Delay 2200
IfColor 470 348 FFFEFE 2
MoveTo 665 443
Delay 600
LeftClick 1
Delay 1000
Delay 200
Else
MoveTo 380 340
Delay 500
LeftClick 5
Delay 800
MoveTo 665 443
Delay 800
LeftClick 1
Delay 1500
Goto 巴买货结束
EndIf
Else
MoveTo 665 443
Delay 1000
LeftClick 1
Delay 2000
Goto 巴买货结束
EndIf
EndFor
Rem 巴买货结束
Return 巴买货
//---------------------------
Sub 买20
Delay 200
MoveTo 388 339
Delay 500
LeftClick 20
Delay 500
Return 买20
//---------------------------
Sub 找巴官员
KeyPress 27,1
Delay 200
KeyDown 40,1
Delay 10000
KeyUp 40,1
Delay 200
RightClick 1
Delay 1500
KeyDown 37,1
Delay 600
KeyUp 37,1
Delay 200
KeyDown 38,1
Delay 8000
KeyUp 38,1
For 5
KeyPress 9 1
Delay 1000
IfColor 639 361 ffffff 0
Delay 250
IfColor 695 361 ffffff 0
Delay 250
IfColor 696 373 ffffff 0
KeyUp 27 1
Delay 1000
KeyPress 13 2
Delay 800
KeyPress 13 2
Delay 800
KeyPress 13 2
Goto 找巴官员结束
Else
EndIf
Else
EndIf
Else
EndIf
EndFor
Rem 找巴官员结束
Delay 1000
KeyPress 13 2
Delay 500
KeyPress 13 2
Delay 500
MoveTo 647 388 //前往码头
Delay 500
LeftClick 1
Delay 2000
Return 找巴官员
//-------------------------------------
Sub 服用料理
For 10
IfColor 116 148 474747 0
KeyPress 113 1
Delay 1400
KeyPress 116 1
Delay 1000
Else
Goto 服用料理结束
EndIf
EndFor
Rem 服用料理结束
Delay 800
Return 服用料理
//--------------------------------------
Sub 补给出港2
Delay 1000
MoveTo 690 387 //补给
Delay 200
LeftClick 1
Delay 2000
MoveTo 197 380 //补给到所保存数量
Delay 600
LeftClick 1
Delay 1000
MoveTo 601 423 //确定
Delay 500
LeftClick 1
Delay 1000
KeyPress 27 1 //ESC
Delay 1000
MoveTo 652 388 //出航
Delay 800
LeftClick 1
Delay 1500
MoveTo 645 416 //确定
Delay 1000
LeftClick 1
Delay 3000
Return 补给出港2
//--------------------------
Sub 巴-帕
Delay 500
KeyPress 27,1
Delay 500
KeyDown 39,1
Delay 130
KeyUp 39,1
Delay 500
IfColor 771 610 49240C 2
KeyPress 45 1 //按inster 启航
Delay 500
KeyPress 113 1 // F2 自定义栏
Delay 1600
KeyPress 112 1 //F1 操帆
Delay 2000
Else
Delay 100000 //风暴DELAY100秒再启航
KeyPress 45 1 //按inster 启航
Delay 500
KeyPress 113 1 // F2 自定义栏
Delay 1600
KeyPress 112 1 //F1 操帆
Delay 2000
EndIf
KeyPress 36 1
Delay 800
KeyPress 113 1
Delay 1600
KeyPress 114 1 //F3 运用
Delay 2000
KeyPress 113 1
Delay 1600
KeyPress 115 1 //F4 警戒
Delay 2000
KeyPress 36 1
Delay 50000
Gosub 找帕
Return 巴-帕
//-----------------------------
Sub 找帕
For 80
KeyPress 9 1
Delay 1000
IfColor 640 363 ffffff 0
Delay 250
IfColor 642 373 ffffff 0
Delay 250
IfColor 680 373 ffffff 0
MoveTo 690 372
KeyPress 36 1
Delay 500
KeyPress 13 2
Delay 2000
Goto 跳出找帕
Else
EndIf
Else
EndIf
Else
KeyPress 27 2
Delay 700
KeyPress 36 1
Delay 300
EndIf
EndFor
Rem 跳出找帕
For 2
MoveTo 400 400
KeyPress 36 1
Delay 1000
KeyPress 13 2
Delay 300
KeyPress 13 2
Delay 300
EndFor
Return 找帕
//------------------------------
Sub 进帕港
Delay 2000
For 20
IfColor 669 415 EFE474 0
MoveTo 664 415
Delay 800
LeftClick 1
Delay 2500
Goto 进帕港结束
Else
EndIf
EndFor
Rem 进帕港结束
Delay 2500
Return 进帕港
//---------------------------------
Sub 找帕老板
Delay 2000
KeyPress 27,1
Delay 200
KeyDown 37,1
Delay 160
KeyUp 37,1
Delay 140
KeyDown 38,1
Delay 7000
KeyUp 38,1
Delay 200
KeyDown 39,1
Delay 250
KeyUp 39,1
Delay 200
KeyDown 38,1
Delay 4000
KeyUp 38,1
For 20
KeyPress 9 1
Delay 500
IfColor 639,362 ffffff 0
Delay 250
IfColor 691,370 FFFFFF 0
Delay 250
IfColor 711,372 ffffff 0
Delay 250
KeyPress 13 1
Delay 2000
KeyPress 13 1
Delay 200
Goto 找帕老板结束
Else
EndIf
Else
EndIf
Else
EndIf
EndFor
Rem 找帕老板结束
KeyUp 27 1
Delay 100
Return 找帕老板
//------------------
Sub 帕卖掉
IfColor 646 385 FFFFFF 0
Else
KeyPress 13,2
Delay 1000
EndIf
MoveTo 690 387
Delay 500
LeftClick 1
Delay 2000
MoveTo 335,101
Delay 1000
LeftClick 1
Delay 1400
MoveTo 485 351
Delay 600
LeftClick 1
Delay 1700
LeftClick 1
Delay 1500
MoveTo 629 441
Delay 600
LeftClick 1
Delay 1500
Return 帕卖掉
//--------------------------
Sub 帕买货
Delay 100
For 20
MoveTo 654 389
Delay 600
LeftClick 1
Delay 2000
MoveTo 382 195
Delay 600
LeftClick 1
Delay 1000
IfColor 396 205 FFFFFF 2
MoveTo 485 351
Delay 500
LeftClick 1
Delay 2000
IfColor 471 348 FFFEFE 2
MoveTo 665 443
Delay 500
LeftClick 1
Delay 1000
Else
MoveTo 380 340
Delay 500
LeftClick 7
Delay 500
MoveTo 665 443
Delay 500
LeftClick 1 //确定
Delay 1000
Goto 帕买货结束
EndIf
Else
MoveTo 665 443
Delay 500
LeftClick 1 //确定
Delay 2000
Goto 帕买货结束
EndIf
EndFor
Rem 帕买货结束
Return 帕买货
//------------------------
Sub 找帕官员
Delay 500
KeyPress 27,1
Delay 500
KeyDown 40,1
Delay 5000
KeyUp 40,1
Delay 500
RightClick 1
Delay 1500
KeyDown 37,1
Delay 500
KeyUp 37,1
Delay 500
KeyDown 38,1
Delay 7000
KeyUp 38,1
For 5
KeyPress 9 1
Delay 1000
IfColor 639 361 ffffff 0
Delay 250
IfColor 675 360 ffffff 0
Delay 250
IfColor 696 373 ffffff 0
KeyUp 27 1
Delay 1000
KeyPress 13 2
Delay 800
KeyPress 13 2
Delay 800
KeyPress 13 2
Goto 找帕官员结束
Else
EndIf
Else
EndIf
Else
EndIf
EndFor
Rem 找帕官员结束
Delay 1000
KeyPress 13 2
Delay 500
KeyPress 13 2
Delay 500
MoveTo 647 388 //前往码头
Delay 500
LeftClick 1
Delay 4000
Return 找帕官员
//-----------------------------
Sub 直接出港1
Delay 1000
MoveTo 652 388 //出航
Delay 200
LeftClick 1
Delay 2000
MoveTo 645 416 //确定
Delay 300
LeftClick 1
Delay 4500
Return 直接出港1
//------------------------------
Sub 帕-巴
KeyPress 27,1
Delay 500
KeyDown 39,1
Delay 320
KeyUp 39,1
Delay 2000
IfColor 771 610 49240C 2
KeyPress 45 1 //按inster 启航
Delay 500
KeyPress 113 1 // F2 自定义栏
Delay 1600
KeyPress 112 1 //F1 操帆
Delay 2000
Else
Delay 100000 //风暴DELAY100秒再启航
KeyPress 45 1 //按inster 启航
Delay 500
KeyPress 113 1 // F2 自定义栏
Delay 1600
KeyPress 112 1 //F1 操帆
Delay 2000
EndIf
KeyPress 36 1
Delay 800
KeyPress 113 1
Delay 1600
KeyPress 114 1 //F3 运用
Delay 2000
KeyPress 113 1
Delay 1600
KeyPress 115 1 //F4 警戒
Delay 2000
KeyPress 36 1
Delay 60000
Gosub 找巴
Return 帕-巴
//---------------------
Sub 找巴
For 80
KeyPress 9 1
Delay 1000
IfColor 660 360 ffffff 0
Delay 250
IfColor 696 361 ffffff 0
Delay 250
IfColor 696 370 ffffff 0
Delay 250
IfColor 684 373 ffffff 0
Delay 250
MoveTo 690 372
KeyPress 36 1
Delay 500
KeyPress 13 2
Delay 2000
Goto 跳出找巴
Else
EndIf
Else
EndIf
Else
EndIf
Else
KeyPress 27 2
Delay 700
KeyPress 36 1
Delay 300
EndIf
EndFor
Rem 跳出找巴
For 2
MoveTo 400 400
KeyPress 36 1
Delay 1000
KeyPress 13 2
Delay 300
KeyPress 13 2
Delay 300
EndFor
Return 找巴
| 此篇文章为17173玩家原创作品，获得积分奖励 Z。 17173全新积分兑换系统上线 点卡周边等你拿>>>详情点击 |
