BASIC: 1 REM one hundred and sixty one characters
2 RAND USR 16514
MACHINE CODE: (To be written to address 4082 - decimal 16514):
21B940 LD HL,40B9 01FF0001 DEFB 01 FF 00 01
7E LD A,(HL) 0100FFFF DEFB 01 00 FF FF
23 INC HL FE050C4E DEFB FE 05 0C 4E
1F RRA 7C54004E DEFB 7C 54 00 4E
F5 PUSH AF 7C55B4AE DEFB 7C 55 B4 AE
D7 RST 10 B2B2B1B1 DEFB B2 B2 B1 B1
F1 POP AF B1B1B1B1 DEFB B1 B1 B1 B1
30F8 JR NC,F8 B1B1B0B4 DEFB B1 B1 B0 B4
0680 LD B,80 B5B5B3B3 DEFB B5 B5 B3 B3
3D DEC A B3B3B5B3 DEFB B3 B3 B5 B3
20FD JR NZ,FD B3B5B3B3 DEFB B3 B5 B3 B3
10FB DJNZ FB B5B3B3B3 DEFB B5 B3 B3 B3
01240A LD BC,0A24 B3B0B0B0 DEFB B3 B0 B0 B0
C5 PUSH BC B0B1B1B1 DEFB B0 B1 B1 B1
E5 PUSH HL B0B1B0B1 DEFB B0 B1 B0 B1
CDB60B CALL 0BB6 B1AEB3B3 DEFB B1 AE B3 B3
C1 POP BC B5AFB0B0 DEFB B5 AF B0 B0
0A LD A,(BC) B1AEB1B0 DEFB B1 AE B1 B0
6F LD L,A B1B3B3B3 DEFB B1 B3 B3 B3
2640 LD H,40 B3B0B0B1 DEFB B3 B0 B0 B1
5E LD E,(HL) B1B3B3B3 DEFB B1 B3 B3 B3
2C INC L B1B1B0B0 DEFB B1 B1 B0 B0
56 LD D,(HL) AEB2B1B2 DEFB AE B2 B1 B2
E1 POP HL B1B2B1B2 DEFB B1 B2 B1 B2
C8 RET Z B2B2B4B5 DEFB B2 B2 B4 B5
19 ADD HL,DE B5B5B4B5 DEFB B5 B5 B4 B5
C5 PUSH BC B5B4B5B5 DEFB B5 B4 B5 B5
4D LD C,L B4B5B5B4 DEFB B4 B5 B5 B4
44 LD B,H B5B5AEB7 DEFB B5 B5 AE B7
E1 POP HL FF DEFB FF
23 INC HL
18E9 JR E9
|