Jump to content

Macro Script Problem...

jerwin
 Share

Recommended Posts

jerwin Wayfarer

jerwin

Posted
Posted

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]
Link to comment
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
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...