8008 MACRO ASSEMBLER, VER 2.2           IHTELLEC U/KOD 8 MONITQH, VERSION 3.0, 14 APRIL 1975 ERRORS · 0 PAGE 11                      2         t JMP            STARX                   2          +TESIN                            J INDEX THROUGH PHYSXXXX UNIT TABLE                   2          + C.xP           M                j C(JKPARE DEVICE CHAR WITH LXXXX, VALUES                   2          + RZ                              J RETURN WITH HI, -> DEVICE SELECT BITS                   2          + CALL           XXXXX                    2         + CALL           IXXXX                    2         + OXX            B                    2         + JNZ            TEST             J CONTINUE XXXXXX                    2          + JMP           LER              J ERROR RETURN                    I         + ENDIF                    2         t IF             NOT FIXXX              38EF 2 448x38 + jxqp             ICMXX                    I         + ENOIF              38F2              ASi:              38F2 3C50 " CPI                  ·P·              7 PUNCH?              3BF4 x80039JNZ                   AXx              X TEST XXX LIST                   I          + MODICI         0PT,PMSK         J MODIFY PUNCH UEVICE              3Uf7 1 26641EjF+ LXI             D,0PT            J ADDR£SS XX PHYSICAL, UNIT TABLE              J8FB j 16CF + MVI                C,pmsk           J C · SELECT BIT MASK                   2          + IF             FIRXX            J EMIT THIS CODE ONCE,                   2          +                                 J BRANCH TU IT 1'HEREAFTER                   2          +jOMOO::                   2          +11RST SET       FALSE                   2          + CALL           NOISE            ; SCAN INPUT AND ECHO UNTIL                   2          +                                 J PHYSICAL, DEVICL CHAR IS ENCOUfxTERED                   2          + MVl            8,4              $ SET TABLE LENGTH                   2          + HOV            H,0                   2          + NOV            LmE                   2          + CALL           TESF             J COMPARE PHYSICAL DEVICE AGAINST                   2          + CALL,          JNCKL                   2          + MOV            E,M              J TABLX, RETXXX HL -> BIT XXXXXXX                   2          +SCANO1jH                   2          + CALL,          TI                   2          + CPI            CR                   2          + JNZ            S˘AMjUT          3 SCAN PXXX CR                   2          + LXl            H,I0BYT          J XXX J/O STATUS                   ,i!        + MOV            A,K                   2          + AXX            C                3 CLEXX FIELD                   2          + ORA            E                7 SXX NEIN XXXXXX                   2          + NOV            M,A              J RETURN TO MEMXXX                   2          + XXX            START                   2          +TESTi                            i JNOEX THXXXXX PHYSICAL UNIT TABLE                   2          + CMP            K                J COMPARE DEVICE CXAR wITH LEGAL VALUES                   2          + RZ                              ; RETXXX WITH HL, -> DEVICE SELECT BITS                   2          + CALL           INCKL,                   2          + CALL           INCHL                   2          + OCR            B                   2          + JNZ            TEST             b CONTINUE LOOKUP                   2          + JMP            LER              J ERROR RETURN                   I          t ENDIF                   2          + IF             NOT FIRST