Willus.com
Home
|
Archive
|
About
CASEDT
(4422 bytes)
EMULATE AS:
DEFAULT TYPE (BASIC)
|
CMD program
|
Program on Disk
|
2-Disk Debug
|
Disk Download
SHOW BELOW AS:
BASIC program
(download)
|
Text File
(download)
|
Z-80 Program
(download)
|
EDTASM File
(download)
|
Graphic
(download)
|
Hex File
(download)
|
SCRIPSIT File
(download)
Return to TRS-80 software list.
Memory space: 5120H - 51ACH Entry point: 2C49H ORG 05120H L5120H: 5120 INC SP 5121 PUSH DE 5122 INC (HL) 5123 JR NZ,$-52 5125 JR NZ,$-109 L5127H: 5127 JR NZ,$+59 5129 JR NC,L515BH 512B NOP 512C RRCA 512D LD (HL),B 512E ADD A,(HL) 512F LD BC,0208FH 5132 LD D,C 5133 INC SP 5134 CALL NC,02034H 5137 JP NC,L5120H 513A INC SP 513B SUB 031H 513D INC SP 513E JR NZ,$-52 5140 JR NZ,$-109 5142 JR NZ,$+51 5144 JR NC,L5176H 5146 JR NC,L5148H L5148H: 5148 INC L 5149 LD (HL),B 514A SUB B 514B LD BC,0208FH 514E LD D,C 514F INC SP 5150 CALL NC,03231H 5153 JR NZ,L5127H 5155 JR NZ,$+83 5157 INC SP 5158 SUB 032H 515A DEC (HL) L515BH: 515B JR NZ,L5127H 515D JR NZ,$-109 515F JR NZ,L5192H 5161 LD SP,03030H 5164 NOP 5165 LD B,C 5166 LD (HL),B 5167 SBC A,D 5168 LD BC,0208FH 516B LD D,C 516C INC SP 516D PUSH DE 516E LD (02035H),A 5171 JP Z,09120H 5174 JR NZ,$+51 L5176H: 5176 LD (03030H),A 5179 NOP 517A LD D,(HL) 517B LD (HL),B 517C AND H 517D LD BC,0208FH 5180 LD D,C 5181 INC SP 5182 CALL NC,03532H 5185 JR NZ,$-52 L5187H: 5187 JR NZ,$-109 5189 JR NZ,$+51 518B INC SP 518C JR NC,$+50 518E NOP 518F LD E,(HL) 5190 LD (HL),B 5191 XOR (HL) L5192H: 5192 LD BC,L5187H 5195 INC SP 5196 NOP 5197 LD (HL),D 5198 LD (HL),B 5199 CP B 519A LD BC,022A2H 519D LD C,A 519E LD (0312CH),HL 51A1 INC L 51A2 LD B,H 51A3 LD B,(HL) 51A4 INC H 51A5 INC L 51A6 LD (0554DH),HL 51A9 LD (08000H),HL 51AC LD (HL),B