BOOB ¥,ACR0 ASSE%LER, YER 2.2 INTELLEC Q/MOD g KUNI1'0P., VERSIUN 3.0, L4 APRIL 19x5 ERRORS · D XXXX B 3835 CF MQV B,M 3BJ6 4bF03D CALL INCHL 3839 DL) ldOV D,h 383a Eb muv xn 38313 4bx23C CALL, CO SU3£ Eh PjC/V F1,D 383F F4 MC'J L,L 18¢0 Jl OCR C x841 483538 JNZ VERU ; : MAIN COPNANO L(JGP. } ; TdlS LOGP IS THE STARTXXX POINT CjI ALL CIJH!4ANX SEQUENCES. ; IN THIS CCJDE ALL 1/0 IEVICE'S ARE !tvITlAL!Xxxx, A CAki?IAGE ; RiTURM ANI LINE FXXX APE TiPElj, ALAJ?1X KITH THE PROMPT ; CHAR&CIFR, '.', hHEN A CHXXXXXXX IS ENTU.ED FRUM THE ; CONSOLE KEYBOKRD, XX iS CXXXXXX FuR QKLIDI'ii', Then A ; BRANCH TO IHE PHJPER PR°JCL'5SLNG RC'UTIKE IS CCYPUTE1). ; 3ti44 XX,XXX: 3844 0608 M\/I A,TTYNQ ; RESET TTY,PTR,PTP 1846 53 OUT TTC / RESEI REXXXX 3847 xKC3C CALL CRLF : TYPE , 3c4a UUE MVI B,'.° 9V4C 4d523C CALL, CO } OUTPUT ;j PERIXXX 384F 4b493F CALL, TI } Gil A XXXXXXXXX 3852 1441 SUI 'A' ; TEST FOR A-ni 3854 "1·j4438 JPl SXXXX ; Li' A, ERROR 3d57 3Cl7 CPI 'H'-'A'tl 3859 504d3C JP LER ; GT m ERRCN. 385C ¥0 ADD A ) *2 3b:)D 36752i38 1jXx H,TE3X : ADDRESS OF TABLE 38b1 SbADD L ; ADD BIAS 3x62. FO XOV L,A 38b3 E7 ROY E,N1 ; GET ADDXXXX IN D,E 3¥U 30 INR L 3865 OF MOV D,H 38Eb GU: 3866 3$062£0'J LXI H,CBRCH ) AURESS XX jy.p INSTRUCTION 38t>A 3E44HVI M,(JMP 0) i STUFF CtPCCi'i 38xC 3U INR L 386D FC HOV !'4,E ; STUFF 8 [.SB xU6E 3ct INK L :986F FB HOY MD ; STXXX B MSB 38/0 1602 MVA cm ; SET UP C FOR IbO PARA6',ETER CXXXXXXX 38x2 440600 JMP CBRCH ; GO DO IT P f ; C0.4,4AN[i BRANCH TAUE. ; ; THIS TABLE CONTAINS THE ADDRESSES OF TEE EKTRY POINTS OF ; ALL TXX COHMANI) PROCESSINX RQUT1NES. h'OTt. THKT A:d ENTRY TX 'LER'