[General]
Description=伦敦多佛近港V1.4
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=0
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=
[Script]
dim xyz
xyz=0
For 999
dim count
dim k
dim j
dim i
Gosub 进伦敦找交易所
Gosub 在伦敦卖出买进
Gosub 买货后回港口
Gosub 出港去多佛
Gosub 进多佛找交易所老板
Gosub 多佛卖货
Gosub 多佛进货
Gosub 回多佛码头
Gosub 出港回伦敦
xyz=xyz+1
EndFor
//进伦敦找交易所
Sub 进伦敦找交易所
Delay 1000
MoveTo 730,406
Delay 500
LeftClick 1
Delay 2000
Rem wait01
IfColor 28,79,ffffff,1
Delay 1000
Goto wait01
EndIf
//找交易所老板
KeyDown 27,1
KeyDown 38,1
Delay 1500
KeyUp 38,1
Delay 1000
KeyPress 9,1
Delay 1000
Rem 01
IfColor 639,352,ffffff,0
IfColor 658,352,ffffff,0
IfColor 674,352,ffffff,0
IfColor 684,352,ffffff,0
IfColor 704,352,ffffff,0
For 2
KeyPress 13,1
Delay 2000
EndFor
Else
KeyPress 9,1
Delay 1000
Goto 01
EndIf
Else
KeyPress 9,1
Delay 1000
Goto 01
EndIf
Else
KeyPress 9,1
Delay 1000
Goto 01
EndIf
Else
KeyPress 9,1
Delay 1000
Goto 01
EndIf
Else
KeyPress 9,1
Delay 1000
Goto 01
EndIf
KeyUp 27,1
MoveTo 692,382
Delay 2000
LeftClick 1
Delay 1000
Return 进伦敦找交易所
//在伦敦卖出买进
Sub 在伦敦卖出买进
Rem 等卖出
IfColor 295,89,ffffff,1
Delay 1000
Goto 等卖出
EndIf
MoveTo 331,95
Delay 2000
LeftClick 1
Delay 1000
MoveTo 472,344
Delay 500
LeftClick 1
Delay 3000
MoveTo 636,438
Delay 400
LeftClick 1
Delay 2000
//开始买货
Rem 等待伦敦买进
IfColor 640,377,ffffff,1
Delay 1000
Goto 等待伦敦买进
EndIf
MoveTo 652,381
Delay 400
LeftClick 1
Delay 1000
Rem 等待伦敦买进界面
IfColor 701,430,ffffff,1
Delay 1000
Goto 等待伦敦买进界面
EndIf
//买啤酒
KeyDown 17,1
Delay 300
Gosub 买货
KeyUp 17,1
//买VSJ
MoveTo 195,197
Delay 300
LeftClick 1
KeyDown 17,1
Delay 200
Gosub 买货
KeyUp 17,1
//买黄油
MoveTo 190,254
Delay 300
LeftClick 1
KeyDown 17,1
Delay 200
If xyz>=2
Gosub 买货
EndIf
KeyUp 17,1
//买大炮
MoveTo 171,309
Delay 300
LeftClick 1
KeyDown 17,1
Delay 200
Gosub 买货
KeyUp 17,1
//买羊毛
MoveTo 187,369
Delay 200
LeftClick 1
KeyDown 17,1
Delay 200
Gosub 买货
KeyUp 17,1
Delay 300
MoveTo 326,388
Delay 250
LeftClick 8
Delay 250
LeftClick 4
Delay 250
//买甲
MoveTo 211,145
Delay 250
LeftClick 1
Delay 250
KeyDown 17,1
Delay 200
Gosub 买货
KeyUp 17,1
//买纸
MoveTo 195,197
Delay 200
LeftClick 1
KeyDown 17,1
Delay 200
If xyz>=2
Gosub 买货
EndIf
KeyUp 17,1
//买黄铜
MoveTo 190,254
Delay 200
LeftClick 1
KeyDown 17,1
Delay 200
Gosub 买货
KeyUp 17,1
//买青铜
MoveTo 171,309
Delay 250
LeftClick 1
KeyDown 17,1
Delay 200
Gosub 买货
KeyUp 17,1
//买铁
MoveTo 187,369
Delay 250
LeftClick 1
KeyDown 17,1
Delay 200
IfColor 242,371,ffffff,1
Gosub 买货
EndIf
KeyUp 17,1
//砍价连续2次
iii=0
Rem aaaaaa
MoveTo 472,344
LeftClick 1
Delay 3000
IfColor 465,340,ffffff,0
IfColor 87,573,ffae84,0
IfColor 77,585,ffae84,0
iii=iii+1
Else
iii=0
Goto aaaaaa
EndIf
Else
iii=0
Goto aaaaaa
EndIf
If iii>=2
Goto a004aa
EndIf
Goto aaaaaa
Else
iii=0
Goto a004aa
EndIf
Rem a004aa
//砍价连续2次结束
Delay 500
MoveTo 667,436
Delay 500
LeftClick 1
Delay 3000
Return 在伦敦卖出买进
//买货后回港口
Sub 买货后回港口
KeyDown 27,1
MoveTo 510,550
Delay 1000
LeftClick 1
Delay 2000
RightClick 2
Delay 1000
MoveTo 452,311
LeftDoubleClick 1
Delay 2500
Rem 0a
IfColor 633,359,ffffff,0
IfColor 651,353,ffffff,0
Delay 1000
KeyPress 13,1
Delay 1500
KeyPress 13,1
Else
KeyPress 9,1
Delay 1500
Goto 0a
EndIf
Else
KeyPress 9,1
Delay 1500
Goto 0a
EndIf
KeyUp 27,1
Delay 1000
MoveTo 655,383
Delay 200
LeftClick 1
Delay 1000
Return 买货后回港口
//出港去多佛
Sub 出港去多佛
Rem wait02
IfColor 640,377,ffffff,1
Delay 1000
Goto wait02
EndIf
MoveTo 653,383
Delay 1000
LeftClick 0
Delay 1000
Rem wait0a
IfColor 626,405,ffffff,1
Delay 1500
Goto wait0a
EndIf
MoveTo 650,410
Delay 500
LeftClick 1
Delay 1000
Rem wait03
IfColor 40,80,ffffff,1
Delay 1000
Goto wait03
EndIf
Delay 2500
MoveTo 785,545
Delay 2000
LeftClick 1
Delay 1000
LeftClick 1
Delay 1000
KeyPress 116,1
Delay 2000
KeyPress 112,1
Delay 2000
KeyPress 116,1
Delay 2000
KeyPress 113,1
Delay 20000
MoveTo 400,300
Delay 1000
LeftClick 1
Delay 1000
KeyPress 39,1
Delay 2000
Rem 0B
KeyPress 9,1
Delay 1000
IfColor 639,352,ffffff,0
IfColor 634,356,ffffff,0
IfColor 667,352,ffffff,0
Rem 进多佛港
KeyPress 13,1
Delay 600
IfColor 640,377,ffffff,1
Goto 进多佛港
EndIf
Else
Goto 0B
EndIf
Else
Goto 0B
EndIf
Else
KeyPress 9,1
Delay 500
Goto 0B
EndIf
Delay 1000
Return 出港去多佛
//进多佛找老板
| 此篇文章为17173玩家原创作品，获得积分奖励 30Z。 17173全新积分兑换系统上线 点卡周边等你拿>>>详情点击 |
| 此篇文章为17173玩家原创作品，获得积分奖励 Z。 17173全新积分兑换系统上线 点卡周边等你拿>>>详情点击 |
