Willus.com
Home
|
Archive
|
About
KINGCAST.BAS
(18697 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: 3837H - 38C5H Entry point: 3837H ORG 03837H 3837 JR NC,L3873H 3839 OR D 383A LD (02041H),HL 383D LD C,H 383E LD C,A 383F LD D,L 3840 LD B,H 3841 JR NZ,$+74 3843 LD C,A 3844 LD D,D 3845 LD C,(HL) 3846 JR NZ,$+75 3848 LD D,E 3849 JR NZ,L388DH 384B LD C,H 384C LD C,A 384D LD D,A 384E LD C,(HL) 384F JR NZ,$+68 3851 LD B,L 3852 LD C,H 3853 LD C,A 3854 LD D,A 3855 LD L,020H 3857 LD C,A 3858 LD C,(HL) 3859 LD B,L 385A JR NZ,L38ABH 385C LD B,(HL) 385D JR NZ,L38B3H 385F LD C,B 3860 LD B,L 3861 JR NZ,L38B0H 3863 LD B,L 3864 LD D,D 3865 LD B,E 3866 LD C,B 3867 LD B,C 3868 LD C,(HL) 3869 LD D,H 386A LD D,E 386B JR NZ,L38AEH 386D LD D,E 386E LD C,E 386F LD D,E 3870 JR NZ,$+74 3872 LD C,A L3873H: 3873 LD D,A 3874 JR NZ,$+79 3876 LD B,C 3877 LD C,(HL) 3878 LD E,C 3879 JR NZ,L389BH 387B LD D,A 387C LD C,A 387D LD D,L 387E LD C,H 387F LD B,H 3880 JR NZ,$+91 3882 LD C,A 3883 LD D,L 3884 JR NZ,$+78 3886 LD C,C 3887 LD C,E 3888 LD B,L 3889 CCF 388A LD (08200H),HL L388DH: 388D LD A,A 388E INC DE 388F LD BC,0D558H 3892 SBC A,028H 3894 LD SP,03030H 3897 ADD HL,HL 3898 LD A,(022B2H) L389BH: 389B LD B,E 389C LD B,C 389D LD C,(HL) 389E LD C,(HL) 389F LD C,A 38A0 LD C,(HL) 38A1 JR NZ,$+69 38A3 LD C,A 38A4 LD D,E 38A5 LD D,H 38A6 JR NZ,$+38 38A8 LD (0583BH),HL L38ABH: 38AB LD (04145H),HL L38AEH: 38AE LD B,E 38AF LD C,B L38B0H: 38B0 LD (00900H),HL L38B3H: 38B3 ADD A,B 38B4 JR L38B7H 38B6 ADC A,C L38B7H: 38B7 LD B,C 38B8 LD A,(03141H) 38BB PUSH DE 38BC LD B,C 38BD LD A,(03141H) 38C0 PUSH DE 38C1 LD B,C 38C2 LD SP,058CFH 38C5 DEFB 03AH