Re: EZ發放!!! -- Task Cyberland 網中人討論區

[ Show ]

Support VoyForums

[ Shrink ]

VoyForums Announcement: Programming and providing support for this service has been a labor of love since 1997. We are one of the few services online who values our users' privacy, and have never sold your information. We have even fought hard to defend your privacy in legal cases; however, we've done it with almost no financial support -- paying out of pocket to continue providing the service. Due to the issues imposed on us by advertisers, we also stopped hosting most ads on the forums many years ago. We hope you appreciate our efforts.

Show your support by donating any amount. (Note: We are still technically a for-profit company, so your contribution is not tax-deductible.) PayPal Acct: Feedback:

Donate to VoyForums (PayPal):

[ Login ] [ Contact Forum Admin ] [ Main index ] [ Post a new message ] [ Search | Check update time ]

Subject: Re: EZ發放!!!

Author:
墮天使ee=0=

[ Next Thread | Previous Thread | Next Message | Previous Message ]

Date Posted: 14:23:07 10/31/03 Fri
In reply to: 墮天使ee=0= 's message, "Re: EZ發放!!!" on 14:20:52 10/31/03 Fri

汁malo EZ~

//要用埋照明先汁到
//windows 2000,xp 版,其他windows 唔知用唔用到,我用xp整ge~
//水箱放腰帶第一格
//Pos5 汁malo / 葉範圍ge 左上
//Pos6 汁malo / 葉範圍ge 右下
//Pos7 腳下個點
//Pos8 礦點
//var1=malo / 葉colour 點
//malo= 14082039
//葉= 9225067 or 8697443

var1 = 14082039
ExtVar[1]=Color[34930757]
Pos1=GetColorPos[var1,pos5,pos6]

Call RKAIDRUseCommand
Call RKAIDRShift
Call work1

malo:
keypress(191)
Right Click NoPos
delay(500)
Right Click NoPos
delay(500)
Right Click NoPos
delay(500)
rclick pos1
rclick pos1
rclick pos1
lclick pos1
delay(300)
lclick pos7
delay(500)
lclick pos7
delay(500)
lclick pos7
delay(500)
lclick pos7
delay(1000)
lclick pos7
delay(1000)
Pos1=GetColorPos[var1,pos5,pos6]
delay(1000)
jump work1

work1:
MouseMove 28050186
Left Click 28050186
delay(200)
Left Click 28050186
delay(200)
Left Click 28050186
delay(200)
jump work2

work2:
on pos1!=-1 jump malo
On Color[34930757] != ExtVar[1] Jump food
Call RKAIDR
MouseMove pos8
Left DbClick pos8
Left Down pos8
Delay(3900)
Jump work2

food:
Right Click pos7
delay(200)
Right Click pos7
delay(200)
Right Click pos7
delay(200)
Right Click pos7
delay(200)
Right Click pos7
delay(200)
mousemove 37552606
delay(1000)
right click 37552606
right click 37552606
right click 37552606
delay(1000)
jump work1

RKAIDRUseCommand:
KeyString "\n\n"
Delay(500)
KeyString "/tradeoff"
KeyString "\n"
Delay(500)
KeyString "/effectoff"
KeyString "\n"
Delay(500)
Return

RKAIDRShift:
KeyString "\n\n"
KeyString "Hold the [SHIFT] key to continue... "
While Waitkey != 16
Wend
KeyString "Okay!\n\n"
Return

RKAIDR:
If Color[26542115]=0 && Color[26280398]=0
LClick 24903930
Delay(1500)
If Color[6553896]=0 && Color[11141592]=0
LClick 7340533
Delay(1500)
If Color[328165]=0 && Color[22938397]=0
LClick 21955319
Delay(1500)
End If
End If
ElseIf Color[6553896]=0 && Color[11141592]=0
LClick 7340533
Delay(1500)
If Color[328165]=0 && Color[22938397]=0
LClick 21955319
Delay(1500)
End If
ElseIf Color[9175185]=0 && Color[29688458]=0
LClick 28181001
ElseIf Color[9175179]=0 && Color[29033106]=0
LClick 27197995
ElseIf Color[9175048]=0 && Color[28181270]=0
LClick 26214800
ElseIf Color[10486027]=0 && Color[25297422]=0
LClick 26870157
ElseIf Color[328085]=0 && Color[31654681]=0
LClick 29885158
End If
Return

Stop

[ Next Thread | Previous Thread | Next Message | Previous Message ]