Willus.com
Home
|
Archive
|
About
CASTLE
(3384 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: 5720H - 579EH Entry point: 3628H ORG 05720H 5720 PUSH DE 5721 SCF 5722 JR C,L5744H 5724 CP L 5725 JR NZ,L575FH 5727 INC SP 5728 LD A,(02883H) 572B LD D,A 572C INC L 572D LD (02931H),A 5730 LD A,(08720H) 5733 JR NZ,L578CH 5735 NOP 5736 LD H,C 5737 LD L,(HL) 5738 JR L573BH 573A ADD A,C L573BH: 573B JR NZ,L5795H 573D PUSH DE 573E INC SP 573F JR C,L5761H 5741 CP L 5742 JR NZ,L5778H L5744H: 5744 SCF 5745 LD A,(02883H) 5748 LD E,B 5749 INC L 574A LD SP,02939H 574D LD A,(08720H) 5750 JR NZ,$+90 5752 NOP 5753 LD A,(HL) 5754 LD L,(HL) 5755 LD (08101H),HL 5758 JR NZ,$+91 575A PUSH DE 575B LD (HL),038H 575D JR NZ,$-65 L575FH: 575F JR NZ,$+57 L5761H: 5761 LD (HL),03AH 5763 ADD A,E 5764 JR Z,$+91 5766 INC L 5767 LD SP,02939H 576A LD A,(08720H) 576D JR NZ,$+91 576F NOP 5770 SBC A,E 5771 LD L,(HL) 5772 INC L 5773 LD BC,02081H 5776 LD E,D 5777 PUSH DE L5778H: 5778 INC (HL) 5779 LD (HL),020H 577B CP L 577C JR NZ,$+55 577E LD (0833AH),A 5781 JR Z,$+92 5783 INC L 5784 LD SP,02937H 5787 LD A,(08720H) 578A JR NZ,$+92 L578CH: 578C NOP 578D CP B 578E LD L,(HL) 578F LD (HL),001H 5791 ADD A,C 5792 JR NZ,$+67 5794 PUSH DE L5795H: 5795 LD (HL),032H 5797 JR NZ,$-65 5799 JR NZ,$+56 579B ADD HL,SP 579C LD A,(02883H)