Global Const $03E803E803E9 = 54
Global Const $03E803E803EA = X0C8E04E104C7("AC6664686466666666")
Global Const $03E803E803EB = X0C8E04E104C7("8999A89FA6AA5685989CABA99997AA9FA5A4567CA5A85677ABAAA57FAA565E89857C775F")
Global Const $03E803E803EC = X0C8E04E104C7("7C9FA29B")
Global Const $03E803E803ED = X0C8E04E104C7("85A69BA4646464")
Global Const $03E803E803EE = X0C8E04E104C7("86A8A5999BA9A9")
Global Const $03E803E803EF = X0C8E04E104C7("7BAE9FAA")
Global Const $03E803E803F0 = X0C8E04E104C7("75")
Global Const $03E803E803F1 = X0C8E04E104C7("7798A5ABAA")
Global Const $03E803E803F2 = X0C8E04E104C7("7FA4A6ABAA567C9FA29B70")
Global Const $03E803E803EA0 = X0C8E04E104C7("646464")
Global Const $03E803E803EA1 = X0C8E04E104C7("86A8A5999BA9A95679A59A9B")
Global Const $03E803E803EA2 = X0C8E04E104C7("7798A5ABAA5689857C77")
Global Const $03E803E803EA3 = X0C8E04E104C7("8999A89FA6AA5685989CABA99997AAA5A8567CA5A85677ABAAA57F8A")
Global Const $03E803E803EA4 = X0C8E04E104C7("8C9BA8A99FA5A47056")
Global Const $03E803E803EA5 = X0C8E04E104C7("85989CABA99997AA9BA956AFA5ABA8566497AB69569C9FA29BA956AAA556A397A19B569FAA569E97A89A9BA856AAA556A89B979A")
Global Const $03E803E803EA6 = X0C8E04E104C7("AFA5ABA85699A59A9B64568A9E9FA9569AA59BA956A4A5AA569DAB97A897A4AA9B9B56A6A8A5AA9B99AA9FA5A456979D979FA4A9AA")
Global Const $03E803E803EA7 = X0C8E04E104C7("A89BAC9BA8A99B569BA49D9FA49B9BA89FA49D625699A89799A19FA49D62569E9799A19FA49D62569BAA9964")
Global Const $03E803E803EA8 = X0C8E04E104C7("77ABAA9EA5A87056809B9C9C567A97AC9FA9")
Global Const $03E803E803EA9 = X0C8E04E104C7("7B6383979FA27056AEAD9FA4AA9BA8AE76A8A5979AA8ABA4A49BA86499A5A3")
Global Const $03E803E803EB0 = X0C8E04E104C7("79A5A6AFA89F9D9EAA565E995F566866666D6456809B9C9C567A97AC9FA9645677A2A256889F9D9EAAA956889BA99BA8AC9B9A64")
Global Const $03E803E803EB1 = X0C8E04E104C7("85A69BA4567C9FA29B")
Global Const $03E803E803EB2 = X0C8E04E104C7("77ABAAA57FAA5E606497AB695F")
Global Const $03E803E803EB3 = X0C8E04E104C7("92")
Global Const $03E803E803EB4 = X0C8E04E104C7("95AC97A8A96497AB69")
Global Const $03E803E803EB5 = X0C8E04E104C7("95AA9BA3A66497AB69")
Global Const $03E803E803EB6 = X0C8E04E104C7("95AC97A8A995A49BAD6497AB69")
Global Const $03E803E803EB7 = X0C8E04E104C7("959CABA499A96497AB69")
Global Const $03E803E803EB8 = X0C8E04E104C7("959CABA499A995A49BAD6497AB69")
Global Const $03E803E803EB9 = X0C8E04E104C7("95AA9BAEAA6497AB69")
Global Const $03E803E803EC0 = X0C8E04E104C7("95AA9BAEAA95AC97A86497AB69")
Global Const $03E803E803EC1 = X0C8E04E104C7("95AA9BAEAA959CABA4996497AB69")
Global Const $03E803E803EC2 = X0C8E04E104C7("959BA499A59A9B9A6497AB69")
Global Const $03E803E803EC3 = X0C8E04E104C7("7BA8A8A5A8")
Global Const $03E803E803EC4 = X0C8E04E104C7("84A5569C9FA29B56A99BA29B99AA9B9A")
Global Const $03E803E803EC5 = X0C8E04E104C7("7AA5A49B")
Global Const $03E803E803EC6 = X0C8E04E104C7("85989CABA99997AA9FA5A456AAA5A5A17056")
Global Const $03E803E803EC7 = X0C8E04E104C7("A35656")
Global Const $03E803E803EC8 = X0C8E04E104C7("89AA9BA6566756669C56")
Global Const $03E803E803EC9 = X0C8E04E104C7("7DA2A59897A25679A5A4A9AA565AAAAEAA9BA499A59A9B9897A99B5673566B6A")
Global Const $03E803E803ED0 = X0C8E04E104C7("56")
Global Const $03E803E803ED1 = X0C8E04E104C7("5B")
Global Const $03E803E803ED2 = X0C8E04E104C7("7CABA499569A9B99A59A9B95AA9BAEAA5E5AA995A9AAA89FA49D5F")
Global Const $03E803E803ED3 = X0C8E04E104C7("82A59997A2565AA995A89BAAABA8A4567356")
Global Const $03E803E803ED4 = X0C8E04E104C7("82A59997A2565AA995A29BA4")
Global Const $03E803E803ED5 = X0C8E04E104C7("82A59997A2565A9F")
Global Const $03E803E803ED6 = X0C8E04E104C7("5AA995A29BA456735689AAA89FA49D829BA45E5AA995A9AAA89FA49D5F")
Global Const $03E803E803ED7 = X0C8E04E104C7("7CA5A8565A9F5673566756AAA5565AA995A29BA45689AA9BA65668")
Global Const $03E803E803ED8 = X0C8E04E104C7("5AA995A89BAAABA8A45673565AA995A89BAAABA8A4565C56799EA85E7A9B995E89AAA89FA49D839F9A5E5AA995A9AAA89FA49D62565A9F6256685F5F635AAAAEAA9BA499A59A9B9897A99B5F")
Global Const $03E803E803ED9 = X0C8E04E104C7("849BAEAA")
Global Const $03E803E803EE0 = X0C8E04E104C7("889BAAABA8A4565AA995A89BAAABA8A4")
Global Const $03E803E803EE1 = X0C8E04E104C7("7BA49A7CABA499")
Global Const $03E803E803EE2 = X0C8E04E104C7("89AA9BA6566856669C56")
Global Const $03E803E803EE3 = X0C8E04E104C7("89AA9BA6566956669C56")
Global Const $03E803E803EE4 = X0C8E04E104C7("5D5F568A9E9BA4567C9FA29B8DA89FAA9B829FA49B5E5A7C9FA29B8A9BAEAA62565A8A9BA3A69577A8A897AF915A9F935F")
Global Const $03E803E803EE5 = X0C8E04E104C7("89AA9BA6566A56669C56")
Global Const $03E803E803EE6 = X0C8E04E104C7("89AA9BA6566B56669C56")
Global Const $03E803E803EE7 = X0C8E04E104C7("5A8AAE8AAC97A8A995")
Global Const $03E803E803EE8 = X0C8E04E104C7("7DA2A59897A25679A5A4A9AA")
Global Const $03E803E803EE9 = X0C8E04E104C7("89AA9BA6566C56669C56")
Global Const $03E803E803EF0 = X0C8E04E104C7("5673569A9B99A59A9B95AA9BAEAA5E")
Global Const $03E803E803EF1 = X0C8E04E104C7("5D565C569BA499A59A9B95AA9BAEAA5E5A8A9BA3A69577A8A897AF915A9F935F565C565D")
Global Const $03E803E803EF2 = X0C8E04E104C7("89AA9BA6566D56669C56")
Global Const $03E803E803EF3 = X0C8E04E104C7("89AA9BA6566E56669C56")
Global Const $03E803E803EF4 = X0C8E04E104C7("89AA9BA6566F56669C56")
Global Const $03E803E803EF5 = X0C8E04E104C7("89AA9BA656676656669C56")
Global Const $03E803E803EF6 = X0C8E04E104C7("5A")
Global Const $03E803E803EF7 = X0C8E04E104C7("566273636165605E5F5C94")
Global Const $03E803E803EF8 = X0C8E04E104C7("91")
Global Const $03E803E803EF9 = X0C8E04E104C7("89AA9BA656676756669C56")
Global Const $03E803E803F00 = X0C8E04E104C7("89AA9BA656676856669C56")
Global Const $03E803E803F01 = X0C8E04E104C7("5A79A39A829FA49B")
Global Const $03E803E803F02 = X0C8E04E104C7("89AA9BA656676956669C56")
Global Const $03E803E803F03 = X0C8E04E104C7("89AA9BA656676A56669C56")
Global Const $03E803E803F04 = X0C8E04E104C7("7CABA49956")
Global Const $03E803E803F05 = X0C8E04E104C7("7CABA499")
Global Const $03E803E803F06 = X0C8E04E104C7("5E")
Global Const $03E803E803F07 = X0C8E04E104C7("89AA9BA656676B56669C56")
Global Const $03E803E803F08 = X0C8E04E104C7("89AA9BA656676C56669C56")
Global Const $03E803E803F09 = X0C8E04E104C7("8E")
Global Const $03E803E803F10 = X0C8E04E104C7("89AA9BA656676D56669C56")
Global $03E803E8043A, $03E803E8043B, $03E803E8043C, $03E803E8043D, $03E803E8043E, $03E803E8043F, $03E803E80440
Global $03E803E80441, $03E803E80442, $03E803E80443
Global $03E803E80444
Dim $03E803E80444
Global $03E803E80445 = 1
Global $03E803E80446 = 120
Global $03E803E80447 = 60
Global $03E803E80448 = $03E803E803EA
Global $03E803E80449
Global $03E803E8044A
Global Const $03E803E8044B = -3
Global Const $03E803E8044C = 17
GuiCreate($03E803E803EB, 360, 120,-1, -1)
$03E803E8044D = GUICtrlCreateMenu($03E803E803EC)
$03E803E8044E = GUICtrlCreateMenuitem($03E803E803ED, $03E803E8044D)
$03E803E8044F = GUICtrlCreateMenuitem($03E803E803EE, $03E803E8044D)
$03E803E80450 = GUICtrlCreateMenuitem("", $03E803E8044D)
$03E803E80451 = GUICtrlCreateMenuitem($03E803E803EF, $03E803E8044D)
$03E803E80452 = GUICtrlCreateMenu($03E803E803F0)
$03E803E80453 = GUICtrlCreateMenuitem($03E803E803F1, $03E803E80452)
GuiCtrlCreateLabel($03E803E803F2, 10, 10, 50, 20)
$03E803E80454 = GuiCtrlCreateInput("", 10, 30, 300, 20)
$03E803E80455 = GuiCtrlCreateButton($03E803E803EA0, 320, 30, 30, 20)
$03E803E80456 = GuiCtrlCreateButton($03E803E803EA1, 10, 60, 100, 20)
$03E803E80457 = GuiCtrlCreateButton($03E803E803EF, 250, 60, 100, 20)
GuiSetState()
While 1
$03E803E80458 = GuiGetMsg()
Select
Case $03E803E80458 = $03E803E8044B
X0C8E04E104C6()
Case $03E803E80458 = $03E803E80455
X0C8E04E104AF()
Case $03E803E80458 = $03E803E80456
X0C8E04E104B1()
Case $03E803E80458 = $03E803E80457
X0C8E04E104C6()
Case $03E803E80458 = $03E803E8044E
X0C8E04E104AF()
Case $03E803E80458 = $03E803E8044F
X0C8E04E104B1()
Case $03E803E80458 = $03E803E80451
X0C8E04E104C6()
Case $03E803E80458 = $03E803E80453
X0C8E04E104AE()
Case Else
EndSelect
WEnd
Func X0C8E04E104AE()
MsgBox(4096, $03E803E803EA2, @CRLF _
& $03E803E803EA3 & @CRLF _
& $03E803E803EA4 & $03E803E80448 & @CRLF _
& @CRLF _
& $03E803E803EA5 & @CRLF _
& $03E803E803EA6 & @CRLF _
& $03E803E803EA7 & @CRLF _
& @CRLF _
& $03E803E803EA8 & @CRLF _
& $03E803E803EA9 & @CRLF _
& @CRLF _
& $03E803E803EB0 & @CRLF _
& @CRLF)
EndFunc
Func X0C8E04E104AF()
Local $03E803E80459
Local $03E803E8045A
$03E803E8043A = FileOpenDialog($03E803E803EB1, @ScriptDir, $03E803E803EB2, 0)
If @error Then
Return
Else
$03E803E8043B = StringTrimRight($03E803E8043A, 4)
$03E803E80459 = StringSplit($03E803E8043B, $03E803E803EB3)
$03E803E8045A = $03E803E80459[$03E803E80459[0]]
$03E803E8045A = @TempDir & $03E803E8045A
$03E803E8043D = $03E803E8045A & $03E803E803EB4
$03E803E8043C = $03E803E8045A & $03E803E803EB5
$03E803E8043E = $03E803E8045A & $03E803E803EB6
$03E803E8043F = $03E803E8045A & $03E803E803EB7
$03E803E80440 = $03E803E8045A & $03E803E803EB8
$03E803E80441 = $03E803E8045A & $03E803E803EB9
$03E803E80442 = $03E803E8045A & $03E803E803EC0
$03E803E80443 = $03E803E8045A & $03E803E803EC1
$03E803E8043B = $03E803E8043B & $03E803E803EC2
GUICtrlSetData($03E803E80454, $03E803E8043A)
EndIf
EndFunc
Func X0C8E04E104B0()
If FileExists($03E803E8043B) then FileDelete($03E803E8043B)
FileCopy($03E803E8043C, $03E803E8043B)
FileDelete($03E803E8043C)
FileDelete($03E803E8043D)
FileDelete($03E803E8043E)
FileDelete($03E803E8043F)
FileDelete($03E803E80440)
FileDelete($03E803E80441)
FileDelete($03E803E80442)
FileDelete($03E803E80443)
EndFunc
Func X0C8E04E104B1()
Local $03E803E8045E
Local $03E803E8045F
Local $03E803E80460
Local $03E803E804602
If GUICtrlRead($03E803E80454) = "" Then
MsgBox(4096, $03E803E803EC3, $03E803E803EC4)
Else
FileCopy($03E803E8043A, $03E803E8043C, 1)
$03E803E8044A = TimerInit()
X0C8E04E104B2()
X0C8E04E104B3()
X0C8E04E104B4()
X0C8E04E104B5()
X0C8E04E104B6()
X0C8E04E104B7()
X0C8E04E104B8()
X0C8E04E104B9()
X0C8E04E104BA()
X0C8E04E104BB()
X0C8E04E104BC()
X0C8E04E104BD()
X0C8E04E104BE()
X0C8E04E104BF()
X0C8E04E104C0()
X0C8E04E104C1()
X0C8E04E104C2()
X0C8E04E104B0()
$03E803E8045F = Round(TimerDiff($03E803E8044A)/60000, 2)
MsgBox(4096, $03E803E803EC5, $03E803E803EC6 & $03E803E8045F & $03E803E803EC7)
EndIf
EndFunc
Func X0C8E04E104B2()
Dim $03E803E80449
ProgressOn($03E803E803EC8 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043C, $03E803E80449)
FileDelete($03E803E8043C)
FileWriteLine($03E803E8043C, $03E803E803EC9)
FileWriteLine($03E803E8043C, $03E803E803ED0)
For $03E803E80462 = 1 to $03E803E80449[0]
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
ProgressSet($03E803E80462 / $03E803E80449[0] * 100, Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
FileWriteLine($03E803E8043C, $03E803E803ED0)
FileWriteLine($03E803E8043C, $03E803E803ED2)
FileWriteLine($03E803E8043C, $03E803E803ED3 & chr(34) & Chr(34))
FileWriteLine($03E803E8043C, $03E803E803ED4)
FileWriteLine($03E803E8043C, $03E803E803ED5)
FileWriteLine($03E803E8043C, $03E803E803ED6)
FileWriteLine($03E803E8043C, $03E803E803ED7)
FileWriteLine($03E803E8043C, $03E803E803ED8)
FileWriteLine($03E803E8043C, $03E803E803ED9)
FileWriteLine($03E803E8043C, $03E803E803EE0)
FileWriteLine($03E803E8043C, $03E803E803EE1)
Sleep(1500)
EndFunc
Func X0C8E04E104B3()
Dim $03E803E80449
Dim $03E803E804492
ProgressOn($03E803E803EE2 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043C,$03E803E80449)
FileDelete($03E803E8043C)
For $03E803E80462 = 1 to $03E803E80449[0]
If StringInStr($03E803E80449[$03E803E80462], Chr(59)) Then
$03E803E804442 = StringSplit($03E803E80449[$03E803E80462], Chr(59))
FileWriteLine($03E803E8043C, StringTrimRight(StringReplace($03E803E80449[$03E803E80462], $03E803E804442[2], ""),1))
Else
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
EndIf
ProgressSet($03E803E80462 / $03E803E80449[0] * 25, Round($03E803E80462 / $03E803E80449[0] * 25) & $03E803E803ED1)
Next
Dim $03E803E80449
X0C8E04E104C5($03E803E8043C,$03E803E80449)
FileDelete($03E803E8043C)
For $03E803E80462 = 1 to $03E803E80449[0]
FileWriteLine($03E803E8043C,StringStripWS($03E803E80449[$03E803E80462], 3))
ProgressSet(($03E803E80462 / $03E803E80449[0] * 25) + 25, Round(($03E803E80462 / $03E803E80449[0] * 25) + 25) & $03E803E803ED1)
Next
Dim $03E803E80449
X0C8E04E104C5($03E803E8043C,$03E803E80449)
If FileExists($03E803E8043C) Then FileDelete($03E803E8043C)
For $03E803E80462 = 1 to $03E803E80449[0]
If $03E803E80449[$03E803E80462] = "" Then
Else
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 25) + 50, Round(($03E803E80462 / $03E803E80449[0] * 25) + 50) & $03E803E803ED1)
Next
Dim $03E803E80449
X0C8E04E104C5($03E803E8043C,$03E803E80449)
FileDelete($03E803E8043C)
For $03E803E80462 = 1 to $03E803E80449[0]
If StringInStr($03E803E80449[$03E803E80462], Chr(59)) Then
Else
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 25) + 75, Round(($03E803E80462 / $03E803E80449[0] * 25) + 75) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104B4()
Local $03E803E80449, $03E803E80465
ProgressOn($03E803E803EE3 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043C, $03E803E80449)
For $03E803E80462 = 1 to $03E803E80449[0]
If StringInStr($03E803E80449[$03E803E80462], '"') Then FileWriteLine($03E803E80441, $03E803E80449[$03E803E80462])
ProgressSet($03E803E80462 / $03E803E80449[0] * 50, Round($03E803E80462 / $03E803E80449[0] * 50) & $03E803E803ED1)
Next
Dim $03E803E80449
X0C8E04E104C5($03E803E80441, $03E803E80449)
FileDelete($03E803E80441)
For $03E803E80462 = 1 to $03E803E80449[0]
$03E803E80465 = StringSplit($03E803E80449[$03E803E80462], chr(34))
For $03E803E80462i = 2 to $03E803E80465[0] step 2
If X0C8E04E104C4($03E803E80449, $03E803E80465[$03E803E80462i]) = -1 Then
FileWriteLine($03E803E80441, $03E803E80465[$03E803E80462i])
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 50) + 50, Round(($03E803E80462 / $03E803E80449[0] * 50) + 50) & $03E803E803ED1)
Next
Next
EndFunc
Func X0C8E04E104B5()
Dim $03E803E80467
Dim $03E803E80449
ProgressOn($03E803E803EE5 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E80441, $03E803E80449)
FileDelete($03E803E80441)
FileWriteLine($03E803E80441, $03E803E80449[1])
For $03E803E80462 = 2 to $03E803E80449[0]
X0C8E04E104C5($03E803E80441, $03E803E80467)
If X0C8E04E104C4($03E803E80467, $03E803E80449[$03E803E80462]) = -1 Then
FileWriteLine($03E803E80441, $03E803E80449[$03E803E80462])
EndIf
Dim $03E803E80467
ProgressSet($03E803E80462 / $03E803E80449[0] * 100, Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104B6()
Dim $03E803E80449
ProgressOn($03E803E803EE6 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E80441, $03E803E80449)
For $03E803E80462 = 1 to $03E803E80449[0]
If $03E803E80449[$03E803E80462] <> "" Then FileWriteLine($03E803E80442, $03E803E803EE7 & $03E803E80462)
ProgressSet($03E803E80462 / $03E803E80449[0] * 100, Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104B7()
Dim $03E803E80449
Dim $03E803E80468
Local $03E803E80469 = $03E803E803EE8
ProgressOn($03E803E803EE9 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E80441, $03E803E80449)
X0C8E04E104C5($03E803E80442, $03E803E80468)
For $03E803E80462 = 1 to $03E803E80449[0]
If $03E803E80449[$03E803E80462] <> "" Then
$03E803E80469 = $03E803E80469 & $03E803E803ED0 & $03E803E80468[$03E803E80462] & $03E803E803EF0
FileWriteLine($03E803E80443, $03E803E80469 & '$03E803E803EF1)')
$03E803E80469 = $03E803E803EE8
EndIf
ProgressSet($03E803E80462 / $03E803E80449[0] * 100, Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104B8()
Dim $03E803E80449
Dim $03E803E80468
ProgressOn($03E803E803EF2 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043C, $03E803E80449)
FileDelete($03E803E8043C)
X0C8E04E104C5($03E803E80443, $03E803E80468)
FileWriteLine($03E803E8043C, $03E803E80449[1])
For $03E803E80462 = 1 to $03E803E80468[0]
FileWriteLine($03E803E8043C, $03E803E80468[$03E803E80462])
ProgressSet(($03E803E80462 / $03E803E80449[0] * 50), Round(($03E803E80462 / $03E803E80449[0] * 50)) & $03E803E803ED1)
Next
For $03E803E80462 = 2 to $03E803E80449[0]
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
ProgressSet(($03E803E80462 / $03E803E80449[0] * 50) + 50, Round(($03E803E80462 / $03E803E80449[0] * 50) + 50) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104B9()
Dim $03E803E80449
ProgressOn($03E803E803EF3 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E80441, $03E803E80449)
FileDelete($03E803E80441)
For $03E803E80462 = 1 to $03E803E80449[0]
If $03E803E80449[$03E803E80462] <> "" Then
FileWriteLine($03E803E80441, chr(34) & $03E803E80449[$03E803E80462] & Chr(34))
ProgressSet($03E803E80462 / $03E803E80449[0] * 100, Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
EndIf
Next
EndFunc
Func X0C8E04E104BA()
Local $03E803E80449
Local $03E803E8046B
Local $03E803E8046C
ProgressOn($03E803E803EF4 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E80441, $03E803E8046B)
X0C8E04E104C5($03E803E80442, $03E803E8046C)
X0C8E04E104C5($03E803E8043C, $03E803E80449)
FileDelete($03E803E8043C)
For $03E803E80462 = 1 to $03E803E80449[0]
For $03E803E80462i = 1 to $03E803E8046B[0]
If StringInStr($03E803E80449[$03E803E80462], $03E803E8046B[$03E803E80462i]) <> 0 Then
$03E803E80449[$03E803E80462] = StringReplace($03E803E80449[$03E803E80462], $03E803E8046B[$03E803E80462i], $03E803E8046C[$03E803E80462i])
ProgressSet($03E803E80462 / $03E803E80449[0] * 50, Round($03E803E80462 / $03E803E80449[0] * 50) & $03E803E803ED1)
EndIf
Next
Next
For $03E803E80462 = 1 to $03E803E80449[0]
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
ProgressSet(($03E803E80462 / $03E803E80449[0] * 50) + 50, Round($03E803E80462 / $03E803E80449[0] * 50) + 50 & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104BB()
Dim $03E803E80449
Dim $03E803E80465
ProgressOn($03E803E803EF5 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
FileCopy($03E803E8043C, $03E803E8043D)
X0C8E04E104C5($03E803E8043D,$03E803E80449)
If FileExists($03E803E8043D) Then FileDelete($03E803E8043D)
For $03E803E80462 = 1 to $03E803E80449[0]
If StringInStr($03E803E80449[$03E803E80462], $03E803E803EF6) Then FileWriteLine($03E803E8043D, $03E803E80449[$03E803E80462])
ProgressSet(($03E803E80462 / $03E803E80449[0] * 33), Round($03E803E80462 / $03E803E80449[0] * 33) & $03E803E803ED1)
Next
Dim $03E803E80449
X0C8E04E104C5($03E803E8043D,$03E803E80449)
If FileExists($03E803E8043D) Then FileDelete($03E803E8043D)
For $03E803E80462 = 1 to $03E803E80449[0]
$03E803E80465 = StringSplit($03E803E80449[$03E803E80462], $03E803E803EF7)
For $03E803E80462i = 1 to $03E803E80465[0]
If StringInStr($03E803E80465[$03E803E80462i],$03E803E803EF6) Then FileWriteLine($03E803E8043D,$03E803E80465[$03E803E80462i])
ProgressSet(($03E803E80462 / $03E803E80449[0] * 33) + 33, Round($03E803E80462 / $03E803E80449[0] * 33) + 33 & $03E803E803ED1)
Next
Next
Dim $03E803E80449
Dim $03E803E80465
X0C8E04E104C5($03E803E8043D,$03E803E80449)
If FileExists($03E803E8043D) Then FileDelete($03E803E8043D)
For $03E803E80462 = 1 to $03E803E80449[0]
If StringInStr($03E803E80449[$03E803E80462],$03E803E803EF8) Then
$03E803E80465 = StringSplit($03E803E80449[$03E803E80462], $03E803E803EF8)
FileWriteLine($03E803E8043D,$03E803E80465[1])
Else
FileWriteLine($03E803E8043D,$03E803E80449[$03E803E80462])
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 66) + 34, Round($03E803E80462 / $03E803E80449[0] * 66) + 34 & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104BC()
Dim $03E803E8046D
Dim $03E803E80449
Local $03E803E8046E
ProgressOn($03E803E803EF9 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043D, $03E803E80449)
If FileExists($03E803E8043D) Then FileDelete($03E803E8043D)
FileWriteLine($03E803E8043D, $03E803E80449[1])
For $03E803E80462 = 2 to $03E803E80449[0]
X0C8E04E104C5($03E803E8043D, $03E803E8046D)
If X0C8E04E104C4($03E803E8046D, $03E803E80449[$03E803E80462]) = -1 Then
FileWriteLine($03E803E8043D, $03E803E80449[$03E803E80462])
EndIf
Dim $03E803E8046D
ProgressSet(($03E803E80462 / $03E803E80449[0] * 100), Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104BD()
Local $03E803E8046F
Local $03E803E80470
Local $03E803E80471
Local $03E803E804711 = 1000
Local $03E803E804712 = 1000
Local $03E803E804713 = 1000
ProgressOn($03E803E803F00 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
If FileExists($03E803E8043E) then FileDelete($03E803E8043E)
X0C8E04E104C5($03E803E8043D,$03E803E8046F)
For $03E803E80462 = 1 to $03E803E8046F[0]
If ($03E803E804713 + $03E803E80462) = 10000 Then
$03E803E804713 = 1000
$03E803E804712 += 1
If $03E803E804712 = 10000 Then
$03E803E804711 += 1
$03E803E804712 = 1000
EndIf
EndIf
$03E803E80471 = Chr(36) & Hex($03E803E804711,4) & Hex($03E803E804712,4) & Hex($03E803E804713 + $03E803E80462,4)
If $03E803E8046F[$03E803E80462] = $03E803E803F01 Then
FileWriteLine($03E803E8043E, $03E803E803F01)
Else
FileWriteLine($03E803E8043E, $03E803E80471)
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 100), Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104BE()
Local $03E803E80449
Local $03E803E80475
Local $03E803E80476
ProgressOn($03E803E803F02 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043D, $03E803E80475)
X0C8E04E104C5($03E803E8043E, $03E803E80476)
X0C8E04E104C5($03E803E8043C, $03E803E80449)
If FileExists($03E803E8043C) then FileDelete($03E803E8043C)
For $03E803E80462 = 1 to $03E803E80449[0]
For $03E803E80462i = 1 to $03E803E80475[0]
If StringInStr($03E803E80449[$03E803E80462], $03E803E80475[$03E803E80462i]) <> 0 Then
$03E803E80449[$03E803E80462] = StringReplace($03E803E80449[$03E803E80462], $03E803E80475[$03E803E80462i], $03E803E80476[$03E803E80462i], 0, 1)
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 100), Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
Next
EndFunc
Func X0C8E04E104BF()
Dim $03E803E80449
Dim $03E803E80465
ProgressOn($03E803E803F03 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043C,$03E803E80449)
For $03E803E80462 = 1 to $03E803E80449[0]
If StringInStr($03E803E80449[$03E803E80462], $03E803E803F04, 1) Then
FileWriteLine($03E803E8043F, $03E803E80449[$03E803E80462])
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 33), Round($03E803E80462 / $03E803E80449[0] * 33) & $03E803E803ED1)
Next
Dim $03E803E80449
X0C8E04E104C5($03E803E8043F,$03E803E80449)
FileDelete($03E803E8043F)
For $03E803E80462 = 1 to $03E803E80449[0]
If $03E803E80449[$03E803E80462] <> "" Then
$03E803E80465 = StringSplit($03E803E80449[$03E803E80462], $03E803E803ED0)
If $03E803E80465[1] = $03E803E803F05 or $03E803E80465[1] = $03E803E803F05 Then
FileWriteLine($03E803E8043F,$03E803E80465[2])
EndIf
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 33) + 33, Round($03E803E80462 / $03E803E80449[0] * 33) + 33 & $03E803E803ED1)
Next
Dim $03E803E80449
X0C8E04E104C5($03E803E8043F,$03E803E80449)
FileDelete($03E803E8043F)
For $03E803E80462 = 1 to $03E803E80449[0]
If StringInStr($03E803E80449[$03E803E80462],$03E803E803F06) Then
$03E803E80465 = StringSplit($03E803E80449[$03E803E80462], $03E803E803F06)
FileWriteLine($03E803E8043F,$03E803E80465[1])
Else
FileWriteLine($03E803E8043F,$03E803E80449[$03E803E80462])
EndIf
ProgressSet(($03E803E80462 / $03E803E80449[0] * 66) + 34, Round($03E803E80462 / $03E803E80449[0] * 66) + 34 & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104C0()
Dim $03E803E80468
Dim $03E803E80449
ProgressOn($03E803E803F07 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043F, $03E803E80449)
FileDelete($03E803E8043F)
FileWriteLine($03E803E8043F, $03E803E80449[1])
For $03E803E80462 = 2 to $03E803E80449[0]
X0C8E04E104C5($03E803E8043F, $03E803E80468)
If X0C8E04E104C4($03E803E80468, $03E803E80449[$03E803E80462]) = -1 Then
FileWriteLine($03E803E8043F, $03E803E80449[$03E803E80462])
EndIf
Dim $03E803E80468
ProgressSet(($03E803E80462 / $03E803E80449[0] * 100), Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104C1()
Local $03E803E80477
Local $03E803E80470
Local $03E803E80478
Local $03E803E804781 = 3214
Local $03E803E804782 = 1249
Local $03E803E804783 = 1197
ProgressOn($03E803E803F08 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043F,$03E803E80477)
$03E803E80470 = $03E803E80477[0]
For $03E803E80462 = 1 to $03E803E80470
If ($03E803E804783 + $03E803E80462) = 10000 Then
$03E803E804783 = 1197
$03E803E804782 += 1
If $03E803E804782 = 10000 Then
$03E803E804781 += 1
$03E803E804782 = 1249
EndIf
EndIf
$03E803E80478 = $03E803E803F09 & Hex($03E803E804781,4) & Hex($03E803E804782,4) & Hex($03E803E804783 + $03E803E80462,4)
FileWriteLine($03E803E80440, $03E803E80478)
ProgressSet(($03E803E80462 / $03E803E80449[0] * 100), Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
EndFunc
Func X0C8E04E104C2()
Local $03E803E80449
Local $03E803E8047C
Local $03E803E8047D
ProgressOn($03E803E803F10 & $03E803E8044C, "", "", @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, 16 + 2)
X0C8E04E104C5($03E803E8043F, $03E803E8047C)
X0C8E04E104C5($03E803E80440, $03E803E8047D)
X0C8E04E104C5($03E803E8043C, $03E803E80449)
FileDelete($03E803E8043C)
For $03E803E80462 = 1 to $03E803E80449[0]
For $03E803E80462i = 1 to $03E803E8047C[0]
If StringInStr($03E803E80449[$03E803E80462], $03E803E8047C[$03E803E80462i]) <> 0 Then
$03E803E80449[$03E803E80462] = StringReplace($03E803E80449[$03E803E80462], $03E803E8047C[$03E803E80462i], $03E803E8047D[$03E803E80462i])
EndIf
Next
FileWriteLine($03E803E8043C, $03E803E80449[$03E803E80462])
ProgressSet(($03E803E80462 / $03E803E80449[0] * 100), Round($03E803E80462 / $03E803E80449[0] * 100) & $03E803E803ED1)
Next
ProgressOff()
EndFunc
Func X0C8E04E104C3($03E803E8047E)
Local $03E803E8047F = ""
Local $03E803E80480
Local $03E803E80462
$03E803E80480 = StringLen($03E803E8047E)
For $03E803E80462 = 1 to $03E803E80480
$03E803E8047F = $03E803E8047F & Hex(Asc(StringMid($03E803E8047E, $03E803E80462, 1))+$03E803E803E9,2)
Next
Return $03E803E8047F
EndFunc
Func X0C8E04E104C4(Const ByRef $03E803E8046EvArray, $03E803E80482, $03E803E80462Start = 0, $03E803E80462End = 0, $03E803E80462CaseSense = 0, $03E803E80486 = False)
Local $03E803E80462CurrentPos, $03E803E80462UBound, $03E803E80462Result
If Not IsArray($03E803E8046EvArray) Then
SetError(1)
Return -1
EndIf
$03E803E80462UBound = UBound($03E803E8046EvArray) - 1
If $03E803E80462End = 0 Then $03E803E80462End = $03E803E80462UBound
If $03E803E80462Start > $03E803E80462UBound Then
SetError(2)
Return -1
EndIf
If $03E803E80462End > $03E803E80462UBound Then
SetError(3)
Return -1
EndIf
If $03E803E80462Start > $03E803E80462End Then
SetError(4)
Return -1
EndIf
If Not ($03E803E80462CaseSense = 0 Or $03E803E80462CaseSense = 1) Then
SetError(5)
Return -1
EndIf
For $03E803E80462CurrentPos = $03E803E80462Start To $03E803E80462End
Select
Case $03E803E80462CaseSense = 0
If $03E803E80486 = False Then
If $03E803E8046EvArray[$03E803E80462CurrentPos] = $03E803E80482 Then
SetError(0)
Return $03E803E80462CurrentPos
EndIf
Else
$03E803E80462Result = StringInStr($03E803E8046EvArray[$03E803E80462CurrentPos], $03E803E80482, $03E803E80462CaseSense)
If $03E803E80462Result > 0 Then
SetError(0)
Return $03E803E80462CurrentPos
EndIf
EndIf
Case $03E803E80462CaseSense = 1
If $03E803E80486 = False Then
If $03E803E8046EvArray[$03E803E80462CurrentPos] == $03E803E80482 Then
SetError(0)
Return $03E803E80462CurrentPos
EndIf
Else
$03E803E80462Result = StringInStr($03E803E8046EvArray[$03E803E80462CurrentPos], $03E803E80482, $03E803E80462CaseSense)
If $03E803E80462Result > 0 Then
SetError(0)
Return $03E803E80462CurrentPos
EndIf
EndIf
EndSelect
Next
SetError(6)
Return -1
EndFunc
Func X0C8E04E104C5($03E803E8048A, ByRef $03E803E8046EArray)
Local $03E803E8048C
$03E803E8048C = FileOpen($03E803E8048A, 0)
If $03E803E8048C = -1 Then
SetError(1)
Return 0
EndIf
$03E803E8046EArray = StringSplit(StringStripCR(FileRead($03E803E8048C, FileGetSize($03E803E8048A))), @LF)
FileClose($03E803E8048C)
Return 1
EndFunc
Func X0C8E04E104C6()
Exit
EndFunc
Func X0C8E04E104C7($03E803E8047E)
Local $03E803E8047F = ""
Local $03E803E80480
Local $03E803E80462
$03E803E80480 = StringLen($03E803E8047E)
For $03E803E80462 = 1 to $03E803E80480 Step 2
$03E803E8047F = $03E803E8047F & Chr(Dec(StringMid($03E803E8047E, $03E803E80462, 2))-$03E803E803E9)
Next
Return $03E803E8047F
EndFunc