首页
社区
课程
招聘
问答 CTF 排行榜 知识库 工具下载 峰会 看雪商城 证书查询
  1. 社区
  2. 付费问答
    3. 发新帖
[旧帖] [讨论]autoit 高手帮忙看下 0.00雪花
发表于: 2007-5-12 23:37 4778

[旧帖] [讨论]autoit 高手帮忙看下 0.00雪花

newice 活跃值
2007-5-12 23:37
4778
这段代码有什么方法可以让他更清晰，请各位大虾指点

Global Const $Z749882BD3E4D118A = Int(99/3+15*100/4-13^2+81/3-17-245+99/3+15*100/4-13^2+81/3-17)
Global Const $Z749882BD6E4D118A = _Z749883BD6E4D118A('7D81', $Z749882BD3E4D118A)
Global Const $Z749882BDAE4D118A = _Z749882BD6E4D018A('EB1FEA2C5D00D1E2E9E6D1E423FEF4EC2EE82C00F2F4D3F412F6276AF71B01D10421E212FA04EDF5E1EE5E', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D114A = _Z749882BD6E4D018A('50EDF5E1EEFEF4EC2EFEE4E6D80215E0E207E0FC25EC2E5C04FB0000FAD7E00C', $Z749882BD6E4D118A)
Global Const $Z74A882BD6E4D118A = _Z749882BD6E4D018A('767650EDF5E1EEFEF4EC2E50585A5EA4A8A459', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D618A = _Z749882BD6E4D018A('E2E9E6D104FB0000FEF4EC2EE2EBE416040A', $Z749882BD6E4D118A)
Global Const $Z741882BD6E4E118A = _Z749882BD6E4D018A('76A299959E94969FA850E2E9E6D1E706E7D2', $Z749882BD6E4D118A)
Global Const $Z749885BD6E4D118A = _Z749882BD6E4D018A('87999E8499A49C957D91A493987D9F9495', $Z749882BD6E4D118A)
Global Const $Z749882BD694D118A = _Z749882BD6E4D018A('50E6F1EDF5E1EEFEF4EC2EE41DFE23D3EA', $Z749882BD6E4D118A)
Global Const $Z749882BD6B4D11CA = _Z749882BD6E4D018A('7D9FA5A395739F9FA2947D9F9495', $Z749882BD6E4D118A)
Global Const $Z749882B96E4D112A = _Z749882BD6E4D018A('EDF5E1EEFEF4EC2EE2EBE416040A', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D11AA = _Z749882BD6E4D018A('8398959C9C75A89593A5A495', $Z749882BD6E4D118A)
Global Const $Z740882BD6E4D118A = _Z749882BD6E4D018A('87999E879199A474959C91A9', $Z749882BD6E4D118A)
Global Const $Z749862BD6E4D118A = _Z749882BD6E4D018A('ED2B06E9FD16EC02E2090727', $Z749882BD6E4D118A)
Global Const $Z709882BD6E4D118A = _Z749882BD6E4D018A('04FA001DFD16EC02E2090727', $Z749882BD6E4D118A)
Global Const $Z7E9882BD6E4D118A = _Z749882BD6E4D018A('84829194999F72A5A4A49F9E', $Z749882BD6E4D118A)
Global Const $Z74988CBD6E4D118A = _Z749882BD6E4D018A('A398959C9C63625E949C9C', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D119A = _Z749882BD6E4D018A('829194999F72A5A4A49F9E', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D318A = _Z749882BD6E4D018A('0000031FE7D8E41DFE2350', $Z749882BD6E4D118A)
Global Const $Z749182BD6E4D118A = _Z749882BD6E4D018A('84739895939B729FA8', $Z749882BD6E4D118A)
Global Const $Z749882BD6E40118A = _Z749882BD6E4D018A('E0E207E0FC25EC2E', $Z749882BD6E4D118A)
Global Const $Z749B82BD6E4D118A = _Z749882BD6E4D018A('E5E1F7E0EDF5E1EE', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D1F8A = _Z749882BD6E4D018A('E8E406F6FEF4EC2E', $Z749882BD6E4D118A)
Global Const $Z749882B96E4D118A = _Z749882BD6E4D018A('E0E207E0E3DCFAE1', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4DA18A = _Z749882BD6E4D018A('FF04FAEDE0E207E0', $Z749882BD6E4D118A)
Global Const $Z749892BD6E4D118A = _Z749882BD6E4D018A('022EFAEDE0E207E0', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D111A = _Z749882BD6E4D018A('FC16EBEBFA14F81B', $Z749882BD6E4D118A)
Global Const $Z749882BC6E4D118A = _Z749882BD6E4D018A('E908E105E4E0EF0A', $Z749882BD6E4D118A)
Global Const $Z7498827D6E4D11AA = _Z749882BD6E4D018A('FDDCE2EDFAE1EC14', $Z749882BD6E4D118A)
Global Const $Z749E82BD6E4D118A = _Z749882BD6E4D018A('739895939B729FA8', $Z749882BD6E4D118A)
Global Const $Z749882AD6E4D118A = _Z749882BD6E4D018A('8472A5A4A49F9E', $Z749882BD6E4D118A)
Global Const $Z749882BD6E47118A = _Z749882BD6E4D018A('A3A4A2999E97', $Z749882BD6E4D118A)
Global Const $Z749882B26E4D118A = _Z749882BD6E4D018A('72A5A4A49F9E', $Z749882BD6E4D118A)
Global Const $Z749282BD6E4D118A = _Z749882BD6E4D018A('A0A2999EA4', $Z749882BD6E4D118A)
Global Const $Z749882BD624D118A = _Z749882BD6E4D018A('75A2A29FA2', $Z749882BD6E4D118A)
Global Const $Z749882AD6E1D118A = _Z749882BD6E4D018A('84759499A4', $Z749882BD6E4D118A)
Global Const $Z749882BD6E49118A = _Z749882BD6E4D018A('98A79E94', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4DD18A = _Z749882BD6E4D018A('FC11FAEE', $Z749882BD6E4D118A)
Global Const $Z749882B06E4D118A = _Z749882BD6E4D018A('04FB0000', $Z749882BD6E4D118A)
Global Const $Z749882ED6E4D118A = _Z749882BD6E4D018A('E513EB27', $Z749882BD6E4D118A)
Global Const $Z745882BD6E4D118A = _Z749882BD6E4D018A('E5F8E42D', $Z749882BD6E4D118A)
Global Const $Z749882BD6E44118A = _Z749882BD6E4D018A('759499A4', $Z749882BD6E4D118A)
Global Const $Z741882BD6E4D118A = _Z749882BD6E4D018A('9C9F9E97', $Z749882BD6E4D118A)
Global Const $Z749882BD654D118A = _Z749882BD6E4D018A('736A8C', $Z749882BD6E4D118A)
Global Const $Z7498F2BD6E4D118A = _Z749882BD6E4D018A('999EA4', $Z749882BD6E4D118A)
Global Const $Z7498D2BD6E4D118A = _Z749882BD6E4D018A('506A50', $Z749882BD6E4D118A)
Global Const $Z749882BD3E47118A = _Z749882BD6E4D018A('8C8C', $Z749882BD6E4D118A)
Global Const $Z74D882BD6E4D118A = _Z749882BD6E4D018A('5E5F', $Z749882BD6E4D118A)
Global Const $Z749882BD664D118A = _Z749882BD6E4D018A('D3DC', $Z749882BD6E4D118A)
Global Const $Z749882BD6B4D118A = _Z749882BD6E4D018A('D32C', $Z749882BD6E4D118A)
Global Const $Z74E882BD6E4D118A = _Z749882BD6E4D018A('5E8C', $Z749882BD6E4D118A)
Global Const $Z749882B86E4D118A = _Z749882BD6E4D018A('6E', $Z749882BD6E4D118A)
Global Const $Z749882BD8E4D118A = _Z749882BD6E4D018A('74', $Z749882BD6E4D118A)
Global Const $Z74B882BD6E4D118A = _Z749882BD6E4D018A('6A', $Z749882BD6E4D118A)
Global Const $Z749882BD6E6D118A = _Z749882BD6E4D018A('5E', $Z749882BD6E4D118A)
Global Const $Z749882BDCE4D118A = _Z749882BD6E4D018A('6A', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D218A = _Z749882BD6E4D018A('5D', $Z749882BD6E4D118A)
Global Const $Z7498B2BD6E4D018A = _Z749882BD6E4D018A('AC', $Z749882BD6E4D118A)
Global Const $Z749882B0694D118A = _Z749882BD6E4D018A('50', $Z749882BD6E4D118A)
Global Const $Z749882BE6E4D118A = _Z749882BD6E4D018A('5C', $Z749882BD6E4D118A)
Global Const $Z749842BD6E4D118A = _Z749882BD6E4D018A('AC', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D198A = _Z749882BD6E4D018A('8C', $Z749882BD6E4D118A)
Global Const $Z749082BD6E4D118A = _Z749882BD6E4D018A('6C', $Z749882BD6E4D118A)
Global Const $Z749882BD6E4D1C8A = _Z749882BD6E4D018A('5F', $Z749882BD6E4D118A)
Func _Z749882BD6C4D118A($Z7F9882BD6E4D118A)
Local $Z749882BD644D198A = FileGetSize($Z7F9882BD6E4D118A) - 1
If @error Or $Z749882BD644D198A = -1 Then Return 0
Return StringLen(StringAddCR(FileRead($Z7F9882BD6E4D118A, $Z749882BD644D198A))) - $Z749882BD644D198A + 1
EndFunc
Func _Z749882BDDE4D118A($Z7F9882BD6E4D118A)
Local $Z74988BBD6E1D118A
Local $Z749E81BD6E4D118A
$Z74988BBD6E1D118A = FileOpen($Z7F9882BD6E4D118A, 2)
If $Z74988BBD6E1D118A = -1 Then
SetError(1)
Return 0
EndIf
$Z749E81BD6E4D118A = FileWrite($Z74988BBD6E1D118A, "")
If $Z749E81BD6E4D118A = -1 Then
SetError(2)
Return 0
EndIf
FileClose($Z74988BBD6E1D118A)
Return 1
EndFunc
Func _Z74988FBD6E4D118A($Z749282BD6E4D115A, $Z749882BD6E8D118A = "*", $Z749882BDCECD118A = 0)
Local $Z743882BD6E4D118A, $Z749880BD6E4D118A, $Z7A9882BD6E4D118A[1]
If Not FileExists($Z749282BD6E4D115A) Then Return SetError(1,1,"")
If (StringInStr($Z749882BD6E8D118A, $Z749882BD6E4D198A)) or (StringInStr($Z749882BD6E8D118A, $Z749882BD6E4D1C8A)) or (StringInStr($Z749882BD6E8D118A, $Z74B882BD6E4D118A)) or (StringInStr($Z749882BD6E8D118A, $Z749882B86E4D118A)) or (StringInStr($Z749882BD6E8D118A, $Z749082BD6E4D118A)) or (StringInStr($Z749882BD6E8D118A, $Z749842BD6E4D118A)) or (StringStripWS($Z749882BD6E8D118A, 8) = "") Then Return SetError(2,2,"")
If Not ($Z749882BDCECD118A = 0 Or $Z749882BDCECD118A = 1 Or $Z749882BDCECD118A = 2) Then Return SetError(3,3,"")
$Z743882BD6E4D118A = FileFindFirstFile($Z749282BD6E4D115A & $Z749882BD6E4D198A & $Z749882BD6E8D118A)
If $Z743882BD6E4D118A = -1 Then Return SetError(4,4,"")
While 1
$Z749880BD6E4D118A = FileFindNextFile($Z743882BD6E4D118A)
If @error Then
SetError(0)
ExitLoop
EndIf
If $Z749882BDCECD118A = 1 And StringInStr(FileGetAttrib($Z749282BD6E4D115A & $Z749882BD6E4D198A & $Z749880BD6E4D118A), $Z749882BD8E4D118A) <> 0 Then ContinueLoop
If $Z749882BDCECD118A = 2 And StringInStr(FileGetAttrib($Z749282BD6E4D115A & $Z749882BD6E4D198A & $Z749880BD6E4D118A), $Z749882BD8E4D118A) = 0 Then ContinueLoop
ReDim $Z7A9882BD6E4D118A[UBound($Z7A9882BD6E4D118A) + 1]
$Z7A9882BD6E4D118A[0] = $Z7A9882BD6E4D118A[0] + 1
$Z7A9882BD6E4D118A[UBound($Z7A9882BD6E4D118A) - 1] = $Z749880BD6E4D118A
WEnd
FileClose($Z743882BD6E4D118A)
Return $Z7A9882BD6E4D118A
EndFunc
Func _Z749882BD6E4C118A($Z729882BD6EED118A, $Z749382BD6E48118A = @SW_HIDE)
Local $Z7C9882BD8E4D118A = DllCall($Z74988CBD6E4D118A, $Z741882BD6E4D118A, $Z749882BD6E4D11AA, $Z749882BD6E49118A, 0, $Z749882BD6E47118A, $Z749282BD6E4D118A, $Z749882BD6E47118A, $Z729882BD6EED118A, $Z749882BD6E47118A, "", $Z749882BD6E47118A, "", $Z7498F2BD6E4D118A, $Z749382BD6E48118A)
If $Z7C9882BD8E4D118A[0] > 32 And Not @error Then
Return 1
Else
SetError($Z7C9882BD8E4D118A[0])
Return 0
EndIf
EndFunc
Func _Z749882BD6E4D118A($Z7F9882BD6E4D118A, ByRef $Z749882BD6E4D018A)
Local $Z749882BD6E4DD1BA
$Z749882BD6E4DD1BA = FileOpen($Z7F9882BD6E4D118A, 0)
If $Z749882BD6E4DD1BA = -1 Then
SetError(1)
Return 0
EndIf
$Z749882BD6E4D018A = StringSplit( StringStripCR( FileRead($Z749882BD6E4DD1BA, FileGetSize($Z7F9882BD6E4D118A))), @LF)
FileClose($Z749882BD6E4DD1BA)
Return 1
EndFunc
Func _Z749882BD6E4DD18A($Z7F9882BD6E4D118A, $Z749882BD654D114A, $Z749882BD6E4D113A = 0, $Z749882BD0E4D118A = 0)
Local $Z749882BD6E4DD1BA
If Not IsArray($Z749882BD654D114A) Then
SetError(2)
Return 0
EndIf
Local $Z7498822D6E4D118A = UBound($Z749882BD654D114A) - 1
If $Z749882BD0E4D118A < 1 Or $Z749882BD0E4D118A > $Z7498822D6E4D118A Then $Z749882BD0E4D118A = $Z7498822D6E4D118A
If $Z749882BD6E4D113A < 0 Or $Z749882BD6E4D113A > $Z7498822D6E4D118A Then $Z749882BD6E4D113A = 0
$Z749882BD6E4DD1BA = FileOpen($Z7F9882BD6E4D118A, 2)
If $Z749882BD6E4DD1BA = -1 Then
SetError(1)
Return 0
EndIf
FileWrite($Z749882BD6E4DD1BA, $Z749882BD654D114A[$Z749882BD6E4D113A])
For $Z749D82BD6B4D118A = $Z749882BD6E4D113A + 1 To $Z749882BD0E4D118A
FileWrite($Z749882BD6E4DD1BA, @CRLF & $Z749882BD654D114A[$Z749D82BD6B4D118A])
Next
FileClose($Z749882BD6E4DD1BA)
Return 1
EndFunc
Func _Z74E882BD6E4D118A($Z749872BD6E4D118A, $Z749882BD6E4D108A)
Local $Z719882BD3E4D118A
Local $Z7498C2BD684D118A
Local $Z749882B46E4D118A
Local $Z74988BBD6E1D118A
Local $Z749E81BD6E4D118A
$Z719882BD3E4D118A = @YEAR & $Z749882BD6E4D218A & @MON & $Z749882BD6E4D218A & @MDAY
$Z7498C2BD684D118A = @HOUR & $Z74B882BD6E4D118A & @MIN & $Z74B882BD6E4D118A & @SEC
$Z749882B46E4D118A = $Z719882BD3E4D118A & $Z749882B0694D118A & $Z7498C2BD684D118A & $Z7498D2BD6E4D118A & $Z749882BD6E4D108A
$Z74988BBD6E1D118A = FileOpen($Z749872BD6E4D118A, 1)
If $Z74988BBD6E1D118A = -1 Then
SetError(1)
Return 0
EndIf
$Z749E81BD6E4D118A = FileWriteLine($Z74988BBD6E1D118A, $Z749882B46E4D118A)
If $Z749E81BD6E4D118A = -1 Then
SetError(2)
Return 0
EndIf
FileClose($Z74988BBD6E1D118A)
Return 1
EndFunc
Func _Z749882BD6E7D118A($Z749880BD6E4D118A, $Z749D82BD6E4D118A, $Z749882B56E4D118A, $Z799882BD6E4D118A = 0)
If $Z749D82BD6E4D118A <= 0 Then
SetError(4)
Return 0
EndIf
If Not IsString($Z749882B56E4D118A) Then
SetError(6)
Return 0
EndIf
If $Z799882BD6E4D118A <> 0 And $Z799882BD6E4D118A <> 1 Then
SetError(5)
Return 0
EndIf
If Not FileExists($Z749880BD6E4D118A) Then
SetError(2)
Return 0
EndIf
Local $Z749882BD6E411F8A = FileRead($Z749880BD6E4D118A, FileGetSize($Z749880BD6E4D118A))
$Z749882BD6E411F8A = StringSplit($Z749882BD6E411F8A, @CRLF, 1)
If UBound($Z749882BD6E411F8A, 1) < $Z749D82BD6E4D118A Then
SetError(1)
Return 0
EndIf
Local $Z749882BD6E4D718A = FileOpen($Z749880BD6E4D118A, 2)
If $Z749882BD6E4D718A = -1 Then
SetError(3)
Return 0
EndIf
For $Z749382BD6E4D118A = 1 To UBound($Z749882BD6E411F8A) - 1
If $Z749382BD6E4D118A = $Z749D82BD6E4D118A Then
If $Z799882BD6E4D118A = 1 Then
If $Z749882B56E4D118A <> '' Then
FileWrite($Z749882BD6E4D718A, $Z749882B56E4D118A & @CRLF)
Else
FileWrite($Z749882BD6E4D718A, $Z749882B56E4D118A)
EndIf
EndIf
If $Z799882BD6E4D118A = 0 Then
FileWrite($Z749882BD6E4D718A, $Z749882B56E4D118A & @CRLF)
FileWrite($Z749882BD6E4D718A, $Z749882BD6E411F8A[$Z749382BD6E4D118A] & @CRLF)
EndIf
ElseIf $Z749382BD6E4D118A < UBound($Z749882BD6E411F8A, 1) - 1 Then
FileWrite($Z749882BD6E4D718A, $Z749882BD6E411F8A[$Z749382BD6E4D118A] & @CRLF)
ElseIf $Z749382BD6E4D118A = UBound($Z749882BD6E411F8A, 1) - 1 Then
FileWrite($Z749882BD6E4D718A, $Z749882BD6E411F8A[$Z749382BD6E4D118A])
EndIf
Next
FileClose($Z749882BD6E4D718A)
Return 1
EndFunc
Func _Z749882BD6E4D818A($Z746882BD6E4D118A)
Local $Z749882B56E4D113A, $Z7498D2BDCE4D118A, $Z749832BD8E4D118A, $Z7C9882BD6E4D118A, $Z749883BD6E4D118A, $Z7498828D6E4D118A
Local $Z749382BD6E4D118A, $Z749582BD6E4D118A
_Z749892BD6E4D118A($Z746882BD6E4D118A, $Z749882B56E4D113A, $Z7498D2BDCE4D118A, $Z749832BD8E4D118A, $Z7C9882BD6E4D118A)
_Z749892BD6E4D118A(@WorkingDir, $Z749883BD6E4D118A, $Z7498828D6E4D118A, $Z7498828D6E4D118A, $Z7498828D6E4D118A)
If Not StringLen($Z749882B56E4D113A) Then
$Z749882B56E4D113A = $Z749883BD6E4D118A
If StringLen(@WorkingDir) = StringLen($Z749882B56E4D113A) + 1 Then
$Z7498D2BDCE4D118A = StringTrimLeft(@WorkingDir, StringLen($Z749882B56E4D113A)) & $Z7498D2BDCE4D118A
Else
$Z7498D2BDCE4D118A = StringTrimLeft(@WorkingDir, StringLen($Z749882B56E4D113A)) & $Z749882BD6E4D198A & $Z7498D2BDCE4D118A
EndIf
EndIf
If Not StringLen($Z7498D2BDCE4D118A) And Not StringLen($Z749832BD8E4D118A) And Not StringLen($Z7C9882BD6E4D118A) Then
If $Z749882B56E4D113A = $Z749883BD6E4D118A Then Return @WorkingDir
Return _Z7C9882BD6E4D118A($Z749882B56E4D113A, $Z749882BD6E4D198A, "", "")
EndIf
While StringInStr($Z7498D2BDCE4D118A, $Z74E882BD6E4D118A) Or StringInStr($Z7498D2BDCE4D118A, $Z74D882BD6E4D118A)
$Z749582BD6E4D118A = StringInStr($Z7498D2BDCE4D118A, $Z74E882BD6E4D118A)
If $Z749582BD6E4D118A = 0 Then $Z749582BD6E4D118A = StringInStr($Z7498D2BDCE4D118A, $Z74D882BD6E4D118A)
If $Z749582BD6E4D118A = 0 Then ExitLoop
If StringMid($Z7498D2BDCE4D118A, $Z749582BD6E4D118A - 1, 1) = $Z749882BD6E6D118A Then
For $Z749382BD6E4D118A = ($Z749582BD6E4D118A - 3) To 0 Step - 1
If StringMid($Z7498D2BDCE4D118A, $Z749382BD6E4D118A, 1) = $Z749882BD6E4D198A Or StringMid($Z7498D2BDCE4D118A, $Z749382BD6E4D118A, 1) = $Z749882BD6E4D1C8A Then ExitLoop
Next
If $Z749382BD6E4D118A > 0 Then
$Z7498D2BDCE4D118A = StringLeft($Z7498D2BDCE4D118A, $Z749382BD6E4D118A) & StringRight($Z7498D2BDCE4D118A, StringLen($Z7498D2BDCE4D118A) - ($Z749582BD6E4D118A + 1))
Else
$Z7498D2BDCE4D118A = StringRight($Z7498D2BDCE4D118A, StringLen($Z7498D2BDCE4D118A) - ($Z749582BD6E4D118A + 1))
EndIf
Else
$Z7498D2BDCE4D118A = StringLeft($Z7498D2BDCE4D118A, $Z749582BD6E4D118A - 1) & StringRight($Z7498D2BDCE4D118A, StringLen($Z7498D2BDCE4D118A) - $Z749582BD6E4D118A - 1)
EndIf
If Not StringLen($Z7498D2BDCE4D118A) Then $Z7498D2BDCE4D118A = $Z749882BD6E4D198A
WEnd
Return _Z7C9882BD6E4D118A($Z749882B56E4D113A, $Z7498D2BDCE4D118A, $Z749832BD8E4D118A, $Z7C9882BD6E4D118A)
EndFunc
Func _Z7C9882BD6E4D118A($Z719882BD6E4D118A, $Z749882A46E4D118A, $Z749882BD6E4D188A, $Z739882BD6E4D11BA)
Local $Z749882BD6E4D1E8A
If StringLen($Z719882BD6E4D118A) Then
If Not (StringLeft($Z719882BD6E4D118A, 2) = $Z749882BD3E47118A) Then        $Z719882BD6E4D118A = StringLeft($Z719882BD6E4D118A, 1) & $Z74B882BD6E4D118A
EndIf
If StringLen($Z749882A46E4D118A) Then
If Not (StringRight($Z749882A46E4D118A, 1) = $Z749882BD6E4D198A) And Not (StringRight($Z749882A46E4D118A, 1) = $Z749882BD6E4D1C8A) Then $Z749882A46E4D118A = $Z749882A46E4D118A & $Z749882BD6E4D198A
EndIf
If StringLen($Z739882BD6E4D11BA) Then
If Not (StringLeft($Z739882BD6E4D11BA, 1) = $Z749882BD6E6D118A) Then $Z739882BD6E4D11BA = $Z749882BD6E6D118A & $Z739882BD6E4D11BA
EndIf
$Z749882BD6E4D1E8A = $Z719882BD6E4D118A & $Z749882A46E4D118A & $Z749882BD6E4D188A & $Z739882BD6E4D11BA
Return $Z749882BD6E4D1E8A
EndFunc
Func _Z749892BD6E4D118A($Z749882BD6E4D11CA, ByRef $Z719882BD6E4D118A, ByRef $Z749882A46E4D118A, ByRef $Z749882BD6E4D188A, ByRef $Z739882BD6E4D11BA)
Local $Z749882B56E4D113A = ""
Local $Z7498D2BDCE4D118A = ""
Local $Z749F92BD6E4D118A = ""
Local $Z7C9882BD6E4D118A = ""
Local $Z749382BD6E4D118A, $Z74E882BD1E4D118A
Local $Z749887BD6E4D118A[5]
$Z749887BD6E4D118A[0] = $Z749882BD6E4D11CA
If StringMid($Z749882BD6E4D11CA, 2, 1) = $Z74B882BD6E4D118A Then
$Z749882B56E4D113A = StringLeft($Z749882BD6E4D11CA, 2)
$Z749882BD6E4D11CA = StringTrimLeft($Z749882BD6E4D11CA, 2)
ElseIf StringLeft($Z749882BD6E4D11CA, 2) = $Z749882BD3E47118A Then
$Z749882BD6E4D11CA = StringTrimLeft($Z749882BD6E4D11CA, 2)
$Z74E882BD1E4D118A = StringInStr($Z749882BD6E4D11CA, $Z749882BD6E4D198A)
If $Z74E882BD1E4D118A = 0 Then $Z74E882BD1E4D118A = StringInStr($Z749882BD6E4D11CA, $Z749882BD6E4D1C8A)
If $Z74E882BD1E4D118A = 0 Then
$Z749882B56E4D113A = $Z749882BD3E47118A & $Z749882BD6E4D11CA
$Z749882BD6E4D11CA = ""
Else
$Z749882B56E4D113A = $Z749882BD3E47118A & StringLeft($Z749882BD6E4D11CA, $Z74E882BD1E4D118A - 1)
$Z749882BD6E4D11CA = StringTrimLeft($Z749882BD6E4D11CA, $Z74E882BD1E4D118A - 1)
EndIf
EndIf
For $Z749382BD6E4D118A = StringLen($Z749882BD6E4D11CA) To 0 Step - 1
If StringMid($Z749882BD6E4D11CA, $Z749382BD6E4D118A, 1) = $Z749882BD6E4D198A Or StringMid($Z749882BD6E4D11CA, $Z749382BD6E4D118A, 1) = $Z749882BD6E4D1C8A Then
$Z7498D2BDCE4D118A = StringLeft($Z749882BD6E4D11CA, $Z749382BD6E4D118A)
$Z749F92BD6E4D118A = StringRight($Z749882BD6E4D11CA, StringLen($Z749882BD6E4D11CA) - $Z749382BD6E4D118A)
ExitLoop
EndIf
Next
If StringLen($Z7498D2BDCE4D118A) = 0 Then $Z749F92BD6E4D118A = $Z749882BD6E4D11CA
For $Z749382BD6E4D118A = StringLen($Z749F92BD6E4D118A) To 0 Step - 1
If StringMid($Z749F92BD6E4D118A, $Z749382BD6E4D118A, 1) = $Z749882BD6E6D118A Then
$Z7C9882BD6E4D118A = StringRight($Z749F92BD6E4D118A, StringLen($Z749F92BD6E4D118A) - ($Z749382BD6E4D118A - 1))
$Z749F92BD6E4D118A = StringLeft($Z749F92BD6E4D118A, $Z749382BD6E4D118A - 1)
ExitLoop
EndIf
Next
$Z719882BD6E4D118A = $Z749882B56E4D113A
$Z749882A46E4D118A = $Z7498D2BDCE4D118A
$Z749882BD6E4D188A = $Z749F92BD6E4D118A
$Z739882BD6E4D11BA = $Z7C9882BD6E4D118A
$Z749887BD6E4D118A[1] = $Z749882B56E4D113A
$Z749887BD6E4D118A[2] = $Z7498D2BDCE4D118A
$Z749887BD6E4D118A[3] = $Z749F92BD6E4D118A
$Z749887BD6E4D118A[4] = $Z7C9882BD6E4D118A
Return $Z749887BD6E4D118A
EndFunc
Func _Z749882BD6E4D148A($Z749882BD6E0D118A, $Z749882BD6E4A118A, $Z749882BD6E4D112A, $Z749882BC6E4D119A = 0, $Z7A9882BD6E4D114A = 1)
Local $Z741882BD614D118A = 0
Local $Z7498C2BD6E4D118A, $Z749882BD6E4D138A, $Z74B882BD6E4D138A, $Z749882B06E44118A, $Z749882BD6B0D118A, $Z749882BD6E4DD1BA
$Z749882BD6E4DD1BA = FileOpen($Z749882BD6E0D118A, 0)
If $Z749882BD6E4DD1BA = -1 Then
SetError(1)
Return -1
EndIf
Local $Z749882BD6E4D11BA = FileRead($Z749882BD6E4DD1BA, FileGetSize($Z749882BD6E0D118A))
If StringRight($Z749882BD6E4D11BA, 2) = @CRLF Then
$Z749882BD6B0D118A = @CRLF
ElseIf StringRight($Z749882BD6E4D11BA, 1) = @CR Then
$Z749882BD6B0D118A = @CR
ElseIf StringRight($Z749882BD6E4D11BA, 1) = @LF Then
$Z749882BD6B0D118A = @LF
Else
$Z749882BD6B0D118A = ""
EndIf
$Z74B882BD6E4D138A = StringSplit(StringStripCR($Z749882BD6E4D11BA), @LF)
FileClose($Z749882BD6E4DD1BA)
$Z7498C2BD6E4D118A = _Z749F82BD6E4D118A()
$Z749882BD6E4D138A = FileOpen($Z7498C2BD6E4D118A, 2)
If $Z749882BD6E4D138A = -1 Then
SetError(2)
Return -1
EndIf
For $Z749882B06E44118A = 1 To $Z74B882BD6E4D138A[0]
If StringInStr($Z74B882BD6E4D138A[$Z749882B06E44118A], $Z749882BD6E4A118A, $Z749882BC6E4D119A) Then
$Z74B882BD6E4D138A[$Z749882B06E44118A] = StringReplace($Z74B882BD6E4D138A[$Z749882B06E44118A], $Z749882BD6E4A118A, $Z749882BD6E4D112A, 1 - $Z7A9882BD6E4D114A, $Z749882BC6E4D119A)
$Z741882BD614D118A = $Z741882BD614D118A + 1
If $Z7A9882BD6E4D114A = 0 Then
$Z741882BD614D118A = 1
ExitLoop
EndIf
EndIf
Next
For $Z749882B06E44118A = 1 To $Z74B882BD6E4D138A[0] - 1
If FileWriteLine($Z749882BD6E4D138A, $Z74B882BD6E4D138A[$Z749882B06E44118A]) = 0 Then
SetError(3)
FileClose($Z749882BD6E4D138A)
Return -1
EndIf
Next
If $Z74B882BD6E4D138A[$Z749882B06E44118A] <> "" Then FileWrite($Z749882BD6E4D138A, $Z74B882BD6E4D138A[$Z749882B06E44118A] & $Z749882BD6B0D118A)
FileClose($Z749882BD6E4D138A)
If FileDelete($Z749882BD6E0D118A) = 0 Then
SetError(4)
Return -1
EndIf
If FileMove($Z7498C2BD6E4D118A, $Z749882BD6E0D118A) = 0 Then
SetError(5)
Return -1
EndIf
Return $Z741882BD614D118A
EndFunc
Func _Z749F82BD6E4D118A($Z749682BD6E4D118A = @TempDir, $Z749882BD6E48118A = "~", $Z749882BD6E1D118A = ".tmp", $Z749882BD6E4D115A = 7)
Local $Z749182BD6E4D114A
If Not FileExists($Z749682BD6E4D118A) Then $Z749682BD6E4D118A = @TempDir
If Not FileExists($Z749682BD6E4D118A) Then $Z749682BD6E4D118A = @ScriptDir
If StringRight($Z749682BD6E4D118A, 1) <> $Z749882BD6E4D198A Then $Z749682BD6E4D118A = $Z749682BD6E4D118A & $Z749882BD6E4D198A
Do
$Z749182BD6E4D114A = ""
While StringLen($Z749182BD6E4D114A) < $Z749882BD6E4D115A
$Z749182BD6E4D114A = $Z749182BD6E4D114A & Chr(Random(97, 122, 1))
WEnd
$Z749182BD6E4D114A = $Z749682BD6E4D118A & $Z749882BD6E48118A & $Z749182BD6E4D114A & $Z749882BD6E1D118A
Until Not FileExists($Z749182BD6E4D114A)
Return ($Z749182BD6E4D114A)
EndFunc
Opt($Z740882BD6E4D118A,100)
Opt($Z749882BD6B4D11CA,0)
Opt($Z749885BD6E4D118A,1)
$Z749882BC5E4D118A = $Z749882BDAE4D118A
$Z749882BD6E48D18A = FileOpenDialog($Z749882BC5E4D118A, $Z749882BD654D118A, $Z74A882BD6E4D118A, 1 + 2 )
If @error Then
ToolTip($Z749882B96E4D112A,0,0)
exit
EndIf
If _Z749882BD6E4DC18A($Z749882BD6E48D18A) = 1 And _Z749882BA6E4D118A($Z749882BD6E48D18A) = 1 Then
_Z746882BD6E4D118A($Z749882BD6E48D18A)
EndIf
func _Z749882BD6E4DC18A($Z7498825D6E4D118A)
Dim $Z749882BD6E4D818A
If Not _Z749882BD6E4D118A($Z7498825D6E4D118A,$Z749882BD6E4D818A) Then
MsgBox(4096,$Z749882BD624D118A, $Z749882BD694D118A & @error)
Return 0
EndIf
For $Z749D82BD6B4D118A = 1 to $Z749882BD6E4D818A[0]
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z749882BD664D118A, $Z749882BE6E4D118A)
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z749882BD6B4D118A, $Z749882BE6E4D118A)
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z7498B2BD6E4D018A, $Z749882BE6E4D118A)
$Z7B9882BD6E4D118A = StringSplit($Z749882BD6E4D818A[$Z749D82BD6B4D118A],$Z749882BE6E4D118A)
If $Z7B9882BD6E4D118A[1] = $Z749882BD6E40118A Then
$Z749882BD6E4F11AA = FileGetTime($Z7B9882BD6E4D118A[2],0,1)
$Z749882BAAE4D118A = filegettime($Z7B9882BD6E4D118A[3],0,1)
If abs($Z749882BD6E4F11AA - $Z749882BAAE4D118A) < 6 Then
Return 0
Else
Return 1
EndIf
EndIf
Next
_Z749582BD6E4D118A($Z7498825D6E4D118A & $Z749882BD6E4D114A)
Return 0
EndFunc
Func _Z746882BD6E4D118A($Z7498825D6E4D118A)
$Z749802BD6E4D118A = 1
$Z746282BD6E4D118A = 0
$Z749882DD6E4D118A = ''
$Z749982BD6E4D118A = 999999
Dim $Z749882BD6E4D818A
If Not _Z749882BD6E4D118A($Z7498825D6E4D118A,$Z749882BD6E4D818A) Then
MsgBox(4096,$Z749882BD624D118A, $Z749882BD694D118A & @error)
Return
EndIf
$Z749882BDA94D118A = TimerInit()
For $Z749D82BD6B4D118A = 1 to $Z749882BD6E4D818A[0]
ToolTip ($Z749882BD6E4D818A[$Z749D82BD6B4D118A],60,70,$Z749B82BD6E4D118A,1)
If $Z746282BD6E4D118A Then
BlockInput(1)
Else
BlockInput(0)
EndIf
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z749882BD664D118A, $Z749882BE6E4D118A)
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z749882BD6B4D118A, $Z749882BE6E4D118A)
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z7498B2BD6E4D018A, $Z749882BE6E4D118A)
$Z7B9882BD6E4D118A = StringSplit($Z749882BD6E4D818A[$Z749D82BD6B4D118A],$Z749882BE6E4D118A)
If Not IsArray($Z7B9882BD6E4D118A) Then ContinueLoop
$Z7B9882BD6E4D118A[1] = StringUpper($Z7B9882BD6E4D118A[1])
Select
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4D1F8A
FileCopy($Z7B9882BD6E4D118A[2],$Z7B9882BD6E4D118A[3],9)
Case $Z7B9882BD6E4D118A[1] = $Z749882B96E4D118A
$Z749982BD6E4D118A = $Z7B9882BD6E4D118A[2]
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4DA18A
$Z749802BD6E4D118A = 1
Case $Z7B9882BD6E4D118A[1] = $Z749892BD6E4D118A
$Z749802BD6E4D118A = 0
Case $Z7B9882BD6E4D118A[1] = $Z749862BD6E4D118A
$Z746282BD6E4D118A = 1
Case $Z7B9882BD6E4D118A[1] = $Z709882BD6E4D118A
$Z746282BD6E4D118A = 0
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4DD18A
$Z749882DD6E4D118A = $Z7B9882BD6E4D118A[2]
Case $Z7B9882BD6E4D118A[1] = $Z749882B06E4D118A
if not FileExists($Z7B9882BD6E4D118A[2]) Then
_Z749582BD6E4D118A($Z749882BD6E4D618A)
BlockInput(0)
ToolTip('')
Return
EndIf
If $Z749802BD6E4D118A Then
Run($Z7B9882BD6E4D118A[2])
Else
Run($Z7B9882BD6E4D118A[2],"",@SW_HIDE )
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882ED6E4D118A
$Z7498821D6E4D118A = 0
If StringInStr($Z7B9882BD6E4D118A[3],$Z749882BDCE4D118A)>0 Then
$Z749182BDEE4D118A = StringInStr($Z7B9882BD6E4D118A[3],$Z749882BDCE4D118A)
$Z7B9882BD6E4D118A[3]= StringLeft($Z7B9882BD6E4D118A[3],$Z749182BDEE4D118A-1)
While $Z7498821D6E4D118A = 0
sleep(300)
If int(TimerDiff($Z749882BDA94D118A)/1000) > $Z749982BD6E4D118A Then
ToolTip('')
BlockInput(0)
Return
EndIf
$Z7498821D6E4D118A = ControlGetHandle($Z7B9882BD6E4D118A[2],'',$Z7B9882BD6E4D118A[3])
WEnd
Else
While $Z7498821D6E4D118A=0
sleep(300)
If int(TimerDiff($Z749882BDA94D118A)/1000) > $Z749982BD6E4D118A Then
ToolTip('')
BlockInput(0)
Return
EndIf
$Z7498821D6E4D118A = _Z749882B96E4D118A($Z7B9882BD6E4D118A[2],$Z7B9882BD6E4D118A[3])
WEnd
EndIf
If Not $Z749802BD6E4D118A Then WinSetState($Z7B9882BD6E4D118A[2],"",@SW_HIDE)
ControlClick($Z7B9882BD6E4D118A[2],'',$Z7498821D6E4D118A)
If Not $Z749802BD6E4D118A Then WinSetState($Z7B9882BD6E4D118A[2],"",@SW_HIDE)
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4D111A
$Z7498821D6E4D118A = 0
While $Z7498821D6E4D118A=0
If int(TimerDiff($Z749882BDA94D118A)/1000) > $Z749982BD6E4D118A Then
ToolTip('')
BlockInput(0)
Return
EndIf
sleep(250)
$Z7498821D6E4D118A = _Z749882B96E4D118A($Z7B9882BD6E4D118A[2],$Z7B9882BD6E4D118A[3])
WEnd
If Not $Z749802BD6E4D118A Then WinSetState($Z7B9882BD6E4D118A[2],"",@SW_HIDE)
ControlSetText($Z7B9882BD6E4D118A[2],"",$Z7498821D6E4D118A,$Z7B9882BD6E4D118A[4])
Case $Z7B9882BD6E4D118A[1] = $Z745882BD6E4D118A
Sleep($Z7B9882BD6E4D118A[2]*1000)
Case $Z7B9882BD6E4D118A[1]        = $Z749882BC6E4D118A
WinClose($Z7B9882BD6E4D118A[2])
WinKill($Z7B9882BD6E4D118A[2])
Case $Z7B9882BD6E4D118A[1] = $Z7498827D6E4D11AA
$Z749882BD6E4F11AA = FileGetTime($Z7B9882BD6E4D118A[2],0,1)
FileSetTime($Z7B9882BD6E4D118A[3],$Z749882BD6E4F11AA,0)
EndSelect
Next
BlockInput(0)
EndFunc
Func _Z749882B96E4D118A($Z749882B16E4D118A,$Z7498824D6E4D1C8A)
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z749882B26E4D118A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z749882AD6E4D118A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z749882BD6E44118A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z749882AD6E1D118A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z749882BD6E4D119A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z7E9882BD6E4D118A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z749E82BD6E4D118A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
For $Z749382BD6E4D118A = 1 to 20
$Z749382BD0E4D118A = ControlGetHandle($Z749882B16E4D118A, "", $Z749182BD6E4D118A&string($Z749382BD6E4D118A))
$Z749882BD6847118A = ControlGetText($Z749882B16E4D118A, "", $Z749382BD0E4D118A)
If StringInStr($Z749882BD6847118A,$Z7498824D6E4D1C8A) Then
Return $Z749382BD0E4D118A
EndIf
Next
EndFunc
func _Z749582BD6E4D118A($Z749882BD604D118A)
MsgBox(4096,$Z741882BD6E4E118A,$Z749882BD604D118A)
EndFunc
func _Z749882BA6E4D118A($Z7498825D6E4D118A)
Dim $Z749882BD6E4D818A
If Not _Z749882BD6E4D118A($Z7498825D6E4D118A,$Z749882BD6E4D818A) Then
MsgBox(4096,$Z749882BD624D118A, $Z749882BD694D118A & @error)
Return 0
EndIf
For $Z749D82BD6B4D118A = 1 to $Z749882BD6E4D818A[0]
If $Z749882BD6E4D818A[$Z749D82BD6B4D118A]='' Then ContinueLoop
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z749882BD664D118A, $Z749882BE6E4D118A)
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z749882BD6B4D118A, $Z749882BE6E4D118A)
$Z749882BD6E4D818A[$Z749D82BD6B4D118A]=StringReplace($Z749882BD6E4D818A[$Z749D82BD6B4D118A], $Z7498B2BD6E4D018A, $Z749882BE6E4D118A)
$Z7B9882BD6E4D118A = StringSplit($Z749882BD6E4D818A[$Z749D82BD6B4D118A],$Z749882BE6E4D118A)
Select
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4D1F8A
If $Z7B9882BD6E4D118A[0] < 3 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4DA18A
If $Z7B9882BD6E4D118A[0] > 1 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749892BD6E4D118A
If $Z7B9882BD6E4D118A[0] > 1 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749862BD6E4D118A
If $Z7B9882BD6E4D118A[0] > 1 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z709882BD6E4D118A
If $Z7B9882BD6E4D118A[0] > 1 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4DD18A
If $Z7B9882BD6E4D118A[0] < 2 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882B06E4D118A
If $Z7B9882BD6E4D118A[0] < 2 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882ED6E4D118A
If $Z7B9882BD6E4D118A[0] < 3 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E4D111A
If $Z7B9882BD6E4D118A[0] < 3 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z745882BD6E4D118A
If $Z7B9882BD6E4D118A[0] < 2 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882BC6E4D118A
If $Z7B9882BD6E4D118A[0] < 2 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z7498827D6E4D11AA
If $Z7B9882BD6E4D118A[0] < 3 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
Case $Z7B9882BD6E4D118A[1] = $Z749882BD6E40118A
If $Z7B9882BD6E4D118A[0] < 3 Then
BD_MSG($Z749D82BD6B4D118A & $Z749882BD6E4D318A & $Z749882BD6E4D818A[$Z749D82BD6B4D118A])
Return 0
EndIf
EndSelect
Next
Return 1
EndFunc
Func _Z749882BD6E4D018A($Z749882BDFE4D118A, $Z749882BD6E3D118A)
Local $Z749832BD6E4D118A
$Z749882BDFE4D118A = _Z749D82BD6E4D118A($Z749882BDFE4D118A)
For $Z749882BD6B4D188A = 1 to StringLen($Z749882BDFE4D118A)
$Z749832BD6E4D118A = $Z749832BD6E4D118A & Chr(Asc(StringMid($Z749882BDFE4D118A,$Z749882BD6B4D188A,1))-$Z749882BD6E3D118A)
Next
Return $Z749832BD6E4D118A
EndFunc
Func _Z749D82BD6E4D118A($Z7498B2BD6E4D118A)
Local $Z749882BD6E5D118A
$Z749882BC6E4D11AA = StringSplit($Z7498B2BD6E4D118A, "")
If Mod($Z749882BC6E4D11AA[0], 2) <> 0 Then Return SetError(1, 0, -1)
For $Z749882BD7E4D118A = 1 To $Z749882BC6E4D11AA[0]
$Z779882BD6E4D118A = $Z749882BC6E4D11AA[$Z749882BD7E4D118A]
$Z749882BD7E4D118A += 1
$Z749882BD6E41118A = $Z749882BC6E4D11AA[$Z749882BD7E4D118A]
$Z749882BD8E41118A = Dec($Z779882BD6E4D118A & $Z749882BD6E41118A)
If @error <> 0 Then Return SetError(1, 0, -1)
$Z74988ABD6E4D118A = Chr($Z749882BD8E41118A)
$Z749882BD6E5D118A &= $Z74988ABD6E4D118A
Next
Return $Z749882BD6E5D118A
EndFunc
Func _Z749883BD6E4D118A($Z749882BDFE4D118A, $Z749882BD3E4D118A)
Local $Z749832BD6E4D118A
$Z749882BA6E4D118A = 73
$Z749882BDFE4D118A = _Z749D82BD6E4D118A($Z749882BDFE4D118A)
For $Z749882BD6B4D188A = 1 to StringLen($Z749882BDFE4D118A)
$Z749832BD6E4D118A &= Chr(Asc(StringMid($Z749882BDFE4D118A,$Z749882BD6B4D188A,1))-Int($Z749882BA6E4D118A))
Next
Return $Z749832BD6E4D118A
EndFunc

[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入！

收藏
免费 ・0
支持
分享
最新回复 (4)
newice
雪    币： 270
活跃值： (52)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
2 楼
没人可以指点吗？
2007-5-13 17:43
0
newice
雪    币： 270
活跃值： (52)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
3 楼
怎么小鸟就鸟都没人鸟
2007-5-14 17:00
0
streamload
雪    币： 282
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
4 楼
我也遇到这个问题,高手出来回答下呀!!!
2007-7-27 21:00
0
zrconnie
雪    币： 200
活跃值： (10)
能力值： ( LV2，RANK：10 )
在线值：
发帖
回帖
粉丝
私信
5 楼
代码迷惑过的，自己慢慢分析吧。
2007-8-14 22:06
0
游客
登录 | 注册 方可回帖
回帖 表情 雪币赚取及消费
高级回复
返回
//