Micropower |
Volume 1 · Number 2 · September 1981 |
Page 16 of 33 |
---|
155E | 1F | 0D | |
1581 | 1F | 0D | |
15F5 | 1F | 18 | |
15FA | 1F | 0D | |
1665 | CD4A0C | F70000 | CRT Routine |
1669 | 1F | 0D | |
1678 | 1F | 0D | |
1691 | CD4A0C | F70000 | CRT Routine |
169D | CD4A0C | F70000 | CRT Routine |
16D0 | CD4A0C | F70000 | CRT Routine |
16DB | CD4A0C | F70000 | CRT Routine |
1705 | 44554D50 | 53415645 | ‘DUMP’ now ‘SAVE’ |
175D | 91DE | 9341 | CLEAR is no longer active |
177D | 494E94 | 2391DE | ‘IN’ vector becomes ‘£’ |
AC9440 | 944000 | ||
17A8 | Change to E5D5DF7BD1E1C9 | Keyboard routine | |
17B3 | CD4D0C | DF6200 | Keyboard |
17BA | CD4D0C | DF6200 | Keyboard |
17CE | CD4A0C | F70000 | CRT routine |
17D4 | 30FB | 0000 | Not needed if new GETLN used |
17DD | 1D | 08 | Backspace |
17EA | 1F | 0D | |
17FD | 1F | 0D |
17C5 | F7 | GETLN | RST 16 | Print prompt char. |
17C6 | EF 18 00 | PRT CCR | and CRLF | |
17C9 | E5 | PUSH HL | Save HL | |
17CA | AF | XOR A | Clear Accumulator | |
17CB | 32 BF 0E | LD (BUFFER-1), A | Clear Marker | |
17CE | DF 63 | SCAL INLIN | Get screen line | |
17D0 | 21 2F 00 | LD HL, 47 | ||
17D3 | 06 30 | LD B, 48 | ||
17D5 | 19 | ADD HL, DE | Point to end of line | |
17D6 | 7E | SCN1 | LD A, (HL) | Look for space |
17T7 | FE 20 | CP £20 | Space character | |
17D9 | 20 10 | JR NZ, CHRFND | ||
17DB | 2B | DEC HL | Move left across | |
17DC | 10 F8 | DJNZ SCN1 | line but not off | |
17DE | 21 C0 0E | LD HL, BUFFR | ||
17E1 | 36 0D | ELINE | LD (HL), £0D | Insert CR |
17E3 | 23 | INC HL | ||
17E4 | 23 | INC HL | ||
17E5 | 36 FF | LD (HL), £FF | Insert terminator | |
17E7 | 2B | DEC HL | ||
17E8 | EB | EX DE, HL | ||
17E9 | E1 | POP HL | Restore HL | |
17EA | C9 | RET | ||
17EB | EB | CHRFND | EX DE, HL | |
17EC | 11 C0 0E | LD DE, BUFFR | Point at BUFFR | |
17EF | 48 | LD C, B | Get length in BC | |
17F0 | 06 00 | LD B, 0 | ||
17F2 | ED B0 | LDIR | Copy to BUFFR | |
17F4 | EB | EX DE, HL | ||
17F5 | 18 EA | JR ELINE | ||
In addition, change £1042 from £3A to 00. |
Page 16 of 33 |
---|