MEMORY PLUS Manual By Lee Davison and Hans Otten Back to The Computerist
0091 48 PHA ON STACK 0092 A0 04 LDYIM $04 SHIFT 4 POSITIONS PER CHARACTER 0094 A5 D8 LDAZ ADATA GET DATA 0096 29 0F ANDIM $0F MASK TO NIBBLE 0098 C9 0A CMPIM $0A TEST DECIMAL 009A 30 03 BMI AOKAY DECIMAL 009C 18 CLC A - F. MUST CONVERT TO 009D 69 07 ADCIM $07 ASCII 009F 18 AOKAY CLC FINISH CONVERSION 00A0 69 B0 ADCIM $B0 ASCII + AIM FLAG 00A2 20 7B EF JSR ASCOUT OUTPUT TO DISPLAY 00A5 46 D6 AMOVE LSRZ AHICH MOVE TO NEXT NIBBLE 00A7 66 D7 RORZ ALOW 00A9 66 D8 RORZ ADATA 00AB 88 DEY 00AC D0 F7 BNE AMOVE 00AE 68 PLA RESTORE X 00AF AA TAX 00B0 CA DEX 00B1 E0 0E CPXIM $0E DONE? 00B3 B0 DB BCS ALOOP NO 00B5 90 C9 BCC AIM YES. REPEAT 00B7 20 86 8B SYM JSR ACCESS ENABLE SYM MOEMORY 00BA A5 D2 LDAZ POINTH 00BC 20 FA 82 JSR OUTBYT OUTPUT 00BF A5 D1 LDAZ POINTL 00C1 20 FA 82 JSR OUTBYT 00C4 A0 00 LDYIM $00 00C6 B1 D1 LDAIY POINTL GET DATA 00C8 20 FA 82 JSR OUTBYT 00CB 20 06 89 DISPLY JSR SCANDS SCAN DISPLAY 00CE 4C CB 00 JMP DISPLY CONTINUE 00D1 00 POINTL = $00 00D2 00 POINTH = $00 00D3 00 FLAG = $00 00D4 00 FLIP = $00 00D5 00 PASS = $00 00D6 00 AHIGH = $00 00D7 00 ALOW = $00 00D8 00 ADATA = $00