summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Makefile46
-rw-r--r--ddtz.combin0 -> 9984 bytes
-rw-r--r--ddtz.z80454
-rw-r--r--mk2ddtz.sub24
-rw-r--r--mk3ddtz.sub22
5 files changed, 245 insertions, 301 deletions
diff --git a/Makefile b/Makefile
deleted file mode 100644
index 0b58086..0000000
--- a/Makefile
+++ /dev/null
@@ -1,46 +0,0 @@
-# Build ddtz.com from ddtz.z80
-
-PROG := ddtz
-
-SRC := $(PROG).z80
-
-OBJ := $(SRC:.z80=.rel)
-
-AS_OPT := MF
-
-ASM := zxcc slrz80.com
-LINK := zxcc link80.com
-
-.phony: all
-all: $(PROG).com
-
-
-
-$(PROG).com: $(PROG).prl
- @# Remove the PRL header record (256 bytes)
- dd status=none bs=256 skip=1 if=$< of=$@
-
-$(PROG).prl: $(OBJ)
- $(LINK) -'$(PROG)[op,$$SZ]'
-
-
-
-.phony: clean
-clean:
- rm -f $(PROG).com *.rel *.lst *.prl
-
-.SUFFIXES:
-.SUFFIXES: .z80 .rel .prl
-
-
-define cpm-asm =
-COMMAND="$(ASM) -$(basename $<)/$(AS_OPT)"; \
-OUTPUT=$$(mktemp); echo $${COMMAND}; \
-$${COMMAND} > $${OUTPUT}; \
-grep -q '^ 0 Error(s) Detected' $${OUTPUT}; ERROR=$$? ; \
-if [ "$${ERROR}" != "0" ]; then cat $${OUTPUT}; rm -f $@; fi ; \
-exit $${ERROR}
-endef
-
-%.rel %lst: %.z80
- @$(cpm-asm)
diff --git a/ddtz.com b/ddtz.com
new file mode 100644
index 0000000..1e3a500
--- /dev/null
+++ b/ddtz.com
Binary files differ
diff --git a/ddtz.z80 b/ddtz.z80
index 9babde2..3cc05e8 100644
--- a/ddtz.z80
+++ b/ddtz.z80
@@ -1,59 +1,46 @@
; Disassembled ddtz.com, version "DDT/Z [8101]"
-; with modified relocater.
;
-; Build steps:
-; - Assemble to a .REL file with M80 or a compatible assembler.
-; - Use Digital Research Link-80 to generate a .PRL file (op switch).
-; - Cut the .PRL header (first 256 byte) end rename the result to DDTZ.COM.
+; Assemble with M80 or a compatible assembler
+; to (re)create the original .com file.
;-------------------------------------------------------------------------------
; Relocation loader
;
+ ASEG
+ ORG 00100H
-TPA equ 0100h
- cseg
- .phase TPA
-
- LD SP,ldr_end+(stack-ddtz_base)
- LD DE,ldr_end+(expr_buf-ddtz_base)
+ LD SP,ldr_end+stack
LD C,BDOS_PSTR
+ LD DE,ldr_end+expr_buf
CALL BDOS
-
- LD HL,ldr_end+ddtz_size ;start of reloc bitmap
- ld bc,0108h ;init bit counter
-
+ LD HL,bitmap
EXX
LD HL,(BDOS+1)
LD (ldr_end+1),HL
LD BC,ddtz_size-1
LD D,B
LD E,0FFH
- INC DE ;size rounded up to next page boundary
- INC BC ;ddtz_size
- OR A
- SBC HL,DE ;BDOS - size
- LD (BDOS+1),HL ;-> new BDOS entry
-
- push hl
+ INC DE
+ INC BC
PUSH BC
- ld de,ldr_end
- sbc hl,de
- EX DE,HL ;-> DE
- LD HL,ldr_size
- add hl,bc
- ld b,h
- ld c,l
- LD HL,TPA
-reloc_lp:
+ OR A
+ SBC HL,DE
+ LD (BDOS+1),HL
+ EX DE,HL
+ LD HL,ldr_end-1
+A0128: INC HL
+ LD A,L
+ AND 007H
+ JR NZ,A0133
EXX
- djnz reloc_nl
- ld b,c ;reload bit counter
- LD e,(HL) ;get next 8 relocation bits
+ LD A,(HL)
INC HL
-reloc_nl:
- sla e
EXX
- JR NC,reloc_next
+ EX AF,AF'
+A0133: EX AF,AF'
+ ADD A,A
+ JR NC,A0141
+ EX AF,AF'
DEC HL
LD A,(HL)
ADD A,E
@@ -62,26 +49,29 @@ reloc_nl:
LD A,(HL)
ADC A,D
LD (HL),A
-reloc_next:
- cpi
- jp pe,reloc_lp
- dec hl
-
+ EX AF,AF'
+A0141: EX AF,AF'
+ DEC BC
+ LD A,B
+ OR C
+ JR NZ,A0128
POP BC
- pop de
EX DE,HL
ADD HL,BC
EX DE,HL
DEC DE
LDDR
- LD HL,conbuf+2-ddtz_base
+ LD HL,conbuf+2
ADD HL,DE
JP (HL)
+ rept (($+7) and 0FFF8H) - $
+ DEFB 000H
+ endm
+
ldr_end:
-ldr_size equ $ - TPA
- .dephase
+ .phase 0
;-------------------------------------------------------------------------------
; DDT/Z core
;
@@ -247,6 +237,8 @@ ERROR:
exe_hl:
call CALL_HL ;010a cd 0f 01 . . .
jr mainloop ;010d 18 ae . .
+CALL_HL:
+ jp (hl) ;010f e9 .
CMDTAB:
defw cmd_@ ;0110 92 0d . .
@@ -470,10 +462,6 @@ l0242h:
jr c,l022dh ;0258 38 d3 8 .
ret ;025a c9 .
-p_char_lparen:
- ld a,'('
- jr outchar
-
outquote:
ld a,'''' ;025b 3e 27 > '
outchar:
@@ -1933,7 +1921,14 @@ expr_p2:
expr_buf:
db 'DDT/Z',TAB
- db '[8101] 001',CR,LF,'$'
+ db '[8101]',CR,LF,'$'
+ db 000h ;0b2b 00 .
+ db 06dh ;0b2c 6d m
+ db 085h ;0b2d 85 .
+ db 0cch ;0b2e cc .
+ db 0f6h ;0b2f f6 .
+ db 053h ;0b30 53 S
+ db 05bh ;0b31 5b [
ds EXPR_BUF_SIZE - ($ - expr_buf)
expr_bufe:
@@ -3077,8 +3072,6 @@ sub_1268h:
ld b,(hl) ;1285 46 F
ex de,hl ;1286 eb .
pop de ;1287 d1 .
-
-CALL_HL:
jp (hl) ;1288 e9 .
b_1289_start:
@@ -3217,87 +3210,6 @@ b_1289_start:
defw as.AND_CP_OR_SUB_XOR ;XOR 134f a8 15 . .
defb 0a8h ; 1351 a8 .
- defw as.IN0 ;IN0
- defb 000h ;
- defw as.MLT ;MLT
- defb 04ch ;
- defw gen.opc.ED2 ;OTDM
- defb 08bh ;
- defw gen.opc.ED2 ;OTDMR
- defb 09bh ;
- defw gen.opc.ED2 ;OTIM
- defb 083h ;
- defw gen.opc.ED2 ;OTIMR
- defb 093h ;
- defw as.OUTO ;OUT0
- defb 001h ;
- defw gen.opc.ED2 ;SLP
- defb 076h ;
- defw as.TST ;TST
- defb 004h ;
- defw as.TSTIO ;TSTIO
- defb 074h ;
-
-as.TST:
- call arg.r_HL_A ;
- jr nc,as.tst_0
- rlca
- rlca
- rlca
- add a,b
- ld b,a
- jp gen.opc.ED2
-as.tst_0:
- ld b,064h
-as.TSTIO:
- call arg.imm_8bit ;
- jr as.store_io0
-
-as.IN0:
- call arg.r_HL_A ;
- jr nc,error7
- cp 006h
- jr z,error7
- rlca
- rlca
- rlca
- add a,b
- ld b,a
- call assert_comma ;
- call arg.addr_8bit ;
- jr as.store_io0
-
-as.OUTO:
- call arg.addr_8bit ;
- call assert_comma ;
- call arg.r_HL_A ;
- jr nc,error7
- cp 006h
- jr z,error7
- rlca
- rlca
- rlca
- add a,b
- ld b,a
-
-as.store_io0:
- call assert_eol
- ld (iy+000h),0edh
- ld (iy+001h),b
- ld (iy+002h),l
- ld c,003h
- ret
-
-as.MLT:
- call arg.ww ;
- jr nc,error7
- add a,b
- ld b,a
- jp gen.opc.ED2
-
-error7:
- jp ERROR
-
as.LD:
call arg.r_HL_A ;1352 cd 2e 18 . . .
jr c,l13d4h ;1355 38 7d 8 }
@@ -4231,13 +4143,15 @@ p_offset:
ld a,d ;194d 7a z
or e ;194e b3 .
ret z ;194f c8 .
- call p_char_lparen ;1952 cd 5d 02 . ] .
+ ld a,'(' ;1950 3e 28 > (
+ call outchar ;1952 cd 5d 02 . ] .
ld a,'@' ;1955 3e 40 > @
call outchar ;1957 cd 5d 02 . ] .
and a ;195a a7 .
sbc hl,de ;195b ed 52 . R
call out_hl ;195d cd 13 02 . . .
- jp out_rparen ;1962 c3 5d 02 . ] .
+ ld a,')' ;1960 3e 29 > )
+ jp outchar ;1962 c3 5d 02 . ] .
p_disas_instr:
sub a ;1965 97 .
@@ -4247,7 +4161,7 @@ p_disas_instr:
push bc ;196e c5 .
call p_mnemonic ;196f cd b9 1e . . .
ex de,hl ;1972 eb .
- call call_hl ;1973 cd c1 19 . . .
+ call CALL_HL2 ;1973 cd c1 19 . . .
pop bc ;1976 c1 .
ld a,(l1ffdh) ;1977 3a fd 1f : . .
ld hl,(l1ffbh) ;197a 2a fb 1f * . .
@@ -4296,6 +4210,9 @@ l19b1h:
scf ;19bf 37 7
ret ;19c0 c9 .
+CALL_HL2:
+ jp (hl) ;19c1 e9 .
+
disas_pfx.DDFD:
inc iy ;19c2 fd 23 . #
ld hl,b_19ef_start ;19c4 21 ef 19 ! . .
@@ -4339,6 +4256,8 @@ b_19ef_start:
defb 073h ;19fb 73 s
defb 074h ;19fc 74 t
defb 075h ;19fd 75 u
+; ????
+ defb 076h ;19fe 76 v ????
defb 077h ;19ff 77 w
defb 07eh ;1a00 7e ~
defb 086h ;1a01 86 .
@@ -4379,11 +4298,6 @@ disas_pfx.ED:
call lookup_opc ;1a27 cd 97 1a . . .
ld b,2 ;1a2a 06 02 . .
ret c ;1a2c d8 .
-
- ld hl,l228bh
- call lookup_opc
- ld b,3
- ret c
ld hl,b_1c40_start ;1a2d 21 40 1c ! @ .
call lookup_opc ;1a30 cd 97 1a . . .
ld b,4 ;1a33 06 04 . .
@@ -4633,11 +4547,6 @@ b_1bc9_start:
db 0b9h,018h ;cpdr
db 0bah,047h ;indr
db 0bbh,06eh ;otdr
- db 08bh,0d5h ;otdm
- db 09bh,0d9h ;otdmr
- db 083h,0deh ;otim
- db 093h,0e2h ;otimr
- db 076h,0ebh ;slp
db 0ffh ;<end mark>
b_1bf4_start:
@@ -4671,29 +4580,6 @@ b_1bf4_start:
dw l1d9ch ;
db 0ffh,05fh,056h ;ld a,r
dw l1da1h
- db 0cfh,04ch,0d2h ;mlt rr
- dw p_arg_ww
- db 0c7h,004h,0eeh ;tst r
- dw p_arg_r
- db 0
-
-l228bh:
- db 0e7h,000h,0cfh ;in0 r,(m) ;r=b,c,d,e
- dw p_arg_r_m
- db 0f7h,020h,0cfh ;in0 r,(m) ;r=h,l
- dw p_arg_r_m
- db 0ffh,038h,0cfh ;in0 a,(m)
- dw p_arg_r_m
- db 0e7h,001h,0e7h ;out0 (m),r ;r=b,c,d,e
- dw p_arg_m_r
- db 0f7h,021h,0e7h ;out0 (m),r ;r=h,l
- dw p_arg_m_r
- db 0ffh,039h,0e7h ;out0 (m),a
- dw p_arg_m_r
- db 0ffh,064h,0eeh ;tst m
- dw l1d09h
- db 0ffh,074h,0f1h ;tstio m
- dw l1d09h
db 0
b_1c40_start:
@@ -4740,19 +4626,6 @@ p_arg_a_r:
jp p_arg_rs ;1c94 c3 30 1e . 0 .
l1c97h:
ret ;1c97 c9 .
-
-;-----------------------------------------------------
-p_arg_r_m:
- call p_arg_r
- call p_char_comma
- jp sub_1d2ch
-
-p_arg_m_r:
- call sub_1d2ch
- call p_char_comma
- jp p_arg_r
-;-----------------------------------------------------
-
l1c98h:
ld a,(iy+000h) ;1c98 fd 7e 00 . ~ .
and 038h ;1c9b e6 38 . 8
@@ -4767,10 +4640,11 @@ b_1ca9_start:
DC '(SP),'
l1caeh:
- call p_char_lparen ;1cb0 cd 5d 02 . ] .
+ ld a,'(' ;1cae 3e 28 > (
+ call outchar ;1cb0 cd 5d 02 . ] .
call p_arg_hlixiy ;1cb3 cd 7e 1e . ~ .
- jr out_rparen
-
+ ld a,')' ;1cb6 3e 29 > )
+ jp outchar ;1cb8 c3 5d 02 . ] .
p_arg_ex_dehl:
ld hl,l1773h ;1cbb 21 73 17 ! s .
jp pstr ;1cbe c3 88 02 . . .
@@ -4799,11 +4673,11 @@ l1cdch:
l1ce5h:
call p_A_comma ;1ce5 cd b1 1e . . .
sub_1ce8h:
- call p_char_lparen ;1cea cd 5d 02 . ] .
- call p_arg_ww ;1ced cd 8b 1e . . .
-out_rparen:
- jp p_char_rparen ;1cf2 c3 5d 02 . ] .
-
+ ld a,'(' ;1ce8 3e 28 > (
+ call outchar ;1cea cd 5d 02 . ] .
+ call p_arg_ww ;1ced cd 8b 1e . . .
+ ld a,')' ;1cf0 3e 29 > )
+ jp outchar ;1cf2 c3 5d 02 . ] .
l1cf5h:
call p_A_comma ;1cf5 cd b1 1e . . .
jr l1d09h ;1cf8 18 0f . .
@@ -4839,12 +4713,16 @@ l1d1ah:
l1d29h:
call p_A_comma ;1d29 cd b1 1e . . .
sub_1d2ch:
- call p_char_lparen ;1d2e cd 5d 02 . ] .
+ ld a,'(' ;1d2c 3e 28 > (
+ call outchar ;1d2e cd 5d 02 . ] .
ld a,(iy+001h) ;1d31 fd 7e 01 . ~ .
jp l1e6bh ;1d34 c3 6b 1e . k .
l1d37h:
call sub_1d2ch ;1d37 cd 2c 1d . , .
- jr p_char_comma_A
+ call p_char_comma ;1d3a cd b4 1e . . .
+p_char_A:
+ ld a,'A' ;1d3d 3e 41 > A
+ jp outchar ;1d3f c3 5d 02 . ] .
p_arg_cc_mn:
call p_arg_cc ;1d42 cd 9d 1e . . .
@@ -4877,29 +4755,21 @@ p_arg_addr_a:
call sub_1e13h ;1d74 cd 13 1e . . .
p_char_comma_A:
call p_char_comma ;1d77 cd b4 1e . . .
-p_char_A:
ld a,'A' ;1d7a 3e 41 > A
- jr outchar1 ;1d87 18 06 . .
+ jp outchar ;1d87 18 06 . .
p_arg_a_addr:
call p_A_comma ;1d7f cd b1 1e . . .
jp sub_1e13h ;1d82 c3 13 1e . . .
l1d85h:
ld a,'0' ;1d85 3e 30 > 0
- jr outchar1 ;1d87 18 06 . .
+ jr l1d8fh ;1d87 18 06 . .
l1d89h:
ld a,'1' ;1d89 3e 31 > 1
- jr outchar1 ;1d8b 18 02 . .
+ jr l1d8fh ;1d8b 18 02 . .
l1d8dh:
ld a,'2' ;1d8d 3e 32 > 2
- jr outchar1 ;1d8b 18 02 . .
-
-p_A_comma:
- call p_char_A ;1eb1 cd 3d 1d . = .
-p_char_comma:
- ld a,',' ;1eb4 3e 2c > ,
-outchar1:
- jp outchar ;1eb6 c3 5d 02 . ] .
-
+l1d8fh:
+ jp outchar ;1d8f c3 5d 02 . ] .
l1d92h:
ld hl,b_1da7_start ;1d92 21 a7 1d ! . .
jr l1da4h ;1d95 18 0d . .
@@ -4982,7 +4852,8 @@ l1e11h:
jr p_arg_r0 ;1e11 18 20 .
sub_1e13h:
- call p_char_lparen ;1e15 cd 5d 02 . ] .
+ ld a,'(' ;1e13 3e 28 > (
+ call outchar ;1e15 cd 5d 02 . ] .
ld l,(iy+001h) ;1e18 fd 6e 01 . n .
ld h,(iy+002h) ;1e1b fd 66 02 . f .
ld a,001h ;1e1e 3e 01 > .
@@ -5029,7 +4900,8 @@ l1e61h:
neg ;1e69 ed 44 . D
l1e6bh:
call out_hex ;1e6b cd 18 02 . . .
- jr p_char_rparen
+ ld a,')' ;1e6e 3e 29 > )
+ jp outchar ;1e70 c3 5d 02 . ] .
p_arg_r1:
ld hl,t_BCDEHL_HL_A ;1e73 21 96 1f ! . .
@@ -5068,11 +4940,19 @@ p_arg_cc0:
rra ;1ea2 1f .
and 007h ;1ea3 e6 07 . .
ld hl,t_tstfl_ZCPS ;1ea5 21 dc 1f ! . .
+ jr l1eaah ;1ea8 18 00 . .
+l1eaah:
p_arg:
ld b,a ;1eaa 47 G
call sel_dc_string ;1eab cd 3d 03 . = .
jp pstr ;1eae c3 88 02 . . .
+p_A_comma:
+ call p_char_A ;1eb1 cd 3d 1d . = .
+p_char_comma:
+ ld a,',' ;1eb4 3e 2c > ,
+ jp outchar ;1eb6 c3 5d 02 . ] .
+
p_mnemonic:
call pstr ;1eb9 cd 88 02 . . .
l1ebch:
@@ -5080,7 +4960,7 @@ l1ebch:
inc c ;1ebf 0c .
ld a,c ;1ec0 79 y
cp 5 ;1ec1 fe 05 . .
- jr c,l1ebch ;1ec3 20 f7 .
+ jr nz,l1ebch ;1ec3 20 f7 .
ret ;1ec5 c9 .
t_MNEMONICS:
@@ -5151,6 +5031,7 @@ t_MNEMONICS:
DC 'SRL'
DC 'SUB'
DC 'XOR'
+ if 0
DC 'IN0'
DC 'MLT'
DC 'OTDM'
@@ -5161,6 +5042,7 @@ t_MNEMONICS:
DC 'SLP'
DC 'TST'
DC 'TSTIO'
+ endif
DB 0
t_BCDEHL_HL_A:
@@ -5546,5 +5428,159 @@ ddtz_size equ $-ddtz_base
ddtz_end:
;-------------------------------------------------------------------------------
+ .dephase
+bitmap:
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,001H,044H,040H,000H
+ db 000H,010H,084H,090H,080H,010H,000H,001H
+ db 024H,092H,049H,009H,024H,084H,080H,004H
+ db 080H,048H,055H,055H,055H,055H,055H,055H
+ db 054H,024H,042H,048H,000H,010H,000H,000H
+ db 000H,080H,000H,080H,002H,008H,010H,082H
+ db 004H,000H,080H,084H,044H,008H,024H,000H
+ db 084H,004H,082H,001H,000H,000H,041H,000H
+ db 008H,021H,002H,000H,000H,090H,000H,020H
+ db 020H,001H,000H,092H,004H,021H,009H,000H
+ db 000H,008H,010H,088H,004H,080H,000H,000H
+ db 004H,000H,020H,000H,000H,001H,000H,080H
+ db 020H,000H,084H,081H,004H,090H,040H,040H
+ db 010H,001H,001H,008H,002H,000H,000H,000H
+ db 091H,004H,000H,000H,000H,000H,024H,000H
+ db 000H,000H,010H,080H,00AH,0AAH,044H,020H
+ db 002H,000H,000H,000H,000H,008H,040H,000H
+ db 000H,000H,000H,000H,000H,000H,048H,088H
+ db 000H,00AH,0AAH,0A1H,012H,042H,008H,020H
+ db 002H,008H,000H,000H,000H,008H,002H,042H
+ db 040H,000H,000H,000H,001H,000H,001H,000H
+ db 021H,000H,000H,001H,000H,048H,020H,000H
+ db 010H,008H,000H,020H,040H,090H,004H,000H
+ db 010H,010H,000H,000H,000H,001H,024H,090H
+ db 080H,090H,092H,004H,001H,024H,092H,010H
+ db 092H,041H,008H,010H,021H,002H,042H,010H
+ db 000H,000H,012H,010H,048H,000H,000H,000H
+ db 000H,024H,092H,049H,024H,092H,009H,021H
+ db 024H,020H,090H,040H,008H,001H,000H,009H
+ db 009H,011H,000H,080H,008H,004H,000H,008H
+ db 000H,001H,020H,012H,010H,008H,000H,042H
+ db 049H,000H,010H,001H,020H,011H,000H,040H
+ db 020H,010H,000H,040H,000H,012H,000H,091H
+ db 000H,044H,080H,021H,024H,040H,009H,010H
+ db 089H,000H,010H,008H,040H,024H,010H,088H
+ db 049H,024H,020H,041H,000H,001H,022H,000H
+ db 000H,000H,010H,000H,000H,000H,020H,001H
+ db 000H,000H,020H,000H,000H,010H,000H,012H
+ db 000H,008H,000H,000H,004H,000H,002H,000H
+ db 000H,004H,000H,040H,000H,091H,020H,012H
+ db 012H,000H,000H,012H,000H,000H,000H,000H
+ db 048H,020H,002H,008H,002H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,050H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,008H,011H
+ db 024H,024H,004H,000H,010H,080H,092H,048H
+ db 000H,022H,049H,009H,008H,000H,002H,010H
+ db 040H,012H,042H,024H,044H,081H,024H,082H
+ db 048H,000H,020H,020H,080H,000H,081H,020H
+ db 000H,000H,000H,000H,000H,000H,000H,009H
+ db 024H,092H,049H,024H,092H,049H,024H,092H
+ db 049H,024H,092H,049H,024H,089H,024H,001H
+ db 000H,004H,009H,021H,004H,092H,040H,048H
+ db 090H,049H,022H,024H,090H,008H,002H,044H
+ db 089H,011H,000H,000H,020H,080H,000H,001H
+ db 024H,044H,000H,080H,092H,049H,024H,091H
+ db 020H,041H,008H,081H,000H,004H,000H,008H
+ db 040H,010H,000H,000H,000H,092H,002H,008H
+ db 004H,000H,004H,000H,000H,000H,000H,001H
+ db 002H,024H,082H,002H,048H,009H,000H,010H
+ db 020H,048H,002H,020H,000H,000H,000H,000H
+ db 000H,041H,000H,000H,000H,042H,008H,000H
+ db 004H,000H,000H,002H,000H,000H,010H,000H
+ db 000H,000H,000H,004H,001H,002H,042H,020H
+ db 084H,000H,088H,004H,000H,004H,080H,011H
+ db 010H,012H,004H,008H,041H,020H,020H,010H
+ db 089H,002H,008H,000H,000H,010H,040H,004H
+ db 081H,022H,042H,024H,020H,000H,049H,024H
+ db 092H,048H,000H,000H,024H,000H,000H,020H
+ db 082H,000H,000H,020H,000H,008H,024H,004H
+ db 090H,048H,082H,044H,008H,001H,020H,044H
+ db 000H,082H,020H,011H,000H,024H,092H,004H
+ db 080H,024H,092H,049H,024H,092H,049H,024H
+ db 092H,049H,024H,092H,049H,024H,092H,049H
+ db 024H,092H,049H,024H,092H,049H,024H,092H
+ db 049H,024H,088H,049H,024H,082H,010H,089H
+ db 024H,090H,081H,020H,000H,001H,004H,000H
+ db 000H,010H,001H,020H,000H,011H,020H,001H
+ db 010H,008H,000H,000H,040H,010H,040H,080H
+ db 020H,000H,024H,008H,024H,090H,092H,004H
+ db 024H,090H,000H,001H,024H,020H,002H,040H
+ db 000H,000H,009H,000H,021H,024H,009H,000H
+ db 090H,090H,088H,008H,001H,000H,048H,004H
+ db 002H,000H,012H,012H,040H,000H,012H,010H
+ db 092H,004H,090H,049H,021H,000H,040H,021H
+ db 008H,022H,009H,009H,002H,040H,000H,002H
+ db 000H,012H,042H,040H,000H,000H,081H,000H
+ db 049H,000H,022H,009H,000H,020H,092H,001H
+ db 000H,010H,000H,010H,020H,004H,092H,000H
+ db 000H,048H,000H,090H,082H,009H,000H,000H
+ db 048H,042H,049H,024H,090H,090H,000H,092H
+ db 000H,092H,044H,020H,000H,000H,000H,000H
+ db 000H,000H,000H,021H,008H,048H,020H,002H
+ db 000H,000H,024H,002H,000H,010H,000H,012H
+ db 040H,008H,044H,002H,020H,000H,084H,080H
+ db 048H,000H,080H,000H,090H,000H,080H,000H
+ db 042H,000H,000H,040H,001H,002H,008H,000H
+ db 088H,001H,024H,020H,090H,080H,024H,000H
+ db 081H,000H,002H,040H,008H,001H,024H,048H
+ db 048H,008H,008H,041H,008H,090H,044H,048H
+ db 048H,001H,001H,000H,001H,020H,012H,010H
+ db 002H,041H,020H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,004H,082H,041H,020H,008H
+ db 009H,001H,020H,090H,048H,024H,000H,000H
+ db 010H,040H,000H,000H,000H,000H,080H,000H
+ db 000H,000H,004H,021H,008H,042H,010H,084H
+ db 021H,008H,042H,010H,084H,021H,008H,042H
+ db 010H,084H,020H,084H,021H,008H,042H,010H
+ db 084H,021H,008H,041H,008H,042H,010H,084H
+ db 021H,000H,000H,000H,000H,000H,000H,084H
+ db 021H,008H,042H,010H,084H,021H,008H,042H
+ db 008H,042H,010H,042H,010H,084H,021H,008H
+ db 042H,024H,092H,001H,024H,080H,024H,024H
+ db 092H,041H,024H,092H,049H,009H,009H,009H
+ db 020H,002H,002H,040H,000H,010H,082H,048H
+ db 049H,000H,024H,089H,009H,024H,092H,042H
+ db 048H,000H,048H,042H,012H,000H,004H,092H
+ db 049H,009H,024H,092H,042H,000H,000H,009H
+ db 004H,000H,001H,000H,021H,000H,000H,010H
+ db 012H,009H,002H,010H,004H,004H,024H,000H
+ db 090H,084H,000H,000H,001H,004H,090H,092H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 080H,004H,012H,041H,011H,024H,012H,004H
+ db 021H,008H,042H,010H,084H,021H,008H,042H
+ db 020H,080H,000H,008H,008H,042H,000H,000H
+ db 000H,024H,020H,002H,008H,021H,002H,010H
+ db 000H,020H,080H,040H,049H,000H,080H,048H
+ db 009H,012H,012H,004H,084H,084H,009H,001H
+ db 001H,022H,004H,022H,024H,088H,000H,024H
+ db 084H,000H,000H,000H,000H,000H,000H,01AH
+ db 004H,000H,001H,000H,021H,000H,000H,010H
+ db 012H,009H,002H,010H,004H,004H,024H,000H
+ db 090H,084H,000H,000H,001H,004H,090H,092H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 000H,000H,000H,000H,000H,000H,000H,000H
+ db 080H,004H,012H,041H,011H,024H,012H,004H
+ db 021H,008H,042H,010H,084H,021H,008H,042H
+ db 020H,080H,000H,008H,008H,042H,000H,000H
+ db 000H,024H,020H,002H,008H,021H,002H,010H
+ db 000H,020H,080H,040H,049H,000H,080H,048H
+ db 009H,012H,012H,004H,084H,084H,009H,001H
+ db 001H,022H,004H,022H,024H,088H,000H,024H
+ db 084H,000H,000H,000H,000H,000H,000H
end
diff --git a/mk2ddtz.sub b/mk2ddtz.sub
deleted file mode 100644
index 21978a2..0000000
--- a/mk2ddtz.sub
+++ /dev/null
@@ -1,24 +0,0 @@
-a:xsub
-; Build ddtz
-;
-; Assemble with Microsoft M80:
-m80 =ddtz.z80/z
-; If you prefer SLR, use the following line instead:
-;z80asm ddtz/M
-;
-; Generate PRL file:
-link ddtz[op]
-;
-; Convert to COM file:
-ddtz ddtz.prl
-F ddtznew.com
-W 200 H
-G 0
-;
-; If you don't have ddtz (yet), do it with ddt.
-; Adjust the end address, if file length changes:
-;
-;ddt ddtz.prl
-;M200,28FF,100
-;G0
-;save 40 ddtznew.com
diff --git a/mk3ddtz.sub b/mk3ddtz.sub
deleted file mode 100644
index 9251ae4..0000000
--- a/mk3ddtz.sub
+++ /dev/null
@@ -1,22 +0,0 @@
-; Build ddtz
-;
-; Assemble with Microsoft M80:
-m80 =ddtz.z80/z
-; If you prefer SLR, use the following line instead:
-;z80asm ddtz/M
-;
-; Generate PRL file:
-link ddtz[op]
-;
-; Convert to COM file:
-ddtz ddtz.prl
-<F ddtznew.com
-<W 200 H
-<G 0
-;
-; If you don't have ddtz (yet), do it with sid.
-; Adjust the end address, if file length changes:
-;
-;sid ddtz.prl
-;<Wddtznew.com,200,28FF
-;<G0