BOOB MACRU ASSEMBLER, VER 2.2 IHTELLEC X/KQO B MCjNITQR, VERSION 3.0, 14 APRIL 1975 ERRORS m 0 PAGE 29 3067 486530 JNZ £N1 306A 408030 JNC EN3 30cA) QL50 l'lVl 13,'P' 3x6f ENx: xD6F 46853E CALL PO 3072 11 OCR C 3O'I3 485E3D JNZ END 3Cti6 0Ex6 KVL X,'X' 3078 46B$3E CALL PU 3D7B 0E20 KVI B,' ' 3D7D 448$3E JMP PO 3O80 ENJ: 3080 XXxX MVI B,'N' 3082 446F3D JKP EN2 i 7 EVALUATE EXPRESSI0!U ,, ; 3Xxx EXPRI 3DC5 DO MOV D,H ; SAVE HL 3086 Eb MOV £,L x08x 36042E00 LXI H,HPRIM£ 3DBB fbKOV M,D 3DBC 30 INR L 3080 fC MOV ME 308E 1EOQ MVI D,0 J D,E·Q x090 E3 MClV E,D 3091 EX0: 3J91 46493F CAXX Tl J GET A CHARACTER 3094 EX11 3094 CB' HXX B,A 3DS95 4x583E CALL NIBBLE ] CONXXXX TO HEX 3098 60AE3D JC EA2 ] HUT LEGAL CHAR, TREAT AS DELIMITER 3D9B CB KUV B,A xD9C 46423F CALL SLOE 31)9f 46423F CALL SLUE 30A2 46423F CXXX SLOE 3DA5 46423F CALL, XXXX x0A8 Cl mv A,8 30Ag B4 ORA E 30XX ED MOV E,X 3DAB 449130 JMP EX0 ] GET ANOTXXX XXXXXXXXX 3DA£ EXZ: 3XXX 3bQx2EQQ LXI H,HXXXXX 3DB2 C7MOV A,K 3DB3 30 INR L 3DXx F7 HOV L,M 3DB5 EB MOV H,A 3DB6 FE1 HOV mo 7 PUT MSB IN MEMORY 3DB7 30 INR L 3OB8 FC MOV M,E J PUT LSB IN MEMURY 3OB9 3x JNR L