1 C00   20:44 JUN 20,'83                                                                          PAGE    1
A   .SS BA,HA,WA,DA,LF,CF,AF,AFA,NAME,NUM,ABSVAL
    .SS R0,R1,R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,R12,R13,R14,R15
    .SS X1,X2,X3,X4,X5,X6,X7,SCOR,TCOR,%,%%
    .END
1 C00   20:44 JUN 20,'83    SIGMA 5 MEMORY SWITCH FOR WMATA 960-0080-1A                           PAGE    2
A       1                                     PCC
        2                                     SYSTEM   SIG7FDP

        4         TEXT               VERSION  EQU      C'1A'

        6                            *
        7                            *
        8                            *        PROGRAM TO TEST MWATA MEMORY SWITCH
        9                            *
       10                            *
       11   01 00040                          ORG      X'40'
            01 00040
       12   01 00040    0F000068              XPSD,0   TRAP40
       13   01 00041    0F000068              XPSD,0   TRAP40
       14   01 00042    0F000068              XPSD,0   TRAP40            CATCH ALL TRAPS AS ERRORS
       15   01 00043    0F000068              XPSD,0   TRAP40
       16   01 00044    0F000068              XPSD,0   TRAP40
       17   01 00045    0F000068              XPSD,0   TRAP40
       18   01 00046    0F00006C              XPSD,0   FINDT46           WATCH DOG TIMER
       19   01 00047    0F000068              XPSD,0   TRAP40
       20   01 00048    0F000068              XPSD,0   TRAP40
       21   01 00049    0F000068              XPSD,0   TRAP40
       22   01 0004A    0F000068              XPSD,0   TRAP40
       23   01 0004B    0F000068              XPSD,0   TRAP40
       24   01 0004C    0F000068              XPSD,0   TRAP40
       25   01 0004D    0F000068              XPSD,0   TRAP40
       26   01 0004E    0F000068              XPSD,0   TRAP40
       27   01 0004F    0F000068              XPSD,0   TRAP40
       28   01 00050    0F000060              XPSD,0   PWRON
       29   01 00051    0F000064              XPSD,0   PWROFF
       30   01 00052    33000000 A            MTW,0    0
       31   01 00053    33000000 A            MTW,0    0
       32   01 00054    33000000 A            MTW,0    0
       33   01 00055    33000000 A            MTW,0    0
       34   01 00056    0F000068              XPSD,0   TRAP40
       35   01 00057    0F000068              XPSD,0   TRAP40
       36   01 00058    0F000068              XPSD,0   TRAP40
       37   01 00059    0F000068              XPSD,0   TRAP40
       38   01 0005A    0F000068              XPSD,0   TRAP40
       39   01 0005B    0F000068              XPSD,0   TRAP40
       40   01 0005C    0F000068              XPSD,0   TRAP40
       41   01 0005D    0F000072              XPSD,0   OCINT
       42   01 0005E    0F000068              XPSD,0   TRAP40
       43   01 0005F    0F000068              XPSD,0   TRAP40
1 C00   20:44 JUN 20,'83    SIGMA 5 MEMORY SWITCH FOR WMATA 960-0080-1A                           PAGE    3
A      45   01 00060    00000000 A   PWRON    DATA     0,0,POWERON,X'00810000'
            01 00061    00000000 A
            01 00062    0000008C
            01 00063    00810000 A
       46   01 00064    00000000 A   PWROFF   DATA     0,0,WAIT,X'07810000'
            01 00065    00000000 A
            01 00066    0000008A
            01 00067    07810000 A
       47   01 00068    00000000 A   TRAP40   DATA     0,0,TRAPS,X'07000000'
            01 00069    00000000 A
            01 0006A    00000091
            01 0006B    07000000 A
       48   01 0006C    00000000 A   FINDT46  DATA     0,0,START1,X'00810000'
            01 0006D    00000000 A
            01 0006E    00000083
            01 0006F    00810000 A
       49   01 00070    0000007B     STARTPSD DATA     START0,X'00810000'
            01 00071    00810000 A
       50   01 00072    00000000 A   OCINT    DATA     0,0,%+2,X'00800000'
            01 00073    00000000 A
            01 00074    00000076
            01 00075    00800000 A
       51   01 00076    0E300072              LPSD,3   OCINT             REARM INT
       52   01 00077    68000078              B        START
       53   01 00078    32100077     START    LW,1     %-1
       54   01 00079    35100026 A            STW,1    X'26'
       55   01 0007A    0E000070              LPSD,0   STARTPSD
       56   01 0007B    22100000 A   START0   LI,1     0
       57   01 0007C    35100252              STW,1    UNITS
       58   01 0007D    35100253              STW,1    UNITS+1
       59   01 0007E    2200020E              LI,0     STARTM            SEND HELLO
       60   01 0007F    6A700232              BAL,7    PRINT
       61   01 00080    2210FFF0 A            LI,1     X'FFF0'           START BY FINDING SWITCH ON DIO BUS
       62   01 00081    EC200001 A            RD,2     *1
       63   01 00082    68000256              B        FOUNDIT           FOUND SWITCH CHECK CC'S
       64   01 00083    201FFFF0 A   START1   AI,1     -X'10'
       65   01 00084    2110FF00 A            CI,1     X'FF00'           DONE YET
       66   01 00085    68100079              BGE      START+1
       67   01 00086    220000AB              LI,0     NOTHERE
       68   01 00087    6A700232              BAL,7    PRINT
       69   01 00088    2E000001 A   HALT     WAIT     1
       70   01 00089    68000088              B        %-1
       71   01 0008A    2E00000F A   WAIT     WAIT     15
       72   01 0008B    6800008A              B        %-1
       73   01 0008C    2200FFFF A   POWERON  LI,0     X'FFFF'
       74   01 0008D    6400008D              BDR,0    %
       75   01 0008E    220000A0              LI,0     PWRMSG
       76   01 0008F    6A700232              BAL,7    PRINT
       77   01 00090    68000088              B        HALT
       78   01 00091    22000099     TRAPS    LI,0     UNEXP
       79   01 00092    6A700232              BAL,7    PRINT
       80   01 00093    32400068              LW,4     TRAP40
       81   01 00094    22400008 A            LI,4     8
       82   01 00095    6A700367              BAL,7    HEXPRT            PRINT PSW1
       83   01 00096    22000231              LI,0     CRLF
       84   01 00097    6A700232              BAL,7    PRINT
       85   01 00098    68000088              B        HALT
       86   01 00099    1915F0F0 A   UNEXP    TEXTC    '
0001 UNEXPECTED TRAP AT '
            01 0009A    F0F140E4 A
            01 0009B    D5C5E7D7 A
            01 0009C    C5C3E3C5 A
            01 0009D    C440E3D9 A
            01 0009E    C1D740C1 A
            01 0009F    E3404040 A
       87   01 000A0    2B15F0F0 A   PWRMSG   TEXTC    '
0002 POWER FAILURE, MUST RESTART PROGRAM

'
            01 000A1    F0F240D7 A
            01 000A2    D6E6C5D9 A
            01 000A3    40C6C1C9 A
            01 000A4    D3E4D9C5 A
            01 000A5    6B40D4E4 A
            01 000A6    E2E340D9 A
            01 000A7    C5E2E3C1 A
            01 000A8    D9E340D7 A
            01 000A9    D9D6C7D9 A
            01 000AA    C1D41515 A
       88                            NOTHERE  TEXTC    '
3F01 I CAN NOT FIND MEMORY CONFIGURATION SWITCH',;
       89   01 000AB    5415F3C6 A                     ' ON DIO ADDRESSES X''FF00''-X''FFF0''


'
            01 000AC    F0F140C9 A
            01 000AD    40C3C1D5 A
            01 000AE    40D5D6E3 A
            01 000AF    40C6C9D5 A
            01 000B0    C440D4C5 A
            01 000B1    D4D6D9E8 A
            01 000B2    40C3D6D5 A
            01 000B3    C6C9C7E4 A
            01 000B4    D9C1E3C9 A
            01 000B5    D6D540E2 A
            01 000B6    E6C9E3C3 A
            01 000B7    C840D6D5 A
            01 000B8    40C4C9D6 A
            01 000B9    40C1C4C4 A
            01 000BA    D9C5E2E2 A
            01 000BB    C5E240E7 A
            01 000BC    7DC6C6F0 A
            01 000BD    F07D60E7 A
            01 000BE    7DC6C6C6 A
            01 000BF    F07D1515 A
            01 000C0    15404040 A
       90                            DISBADM  TEXTC '
3F02 EITHER THE DIO ENABLE SWITCH DOES NOT WORK',;
       91                                              '
OR THE MEMORY CONFIGURATION SWITCH IS',;
       92   01 000C1    6715F3C6 A                     ' NOT AT DIO ADDR '
            01 000C2    F0F240C5 A
            01 000C3    C9E3C8C5 A
            01 000C4    D940E3C8 A
            01 000C5    C540C4C9 A
            01 000C6    D640C5D5 A
            01 000C7    C1C2D3C5 A
            01 000C8    40E2E6C9 A
            01 000C9    E3C3C840 A
            01 000CA    C4D6C5E2 A
            01 000CB    40D5D6E3 A
            01 000CC    40E6D6D9 A
            01 000CD    D215D6D9 A
            01 000CE    40E3C8C5 A
            01 000CF    40D4C5D4 A
            01 000D0    D6D9E840 A
            01 000D1    C3D6D5C6 A
            01 000D2    C9C7E4D9 A
            01 000D3    C1E3C9D6 A
            01 000D4    D540E2E6 A
            01 000D5    C9E3C3C8 A
            01 000D6    40C9E240 A
            01 000D7    D5D6E340 A
            01 000D8    C1E340C4 A
            01 000D9    C9D640C1 A
            01 000DA    C4C4D940 A
       93   01 000DB    3115F3C6 A   CONFM    TEXTC     '
3F03 THE CONFIGURATION SWITCH IS NOT AT X''3F''


'
            01 000DC    F0F340E3 A
            01 000DD    C8C540C3 A
            01 000DE    D6D5C6C9 A
            01 000DF    C7E4D9C1 A
            01 000E0    E3C9D6D5 A
            01 000E1    40E2E6C9 A
            01 000E2    E3C3C840 A
            01 000E3    C9E240D5 A
            01 000E4    D6E340C1 A
            01 000E5    E340E77D A
            01 000E6    F3C67D15 A
            01 000E7    15154040 A
       94                            ASKDIS   TEXTC    '
PLEASE FLIP THE DIO ENABLE SWITCH DOWN',;
       95   01 000E8    4C15D7D3 A                     '
AND THEN HIT THE INTERRUPT BUTTON


'
            01 000E9    C5C1E2C5 A
            01 000EA    40C6D3C9 A
            01 000EB    D740E3C8 A
            01 000EC    C540C4C9 A
            01 000ED    D640C5D5 A
            01 000EE    C1C2D3C5 A
            01 000EF    40E2E6C9 A
            01 000F0    E3C3C840 A
            01 000F1    C4D6E6D5 A
            01 000F2    15C1D5C4 A
            01 000F3    40E3C8C5 A
            01 000F4    D540C8C9 A
            01 000F5    E340E3C8 A
            01 000F6    C540C9D5 A
            01 000F7    E3C5D9D9 A
            01 000F8    E4D7E340 A
            01 000F9    C2E4E3E3 A
            01 000FA    D6D51515 A
            01 000FB    15404040 A
       96                            ASKDIO   TEXTC    '
PLEASE FLIP THE DIO ENABLE SWITCH BACK UP AND',;
       97                                              '
SWITCH THE DIO TO TEST MODE BY LOWERI',;
       98                                              'NG THE DIO
 SWITCH ON SLOT 6, THEN HIT INTERRUPT B',;
       99   01 000FC    9F15D7D3 A                     'UTTON TO CONTINUE TEST


'
            01 000FD    C5C1E2C5 A
            01 000FE    40C6D3C9 A
            01 000FF    D740E3C8 A
            01 00100    C540C4C9 A
            01 00101    D640C5D5 A
            01 00102    C1C2D3C5 A
            01 00103    40E2E6C9 A
            01 00104    E3C3C840 A
            01 00105    C2C1C3D2 A
            01 00106    40E4D740 A
            01 00107    C1D5C415 A
            01 00108    E2E6C9E3 A
            01 00109    C3C840E3 A
            01 0010A    C8C540C4 A
            01 0010B    C9D640E3 A
            01 0010C    D640E3C5 A
            01 0010D    E2E340D4 A
            01 0010E    D6C4C540 A
            01 0010F    C2E840D3 A
            01 00110    D6E6C5D9 A
            01 00111    C9D5C740 A
            01 00112    E3C8C540 A
            01 00113    C4C9D615 A
            01 00114    40E2E6C9 A
            01 00115    E3C3C840 A
            01 00116    D6D540E2 A
            01 00117    D3D6E340 A
            01 00118    F66B40E3 A
            01 00119    C8C5D540 A
            01 0011A    C8C9E340 A
            01 0011B    C9D5E3C5 A
            01 0011C    D9D9E4D7 A
            01 0011D    E340C2E4 A
            01 0011E    E3E3D6D5 A
            01 0011F    40E3D640 A
            01 00120    C3D6D5E3 A
            01 00121    C9D5E4C5 A
            01 00122    40E3C5E2 A
            01 00123    E3151515 A
      100                            DIORTN   TEXTC    '
DIO DATA TEST COMPLETE, PLEASE RETURN SWITCH TO',;
      101   01 00124    5615C4C9 A                     ' ONLINE POSITION
HIT INTERRUPT AGAIN

'
            01 00125    D640C4C1 A
            01 00126    E3C140E3 A
            01 00127    C5E2E340 A
            01 00128    C3D6D4D7 A
            01 00129    D3C5E3C5 A
            01 0012A    6B40D7D3 A
            01 0012B    C5C1E2C5 A
            01 0012C    40D9C5E3 A
            01 0012D    E4D9D540 A
            01 0012E    E2E6C9E3 A
            01 0012F    C3C840E3 A
            01 00130    D640D6D5 A
            01 00131    D3C9D5C5 A
            01 00132    40D7D6E2 A
            01 00133    C9E3C9D6 A
            01 00134    D515C8C9 A
            01 00135    E340C9D5 A
            01 00136    E3C5D9D9 A
            01 00137    E4D7E340 A
            01 00138    C1C7C1C9 A
            01 00139    D5151540 A
      102   01 0013A    2C15E3C5 A   DONEMSG  TEXTC    '
TESTING IS COMPLETED, NO ERRORS DETECTED


'
            01 0013B    E2E3C9D5 A
            01 0013C    C740C9E2 A
            01 0013D    40C3D6D4 A
            01 0013E    D7D3C5E3 A
            01 0013F    C5C46B40 A
            01 00140    D5D640C5 A
            01 00141    D9D9D6D9 A
            01 00142    E240C4C5 A
            01 00143    E3C5C3E3 A
            01 00144    C5C41515 A
            01 00145    15404040 A
      103                            ASKSET   TEXTC    '
PLEASE FLIP THE SELECT SWITCH TO ADDRESS',;
      104                                              ' SELECT AND
THE DISPLAY SELECT TO ADDRESS',;
      105                                              ' DISPLAY THEN
ENTER THE FOLLOWING STARTIN',;
      106                                              'G ADDRESSES FOR EACH UNIT:
 8 - E
 7 - C
',;
      107                                              ' 6 - A
 5 - 8
 4 - 6
 3 - 4
 2 - 2

THEN ',;
      108   01 00146    EE15D7D3 A                     'HIT INTERRUPT TO CONTINUE TEST


'
            01 00147    C5C1E2C5 A
            01 00148    40C6D3C9 A
            01 00149    D740E3C8 A
            01 0014A    C540E2C5 A
            01 0014B    D3C5C3E3 A
            01 0014C    40E2E6C9 A
            01 0014D    E3C3C840 A
            01 0014E    E3D640C1 A
            01 0014F    C4C4D9C5 A
            01 00150    E2E240E2 A
            01 00151    C5D3C5C3 A
            01 00152    E340C1D5 A
            01 00153    C415E3C8 A
            01 00154    C540C4C9 A
            01 00155    E2D7D3C1 A
            01 00156    E840E2C5 A
            01 00157    D3C5C3E3 A
            01 00158    40E3D640 A
            01 00159    C1C4C4D9 A
            01 0015A    C5E2E240 A
            01 0015B    C4C9E2D7 A
            01 0015C    D3C1E840 A
            01 0015D    E3C8C5D5 A
            01 0015E    15C5D5E3 A
            01 0015F    C5D940E3 A
            01 00160    C8C540C6 A
            01 00161    D6D3D3D6 A
            01 00162    E6C9D5C7 A
            01 00163    40E2E3C1 A
            01 00164    D9E3C9D5 A
            01 00165    C740C1C4 A
            01 00166    C4D9C5E2 A
            01 00167    E2C5E240 A
            01 00168    C6D6D940 A
            01 00169    C5C1C3C8 A
            01 0016A    40E4D5C9 A
            01 0016B    E37A1540 A
            01 0016C    F8406040 A
            01 0016D    C51540F7 A
            01 0016E    406040C3 A
            01 0016F    1540F640 A
            01 00170    6040C115 A
            01 00171    40F54060 A
            01 00172    40F81540 A
            01 00173    F4406040 A
            01 00174    F61540F3 A
            01 00175    406040F4 A
            01 00176    1540F240 A
            01 00177    6040F215 A
            01 00178    15E3C8C5 A
            01 00179    D540C8C9 A
            01 0017A    E340C9D5 A
            01 0017B    E3C5D9D9 A
            01 0017C    E4D7E340 A
            01 0017D    E3D640C3 A
            01 0017E    D6D5E3C9 A
            01 0017F    D5E4C540 A
            01 00180    E3C5E2E3 A
            01 00181    15151540 A
      109                            ASKSET1  TEXTC    'NOW ENTER THE LAST STARTING ADDR FOR UNIT 1 - 2',;
      110   01 00182    4BD5D6E6 A                     '
THEN HIT INTERRUPT AGAIN


'
            01 00183    40C5D5E3 A
            01 00184    C5D940E3 A
            01 00185    C8C540D3 A
            01 00186    C1E2E340 A
            01 00187    E2E3C1D9 A
            01 00188    E3C9D5C7 A
            01 00189    40C1C4C4 A
            01 0018A    D940C6D6 A
            01 0018B    D940E4D5 A
            01 0018C    C9E340F1 A
            01 0018D    406040F2 A
            01 0018E    15E3C8C5 A
            01 0018F    D540C8C9 A
            01 00190    E340C9D5 A
            01 00191    E3C5D9D9 A
            01 00192    E4D7E340 A
            01 00193    C1C7C1C9 A
            01 00194    D5151515 A
      111   01 00195    2615F3C6 A   DIOERRM  TEXTC    '
3F04 ERROR IN DIO DATA PATH, DATA IS '
            01 00196    F0F440C5 A
            01 00197    D9D9D6D9 A
            01 00198    40C9D540 A
            01 00199    C4C9D640 A
            01 0019A    C4C1E3C1 A
            01 0019B    40D7C1E3 A
            01 0019C    C86B40C4 A
            01 0019D    C1E3C140 A
            01 0019E    C9E24040 A
      112   01 0019F    2915F3E7 A   STARTAD  TEXTC    '
3X05 STARTING ADDRESS ERROR FOR UNIT NO '
            01 001A0    F0F540E2 A
            01 001A1    E3C1D9E3 A
            01 001A2    C9D5C740 A
            01 001A3    C1C4C4D9 A
            01 001A4    C5E2E240 A
            01 001A5    C5D9D9D6 A
            01 001A6    D940C6D6 A
            01 001A7    D940E4D5 A
            01 001A8    C9E340D5 A
            01 001A9    D6404040 A
      113                            MIS2     TEXTC    '
3F06 UNIT NUMBER 2 DOES NOT EXIST, CAN NOT',;
      114   01 001AA    3915F3C6 A                     ' CONTINUE!!


'
            01 001AB    F0F640E4 A
            01 001AC    D5C9E340 A
            01 001AD    D5E4D4C2 A
            01 001AE    C5D940F2 A
            01 001AF    40C4D6C5 A
            01 001B0    E240D5D6 A
            01 001B1    E340C5E7 A
            01 001B2    C9E2E36B A
            01 001B3    40C3C1D5 A
            01 001B4    40D5D6E3 A
            01 001B5    40C3D6D5 A
            01 001B6    E3C9D5E4 A
            01 001B7    C55A5A15 A
            01 001B8    15154040 A
      115   01 001B9    2715F3F0 A   PORTM    TEXTC    '
3001 ALL PORTS NOT ENABLED ON UNIT NO '
            01 001BA    F0F140C1 A
            01 001BB    D3D340D7 A
            01 001BC    D6D9E3E2 A
            01 001BD    40D5D6E3 A
            01 001BE    40C5D5C1 A
            01 001BF    C2D3C5C4 A
            01 001C0    40D6D540 A
            01 001C1    E4D5C9E3 A
            01 001C2    40D5D640 A
      116                            PORTD    TEXTC    '
3002 MORE THAN ONE PORT DISABLED AT ONCE',;
      117   01 001C3    3515F3F0 A                     ' ON UNIT NO '
            01 001C4    F0F240D4 A
            01 001C5    D6D9C540 A
            01 001C6    E3C8C1D5 A
            01 001C7    40D6D5C5 A
            01 001C8    40D7D6D9 A
            01 001C9    E340C4C9 A
            01 001CA    E2C1C2D3 A
            01 001CB    C5C440C1 A
            01 001CC    E340D6D5 A
            01 001CD    C3C540D6 A
            01 001CE    D540E4D5 A
            01 001CF    C9E340D5 A
            01 001D0    D6404040 A
      118                            NOTDISM  TEXTC    '
3003 CPU PORT NOT REALLY DISABLED BY WD',;
      119   01 001D1    3415F3F0 A                     ' ON UNIT NO '
            01 001D2    F0F340C3 A
            01 001D3    D7E440D7 A
            01 001D4    D6D9E340 A
            01 001D5    D5D6E340 A
            01 001D6    D9C5C1D3 A
            01 001D7    D3E840C4 A
            01 001D8    C9E2C1C2 A
            01 001D9    D3C5C440 A
            01 001DA    C2E840E6 A
            01 001DB    C440D6D5 A
            01 001DC    40E4D5C9 A
            01 001DD    E340D5D6 A
            01 001DE    40404040 A
      120                            PROGM    TEXTC    '
3201 CONDITION CODES ARE WRONG FOR EXPECTED',;
      121   01 001DF    4715F3F2 A                     ' PROGRAMMING ERROR
ON UNIT '
            01 001E0    F0F140C3 A
            01 001E1    D6D5C4C9 A
            01 001E2    E3C9D6D5 A
            01 001E3    40C3D6C4 A
            01 001E4    C5E240C1 A
            01 001E5    D9C540E6 A
            01 001E6    D9D6D5C7 A
            01 001E7    40C6D6D9 A
            01 001E8    40C5E7D7 A
            01 001E9    C5C3E3C5 A
            01 001EA    C440D7D9 A
            01 001EB    D6C7D9C1 A
            01 001EC    D4D4C9D5 A
            01 001ED    C740C5D9 A
            01 001EE    D9D6D915 A
            01 001EF    D6D540E4 A
            01 001F0    D5C9E340 A
      122                            PROGANY  TEXTC    '
3202 SOME PORT PROGRAMMED EVEN THOU IT WAS',;
      123   01 001F1    3D15F3F2 A                     ' DISABLED
ON UNIT '
            01 001F2    F0F240E2 A
            01 001F3    D6D4C540 A
            01 001F4    D7D6D9E3 A
            01 001F5    40D7D9D6 A
            01 001F6    C7D9C1D4 A
            01 001F7    D4C5C440 A
            01 001F8    C5E5C5D5 A
            01 001F9    40E3C8D6 A
            01 001FA    E440C9E3 A
            01 001FB    40E6C1E2 A
            01 001FC    40C4C9E2 A
            01 001FD    C1C2D3C5 A
            01 001FE    C415D6D5 A
            01 001FF    40E4D5C9 A
            01 00200    E3404040 A
      124   01 00201    3015F3F5 A   NOPEM    TEXTC    '
3501 NO PARITY ERROR DETECTED IN PROM FOR UNIT '
            01 00202    F0F140D5 A
            01 00203    D640D7C1 A
            01 00204    D9C9E3E8 A
            01 00205    40C5D9D9 A
            01 00206    D6D940C4 A
            01 00207    C5E3C5C3 A
            01 00208    E3C5C440 A
            01 00209    C9D540D7 A
            01 0020A    D9D6D440 A
            01 0020B    C6D6D940 A
            01 0020C    E4D5C9E3 A
            01 0020D    40404040 A
      125                            STARTM   TEXTC    '
THE WASHINGTON METROPOLITAN AREA TRANSIT',;
      126                                              ' AUTHORITY
MEMORY RECONFIGURATION SWITCH ',;
      127   01 0020E    6815E3C8 A                     'DIAGNOSTIC VERSION 1A
'
            01 0020F    C540E6C1 A
            01 00210    E2C8C9D5 A
            01 00211    C7E3D6D5 A
            01 00212    40D4C5E3 A
            01 00213    D9D6D7D6 A
            01 00214    D3C9E3C1 A
            01 00215    D540C1D9 A
            01 00216    C5C140E3 A
            01 00217    D9C1D5E2 A
            01 00218    C9E340C1 A
            01 00219    E4E3C8D6 A
            01 0021A    D9C9E3E8 A
            01 0021B    15D4C5D4 A
            01 0021C    D6D9E840 A
            01 0021D    D9C5C3D6 A
            01 0021E    D5C6C9C7 A
            01 0021F    E4D9C1E3 A
            01 00220    C9D6D540 A
            01 00221    E2E6C9E3 A
            01 00222    C3C840C4 A
            01 00223    C9C1C7D5 A
            01 00224    D6E2E3C9 A
            01 00225    C340E5C5 A
            01 00226    D9E2C9D6 A
            01 00227    D540F1C1 A
            01 00228    15404040 A
      128   01 00229    0440C9E2 A   IS       TEXTC    ' IS '
            01 0022A    40404040 A
      129   01 0022B    0B40E2C8 A   SHOULDB  TEXTC    ' SHOULD BE '
            01 0022C    D6E4D3C4 A
            01 0022D    40C2C540 A
      130   01 0022E    08404040 A   HEXM     TEXTC    '        '
            01 0022F    40404040 A
            01 00230    40404040 A
      131   01 00231    03151515 A   CRLF     TEXTC    '


'
      132   01 00232    F2100000 A   PRINT    LB,1     *0
      133   01 00233    22200001 A            LI,2     1
      134   01 00234    55140247              STH,1    PCNT,2            STORE MESSAGE SIZE
      135   01 00235    25000002 A            SLS,0    2
      136   01 00236    20000001 A            AI,0     1                 GET MESSAGE ADDR
      137   01 00237    2217FFFF A            LI,1     X'7FFFF'
      138   01 00238    47000246              STS,0    PMSG              STORE BA
      139   01 00239    22000123              LI,0     DA(PMSG)
      140   01 0023A    CDB00242              TIO,11   *TYPE             CHECK IF TTY READY
      141   01 0023B    7020000B A            LC       11
      142   01 0023C    696E0000 A            BCS,6    0,7
      143   01 0023D    681E0000 A            BCR,1    0,7               IF AUTOMATIC PRINT
      144   01 0023E    CCB00242     PRINTIT  SIO,11   *TYPE             START IT
      145   01 0023F    CDB00242              TIO,11   *TYPE
      146   01 00240    69C0023F              BCS,12   %-1               WAIT FOR IT
      147   01 00241    680E0000 A            B        0,7               EXIT
      148   01 00242    00000001 A   TYPE     DATA     1                 OC ADDR
      149   01 00243    00000000 A   MEMSW    DATA     0                 DIO ADDR OF MEM SW
      150   01 00244    00000007 A   X7       DATA     7
      151                                     BOUND    8
      152   01 00246    05000000 A   PMSG     GEN,8,24 5,0
      153   01 00247    02000000 A   PCNT     GEN,8,24 2,0
      154   01 00248    00000000 A   MEMTRAP  DATA     0,0,MNEXT,X'00810000'
            01 00249    00000000 A
            01 0024A    00000282
            01 0024B    00810000 A
      155   01 0024C    00000000 A   DISCELL  DATA     0,0,PLOOP3,X'00810000'
            01 0024D    00000000 A
            01 0024E    000002A3
            01 0024F    00810000 A
      156   01 00250    00070010 A   MEMLIMIT DATA     X'70010'          512K
      157   01 00251    0F000248     MEMXPSD  XPSD,0   MEMTRAP
      158   01 00252    00000000 A   UNITS    DATA     0,0
            01 00253    00000000 A
      159   01 00254    0F00024C     DISXPSD  XPSD,0   DISCELL
      160   01 00255    000000FF A   XFF      DATA     X'FF'
1 C00   20:44 JUN 20,'83    SIGMA 5 MEMORY SWITCH FOR WMATA 960-0080-1A                           PAGE    4
A     162   01 00256    35100243     FOUNDIT  STW,1    MEMSW             SAVE DIO ADDRESS
      163   01 00257    32700041 A            LW,7     X'41'
      164   01 00258    35700046 A            STW,7    X'46'             SET UP WATCH DOG TRAP
      165   01 00259    22700010 A            LI,7     X'10'             ARM OCINT
      166   01 0025A    6D701200 A            WD,7     X'1200'
      167   01 0025B    220000E8              LI,0     ASKDIS            DISABLE TO SEE IF IT IS
      168   01 0025C    6A700232              BAL,7    PRINT              REALLY THE SWITCH
      169   01 0025D    2E000000 A            WAIT     0
      170   01 0025E    EC800243              RD,8     *MEMSW            GET CC
      171   01 0025F    6930034B              BCS,3    DISBAD            THE DISABLE SWITCH DID NOT WORK
      172   01 00260    220000FC              LI,0     ASKDIO            HAVE OP SWITCH DIO OFFLINE
      173   01 00261    6A700232              BAL,7    PRINT
      174   01 00262    2E000000 A            WAIT     0                 WAIT FOR OCINT
      175   01 00263    2280FFFF A            LI,8     X'FFFF'           START PATTERN
      176   01 00264    ED800243     TESTL1   WD,8     *MEMSW            SEND ALL ONES
      177   01 00265    EC900243              RD,9     *MEMSW            READ THEM BACK
      178   01 00266    31800009 A            CW,8     9                 DO WE COMPARE
      179   01 00267    69300356              BNE      DIOPATH           NO, DIO PATH ERROR
      180   01 00268    64800264              BDR,8    TESTL1
      181   01 00269    20800000 A            AI,8     0
      182   01 0026A    68300264              BEZ      TESTL1            AND ZERO
      183   01 0026B    22000124              LI,0     DIORTN            RETURN DIO ONLINE
      184   01 0026C    6A700232              BAL,7    PRINT
      185   01 0026D    2E000000 A            WAIT     0                 WAIT FOR INTERRUPT
      186   01 0026E    EC100243              RD,1     *MEMSW            GET CONFIGUATION
      187   01 0026F    2110003F A            CI,1     X'3F'             ARE WE ON THE CORRECT CONFIG
      188   01 00270    69300353              BNE      CONFIGER          NO, ERROR
      189   01 00271    22B00007 A            LI,11    7
      190   01 00272    22300008 A            LI,3     8
      191   01 00273    ECA60243     ALOOP    RD,10    *MEMSW,3          READ STARTING ADDRESS OF EACH UNIT
      192   01 00274    25A00076 A            SLS,10   -10               GET STARTING ADDR
      193   01 00275    20A00001 A            AI,10    1                 MAKE IN UNIT NO
      194   01 00276    45A00003 A            CS,10    3                 IS IT CORRECT
      195   01 00277    69300314              BNE      ADDRERR           NO, STARTING ADDR IN ERROR
      196   01 00278    64300273              BDR,3    ALOOP             CONTINUE
      197                            *
      198                            *        SET X'30'
      199                            *
      200   01 00279    22800030 A            LI,8     X'30'             SET CONFIG 30
      201   01 0027A    ED800243              WD,8     *MEMSW
      202   01 0027B    32000251              LW,0     MEMXPSD           SETUP TO CONFIGURE MEMORY
      203   01 0027C    35000040 A            STW,0    X'40'
      204   01 0027D    32100250              LW,1     MEMLIMIT          START WITH 512K
      205   01 0027E    33020000 A   MLOOP    MTW,0    0,1
      206   01 0027F    32200001 A            LW,2     1
      207   01 00280    25200070 A            SLS,2    -16
      208   01 00281    73140252              MTB,1    UNITS,2
      209   01 00282    201F0000 A   MNEXT    AI,1     -X'10000'         FIND NEXT UNIT
      210   01 00283    6920027E              BG       MLOOP             TEST ALL UNITS
      211   01 00284    22100001 A            LI,1     1
      212   01 00285    73020252              MTB,0    UNITS,1           IS MEMORY UNIT 2 THERE
      213   01 00286    6830032A              BEZ      MISUNIT2          CAN NOT CONTINUE WITH OUT UNIT 2
      214   01 00287    2210034D              LI,1     #PGMSIZE
      215   01 00288    32020022 A            LW,0     X'22',1           COPY PROGRAM TO UNIT 2
      216   01 00289    35030022 A            STW,0    X'10022',1
      217   01 0028A    64100288              BDR,1    %-2
      218   01 0028B    22300008 A            LI,3     8
      219   01 0028C    32800254              LW,8     DISXPSD
      220   01 0028D    35800040 A            STW,8    X'40'
      221   01 0028E    EC860243     PLOOP1   RD,8     *MEMSW,3          GET PORT PROG
      222   01 0028F    4B800255              AND,8    XFF
      223   01 00290    218000FF A            CI,8     X'FF'             ARE THEY ALL ON
      224   01 00291    6930033B              BNE      PORTERR           NO, ERROR
      225   01 00292    22A08000 A            LI,10    X'8000'           LET DISABLE THEM ONE BY ONE
      226   01 00293    22900008 A            LI,9     8
      227   01 00294    22B0007F A            LI,11    X'7F'             EXPECTED
      228   01 00295    EDA60243     PLOOP2   WD,10    *MEMSW,3          SET IT
      229   01 00296    ECC60243              RD,12    *MEMSW,3          CHECK EM
      230   01 00297    4BC00255              AND,12   XFF               ONLY PORTS
      231   01 00298    31C0000B A            CW,12    11                ARE THEY CORRECT
      232   01 00299    69300343              BNE      BITERR            NO, ERROR
      233   01 0029A    25A0017F A            SLD,10   -1
      234   01 0029B    64900295              BDR,9    PLOOP2            LOOP
      235   01 0029C    32100003 A            LW,1     3
      236   01 0029D    201FFFFF A            AI,1     -1
      237   01 0029E    73020252              MTB,0    UNITS,1           DOES THIS UNIT EXIST
      238   01 0029F    683002A3              BE       PLOOP3            NO, SKIP
      239   01 002A0    25100010 A            SLS,1    16                MAKE UNIT TO ADDR
      240   01 002A1    33020010 A            MTW,0    16,1              SEE IF CPU PORT IS GONE
      241   01 002A2    6800032D              B        NOTDIS            NO ERROR
      242   01 002A3    203FFFFF A   PLOOP3   AI,3     -1
      243   01 002A4    21300001 A            CI,3     1
      244   01 002A5    6920028E              BG       PLOOP1            TEST ALL BUT UNIT 1
      245                            *
      246                            *        X'32'
      247                            *
      248   01 002A6    22800032 A            LI,8     X'32'             SET TO CONF 32
      249   01 002A7    ED800243              WD,8     *MEMSW
      250   01 002A8    22300008 A            LI,3     8
      251   01 002A9    2290FFFF A            LI,9     X'FFFF'
      252   01 002AA    ED960243     DLOOP1   WD,9     *MEMSW,3          TEST IF PROG ERROR
      253   01 002AB    68100337              BCR,1    PROGERR           DID NOT GIVE CC ERROR
      254   01 002AC    ECA60243              RD,10    *MEMSW,3          SEE IF ANYTHING CHANGED
      255   01 002AD    4BA00255              AND,10   XFF
      256   01 002AE    69300339              BNE      PGMANY            SOME PORT ON ANYWAY
      257   01 002AF    203FFFFF A            AI,3     -1
      258   01 002B0    21300001 A            CI,3     1
      259   01 002B1    692002AA              BG       DLOOP1
      260                            *
      261                            *        X'31'
      262                            *
      263   01 002B2    22800031 A            LI,8     X'31'             SET FOR CONF 31
      264   01 002B3    ED800243              WD,8     *MEMSW
      265   01 002B4    ED960243              WD,9     *MEMSW,3          TEST UNIT 1
      266   01 002B5    68100337              BCR,1    PROGERR
      267   01 002B6    ECA60243              RD,10    *MEMSW,3          SEE PORTS
      268   01 002B7    4BA00255              AND,10   XFF
      269   01 002B8    69300339              BNE      PGMANY            ERROR
      270                            *
      271                            *        X'34'
      272                            *
      273   01 002B9    22800034 A            LI,8     X'34'             SET FOR CONF 34
      274   01 002BA    ED800243              WD,8     *MEMSW
      275   01 002BB    22000146              LI,0     ASKSET
      276   01 002BC    6A700232              BAL,7    PRINT             ASK OP TO SET STARTING ADDRS
      277   01 002BD    2E000000 A            WAIT     0
      278   01 002BE    22300008 A            LI,3     8
      279   01 002BF    ECA60243     SALOOP   RD,10    *MEMSW,3          GET STARTING ADDR
      280   01 002C0    25A00076 A            SLS,10   -10
      281   01 002C1    4BA00244              AND,10   X7
      282   01 002C2    20A00001 A            AI,10    1
      283   01 002C3    31A00003 A            CW,10    3                 DID IT SET
      284   01 002C4    69300314              BNE      ADDRERR           NO
      285   01 002C5    203FFFFF A            AI,3     -1
      286   01 002C6    21300001 A            CI,3     1
      287   01 002C7    692002BF              BG       SALOOP
      288                            *
      289                            *        X'33'
      290                            *
      291   01 002C8    22800033 A            LI,8     X'33'
      292   01 002C9    ED800243              WD,8     *MEMSW            SET CONF 33
      293   01 002CA    22000182              LI,0     ASKSET1
      294   01 002CB    6A700232              BAL,7    PRINT
      295   01 002CC    2E000000 A            WAIT     0
      296   01 002CD    22300001 A            LI,3     1
      297   01 002CE    ECA60243              RD,10    *MEMSW,3          GET START ADDR OF UNIT 1
      298   01 002CF    25A00076 A            SLS,10   -10
      299   01 002D0    4BA00244              AND,10   X7
      300   01 002D1    21A00001 A            CI,10    1
      301   01 002D2    69300314              BNE      ADDRERR           DID NOT SET
      302                            *
      303                            *        X'35'
      304                            *
      305   01 002D3    22800035 A            LI,8     X'35'
      306   01 002D4    ED800243              WD,8     *MEMSW            SET FOR CONF 35
      307   01 002D5    22300008 A            LI,3     8
      308   01 002D6    ECA60243     PELOOP   RD,10    *MEMSW,3          SEE IF PE SET
      309   01 002D7    68100335              BCR,1    NOPE              ERROR IF NOT
      310   01 002D8    203FFFFF A            AI,3     -1
      311   01 002D9    21300001 A            CI,3     1
      312   01 002DA    692002D6              BG       PELOOP
      313                            *
      314                            *        X'3E' - X'39'
      315                            *
      316   01 002DB    22B00007 A            LI,11    7
      317   01 002DC    2280003E A            LI,8     X'3E'
      318   01 002DD    22D00011 A            LI,13    X'11'
      319   01 002DE    ED800243     ADLOP1   WD,8     *MEMSW            SETUP ADDR PAT TEST
      320   01 002DF    22300008 A            LI,3     8
      321   01 002E0    32C0000D A            LW,12    13
      322   01 002E1    ECA60243     ADLOP2   RD,10    *MEMSW,3
      323   01 002E2    25A00076 A            SLS,10   -10
      324   01 002E3    45A0000C A            CS,10    12                DID WE GET THE RIGHT ADDR
      325   01 002E4    69300314              BNE      ADDRERR           NO
      326   01 002E5    20CFFFFF A            AI,12    -1
      327   01 002E6    21C00010 A            CI,12    X'10'
      328   01 002E7    693002E9              BNE      %+2
      329   01 002E8    20CFFFF7 A            AI,12    -9
      330   01 002E9    203FFFFF A            AI,3     -1
      331   01 002EA    21300001 A            CI,3     1
      332   01 002EB    692002E1              BG       ADLOP2
      333   01 002EC    20D00001 A            AI,13    1
      334   01 002ED    208FFFFF A            AI,8     -1
      335   01 002EE    21800038 A            CI,8     X'38'
      336   01 002EF    692002DE              BG       ADLOP1
      337                            *
      338                            *        X'38'
      339                            *
      340   01 002F0    ED800243              WD,8     *MEMSW            SET FOR CONF 38
      341   01 002F1    ECA60243              RD,10    *MEMSW,3          GET UNIT 1
      342   01 002F2    25A00076 A            SLS,10   -10
      343   01 002F3    4BA00244              AND,10   X7
      344   01 002F4    21A00001 A            CI,10    1
      345   01 002F5    69300314              BNE      ADDRERR
      346                            *
      347                            *        X'37'
      348                            *
      349   01 002F6    208FFFFF A            AI,8     -1                SET FOR 37
      350   01 002F7    ED800243              WD,8     *MEMSW
      351   01 002F8    ECA60243              RD,10    *MEMSW,3
      352   01 002F9    25A00076 A            SLS,10   -10
      353   01 002FA    4BA00244              AND,10   X7
      354   01 002FB    21A00002 A            CI,10    2
      355   01 002FC    69300314              BNE      ADDRERR
      356                            *
      357                            *        X'36'
      358                            *
      359   01 002FD    208FFFFF A            AI,8     -1
      360   01 002FE    ED800243              WD,8     *MEMSW            SET FOR 36
      361   01 002FF    ECA60243              RD,10    *MEMSW,3
      362   01 00300    25A00076 A            SLS,10   -10
      363   01 00301    4BA00244              AND,10   X7
      364   01 00302    21A00004 A            CI,10    4
      365   01 00303    69300314              BNE      ADDRERR
      366   01 00304    2280003F A            LI,8     X'3F'
      367   01 00305    ED800243              WD,8     *MEMSW            RESET TO 3F
      368   01 00306    2200013A              LI,0     DONEMSG
      369   01 00307    6A700232              BAL,7    PRINT
      370   01 00308    02200080 A            LCI      8
      371   01 00309    2A20030C              LM,2     LOOPINST
      372   01 0030A    32000243              LW,0     MEMSW
      373   01 0030B    68000008 A            B        8
      374   01 0030C    ED100000 A   LOOPINST WD,1     *0
      375   01 0030D    22F04000 A            LI,15    X'4000'
      376   01 0030E    64F00004 A            BDR,15   4
      377   01 0030F    20100001 A            AI,1     1
      378   01 00310    21100040 A            CI,1     X'40'
      379   01 00311    69100002 A            BL       2
      380   01 00312    22100000 A            LI,1     0
      381   01 00313    68000002 A            B        2
      382   01 00314    2200019F     ADDRERR  LI,0     STARTAD
      383   01 00315    6A700232              BAL,7    PRINT
      384   01 00316    32400003 A            LW,4     3
      385   01 00317    22100001 A            LI,1     1
      386   01 00318    6A700367              BAL,7    HEXPRT            PRINT UNIT NUMBER
      387   01 00319    22000229              LI,0     IS
      388   01 0031A    6A700232              BAL,7    PRINT
      389   01 0031B    3240000A A            LW,4     10
      390   01 0031C    204FFFFF A            AI,4     -1
      391   01 0031D    25400001 A            SLS,4    1
      392   01 0031E    22100001 A            LI,1     1
      393   01 0031F    6A700367              BAL,7    HEXPRT
      394   01 00320    2200022B              LI,0     SHOULDB
      395   01 00321    6A700232              BAL,7    PRINT
      396   01 00322    203FFFFF A            AI,3     -1
      397   01 00323    25300001 A            SLS,3    1
      398   01 00324    32400003 A            LW,4     3
      399   01 00325    22100001 A            LI,1     1
      400   01 00326    6A700367              BAL,7    HEXPRT
      401   01 00327    22000231              LI,0     CRLF
      402   01 00328    6A700232              BAL,7    PRINT
      403   01 00329    68000088              B        HALT
      404   01 0032A    220001AA     MISUNIT2 LI,0     MIS2
      405   01 0032B    6A700232              BAL,7    PRINT
      406   01 0032C    68000088              B        HALT
      407   01 0032D    220001D1     NOTDIS   LI,0     NOTDISM
      408   01 0032E    6A700232              BAL,7    PRINT
      409   01 0032F    32400003 A            LW,4     3
      410   01 00330    22100001 A            LI,1     1
      411   01 00331    6A700367              BAL,7    HEXPRT
      412   01 00332    22000231              LI,0     CRLF
      413   01 00333    6A700232              BAL,7    PRINT
      414   01 00334    68000088              B        HALT
      415   01 00335    22000201     NOPE     LI,0     NOPEM
      416   01 00336    6800032E              B        NOTDIS+1
      417   01 00337    220001DF     PROGERR  LI,0     PROGM
      418   01 00338    6800032E              B        NOTDIS+1
      419   01 00339    220001F1     PGMANY   LI,0     PROGANY
      420   01 0033A    6800032E              B        NOTDIS+1
      421   01 0033B    220001B9     PORTERR  LI,0     PORTM
      422   01 0033C    6A700232              BAL,7    PRINT
      423   01 0033D    32400003 A            LW,4     3
      424   01 0033E    22100001 A            LI,1     1
      425   01 0033F    6A700367              BAL,7    HEXPRT
      426   01 00340    22000231              LI,0     CRLF
      427   01 00341    6A700232              BAL,7    PRINT
      428   01 00342    68000088              B        HALT
      429   01 00343    220001C3     BITERR   LI,0     PORTD
      430   01 00344    6A700232              BAL,7    PRINT
      431   01 00345    32400003 A            LW,4     3
      432   01 00346    22100001 A            LI,1     1
      433   01 00347    6A700367              BAL,7    HEXPRT
      434   01 00348    22000231              LI,0     CRLF
      435   01 00349    6A700232              BAL,7    PRINT
      436   01 0034A    68000088              B        HALT
      437   01 0034B    220000C1     DISBAD   LI,0     DISBADM
      438   01 0034C    6A700232              BAL,7    PRINT             PRINT MSG
      439   01 0034D    32400243              LW,4     MEMSW
      440   01 0034E    22100004 A            LI,1     4
      441   01 0034F    6A700367              BAL,7    HEXPRT            PRINT ADDRESS IN ERROR
      442   01 00350    22000231              LI,0     CRLF
      443   01 00351    6A700232              BAL,7    PRINT
      444   01 00352    68000088              B        HALT
      445   01 00353    220000DB     CONFIGER LI,0     CONFM
      446   01 00354    6A700232              BAL,7    PRINT
      447   01 00355    68000088              B        HALT
      448   01 00356    22000195     DIOPATH  LI,0     DIOERRM
      449   01 00357    6A700232              BAL,7    PRINT
      450   01 00358    32400009 A            LW,4     9                 GET IS
      451   01 00359    22100004 A            LI,1     4
      452   01 0035A    6A700367              BAL,7    HEXPRT            PRINT IT HEX
      453   01 0035B    2200022B              LI,0     SHOULDB
      454   01 0035C    6A700232              BAL,7    PRINT
      455   01 0035D    32400008 A            LW,4     8                 GET SHOULD BE
      456   01 0035E    22100004 A            LI,1     4
      457   01 0035F    6A700367              BAL,7    HEXPRT
      458   01 00360    22000231              LI,0     CRLF
      459   01 00361    6A700232              BAL,7    PRINT
      460   01 00362    68000088              B        HALT
      461   01 00363    F0F1F2F3 A   HEXCHAR  TEXT     '0123456789ABCDEF'
            01 00364    F4F5F6F7 A
            01 00365    F8F9C1C2 A
            01 00366    C3C4C5C6 A
      462   01 00367    7510022E     HEXPRT   STB,1    HEXM              SET SIZE
      463   01 00368    2540017C A   HEXP1    SLD,4    -4
      464   01 00369    25500064 A            SLS,5    -28
      465   01 0036A    720A0363              LB,0     HEXCHAR,5
      466   01 0036B    7502022E              STB,0    HEXM,1
      467   01 0036C    64100368              BDR,1    HEXP1
      468   01 0036D    2200022E              LI,0     HEXM
      469   01 0036E    68000232              B        PRINT
      470         01 0034D           #PGMSIZE EQU      %-X'22'
      471         01 00078                    END      START

  CONTROL SECTION SUMMARY: 01 0036F   PT 0
  * NO UNDEFINED SYMBOLS
  *    ERROR SEVERITY LEVEL: 0
  * NO ERROR LINES
1 C00   20:44 JUN 20,'83    SIGMA 5 MEMORY SWITCH FOR WMATA 960-0080-1A                           PAGE    5
A  ADDRERR          195/BNE      284/BNE      301/BNE      325/BNE      345/BNE      355/BNE      365/BNE
       382-LI
   ADLOP1           319-WD       336/BG
   ADLOP2           322-RD       332/BG
   ALOOP            191-RD       196/BDR
   ASKDIO            96-TEXTC    172/LI
   ASKDIS            94-TEXTC    167/LI
   ASKSET           103-TEXTC    275/LI
   ASKSET1          109-TEXTC    293/LI
   BITERR           232/BNE      429-LI
   CONFIGER         188/BNE      445-LI
   CONFM             93-TEXTC    445/LI
   CRLF              83/LI       131-TEXTC    401/LI       412/LI       426/LI       434/LI       442/LI
       458/LI
   DIOERRM          111-TEXTC    448/LI
   DIOPATH          179/BNE      448-LI
   DIORTN           100-TEXTC    183/LI
   DISBAD           171/BCS      437-LI
   DISBADM           90-TEXTC    437/LI
   DISCELL          155-DATA     159/XPSD
   DISXPSD          159-XPSD     219/LW
   DLOOP1           252-WD       259/BG
   DONEMSG          102-TEXTC    368/LI
   FINDT46           18/XPSD      48-DATA
   FOUNDIT           63/B        162-STW
   HALT              69-WAIT      77/B         85/B        403/B        406/B        414/B        428/B
       436/B        444/B        447/B        460/B
   HEXCHAR          461-TEXT     465/LB
   HEXM             130-TEXTC    462/STB      466/STB      468/LI
   HEXPRT            82/BAL      386/BAL      393/BAL      400/BAL      411/BAL      425/BAL      433/BAL
       441/BAL      452/BAL      457/BAL      462-STB
   HEXP1            463-SLD      467/BDR
   IS               128-TEXTC    387/LI
   LOOPINST         371/LM       374-WD
   MEMLIMIT         156-DATA     204/LW
   MEMSW            149-DATA     162/STW      170/RD*      176/WD*      177/RD*      186/RD*      191/RD*
       201/WD*      221/RD*      228/WD*      229/RD*      249/WD*      252/WD*      254/RD*      264/WD*
       265/WD*      267/RD*      274/WD*      279/RD*      292/WD*      297/RD*      306/WD*      308/RD*
       319/WD*      322/RD*      340/WD*      341/RD*      350/WD*      351/RD*      360/WD*      361/RD*
       367/WD*      372/LW       439/LW
   MEMTRAP          154-DATA     157/XPSD
   MEMXPSD          157-XPSD     202/LW
   MISUNIT2         213/BEZ      404-LI
   MIS2             113-TEXTC    404/LI
   MLOOP            205-MTW      210/BG
   MNEXT            154/DATA     209-AI
   NOPE             309/BCR      415-LI
   NOPEM            124-TEXTC    415/LI
   NOTDIS           241/B        407-LI       416/B        418/B        420/B
   NOTDISM          118-TEXTC    407/LI
   NOTHERE           67/LI        88-TEXTC
   OCINT             41/XPSD      50-DATA      51/LPSD
   PCNT             134/STH      153-GEN
   PELOOP           308-RD       312/BG
   PGMANY           256/BNE      269/BNE      419-LI
   PLOOP1           221-RD       244/BG
   PLOOP2           228-WD       234/BDR
   PLOOP3           155/DATA     238/BE       242-AI
   PMSG             138/STS      139/LI       152-GEN
   PORTD            116-TEXTC    429/LI
   PORTERR          224/BNE      421-LI
   PORTM            115-TEXTC    421/LI
   POWERON           45/DATA      73-LI
   PRINT             60/BAL       68/BAL       76/BAL       79/BAL       84/BAL      132-LB       168/BAL
       173/BAL      184/BAL      276/BAL      294/BAL      369/BAL      383/BAL      388/BAL      395/BAL
       402/BAL      405/BAL      408/BAL      413/BAL      422/BAL      427/BAL      430/BAL      435/BAL
       438/BAL      443/BAL      446/BAL      449/BAL      454/BAL      459/BAL      469/B
   PRINTIT          144-SIO
   PROGANY          122-TEXTC    419/LI
   PROGERR          253/BCR      266/BCR      417-LI
   PROGM            120-TEXTC    417/LI
   PWRMSG            75/LI        87-TEXTC
   PWROFF            29/XPSD      46-DATA
   PWRON             28/XPSD      45-DATA
   SALOOP           279-RD       287/BG
   SHOULDB          129-TEXTC    394/LI       453/LI
   START             52/B         53-LW        66/BGE      471/END
   STARTAD          112-TEXTC    382/LI
   STARTM            59/LI       125-TEXTC
   STARTPSD          49-DATA      55/LPSD
   START0            49/DATA      56-LI
   START1            48/DATA      64-AI
   TESTL1           176-WD       180/BDR      182/BEZ
   TRAPS             47/DATA      78-LI
   TRAP40            12/XPSD      13/XPSD      14/XPSD      15/XPSD      16/XPSD      17/XPSD      19/XPSD
        20/XPSD      21/XPSD      22/XPSD      23/XPSD      24/XPSD      25/XPSD      26/XPSD      27/XPSD
        34/XPSD      35/XPSD      36/XPSD      37/XPSD      38/XPSD      39/XPSD      40/XPSD      42/XPSD
        43/XPSD      47-DATA      80/LW
   TYPE             140/TIO*     144/SIO*     145/TIO*     148-DATA
   UNEXP             78/LI        86-TEXTC
   UNITS             57/STW       58/STW      158-DATA     208/MTB      212/MTB      237/MTB
   VERSION            4-EQU       44/TITLE
   WAIT              46/DATA      71-WAIT
   XFF              160-DATA     222/AND      230/AND      255/AND      268/AND
   #PGMSIZE         214/LI       470-EQU
