|
You last visited: Today at 16:02
Advertisement
[Tool]AgBot Town Script Maker
Discussion on [Tool]AgBot Town Script Maker within the SRO Hacks, Bots, Cheats & Exploits forum part of the Silkroad Online category.
06/12/2008, 22:42
|
#31
|
elite*gold: 0
Join Date: Nov 2007
Posts: 87
Received Thanks: 10
|
tommeke227 your script is great but teleport to siga dock dont work 4 me
|
|
|
06/12/2008, 23:20
|
#32
|
elite*gold: 0
Join Date: Mar 2008
Posts: 205
Received Thanks: 27
|
Very, very nice work dude, a better tool for agBot doesn´t exist!...
Dude you made the start of the revolution of bots 
THIS post is no spam, it´s only a rare devotion to iBotForFun and i also read SpriGgy´s sig *g* sorry, IT must be said... even if this wrote 20people before
NICE!!, keep on rockin'
|
|
|
06/12/2008, 23:38
|
#33
|
elite*gold: 0
Join Date: Jun 2008
Posts: 1
Received Thanks: 0
|
???
Ok how do i actually start the bot to do what it do... xD i have the script setup and everything is in right place....jsut dont know how to trigger it...
|
|
|
06/13/2008, 11:44
|
#34
|
elite*gold: 0
Join Date: Jan 2007
Posts: 221
Received Thanks: 21
|
Mine doesn't bank any of my stuff like tabs and elixirs. Other things work fine.
Thanks for help!
|
|
|
06/13/2008, 11:57
|
#35
|
elite*gold: 0
Join Date: Jun 2008
Posts: 27
Received Thanks: 2
|
save item (set at agbot etc elir wep- stroge)
how to use the script u had make...for 6.5v agbot 1st copy the code then paste to default.lst..coz 6.5v got some bug if u use etc hotan.lst..its only work on default.lst...
for 6.6v just copy the script u make to config-config1-script(agbot folder) that all..
BUT guy ag loop got bug on buying arrow n bolts..that all i quess...^_^ thx for the tool ibotforfun
|
|
|
06/13/2008, 12:46
|
#37
|
elite*gold: 0
Join Date: Aug 2007
Posts: 224
Received Thanks: 19
|
aaah i was waiting for this to be posted,
i have been using it for a little while now and i noticed the walkback to go out oh hotan acts up sometimes,
when it tries to walk out he runs back and starts walking in all kind of directions in ht and doesnt get out
i have tried to run exactly the same coords on 2 different accounts on 2 pc's
1 fails and starts acting up, the other on works
and my tabs aren't sold to the NPC.. (but this could be agbot itself)
any ideas?
|
|
|
06/13/2008, 13:04
|
#38
|
elite*gold: 20
Join Date: Apr 2008
Posts: 1,148
Received Thanks: 861
|
Quote:
Originally Posted by kresko
tommeke227 your script is great but teleport to siga dock dont work 4 me 
|
ik know thats why i post it  here
|
|
|
06/13/2008, 19:34
|
#39
|
elite*gold: 0
Join Date: Feb 2008
Posts: 83
Received Thanks: 4
|
OMG Tnx alot 4 this tool =)
|
|
|
06/13/2008, 21:20
|
#40
|
elite*gold: 0
Join Date: Jun 2008
Posts: 76
Received Thanks: 281
|
----------------------------------------
First Page and Download Link Updated
----------------------------------------
Updates:
- Added A Circle at Starting Point In Each Town
- Added Injects Like Teleport and Move Skills
Note:
- When using Teleport be sure you are in Range of the Teleport NPC.
|
|
|
06/13/2008, 23:38
|
#41
|
elite*gold: 0
Join Date: Apr 2008
Posts: 1,410
Received Thanks: 1,347
|
Confirming Safety
Code:
# [AgBot]Script Maker Source Code # Decompiled by hussert
Func Fn01EC($Arg00, $ArgOpt01 = "ListView array 1D and 2D Display", $ArgOpt02 = 1, $ArgOpt03 = 0, $ArgOpt04 = "|", $ArgOpt05 = "~")
Local $Var0000, $Var0001, $Var0002 = "Row", $Var0003, $Var0004, $Arr0005[Number("1")][Number("1")], $Var0006, $Var0007
Local $Arr0008[Number("1")], $Var0009, $Var000A, $Var000B, $Arr000C[Number("1")][Number("1")], $Var000D
If Not IsArray($Arg00) Then Return SetError(Number("1"), Number("0"), Number("0"))
$Var000B = GUICreate($ArgOpt01, Number("810"), Number("623"), (Execute("@DesktopWidth") - Number("800")) / Number("2"), (Execute("@DesktopHeight") - Number("600")) / Number("2"), $glConstVar0002 + $glConstVar0003)
$Var000A = GUICtrlCreateButton("&Text" & "Selected", Number("10"), Number("550"), Number("70"), Number("24"))
GUICtrlSetResizing($Var000A, BitOR($glConstVar0826, $glConstVar0829, $glConstVar082D))
$Var0001 = GUICtrlCreateButton("&Close", Number("190"), Number("550"), Number("70"), Number("24"))
GUICtrlSetResizing($Var0001, BitOR($glConstVar0826, $glConstVar0829, $glConstVar082D))
GUICtrlSetState($Var000A, ($glConstVar081E))
If UBound($Arg00, Number("0")) = Number("1") Then
ReDim $Arr000C[UBound($Arg00)][Number("1")]
For $A07C3813C26 = Number("0") To UBound($Arg00) - Number("1")
$Arr000C[$A07C3813C26][Number("0")] = $Arg00[$A07C3813C26]
Next
$Arg00 = $Arr000C
EndIf
If $ArgOpt03 And IsArray($Arg00) And UBound($Arg00, Number("0")) = Number("2") Then
ReDim $Arr0005[UBound($Arg00, Number("2"))][UBound($Arg00, Number("1"))]
For $A0AE2324B17 = Number("0") To UBound($Arg00, Number("2")) - Number("1")
For $A4C71533556 = Number("0") To UBound($Arg00, Number("1")) - Number("1")
If $A4C71533556 > Number("250") Then ExitLoop
$Arr0005[$A0AE2324B17][$A4C71533556] = $Arg00[$A4C71533556][$A0AE2324B17]
Next
Next
$Arg00 = $Arr0005
EndIf
Opt("GUIDataSeparatorChar", $ArgOpt04)
For $A2F8B51122E = Number("0") To UBound($Arg00) - Number("1") Step Number("1")
For $A37A063631C = Number("0") To UBound($Arg00, Number("2")) - Number("1") Step Number("1")
$Arg00[$A2F8B51122E][$A37A063631C] = StringReplace($Arg00[$A2F8B51122E][$A37A063631C], $ArgOpt04, $ArgOpt05)
Next
Next
For $A07C3813C26 = Number("1") To UBound($Arg00, Number("2"))
$Var0002 &= $ArgOpt04 & "Col " & $A07C3813C26 - Number("1")
Next
StringReplace($Var0002, $ArgOpt04, "<")
If @extended > Number("252") Then
$Var0003 = StringInStr($Var0002, $ArgOpt04, Number("0"), Number("252"))
$Var0002 = StringLeft($Var0002, $Var0003 - Number("1"))
EndIf
$Var0006 = StringReplace($Var0002, "Col", "ND")
If UBound($Arg00, Number("0")) = Number("2") Then
ReDim $Arr0008[UBound($Arg00)]
For $A07C3813C26 = Number("0") To UBound($Arg00) - Number("1")
$Arr0008[$A07C3813C26] = "[" & $A07C3813C26 & "]"
For $A4B9133525A = Number("0") To UBound($Arg00, Number("2")) - Number("1")
If $A4B9133525A < Number("251") Then
$Arr0008[$A07C3813C26] &= $ArgOpt04 & $Arg00[$A07C3813C26][$A4B9133525A]
Else
ExitLoop
EndIf
Next
$Arr0008[$A07C3813C26] = StringMid($Arr0008[$A07C3813C26], Number("1"), StringLen($Arr0008) - Number("1"))
Next
Else
$Arr0008 = $Arg00
EndIf
$Var0004 = WinGetClientSize($Var000B)
GUICtrlDelete($Var0000)
$Var0000 = GUICtrlCreateListView($Var0002, Number("0"), Number("16"), $Var0004[Number("0")] - Number("10"), $Var0004[Number("1")] - Number("90"), BitOR($glConstVar0572, $glConstVar0567), BitOR($glConstVar057D, $glConstVar057E, $glConstVar057B, $glConstVar0583))
GUICtrlSetResizing($Var0000, BitOR($glConstVar0825, $glConstVar0828, $glConstVar0826, $glConstVar0829))
For $A4B9133525A = Number("0") To UBound($Arr0008) - Number("1")
If ($A4B9133525A < Number("3999")) Or $ArgOpt02 Then
If $A4B9133525A < Number("3999") Then
$Var000D = GUICtrlCreateListViewItem($Arr0008[$A4B9133525A], $Var0000)
If Not $Var000D Then GUICtrlCreateListViewItem($Var0006, $Var0000)
Else
$Var0007 = Fn01AC($Var0000, $Arr0008[$A4B9133525A], -Number("1"))
If ($Var0007 = $glConstVar058B) Then Fn01AC($Var0000, $Var0006, -Number("1"))
EndIf
ElseIf ($A4B9133525A >= Number("3999")) Then
ExitLoop
EndIf
Next
Fn01BE($Var0000, Number("2"), $glConstVar0669)
If UBound($Arg00, Number("2")) = Number("1") Then Fn01BE($Var0000, Number("1"), $glConstVar0669)
GUISetState()
Local $Var000E = Opt("GUIOnEventMode", Number("0"))
Do
$Var0009 = GUIGetMsg(Number("1"))
Select
Case $Var0009[Number("0")] = $Var000A
Local $Arr000F[Number("1")], $Var0010 = ""
If Fn0176($Var0000) Then $Arr000F = Fn0196($Var0000, True)
If (IsArray($Arr000F)) Then
ClipPut("")
For $A07C3813C26 = Number("1") To $Arr000F[Number("0")]
$Var0010 &= $Arr0008[$Arr000F[$A07C3813C26]] & Execute("@LF")
Next
Else
For $A07C3813C26 = Number("0") To UBound($Arr0008) - Number("1")
$Var0010 &= $Arr0008[$A07C3813C26] & Execute("@LF")
Next
EndIf
ClipPut($Var0010)
EndSelect
Until $Var0009[Number("0")] = $glConstVar0803 Or $Var0009[Number("0")] = $Var0001
GUIDelete($Var000B)
Opt("GUIOnEventMode", $Var000E)
Return SetError(Number("0"), Number("0"), Number("1"))
EndFunc
Func Fn01ED(ByRef $ArgRef00, $Arg01, $ArgOpt02 = "")
Local $Var0000 = Number("0")
If Not IsArray($ArgRef00) Then
SetError(Number("1"))
Return Number("0")
EndIf
ReDim $ArgRef00[UBound($ArgRef00) + Number("1")]
For $Var0000 = UBound($ArgRef00) - Number("1") To $Arg01 + Number("1") Step -Number("1")
$ArgRef00[$Var0000] = $ArgRef00[$Var0000 - Number("1")]
Next
$ArgRef00[$Var0000] = $ArgOpt02
Return Number("1")
EndFunc
Func Fn01EE(Const ByRef $ArgCRef00, $ArgOpt01 = 0, $ArgOpt02 = 0)
If IsArray($ArgCRef00) Then
Return $ArgCRef00[Fn01EF($ArgCRef00, $ArgOpt01, $ArgOpt02)]
Else
SetError(Number("1"))
Return ""
EndIf
EndFunc
Func Fn01EF(Const ByRef $ArgCRef00, $ArgOpt01 = 0, $ArgOpt02 = 0)
Local $Var0000, $Var0001 = $ArgOpt02
If Not IsArray($ArgCRef00) Then
SetError(Number("1"))
Return ""
EndIf
Local $Var0002 = UBound($ArgCRef00)
For $Var0000 = $ArgOpt02 To ($Var0002 - Number("1"))
If $ArgOpt01 = Number("1") Then
If Number($ArgCRef00[$Var0001]) < Number($ArgCRef00[$Var0000]) Then
$Var0001 = $Var0000
EndIf
Else
If $ArgCRef00[$Var0001] < $ArgCRef00[$Var0000] Then
$Var0001 = $Var0000
EndIf
EndIf
Next
SetError(Number("0"))
Return $Var0001
EndFunc
Func Fn01F0(Const ByRef $ArgCRef00, $ArgOpt01 = 0, $ArgOpt02 = 0)
If IsArray($ArgCRef00) Then
Return $ArgCRef00[Fn01F1($ArgCRef00, $ArgOpt01, $ArgOpt02)]
Else
SetError(Number("1"))
Return ""
EndIf
EndFunc
Func Fn01F1(Const ByRef $ArgCRef00, $ArgOpt01 = 0, $ArgOpt02 = 0)
Local $Var0000 = Number("0"), $Var0001 = $ArgOpt02
If Not IsArray($ArgCRef00) Then
SetError(Number("1"))
Return ""
EndIf
Local $Var0002 = UBound($ArgCRef00)
For $Var0000 = $ArgOpt02 To ($Var0002 - Number("1"))
If $ArgOpt01 = Number("1") Then
If Number($ArgCRef00[$Var0001]) > Number($ArgCRef00[$Var0000]) Then
$Var0001 = $Var0000
EndIf
Else
If $ArgCRef00[$Var0001] > $ArgCRef00[$Var0000] Then
$Var0001 = $Var0000
EndIf
EndIf
Next
SetError(Number("0"))
Return $Var0001
EndFunc
Func Fn01F2(ByRef $ArgRef00)
Local $Var0000
If (Not IsArray($ArgRef00)) Then
SetError(Number("1"))
Return ""
EndIf
$Var0000 = $ArgRef00[UBound($ArgRef00) - Number("1")]
If UBound($ArgRef00) = Number("1") Then
$ArgRef00 = ""
Else
ReDim $ArgRef00[UBound($ArgRef00) - Number("1")]
EndIf
Return $Var0000
EndFunc
Func Fn01F3(ByRef $ArgRef00, $Arg01, $ArgOpt02 = 0)
Local $Var0000, $Var0001
If (Not IsArray($ArgRef00)) Then
SetError(Number("1"))
Return Number("0")
EndIf
If (Not IsArray($Arg01)) Then
If $ArgOpt02 = Number("1") Then
For $Var0000 = (UBound($ArgRef00) - Number("1")) To Number("1") Step -Number("1")
$ArgRef00[$Var0000] = $ArgRef00[$Var0000 - Number("1")]
Next
$ArgRef00[Number("0")] = $Arg01
Else
For $Var0000 = Number("0") To (UBound($ArgRef00) - Number("2"))
$ArgRef00[$Var0000] = $ArgRef00[$Var0000 + Number("1")]
Next
$Var0000 = (UBound($ArgRef00) - Number("1"))
$ArgRef00[$Var0000] = $Arg01
EndIf
SetError(Number("0"))
Return Number("1")
Else
If UBound($Arg01) > UBound($ArgRef00) Then
SetError(Number("1"))
Return -Number("1")
Else
For $Var0001 = Number("0") To (UBound($Arg01) - Number("1"))
If $ArgOpt02 = Number("1") Then
For $Var0000 = (UBound($ArgRef00) - Number("1")) To Number("1")
$ArgRef00[$Var0000] = $ArgRef00[$Var0000 - Number("1")]
Next
$ArgRef00[$Var0001] = $Arg01[$Var0001]
Else
For $Var0000 = Number("0") To (UBound($ArgRef00) - Number("2"))
$ArgRef00[$Var0000] = $ArgRef00[$Var0000 + Number("1")]
Next
$Var0000 = (UBound($ArgRef00) - Number("1"))
$ArgRef00[$Var0000] = $Arg01[$Var0001]
EndIf
Next
EndIf
EndIf
SetError(Number("0"))
Return Number("1")
EndFunc
Func Fn01F4(ByRef $ArgRef00, $ArgOpt01 = 0, $ArgOpt02 = 0)
If Not IsArray($ArgRef00) Then
SetError(Number("1"))
Return Number("0")
EndIf
Local $Var0000, $Var0001 = UBound($ArgRef00) - Number("1")
If $ArgOpt02 < Number("1") Or $ArgOpt02 > $Var0001 Then $ArgOpt02 = $Var0001
For $A07C3813C26 = $ArgOpt01 To $ArgOpt01 + Int(($ArgOpt02 - $ArgOpt01 - Number("1")) / Number("2"))
$Var0000 = $ArgRef00[$A07C3813C26]
$ArgRef00[$A07C3813C26] = $ArgRef00[$ArgOpt02]
$ArgRef00[$ArgOpt02] = $Var0000
$ArgOpt02 = $ArgOpt02 - Number("1")
Next
Return Number("1")
EndFunc
Func Fn01F5(Const ByRef $ArgCRef00, $Arg01, $ArgOpt02 = 0, $ArgOpt03 = 0, $ArgOpt04 = 0, $ArgOpt05 = False)
Local $Var0000, $Var0001, $Var0002
If Not IsArray($ArgCRef00) Then
SetError(Number("1"))
Return -Number("1")
EndIf
$Var0001 = UBound($ArgCRef00) - Number("1")
If $ArgOpt03 = Number("0") Then $ArgOpt03 = $Var0001
If $ArgOpt02 > $Var0001 Then
SetError(Number("2"))
Return -Number("1")
EndIf
If $ArgOpt03 > $Var0001 Then
SetError(Number("3"))
Return -Number("1")
EndIf
If $ArgOpt02 > $ArgOpt03 Then
SetError(Number("4"))
Return -Number("1")
EndIf
If Not ($ArgOpt04 = Number("0") Or $ArgOpt04 = Number("1")) Then
SetError(Number("5"))
Return -Number("1")
EndIf
For $Var0000 = $ArgOpt02 To $ArgOpt03
Select
Case $ArgOpt04 = Number("0")
If $ArgOpt05 = False Then
If $ArgCRef00[$Var0000] = $Arg01 Then
SetError(Number("0"))
Return $Var0000
EndIf
Else
$Var0002 = StringInStr($ArgCRef00[$Var0000], $Arg01, $ArgOpt04)
If $Var0002 > Number("0") Then
SetError(Number("0"))
Return $Var0000
EndIf
EndIf
Case $ArgOpt04 = Number("1")
If $ArgOpt05 = False Then
If $ArgCRef00[$Var0000] == $Arg01 Then
SetError(Number("0"))
Return $Var0000
EndIf
Else
$Var0002 = StringInStr($ArgCRef00[$Var0000], $Arg01, $ArgOpt04)
If $Var0002 > Number("0") Then
SetError(Number("0"))
Return $Var0000
EndIf
EndIf
EndSelect
Next
SetError(Number("6"))
Return -Number("1")
EndFunc
Func Fn01F6(ByRef $ArgRef00, $ArgOpt01 = 0, $ArgOpt02 = 0, $ArgOpt03 = 0, $ArgOpt04 = 1, $ArgOpt05 = 0)
If Not IsArray($ArgRef00) Then
SetError(Number("1"))
Return Number("0")
EndIf
Local $Var0000 = UBound($ArgRef00) - Number("1")
If $ArgOpt03 < Number("1") Or $ArgOpt03 > $Var0000 Then $ArgOpt03 = $Var0000
If $ArgOpt04 = Number("1") Then
Fn01F7($ArgRef00, $ArgOpt02, $ArgOpt03)
If $ArgOpt01 Then Fn01F4($ArgRef00, $ArgOpt02, $ArgOpt03)
Else
Fn01F8($ArgRef00, $ArgOpt02, $ArgOpt03, $ArgOpt04, $ArgOpt05, $ArgOpt01)
EndIf
Return Number("1")
EndFunc
Func Fn01F7(ByRef $ArgRef00, ByRef $ArgRef01, ByRef $ArgRef02)
Local $Var0000, $Var0001, $Var0002
If $ArgRef02 - $ArgRef01 < Number("10") Then
For $Var0000 = $ArgRef01 + Number("1") To $ArgRef02
$Var0002 = $ArgRef00[$Var0000]
$Var0001 = $Var0000
While $Var0001 > $ArgRef01 And ((IsNumber($ArgRef00[$Var0001 - Number("1")]) = IsNumber($Var0002) And $ArgRef00[$Var0001 - Number("1")] > $Var0002) Or (IsNumber($ArgRef00[$Var0001 - Number("1")]) <> IsNumber($Var0002) And String($ArgRef00[$Var0001 - Number("1")]) > String($Var0002)))
$ArgRef00[$Var0001] = $ArgRef00[$Var0001 - Number("1")]
$Var0001 = $Var0001 - Number("1")
WEnd
$ArgRef00[$Var0001] = $Var0002
Next
Return
EndIf
Local $Arr0003 = $ArgRef00[Int(($ArgRef01 + $ArgRef02) / Number("2"))]
Local $Var0004 = $ArgRef01
Local $Var0005 = $ArgRef02
Do
While ((IsNumber($ArgRef00[$Var0004]) = IsNumber($Arr0003) And $ArgRef00[$Var0004] < $Arr0003) Or (IsNumber($ArgRef00[$Var0004]) <> IsNumber($Arr0003) And String($ArgRef00[$Var0004]) < String($Arr0003)))
$Var0004 = $Var0004 + Number("1")
WEnd
While ((IsNumber($ArgRef00[$Var0005]) = IsNumber($Arr0003) And $ArgRef00[$Var0005] > $Arr0003) Or (IsNumber($ArgRef00[$Var0005]) <> IsNumber($Arr0003) And String($ArgRef00[$Var0005]) > String($Arr0003)))
$Var0005 = $Var0005 - Number("1")
WEnd
If $Var0004 <= $Var0005 Then
$Var0002 = $ArgRef00[$Var0004]
$ArgRef00[$Var0004] = $ArgRef00[$Var0005]
$ArgRef00[$Var0005] = $Var0002
$Var0004 = $Var0004 + Number("1")
$Var0005 = $Var0005 - Number("1")
EndIf
Until $Var0004 > $Var0005
Fn01F7($ArgRef00, $ArgRef01, $Var0005)
Fn01F7($ArgRef00, $Var0004, $ArgRef02)
EndFunc
Func Fn01F8(ByRef $ArgRef00, ByRef $ArgRef01, ByRef $ArgRef02, ByRef $ArgRef03, ByRef $ArgRef04, ByRef $ArgRef05)
If $ArgRef01 >= $ArgRef02 Then Return
Local $Var0000, $Var0001 = $ArgRef03 - Number("1")
Local $Arr0002 = $ArgRef00[Int(($ArgRef01 + $ArgRef02) / Number("2"))][$ArgRef04]
Local $Var0003 = $ArgRef01
Local $Var0004 = $ArgRef02
Do
If $ArgRef05 Then
While ((IsNumber($ArgRef00[$Var0003][$ArgRef04]) = IsNumber($Arr0002) And $ArgRef00[$Var0003][$ArgRef04] > $Arr0002) Or (IsNumber($ArgRef00[$Var0003][$ArgRef04]) <> IsNumber($Arr0002) And String($ArgRef00[$Var0003][$ArgRef04]) > String($Arr0002)))
$Var0003 = $Var0003 + Number("1")
WEnd
While ((IsNumber($ArgRef00[$Var0004][$ArgRef04]) = IsNumber($Arr0002) And $ArgRef00[$Var0004][$ArgRef04] < $Arr0002) Or (IsNumber($ArgRef00[$Var0004][$ArgRef04]) <> IsNumber($Arr0002) And String($ArgRef00[$Var0004][$ArgRef04]) < String($Arr0002)))
$Var0004 = $Var0004 - Number("1")
WEnd
Else
While ((IsNumber($ArgRef00[$Var0003][$ArgRef04]) = IsNumber($Arr0002) And $ArgRef00[$Var0003][$ArgRef04] < $Arr0002) Or (IsNumber($ArgRef00[$Var0003][$ArgRef04]) <> IsNumber($Arr0002) And String($ArgRef00[$Var0003][$ArgRef04]) < String($Arr0002)))
$Var0003 = $Var0003 + Number("1")
WEnd
While ((IsNumber($ArgRef00[$Var0004][$ArgRef04]) = IsNumber($Arr0002) And $ArgRef00[$Var0004][$ArgRef04] > $Arr0002) Or (IsNumber($ArgRef00[$Var0004][$ArgRef04]) <> IsNumber($Arr0002) And String($ArgRef00[$Var0004][$ArgRef04]) > String($Arr0002)))
$Var0004 = $Var0004 - Number("1")
WEnd
EndIf
If $Var0003 <= $Var0004 Then
For $A2F8B51122E = Number("0") To $Var0001
$Var0000 = $ArgRef00[$Var0003][$A2F8B51122E]
$ArgRef00[$Var0003][$A2F8B51122E] = $ArgRef00[$Var0004][$A2F8B51122E]
$ArgRef00[$Var0004][$A2F8B51122E] = $Var0000
Next
$Var0003 = $Var0003 + Number("1")
$Var0004 = $Var0004 - Number("1")
EndIf
Until $Var0003 > $Var0004
Fn01F8($ArgRef00, $ArgRef01, $Var0004, $ArgRef03, $ArgRef04, $ArgRef05)
Fn01F8($ArgRef00, $Var0003, $ArgRef02, $ArgRef03, $ArgRef04, $ArgRef05)
EndFunc
Func Fn01F9(ByRef $ArgRef00, ByRef $ArgRef01)
Local $Var0000 = $ArgRef00
$ArgRef00 = $ArgRef01
$ArgRef01 = $Var0000
SetError(Number("0"))
EndFunc
Func Fn01FA(Const ByRef $ArgCRef00, $ArgOpt01 = 0)
Local $Var0000, $Var0001 = Number("0"), $Var0002 = "", $Var0003 = ""
If (IsArray($ArgCRef00)) Then
For $Var0000 = $ArgOpt01 To (UBound($ArgCRef00) - Number("1"))
$Var0001 = Number("1")
If $Var0000 > $ArgOpt01 Then
$Var0002 = Execute("@CR")
EndIf
$Var0003 = $Var0003 & $Var0002 & $ArgCRef00[$Var0000]
Next
EndIf
ClipPut($Var0003)
Return $Var0001
EndFunc
Func Fn01FB(Const ByRef $ArgCRef00, $Arg01, $ArgOpt02 = Default, $ArgOpt03 = Default)
Local $Var0000 = UBound($ArgCRef00) - Number("1")
If ($Var0000 + Number("1")) < Number("1") Or UBound($ArgCRef00, Number("0")) > Number("1") Then Return SetError(Number("1"), Number("0"), "")
If $ArgOpt02 = Default Or $ArgOpt02 = -Number("1") Then $ArgOpt02 = Number("0")
If $ArgOpt03 = Default Or $ArgOpt03 = -Number("1") Then $ArgOpt03 = $Var0000
If ($ArgOpt02 < Number("0")) Or ($ArgOpt03 < Number("0")) Or ($ArgOpt02 > $ArgOpt03) Then Return SetError(Number("2"), Number("0"), "")
If ($ArgOpt03 > $Var0000) Then
$ArgOpt03 = $Var0000
EndIf
Local $Var0001
For $A07C3813C26 = $ArgOpt02 To $ArgOpt03
$Var0001 &= $ArgCRef00[$A07C3813C26] & $Arg01
Next
Return StringTrimRight($Var0001, StringLen($Arg01))
EndFunc
Func Fn01FC($Arg00, $Arg01, $ArgOpt02 = 0, $ArgOpt03 = 0, $ArgOpt04 = 0)
Local $Var0000
If UBound($Arg00) = Number("0") Then
SetError(Number("1"))
Return $Arg00
EndIf
If $ArgOpt03 < Number("0") Or Not IsNumber($ArgOpt03) Then
SetError(Number("2"))
Return $Arg00
EndIf
If UBound($Arg00) <= $ArgOpt04 Or Not IsNumber($ArgOpt04) Then
SetError(Number("3"))
Return $Arg00
EndIf
If $ArgOpt04 < Number("1") Then $ArgOpt04 = UBound($Arg00) - Number("1")
If $ArgOpt02 < Number("0") Or $ArgOpt02 > Number("1") Then
SetError(Number("4"))
Return
EndIf
For $Var0000 = $ArgOpt03 To $ArgOpt04
If $ArgOpt02 = Number("0") Then
$Arg00[$Var0000] = StringTrimLeft($Arg00[$Var0000], $Arg01)
Else
$Arg00[$Var0000] = StringTrimRight($Arg00[$Var0000], $Arg01)
EndIf
Next
Return $Arg00
EndFunc
Global Const $glConstVar093D = Number("256")
Global Const $glConstVar093E = Number("2048")
Global Const $glConstVar093F = Number("2048")
Global Const $glConstVar0940 = Number("0")
Global Const $glConstVar0941 = Number("256")
Global Const $glConstVar0942 = Number("512")
Global Const $glConstVar0943 = Number("1024")
Global Const $glConstVar0944 = Number("2048")
Global Const $glConstVar0945 = Number("4096")
Global Const $glConstVar0946 = ($glConstVar0032 + Number("7"))
Global Const $glConstVar0947 = ($glConstVar0032 + Number("20"))
Global Const $glConstVar0948 = ($glConstVar0032 + Number("6"))
Global Const $glConstVar0949 = ($glConstVar0032 + Number("10"))
Global Const $glConstVar094A = ($glConstVar0032 + Number("2"))
Global Const $glConstVar094B = ($glConstVar0032 + Number("13"))
Global Const $glConstVar094C = $glConstVar094A
Global Const $glConstVar094D = ($glConstVar0032 + Number("3"))
Global Const $glConstVar094E = ($glConstVar0032 + Number("12"))
Global Const $glConstVar094F = $glConstVar094D
Global Const $glConstVar0950 = ($glConstVar0032 + Number("18"))
Global Const $glConstVar0951 = ($glConstVar0032 + Number("19"))
Global Const $glConstVar0952 = $glConstVar0950
Global Const $glConstVar0953 = $glConstVar00C1
Global Const $glConstVar0954 = ($glConstVar0032 + Number("14"))
Global Const $glConstVar0955 = $glConstVar00C3
Global Const $glConstVar0956 = ($glConstVar0032 + Number("15"))
Global Const $glConstVar0957 = ($glConstVar0032 + Number("8"))
Global Const $glConstVar0958 = ($glConstVar0032 + Number("4"))
Global Const $glConstVar0959 = ($glConstVar0032 + Number("1"))
Global Const $glConstVar095A = ($glConstVar0032 + Number("11"))
Global Const $glConstVar095B = $glConstVar0959
Global Const $glConstVar095C = ($glConstVar0032 + Number("16"))
Global Const $glConstVar095D = ($glConstVar0032 + Number("17"))
Global Const $glConstVar095E = $glConstVar095C
Global Const $glConstVar095F = $glConstVar00C2
Global Const $glConstVar0960 = ($glConstVar0032 + Number("9"))
Global Const $glConstVar0961 = Number("255")
Global Const $glConstVar0962 = Number("1")
Global Const $glConstVar0963 = Number("0")
Global Const $glConstVar0964 = Number("3")
Global Const $glConstVar0965 = Number("2")
Global Const $glConstVar0966 = Number("4")
Global Const $glConstVar0967 = Number("-880")
Global $A29B2F32647
Global $A13C2034E40 = False
Func Fn01FD($Arg00, $ArgOpt01 = -1, $ArgOpt02 = "", $ArgOpt03 = -1, $ArgOpt04 = 0)
If Not IsHWnd($Arg00) Then Fn00B7("Invalid Window handle for _GUICtrlStatusBar_Create 1st parameter")
Local $Arr0000[Number("1")], $Arr0001[Number("1")], $Var0002, $Var0003, $Var0004 = BitOR($glConstVar0016, $glConstVar0014), $Var0005, $Var0006
If $ArgOpt03 = -Number("1") Then $ArgOpt03 = Number("0")
If $Var0005 = -Number("1") Then $Var0005 = Number("0")
If Execute("@NumParams") > Number("1") Then
If IsArray($ArgOpt01) Then
$Arr0000 = $ArgOpt01
Else
$Arr0000[Number("0")] = $ArgOpt01
EndIf
If Execute("@NumParams") = Number("2") Then
ReDim $Arr0001[UBound($Arr0000)]
Else
If IsArray($ArgOpt02) Then
$Arr0001 = $ArgOpt02
Else
$Arr0001[Number("0")] = $ArgOpt02
EndIf
If UBound($Arr0000) <> UBound($Arr0001) Then
If UBound($Arr0000) > UBound($Arr0001) Then
$Var0006 = UBound($Arr0001)
ReDim $Arr0001[UBound($Arr0000)]
For $Var0003 = $Var0006 To UBound($Arr0001) - Number("1")
$Arr0000[$Var0003] = ""
Next
Else
$Var0006 = UBound($Arr0000)
ReDim $Arr0000[UBound($Arr0001)]
For $Var0003 = $Var0006 To UBound($Arr0000) - Number("1")
$Arr0000[$Var0003] = $Arr0000[$Var0003 - Number("1")] + Number("75")
Next
$Arr0000[UBound($Arr0001) - Number("1")] = -Number("1")
EndIf
EndIf
EndIf
If Not IsHWnd($Arg00) Then $Arg00 = HWnd($Arg00)
If Execute("@NumParams") > Number("3") Then $Var0004 = BitOR($Var0004, $ArgOpt03)
$Var0005 = $ArgOpt04
EndIf
If Execute("@OSTYPE") = "WIN32_WINDOWS" Then
$Var0002 = DllCall("comctl32.dll", "hwnd", "CreateStatusWindow", "long", $Var0004, "str", "", "hwnd", $Arg00, "int", Number("0"))
$Var0002 = HWnd($Var0002[Number("0")])
Else
$Var0002 = HWnd(Fn0033($Var0005, "msctls_statusbar32", "", $Var0004, Number("0"), Number("0"), Number("0"), Number("0"), $Arg00))
EndIf
If @error Then Return SetError(Number("1"), Number("1"), Number("0"))
If Execute("@NumParams") > Number("1") Then
Fn0217($Var0002, UBound($Arr0000), $Arr0000)
For $Var0003 = Number("0") To UBound($Arr0001) - Number("1")
Fn0219($Var0002, $Arr0001[$Var0003], $Var0003)
Next
EndIf
Return $Var0002
EndFunc
Func Fn01FE($Arg00, $ArgOpt01 = @ScriptLineNumber)
ConsoleWrite("!===========================================================" & Execute("@LF") & "+======================================================" & Execute("@LF") & "-->Line(" & StringFormat("%04d", $ArgOpt01) & "):" & Execute("@TAB") & $Arg00 & Execute("@LF") & "+======================================================" & Execute("@LF"))
EndFunc
Func Fn01FF(ByRef $ArgRef00)
If $A13C2034E40 Then Fn021D($ArgRef00)
Local $Var0000
If IsHWnd($ArgRef00) Then
If Fn0080($ArgRef00, $A29B2F32647) Then
$Var0000 = Fn0038($ArgRef00)
$ArgRef00 = Number("0")
Else
Fn00B8("Not Allowed to Destroy Other Applications ListView(s)")
Return SetError(Number("1"), Number("1"), False)
EndIf
Else
Local $Var0001 = GUICtrlGetHandle($ArgRef00)
$Var0000 = Fn0038($Var0001)
$ArgRef00 = Number("0")
EndIf
If Not @error Then Return $Var0000 <> Number("0")
Return SetError(Number("1"), Number("1"), False)
EndFunc
Func Fn0200($Arg00, $Arg01, $Arg02, $ArgOpt03 = 4)
Local $Var0000, $Var0001, $Var0002, $Var0003, $Var0004, $Var0005, $Var0006, $Var0007, $Var0008, $Var0009, $Var000A
$Var0000 = Fn0209($Arg00, $Arg01)
$Var0001 = $Var0000[Number("0")]
$Var0002 = $Var0000[Number("1")]
$Var0003 = $Var0000[Number("2")] - $Var0001
$Var0004 = $Var0000[Number("3")] - $Var0002
$Var0005 = $Var0001
$Var0006 = $Var0002
$Var0007 = Fn007B($Arg02)
$Var0008 = Fn0076($Arg02)
If $Var0007 > $Var0003 Then $Var0007 = $Var0003
If $Var0008 > $Var0004 Then $Var0008 = $Var0004
$Var0009 = ($Var0003 - $Var0007) / Number("2")
$Var000A = ($Var0004 - $Var0008) / Number("2")
If $Var0009 < Number("0") Then $Var0009 = Number("0")
If $Var000A < Number("0") Then $Var000A = Number("0")
If BitAND($ArgOpt03, Number("1")) = Number("1") Then $Var0005 = $Var0001 + $Var0009
If BitAND($ArgOpt03, Number("2")) = Number("2") Then $Var0006 = $Var0002 + $Var000A
If BitAND($ArgOpt03, Number("4")) = Number("4") Then
$Var0009 = Fn0203($Arg00)
$Var000A = Fn0204($Arg00)
$Var0005 = $Var0001
If Fn0212($Arg00) Then $Var0005 += $Var0009
$Var0006 = $Var0002 + $Var000A
$Var0007 = $Var0003 - ($Var0009 * Number("2"))
$Var0008 = $Var0004 - ($Var000A * Number("2"))
EndIf
Fn00B0($Arg02, $Arg00)
Fn0095($Arg02, $Var0005, $Var0006, $Var0007, $Var0008)
EndFunc
Func Fn0201($Arg00)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003, $Var0004, $Var0005, $Arr0006[Number("3")]
$Var0001 = DllStructCreate($glConstVar0727)
$Var0002 = DllStructGetPtr($Var0001)
If Fn0080($Arg00, $A29B2F32647) Then
$Var0000 = Fn0020($Arg00, $glConstVar0946, Number("0"), $Var0002, Number("0"), "wparam", "ptr")
Else
$Var0005 = DllStructGetSize($Var0001)
$Var0004 = Fn0135($Arg00, $Var0005, $Var0003)
$Var0000 = Fn0020($Arg00, $glConstVar0946, Number("0"), $Var0004, Number("0"), "wparam", "ptr")
Fn0138($Var0003, $Var0004, $Var0002, $Var0005)
Fn012F($Var0003)
EndIf
If (Not $Var0000) Then
Return SetError(-Number("1"), -Number("1"), $Arr0006)
Else
$Arr0006[Number("0")] = DllStructGetData($Var0001, "BX")
$Arr0006[Number("1")] = DllStructGetData($Var0001, "BY")
$Arr0006[Number("2")] = DllStructGetData($Var0001, "RX")
Return $Arr0006
EndIf
EndFunc
Func Fn0202($Arg00)
Local $Var0000
$Var0000 = Fn0201($Arg00)
Return $Var0000[Number("0")]
EndFunc
Func Fn0203($Arg00)
Local $Var0000
$Var0000 = Fn0201($Arg00)
Return $Var0000[Number("2")]
EndFunc
Func Fn0204($Arg00)
Local $Var0000
$Var0000 = Fn0201($Arg00)
Return $Var0000[Number("1")]
EndFunc
Func Fn0205($Arg00)
If $A13C2034E40 Then Fn021D($Arg00)
Return Fn0020($Arg00, $glConstVar0948)
EndFunc
Func Fn0206($Arg00)
Local $Var0000
$Var0000 = Fn020A($Arg00, Number("0"))
Return DllStructGetData($Var0000, "Bottom") - DllStructGetData($Var0000, "Top") - (Fn0204($Arg00) * Number("2"))
EndFunc
Func Fn0207($Arg00, $ArgOpt01 = 0)
If $A13C2034E40 Then Fn021D($Arg00)
Return Fn0020($Arg00, $glConstVar0947, $ArgOpt01, Number("0"), Number("0"), "wparam", "lparam", "hwnd")
EndFunc
Func Fn0208($Arg00)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003, $Var0004, $Var0005, $Var0006
$Var0001 = Fn0205($Arg00)
$Var0004 = DllStructCreate("int[" & $Var0001 & "]")
$Var0003 = DllStructGetPtr($Var0004)
Local $Arr0007[$Var0001 + Number("1")]
If Fn0080($Arg00, $A29B2F32647) Then
$Arr0007[Number("0")] = Fn0020($Arg00, $glConstVar0948, $Var0001, $Var0003, Number("0"), "wparam", "ptr")
Else
$Var0002 = DllStructGetSize($Var0004)
$Var0005 = Fn0135($Arg00, $Var0002, $Var0006)
$Arr0007[Number("0")] = Fn0020($Arg00, $glConstVar0948, $Var0001, $Var0005, Number("0"), "wparam", "ptr")
Fn0138($Var0006, $Var0005, $Var0003, $Var0002)
Fn012F($Var0006)
EndIf
For $Var0000 = Number("1") To $Var0001
$Arr0007[$Var0000] = DllStructGetData($Var0004, Number("1"), $Var0000)
Next
Return $Arr0007
EndFunc
Func Fn0209($Arg00, $Arg01)
Local $Var0000, $Arr0001[Number("4")]
$Var0000 = Fn020A($Arg00, $Arg01)
$Arr0001[Number("0")] = DllStructGetData($Var0000, "Left")
$Arr0001[Number("1")] = DllStructGetData($Var0000, "Top")
$Arr0001[Number("2")] = DllStructGetData($Var0000, "Right")
$Arr0001[Number("3")] = DllStructGetData($Var0000, "Bottom")
Return SetError(@error, Number("0"), $Arr0001)
EndFunc
Func Fn020A($Arg00, $Arg01)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003, $Var0004, $Var0005
$Var0002 = DllStructCreate($glConstVar06F2)
$Var0001 = DllStructGetPtr($Var0002)
If Fn0080($Arg00, $A29B2F32647) Then
$Var0005 = Fn0020($Arg00, $glConstVar0949, $Arg01, $Var0001, Number("0"), "wparam", "ptr")
Else
$Var0000 = DllStructGetSize($Var0002)
$Var0003 = Fn0135($Arg00, $Var0000, $Var0004)
$Var0005 = Fn0020($Arg00, $glConstVar0949, $Arg01, $Var0003, Number("0"), "wparam", "ptr")
Fn0138($Var0004, $Var0003, $Var0001, $Var0000)
Fn012F($Var0004)
EndIf
Return SetError($Var0005, Number("0"), $Var0002)
EndFunc
Func Fn020B($Arg00, $Arg01)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003, $Var0004
$Var0000 = Fn020D($Arg00, $Arg01)
If $Var0000 = Number("0") Then Return ""
$Var0002 = DllStructCreate("char Text[" & $Var0000 & "]")
$Var0001 = DllStructGetPtr($Var0002)
If Fn0080($Arg00, $A29B2F32647) Then
Fn0020($Arg00, $glConstVar094C, $Arg01, $Var0001, Number("0"), "wparam", "ptr")
Else
$Var0003 = Fn0135($Arg00, $Var0000, $Var0004)
Fn0020($Arg00, $glConstVar094C, $Arg01, $Var0003, Number("0"), "wparam", "ptr")
Fn0138($Var0004, $Var0003, $Var0001, $Var0000)
Fn012F($Var0004)
EndIf
Return DllStructGetData($Var0002, "Text")
EndFunc
Func Fn020C($Arg00, $Arg01)
If $A13C2034E40 Then Fn021D($Arg00)
Return Fn0020($Arg00, $glConstVar094F, $Arg01)
EndFunc
Func Fn020D($Arg00, $Arg01)
Return Fn008D(Fn020C($Arg00, $Arg01))
EndFunc
Func Fn020E($Arg00, $Arg01)
Return Fn007F(Fn020C($Arg00, $Arg01))
EndFunc
Func Fn020F($Arg00, $Arg01)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003
$Var0001 = DllStructCreate("char Text[4096]")
$Var0000 = DllStructGetPtr($Var0001)
If Fn0080($Arg00, $A29B2F32647) Then
Fn0020($Arg00, $glConstVar0952, Fn0091($Arg01, Number("4096")), $Var0000, Number("0"), "wparam", "ptr")
Else
$Var0002 = Fn0135($Arg00, Number("4096"), $Var0003)
Fn0020($Arg00, $glConstVar0952, Fn0091($Arg01, Number("4096")), $Var0002, Number("0"), "wparam", "ptr")
Fn0138($Var0003, $Var0002, $Var0000, Number("4096"))
Fn012F($Var0003)
EndIf
Return DllStructGetData($Var0001, "Text")
EndFunc
Func Fn0210($Arg00)
If $A13C2034E40 Then Fn021D($Arg00)
Return Fn0020($Arg00, $glConstVar0953) <> Number("0")
EndFunc
Func Fn0211($Arg00, $Arg01)
Local $Var0000
$Var0000 = Fn020A($Arg00, $Arg01)
Return DllStructGetData($Var0000, "Right") - DllStructGetData($Var0000, "Left") - (Fn0202($Arg00) * Number("2"))
EndFunc
Func Fn0212($Arg00)
If $A13C2034E40 Then Fn021D($Arg00)
Return Fn0020($Arg00, $glConstVar0954) <> Number("0")
EndFunc
Func Fn0213($Arg00)
If $A13C2034E40 Then Fn021D($Arg00)
Fn0020($Arg00, $glConstVar0030)
EndFunc
Func Fn0214($Arg00, $Arg01)
If $A13C2034E40 Then Fn021D($Arg00)
$Arg01 = Fn0020($Arg00, $glConstVar0955, Number("0"), $Arg01)
If $Arg01 = $glConstVar02F1 Then Return "0x" & Hex($glConstVar02F1)
Return $Arg01
EndFunc
Func Fn0215($Arg00, $Arg01, $ArgOpt02 = -1, $ArgOpt03 = "")
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001
If $ArgOpt02 = -Number("1") Then
Return Fn0020($Arg00, $glConstVar0956, $Arg01, $ArgOpt02, Number("0"), "wparam", "hwnd") <> Number("0")
ElseIf StringLen($ArgOpt03) > Number("0") Then
$Var0000 = DllStructCreate("int")
$Var0001 = DllCall("shell32.dll", "int", "ExtractIconEx", "str", $ArgOpt03, "int", $ArgOpt02, "hwnd", Number("0"), "ptr", DllStructGetPtr($Var0000), "int", Number("1"))
$Var0001 = $Var0001[Number("0")]
If $Var0001 > Number("0") Then $Var0001 = Fn0020($Arg00, $glConstVar0956, $Arg01, DllStructGetData($Var0000, Number("1")), Number("0"), "wparam", "ptr")
DllCall("user32.dll", "int", "DestroyIcon", "hwnd", DllStructGetData($Var0000, Number("1")))
Return $Var0001 <> Number("0")
Else
Return Fn0020($Arg00, $glConstVar0956, $Arg01, $ArgOpt02) <> Number("0")
EndIf
EndFunc
Func Fn0216($Arg00, $Arg01)
If $A13C2034E40 Then Fn021D($Arg00)
Fn0020($Arg00, $glConstVar0957, $Arg01)
Fn0213($Arg00)
EndFunc
Func Fn0217($Arg00, $ArgOpt01 = -1, $ArgOpt02 = 25)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001 = Number("1")
Local $Var0002, $Var0003, $Var0004, $Var0005
If IsArray($ArgOpt01) <> Number("0") Then
$ArgOpt01[UBound($ArgOpt01) - Number("1")] = -Number("1")
$Var0001 = UBound($ArgOpt01)
$Var0000 = DllStructCreate("int[" & $Var0001 & "]")
For $A2F8B51122E = Number("0") To $Var0001 - Number("2")
DllStructSetData($Var0000, Number("1"), $ArgOpt01[$A2F8B51122E], $A2F8B51122E + Number("1"))
Next
DllStructSetData($Var0000, Number("1"), -Number("1"), $Var0001)
ElseIf IsArray($ArgOpt02) <> Number("0") Then
$Var0001 = UBound($ArgOpt02)
$Var0000 = DllStructCreate("int[" & $Var0001 & "]")
For $A2F8B51122E = Number("0") To $Var0001 - Number("2")
DllStructSetData($Var0000, Number("1"), $ArgOpt02[$A2F8B51122E], $A2F8B51122E + Number("1"))
Next
DllStructSetData($Var0000, Number("1"), -Number("1"), $Var0001)
ElseIf $ArgOpt01 > Number("1") Then
$Var0001 = $ArgOpt01
$Var0000 = DllStructCreate("int[" & $Var0001 & "]")
For $A2F8B51122E = Number("1") To $Var0001 - Number("1")
DllStructSetData($Var0000, Number("1"), $ArgOpt02 * $A2F8B51122E, $A2F8B51122E)
Next
DllStructSetData($Var0000, Number("1"), -Number("1"), $Var0001)
Else
$Var0000 = DllStructCreate("int")
DllStructSetData($Var0000, $Var0001, -Number("1"))
EndIf
$Var0002 = DllStructGetPtr($Var0000)
If Fn0080($Arg00, $A29B2F32647) Then
Fn0020($Arg00, $glConstVar0958, $Var0001, $Var0002, Number("0"), "wparam", "ptr")
Else
$Var0004 = DllStructGetSize($Var0000)
$Var0005 = Fn0135($Arg00, $Var0004, $Var0003)
Fn013A($Var0003, $Var0002)
Fn0020($Arg00, $glConstVar0958, $Var0001, $Var0005, Number("0"), "wparam", "ptr")
Fn012F($Var0003)
EndIf
Fn0213($Arg00)
Return Number("1")
EndFunc
Func Fn0218($Arg00, $ArgOpt01 = True)
If $A13C2034E40 Then Fn021D($Arg00)
Fn0020($Arg00, $glConstVar0960, $ArgOpt01)
EndFunc
Func Fn0219($Arg00, $ArgOpt01 = "", $ArgOpt02 = 0, $ArgOpt03 = 0)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003, $Var0004
$Var0001 = DllStructCreate("char Text[" & StringLen($ArgOpt01) + Number("1") & "]")
$Var0002 = DllStructGetPtr($Var0001)
DllStructSetData($Var0001, "Text", $ArgOpt01)
If Fn0212($Arg00) Then $ArgOpt02 = $glConstVar0961
If Fn0080($Arg00, $A29B2F32647) Then
$Var0000 = Fn0020($Arg00, $glConstVar095B, BitOR($ArgOpt02, $ArgOpt03), $Var0002, Number("0"), "wparam", "ptr")
Else
$Var0004 = Fn0135($Arg00, StringLen($ArgOpt01) + Number("1"), $Var0003)
Fn013A($Var0003, $Var0002)
$Var0000 = Fn0020($Arg00, $glConstVar095B, BitOR($ArgOpt02, $ArgOpt03), $Var0004, Number("0"), "wparam", "ptr")
Fn012F($Var0003)
EndIf
Return $Var0000 <> Number("0")
EndFunc
Func Fn021A($Arg00, $Arg01, $Arg02)
If $A13C2034E40 Then Fn021D($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003
$Var0000 = DllStructCreate("char TipText[" & StringLen($Arg02) + Number("1") & "]")
$Var0001 = DllStructGetPtr($Var0000)
DllStructSetData($Var0000, "TipText", $Arg02)
If Fn0080($Arg00, $A29B2F32647) Then
Fn0020($Arg00, $glConstVar095E, $Arg01, $Var0001, Number("0"), "wparam", "ptr")
Else
$Var0003 = Fn0135($Arg00, StringLen($Arg02) + Number("1"), $Var0002)
Fn013A($Var0002, $Var0001, $Var0003, StringLen($Arg02) + Number("1"))
Fn0020($Arg00, $glConstVar095E, $Arg01, $Var0003, Number("0"), "wparam", "ptr")
Fn012F($Var0002)
EndIf
EndFunc
Func Fn021B($Arg00, $ArgOpt01 = True)
If $A13C2034E40 Then Fn021D($Arg00)
Return Fn0020($Arg00, $glConstVar095F, $ArgOpt01)
EndFunc
Func Fn021C($Arg00, $Arg01)
If $A13C2034E40 Then Fn021D($Arg00)
If $Arg01 <> Execute("@SW_HIDE") And $Arg01 <> Execute("@SW_SHOW") Then Return SetError(Number("1"), Number("1"), Number("0"))
Local $Var0000 = DllCall("user32.dll", "int", "ShowWindow", "hwnd", HWnd($Arg00), "int", $Arg01)
If Not @error And IsArray($Var0000) Then Return $Var0000[Number("0")]
Return SetError(Number("2"), Number("2"), Number("0"))
EndFunc
Func Fn021D($Arg00)
Fn01FE("This is for debugging only, set the debug variable to false before submitting")
Fn00C9($Arg00, "msctls_statusbar32")
EndFunc
Global $A5FF3D33001
Global $A18F3E36338 = False
Func Fn021E($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003
$Var0001 = DllStructCreate("char Text[" & StringLen($Arg01) + Number("1") & "]")
$Var0002 = DllStructGetPtr($Var0001)
DllStructSetData($Var0001, "Text", $Arg01)
Fn0135($Arg00, StringLen($Arg01) + Number("1"), $Var0000)
Fn013A($Var0000, $Var0002)
$Var0003 = Fn0236($Arg00)
Fn024B($Arg00, $Var0003, $Var0003)
Fn0020($Arg00, $glConstVar04E3, True, $Var0002, Number("0"), "wparam", "ptr")
Fn012F($Var0000)
EndFunc
Func Fn021F($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar003A) = Number("0")
EndFunc
Func Fn0220($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04CC) <> Number("0")
EndFunc
Func Fn0221($Arg00, $Arg01, $Arg02)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Arr0001[Number("2")]
$Var0000 = Fn0020($Arg00, $glConstVar04CD, Number("0"), Fn0091($Arg01, $Arg02))
$Arr0001[Number("0")] = Fn008D($Var0000)
$Arr0001[Number("1")] = Fn007F($Var0000)
Return $Arr0001
EndFunc
Func Fn0222($Arg00, $Arg01, $Arg02, $Arg03, $ArgOpt04 = 150, $ArgOpt05 = 150, $ArgOpt06 = 3150016, $ArgOpt07 = 512)
If Not IsHWnd($Arg00) Then Fn00B7("Invalid Window handle for _GUICtrlEdit_Create 1st parameter")
If Not IsString($Arg01) Then Fn00B7("2nd parameter not a string for _GUICtrlEdit_Create")
Local $Var0000
If $ArgOpt04 = -Number("1") Then $ArgOpt04 = Number("150")
If $ArgOpt05 = -Number("1") Then $ArgOpt05 = Number("150")
If $ArgOpt06 = -Number("1") Then $ArgOpt06 = Number("3150016")
If $ArgOpt07 = -Number("1") Then $ArgOpt07 = Number("512")
If BitAND($ArgOpt06, $glConstVar04C7) = $glConstVar04C7 Then
$ArgOpt06 = BitOR($glConstVar0016, $glConstVar0014, $glConstVar04BF, $ArgOpt06)
Else
$ArgOpt06 = BitOR($glConstVar0016, $glConstVar0014, $glConstVar04BF, $glConstVar0004, $ArgOpt06)
EndIf
$Var0000 = Fn0033($ArgOpt07, "Edit", "", $ArgOpt06, $Arg02, $Arg03, $ArgOpt04, $ArgOpt05, $Arg00)
Fn0020($Var0000, $glConstVar0056, Fn006E($glConstVar0802), True)
Fn024D($Var0000, $Arg01)
Fn0243($Var0000, Number("0"))
Return $Var0000
EndFunc
Func Fn0223($Arg00, $ArgOpt01 = @ScriptLineNumber)
ConsoleWrite("!===========================================================" & Execute("@LF") & "+======================================================" & Execute("@LF") & "-->Line(" & StringFormat("%04d", $ArgOpt01) & "):" & Execute("@TAB") & $Arg00 & Execute("@LF") & "+======================================================" & Execute("@LF"))
EndFunc
Func Fn0224(ByRef $ArgRef00)
If $A18F3E36338 Then Fn0251($ArgRef00)
Local $Var0000
If IsHWnd($ArgRef00) Then
If Fn0080($ArgRef00, $A5FF3D33001) Then
$Var0000 = Fn0038($ArgRef00)
$ArgRef00 = Number("0")
Else
Fn00B8("Not Allowed to Destroy Other Applications Control(s)")
Return SetError(Number("1"), Number("1"), False)
EndIf
Else
Local $Var0001 = GUICtrlGetHandle($ArgRef00)
$Var0000 = Fn0038($Var0001)
$ArgRef00 = Number("0")
EndIf
If Not @error Then Return $Var0000 <> Number("0")
Return SetError(Number("1"), Number("1"), False)
EndFunc
Func Fn0225($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0020($Arg00, $glConstVar04CE)
EndFunc
Func Fn0226($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar003A, Number("1")) = Number("0")
EndFunc
Func Fn0227($Arg00, $ArgOpt01 = False)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04CF, $ArgOpt01)
EndFunc
Func Fn0228($Arg00, $ArgOpt01 = False)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003, $Var0004
Local $Var0005 = Number("0"), $Var0006, $Var0007 = Number("0"), $Var0008 = Number("0")
Local $Var0009, $Var000A, $Var000B, $Var000C, $Var000D, $Var000E
Local $Var000F, $Var0010
Local $Arr0011[Number("3")] = [Number("125"), Number("225"), -Number("1")]
Local $Var0012, $Var0013 = Opt("GUIOnEventMode", Number("0"))
$Var0010 = Fn0234($Arg00)
$Var000F = Fn0235($Arg00)
$Var0000 = GUICreate("Find", Number("349"), Number("177"), -Number("1"), -Number("1"), BitOR($glConstVar0016, $glConstVar0003, $glConstVar000D, $glConstVar0017, $glConstVar0008))
$Var000E = Fn01FD($Var0000, $Arr0011)
Fn0219($Var000E, "Find: ")
GUISetIcon(Execute("@SystemDir") & "\shell32.dll", Number("22"), $Var0000)
GUICtrlCreateLabel("Find what:", Number("9"), Number("10"), Number("53"), Number("16"), $glConstVar0509)
$Var0001 = GUICtrlCreateInput("", Number("80"), Number("8"), Number("257"), Number("21"))
If (IsArray($Var0010) And $Var0010 <> $glConstVar04CA) Then
GUICtrlSetData($Var0001, StringMid($Var000F, $Var0010[Number("0")] + Number("1"), $Var0010[Number("1")] - $Var0010[Number("0")]))
If $Var0010[Number("0")] <> $Var0010[Number("1")]Then
$Var0005 = $Var0010[Number("0")]
If BitAND(GUICtrlRead($Var000A), $glConstVar0812) = $glConstVar0812 Then $Var0006 = Number("1")
$Var0007 = Number("1")
While Number("1")
$Var0012 = StringInStr($Var000F, GUICtrlRead($Var0001), $Var0006, $Var0007)
If Not $Var0012 Then
$Var0007 = Number("0")
ExitLoop
ElseIf $Var0012 = $Var0005 + Number("1") Then
ExitLoop
EndIf
$Var0007 += Number("1")
WEnd
EndIf
Fn0219($Var000E, "Find: " & GUICtrlRead($Var0001))
EndIf
$Var0003 = GUICtrlCreateLabel("Replace with:", Number("9"), Number("42"), Number("69"), Number("17"), $glConstVar0509)
$Var0002 = GUICtrlCreateInput("", Number("80"), Number("40"), Number("257"), Number("21"))
$Var0009 = GUICtrlCreateCheckbox("Match whole word only", Number("9"), Number("72"), Number("145"), Number("17"))
$Var000A = GUICtrlCreateCheckbox("Match case", Number("9"), Number("96"), Number("145"), Number("17"))
$Var000B = GUICtrlCreateButton("Find Next", Number("168"), Number("72"), Number("161"), Number("21"), Number("0"))
$Var000C = GUICtrlCreateButton("Replace", Number("168"), Number("96"), Number("161"), Number("21"), Number("0"))
$Var000D = GUICtrlCreateButton("Close", Number("104"), Number("130"), Number("161"), Number("21"), Number("0"))
If $ArgOpt01 = False Then
GUICtrlSetState($Var0003, $glConstVar0819)
GUICtrlSetState($Var0002, $glConstVar0819)
GUICtrlSetState($Var000C, $glConstVar0819)
Else
Fn0219($Var000E, "Replacements: " & $Var0008, Number("1"))
Fn0219($Var000E, "With: ", Number("2"))
EndIf
GUISetState(Execute("@SW_SHOW"))
While Number("1")
$Var0004 = GUIGetMsg()
Select
Case $Var0004 = $glConstVar0803 Or $Var0004 = $Var000D
ExitLoop
Case $Var0004 = $Var000B
GUICtrlSetState($Var000B, $glConstVar081B)
GUICtrlSetCursor($Var000B, Number("15"))
Sleep(Number("100"))
Fn0219($Var000E, "Find: " & GUICtrlRead($Var0001))
If $ArgOpt01 = True Then
Fn0219($Var000E, "Find: " & GUICtrlRead($Var0001))
Fn0219($Var000E, "With: " & GUICtrlRead($Var0002), Number("2"))
EndIf
Fn0229($Arg00, $Var0001, $Var000A, $Var0009, $Var0005, $Var0007, $Var0008)
Sleep(Number("100"))
GUICtrlSetState($Var000B, $glConstVar081A)
GUICtrlSetCursor($Var000B, Number("2"))
Case $Var0004 = $Var000C
GUICtrlSetState($Var000C, $glConstVar081B)
GUICtrlSetCursor($Var000C, Number("15"))
Sleep(Number("100"))
Fn0219($Var000E, "Find: " & GUICtrlRead($Var0001))
Fn0219($Var000E, "With: " & GUICtrlRead($Var0002), Number("2"))
If $Var0005 Then
Fn023F($Arg00, GUICtrlRead($Var0002))
$Var0008 += Number("1")
$Var0007 -= Number("1")
Fn0219($Var000E, "Replacements: " & $Var0008, Number("1"))
EndIf
Fn0229($Arg00, $Var0001, $Var000A, $Var0009, $Var0005, $Var0007, $Var0008)
Sleep(Number("100"))
GUICtrlSetState($Var000C, $glConstVar081A)
GUICtrlSetCursor($Var000C, Number("2"))
EndSelect
WEnd
GUIDelete($Var0000)
Opt("GUIOnEventMode", $Var0013)
EndFunc
Func Fn0229($Arg00, $Arg01, $Arg02, $Arg03, ByRef $ArgRef04, ByRef $ArgRef05, ByRef $ArgRef06)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000 = Number("0"), $Var0001 = Number("0")
Local $Var0002, $Var0003 = False
Local $Var0004 = GUICtrlRead($Arg01)
$Var0002 = Fn0235($Arg00)
If BitAND(GUICtrlRead($Arg02), $glConstVar0812) = $glConstVar0812 Then $Var0000 = Number("1")
If BitAND(GUICtrlRead($Arg03), $glConstVar0812) = $glConstVar0812 Then $Var0001 = Number("1")
If $Var0004 <> "" Then
$ArgRef05 += Number("1")
$ArgRef04 = StringInStr($Var0002, $Var0004, $Var0000, $ArgRef05)
If $Var0001 And $ArgRef04 Then
Local $Var0005 = StringMid($Var0002, $ArgRef04 + StringLen($Var0004), Number("1"))
If $ArgRef04 = Number("1") Then
If ($ArgRef04 + StringLen($Var0004)) - Number("1") = StringLen($Var0002) Or ($Var0005 = " " Or $Var0005 = Execute("@LF") Or $Var0005 = Execute("@CR") Or $Var0005 = Execute("@CRLF") Or $Var0005 = Execute("@TAB")) Then $Var0003 = True
Else
Local $Var0006 = StringMid($Var0002, $ArgRef04 - Number("1"), Number("1"))
If ($ArgRef04 + StringLen($Var0004)) - Number("1") = StringLen($Var0002) Then
If ($Var0006 = " " Or $Var0006 = Execute("@LF") Or $Var0006 = Execute("@CR") Or $Var0006 = Execute("@CRLF") Or $Var0006 = Execute("@TAB")) Then $Var0003 = True
Else
If ($Var0006 = " " Or $Var0006 = Execute("@LF") Or $Var0006 = Execute("@CR") Or $Var0006 = Execute("@CRLF") Or $Var0006 = Execute("@TAB")) And ($Var0005 = " " Or $Var0005 = Execute("@LF") Or $Var0005 = Execute("@CR") Or $Var0005 = Execute("@CRLF") Or $Var0005 = Execute("@TAB")) Then $Var0003 = True
EndIf
EndIf
If $Var0003 = False Then
Fn0229($Arg00, $Arg01, $Arg02, $Arg03, $ArgRef04, $ArgRef05, $ArgRef06)
Else
Fn024B($Arg00, $ArgRef04 - Number("1"), ($ArgRef04 + StringLen($Var0004)) - Number("1"))
Fn0240($Arg00, $glConstVar0966)
EndIf
ElseIf $Var0001 And Not $ArgRef04 Then
$ArgRef05 = Number("0")
MsgBox(Number("48"), "Find", "Reached End of document, Can not find the string '" & $Var0004 & "'")
ElseIf Not $Var0001 Then
If Not $ArgRef04 Then
$ArgRef05 = Number("1")
Fn024B($Arg00, -Number("1"), Number("0"))
Fn0240($Arg00, $glConstVar0966)
$ArgRef04 = StringInStr($Var0002, $Var0004, $Var0000, $ArgRef05)
If Not $ArgRef04 Then
$ArgRef05 = Number("0")
MsgBox(Number("48"), "Find", "Reached End of document, Can not find the string '" & $Var0004 & "'")
Else
Fn024B($Arg00, $ArgRef04 - Number("1"), ($ArgRef04 + StringLen($Var0004)) - Number("1"))
Fn0240($Arg00, $glConstVar0966)
EndIf
Else
Fn024B($Arg00, $ArgRef04 - Number("1"), ($ArgRef04 + StringLen($Var0004)) - Number("1"))
Fn0240($Arg00, $glConstVar0966)
EndIf
EndIf
EndIf
EndFunc
Func Fn022A($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04D0)
EndFunc
Func Fn022B($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04D1)
EndFunc
Func Fn022C($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04D2, $glConstVar04F6)
EndFunc
Func Fn022D($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04D3)
EndFunc
Func Fn022E($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Var0001, $Var0002, $Var0003
$Var0000 = Fn023C($Arg00, $Arg01)
$Var0001 = DllStructCreate("short Len;char Text[" & $Var0000 + Number("2") & "]")
DllStructSetData($Var0001, "Len", $Var0000 + Number("2"))
$Var0002 = Fn0021($Arg00, $glConstVar04D4, $Arg01, DllStructGetPtr($Var0001), Number("0"), "wparam", "ptr")
If $Var0002 = $glConstVar04CA Then Return SetError($glConstVar04CA, $glConstVar04CA, "")
$Var0003 = DllStructCreate("char Text[" & $Var0000 + Number("1") & "]", DllStructGetPtr($Var0001))
Return DllStructGetData($Var0003, "Text")
EndFunc
Func Fn022F($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04D5)
EndFunc
Func Fn0230($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Arr0001[Number("2")]
$Var0000 = Fn0020($Arg00, $glConstVar04D6)
$Arr0001[Number("0")] = Fn008D($Var0000)
$Arr0001[Number("1")] = Fn007F($Var0000)
Return $Arr0001
EndFunc
Func Fn0231($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04D7) <> Number("0")
EndFunc
Func Fn0232($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Arr0000[Number("4")], $Var0001
$Var0001 = Fn0233($Arg00)
$Arr0000[Number("0")] = DllStructGetData($Var0001, "Left")
$Arr0000[Number("1")] = DllStructGetData($Var0001, "Top")
$Arr0000[Number("2")] = DllStructGetData($Var0001, "Right")
$Arr0000[Number("3")] = DllStructGetData($Var0001, "Bottom")
Return $Arr0000
EndFunc
Func Fn0233($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000 = DllStructCreate($glConstVar06F2)
Fn0020($Arg00, $glConstVar04D9, Number("0"), DllStructGetPtr($Var0000), Number("0"), "wparam", "ptr")
Return $Var0000
EndFunc
Func Fn0234($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Arr0000[Number("2")], $Var0001, $Var0002
$Var0001 = DllStructCreate("int Start")
$Var0002 = DllStructCreate("int End")
Fn0020($Arg00, $glConstVar04DA, DllStructGetPtr($Var0001), DllStructGetPtr($Var0002), Number("0"), "ptr", "ptr")
$Arr0000[Number("0")] = DllStructGetData($Var0001, "Start")
$Arr0000[Number("1")] = DllStructGetData($Var0002, "End")
Return $Arr0000
EndFunc
Func Fn0235($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000 = Fn0236($Arg00) + Number("1")
Local $Var0001 = DllStructCreate("char Text[" & $Var0000 & "]")
Fn0020($Arg00, $glConstVar002F, $Var0000, DllStructGetPtr($Var0001), Number("0"), "wparam", "ptr")
Return DllStructGetData($Var0001, "Text")
EndFunc
Func Fn0236($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar002E)
EndFunc
Func Fn0237($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04DB)
EndFunc
Func Fn0238($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04DC)
EndFunc
Func Fn0239($Arg00, $Arg01, $ArgOpt02 = -1)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Var0001, $Var0002
If $ArgOpt02 = -Number("1") Then
Fn021E($Arg00, $Arg01)
Else
$Var0001 = DllStructCreate("char Text[" & StringLen($Arg01) + Number("1") & "]")
$Var0002 = DllStructGetPtr($Var0001)
DllStructSetData($Var0001, "Text", $Arg01)
Fn0135($Arg00, StringLen($Arg01) + Number("1"), $Var0000)
Fn013A($Var0000, $Var0002)
Fn024B($Arg00, $ArgOpt02, $ArgOpt02)
Fn0020($Arg00, $glConstVar04E3, True, $Var0002, Number("0"), "wparam", "ptr")
Fn012F($Var0000)
EndIf
EndFunc
Func Fn023A($Arg00, $ArgOpt01 = -1)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04DE, $ArgOpt01)
EndFunc
Func Fn023B($Arg00, $ArgOpt01 = -1)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04DF, $ArgOpt01)
EndFunc
Func Fn023C($Arg00, $ArgOpt01 = -1)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000 = Fn023B($Arg00, $ArgOpt01)
Return Fn0020($Arg00, $glConstVar04E0, $Var0000)
EndFunc
Func Fn023D($Arg00, $Arg01, $Arg02)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04E1, $Arg01, $Arg02) <> Number("0")
EndFunc
Func Fn023E($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Arr0000[Number("2")], $Var0001
$Var0001 = Fn0020($Arg00, $glConstVar04E2, $Arg01)
$Arr0000[Number("0")] = Fn008D($Var0001)
$Arr0000[Number("1")] = Fn007F($Var0001)
Return $Arr0000
EndFunc
Func Fn023F($Arg00, $Arg01, $ArgOpt02 = True)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000
Local $Var0001 = DllStructCreate("char Text[" & StringLen($Arg01) + Number("1") & "]")
Local $Var0002 = DllStructGetPtr($Var0001)
DllStructSetData($Var0001, "Text", $Arg01)
Fn0135($Arg00, StringLen($Arg01) + Number("1"), $Var0000)
Fn013A($Var0000, $Var0002)
Fn0020($Arg00, $glConstVar04E3, $ArgOpt02, $Var0002, Number("0"), "wparam", "ptr")
Fn012F($Var0000)
EndFunc
Func Fn0240($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
If BitAND($Arg01, $glConstVar0962) <> $glConstVar0962 And BitAND($Arg01, $glConstVar0963) <> $glConstVar0963 And BitAND($Arg01, $glConstVar0964) <> $glConstVar0964 And BitAND($Arg01, $glConstVar0965) <> $glConstVar0965 And BitAND($Arg01, $glConstVar0966) <> $glConstVar0966 Then Return Number("0")
If $Arg01 == $glConstVar0966 Then
Return Fn0020($Arg00, $glConstVar04E5)
Else
Return Fn0020($Arg00, $glConstVar04E4, $Arg01)
EndIf
EndFunc
Func Fn0241($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04E6, $Arg01, Number("0"), Number("0"), "hwnd")
EndFunc
Func Fn0242($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04E7, $glConstVar04F6, $Arg01)
EndFunc
Func Fn0243($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0021($Arg00, $glConstVar04E8, $Arg01)
EndFunc
Func Fn0244($Arg00, $ArgOpt01 = 1, $ArgOpt02 = 65535, $ArgOpt03 = 65535)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0020($Arg00, $glConstVar04E9, $ArgOpt01, Fn0091($ArgOpt02, $ArgOpt03))
EndFunc
Func Fn0245($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0020($Arg00, $glConstVar04EA, $Arg01)
EndFunc
Func Fn0246($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04EB, $Arg01) <> Number("0")
EndFunc
Func Fn0247($Arg00, $Arg01)
Local $Var0000 = DllStructCreate($glConstVar06F2)
DllStructSetData($Var0000, "Left", $Arg01[Number("0")])
DllStructSetData($Var0000, "Top", $Arg01[Number("1")])
DllStructSetData($Var0000, "Right", $Arg01[Number("2")])
DllStructSetData($Var0000, "Bottom", $Arg01[Number("3")])
Fn0248($Arg00, $Var0000)
EndFunc
Func Fn0248($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0020($Arg00, $glConstVar04EC, Number("0"), DllStructGetPtr($Arg01), Number("0"), "wparam", "ptr")
EndFunc
Func Fn0249($Arg00, $Arg01)
Local $Var0000 = DllStructCreate($glConstVar06F2)
DllStructSetData($Var0000, "Left", $Arg01[Number("0")])
DllStructSetData($Var0000, "Top", $Arg01[Number("1")])
DllStructSetData($Var0000, "Right", $Arg01[Number("2")])
DllStructSetData($Var0000, "Bottom", $Arg01[Number("3")])
Fn024A($Arg00, $Var0000)
EndFunc
Func Fn024A($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0020($Arg00, $glConstVar04ED, Number("0"), DllStructGetPtr($Arg01), Number("0"), "wparam", "ptr")
EndFunc
Func Fn024B($Arg00, $Arg01, $Arg02)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0020($Arg00, $glConstVar04EE, $Arg01, $Arg02)
EndFunc
Func Fn024C($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
If Not IsArray($Arg01) Then Return SetError(-Number("1"), -Number("1"), False)
Local $Var0000, $Var0001, $Var0002, $Var0003
$Var0000 = UBound($Arg01)
For $A2F8B51122E = Number("0") To $Var0000 - Number("1")
$Var0002 &= "int;"
Next
$Var0002 = StringTrimRight($Var0002, Number("1"))
$Var0001 = DllStructCreate($Var0002)
For $A2F8B51122E = Number("0") To $Var0000 - Number("1")
DllStructSetData($Var0001, $A2F8B51122E + Number("1"), $Arg01[$A2F8B51122E])
Next
$Var0003 = Fn0020($Arg00, $glConstVar04EF, $Var0000, DllStructGetPtr($Var0001), Number("0"), "wparam", "ptr") <> Number("0")
Fn0085($Arg00)
Return $Var0003
EndFunc
Func Fn024D($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Var0001, $Var0002
$Var0001 = DllStructCreate("char Text[" & StringLen($Arg01) + Number("1") & "]")
$Var0002 = DllStructGetPtr($Var0001)
DllStructSetData($Var0001, "Text", $Arg01)
Fn0135($Arg00, StringLen($Arg01) + Number("1"), $Var0000)
Fn013A($Var0000, $Var0002)
Fn0020($Arg00, $glConstVar003B, Number("0"), $Var0002, Number("0"), "wparam", "ptr")
Fn012F($Var0000)
EndFunc
Func Fn024E($Arg00, $Arg01)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Fn0020($Arg00, $glConstVar04F2, Number("0"), $Arg01)
EndFunc
Func Fn024F($Arg00, $Arg01, $Arg02, $Arg03)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Local $Var0000, $Var0001, $Var0002
$Var0001 = DllStructCreate("char Title[" & StringLen($Arg01) + Number("1") & "]")
DllStructSetData($Var0001, "Title", $Arg01)
$Var0002 = DllStructCreate("char Text[" & StringLen($Arg02) + Number("1") & "]")
DllStructSetData($Var0002, "Text", $Arg02)
$Var0000 = DllStructCreate($glConstVar06B6)
DllStructSetData($Var0000, "Size", DllStructGetSize($Var0000))
DllStructSetData($Var0000, "Title", DllStructGetPtr($Var0001))
DllStructSetData($Var0000, "Text", DllStructGetPtr($Var0002))
DllStructSetData($Var0000, "Icon", $Arg03)
Return Fn0020($Arg00, $glConstVar04F0, Number("0"), DllStructGetPtr($Var0000), Number("0"), "wparam", "ptr") <> Number("0")
EndFunc
Func Fn0250($Arg00)
If $A18F3E36338 Then Fn0251($Arg00)
If Not IsHWnd($Arg00) Then $Arg00 = GUICtrlGetHandle($Arg00)
Return Fn0020($Arg00, $glConstVar04F1) <> Number("0")
EndFunc
Func Fn0251($Arg00)
Fn0223("This is for debugging only, set the debug variable to false before submitting")
Fn00C9($Arg00, "Edit")
EndFunc
$A0E8573410C = GUICreate("[AgBot]Town Script Maker", Number("938"), Number("658"), Default, Default)
GUISetFont(Number("9"), Number("400"), Number("0"), "Verdana")
$A4B85F30A19 = GUICtrlCreateTab(Number("0"), Number("0"), Number("938"), Number("658"))
GUICtrlSetResizing(-Number("1"), $glConstVar082B + $glConstVar082C)
$A5F9553055A = GUICtrlCreateTabItem("Buy Setting")
$A0795733A0B = GUICtrlCreateGroup("Buy Settings", Number("17"), Number("37"), Number("417"), Number("321"))
$A3395D33F4C = GUICtrlCreateCombo("", Number("169"), Number("61"), Number("145"), Number("25"), BitOR($glConstVar03FD, $glConstVar03FA))
GUICtrlSetData(-Number("1"), "Jangan|Donwhang|Hotan|Samarkand|Constantinople", "Jangan")
$A56A553350E = GUICtrlCreateLabel("Buy HP Type", Number("33"), Number("89"), Number("67"), Number("17"))
$A43A5B3261F = GUICtrlCreateCombo("", Number("169"), Number("85"), Number("145"), Number("25"), BitOR($glConstVar03FD, $glConstVar03FA))
GUICtrlSetData(-Number("1"), "HP Herb|HP Potion (Small)|HP Potion (Medium)|HP Potion (Large)|HP Potion (X-Large)", "HP Herb")
$A11B5332153 = GUICtrlCreateLabel("Number", Number("321"), Number("89"), Number("41"), Number("17"))
$A18B5932E63 = GUICtrlCreateInput("0", Number("377"), Number("85"), Number("41"), Number("21"))
$A2EB5F35945 = GUICtrlCreateLabel("Buy MP Type", Number("33"), Number("113"), Number("68"), Number("17"))
$A1CC5535F31 = GUICtrlCreateCombo("", Number("169"), Number("109"), Number("145"), Number("25"), BitOR($glConstVar03FD, $glConstVar03FA))
GUICtrlSetData(-Number("1"), "MP Herb|MP Potion (Small)|MP Potion (Medium)|MP Potion (Large)|MP Potion (X-Large)", "MP Herb")
$A13C5D35923 = GUICtrlCreateLabel("Number", Number("321"), Number("113"), Number("41"), Number("17"))
$A3BD5334930 = GUICtrlCreateInput("0", Number("377"), Number("109"), Number("41"), Number("21"))
$A58D5933E4A = GUICtrlCreateLabel("Buy Universal Pill", Number("33"), Number("139"), Number("85"), Number("17"))
$A48D5F31509 = GUICtrlCreateCombo("", Number("169"), Number("133"), Number("145"), Number("25"), BitOR($glConstVar03FD, $glConstVar03FA))
GUICtrlSetData(-Number("1"), "Universal Pill (Small)|Universal Pill (Medium)|Universal Pill (Large)", "Universal Pill (Small)")
$A01E573081C = GUICtrlCreateLabel("Number", Number("321"), Number("139"), Number("41"), Number("17"))
$A11E5D3281F = GUICtrlCreateInput("0", Number("377"), Number("133"), Number("41"), Number("21"))
$A38F5333719 = GUICtrlCreateLabel("Buy Wolf HP", Number("33"), Number("163"), Number("65"), Number("17"))
$A1FF593433F = GUICtrlCreateCombo("", Number("169"), Number("157"), Number("145"), Number("25"), BitOR($glConstVar03FD, $glConstVar03FA))
GUICtrlSetData(-Number("1"), "Recovery Kit (Small)|Recovery Kit (Large)|Recovery Kit (X-Large)", "Recovery Kit (Small)")
$A4C0613533B = GUICtrlCreateLabel("Number", Number("321"), Number("163"), Number("41"), Number("17"))
$A460673081C = GUICtrlCreateInput("0", Number("377"), Number("157"), Number("41"), Number("21"))
$A0606D3233B = GUICtrlCreateLabel("Buy Pet Recovery", Number("33"), Number("187"), Number("90"), Number("17"))
$A3D16334E40 = GUICtrlCreateCombo("", Number("169"), Number("181"), Number("145"), Number("25"), BitOR($glConstVar03FD, $glConstVar03FA))
GUICtrlSetData(-Number("1"), "State Recovery (Small)|State Recovery (Medium)", "State Recovery (Small)")
$A2F16B3505C = GUICtrlCreateLabel("Number", Number("321"), Number("187"), Number("41"), Number("17"))
$A0F26131818 = GUICtrlCreateInput("0", Number("377"), Number("181"), Number("41"), Number("21"))
$A3226731558 = GUICtrlCreateLabel("Buy Speed Drug", Number("33"), Number("211"), Number("82"), Number("17"))
$A4226D31614 = GUICtrlCreateCombo("", Number("169"), Number("205"), Number("145"), Number("25"), BitOR($glConstVar03FD, $glConstVar03FA))
GUICtrlSetData(-Number("1"), "Drug of Wind|Drug of Typhoon", "Drug of Wind")
$A0736530532 = GUICtrlCreateLabel("Number", Number("321"), Number("211"), Number("41"), Number("17"))
$A3436B30D22 = GUICtrlCreateInput("0", Number("377"), Number("205"), Number("41"), Number("21"))
$A3446134E04 = GUICtrlCreateLabel("Buy Pet HGP", Number("33"), Number("259"), Number("67"), Number("17"))
$A3946730547 = GUICtrlCreateInput("0", Number("169"), Number("253"), Number("41"), Number("21"))
$A0A46D33706 = GUICtrlCreateLabel("Buy Bolt Number", Number("33"), Number("283"), Number("83"), Number("17"))
$A6056335D03 = GUICtrlCreateInput("0", Number("169"), Number("277"), Number("41"), Number("21"))
$A0B56934631 = GUICtrlCreateLabel("Buy Arrow Number", Number("33"), Number("307"), Number("92"), Number("17"))
$A1C56F33044 = GUICtrlCreateInput("0", Number("169"), Number("301"), Number("41"), Number("21"))
$A0066534D1B = GUICtrlCreateLabel("Buy Horse", Number("33"), Number("235"), Number("53"), Number("17"))
$A5866B3444D = GUICtrlCreateLabel("Buy Return Scroll", Number("33"), Number("331"), Number("86"), Number("17"))
$A3D76130B2B = GUICtrlCreateInput("0", Number("169"), Number("325"), Number("41"), Number("21"))
$A2C7673515E = GUICtrlCreateInput("0", Number("377"), Number("229"), Number("41"), Number("21"))
$A1276D30256 = GUICtrlCreateLabel("Starting Town", Number("33"), Number("67"), Number("70"), Number("17"))
$A1B86336008 = GUICtrlCreateLabel("Storage Items", Number("265"), Number("261"), Number("69"), Number("17"))
$A2586935922 = GUICtrlCreateCheckbox("Storage", Number("377"), Number("261"), Number("17"), Number("17"))
GUICtrlSetState(-Number("1"), $glConstVar0812)
$A2896031B17 = GUICtrlCreateCheckbox("Sell", Number("377"), Number("285"), Number("17"), Number("17"))
GUICtrlSetState(-Number("1"), $glConstVar0812)
$A0496731B25 = GUICtrlCreateLabel("Sell Items", Number("265"), Number("285"), Number("49"), Number("17"))
$A3896D36121 = GUICtrlCreateLabel("Auto Party", Number("265"), Number("309"), Number("53"), Number("17"))
$A20A6334C27 = GUICtrlCreateLabel("Auto Potion", Number("265"), Number("333"), Number("59"), Number("17"))
$A47A6933D33 = GUICtrlCreateCheckbox("AutoPT", Number("377"), Number("309"), Number("17"), Number("17"))
GUICtrlSetState(-Number("1"), $glConstVar0812)
$A09B6031E5F = GUICtrlCreateCheckbox("AutoPots", Number("377"), Number("333"), Number("17"), Number("17"))
GUICtrlSetState(-Number("1"), $glConstVar0812)
$A11B673041D = GUICtrlCreateCombo("", Number("169"), Number("229"), Number("145"), Number("25"))
GUICtrlSetData(-Number("1"), "Red Horse|Shadow Horse|Dragon Horse|Ironclad Horse", "Red Horse")
$A15B6F35D07 = GUICtrlCreateLabel("Number", Number("321"), Number("235"), Number("41"), Number("17"))
GUICtrlCreateGroup("", -Number("99"), -Number("99"), Number("1"), Number("1"))
$A54C6933159 = GUICtrlCreateGroup("Town Script Codes", Number("446"), Number("36"), Number("417"), Number("321"))
$A43C6F34F57 = GUICtrlCreateEdit("", Number("454"), Number("60"), Number("401"), Number("257"), BitOR($glConstVar04C8, $glConstVar0009, $glConstVar000A))
$A57D6434F0A = GUICtrlCreateButton("Generate Code", Number("454"), Number("324"), Number("169"), Number("25"), Number("0"))
$A47D6B3312F = GUICtrlCreateButton("Save", Number("774"), Number("325"), Number("81"), Number("25"), Number("0"))
GUICtrlCreateGroup("", -Number("99"), -Number("99"), Number("1"), Number("1"))
$A2CE6634E42 = GUICtrlCreateTabItem("Walk Back Setting")
$A00E6833A5E = GUICtrlCreateGroup("Walk Script", Number("9"), Number("31"), Number("697"), Number("609"))
Fn011A()
$A3AC8E2001E = Fn00EE()
$A4DE6E35123 = GUICtrlCreateObj($A3AC8E2001E, Number("17"), Number("47"), Number("681"), Number("585"))
If Not IsObj($A4DE6E35123) Then
Else
MsgBox(Number("0"), "Error", "Unable Load Map object!")
Exit
EndIf
Fn00EF($A3AC8E2001E, Execute("@workingdir") & "\" & "Town Script Maker.dat")
$A21F6934008 = Fn00FC($A3AC8E2001E, "Show")
$A61F6B32733 = Fn00FE($A21F6934008, "MouseX")
$A06F6D32939 = Fn00FE($A21F6934008, "MouseY")
GUICtrlSetData(-Number("1"), "Edit1")
GUICtrlCreateGroup("", -Number("99"), -Number("99"), Number("1"), Number("1"))
$A5407532B03 = GUICtrlCreateGroup("Control Panel", Number("721"), Number("31"), Number("201"), Number("297"))
$A2507B35D54 = GUICtrlCreateLabel("World Map", Number("737"), Number("55"), Number("56"), Number("17"))
$A1417132C31 = GUICtrlCreateRadio("Jangan", Number("745"), Number("71"), Number("113"), Number("25"))
$A061773111C = GUICtrlCreateRadio("Donwhang", Number("745"), Number("95"), Number("113"), Number("25"))
$A5117D3342C = GUICtrlCreateRadio("Hotan", Number("745"), Number("119"), Number("113"), Number("25"))
GUICtrlSetState(-Number("1"), $glConstVar0812)
$A3A2743044A = GUICtrlCreateRadio("Samarkand", Number("745"), Number("143"), Number("113"), Number("25"))
$A4827A32205 = GUICtrlCreateRadio("Constantinople", Number("745"), Number("167"), Number("121"), Number("25"))
$A3B37035927 = GUICtrlCreateLabel("Coordinates", Number("737"), Number("199"), Number("160"), Number("17"))
$A1937630D15 = GUICtrlCreateInput("0", Number("752"), Number("223"), Number("65"), Number("21"))
$A2437C35029 = GUICtrlCreateInput("0", Number("840"), Number("223"), Number("65"), Number("21"))
$A0F47233646 = GUICtrlCreateButton("Manual Add XY", Number("737"), Number("271"), Number("169"), Number("25"), Number("0"))
GUICtrlSetState(-Number("1"), $glConstVar081B)
$A0347A3502A = GUICtrlCreateCheckbox("Use [F8] Auto Add XY", Number("737"), Number("303"), Number("155"), Number("17"))
GUICtrlSetState(-Number("1"), $glConstVar0812)
$A4E57131B22 = GUICtrlCreateInput("0", Number("752"), Number("248"), Number("65"), Number("21"))
GUICtrlSetState(-Number("1"), $glConstVar081B)
$A2D57832C35 = GUICtrlCreateInput("0", Number("840"), Number("248"), Number("65"), Number("21"))
GUICtrlSetState(-Number("1"), $glConstVar081B)
$A5057F32950 = GUICtrlCreateLabel("X", Number("736"), Number("228"), Number("11"), Number("17"))
$A0B6753604B = GUICtrlCreateLabel("Y", Number("824"), Number("228"), Number("11"), Number("17"))
$A4867B32002 = GUICtrlCreateLabel("X", Number("736"), Number("252"), Number("11"), Number("17"))
$A3577132957 = GUICtrlCreateLabel("Y", Number("824"), Number("252"), Number("11"), Number("17"))
GUICtrlCreateGroup("", -Number("99"), -Number("99"), Number("1"), Number("1"))
$A0977B35C02 = GUICtrlCreateGroup("Walk Script Codes", Number("723"), Number("336"), Number("201"), Number("305"))
$A5F87131726 = GUICtrlCreateEdit("", Number("731"), Number("360"), Number("185"), Number("209"), BitOR($glConstVar04C8, $glConstVar000A))
$A3687632719 = GUICtrlCreateButton("Add To Town", Number("827"), Number("576"), Number("89"), Number("25"), Number("0"))
$A3387D34415 = GUICtrlCreateLabel("Radius", Number("736"), Number("576"), Number("37"), Number("17"))
$A2A9733533A = GUICtrlCreateInput("200", Number("776"), Number("576"), Number("41"), Number("21"))
$A4097930509 = GUICtrlCreateButton("Save", Number("827"), Number("608"), Number("89"), Number("25"), Number("0"))
GUICtrlSetState(-Number("1"), $glConstVar081B)
$A45A7131804 = GUICtrlCreateButton("Clear", Number("731"), Number("608"), Number("89"), Number("25"), Number("0"))
GUICtrlCreateGroup("", -Number("99"), -Number("99"), Number("1"), Number("1"))
GUICtrlCreateTabItem("")
GUISetState(Execute("@SW_SHOW"))
Global $A24A7D35146, $A23A7E31805, $A35A7F31623, $A40B7034A61, $A53B7136004, $A08B723111C, $A2BB7331A2D, $A2DB7435F5D, $A1CB7534E51, $A0AB763425A, $A0FB7735B43, $A27B7835F33, $A08B793122F, $A58B7A3190E, $A20B7B32752, $A61B7C3054F, $A43B7D30E1C, $A0FB7E35012, $A3BB7F34B23, $A39C7033A0A, $A5AC7133739, $A23C723593C
Global $A4DC733135A = """cmd"",""[protect off]"",""""", $A2DC7530652 = """cmd"",""[stop bot]"",""""", $A4FC7733506 = """cmd"",""[stop walking]"",""""", $A08C7933D4E = """cmd"",""[start autopotion]"",""""", $A44C7B32D57 = """cmd"",""[start autoparty]"","""""
Global $A5AC7D32407 = """//"",""##############################"",""""", $A0DC7F32810, $A1CD7031623
HotKeySet("{F8}", "Fn0252")
Do
$A3B09423E2F = GUIGetMsg()
$A5DD7233E34 = Round((Fn00FF($A61F6B32733) - Number("4290")) * Number("3.000"))
$A58D753073C = Round((Fn00FF($A06F6D32939) - Number("1217")) * - Number("2.993"))
GUICtrlSetData($A1937630D15, $A5DD7233E34)
GUICtrlSetData($A2437C35029, $A58D753073C)
If $A3B09423E2F = $A1417132C31 Then
Fn00F6($A3AC8E2001E, "Jangan")
ElseIf $A3B09423E2F = $A061773111C Then
Fn00F6($A3AC8E2001E, "Donwhang")
ElseIf $A3B09423E2F = $A5117D3342C Then
Fn00F6($A3AC8E2001E, "Hotan")
ElseIf $A3B09423E2F = $A3A2743044A Then
Fn00F6($A3AC8E2001E, "Samarkand")
ElseIf $A3B09423E2F = $A4827A32205 Then
Fn00F6($A3AC8E2001E, "Constantinople")
EndIf
If $A3B09423E2F = $A0347A3502A Then
$A14D7D30C1D = BitAND(GUICtrlRead($A0347A3502A), $glConstVar0812)
If $A14D7D30C1D = Number("1") Then
HotKeySet("{F8}", "Fn0252")
Else
HotKeySet("{F8}")
EndIf
EndIf
If $A3B09423E2F = $A45A7131804 Then
GUICtrlSetData($A5F87131726, "")
EndIf
If $A3B09423E2F = $A3687632719 Then
$A2BE7131224 = GUICtrlRead($A5F87131726)
If $A2BE7131224 <> "" Then
$A39E7232D0C = GUICtrlRead($A2A9733533A)
GUICtrlSetData($A43C6F34F57, $A2BE7131224, -Number("1"))
GUICtrlSetData($A43C6F34F57, $A4FC7733506 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """cmd"",""[add hunting]"",""" & $A0DC7F32810 & ";" & $A1CD7031623 & ";" & $A39E7232D0C & """" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """cmd"",""[Start Bot]"",""""" & Execute("@CRLF"), -Number("1"))
MsgBox(Number("0"), "[AgBot]Town Script Maker", "Walk Script Added to Town Script.")
Else
MsgBox(Number("0"), "[AgBot]Town Script Maker", "Cant add a Blank Walk Script.")
EndIf
EndIf
If $A3B09423E2F = $A57D6434F0A Then
$A19F7531B55 = GUICtrlRead($A3395D33F4C)
Fn0253()
GUICtrlSetData($A43C6F34F57, "")
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"))
GUICtrlSetData($A43C6F34F57, """//"",""Generated by: [Agbot]Town Script Maker"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Made Possible by: iBotForFun @ 2008"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Script Information"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Town Name: " & $A19F7531B55 & """,""""" & Execute("@CRLF"), -Number("1"))
If $A23A7E31805 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A23A7E31805 & " " & $A24A7D35146 & """,""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A40B7034A61 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A40B7034A61 & " " & $A35A7F31623 & """,""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A08B723111C <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A08B723111C & " " & $A53B7136004 & """,""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A2DB7435F5D <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A2DB7435F5D & " " & $A2BB7331A2D & """,""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A0AB763425A <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A0AB763425A & " " & $A1CB7534E51 & """,""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A27B7835F33 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A27B7835F33 & " " & $A0FB7735B43 & """,""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A0FB7E35012 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A0FB7E35012 & " " & $A43B7D30E1C & """,""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A08B793122F <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A08B793122F & " " & "Pet HGP"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A58B7A3190E <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A58B7A3190E & " " & "Bolts"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A20B7B32752 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A20B7B32752 & " " & "Arrows"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A61B7C3054F <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Buys " & $A61B7C3054F & " " & "Return Scroll"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A3BB7F34B23 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Storage Items"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A39C7033A0A <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Sell Items"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A5AC7133739 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Enable Auto Party"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
If $A23C723593C <> Number("0") Then
GUICtrlSetData($A43C6F34F57, """//"",""Enable Auto Potions"",""""" & Execute("@CRLF"), -Number("1"))
EndIf
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A4DC733135A & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A2DC7530652 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """cmd"",""[clear hunting]"",""""" & Execute("@CRLF"), -Number("1"))
If $A5AC7133739 <> Number("0") Then
GUICtrlSetData($A43C6F34F57, $A44C7B32D57 & Execute("@CRLF"), -Number("1"))
EndIf
If $A23C723593C <> Number("0") Then
GUICtrlSetData($A43C6F34F57, $A08C7933D4E & Execute("@CRLF"), -Number("1"))
EndIf
If $A19F7531B55 = "Jangan" Then
Fn0254()
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""End of Town Script"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""You can add your Walk Script below."",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Starting location: 6373,1008"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
ElseIf $A19F7531B55 = "Donwhang" Then
Fn0255()
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""End of Town Script"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""You can add your Walk Script below."",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Starting location: 3593,2085"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
ElseIf $A19F7531B55 = "Hotan" Then
Fn0256()
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""End of Town Script"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""You can add your Walk Script below."",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Starting location: 91,4"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
ElseIf $A19F7531B55 = "Samarkand" Then
Fn0257()
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""End of Town Script"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""You can add your Walk Script below."",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Starting location: -5229,2870"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
ElseIf $A19F7531B55 = "Constantinople" Then
Fn0258()
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""End of Town Script"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""You can add your Walk Script below."",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, """//"",""Starting location: -10757,2536"",""""" & Execute("@CRLF"), -Number("1"))
GUICtrlSetData($A43C6F34F57, $A5AC7D32407 & Execute("@CRLF"), -Number("1"))
EndIf
ElseIf $A3B09423E2F = $A47D6B3312F Then
$A54A8D30F58 = GUICtrlRead($A43C6F34F57)
If $A54A8D30F58 <> "" Then
$A1DA8E3415F = FileSaveDialog("Choose a name.", Execute("@WorkingDir"), "AgBot Script (*.lst)", Number("16"), $A19F7531B55 & ".lst")
If @error Then
MsgBox(Number("0"), "[AgBot]Town Script Maker", "Save cancelled.")
Else
FileOpen($A1DA8E3415F, Number("2"))
FileWrite($A1DA8E3415F, $A54A8D30F58)
MsgBox(Number("0"), "[AgBot]Town Script Maker", "Script Saved.")
FileClose($A1DA8E3415F)
EndIf
Else
MsgBox(Number("0"), "[AgBot]Town Script Maker", "Cannot save blank script.")
EndIf
EndIf
Until $A3B09423E2F = $glConstVar0803
Func Fn0252()
$A0DC7F32810 = GUICtrlRead($A1937630D15)
$A1CD7031623 = GUICtrlRead($A2437C35029)
$A20B8E3023B = """" & $A0DC7F32810 & """,""" & $A1CD7031623 & """" & ",""1"""
GUICtrlSetData($A5F87131726, $A20B8E3023B & Execute("@CRLF"), -Number("1"))
EndFunc
Func Fn0253()
$A24A7D35146 = GUICtrlRead($A43A5B3261F)
$A23A7E31805 = GUICtrlRead($A18B5932E63)
$A35A7F31623 = GUICtrlRead($A1CC5535F31)
$A40B7034A61 = GUICtrlRead($A3BD5334930)
$A53B7136004 = GUICtrlRead($A48D5F31509)
$A08B723111C = GUICtrlRead($A11E5D3281F)
$A2BB7331A2D = GUICtrlRead($A1FF593433F)
$A2DB7435F5D = GUICtrlRead($A460673081C)
$A1CB7534E51 = GUICtrlRead($A3D16334E40)
$A0AB763425A = GUICtrlRead($A0F26131818)
$A0FB7735B43 = GUICtrlRead($A4226D31614)
$A27B7835F33 = GUICtrlRead($A3436B30D22)
$A08B793122F = GUICtrlRead($A3946730547)
$A58B7A3190E = GUICtrlRead($A6056335D03)
$A20B7B32752 = GUICtrlRead($A1C56F33044)
$A61B7C3054F = GUICtrlRead($A3D76130B2B)
$A43B7D30E1C = GUICtrlRead($A11B673041D)
$A0FB7E35012 = GUICtrlRead($A2C7673515E)
$A3BB7F34B23 = BitAND(GUICtrlRead($A2586935922), $glConstVar0812)
$A39C7033A0A = BitAND(GUICtrlRead($A2896031B17), $glConstVar0812)
$A5AC7133739 = BitAND(GUICtrlRead($A47A6933D33), $glConstVar0812)
$A23C723593C = BitAND(GUICtrlRead($A09B6031E5F), $glConstVar0812)
EndFunc
Includes Removed to prevent leaching.
Confirmed, No trace for hidden connection with another pc or anything similar to that.
The tool is clean. Safety Confirmed.
Authorization to Decompile and post Confirmation given to me by Frankko Due to Shorten of time .
Regards,
Frankko & hussert
|
|
|
06/14/2008, 13:32
|
#42
|
elite*gold: 0
Join Date: Jun 2008
Posts: 76
Received Thanks: 281
|
First Page Updated... with small changes.
------------------------------
Updates:
- Added a Circle Marker when Injecting Teleport
- Hotkey change to [F9] when using Auto Add XY
-----------------------------
|
|
|
06/14/2008, 23:13
|
#43
|
elite*gold: 0
Join Date: Jun 2008
Posts: 122
Received Thanks: 31
|
Nice Tool.
But how about a X-Y- Viewer for the next Update ?
Question:
Whats a X-Y- Viewer ?
Answer:
Simple, it shows you the X & Y Coord. of the Map on wich point your Mouse is marked on.
Just like the PanSroMap.
And how about a Remove-Last-Red-Dot function ?
Would be pretty handy.
Thnx.
|
|
|
06/14/2008, 23:54
|
#44
|
elite*gold: 0
Join Date: Feb 2008
Posts: 36
Received Thanks: 23
|
Ooh... Nice tool, right now my Wikipage for the loop feels kinda... Worthless
*CRIES*
So, iBot. Wanna put this on the wiki ? ^^
|
|
|
06/14/2008, 23:55
|
#45
|
elite*gold: 20
Join Date: Apr 2008
Posts: 1,148
Received Thanks: 861
|
lol
|
|
|
All times are GMT +1. The time now is 16:02.
|
|