|
|
This page contains no introduction. |
Source Code Fragment#
A small source code fragment seen below can be viewed with any hex editor at 3A23 in the .tap dump. Most of it can also be seen at D74B and 17452.
AND 111B
OR 64
LD (HL),A
LD DE,4
ADD IX,DE
DJNZ $1
RET
;star image byte,screen addr
STARTAB: DS MAXSTARS*4
DB STOP
********
HL,BITSTREAM
DO SCODEBYTLEN
RR (HL)
INC HL
LOOP
DJNZ SHIFTIN2
POP BC,HL,AF
RET
BITSTREAM: DS SCODEBYTLEN,0
SHIFTOUT: PUSH BC,HL
XOR A
SHIFTOUT2 AND A
LD HL,BITSTREAM
DO SCODEBYTLEN
RR (HL)
INC HL
LOOP
RRA
DJNZ SHIFTOUT2
POP HL,BC
RET
CODETAB: DB "ABCDEFGHJKLMNOPQRSTUVWXYZ1234567",STOP
*******
EA5400