; Disassembled ddtz.com, version "DDT/Z [8101]"\r
-; with modified relocater.\r
;\r
-; Build steps:\r
-; - Assemble to a .REL file with M80 or a compatible assembler.\r
-; - Use Digital Research Link-80 to generate a .PRL file (op switch).\r
-; - Cut the .PRL header (first 256 byte) end rename the result to DDTZ.COM.\r
+; Assemble with M80 or a compatible assembler\r
+; to (re)create the original .com file.\r
\r
;-------------------------------------------------------------------------------\r
; Relocation loader\r
;\r
+ ASEG\r
+ ORG 00100H\r
\r
-TPA equ 0100h\r
- cseg\r
- .phase TPA\r
-\r
- LD SP,ldr_end+(stack-ddtz_base)\r
- LD DE,ldr_end+(expr_buf-ddtz_base)\r
+ LD SP,ldr_end+stack\r
LD C,BDOS_PSTR\r
+ LD DE,ldr_end+expr_buf\r
CALL BDOS\r
-\r
- LD HL,ldr_end+ddtz_size ;start of reloc bitmap\r
- ld bc,0108h ;init bit counter\r
-\r
+ LD HL,bitmap\r
EXX\r
LD HL,(BDOS+1)\r
LD (ldr_end+1),HL\r
LD BC,ddtz_size-1\r
LD D,B\r
LD E,0FFH\r
- INC DE ;size rounded up to next page boundary\r
- INC BC ;ddtz_size\r
- OR A\r
- SBC HL,DE ;BDOS - size\r
- LD (BDOS+1),HL ;-> new BDOS entry\r
-\r
- push hl\r
+ INC DE\r
+ INC BC\r
PUSH BC\r
- ld de,ldr_end\r
- sbc hl,de\r
- EX DE,HL ;-> DE\r
- LD HL,ldr_size\r
- add hl,bc\r
- ld b,h\r
- ld c,l\r
- LD HL,TPA\r
-reloc_lp:\r
+ OR A\r
+ SBC HL,DE\r
+ LD (BDOS+1),HL\r
+ EX DE,HL\r
+ LD HL,ldr_end-1\r
+A0128: INC HL\r
+ LD A,L\r
+ AND 007H\r
+ JR NZ,A0133\r
EXX\r
- djnz reloc_nl\r
- ld b,c ;reload bit counter\r
- LD e,(HL) ;get next 8 relocation bits\r
+ LD A,(HL)\r
INC HL\r
-reloc_nl:\r
- sla e\r
EXX\r
- JR NC,reloc_next\r
+ EX AF,AF'\r
+A0133: EX AF,AF'\r
+ ADD A,A\r
+ JR NC,A0141\r
+ EX AF,AF'\r
DEC HL\r
LD A,(HL)\r
ADD A,E\r
LD A,(HL)\r
ADC A,D\r
LD (HL),A\r
-reloc_next:\r
- cpi\r
- jp pe,reloc_lp\r
- dec hl\r
-\r
+ EX AF,AF'\r
+A0141: EX AF,AF'\r
+ DEC BC\r
+ LD A,B\r
+ OR C\r
+ JR NZ,A0128\r
POP BC\r
- pop de\r
EX DE,HL\r
ADD HL,BC\r
EX DE,HL\r
DEC DE\r
LDDR\r
- LD HL,conbuf+2-ddtz_base\r
+ LD HL,conbuf+2\r
ADD HL,DE\r
JP (HL)\r
\r
+ rept (($+7) and 0FFF8H) - $\r
+ DEFB 000H\r
+ endm\r
+\r
ldr_end:\r
-ldr_size equ $ - TPA\r
\r
- .dephase\r
+ .phase 0\r
;-------------------------------------------------------------------------------\r
; DDT/Z core\r
;\r
exe_hl:\r
call CALL_HL ;010a cd 0f 01 . . .\r
jr mainloop ;010d 18 ae . .\r
+CALL_HL:\r
+ jp (hl) ;010f e9 .\r
\r
CMDTAB:\r
defw cmd_@ ;0110 92 0d . .\r
jr c,l022dh ;0258 38 d3 8 .\r
ret ;025a c9 .\r
\r
-p_char_lparen:\r
- ld a,'('\r
- jr outchar\r
-\r
outquote:\r
ld a,'''' ;025b 3e 27 > '\r
outchar:\r
\r
expr_buf:\r
db 'DDT/Z',TAB\r
- db '[8101] 001',CR,LF,'$'\r
+ db '[8101]',CR,LF,'$'\r
+ db 000h ;0b2b 00 .\r
+ db 06dh ;0b2c 6d m\r
+ db 085h ;0b2d 85 .\r
+ db 0cch ;0b2e cc .\r
+ db 0f6h ;0b2f f6 .\r
+ db 053h ;0b30 53 S\r
+ db 05bh ;0b31 5b [\r
\r
ds EXPR_BUF_SIZE - ($ - expr_buf)\r
expr_bufe:\r
ld b,(hl) ;1285 46 F\r
ex de,hl ;1286 eb .\r
pop de ;1287 d1 .\r
-\r
-CALL_HL:\r
jp (hl) ;1288 e9 .\r
\r
b_1289_start:\r
defw as.AND_CP_OR_SUB_XOR ;XOR 134f a8 15 . .\r
defb 0a8h ; 1351 a8 .\r
\r
- defw as.IN0 ;IN0\r
- defb 000h ;\r
- defw as.MLT ;MLT\r
- defb 04ch ;\r
- defw gen.opc.ED2 ;OTDM\r
- defb 08bh ;\r
- defw gen.opc.ED2 ;OTDMR\r
- defb 09bh ;\r
- defw gen.opc.ED2 ;OTIM\r
- defb 083h ;\r
- defw gen.opc.ED2 ;OTIMR\r
- defb 093h ;\r
- defw as.OUTO ;OUT0\r
- defb 001h ;\r
- defw gen.opc.ED2 ;SLP\r
- defb 076h ;\r
- defw as.TST ;TST\r
- defb 004h ;\r
- defw as.TSTIO ;TSTIO\r
- defb 074h ;\r
-\r
-as.TST:\r
- call arg.r_HL_A ;\r
- jr nc,as.tst_0\r
- rlca\r
- rlca\r
- rlca\r
- add a,b\r
- ld b,a\r
- jp gen.opc.ED2\r
-as.tst_0:\r
- ld b,064h\r
-as.TSTIO:\r
- call arg.imm_8bit ;\r
- jr as.store_io0\r
-\r
-as.IN0:\r
- call arg.r_HL_A ;\r
- jr nc,error7\r
- cp 006h\r
- jr z,error7\r
- rlca\r
- rlca\r
- rlca\r
- add a,b\r
- ld b,a\r
- call assert_comma ;\r
- call arg.addr_8bit ;\r
- jr as.store_io0\r
-\r
-as.OUTO:\r
- call arg.addr_8bit ;\r
- call assert_comma ;\r
- call arg.r_HL_A ;\r
- jr nc,error7\r
- cp 006h\r
- jr z,error7\r
- rlca\r
- rlca\r
- rlca\r
- add a,b\r
- ld b,a\r
-\r
-as.store_io0:\r
- call assert_eol\r
- ld (iy+000h),0edh\r
- ld (iy+001h),b\r
- ld (iy+002h),l\r
- ld c,003h\r
- ret\r
-\r
-as.MLT:\r
- call arg.ww ;\r
- jr nc,error7\r
- add a,b\r
- ld b,a\r
- jp gen.opc.ED2\r
-\r
-error7:\r
- jp ERROR\r
-\r
as.LD:\r
call arg.r_HL_A ;1352 cd 2e 18 . . .\r
jr c,l13d4h ;1355 38 7d 8 }\r
ld a,d ;194d 7a z\r
or e ;194e b3 .\r
ret z ;194f c8 .\r
- call p_char_lparen ;1952 cd 5d 02 . ] .\r
+ ld a,'(' ;1950 3e 28 > (\r
+ call outchar ;1952 cd 5d 02 . ] .\r
ld a,'@' ;1955 3e 40 > @\r
call outchar ;1957 cd 5d 02 . ] .\r
and a ;195a a7 .\r
sbc hl,de ;195b ed 52 . R\r
call out_hl ;195d cd 13 02 . . .\r
- jp out_rparen ;1962 c3 5d 02 . ] .\r
+ ld a,')' ;1960 3e 29 > )\r
+ jp outchar ;1962 c3 5d 02 . ] .\r
\r
p_disas_instr:\r
sub a ;1965 97 .\r
push bc ;196e c5 .\r
call p_mnemonic ;196f cd b9 1e . . .\r
ex de,hl ;1972 eb .\r
- call call_hl ;1973 cd c1 19 . . .\r
+ call CALL_HL2 ;1973 cd c1 19 . . .\r
pop bc ;1976 c1 .\r
ld a,(l1ffdh) ;1977 3a fd 1f : . .\r
ld hl,(l1ffbh) ;197a 2a fb 1f * . .\r
scf ;19bf 37 7\r
ret ;19c0 c9 .\r
\r
+CALL_HL2:\r
+ jp (hl) ;19c1 e9 .\r
+\r
disas_pfx.DDFD:\r
inc iy ;19c2 fd 23 . #\r
ld hl,b_19ef_start ;19c4 21 ef 19 ! . .\r
defb 073h ;19fb 73 s\r
defb 074h ;19fc 74 t\r
defb 075h ;19fd 75 u\r
+; ????\r
+ defb 076h ;19fe 76 v ????\r
defb 077h ;19ff 77 w\r
defb 07eh ;1a00 7e ~\r
defb 086h ;1a01 86 .\r
call lookup_opc ;1a27 cd 97 1a . . .\r
ld b,2 ;1a2a 06 02 . .\r
ret c ;1a2c d8 .\r
-\r
- ld hl,l228bh\r
- call lookup_opc\r
- ld b,3\r
- ret c\r
ld hl,b_1c40_start ;1a2d 21 40 1c ! @ .\r
call lookup_opc ;1a30 cd 97 1a . . .\r
ld b,4 ;1a33 06 04 . .\r
db 0b9h,018h ;cpdr\r
db 0bah,047h ;indr\r
db 0bbh,06eh ;otdr\r
- db 08bh,0d5h ;otdm\r
- db 09bh,0d9h ;otdmr\r
- db 083h,0deh ;otim\r
- db 093h,0e2h ;otimr\r
- db 076h,0ebh ;slp\r
db 0ffh ;<end mark>\r
\r
b_1bf4_start:\r
dw l1d9ch ;\r
db 0ffh,05fh,056h ;ld a,r\r
dw l1da1h\r
- db 0cfh,04ch,0d2h ;mlt rr\r
- dw p_arg_ww\r
- db 0c7h,004h,0eeh ;tst r\r
- dw p_arg_r\r
- db 0\r
-\r
-l228bh:\r
- db 0e7h,000h,0cfh ;in0 r,(m) ;r=b,c,d,e\r
- dw p_arg_r_m\r
- db 0f7h,020h,0cfh ;in0 r,(m) ;r=h,l\r
- dw p_arg_r_m\r
- db 0ffh,038h,0cfh ;in0 a,(m)\r
- dw p_arg_r_m\r
- db 0e7h,001h,0e7h ;out0 (m),r ;r=b,c,d,e\r
- dw p_arg_m_r\r
- db 0f7h,021h,0e7h ;out0 (m),r ;r=h,l\r
- dw p_arg_m_r\r
- db 0ffh,039h,0e7h ;out0 (m),a\r
- dw p_arg_m_r\r
- db 0ffh,064h,0eeh ;tst m\r
- dw l1d09h\r
- db 0ffh,074h,0f1h ;tstio m\r
- dw l1d09h\r
db 0\r
\r
b_1c40_start:\r
jp p_arg_rs ;1c94 c3 30 1e . 0 .\r
l1c97h:\r
ret ;1c97 c9 .\r
-\r
-;-----------------------------------------------------\r
-p_arg_r_m:\r
- call p_arg_r\r
- call p_char_comma\r
- jp sub_1d2ch\r
-\r
-p_arg_m_r:\r
- call sub_1d2ch\r
- call p_char_comma\r
- jp p_arg_r\r
-;-----------------------------------------------------\r
-\r
l1c98h:\r
ld a,(iy+000h) ;1c98 fd 7e 00 . ~ .\r
and 038h ;1c9b e6 38 . 8\r
DC '(SP),'\r
\r
l1caeh:\r
- call p_char_lparen ;1cb0 cd 5d 02 . ] .\r
+ ld a,'(' ;1cae 3e 28 > (\r
+ call outchar ;1cb0 cd 5d 02 . ] .\r
call p_arg_hlixiy ;1cb3 cd 7e 1e . ~ .\r
- jr out_rparen\r
-\r
+ ld a,')' ;1cb6 3e 29 > )\r
+ jp outchar ;1cb8 c3 5d 02 . ] .\r
p_arg_ex_dehl:\r
ld hl,l1773h ;1cbb 21 73 17 ! s .\r
jp pstr ;1cbe c3 88 02 . . .\r
l1ce5h:\r
call p_A_comma ;1ce5 cd b1 1e . . .\r
sub_1ce8h:\r
- call p_char_lparen ;1cea cd 5d 02 . ] .\r
- call p_arg_ww ;1ced cd 8b 1e . . .\r
-out_rparen:\r
- jp p_char_rparen ;1cf2 c3 5d 02 . ] .\r
-\r
+ ld a,'(' ;1ce8 3e 28 > (\r
+ call outchar ;1cea cd 5d 02 . ] .\r
+ call p_arg_ww ;1ced cd 8b 1e . . .\r
+ ld a,')' ;1cf0 3e 29 > )\r
+ jp outchar ;1cf2 c3 5d 02 . ] .\r
l1cf5h:\r
call p_A_comma ;1cf5 cd b1 1e . . .\r
jr l1d09h ;1cf8 18 0f . .\r
l1d29h:\r
call p_A_comma ;1d29 cd b1 1e . . .\r
sub_1d2ch:\r
- call p_char_lparen ;1d2e cd 5d 02 . ] .\r
+ ld a,'(' ;1d2c 3e 28 > (\r
+ call outchar ;1d2e cd 5d 02 . ] .\r
ld a,(iy+001h) ;1d31 fd 7e 01 . ~ .\r
jp l1e6bh ;1d34 c3 6b 1e . k .\r
l1d37h:\r
call sub_1d2ch ;1d37 cd 2c 1d . , .\r
- jr p_char_comma_A\r
+ call p_char_comma ;1d3a cd b4 1e . . .\r
+p_char_A:\r
+ ld a,'A' ;1d3d 3e 41 > A\r
+ jp outchar ;1d3f c3 5d 02 . ] .\r
\r
p_arg_cc_mn:\r
call p_arg_cc ;1d42 cd 9d 1e . . .\r
call sub_1e13h ;1d74 cd 13 1e . . .\r
p_char_comma_A:\r
call p_char_comma ;1d77 cd b4 1e . . .\r
-p_char_A:\r
ld a,'A' ;1d7a 3e 41 > A\r
- jr outchar1 ;1d87 18 06 . .\r
+ jp outchar ;1d87 18 06 . .\r
p_arg_a_addr:\r
call p_A_comma ;1d7f cd b1 1e . . .\r
jp sub_1e13h ;1d82 c3 13 1e . . .\r
l1d85h:\r
ld a,'0' ;1d85 3e 30 > 0\r
- jr outchar1 ;1d87 18 06 . .\r
+ jr l1d8fh ;1d87 18 06 . .\r
l1d89h:\r
ld a,'1' ;1d89 3e 31 > 1\r
- jr outchar1 ;1d8b 18 02 . .\r
+ jr l1d8fh ;1d8b 18 02 . .\r
l1d8dh:\r
ld a,'2' ;1d8d 3e 32 > 2\r
- jr outchar1 ;1d8b 18 02 . .\r
-\r
-p_A_comma:\r
- call p_char_A ;1eb1 cd 3d 1d . = .\r
-p_char_comma:\r
- ld a,',' ;1eb4 3e 2c > ,\r
-outchar1:\r
- jp outchar ;1eb6 c3 5d 02 . ] .\r
-\r
+l1d8fh:\r
+ jp outchar ;1d8f c3 5d 02 . ] .\r
l1d92h:\r
ld hl,b_1da7_start ;1d92 21 a7 1d ! . .\r
jr l1da4h ;1d95 18 0d . .\r
jr p_arg_r0 ;1e11 18 20 .\r
\r
sub_1e13h:\r
- call p_char_lparen ;1e15 cd 5d 02 . ] .\r
+ ld a,'(' ;1e13 3e 28 > (\r
+ call outchar ;1e15 cd 5d 02 . ] .\r
ld l,(iy+001h) ;1e18 fd 6e 01 . n .\r
ld h,(iy+002h) ;1e1b fd 66 02 . f .\r
ld a,001h ;1e1e 3e 01 > .\r
neg ;1e69 ed 44 . D\r
l1e6bh:\r
call out_hex ;1e6b cd 18 02 . . .\r
- jr p_char_rparen\r
+ ld a,')' ;1e6e 3e 29 > )\r
+ jp outchar ;1e70 c3 5d 02 . ] .\r
\r
p_arg_r1:\r
ld hl,t_BCDEHL_HL_A ;1e73 21 96 1f ! . .\r
rra ;1ea2 1f .\r
and 007h ;1ea3 e6 07 . .\r
ld hl,t_tstfl_ZCPS ;1ea5 21 dc 1f ! . .\r
+ jr l1eaah ;1ea8 18 00 . .\r
+l1eaah:\r
p_arg:\r
ld b,a ;1eaa 47 G\r
call sel_dc_string ;1eab cd 3d 03 . = .\r
jp pstr ;1eae c3 88 02 . . .\r
\r
+p_A_comma:\r
+ call p_char_A ;1eb1 cd 3d 1d . = .\r
+p_char_comma:\r
+ ld a,',' ;1eb4 3e 2c > ,\r
+ jp outchar ;1eb6 c3 5d 02 . ] .\r
+\r
p_mnemonic:\r
call pstr ;1eb9 cd 88 02 . . .\r
l1ebch:\r
inc c ;1ebf 0c .\r
ld a,c ;1ec0 79 y\r
cp 5 ;1ec1 fe 05 . .\r
- jr c,l1ebch ;1ec3 20 f7 .\r
+ jr nz,l1ebch ;1ec3 20 f7 .\r
ret ;1ec5 c9 .\r
\r
t_MNEMONICS:\r
DC 'SRL'\r
DC 'SUB'\r
DC 'XOR'\r
+ if 0\r
DC 'IN0'\r
DC 'MLT'\r
DC 'OTDM'\r
DC 'SLP'\r
DC 'TST'\r
DC 'TSTIO'\r
+ endif\r
DB 0\r
\r
t_BCDEHL_HL_A:\r
ddtz_end:\r
\r
;-------------------------------------------------------------------------------\r
+ .dephase\r
+bitmap:\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,001H,044H,040H,000H\r
+ db 000H,010H,084H,090H,080H,010H,000H,001H\r
+ db 024H,092H,049H,009H,024H,084H,080H,004H\r
+ db 080H,048H,055H,055H,055H,055H,055H,055H\r
+ db 054H,024H,042H,048H,000H,010H,000H,000H\r
+ db 000H,080H,000H,080H,002H,008H,010H,082H\r
+ db 004H,000H,080H,084H,044H,008H,024H,000H\r
+ db 084H,004H,082H,001H,000H,000H,041H,000H\r
+ db 008H,021H,002H,000H,000H,090H,000H,020H\r
+ db 020H,001H,000H,092H,004H,021H,009H,000H\r
+ db 000H,008H,010H,088H,004H,080H,000H,000H\r
+ db 004H,000H,020H,000H,000H,001H,000H,080H\r
+ db 020H,000H,084H,081H,004H,090H,040H,040H\r
+ db 010H,001H,001H,008H,002H,000H,000H,000H\r
+ db 091H,004H,000H,000H,000H,000H,024H,000H\r
+ db 000H,000H,010H,080H,00AH,0AAH,044H,020H\r
+ db 002H,000H,000H,000H,000H,008H,040H,000H\r
+ db 000H,000H,000H,000H,000H,000H,048H,088H\r
+ db 000H,00AH,0AAH,0A1H,012H,042H,008H,020H\r
+ db 002H,008H,000H,000H,000H,008H,002H,042H\r
+ db 040H,000H,000H,000H,001H,000H,001H,000H\r
+ db 021H,000H,000H,001H,000H,048H,020H,000H\r
+ db 010H,008H,000H,020H,040H,090H,004H,000H\r
+ db 010H,010H,000H,000H,000H,001H,024H,090H\r
+ db 080H,090H,092H,004H,001H,024H,092H,010H\r
+ db 092H,041H,008H,010H,021H,002H,042H,010H\r
+ db 000H,000H,012H,010H,048H,000H,000H,000H\r
+ db 000H,024H,092H,049H,024H,092H,009H,021H\r
+ db 024H,020H,090H,040H,008H,001H,000H,009H\r
+ db 009H,011H,000H,080H,008H,004H,000H,008H\r
+ db 000H,001H,020H,012H,010H,008H,000H,042H\r
+ db 049H,000H,010H,001H,020H,011H,000H,040H\r
+ db 020H,010H,000H,040H,000H,012H,000H,091H\r
+ db 000H,044H,080H,021H,024H,040H,009H,010H\r
+ db 089H,000H,010H,008H,040H,024H,010H,088H\r
+ db 049H,024H,020H,041H,000H,001H,022H,000H\r
+ db 000H,000H,010H,000H,000H,000H,020H,001H\r
+ db 000H,000H,020H,000H,000H,010H,000H,012H\r
+ db 000H,008H,000H,000H,004H,000H,002H,000H\r
+ db 000H,004H,000H,040H,000H,091H,020H,012H\r
+ db 012H,000H,000H,012H,000H,000H,000H,000H\r
+ db 048H,020H,002H,008H,002H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,050H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,008H,011H\r
+ db 024H,024H,004H,000H,010H,080H,092H,048H\r
+ db 000H,022H,049H,009H,008H,000H,002H,010H\r
+ db 040H,012H,042H,024H,044H,081H,024H,082H\r
+ db 048H,000H,020H,020H,080H,000H,081H,020H\r
+ db 000H,000H,000H,000H,000H,000H,000H,009H\r
+ db 024H,092H,049H,024H,092H,049H,024H,092H\r
+ db 049H,024H,092H,049H,024H,089H,024H,001H\r
+ db 000H,004H,009H,021H,004H,092H,040H,048H\r
+ db 090H,049H,022H,024H,090H,008H,002H,044H\r
+ db 089H,011H,000H,000H,020H,080H,000H,001H\r
+ db 024H,044H,000H,080H,092H,049H,024H,091H\r
+ db 020H,041H,008H,081H,000H,004H,000H,008H\r
+ db 040H,010H,000H,000H,000H,092H,002H,008H\r
+ db 004H,000H,004H,000H,000H,000H,000H,001H\r
+ db 002H,024H,082H,002H,048H,009H,000H,010H\r
+ db 020H,048H,002H,020H,000H,000H,000H,000H\r
+ db 000H,041H,000H,000H,000H,042H,008H,000H\r
+ db 004H,000H,000H,002H,000H,000H,010H,000H\r
+ db 000H,000H,000H,004H,001H,002H,042H,020H\r
+ db 084H,000H,088H,004H,000H,004H,080H,011H\r
+ db 010H,012H,004H,008H,041H,020H,020H,010H\r
+ db 089H,002H,008H,000H,000H,010H,040H,004H\r
+ db 081H,022H,042H,024H,020H,000H,049H,024H\r
+ db 092H,048H,000H,000H,024H,000H,000H,020H\r
+ db 082H,000H,000H,020H,000H,008H,024H,004H\r
+ db 090H,048H,082H,044H,008H,001H,020H,044H\r
+ db 000H,082H,020H,011H,000H,024H,092H,004H\r
+ db 080H,024H,092H,049H,024H,092H,049H,024H\r
+ db 092H,049H,024H,092H,049H,024H,092H,049H\r
+ db 024H,092H,049H,024H,092H,049H,024H,092H\r
+ db 049H,024H,088H,049H,024H,082H,010H,089H\r
+ db 024H,090H,081H,020H,000H,001H,004H,000H\r
+ db 000H,010H,001H,020H,000H,011H,020H,001H\r
+ db 010H,008H,000H,000H,040H,010H,040H,080H\r
+ db 020H,000H,024H,008H,024H,090H,092H,004H\r
+ db 024H,090H,000H,001H,024H,020H,002H,040H\r
+ db 000H,000H,009H,000H,021H,024H,009H,000H\r
+ db 090H,090H,088H,008H,001H,000H,048H,004H\r
+ db 002H,000H,012H,012H,040H,000H,012H,010H\r
+ db 092H,004H,090H,049H,021H,000H,040H,021H\r
+ db 008H,022H,009H,009H,002H,040H,000H,002H\r
+ db 000H,012H,042H,040H,000H,000H,081H,000H\r
+ db 049H,000H,022H,009H,000H,020H,092H,001H\r
+ db 000H,010H,000H,010H,020H,004H,092H,000H\r
+ db 000H,048H,000H,090H,082H,009H,000H,000H\r
+ db 048H,042H,049H,024H,090H,090H,000H,092H\r
+ db 000H,092H,044H,020H,000H,000H,000H,000H\r
+ db 000H,000H,000H,021H,008H,048H,020H,002H\r
+ db 000H,000H,024H,002H,000H,010H,000H,012H\r
+ db 040H,008H,044H,002H,020H,000H,084H,080H\r
+ db 048H,000H,080H,000H,090H,000H,080H,000H\r
+ db 042H,000H,000H,040H,001H,002H,008H,000H\r
+ db 088H,001H,024H,020H,090H,080H,024H,000H\r
+ db 081H,000H,002H,040H,008H,001H,024H,048H\r
+ db 048H,008H,008H,041H,008H,090H,044H,048H\r
+ db 048H,001H,001H,000H,001H,020H,012H,010H\r
+ db 002H,041H,020H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,004H,082H,041H,020H,008H\r
+ db 009H,001H,020H,090H,048H,024H,000H,000H\r
+ db 010H,040H,000H,000H,000H,000H,080H,000H\r
+ db 000H,000H,004H,021H,008H,042H,010H,084H\r
+ db 021H,008H,042H,010H,084H,021H,008H,042H\r
+ db 010H,084H,020H,084H,021H,008H,042H,010H\r
+ db 084H,021H,008H,041H,008H,042H,010H,084H\r
+ db 021H,000H,000H,000H,000H,000H,000H,084H\r
+ db 021H,008H,042H,010H,084H,021H,008H,042H\r
+ db 008H,042H,010H,042H,010H,084H,021H,008H\r
+ db 042H,024H,092H,001H,024H,080H,024H,024H\r
+ db 092H,041H,024H,092H,049H,009H,009H,009H\r
+ db 020H,002H,002H,040H,000H,010H,082H,048H\r
+ db 049H,000H,024H,089H,009H,024H,092H,042H\r
+ db 048H,000H,048H,042H,012H,000H,004H,092H\r
+ db 049H,009H,024H,092H,042H,000H,000H,009H\r
+ db 004H,000H,001H,000H,021H,000H,000H,010H\r
+ db 012H,009H,002H,010H,004H,004H,024H,000H\r
+ db 090H,084H,000H,000H,001H,004H,090H,092H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 080H,004H,012H,041H,011H,024H,012H,004H\r
+ db 021H,008H,042H,010H,084H,021H,008H,042H\r
+ db 020H,080H,000H,008H,008H,042H,000H,000H\r
+ db 000H,024H,020H,002H,008H,021H,002H,010H\r
+ db 000H,020H,080H,040H,049H,000H,080H,048H\r
+ db 009H,012H,012H,004H,084H,084H,009H,001H\r
+ db 001H,022H,004H,022H,024H,088H,000H,024H\r
+ db 084H,000H,000H,000H,000H,000H,000H,01AH\r
+ db 004H,000H,001H,000H,021H,000H,000H,010H\r
+ db 012H,009H,002H,010H,004H,004H,024H,000H\r
+ db 090H,084H,000H,000H,001H,004H,090H,092H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 000H,000H,000H,000H,000H,000H,000H,000H\r
+ db 080H,004H,012H,041H,011H,024H,012H,004H\r
+ db 021H,008H,042H,010H,084H,021H,008H,042H\r
+ db 020H,080H,000H,008H,008H,042H,000H,000H\r
+ db 000H,024H,020H,002H,008H,021H,002H,010H\r
+ db 000H,020H,080H,040H,049H,000H,080H,048H\r
+ db 009H,012H,012H,004H,084H,084H,009H,001H\r
+ db 001H,022H,004H,022H,024H,088H,000H,024H\r
+ db 084H,000H,000H,000H,000H,000H,000H\r
\r
end\r