大型机汇编（mainframe assembler/HLASM）之显示内存实际数据

 

 本篇重在介绍，怎么把内存的实际数据显示出来，首先看下汇编怎么实现的，接下来是用COBOL实现的

000000                00000 00100     1 MAIN     CSECT                   
                 R:C  00000           2          USING *,12              
000000 90EC D00C            0000C     3          STM   14,12,12(13)      
000004 0DC0                           4          BASR  12,0              
000006 50D0 C02C            0002C     5          ST    13,SAVE+4         
00000A 41D0 C028            00028     6          LA    13,SAVE           
                      0000E           7 START    EQU   *                 
00000E F384 C075 C070 00075 00070     8          UNPK  OUTPUT(9),INPUT(5)
000014 DC07 C075 C000 00075 00000     9          TR    OUTPUT,HEXTAB     
                      0001A          10 EXIT     EQU   *                 
00001A 58D0 C02C            0002C    11          L     13,SAVE+4         
00001E 98EC D00C            0000C    12          LM    14,12,12(13)      
000022 41F0 0000            00000    13          LA    15,0              
000026 07FE                          14          BR    14                
000028                               15 SAVE     DS    18F              
000070 A0B1C2D312                    16 INPUT    DC    X'A0B1C2D3',X'12'
000075 4040404040404040              17 OUTPUT   DC    CL8' ',C' '            
00007E                0007E 000F0    18          ORG   MAIN+C'0'         
0000F0                000F0 000F0    19          ORG   ,                 
                      00000          20 HEXTAB   EQU   *-C'0'            
0000F0 F0F1F2F3F4F5F6F7              21          DC    C'0123456789ABCDEF'
000000