MACRO 00001000
REGEQU 00002000
PUSH PRINT 00002200
AIF ('&SYSPARM' NE 'SUP').ACC01 00002400
PRINT OFF,NOGEN 00002600
.ACC01 ANOP 00002800
* 00003000
*** SYMBOLIC REGISTER EQUATES 00004000
* 00005000
SPACE 2 00006000
* GENERAL PURPOSE REGISTERS 00007000
SPACE 00008000
R0 EQU 0 00009000
R1 EQU 1 00010000
R2 EQU 2 00011000
R3 EQU 3 00012000
R4 EQU 4 00013000
R5 EQU 5 00014000
R6 EQU 6 00015000
R7 EQU 7 00016000
R8 EQU 8 00017000
R9 EQU 9 00018000
R10 EQU 10 00019000
R11 EQU 11 00020000
R12 EQU 12 00021000
R13 EQU 13 00022000
R14 EQU 14 00023000
R15 EQU 15 00024000
SPACE 00025000
* FLOATING POINT REGISTERS 00026000
SPACE 00027000
F0 EQU 0 00028000
F2 EQU 2 00029000
F4 EQU 4 00030000
F6 EQU 6 00031000
SPACE 00032000
* EXTENDED CONTROL REGISTERS 00033000
SPACE 00034000
C0 EQU 0 00035000
C1 EQU 1 00036000
C2 EQU 2 00037000
C3 EQU 3 00038000
C4 EQU 4 00039000
C5 EQU 5 00040000
C6 EQU 6 00041000
C7 EQU 7 00042000
C8 EQU 8 00043000
C9 EQU 9 00044000
C10 EQU 10 00045000
C11 EQU 11 00046000
C12 EQU 12 00047000
C13 EQU 13 00048000
C14 EQU 14 00049000
C15 EQU 15 00050000
EJECT 00051000
POP PRINT 00051100
MEND 00052000