Sign in to follow this  
Followers 0
jerwin

Macro Script Problem...

1 post in this topic

why sometimes my macro script are not working wat i mean some code are not executing but sometimes its kinda weird that the code is working perfectly.... can anyone check my script???i tested it its working perfect but my point is sometimes some of code are not working..... maybe a bug or something well anyone dare to help me???

heres my script....

==== start here ====

Global $Paused

HotKeySet("{PAUSE}", "TogglePause")

HotKeySet("{ESC}", "Terminate")

HotKeySet("+!d", "ShowMessage")

Opt("WinWaitDelay", 100)

Opt("WinTitleMatchMode", 4)

Opt("WinDetectHiddenText", 1)

Opt("MouseCoordMode", 0)

Run('C:\Program Files\GameHI\Dekaron\loader.exe')

WinWait("loader", "")

If Not WinActive("loader", "") Then WinActivate("loader", "")

WinWaitActive("loader", "")

MouseMove(166, 45)

MouseDown("left")

MouseMove(-269, 44)

MouseUp("left")

Send("{SHIFTDOWN}'{SHIFTUP}{SHIFTDOWN}c{SHIFTUP}{SHIFTDOWN};{SHIFTUP}\{SHIFTDOWN}p{SHIFTUP}rogram{SPACE}{SHIFTDOWN}f{SHIFTUP}iles\{SHIFTDOWN}g{SHIFTUP}ame{SHIFTDOWN}hi{SHIFTUP}\{SHIFTDOWN}d{SHIFTUP}ekaron\minilauncher.exe{SHIFTDOWN}'{SHIFTUP}")

Sleep(1000)

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("classname=#32770", "")

If Not WinActive("classname=#32770", "") Then WinActivate("classname=#32770", "")

WinWaitActive("classname=#32770", "")

Sleep(1000)

MouseMove(279, 295)

Sleep(3000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

WinWait("Dekaron", "")

If Not WinActive("Dekaron", "") Then WinActivate("Dekaron", "")

WinWaitActive("Dekaron", "")

Sleep(40000)

MouseDown("left")

MouseUp("left")

Send("{HOME}")

Send("{ENTER}{ENTER}")

Sleep(2000)

MouseMove(412, 475)

MouseDown("left")

MouseUp("left")

MouseMove(476, 608)

MouseDown("left")

MouseUp("left")

Sleep(2000)

WinWait("Dekaron", "")

If Not WinActive("Dekaron", "") Then WinActivate("Dekaron", "")

WinWaitActive("Dekaron", "")

Sleep(2000)

MouseMove(519, 712)

MouseDown("left")

MouseUp("left")

Send("username{TAB}password{ENTER}")

Sleep(7000)

MouseMove(690, 106)

Sleep(2500)

MouseClick("left")

MouseClick("left")

Sleep(2000)

MouseMove(531, 677)

MouseDown("left")

MouseUp("left")

WinWait("GameHelper", "")

If Not WinActive("GameHelper", "") Then WinActivate("GameHelper", "")

WinWaitActive("GameHelper", "")

Sleep(20000)

MouseMove(277, 41)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(92, 149)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(400, 342)

MouseDown("left")

MouseUp("left")

Sleep(5000)

MouseMove(386, 341)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(982,10)

MouseMove(980,-5)

MouseDown("left")

MouseUp("left")

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("loader", "")

If Not WinActive("loader", "") Then WinActivate("loader", "")

WinWaitActive("loader", "")

Sleep(1000)

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("classname=#32770", "")

If Not WinActive("classname=#32770", "") Then WinActivate("classname=#32770", "")

WinWaitActive("classname=#32770", "")

Sleep(1000)

MouseMove(279, 295)

Sleep(4000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(40000)

Sleep(2000)

MouseDown("left")

Sleep(2000)

MouseDown("left")

MouseUp("left")

Send("{HOME}")

Send("{ENTER}{ENTER}")

Sleep(2000)

MouseMove(412, 475)

MouseDown("left")

MouseUp("left")

MouseMove(489, 578)

MouseDown("left")

MouseUp("left")

Sleep(2000)

WinWait("Dekaron", "")

If Not WinActive("Dekaron", "") Then WinActivate("Dekaron", "")

WinWaitActive("Dekaron", "")

Sleep(2000)

MouseMove(519, 712)

MouseDown("left")

MouseUp("left")

Send("username{TAB}password{ENTER}")

Sleep(7000)

MouseMove(690, 106)

Sleep(2500)

MouseClick("left")

MouseClick("left")

Sleep(2000)

MouseMove(531, 677)

MouseDown("left")

MouseUp("left")

WinWait("GameHelper", "")

If Not WinActive("GameHelper", "") Then WinActivate("GameHelper", "")

WinWaitActive("GameHelper", "")

Sleep(20000)

MouseMove(277, 41)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(92, 149)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(400, 342)

MouseDown("left")

MouseUp("left")

Sleep(5000)

MouseMove(386, 341)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(982,10)

MouseMove(980,-5)

MouseDown("left")

MouseUp("left")

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("loader", "")

If Not WinActive("loader", "") Then WinActivate("loader", "")

WinWaitActive("loader", "")

Sleep(1000)

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("classname=#32770", "")

If Not WinActive("classname=#32770", "") Then WinActivate("classname=#32770", "")

WinWaitActive("classname=#32770", "")

Sleep(1000)

MouseMove(279, 295)

Sleep(4000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(60000)

MouseDown("left")

Sleep(2000)

MouseDown("left")

MouseUp("left")

Send("{HOME}")

Send("{ENTER}{ENTER}")

Send("{ENTER}{ENTER}")

Sleep(2000)

MouseMove(412, 475)

MouseDown("left")

MouseUp("left")

MouseMove(493, 560)

MouseDown("left")

MouseUp("left")

Sleep(2000)

WinWait("Dekaron", "")

If Not WinActive("Dekaron", "") Then WinActivate("Dekaron", "")

WinWaitActive("Dekaron", "")

Sleep(2000)

MouseMove(519, 712)

MouseDown("left")

MouseUp("left")

Send("username{TAB}password{ENTER}")

Sleep(7000)

MouseMove(690, 106)

Sleep(2500)

MouseClick("left")

MouseClick("left")

Sleep(2000)

MouseMove(531, 677)

MouseDown("left")

MouseUp("left")

WinWait("GameHelper", "")

If Not WinActive("GameHelper", "") Then WinActivate("GameHelper", "")

WinWaitActive("GameHelper", "")

Sleep(20000)

MouseMove(277, 41)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(92, 149)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(400, 342)

MouseDown("left")

MouseUp("left")

Sleep(5000)

MouseMove(386, 341)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(982,10)

MouseMove(980,-5)

MouseDown("left")

MouseUp("left")

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("loader", "")

If Not WinActive("loader", "") Then WinActivate("loader", "")

WinWaitActive("loader", "")

Sleep(1000)

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("classname=#32770", "")

If Not WinActive("classname=#32770", "") Then WinActivate("classname=#32770", "")

WinWaitActive("classname=#32770", "")

MouseMove(819, 673)

MouseDown("left")

MouseUp("left")

MouseMove(819, 673)

Sleep(2000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseDown("left")

MouseUp("left")

Sleep(80000)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

Send("{PAUSE}")

Sleep(2000)

Send("{PAUSE}{HOME}")

Send("{ENTER}{ENTER}")

Sleep(2000)

MouseMove(412, 475)

MouseDown("left")

MouseUp("left")

MouseMove(493, 560)

MouseDown("left")

MouseUp("left")

Sleep(2000)

WinWait("Dekaron", "")

If Not WinActive("Dekaron", "") Then WinActivate("Dekaron", "")

WinWaitActive("Dekaron", "")

Sleep(2000)

MouseMove(519, 712)

MouseDown("left")

MouseUp("left")

Send("username{TAB}password{ENTER}")

Sleep(7000)

MouseMove(690, 106)

Sleep(2500)

MouseClick("left")

MouseClick("left")

Sleep(2000)

MouseMove(531, 677)

MouseDown("left")

MouseUp("left")

WinWait("GameHelper", "")

If Not WinActive("GameHelper", "") Then WinActivate("GameHelper", "")

WinWaitActive("GameHelper", "")

Sleep(20000)

MouseMove(277, 41)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(92, 149)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(400, 342)

MouseDown("left")

MouseUp("left")

Sleep(5000)

MouseMove(386, 341)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(982,10)

MouseMove(980,-5)

MouseDown("left")

MouseUp("left")

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("loader", "")

If Not WinActive("loader", "") Then WinActivate("loader", "")

WinWaitActive("loader", "")

Sleep(1000)

MouseMove(139, 69)

MouseDown("left")

MouseUp("left")

WinWait("classname=#32770", "")

If Not WinActive("classname=#32770", "") Then WinActivate("classname=#32770", "")

WinWaitActive("classname=#32770", "")

Sleep(1000)

MouseMove(279, 295)

Sleep(3000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(1000)

MouseDown("left")

MouseUp("left")

Sleep(90000)

MouseDown("left")

Sleep(2000)

MouseDown("left")

MouseUp("left")

Send("{PAUSE}")

Sleep(2000)

Send("{PAUSE}")

Send("{HOME}")

Send("{ENTER}{ENTER}")

Sleep(2000)

MouseMove(412, 475)

MouseDown("left")

MouseUp("left")

MouseMove(493, 560)

MouseDown("left")

MouseUp("left")

Sleep(2000)

WinWait("Dekaron", "")

If Not WinActive("Dekaron", "") Then WinActivate("Dekaron", "")

WinWaitActive("Dekaron", "")

Sleep(2000)

MouseMove(519, 712)

MouseDown("left")

MouseUp("left")

Send("username{TAB}password{ENTER}")

Sleep(7000)

MouseMove(690, 106)

Sleep(2500)

MouseClick("left")

MouseClick("left")

Sleep(2000)

MouseMove(531, 677)

MouseDown("left")

MouseUp("left")

WinWait("GameHelper", "")

If Not WinActive("GameHelper", "") Then WinActivate("GameHelper", "")

WinWaitActive("GameHelper", "")

Sleep(20000)

MouseMove(277, 41)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(92, 149)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(400, 342)

MouseDown("left")

MouseUp("left")

Sleep(5000)

MouseMove(386, 341)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(982,10)

MouseMove(980,-5)

MouseDown("left")

MouseUp("left")

Func TogglePause()

$Paused = NOT $Paused

While $Paused

sleep(100)

ToolTip('Script is "Paused"',0,0)

WEnd

ToolTip("")

EndFunc

Func Terminate()

Exit 0

EndFunc

Func ShowMessage()

MsgBox(4096,"","Bot Paused!Press ESC to terminate the program.")

EndFunc


[font="Arial Black"]Looking for a partner in making Perfect Bot for DEKARONPm me if you wanna join.....[/font]

Share this post


Link to post
Share on other sites



Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0