es008 MACRO ASSE,4BLER, VER 2,2 INTELLEX 8/XXX 8 MONITOR, VERSION 3.0, 14 APRIL 19/5 ERRORS · G PAGE 22        3B8E      68443d              JZ          START       31391     lbOl                MVl         C,1       3893      2500                XXX         E,0       3895      36042Ex0 LXI                    H,HPRIME       3x99      3EU0RIVI                        M,ADR2 SHR 8       x8913     x0                   IXX        L       3t39C     3EOA                MVI         NI,ADR2 AND GFE'h       3B9E      46y430              GALL        EXl       313Al     460430              CALL        GETAL)       38A4      F?                  HOV         M,E       3BA5      3COCX               CPI         CR                    ; TEXX DELIMITER       3BA7      684438              JZ          start                 7 Cr enter£d aftir last substitution       xBXX                  sui:       3BAA      46D43X              CALL GETAD       3BAX)     4bF03D              CALL, INCHL,       3BBO      46343F              CAXX SAVXX       3tl83     46Dx3D              CALL GETAD       38Eix     447t>313            Jl4P XXX                             0                             0                             ; TRANSFEX CONTENTS OF A PROX TO MXXXXX.                             ;                             ; fHIS ROL'TINE EXPECTS USE HiXADXXXXXX, PARAYETER KRICH                             ; IT INTERPRXXX AS 7'FiE i.OCATjW: IN ME,40HY NHXX£ X COPY UF THL                             ; pr0.4 In The E'RU.'vT pahel is TU Bt xtored. THIS COPY IS always                             ; ?$6 BYTES In LENGTH,                             ;       313U9                 XXXX:       3889      ll                  OCR C       3BBA      468530              CALL EXXX                         J GET ONE ADDRESS       3BBD      0500                MVI A,ENB                         7 ENABLE PROM PROGRAMMER       3BBF      53                  OXX PROMC       xBC0      4bD43D              7ALL, GETAD                       J HI, · µ,EM AXX       3XXx      2OQ0                l'lVl E,Q                         ; COU.4T/PROH ADDRESS       3BC5                  TKCN       3dC5      C4                  MOV AE       3oC6      2CFF                XRI QFFH                          J INVERT AXXXXXX       38C8      $5                  JUT PAD                           ; XXX PRXX ADDRESS       3BC9      4ox53D              CALL DELAX                        J hAIT FOR 6-76 BOAXX TO XXXXX DATA       30CC      45                  IN POI                            ; GLX PROM DATA       3c$CD     2CFF                XRI 0FFH       3BCF'     p'u                 MOV M,X                           J PUT IN MEMORY       xBDQ      4oF03D              CALL INCKL                        J bFMP KEKQRY POIhTEX       3BXx      20                  !NR E                             J BUMP PROM PXXXXXX       381)4     ¢8C53B              JNZ TRU                           7 Gtr ANLJTdER bytx       3BX /     444¢38              JMP START                             j                             J WRITE RQUTINE.                             0                             ¢                             ; THIS ROUTINE EXPXXXX THU HEXADECIMAL PARAY.ETERS 'NKICK ARE                             ; INTERPRETED AS THE BOUNDS OX A MEMORY ARLA TO BE ENCODED                             J INTO HEXADECIMAL FORMAT AND PUKCKED ON THE ASSIGNED PUNCH