Mercurial > hg > Members > kono > nitros9-code
changeset 1979:bc8c21346cf4
Disassembly of 1st half of source and correction of BAM to sectors in allocation map. Now calculation does not fail if DD.MAP is a exact multiple of $100 bytes.
| author | robert |
|---|---|
| date | Thu, 12 Jan 2006 07:32:00 +0000 |
| parents | c2d3c4232663 |
| children | e49e6d80c06e |
| files | level1/cmds/ded.asm |
| diffstat | 1 files changed, 2194 insertions(+), 763 deletions(-) [+] |
line wrap: on
line diff
--- a/level1/cmds/ded.asm Wed Jan 11 04:20:37 2006 +0000 +++ b/level1/cmds/ded.asm Thu Jan 12 07:32:00 2006 +0000 @@ -1,763 +1,2193 @@ - IFNE 1 -L0000 fcb $87,$CD,$17,$A2,$00,$1C,$11,$82 .M.".... -L0008 fcb $8F,$06,$65,$03,$16,$0C,$1F,$20 ..e.... -L0010 fcb $00,$1F,$21,$00,$04,$0B,$05,$21 ..!....! -L0018 fcb $00,$05,$20,$00,$64,$45,$E4,$05 .. .dEd. -L0020 fcb $43,$6F,$70,$79,$72,$69,$67,$68 Copyrigh -L0028 fcb $74,$20,$31,$39,$38,$37,$20,$44 t 1987 D -L0030 fcb $6F,$75,$67,$20,$44,$65,$4D,$61 oug DeMa -L0038 fcb $72,$74,$69,$6E,$69,$73,$4C,$53 rtinisLS -L0040 fcb $4E,$3D,$A4,$53,$45,$43,$54,$4F N=$SECTO -L0048 fcb $52,$20,$3D,$20,$A4,$20,$20,$20 R = $ -L0050 fcb $20,$20,$20,$30,$20,$20,$31,$20 0 1 -L0058 fcb $20,$32,$20,$20,$33,$20,$20,$34 2 3 4 -L0060 fcb $20,$20,$35,$20,$20,$36,$20,$20 5 6 -L0068 fcb $37,$20,$20,$38,$20,$20,$39,$20 7 8 9 -L0070 fcb $20,$41,$20,$20,$42,$20,$20,$43 A B C -L0078 fcb $20,$20,$44,$20,$20,$45,$20,$20 D E -L0080 fcb $46,$20,$20,$20,$20,$30,$20,$32 F 0 2 -L0088 fcb $20,$34,$20,$36,$20,$38,$20,$41 4 6 8 A -L0090 fcb $20,$43,$20,$45,$20,$0D,$43,$4D C E .CM -L0098 fcb $44,$3A,$A0,$3C,$42,$52,$45,$41 D: <BREA -L00A0 fcb $4B,$3E,$20,$74,$6F,$67,$67,$6C K> toggl -L00A8 fcb $65,$73,$20,$48,$45,$58,$2F,$41 es HEX/A -L00B0 fcb $53,$43,$49,$49,$20,$65,$64,$69 SCII edi -L00B8 fcb $74,$20,$6D,$6F,$64,$65,$73,$20 t modes -L00C0 fcb $20,$20,$20,$20,$3C,$45,$4E,$54 <ENT -L00C8 fcb $45,$52,$3E,$20,$65,$78,$69,$74 ER> exit -L00D0 fcb $73,$20,$65,$64,$69,$74,$20,$6D s edit m -L00D8 fcb $6F,$64,$E5,$5A,$61,$70,$A0,$62 odeZap b -L00E0 fcb $79,$74,$65,$3A,$A0,$63,$68,$61 yte: cha -L00E8 fcb $72,$3A,$A0,$41,$72,$65,$20,$79 r: Are y -L00F0 fcb $6F,$75,$20,$73,$75,$72,$65,$3F ou sure? -L00F8 fcb $20,$28,$59,$2F,$4E,$29,$A0,$57 (Y/N) W -L0100 fcb $72,$69,$74,$69,$6E,$67,$20,$73 riting s -L0108 fcb $65,$63,$74,$6F,$72,$2E,$2E,$AE ector... -L0110 fcb $4F,$55,$54,$46,$49,$4C,$45,$3A OUTFILE: -L0118 fcb $A0,$56,$65,$72,$69,$66,$79,$69 Verifyi -L0120 fcb $6E,$67,$2E,$2E,$AE,$56,$65,$72 ng...Ver -L0128 fcb $69,$66,$79,$20,$61,$62,$6F,$72 ify abor -L0130 fcb $74,$65,$64,$2E,$2E,$AE,$73,$68 ted...sh -L0138 fcb $65,$6C,$EC,$4C,$69,$6E,$6B,$20 ellLink -L0140 fcb $74,$6F,$20,$77,$68,$69,$63,$68 to which -L0148 fcb $20,$6D,$6F,$64,$75,$6C,$65,$3F module? -L0150 fcb $A0,$4F,$66,$66,$20,$20,$4C,$65 Off Le -L0158 fcb $6E,$20,$20,$4E,$61,$6D,$65,$0A n Name. -L0160 fcb $2D,$2D,$2D,$2D,$20,$2D,$2D,$2D ---- --- -L0168 fcb $2D,$20,$2D,$2D,$2D,$2D,$0D,$4D - ----.M -L0170 fcb $4F,$44,$55,$4C,$45,$3A,$20,$A0 ODULE: -L0178 fcb $4F,$46,$46,$53,$45,$54,$3A,$20 OFFSET: -L0180 fcb $A4,$1F,$24,$2D,$20,$45,$78,$70 $.$- Exp -L0188 fcb $65,$72,$74,$20,$4D,$6F,$64,$65 ert Mode -L0190 fcb $20,$2D,$1F,$A5,$46,$69,$6E,$64 -.%Find -L0198 fcb $20,$62,$79,$74,$65,$20,$73,$74 byte st -L01A0 fcb $72,$69,$6E,$67,$20,$A4,$46,$69 ring $Fi -L01A8 fcb $6E,$64,$20,$63,$68,$61,$72,$20 nd char -L01B0 fcb $73,$74,$72,$69,$6E,$67,$3A,$A0 string: -L01B8 fcb $53,$65,$61,$72,$63,$68,$69,$6E Searchin -L01C0 fcb $67,$2E,$2E,$AE,$43,$75,$72,$72 g...Curr -L01C8 fcb $65,$6E,$74,$20,$46,$69,$6C,$65 ent File -L01D0 fcb $20,$4C,$65,$6E,$67,$74,$68,$20 Length -L01D8 fcb $A4,$4E,$65,$77,$20,$4C,$65,$6E $New Len -L01E0 fcb $67,$74,$68,$3F,$20,$A4,$2A,$2A gth? $** -L01E8 fcb $20,$52,$45,$53,$54,$41,$52,$54 RESTART -L01F0 fcb $2C,$20,$45,$6E,$74,$65,$72,$20 , Enter -L01F8 fcb $70,$61,$74,$68,$6E,$61,$6D,$65 pathname -L0200 fcb $3A,$A0,$42,$41,$4D,$3A,$20,$46 : BAM: F -L0208 fcb $72,$6F,$6D,$20,$53,$65,$63,$74 rom Sect -L0210 fcb $6F,$72,$3A,$24,$20,$20,$20,$20 or:$ -L0218 fcb $20,$20,$20,$74,$6F,$20,$24,$20 to $ -L0220 fcb $20,$20,$20,$20,$20,$A0,$42,$69 Bi -L0228 fcb $74,$73,$BA,$07,$53,$65,$63,$74 ts:.Sect -L0230 fcb $6F,$72,$20,$53,$74,$61,$63,$6B or Stack -L0238 fcb $20,$46,$75,$6C,$6C,$A0,$20,$20 Full -L0240 fcb $20,$55,$70,$2F,$44,$6F,$77,$6E Up/Down -L0248 fcb $20,$41,$72,$72,$6F,$77,$73,$20 Arrows -L0250 fcb $20,$52,$65,$61,$64,$20,$26,$20 Read & -L0258 fcb $64,$69,$73,$70,$6C,$61,$79,$20 display -L0260 fcb $4E,$65,$78,$74,$2F,$50,$72,$65 Next/Pre -L0268 fcb $76,$69,$6F,$75,$73,$20,$73,$65 vious se -L0270 fcb $63,$74,$6F,$72,$0A,$20,$3C,$43 ctor. <C -L0278 fcb $52,$3E,$20,$43,$6C,$65,$61,$6E R> Clean -L0280 fcb $20,$75,$70,$20,$74,$68,$65,$20 up the -L0288 fcb $73,$63,$72,$65,$65,$6E,$20,$64 screen d -L0290 fcb $69,$73,$70,$6C,$61,$79,$0A,$20 isplay. -L0298 fcb $20,$20,$2A,$20,$20,$52,$65,$73 * Res -L02A0 fcb $74,$61,$72,$74,$0A,$20,$20,$20 tart. -L02A8 fcb $24,$20,$20,$46,$6F,$72,$6B,$20 $ Fork -L02B0 fcb $61,$20,$53,$48,$45,$4C,$4C,$20 a SHELL -L02B8 fcb $28,$43,$74,$72,$6C,$2D,$42,$52 (Ctrl-BR -L02C0 fcb $45,$41,$4B,$20,$74,$6F,$20,$72 EAK to r -L02C8 fcb $65,$74,$75,$72,$6E,$29,$0A,$20 eturn). -L02D0 fcb $20,$20,$41,$20,$20,$41,$70,$70 A App -L02D8 fcb $65,$6E,$64,$20,$64,$69,$73,$70 end disp -L02E0 fcb $6C,$61,$79,$65,$64,$20,$73,$65 layed se -L02E8 fcb $63,$74,$6F,$72,$20,$74,$6F,$20 ctor to -L02F0 fcb $6F,$75,$74,$70,$75,$74,$20,$66 output f -L02F8 fcb $69,$6C,$65,$0A,$20,$20,$20,$43 ile. C -L0300 fcb $20,$20,$43,$6C,$6F,$73,$65,$20 Close -L0308 fcb $6F,$75,$74,$70,$75,$74,$20,$66 output f -L0310 fcb $69,$6C,$65,$0A,$20,$20,$20,$44 ile. D -L0318 fcb $20,$20,$44,$69,$64,$64,$6C,$65 Diddle -L0320 fcb $20,$28,$61,$64,$6A,$75,$73,$74 (adjust -L0328 fcb $29,$20,$66,$69,$6C,$65,$20,$6C ) file l -L0330 fcb $65,$6E,$67,$74,$68,$0A,$20,$20 ength. -L0338 fcb $20,$45,$20,$20,$45,$64,$69,$74 E Edit -L0340 fcb $20,$74,$68,$65,$20,$64,$69,$73 the dis -L0348 fcb $70,$6C,$61,$79,$65,$64,$20,$73 played s -L0350 fcb $65,$63,$74,$6F,$72,$0A,$20,$20 ector. -L0358 fcb $20,$46,$20,$20,$46,$69,$6E,$64 F Find -L0360 fcb $20,$61,$20,$62,$79,$74,$65,$20 a byte -L0368 fcb $6F,$72,$20,$74,$65,$78,$74,$20 or text -L0370 fcb $73,$74,$72,$69,$6E,$67,$20,$28 string ( -L0378 fcb $42,$52,$45,$41,$4B,$20,$61,$62 BREAK ab -L0380 fcb $6F,$72,$74,$73,$29,$0A,$20,$20 orts). -L0388 fcb $20,$48,$20,$20,$48,$65,$6C,$70 H Help -L0390 fcb $20,$73,$63,$72,$65,$65,$6E,$20 screen -L0398 fcb $28,$61,$6C,$73,$6F,$20,$75,$73 (also us -L03A0 fcb $65,$20,$27,$3F,$27,$29,$0A,$20 e '?'). -L03A8 fcb $20,$20,$4C,$20,$20,$4C,$69,$6E L Lin -L03B0 fcb $6B,$20,$74,$6F,$20,$61,$20,$6D k to a m -L03B8 fcb $6F,$64,$75,$6C,$65,$20,$2D,$20 odule - -L03C0 fcb $4C,$69,$73,$74,$20,$61,$6C,$6C List all -L03C8 fcb $20,$6D,$6F,$64,$75,$6C,$65,$73 modules -L03D0 fcb $0A,$20,$20,$20,$4E,$20,$20,$4E . N N -L03D8 fcb $65,$78,$74,$20,$6F,$63,$63,$75 ext occu -L03E0 fcb $72,$72,$65,$6E,$63,$65,$20,$6F rrence o -L03E8 fcb $66,$20,$62,$79,$74,$65,$28,$73 f byte(s -L03F0 fcb $29,$20,$6F,$72,$20,$73,$74,$72 ) or str -L03F8 fcb $69,$6E,$67,$20,$28,$46,$69,$6E ing (Fin -L0400 fcb $64,$29,$0A,$20,$20,$20,$4F,$20 d). O -L0408 fcb $20,$4F,$70,$65,$6E,$20,$61,$20 Open a -L0410 fcb $66,$69,$6C,$65,$20,$66,$6F,$72 file for -L0418 fcb $20,$6F,$75,$74,$70,$75,$74,$20 output -L0420 fcb $28,$75,$73,$65,$20,$77,$69,$74 (use wit -L0428 fcb $68,$20,$41,$70,$70,$65,$6E,$64 h Append -L0430 fcb $29,$0A,$20,$20,$20,$50,$20,$20 ). P -L0438 fcb $50,$75,$73,$68,$20,$63,$75,$72 Push cur -L0440 fcb $72,$65,$6E,$74,$20,$73,$65,$63 rent sec -L0448 fcb $74,$6F,$72,$20,$6F,$6E,$74,$6F tor onto -L0450 fcb $20,$73,$74,$61,$63,$6B,$0A,$20 stack. -L0458 fcb $20,$20,$51,$20,$20,$51,$75,$69 Q Qui -L0460 fcb $74,$20,$64,$45,$64,$20,$2D,$20 t dEd - -L0468 fcb $45,$78,$69,$74,$20,$74,$6F,$20 Exit to -L0470 fcb $4F,$53,$39,$0A,$20,$20,$20,$52 OS9. R -L0478 fcb $20,$20,$52,$65,$6D,$6F,$76,$65 Remove -L0480 fcb $20,$61,$6E,$64,$20,$64,$69,$73 and dis -L0488 fcb $70,$6C,$61,$79,$20,$61,$20,$73 play a s -L0490 fcb $65,$63,$74,$6F,$72,$20,$66,$72 ector fr -L0498 fcb $6F,$6D,$20,$73,$74,$61,$63,$6B om stack -L04A0 fcb $0A,$20,$20,$20,$53,$20,$20,$53 . S S -L04A8 fcb $6B,$69,$70,$20,$74,$6F,$20,$67 kip to g -L04B0 fcb $69,$76,$65,$6E,$20,$73,$65,$63 iven sec -L04B8 fcb $74,$6F,$72,$20,$28,$73,$65,$63 tor (sec -L04C0 fcb $74,$6F,$72,$20,$23,$20,$69,$6E tor # in -L04C8 fcb $20,$68,$65,$78,$29,$0A,$20,$20 hex). -L04D0 fcb $20,$55,$20,$20,$55,$6E,$6C,$69 U Unli -L04D8 fcb $6E,$6B,$20,$66,$72,$6F,$6D,$20 nk from -L04E0 fcb $6D,$6F,$64,$75,$6C,$65,$0A,$20 module. -L04E8 fcb $20,$20,$56,$20,$20,$56,$65,$72 V Ver -L04F0 fcb $69,$66,$79,$20,$61,$6C,$6C,$20 ify all -L04F8 fcb $6D,$6F,$64,$75,$6C,$65,$73,$20 modules -L0500 fcb $69,$6E,$20,$66,$69,$6C,$65,$0A in file. -L0508 fcb $20,$20,$20,$57,$20,$20,$57,$72 W Wr -L0510 fcb $69,$74,$65,$20,$74,$68,$65,$20 ite the -L0518 fcb $73,$65,$63,$74,$6F,$72,$20,$62 sector b -L0520 fcb $61,$63,$6B,$20,$74,$6F,$20,$74 ack to t -L0528 fcb $68,$65,$20,$64,$69,$73,$6B,$0A he disk. -L0530 fcb $20,$20,$20,$58,$20,$20,$65,$58 X eX -L0538 fcb $70,$65,$72,$74,$20,$6D,$6F,$64 pert mod -L0540 fcb $65,$20,$74,$6F,$67,$67,$6C,$65 e toggle -L0548 fcb $20,$6F,$6E,$2F,$6F,$66,$66,$0A on/off. -L0550 fcb $20,$20,$20,$5A,$20,$20,$5A,$61 Z Za -L0558 fcb $70,$20,$28,$66,$69,$6C,$6C,$20 p (fill -L0560 fcb $69,$6E,$29,$20,$74,$68,$65,$20 in) the -L0568 fcb $73,$65,$63,$74,$6F,$72,$20,$64 sector d -L0570 fcb $69,$73,$70,$6C,$61,$79,$65,$64 isplayed -L0578 fcb $0A,$0A,$20,$20,$20,$20,$20,$20 .. -L0580 fcb $28,$50,$72,$65,$73,$73,$20,$61 (Press a -L0588 fcb $6E,$79,$20,$6B,$65,$79,$20,$74 ny key t -L0590 fcb $6F,$20,$72,$65,$74,$75,$72,$6E o return -L0598 fcb $20,$74,$6F,$20,$63,$6F,$6D,$6D to comm -L05A0 fcb $61,$6E,$64,$20,$70,$72,$6F,$6D and prom -L05A8 fcb $70,$74,$29,$3A,$55,$73,$65,$3A pt):Use: -L05B0 fcb $20,$20,$64,$45,$64,$20,$3C,$70 dEd <p -L05B8 fcb $61,$74,$68,$6C,$69,$73,$74,$3E athlist> -L05C0 fcb $0D,$98,$96,$80,$0F,$42,$40,$01 .....B@. -L05C8 fcb $86,$A0,$00,$27,$10,$00,$03,$E8 . .'...h -L05D0 fcb $00,$00,$64,$00,$00,$0A,$00,$00 ..d..... -L05D8 fcb $01,$0C,$0A,$40,$0A,$0A,$4E,$2A ...@..N* -L05E0 fcb $06,$27,$24,$10,$BD,$0D,$10,$EF .'$.=..o -L05E8 fcb $73,$0A,$67,$7A,$0B,$23,$77,$0B s.gz.#w. -L05F0 fcb $D4,$6F,$0C,$26,$61,$0C,$AD,$63 To.&a.-c -L05F8 fcb $0C,$97,$65,$0D,$37,$71,$0D,$22 ..e.7q." -L0600 fcb $76,$11,$16,$6C,$12,$23,$75,$13 v..l.#u. -L0608 fcb $CA,$78,$13,$EB,$68,$14,$13,$3F Jx.kh..? -L0610 fcb $14,$13,$66,$14,$2B,$6E,$15,$F9 ..f.+n.y -L0618 fcb $64,$16,$12,$70,$16,$A9,$72,$16 d..p.)r. -L0620 fcb $E2,$00,$E7,$C9,$00,$8B,$3B,$10 b.gI..;. -L0628 fcb $DE,$1D,$DE,$1B,$03,$1A,$17,$0A ^.^..... -L0630 fcb $C4,$17,$01,$5B,$30,$8D,$FB,$AE D..[0... -L0638 fcb $17,$01,$1E,$17,$01,$72,$30,$C9 .....r0I -L0640 fcb $01,$D6,$9F,$D6,$10,$8E,$00,$50 .V.V...P -L0648 fcb $4F,$10,$3F,$8B,$10,$25,$06,$66 O.?..%.f -L0650 fcb $10,$8C,$00,$01,$26,$08,$0F,$1A ....&... -L0658 fcb $17,$0A,$9A,$16,$00,$AD,$96,$00 .....-.. -L0660 fcb $10,$3F,$8F,$20,$0D,$9F,$D6,$30 .?. ..V0 -L0668 fcb $8D,$FF,$B7,$10,$3F,$09,$10,$25 ..7.?..% -L0670 fcb $06,$44,$4F,$C6,$D6,$30,$C4,$A7 .DOFV0D' -L0678 fcb $80,$5A,$26,$FB,$DF,$1B,$10,$DF .Z&._.._ -L0680 fcb $1D,$CC,$00,$02,$DD,$0A,$32,$E8 .L..].2h -L0688 fcb $E0,$30,$E4,$4F,$5F,$10,$3F,$8D `0dO_.?. -L0690 fcb $10,$25,$06,$22,$A6,$04,$97,$19 .%."&... -L0698 fcb $32,$E8,$20,$9E,$D6,$34,$10,$0F 2h .V4.. -L06A0 fcb $8C,$A6,$80,$81,$0D,$27,$06,$81 .&...'.. -L06A8 fcb $40,$26,$F6,$03,$8C,$35,$10,$86 @&v..5.. -L06B0 fcb $03,$10,$3F,$84,$24,$11,$C1,$D6 ..?.$.AV -L06B8 fcb $10,$26,$06,$78,$9E,$D6,$86,$83 .&.x.V.. -L06C0 fcb $10,$3F,$84,$10,$25,$06,$6D,$97 .?..%.m. -L06C8 fcb $00,$C6,$02,$10,$3F,$8D,$9F,$49 .F..?..I -L06D0 fcb $DF,$4B,$DE,$1B,$0F,$1A,$17,$0A _K^..... -L06D8 fcb $1C,$17,$00,$DE,$0D,$8C,$27,$15 ...^..'. -L06E0 fcb $17,$00,$E1,$9E,$12,$EC,$04,$DD ..a..l.] -L06E8 fcb $8D,$1F,$01,$CC,$01,$00,$17,$10 ...L.... -L06F0 fcb $37,$30,$01,$9F,$8F,$17,$00,$CC 70.....L -L06F8 fcb $10,$9F,$1F,$DC,$02,$DD,$05,$96 ...\.].. -L0700 fcb $04,$97,$07,$CC,$00,$00,$DD,$42 ...L..]B -L0708 fcb $17,$01,$14,$17,$00,$81,$30,$8D ......0. -L0710 fcb $F9,$84,$8D,$45,$30,$8D,$F8,$FD y..E0.x. -L0718 fcb $10,$8E,$00,$01,$10,$3F,$8A,$10 .....?.. -L0720 fcb $25,$05,$93,$30,$C9,$01,$D6,$17 %..0I.V. -L0728 fcb $00,$BE,$A6,$84,$81,$41,$25,$02 .>&..A%. -L0730 fcb $8A,$20,$30,$8D,$FE,$A3,$A1,$80 . 0..#!. -L0738 fcb $27,$08,$30,$02,$6D,$84,$26,$F6 '.0.m.&v -L0740 fcb $20,$C9,$0D,$2E,$27,$0B,$0D,$2D I..'..- -L0748 fcb $27,$07,$34,$12,$17,$04,$A1,$35 '.4...!5 -L0750 fcb $12,$EC,$84,$30,$8D,$F8,$A9,$6E .l.0.x)n -L0758 fcb $8B,$31,$C9,$01,$D6,$5F,$5C,$A6 .1I.V_\& -L0760 fcb $80,$2B,$04,$A7,$A0,$20,$F7,$84 .+.' w. -L0768 fcb $7F,$A7,$A4,$30,$C9,$01,$D6,$4F '$0I.VO -L0770 fcb $1F,$02,$20,$04,$10,$8E,$00,$78 .. ....x -L0778 fcb $86,$01,$10,$3F,$8C,$10,$25,$05 ...?..%. -L0780 fcb $35,$39,$10,$8E,$00,$03,$4F,$10 59....O. -L0788 fcb $3F,$8B,$10,$25,$05,$28,$39,$CC ?..%.(9L -L0790 fcb $20,$36,$30,$4A,$ED,$02,$10,$8E 60Jm... -L0798 fcb $00,$04,$20,$DC,$30,$8D,$F8,$6E .. \0.xn -L07A0 fcb $10,$8E,$00,$02,$20,$D2,$30,$8D .... R0. -L07A8 fcb $F8,$67,$10,$8E,$00,$02,$20,$C8 xg.... H -L07B0 fcb $30,$8D,$F8,$60,$10,$8E,$00,$01 0.x`.... -L07B8 fcb $20,$BE,$30,$8D,$F8,$4F,$10,$8E >0.xO.. -L07C0 fcb $00,$01,$20,$B4,$8D,$2B,$30,$C9 .. 4.+0I -L07C8 fcb $00,$D6,$9F,$12,$0D,$4D,$27,$0A .V...M'. -L07D0 fcb $DC,$23,$90,$04,$26,$04,$1F,$02 \#..&... -L07D8 fcb $20,$04,$10,$8E,$01,$00,$96,$00 ....... -L07E0 fcb $10,$3F,$89,$10,$25,$04,$CF,$39 .?..%.O9 -L07E8 fcb $4F,$10,$8E,$00,$01,$10,$3F,$89 O.....?. -L07F0 fcb $39,$0D,$4D,$26,$13,$9E,$02,$96 9.M&.... -L07F8 fcb $04,$5F,$1F,$03,$96,$00,$10,$3F ._.....? -L0800 fcb $88,$10,$25,$04,$B1,$DE,$1B,$39 ..%.1^.9 -L0808 fcb $DC,$23,$83,$00,$01,$91,$04,$24 \#.....$ -L0810 fcb $05,$C6,$D3,$16,$04,$A0,$DC,$08 .FS.. \. -L0818 fcb $9B,$04,$8E,$00,$00,$20,$DB,$CC ..... [L -L0820 fcb $20,$20,$17,$FF,$6D,$30,$8D,$F8 ..m0.x -L0828 fcb $15,$17,$FF,$2D,$8D,$82,$17,$00 ...-.... -L0830 fcb $B5,$30,$C9,$01,$D6,$17,$FF,$3C 50I.V..< -L0838 fcb $0D,$4D,$27,$03,$17,$0B,$5B,$0D .M'...[. -L0840 fcb $01,$27,$03,$17,$04,$31,$CC,$20 .'...1L -L0848 fcb $22,$17,$FF,$46,$30,$8D,$F7,$BE "..F0.w> -L0850 fcb $10,$8E,$00,$02,$17,$FF,$23,$30 ......#0 -L0858 fcb $8D,$F7,$F2,$17,$FF,$16,$30,$8D .wr...0. -L0860 fcb $F7,$AF,$10,$8E,$00,$02,$17,$FF w/...... -L0868 fcb $11,$17,$01,$20,$96,$0F,$8B,$10 ... .... -L0870 fcb $97,$0F,$26,$F5,$30,$C9,$00,$D6 ..&u0I.V -L0878 fcb $9F,$12,$0D,$8C,$27,$4C,$DC,$03 ....'L\. -L0880 fcb $10,$83,$00,$01,$25,$44,$10,$93 ....%D.. -L0888 fcb $8F,$22,$3F,$DC,$03,$83,$00,$01 ."?\.... -L0890 fcb $8E,$08,$00,$17,$0E,$68,$1F,$20 .....h. -L0898 fcb $D7,$91,$DF,$92,$33,$C9,$07,$FF W._.3I.. -L08A0 fcb $11,$93,$4A,$23,$0A,$D1,$49,$25 ..J#.QI% -L08A8 fcb $06,$D6,$49,$DE,$4A,$33,$5F,$D7 .VI^J3_W -L08B0 fcb $94,$DF,$95,$DE,$1B,$9E,$91,$D6 ._.^...V -L08B8 fcb $93,$9F,$97,$D7,$99,$9E,$94,$D6 ...W...V -L08C0 fcb $96,$9F,$9A,$D7,$9C,$17,$0E,$80 ...W.... -L08C8 fcb $20,$09,$CC,$20,$34,$17,$FE,$C2 .L 4..B -L08D0 fcb $17,$FE,$DD,$0D,$2E,$10,$27,$FF ..]...'. -L08D8 fcb $2E,$CC,$59,$33,$17,$FE,$B3,$30 .LY3..30 -L08E0 fcb $8D,$F8,$9E,$16,$FE,$73,$DC,$02 .x...s\. -L08E8 fcb $03,$18,$31,$C9,$01,$D6,$8D,$6D ..1I.V.m -L08F0 fcb $1F,$98,$8D,$69,$0F,$18,$96,$04 ...i.... -L08F8 fcb $8D,$63,$CC,$20,$20,$ED,$A1,$CC .cL m!L -L0900 fcb $00,$08,$34,$06,$03,$18,$30,$8D ..4...0. -L0908 fcb $FC,$B7,$6F,$E4,$DC,$03,$A3,$01 .7od\.#. -L0910 fcb $34,$01,$DD,$03,$96,$02,$5F,$A0 4.]..._ -L0918 fcb $84,$24,$01,$5C,$35,$01,$24,$02 .$.\5.$. -L0920 fcb $80,$01,$97,$02,$24,$01,$5C,$5D ....$.\] -L0928 fcb $26,$04,$6C,$E4,$20,$DE,$DC,$03 &.ld ^\. -L0930 fcb $E3,$01,$DD,$03,$96,$02,$24,$01 c.]...$. -L0938 fcb $4C,$AB,$84,$97,$02,$30,$03,$8D L+...0.. -L0940 fcb $43,$6A,$61,$27,$0A,$A6,$61,$81 Cja'.&a. -L0948 fcb $02,$26,$BF,$0F,$18,$20,$BB,$86 .&?.. ;. -L0950 fcb $0D,$A7,$A4,$DC,$06,$DD,$03,$96 .'$\.].. -L0958 fcb $05,$97,$02,$35,$86,$34,$02,$44 ...5.4.D -L0960 fcb $44,$44,$44,$8D,$07,$35,$02,$84 DDD..5.. -L0968 fcb $0F,$8D,$01,$39,$81,$09,$2F,$02 ...9../. -L0970 fcb $8B,$07,$8B,$30,$A7,$A0,$0D,$18 ...0' .. -L0978 fcb $27,$06,$81,$30,$27,$03,$0F,$18 '..0'... -L0980 fcb $39,$31,$3F,$39,$34,$02,$A6,$63 91?94.&c -L0988 fcb $8D,$E8,$35,$82,$31,$C9,$01,$D6 .h5.1I.V -L0990 fcb $30,$8D,$F6,$7A,$17,$00,$9A,$96 0.vz.... -L0998 fcb $20,$27,$0A,$84,$F0,$91,$0F,$26 '..p..& -L09A0 fcb $04,$86,$FF,$97,$11,$96,$0F,$8D ........ -L09A8 fcb $B4,$86,$3A,$A7,$A0,$30,$8D,$F6 4.:' 0.v -L09B0 fcb $60,$8D,$7E,$CC,$20,$20,$ED,$A1 `.~L m! -L09B8 fcb $9E,$12,$C6,$10,$0D,$11,$27,$08 ..F...'. -L09C0 fcb $D6,$20,$C4,$0F,$27,$74,$34,$04 V D.'t4. -L09C8 fcb $A6,$80,$8D,$91,$86,$20,$A7,$A0 &.... ' -L09D0 fcb $5A,$26,$F5,$0D,$11,$27,$0D,$CC Z&u..'.L -L09D8 fcb $03,$10,$E0,$E4,$3D,$86,$20,$A7 ..`d=. ' -L09E0 fcb $A0,$5A,$26,$FB,$C6,$20,$ED,$A1 Z&.F m! -L09E8 fcb $A7,$A0,$9E,$12,$57,$0D,$11,$27 ' ..W..' -L09F0 fcb $02,$E6,$E4,$A6,$80,$84,$7F,$81 .fd&... -L09F8 fcb $20,$24,$02,$86,$2E,$A7,$A0,$5A $...' Z -L0A00 fcb $26,$F1,$9F,$12,$0D,$11,$27,$1E &q....'. -L0A08 fcb $C6,$10,$E0,$E0,$86,$20,$A7,$A0 F.``. ' -L0A10 fcb $5A,$26,$FB,$86,$F0,$97,$0F,$8D Z&..p... -L0A18 fcb $0D,$0F,$11,$30,$8D,$F5,$F6,$10 ...0.uv. -L0A20 fcb $8E,$00,$01,$16,$FD,$52,$86,$0D .....R.. -L0A28 fcb $A7,$A4,$30,$C9,$01,$D6,$16,$FD '$0I.V.. -L0A30 fcb $43,$A6,$80,$27,$04,$A7,$A0,$20 C&.'.' -L0A38 fcb $F8,$39,$86,$F0,$97,$0F,$20,$D9 x9.p.. Y -L0A40 fcb $DC,$03,$C3,$00,$01,$DD,$03,$26 \.C..].& -L0A48 fcb $02,$0C,$02,$16,$FC,$A7,$DC,$03 .....'\. -L0A50 fcb $26,$06,$0D,$02,$10,$27,$FC,$B3 &....'.3 -L0A58 fcb $83,$00,$01,$DD,$03,$10,$83,$FF ...].... -L0A60 fcb $FF,$26,$E8,$0A,$02,$20,$E4,$17 .&h.. d. -L0A68 fcb $FD,$25,$30,$8D,$F5,$D5,$17,$FC .%0.uU.. -L0A70 fcb $E8,$10,$8E,$00,$07,$8D,$12,$25 h......% -L0A78 fcb $0B,$DC,$47,$DD,$03,$96,$46,$97 .\G]..F. -L0A80 fcb $02,$16,$FC,$71,$17,$0A,$AE,$20 ...q... -L0A88 fcb $DE,$34,$20,$0F,$1A,$03,$1A,$17 ^4 ..... -L0A90 fcb $06,$63,$35,$20,$30,$C9,$01,$D6 .c5 0I.V -L0A98 fcb $17,$FC,$EB,$0F,$1A,$17,$06,$55 ..k....U -L0AA0 fcb $31,$3F,$27,$4A,$1F,$20,$A6,$80 1?'J. &. -L0AA8 fcb $8D,$49,$25,$3F,$5A,$26,$F7,$10 .I%?Z&w. -L0AB0 fcb $9F,$45,$86,$30,$E6,$82,$31,$3F .E.0f.1? -L0AB8 fcb $27,$04,$A6,$82,$31,$3F,$8D,$49 '.&.1?.I -L0AC0 fcb $34,$04,$10,$8C,$00,$00,$26,$EA 4.....&j -L0AC8 fcb $D6,$46,$5C,$54,$4F,$30,$C8,$45 VF\TO0HE -L0AD0 fcb $C1,$04,$27,$0E,$A7,$80,$C1,$03 A.'.'.A. -L0AD8 fcb $27,$08,$A7,$80,$C1,$02,$27,$02 '.'.A.'. -L0AE0 fcb $A7,$80,$35,$02,$A7,$80,$5A,$26 '.5.'.Z& -L0AE8 fcb $F9,$5F,$39,$17,$0A,$47,$32,$62 y_9..G2b -L0AF0 fcb $16,$FC,$02,$81,$30,$25,$10,$81 ....0%.. -L0AF8 fcb $39,$23,$0A,$84,$5F,$81,$46,$22 9#.._.F" -L0B00 fcb $06,$81,$41,$25,$02,$4F,$39,$43 ..A%.O9C -L0B08 fcb $39,$8D,$0D,$34,$04,$1F,$89,$8D 9..4.... -L0B10 fcb $07,$58,$58,$58,$58,$EA,$E0,$39 .XXXXj`9 -L0B18 fcb $C0,$30,$C1,$09,$23,$04,$C4,$5F @0A.#.D_ -L0B20 fcb $C0,$07,$39,$0F,$1A,$03,$1A,$17 @.9..... -L0B28 fcb $05,$CB,$17,$FC,$62,$17,$FC,$80 .K..b... -L0B30 fcb $30,$8D,$F5,$A7,$17,$FC,$22,$0D 0.u'..". -L0B38 fcb $17,$26,$46,$30,$8D,$F5,$A0,$17 .&F0.u . -L0B40 fcb $FC,$17,$10,$8E,$00,$03,$8D,$1A ........ -L0B48 fcb $8D,$4C,$25,$2D,$30,$C9,$00,$D6 .L%-0I.V -L0B50 fcb $9F,$12,$5F,$A7,$80,$5A,$26,$FB .._'.Z&. -L0B58 fcb $0F,$1A,$17,$05,$98,$0C,$2D,$16 ......-. -L0B60 fcb $FB,$A6,$4F,$30,$C9,$01,$D6,$10 .&O0I.V. -L0B68 fcb $3F,$8B,$25,$01,$39,$C1,$02,$10 ?.%.9A.. -L0B70 fcb $26,$01,$43,$03,$17,$32,$62,$20 &.C..2b -L0B78 fcb $AA,$0F,$1A,$17,$05,$77,$16,$FB *....w.. -L0B80 fcb $8A,$30,$8D,$F5,$60,$17,$FB,$D1 .0.u`..Q -L0B88 fcb $10,$8E,$00,$02,$8D,$D4,$A6,$84 .....T&. -L0B90 fcb $81,$20,$25,$E5,$20,$B6,$8D,$12 . %e 6.. -L0B98 fcb $25,$2F,$1F,$89,$8D,$0C,$25,$29 %/....%) -L0BA0 fcb $58,$58,$58,$58,$34,$04,$AA,$E0 XXXX4.*` -L0BA8 fcb $20,$1A,$8D,$04,$25,$1B,$20,$1A ...%. . -L0BB0 fcb $A6,$80,$81,$30,$25,$11,$81,$39 &..0%..9 -L0BB8 fcb $23,$0A,$84,$5F,$81,$41,$25,$07 #.._.A%. -L0BC0 fcb $81,$46,$22,$03,$1C,$FE,$39,$1A .F"...9. -L0BC8 fcb $01,$39,$80,$30,$81,$09,$23,$02 .9.0..#. -L0BD0 fcb $80,$07,$20,$F0,$0D,$2E,$10,$26 .. p...& -L0BD8 fcb $FB,$31,$8D,$23,$10,$26,$FB,$2B .1.#.&.+ -L0BE0 fcb $17,$FB,$AC,$17,$FB,$CA,$17,$FB ..,..J.. -L0BE8 fcb $A6,$30,$8D,$F5,$12,$17,$FB,$69 &0.u...i -L0BF0 fcb $17,$FB,$FE,$96,$00,$17,$00,$92 ........ -L0BF8 fcb $0D,$2E,$27,$78,$0F,$2D,$39,$17 ..'x.-9. -L0C00 fcb $FB,$8D,$0F,$1A,$03,$1A,$17,$04 ........ -L0C08 fcb $EC,$30,$8D,$F4,$DE,$17,$FB,$49 l0.t^..I -L0C10 fcb $17,$FB,$9D,$30,$C9,$01,$D6,$17 ...0I.V. -L0C18 fcb $FB,$CE,$0F,$1A,$17,$04,$D6,$A6 .N....V& -L0C20 fcb $84,$84,$5F,$81,$59,$39,$0D,$01 .._.Y9.. -L0C28 fcb $26,$4A,$0F,$1A,$03,$1A,$17,$04 &J...... -L0C30 fcb $C4,$17,$FB,$5B,$30,$8D,$F4,$D8 D..[0.tX -L0C38 fcb $17,$FB,$1E,$17,$FB,$72,$30,$C9 .....r0I -L0C40 fcb $01,$D6,$10,$8E,$00,$1E,$17,$FB .V...... -L0C48 fcb $3D,$0F,$1A,$17,$04,$A7,$10,$8C =....'.. -L0C50 fcb $00,$01,$27,$20,$34,$10,$31,$C8 ..' 4.1H -L0C58 fcb $6B,$A6,$80,$A7,$A0,$81,$20,$22 k&.' . " -L0C60 fcb $F8,$86,$0D,$A7,$3F,$35,$10,$86 x..'?5.. -L0C68 fcb $02,$C6,$0B,$10,$3F,$83,$25,$46 .F..?.%F -L0C70 fcb $97,$01,$8D,$03,$16,$FA,$94,$CC .....z.L -L0C78 fcb $30,$21,$17,$FB,$15,$30,$8D,$F4 0!...0.t -L0C80 fcb $8F,$17,$FA,$D5,$30,$C8,$6B,$16 ..zU0Hk. -L0C88 fcb $FA,$EA,$30,$C9,$00,$D6,$10,$9E zj0I.V.. -L0C90 fcb $1F,$10,$3F,$8A,$25,$20,$39,$96 ..?.% 9. -L0C98 fcb $01,$27,$D9,$10,$3F,$8F,$25,$16 .'Y.?.%. -L0CA0 fcb $CC,$30,$21,$17,$FA,$EC,$17,$FB L0!.zl.. -L0CA8 fcb $07,$0F,$01,$20,$C7,$96,$01,$27 ... G..' -L0CB0 fcb $FA,$8D,$D7,$16,$FD,$8A,$34,$04 z.W...4. -L0CB8 fcb $0F,$8B,$DC,$05,$DD,$02,$96,$07 ..\.]... -L0CC0 fcb $97,$04,$35,$04,$10,$DE,$1D,$C1 ..5..^.A -L0CC8 fcb $02,$27,$0C,$C1,$03,$26,$04,$0F .'.A.&.. -L0CD0 fcb $2D,$20,$04,$C1,$D3,$26,$03,$16 - .AS&.. -L0CD8 fcb $FE,$9F,$C1,$CD,$26,$14,$0D,$4D ..AM&..M -L0CE0 fcb $26,$10,$8D,$1D,$30,$8D,$F3,$25 &...0.s% -L0CE8 fcb $10,$8E,$00,$01,$17,$FA,$89,$16 .....z.. -L0CF0 fcb $FA,$16,$34,$04,$17,$FA,$98,$17 z.4..z.. -L0CF8 fcb $FA,$B6,$35,$04,$8D,$03,$16,$FA z65....z -L0D00 fcb $0A,$86,$02,$10,$3F,$0F,$0F,$1A ....?... -L0D08 fcb $17,$03,$EA,$30,$C9,$01,$D6,$16 ..j0I.V. -L0D10 fcb $FA,$D6,$86,$02,$30,$8D,$F8,$94 zV..0.x. -L0D18 fcb $10,$8E,$00,$78,$17,$FA,$5B,$5F ...x.z[_ -L0D20 fcb $20,$12,$17,$FE,$DA,$10,$26,$F9 ...Z.&y -L0D28 fcb $E2,$17,$FA,$8E,$96,$19,$97,$1A b.z..... -L0D30 fcb $17,$03,$C2,$5F,$10,$3F,$06,$17 ..B_.?.. -L0D38 fcb $FA,$55,$30,$8D,$F3,$5D,$17,$FA zU0.s].z -L0D40 fcb $18,$30,$C9,$00,$D6,$9F,$14,$86 .0I.V... -L0D48 fcb $01,$97,$16,$86,$23,$97,$0F,$86 ....#... -L0D50 fcb $25,$97,$0E,$86,$58,$97,$10,$17 %...X... -L0D58 fcb $FA,$42,$17,$00,$EA,$96,$0E,$D6 zB..j..V -L0D60 fcb $0F,$0D,$17,$27,$02,$96,$10,$0D ...'.... -L0D68 fcb $8C,$10,$27,$00,$CA,$9E,$03,$8C ..'.J... -L0D70 fcb $00,$01,$10,$25,$00,$C1,$9C,$8F ...%.A.. -L0D78 fcb $10,$22,$00,$BB,$34,$06,$9E,$91 .".;4... -L0D80 fcb $D6,$93,$9F,$97,$D7,$99,$9E,$94 V...W... -L0D88 fcb $D6,$96,$9F,$9A,$D7,$9C,$4F,$D6 V...W.OV -L0D90 fcb $0F,$C0,$23,$86,$10,$3D,$34,$06 .@#..=4. -L0D98 fcb $4F,$D6,$0E,$C0,$25,$27,$0A,$1F OV.@%'.. -L0DA0 fcb $01,$CC,$00,$03,$17,$09,$81,$1F .L...... -L0DA8 fcb $10,$E3,$E1,$9E,$03,$9C,$8F,$25 .ca....% -L0DB0 fcb $12,$34,$06,$DC,$8D,$4F,$1F,$01 .4.\.O.. -L0DB8 fcb $35,$06,$30,$1F,$34,$10,$10,$A3 5.0.4..# -L0DC0 fcb $E1,$22,$1A,$8E,$00,$08,$17,$09 a"...... -L0DC8 fcb $35,$1F,$30,$D3,$98,$DD,$98,$C3 5.0S.].C -L0DD0 fcb $00,$07,$10,$93,$95,$23,$02,$DC .....#.\ -L0DD8 fcb $95,$DD,$9B,$20,$06,$0F,$9A,$0F .]. .... -L0DE0 fcb $9B,$0F,$9C,$DE,$1B,$17,$F9,$BE ...^..y> -L0DE8 fcb $0D,$9C,$26,$13,$0D,$9B,$26,$0F ..&...&. -L0DF0 fcb $0D,$9A,$26,$0B,$CC,$20,$34,$17 ..&.L 4. -L0DF8 fcb $F9,$98,$17,$F9,$B3,$20,$33,$17 y..y3 3. -L0E00 fcb $09,$46,$CC,$49,$34,$17,$F9,$8A .FLI4.y. -L0E08 fcb $30,$8D,$F4,$1A,$17,$F9,$4A,$30 0.t..yJ0 -L0E10 fcb $C9,$00,$9D,$A6,$D8,$14,$C6,$08 I..&X.F. -L0E18 fcb $34,$12,$68,$E4,$25,$04,$86,$30 4.hd%..0 -L0E20 fcb $20,$02,$86,$31,$A7,$80,$5A,$26 ..1'.Z& -L0E28 fcb $F1,$35,$12,$10,$8E,$00,$08,$17 q5...... -L0E30 fcb $F9,$46,$17,$F9,$67,$35,$06,$17 yF.yg5.. -L0E38 fcb $F9,$58,$30,$C9,$01,$D6,$0D,$17 yX0I.V.. -L0E40 fcb $10,$26,$00,$F4,$16,$00,$B7,$96 .&.t..7. -L0E48 fcb $0E,$D6,$0F,$17,$F9,$44,$31,$C9 .V..yD1I -L0E50 fcb $01,$D6,$A6,$D8,$14,$34,$02,$17 .V&X.4.. -L0E58 fcb $FB,$03,$30,$3E,$10,$8E,$00,$02 ..0>.... -L0E60 fcb $86,$01,$17,$F9,$15,$96,$10,$D6 ...y...V -L0E68 fcb $0F,$17,$F9,$26,$35,$02,$84,$7F ..y&5.. -L0E70 fcb $81,$20,$24,$02,$86,$2E,$30,$C9 . $...0I -L0E78 fcb $01,$D6,$A7,$84,$10,$8E,$00,$01 .V'..... -L0E80 fcb $16,$F8,$F5,$34,$14,$4F,$C6,$01 .xu4.OF. -L0E88 fcb $10,$3F,$8D,$24,$49,$C1,$F6,$26 .?.$IAv& -L0E90 fcb $2E,$8E,$00,$01,$10,$3F,$0A,$25 .....?.% -L0E98 fcb $26,$0A,$89,$96,$89,$98,$8A,$84 &....... -L0EA0 fcb $40,$27,$12,$03,$8A,$27,$04,$8D @'...'.. -L0EA8 fcb $1E,$20,$0A,$30,$8D,$F1,$6A,$10 . .0.qj. -L0EB0 fcb $8E,$00,$02,$8D,$1A,$D6,$8B,$C1 .....V.A -L0EB8 fcb $02,$27,$04,$C1,$03,$26,$C6,$E7 .'.A.&Fg -L0EC0 fcb $E4,$8D,$04,$35,$14,$20,$1E,$30 d..5. .0 -L0EC8 fcb $8D,$F1,$4B,$10,$8E,$00,$02,$86 .qK..... -L0ED0 fcb $01,$10,$3F,$8A,$5F,$39,$8D,$EF ..?._9.o -L0ED8 fcb $35,$14,$10,$8E,$00,$01,$4F,$10 5.....O. -L0EE0 fcb $3F,$89,$25,$01,$39,$32,$62,$0F ?.%.92b. -L0EE8 fcb $8B,$C1,$02,$27,$0C,$34,$04,$17 .A.'.4.. -L0EF0 fcb $01,$28,$0F,$0F,$35,$04,$16,$FD .(..5... -L0EF8 fcb $BD,$03,$17,$16,$FE,$5F,$8D,$83 =...._.. -L0F00 fcb $8D,$1C,$25,$46,$17,$F8,$71,$E6 ..%F.xqf -L0F08 fcb $84,$17,$FF,$77,$8D,$10,$25,$3A ...w..%: -L0F10 fcb $1E,$89,$17,$FB,$F4,$E7,$D8,$14 ....tgX. -L0F18 fcb $86,$01,$97,$2D,$20,$57,$A6,$84 ...- W&. -L0F20 fcb $81,$30,$25,$11,$81,$39,$23,$0A .0%..9#. -L0F28 fcb $84,$5F,$81,$46,$22,$07,$81,$41 ._.F"..A -L0F30 fcb $25,$03,$1C,$FE,$39,$1A,$01,$39 %...9..9 -L0F38 fcb $17,$FF,$48,$A6,$84,$81,$20,$25 ..H&.. % -L0F40 fcb $09,$A7,$D8,$14,$86,$01,$97,$2D .'X....- -L0F48 fcb $20,$2B,$81,$09,$27,$27,$81,$08 +..''.. -L0F50 fcb $27,$61,$81,$0C,$10,$27,$00,$C8 'a...'.H -L0F58 fcb $81,$0A,$10,$27,$01,$18,$81,$0D ...'.... -L0F60 fcb $10,$26,$FD,$F9,$17,$00,$B3,$CC .&.y..3L -L0F68 fcb $49,$34,$17,$F8,$25,$17,$F8,$40 I4.x%.x@ -L0F70 fcb $0F,$0F,$16,$F7,$96,$17,$00,$A2 ...w..." -L0F78 fcb $0D,$20,$27,$08,$96,$16,$91,$20 . '.... -L0F80 fcb $10,$27,$FD,$BD,$DC,$14,$C3,$00 .'.=\.C. -L0F88 fcb $01,$DD,$14,$0C,$16,$0C,$10,$96 .]...... -L0F90 fcb $10,$81,$68,$24,$09,$96,$0E,$8B ..h$.... -L0F98 fcb $03,$97,$0E,$16,$FD,$B9,$0C,$0F .....9.. -L0FA0 fcb $96,$0F,$81,$32,$10,$22,$FD,$99 ...2.".. -L0FA8 fcb $86,$25,$97,$0E,$86,$58,$97,$10 .%...X.. -L0FB0 fcb $16,$FD,$A4,$8D,$65,$DC,$14,$83 ..$.e\.. -L0FB8 fcb $00,$01,$DD,$14,$0A,$16,$0A,$10 ..]..... -L0FC0 fcb $96,$10,$81,$58,$25,$09,$96,$0E ...X%... -L0FC8 fcb $80,$03,$97,$0E,$16,$FD,$88,$0A ........ -L0FD0 fcb $0F,$86,$52,$97,$0E,$86,$67,$97 ..R...g. -L0FD8 fcb $10,$96,$0F,$81,$23,$25,$03,$16 ....#%.. -L0FE0 fcb $FD,$75,$9E,$14,$D6,$20,$27,$25 .u..V '% -L0FE8 fcb $D7,$16,$4F,$30,$8B,$5A,$34,$04 W.O0.Z4. -L0FF0 fcb $54,$54,$54,$54,$CB,$23,$D7,$0F TTTTK#W. -L0FF8 fcb $A6,$E0,$84,$0F,$34,$02,$8B,$58 &`..4..X -L1000 fcb $97,$10,$35,$02,$C6,$03,$3D,$CB ..5.F.=K -L1008 fcb $25,$D7,$0E,$20,$08,$86,$32,$97 %W. ..2. -L1010 fcb $0F,$30,$89,$01,$00,$9F,$14,$16 .0...... -L1018 fcb $FD,$3D,$17,$F7,$89,$16,$FE,$27 .=.w...' -L1020 fcb $8D,$F8,$D6,$20,$27,$06,$96,$0F .xV '... -L1028 fcb $81,$23,$27,$23,$DC,$14,$83,$00 .#'#\... -L1030 fcb $10,$DD,$14,$D6,$16,$C0,$10,$D7 .].V.@.W -L1038 fcb $16,$0A,$0F,$96,$0F,$81,$23,$24 ......#$ -L1040 fcb $0B,$86,$32,$97,$0F,$DC,$14,$C3 ..2..\.C -L1048 fcb $01,$00,$DD,$14,$16,$FD,$08,$C4 ..]....D -L1050 fcb $F0,$96,$20,$84,$0F,$91,$16,$24 p. ....$ -L1058 fcb $02,$C0,$10,$4F,$34,$06,$DC,$14 .@.O4.\. -L1060 fcb $E3,$E0,$DD,$14,$D6,$16,$EB,$E4 c`].V.kd -L1068 fcb $D7,$16,$35,$04,$54,$54,$54,$54 W.5.TTTT -L1070 fcb $CB,$23,$D7,$0F,$20,$D6,$8D,$A2 K#W. V." -L1078 fcb $D6,$20,$27,$06,$D0,$16,$C1,$10 V '.P.A. -L1080 fcb $25,$25,$DC,$14,$C3,$00,$10,$DD %%\.C..] -L1088 fcb $14,$96,$16,$8B,$10,$97,$16,$0C ........ -L1090 fcb $0F,$96,$0F,$81,$32,$10,$23,$FC ....2.#. -L1098 fcb $BE,$DC,$14,$83,$01,$00,$DD,$14 >\....]. -L10A0 fcb $86,$23,$97,$0F,$16,$FC,$B0,$4F .#....0O -L10A8 fcb $D6,$16,$5A,$C4,$F0,$34,$06,$DC V.ZDp4.\ -L10B0 fcb $14,$A3,$E0,$DD,$14,$D6,$16,$E0 .#`].V.` -L10B8 fcb $E0,$D7,$16,$20,$E3,$17,$F6,$FA `W. c.vz -L10C0 fcb $96,$19,$97,$1A,$8D,$2F,$30,$8D ...../0. -L10C8 fcb $F0,$6C,$10,$8E,$00,$10,$33,$C9 pl....3I -L10D0 fcb $01,$D6,$86,$0D,$A7,$C4,$CC,$00 .V..'DL. -L10D8 fcb $00,$10,$3F,$03,$10,$25,$FB,$D6 ..?..%.V -L10E0 fcb $10,$3F,$04,$DE,$1B,$30,$C9,$00 .?.^.0I. -L10E8 fcb $D6,$9F,$12,$0F,$1A,$8D,$06,$17 V....... -L10F0 fcb $F6,$C8,$16,$F6,$13,$34,$10,$32 vH.v.4.2 -L10F8 fcb $E8,$E0,$30,$E4,$4F,$5F,$10,$3F h`0dO_.? -L1100 fcb $8D,$10,$25,$FB,$B1,$96,$1A,$A7 ..%.1..' -L1108 fcb $04,$4F,$10,$3F,$8E,$10,$25,$FB .O.?..%. -L1110 fcb $A5,$32,$E8,$20,$35,$90,$17,$F6 %2h 5..v -L1118 fcb $76,$30,$8D,$EF,$FC,$17,$F6,$39 v0.o..v9 -L1120 fcb $CE,$00,$00,$8E,$00,$00,$9F,$25 N......% -L1128 fcb $96,$00,$10,$3F,$88,$10,$25,$FB ...?..%. -L1130 fcb $85,$DE,$1B,$CC,$FF,$FF,$DD,$29 .^.L..]) -L1138 fcb $D7,$2B,$30,$C9,$01,$D6,$10,$8E W+0I.V.. -L1140 fcb $00,$08,$96,$00,$10,$3F,$89,$10 .....?.. -L1148 fcb $25,$FB,$6B,$10,$8C,$00,$08,$10 %.k..... -L1150 fcb $26,$00,$BB,$EC,$84,$81,$87,$10 &.;l.... -L1158 fcb $26,$00,$B3,$C1,$CD,$10,$26,$00 &.3AM.&. -L1160 fcb $AD,$EC,$02,$10,$83,$00,$0F,$10 -l...... -L1168 fcb $23,$00,$A3,$83,$00,$03,$DD,$21 #.#...]! -L1170 fcb $D3,$25,$DD,$25,$4F,$C6,$08,$A8 S%]%OF.( -L1178 fcb $80,$5A,$26,$FB,$43,$A7,$84,$10 .Z&.C'.. -L1180 fcb $8E,$00,$01,$96,$00,$10,$3F,$8A ......?. -L1188 fcb $10,$25,$FB,$2A,$DC,$21,$83,$00 .%.*\!.. -L1190 fcb $09,$DD,$21,$30,$C9,$01,$D6,$10 .]!0I.V. -L1198 fcb $8E,$00,$09,$8D,$64,$96,$00,$10 ....d... -L11A0 fcb $8E,$00,$78,$10,$9C,$21,$23,$03 ..x..!#. -L11A8 fcb $10,$9E,$21,$10,$3F,$89,$25,$5E ..!.?.%^ -L11B0 fcb $10,$9F,$27,$8D,$4C,$DC,$21,$93 ..'.L\!. -L11B8 fcb $27,$DD,$21,$26,$E0,$96,$00,$C6 ']!&`..F -L11C0 fcb $05,$10,$3F,$8D,$1F,$30,$DE,$1B ..?..0^. -L11C8 fcb $10,$93,$25,$26,$41,$03,$29,$03 ..%&A.). -L11D0 fcb $2A,$03,$2B,$30,$C8,$29,$10,$8E *.+0H).. -L11D8 fcb $00,$03,$96,$00,$10,$3F,$8A,$10 .....?.. -L11E0 fcb $25,$FA,$D3,$CC,$00,$03,$D3,$25 %zSL..S% -L11E8 fcb $DD,$25,$C6,$06,$96,$00,$10,$3F ]%F....? -L11F0 fcb $8D,$10,$24,$FF,$3E,$C1,$D3,$10 ..$.>AS. -L11F8 fcb $26,$FA,$BB,$17,$F5,$C6,$16,$F5 &z;.uF.u -L1200 fcb $07,$33,$C8,$29,$10,$3F,$17,$10 .3H).?.. -L1208 fcb $25,$FA,$AB,$DE,$1B,$39,$CC,$20 %z+^.9L -L1210 fcb $36,$17,$F5,$7E,$30,$8D,$EF,$0D 6.u~0.o. -L1218 fcb $17,$F5,$3E,$C6,$CD,$17,$FA,$E1 .u>FM.za -L1220 fcb $16,$F4,$E8,$0D,$4D,$10,$26,$F4 .th.M.&t -L1228 fcb $E2,$CC,$00,$00,$DD,$25,$DD,$23 bL..]%]# -L1230 fcb $0F,$1A,$03,$1A,$17,$FE,$BE,$17 ......>. -L1238 fcb $F5,$55,$17,$F5,$73,$30,$8D,$EE uU.us0.n -L1240 fcb $FA,$17,$F5,$15,$30,$C8,$4D,$10 z.u.0HM. -L1248 fcb $8E,$00,$1E,$17,$F5,$38,$0F,$1A ....u8.. -L1250 fcb $17,$FE,$A2,$10,$8C,$00,$01,$10 .."..... -L1258 fcb $26,$00,$B1,$17,$F5,$5C,$0F,$4D &.1.u\.M -L1260 fcb $30,$8D,$EE,$ED,$17,$F5,$0D,$DC 0.nm.u.\ -L1268 fcb $23,$D3,$25,$DD,$25,$1F,$03,$8E #S%]%... -L1270 fcb $00,$00,$96,$00,$10,$3F,$88,$25 .....?.% -L1278 fcb $7F,$DE,$1B,$30,$C9,$01,$D6,$10 ^.0I.V. -L1280 fcb $8E,$00,$06,$10,$3F,$89,$25,$70 ....?.%p -L1288 fcb $EC,$81,$81,$87,$26,$68,$C1,$CD l...&hAM -L1290 fcb $26,$64,$31,$C9,$01,$D6,$EC,$81 &d1I.Vl. -L1298 fcb $DD,$23,$EC,$81,$34,$06,$DC,$25 ]#l.4.\% -L12A0 fcb $8D,$44,$86,$20,$A7,$A0,$DC,$23 .D. ' \# -L12A8 fcb $8D,$3C,$86,$20,$A7,$A0,$DC,$25 .<. ' \% -L12B0 fcb $E3,$E1,$1F,$03,$8E,$00,$00,$96 ca...... -L12B8 fcb $00,$10,$3F,$88,$10,$25,$F9,$F6 ..?..%yv -L12C0 fcb $DE,$1B,$1F,$21,$10,$8E,$00,$1D ^..!.... -L12C8 fcb $96,$00,$10,$3F,$89,$10,$25,$F9 ...?..%y -L12D0 fcb $E5,$A6,$80,$2A,$FC,$84,$7F,$A7 e&.*..' -L12D8 fcb $1F,$86,$0D,$A7,$84,$30,$C9,$01 ...'.0I. -L12E0 fcb $D6,$17,$F4,$90,$20,$81,$17,$F6 V.t. ..v -L12E8 fcb $74,$1F,$98,$16,$F6,$6F,$C1,$D3 t...voAS -L12F0 fcb $26,$06,$C6,$DD,$20,$02,$C6,$CD &.F] .FM -L12F8 fcb $0F,$4D,$C1,$D3,$10,$26,$F9,$B6 .MAS.&y6 -L1300 fcb $17,$F4,$E5,$30,$C9,$00,$D6,$9F .te0I.V. -L1308 fcb $12,$16,$FD,$E3,$10,$3F,$10,$10 ...c.?.. -L1310 fcb $25,$F9,$A3,$D7,$2C,$5A,$A6,$85 %y#W,Z&. -L1318 fcb $8A,$80,$A7,$85,$9F,$29,$CE,$00 ..'..)N. -L1320 fcb $00,$8E,$00,$00,$96,$00,$10,$3F .......? -L1328 fcb $88,$10,$25,$F9,$89,$DE,$1B,$30 ..%y.^.0 -L1330 fcb $C9,$01,$D6,$10,$8E,$00,$06,$10 I.V..... -L1338 fcb $3F,$89,$25,$B2,$EC,$81,$81,$87 ?.%2l... -L1340 fcb $26,$B4,$C1,$CD,$26,$B0,$EC,$81 &4AM&0l. -L1348 fcb $DD,$23,$EC,$84,$D3,$25,$1F,$03 ]#l.S%.. -L1350 fcb $8E,$00,$00,$96,$00,$10,$3F,$88 ......?. -L1358 fcb $25,$94,$DE,$1B,$30,$C9,$01,$D6 %.^.0I.V -L1360 fcb $10,$8E,$00,$1D,$10,$3F,$89,$25 .....?.% -L1368 fcb $85,$1F,$12,$9E,$29,$D6,$2C,$10 ....)V,. -L1370 fcb $3F,$11,$24,$0A,$DC,$23,$D3,$25 ?.$.\#S% -L1378 fcb $DD,$25,$1F,$03,$20,$A3,$86,$0D ]%.. #.. -L1380 fcb $A7,$85,$5A,$A6,$85,$84,$7F,$A7 '.Z&..' -L1388 fcb $85,$DC,$25,$DD,$08,$CC,$00,$06 .\%].L.. -L1390 fcb $30,$42,$A7,$80,$5A,$26,$FB,$16 0B'.Z&.. -L1398 fcb $F3,$5B,$CC,$30,$20,$17,$F3,$F2 s[L0 .sr -L13A0 fcb $30,$8D,$ED,$CB,$17,$F3,$B2,$30 0.mK.s20 -L13A8 fcb $C8,$4D,$17,$F3,$C7,$CC,$58,$20 HM.sGLX -L13B0 fcb $17,$F3,$DF,$30,$8D,$ED,$C1,$17 .s_0.mA. -L13B8 fcb $F3,$9F,$31,$C9,$01,$D6,$DC,$08 s.1I.V\. -L13C0 fcb $17,$FF,$23,$86,$0D,$A7,$A4,$16 ..#..'$. -L13C8 fcb $F3,$AE,$0D,$4D,$10,$27,$F3,$3B s..M.'s; -L13D0 fcb $CC,$00,$08,$30,$42,$A7,$80,$5A L..0B'.Z -L13D8 fcb $26,$FB,$CC,$30,$20,$17,$F3,$B2 &.L0 .s2 -L13E0 fcb $17,$F3,$CD,$17,$F3,$CA,$0F,$4D .sM.sJ.M -L13E8 fcb $16,$F3,$0A,$0D,$2E,$27,$0E,$0F .s...'.. -L13F0 fcb $2E,$CC,$59,$33,$17,$F3,$9B,$17 .LY3.s.. -L13F8 fcb $F3,$B6,$16,$F3,$0E,$17,$F7,$FF s6.s..w. -L1400 fcb $26,$F8,$03,$2E,$CC,$59,$33,$17 &x..LY3. -L1408 fcb $F3,$88,$30,$8D,$ED,$73,$17,$F3 s.0.ms.s -L1410 fcb $48,$20,$E7,$17,$F3,$A4,$30,$8D H g.s$0. -L1418 fcb $EE,$24,$10,$8E,$03,$6E,$17,$F3 n$...n.s -L1420 fcb $59,$30,$C9,$01,$D6,$17,$F3,$C0 Y0I.V.s@ -L1428 fcb $16,$FC,$C4,$0F,$1A,$03,$1A,$17 ..D..... -L1430 fcb $FC,$C3,$17,$F3,$5A,$17,$F3,$78 .C.sZ.sx -L1438 fcb $0D,$2F,$26,$35,$30,$8D,$ED,$54 ./&50.mT -L1440 fcb $17,$F3,$16,$10,$8E,$00,$21,$17 .s....!. -L1448 fcb $00,$CA,$10,$8C,$00,$01,$10,$27 .J.....' -L1450 fcb $01,$07,$31,$3F,$1F,$20,$54,$10 ..1?. T. -L1458 fcb $25,$00,$D3,$D7,$30,$33,$C8,$31 %.SW03H1 -L1460 fcb $17,$F7,$33,$10,$25,$00,$C7,$A7 .w3.%.G' -L1468 fcb $C0,$31,$3E,$26,$F3,$DE,$1B,$20 @1>&s^. -L1470 fcb $25,$30,$8D,$ED,$31,$17,$F2,$E1 %0.m1.ra -L1478 fcb $10,$8E,$00,$11,$17,$00,$95,$10 ........ -L1480 fcb $8C,$00,$01,$10,$27,$00,$D2,$1F ....'.R. -L1488 fcb $20,$5A,$D7,$30,$31,$C8,$31,$A6 ZW01H1& -L1490 fcb $80,$A7,$A0,$5A,$26,$F9,$0F,$1A .' Z&y.. -L1498 fcb $17,$FC,$5A,$30,$C9,$00,$D6,$D6 ..Z0I.VV -L14A0 fcb $20,$31,$C8,$31,$A6,$A4,$A8,$80 1H1&$(. -L14A8 fcb $10,$27,$00,$B0,$0D,$2F,$27,$06 .'.0./'. -L14B0 fcb $85,$5F,$10,$27,$00,$A6,$5A,$26 ._.'.&Z& -L14B8 fcb $EB,$34,$36,$4F,$C6,$01,$10,$3F k46OF..? -L14C0 fcb $8D,$25,$0D,$30,$C9,$01,$D6,$17 .%.0I.V. -L14C8 fcb $F3,$1E,$A6,$84,$81,$05,$27,$76 s.&...'v -L14D0 fcb $35,$36,$8D,$02,$20,$C9,$0D,$4D 56.. I.M -L14D8 fcb $27,$09,$DC,$23,$83,$00,$01,$91 '.\#.... -L14E0 fcb $04,$27,$63,$DC,$03,$C3,$00,$01 .'c\.C.. -L14E8 fcb $DD,$03,$26,$02,$0C,$02,$17,$F3 ].&....s -L14F0 fcb $00,$30,$C9,$00,$D6,$9F,$12,$0D .0I.V... -L14F8 fcb $4D,$27,$0A,$DC,$23,$90,$04,$26 M'.\#..& -L1500 fcb $04,$1F,$02,$20,$04,$10,$8E,$01 ... .... -L1508 fcb $00,$96,$00,$10,$3F,$89,$25,$30 ....?.%0 -L1510 fcb $10,$9F,$1F,$39,$30,$C9,$01,$D6 ...90I.V -L1518 fcb $4F,$10,$3F,$8B,$25,$01,$39,$32 O.?.%.92 -L1520 fcb $62,$0F,$8B,$C1,$02,$10,$26,$F7 b..A..&w -L1528 fcb $8D,$03,$2F,$16,$FE,$FD,$DE,$1B ../...^. -L1530 fcb $8D,$03,$16,$FE,$F6,$30,$8D,$EC ....v0.l -L1538 fcb $F2,$10,$8E,$00,$01,$16,$F2,$38 r.....r8 -L1540 fcb $C1,$D3,$10,$26,$F7,$70,$10,$DE AS.&wp.^ -L1548 fcb $1D,$DC,$05,$DD,$02,$96,$07,$97 .\.].... -L1550 fcb $04,$17,$F2,$70,$10,$9F,$1F,$8D ..rp.... -L1558 fcb $DC,$16,$F6,$1D,$34,$04,$5A,$D7 \.v.4.ZW -L1560 fcb $44,$9F,$42,$D6,$30,$5A,$27,$2F D.BV0Z'/ -L1568 fcb $6A,$E4,$27,$1C,$31,$21,$A6,$A4 jd'.1!&$ -L1570 fcb $A8,$80,$27,$F1,$0D,$2F,$27,$04 (.'q./'. -L1578 fcb $85,$5F,$27,$E9,$32,$61,$9E,$42 ._'i2a.B -L1580 fcb $31,$C8,$31,$D6,$44,$16,$FF,$2F 1H1VD../ -L1588 fcb $32,$61,$34,$24,$17,$FF,$47,$35 2a4$..G5 -L1590 fcb $24,$96,$20,$34,$02,$20,$D5,$32 $. 4. U2 -L1598 fcb $61,$96,$04,$91,$07,$27,$21,$9C a....'!. -L15A0 fcb $42,$24,$15,$DC,$03,$83,$00,$01 B$.\.... -L15A8 fcb $DD,$03,$10,$83,$FF,$FF,$26,$02 ].....&. -L15B0 fcb $0A,$02,$17,$F2,$0F,$10,$9F,$1F ...r.... -L15B8 fcb $DC,$02,$DD,$05,$96,$04,$97,$07 \.]..... -L15C0 fcb $17,$F2,$5C,$DC,$42,$83,$00,$01 .r\\B... -L15C8 fcb $DD,$14,$93,$12,$34,$04,$C4,$0F ]...4.D. -L15D0 fcb $34,$04,$CB,$58,$D7,$10,$35,$04 4.KXW.5. -L15D8 fcb $86,$03,$3D,$CB,$25,$D7,$0E,$35 ..=K%W.5 -L15E0 fcb $04,$C4,$F0,$54,$54,$54,$54,$CB .DpTTTTK -L15E8 fcb $23,$D7,$0F,$17,$F1,$AE,$17,$F8 #W..q..x -L15F0 fcb $56,$17,$F1,$B2,$0F,$0F,$16,$FF V.q2.... -L15F8 fcb $60,$0D,$30,$10,$27,$F1,$0C,$17 `.0.'q.. -L1600 fcb $F1,$8D,$30,$8D,$EB,$B2,$17,$F1 q.0.k2.q -L1608 fcb $50,$9E,$42,$10,$27,$FE,$87,$16 P.B.'... -L1610 fcb $FF,$6E,$17,$F1,$7A,$30,$8D,$EB .n.qz0.k -L1618 fcb $AB,$17,$F1,$3D,$03,$18,$31,$C9 +.q=..1I -L1620 fcb $01,$D6,$DC,$49,$17,$F3,$36,$1F .V\I.s6. -L1628 fcb $98,$17,$F3,$31,$DC,$4B,$17,$F3 ..s1\K.s -L1630 fcb $2C,$0F,$18,$1F,$98,$17,$F3,$25 ,.....s% -L1638 fcb $CC,$20,$20,$ED,$A1,$ED,$A1,$30 L m!m!0 -L1640 fcb $C9,$01,$D6,$9F,$27,$1F,$20,$93 I.V.'. . -L1648 fcb $27,$1F,$02,$17,$F1,$2A,$30,$8D '...q*0. -L1650 fcb $EB,$87,$17,$F1,$04,$10,$8E,$00 k..q.... -L1658 fcb $09,$17,$F4,$2D,$25,$B4,$CC,$20 ..t-%4L -L1660 fcb $37,$17,$F1,$2E,$17,$F5,$9B,$10 7.q..u.. -L1668 fcb $26,$F0,$A0,$9E,$45,$DE,$47,$C6 &p .E^GF -L1670 fcb $02,$96,$00,$10,$3F,$8E,$10,$25 ....?..% -L1678 fcb $F6,$3C,$9F,$49,$DF,$4B,$DE,$1B v<.I_K^. -L1680 fcb $96,$49,$91,$02,$25,$0C,$26,$07 .I..%.&. -L1688 fcb $DC,$4A,$10,$93,$03,$23,$07,$16 \J...#.. -L1690 fcb $F0,$63,$97,$02,$DC,$4A,$0D,$4C pc..\J.L -L1698 fcb $26,$03,$83,$00,$01,$DD,$03,$10 &....].. -L16A0 fcb $83,$FF,$FF,$26,$EA,$0A,$02,$20 ...&j.. -L16A8 fcb $E6,$96,$A5,$81,$10,$24,$24,$C6 f.%..$$F -L16B0 fcb $03,$3D,$30,$C9,$00,$A6,$30,$85 .=0I.&0. -L16B8 fcb $DC,$02,$ED,$81,$96,$04,$A7,$84 \.m...'. -L16C0 fcb $0D,$A5,$27,$0A,$A1,$1D,$26,$06 .%'.!.&. -L16C8 fcb $DC,$02,$A1,$1B,$27,$02,$0C,$A5 \.!.'..% -L16D0 fcb $16,$F0,$38,$17,$F0,$B9,$30,$8D .p8.p90. -L16D8 fcb $EB,$51,$17,$F0,$7C,$17,$F1,$08 kQ.p|.q. -L16E0 fcb $20,$EE,$96,$A5,$27,$EA,$C6,$03 n.%'jF. -L16E8 fcb $3D,$C0,$03,$30,$C9,$00,$A6,$30 =@.0I.&0 -L16F0 fcb $85,$EC,$81,$DD,$02,$A6,$84,$97 .l.].&.. -L16F8 fcb $04,$0A,$A5,$16,$EF,$F7,$34,$76 ..%.ow4v -L1700 fcb $6F,$64,$A6,$63,$3D,$ED,$66,$EC od&c=mfl -L1708 fcb $61,$3D,$EB,$66,$89,$00,$ED,$65 a=kf..me -L1710 fcb $E6,$E4,$A6,$63,$3D,$E3,$65,$ED fd&c=cem -L1718 fcb $65,$24,$02,$6C,$64,$A6,$E4,$E6 e$.ld&df -L1720 fcb $62,$3D,$E3,$64,$ED,$64,$35,$F6 b=cdmd5v -L1728 fcb $34,$16,$86,$10,$34,$02,$4F,$5F 4...4.O_ -L1730 fcb $68,$64,$69,$63,$59,$49,$10,$A3 hdicYI.# -L1738 fcb $61,$25,$04,$A3,$61,$6C,$64,$6A a%.#aldj -L1740 fcb $E4,$26,$ED,$AE,$63,$32,$65,$39 d&m.c2e9 -L1748 fcb $CC,$20,$34,$17,$F0,$44,$30,$8D L 4.pD0. -L1750 fcb $EA,$B0,$17,$F0,$04,$31,$C9,$01 j0.p.1I. -L1758 fcb $D6,$34,$20,$DC,$97,$17,$F1,$FD V4 \..q. -L1760 fcb $1F,$98,$17,$F1,$F8,$96,$99,$17 ...qx... -L1768 fcb $F1,$F3,$A6,$A2,$8A,$80,$A7,$A4 qs&"..'$ -L1770 fcb $CC,$32,$34,$17,$F0,$1C,$AE,$E4 L24.p..d -L1778 fcb $17,$EF,$DE,$10,$AE,$E4,$DC,$9A .o^..d\. -L1780 fcb $17,$F1,$DA,$1F,$98,$17,$F1,$D5 .qZ...qU -L1788 fcb $96,$9C,$17,$F1,$D0,$A6,$A2,$8A ...qP&". -L1790 fcb $80,$A7,$A4,$CC,$3D,$34,$17,$EF .'$L=4.o -L1798 fcb $F9,$35,$10,$17,$EF,$BB,$39,$55 y5..o;9) -L17A0 fcb $6F,$BE .? - - ELSE + IFNE 1 + nam dEd OS-9 Disk Editor Version ??? + ttl Copyright 1987 Doug DeMartinis +******************************************************* +* Copyright 1987 Doug DeMartinis; All Rights Reserved * +* CIS: 72245,1400 * +* Delphi: DOUGLASD * +* Personal use and uploading of code, source and docs * +* to BBS's, as well as customization of the terminal * +* display codes, is permitted only if the copyright * +* notice and docs remain intact. * +* * +* 10/87 Various mods & fixes by Bruce Isted (BRI) * +* 11/87 Added Diddle, Find, Push, Remove routines. * +* Fixed bug throwing stack off by going in and * +* out of various error routines. * +* * +******************************************************* +* Further provenance is unknown but there has been at * +* least some modifications by Marie-Louis Marcoux. * +* The program now reports position in the allocation * +* map and which sectors the bytes represent when * +* editing the map. It appears to also contain the * +* patches indicated below. * +* The Rev Ed is 2.05 which would be consistant with * +* the Marcoux dEd on RTSI as dEd_Plus_1and2_Patch.lzh * +* but the CRC does not match. RG * +******************************************************* +* * +* Mods by Roger A. Krupski (HARDWAREHACK) * +* * +* 02/88 -Added "enter" command which cleans up the * +* screen by running the REDO subroutine. (RAK) * +* * +* 01/90 -Added a check for the break key which allows * +* aborting the <F>ind function. (RAK) * +* -Added a check for null filename in OUTFILE: * +* and bypass I$Create if so. * +* -Other minor bugs fixed / errors trapped. * +******************************************************* +* 06/01/11 Robert Gault * +* Corrected BAM to sector calculation. * +* No attempt has been made to comment code. * + +* Disassembled 2006/01/10 00:57:52 by Disasm v1.5 (C) 1988 by RML and RG + + ifp1 + use defsfile + endc +tylg set Prgrm+Objct +atrv set ReEnt+rev +rev set $02 +top mod eom,name,tylg,atrv,start,size +u0000 rmb 1 +u0001 rmb 1 +u0002 rmb 1 +u0003 rmb 1 +u0004 rmb 1 +u0005 rmb 1 +u0006 rmb 1 +u0007 rmb 1 +u0008 rmb 2 +u000A rmb 4 +u000E rmb 1 +u000F rmb 1 +u0010 rmb 1 +u0011 rmb 1 +u0012 rmb 2 +u0014 rmb 2 +u0016 rmb 1 +u0017 rmb 1 +u0018 rmb 1 +u0019 rmb 1 +u001A rmb 1 +u001B rmb 2 +u001D rmb 2 +u001F rmb 1 +u0020 rmb 1 +u0021 rmb 2 +u0023 rmb 2 +u0025 rmb 2 +u0027 rmb 2 +u0029 rmb 1 +u002A rmb 1 +u002B rmb 1 +u002C rmb 1 +u002D rmb 1 +u002E rmb 1 +u002F rmb 1 +u0030 rmb 1 find hex/ascii flag +u0031 rmb 17 string to find +u0042 rmb 2 +u0044 rmb 1 +u0045 rmb 1 +u0046 rmb 1 +u0047 rmb 2 +u0049 rmb 1 +u004A rmb 1 +u004B rmb 1 +u004C rmb 1 +u004D rmb 30 linked module name +u006B rmb 30 output filename +u0089 rmb 1 +u008A rmb 1 +u008B rmb 1 +u008C rmb 1 +u008D rmb 2 +u008F rmb 2 +u0091 rmb 1 +u0092 rmb 1 +u0093 rmb 1 +u0094 rmb 1 +u0095 rmb 1 +u0096 rmb 1 +u0097 rmb 1 +u0098 rmb 1 +u0099 rmb 1 +u009A rmb 1 +u009B rmb 1 +u009C rmb 1 +u009D rmb 8 +u00A5 rmb 1 +u00A6 rmb 48 +u00D6 rmb 256 +u01D6 rmb 320 +size equ . +L000D fcb $0C clear screen +L000E fcb $1F,$20,0 reverse video on +L0011 fcb $1F,$21,0 reverse video off +L0014 fcb $04 erase from current character to end of line +L0015 fcb $0B erase from current character to end of screen +L0016 fcb $05,$21,0 turns on cursor +L0019 fcb $05,$20,0 turns off cursor +name equ * + fcs /dEd/ + fcb $05 + fcc /Copyright 1987 Doug DeMartinis/ +L003E fcs /LSN=$/ +L0043 fcs /SECTOR = $/ +L004D fcc / 0 1 2 3 4 5 6 7 8 9 A B C D E F/ + fcc / 0 2 4 6 8 A C E / + fcb $0D +L0096 fcs /CMD: / +L009B fcc "<BREAK> toggles HEX/ASCII edit modes " + fcs /<ENTER> exits edit mode/ +L00DB fcs /Zap / +L00DF fcs /byte: / +L00E5 fcs /char: / +L00EB fcs "Are you sure? (Y/N) " +L00FF fcs /Writing sector.../ +L0110 fcs /OUTFILE: / +L0119 fcs /Verifying.../ +L0125 fcs /Verify aborted.../ +L0136 fcs /shell/ +L013B fcs /Link to which module? / +L0151 fcc /Off Len Name/ + fcb $0A + fcc /---- ---- ----/ + fcb $0D +L016F fcs /MODULE: / +L0178 fcs /OFFSET: $/ +L0181 fcb $1F,$24 blink on + fcc /- Expert Mode -/ + fcb $1F,$25+$80 blink off +L0194 fcs /Find byte string $/ +L01A6 fcs /Find char string: / +L01B8 fcs /Searching.../ +L01C4 fcs /Current File Length $/ +L01D9 fcs /New Length? $/ +L01E6 fcs /** RESTART, Enter pathname: / +L0202 fcs /BAM: From Sector:$ to $ / +L0226 fcs /Bits:/ +L022B fcb $07 + fcs /Sector Stack Full / +L023E fcc " Up/Down Arrows Read & display Next/Previous sector" + fcb $0A + fcc / <CR> Clean up the screen display/ + fcb $0A + fcc / * Restart/ + fcb $0A + fcc / $ Fork a SHELL (Ctrl-BREAK to return)/ + fcb $0A + fcc / A Append displayed sector to output file/ + fcb $0A + fcc / C Close output file/ + fcb $0A + fcc / D Diddle (adjust) file length/ + fcb $0A + fcc / E Edit the displayed sector/ + fcb $0A + fcc / F Find a byte or text string (BREAK aborts)/) + fcb $0A + fcc / H Help screen (also use '?')/ + fcb $0A + fcc / L Link to a module - List all modules/ + fcb $0A + fcc / N Next occurrence of byte(s) or string (Find)/ + fcb $0A + fcc / O Open a file for output (use with Append)/ + fcb $0A + fcc / P Push current sector onto stack/ + fcb $0A + fcc / Q Quit dEd - Exit to OS9/ + fcb $0A + fcc / R Remove and display a sector from stack/ + fcb $0A + fcc / S Skip to given sector (sector # in hex)/ + fcb $0A + fcc / U Unlink from module/ + fcb $0A + fcc / V Verify all modules in file/ + fcb $0A + fcc / W Write the sector back to the disk/ + fcb $0A + fcc " X eXpert mode toggle on/off" + fcb $0A + fcc / Z Zap (fill in) the sector displayed/ + fcb $0A + fcb $0A + fcc / (Press any key to return to command prompt):/ +L05AC fcc /Use: dEd <pathlist>/ + fcb $0D +L05C1 fcb $98,$96,$80 decimal 10,000,000 + fcb $0F,$42,$40 decimal 1,000,000 + fcb $01,$86,$A0 decimal 100,000 + fcb $00,$27,$10 decimal 10,000 + fcb $00,$03,$E8 decimal 1,000 + fcb $00,$00,$64 decimal 100 + fcb $00,$00,$0A decimal 10 + fcb $00,$00,$01 decimal 1 +* Command jump table +L05D9 fcb $0C up arrow + fdb L0A40 + fcb $0A down arrow + fdb L0A4E + fcb '* ????? + fdb L0627 ????? + fcb '$ shell + fdb L10BD + fcb $0D CR + fdb L10EF + fcb 's LSN change + fdb L0A67 + fcb 'z Zap + fdb L0B23 + fcb 'w Write sector + fdb L0BD4 + fcb 'o Open output file + fdb L0C26 + fcb 'a Append to file + fdb L0CAD + fcb 'c Close output file + fdb L0C97 + fcb 'e Edit sector + fdb L0D37 + fcb 'q Quit + fdb L0D22 + fcb 'v Verify + fdb L1116 + fcb 'l Link + fdb L1223 + fcb 'u Unlink + fdb L13CA + fcb 'x eXpert mode + fdb L13EB + fcb 'h help + fdb L1413 + fcb '? help + fdb L1413 + fcb 'f Find + fdb L142B + fcb 'n Next find + fdb L15F9 + fcb 'd Diddle length + fdb L1612 + fcb 'p Push + fdb L16A9 + fcb 'r Restore (Pop) + fdb L16E2 + fcb $00 +L0622 stb u008B,u + rti +L0627 lds <u001D + ldu <u001B + com <u001A + lbsr L10F5 + lbsr L078F + leax L01E6,pcr + lbsr L0759 + lbsr L07B0 + leax u01D6,u + stx <u00D6 + ldy #$50 + clra + os9 I$ReadLn + lbcs L0CB6 + cmpy #1 + bne L065E + clr <u001A + lbsr L10F5 + lbra L070B +L065E lda <u0000 + os9 I$Close + bra L0672 + +start equ * + stx <u00D6 + leax >L0622,pcr + os9 F$Icpt + lbcs L0CB6 +L0672 clra + ldb #$D6 + leax ,u +L0677 sta ,x+ + decb + bne L0677 + stu <u001B + sts <u001D + ldd #$0002 + std <u000A + leas <-$20,s + leax ,s + clra + clrb + os9 I$GetStt + lbcs L0CB6 + lda $04,x + sta <u0019 + leas <$20,s + ldx <u00D6 + pshs x + clr <u008C +L06A1 lda ,x+ + cmpa #$0D + beq L06AD + cmpa #$40 + bne L06A1 + com <u008C +L06AD puls x + lda #$03 + os9 I$Open + bcc L06C7 + cmpb #$D6 + lbne L0D34 + ldx <u00D6 + lda #$83 + os9 I$Open + lbcs L0D34 +L06C7 sta <u0000 + ldb #$02 + os9 I$GetStt + stx <u0049 + stu <u004B + ldu <u001B + clr <u001A + lbsr L10F5 + lbsr L07BA + tst <u008C + beq L06F5 + lbsr L07C4 + ldx <u0012 + ldd $04,x + std <u008D +* Next line converts DD.MAP to base0 numbering. +* (DD.MAP-1)/$100+1=sectors in map. Original was DD.MAP/$100+1 RG + subd #1 needed to correctly convert DD.MAP to sectors, RG + tfr d,x + ldd #$0100 + lbsr L1728 + leax $01,x + stx <u008F +L06F5 lbsr L07C4 + sty <u001F + ldd <u0002 + std <u0005 + lda <u0004 + sta <u0007 + ldd #$0000 + std <u0042 +L0708 lbsr L081F +L070B lbsr L078F + leax >L0096,pcr + bsr L0759 + leax >L0015,pcr + ldy #$0001 + os9 I$Write + lbcs L0CB6 + leax >u01D6,u + lbsr L07E8 + lda ,x + cmpa #$41 + bcs L0732 + ora #$20 +L0732 leax >L05D9,pcr +L0736 cmpa ,x+ + beq L0742 + leax $02,x + tst ,x + bne L0736 + bra L070B +L0742 tst <u002E + beq L0751 + tst <u002D + beq L0751 + pshs x,a + lbsr L0BF0 + puls x,a +L0751 ldd ,x + leax top,pcr + jmp d,x +L0759 leay >u01D6,u + clrb +L075E incb + lda ,x+ + bmi L0767 + sta ,y+ + bra L075E +L0767 anda #$7F + sta ,y + leax >u01D6,u + clra + tfr d,y + bra L0778 +L0774 ldy #$0078 +L0778 lda #$01 +L077A os9 I$WritLn + lbcs L0CB6 + rts + ldy #$0003 +L0786 clra + os9 I$ReadLn + lbcs L0CB6 + rts +L078F ldd #$2036 move command +L0792 leax u000A,u + std $02,x + ldy #$0004 + bra L0778 +L079C leax >L000E,pcr + ldy #$0002 + bra L0778 +L07A6 leax >L0011,pcr + ldy #$0002 + bra L0778 +L07B0 leax >L0014,pcr + ldy #$0001 + bra L0778 +L07BA leax >L000D,pcr + ldy #$0001 + bra L0778 +L07C4 bsr L07F1 + leax >u00D6,u + stx <u0012 + tst <u004D + beq L07DA + ldd <u0023 + suba <u0004 + bne L07DA + tfr d,y + bra L07DE +L07DA ldy #$0100 +L07DE lda <u0000 + os9 I$Read + lbcs L0CB6 + rts +L07E8 clra + ldy #$0001 + os9 I$Read + rts +L07F1 tst <u004D + bne L0808 + ldx <u0002 + lda <u0004 + clrb +L07FA tfr d,u + lda <u0000 + os9 I$Seek + lbcs L0CB6 + ldu <u001B +L0807 rts +L0808 ldd <u0023 + subd #$0001 + cmpa <u0004 + bcc L0816 + ldb #$D3 + lbra L0CB6 +L0816 ldd <u0008 + adda <u0004 + ldx #$0000 + bra L07FA +L081F ldd #$2020 + lbsr L0792 + leax >L003E,pcr + lbsr L0759 + bsr L07B0 + lbsr L08E6 + leax >u01D6,u + lbsr L0774 + tst <u004D + beq L083F + lbsr L139A +L083F tst <u0001 + beq L0846 + lbsr L0C77 +L0846 ldd #$2022 + lbsr L0792 + leax >L000E,pcr + ldy #$0002 + lbsr L077A + leax >L004D,pcr + lbsr L0774 + leax >L0011,pcr + ldy #$0002 + lbsr L077A +L0869 lbsr L098C + lda <u000F + adda #$10 + sta <u000F + bne L0869 + leax >u00D6,u + stx <u0012 + tst <u008C + beq L08CA + ldd <u0003 + cmpd #$0001 + bcs L08CA + cmpd <u008F + bhi L08CA + ldd <u0003 might this be map size in bytes? + subd #$0001 assumes allocation map starts at LSN1 + ldx #$0800 8 bits/byte x $100 to convert to position + lbsr L16FE + tfr y,d + stb <u0091 result of conversion. + stu <u0092 + leau >$07FF,u + cmpu <u004A + bls L08AF + cmpb <u0049 + bcs L08AF + ldb <u0049 + ldu <u004A + leau -u0001,u +L08AF stb <u0094 + stu <u0095 + ldu <u001B + ldx <u0091 + ldb <u0093 + stx <u0097 + stb <u0099 + ldx <u0094 + ldb <u0096 + stx <u009A + stb <u009C + lbsr L1748 + bra L08D3 +L08CA ldd #$2034 + lbsr L0792 + lbsr L07B0 +L08D3 tst <u002E + lbeq L0807 + ldd #$5933 + lbsr L0792 + leax >L0181,pcr + lbra L0759 +L08E6 ldd <u0002 + com <u0018 + leay >u01D6,u + bsr L095D + tfr b,a + bsr L095D + clr <u0018 + lda <u0004 + bsr L095D + ldd #$2020 + std ,y++ + ldd #$0008 + pshs b,a + com <u0018 + leax >L05C1,pcr +L090A clr ,s +L090C ldd <u0003 + subd $01,x + pshs cc + std <u0003 + lda <u0002 + clrb + suba ,x + bcc L091C + incb +L091C puls cc + bcc L0922 + suba #$01 +L0922 sta <u0002 + bcc L0927 + incb +L0927 tstb + bne L092E + inc ,s + bra L090C +L092E ldd <u0003 + addd $01,x + std <u0003 + lda <u0002 + bcc L0939 + inca +L0939 adda ,x + sta <u0002 + leax $03,x + bsr L0984 + dec $01,s + beq L094F + lda $01,s + cmpa #$02 + bne L090A + clr <u0018 + bra L090A +L094F lda #$0D + sta ,y + ldd <u0006 + std <u0003 + lda <u0005 + sta <u0002 + puls pc,b,a +L095D pshs a convert hex to ascii + lsra + lsra + lsra + lsra + bsr L096C + puls a + anda #$0F + bsr L096C + rts +L096C cmpa #$09 + ble L0972 + adda #$07 +L0972 adda #$30 + sta ,y+ + tst <u0018 + beq L0980 + cmpa #$30 + beq L0981 + clr <u0018 +L0980 rts +L0981 leay -$01,y + rts +L0984 pshs a + lda $03,s + bsr L0972 + puls pc,a +L098C leay >u01D6,u + leax >L000E,pcr + lbsr L0A31 + lda <u0020 + beq L09A5 + anda #$F0 + cmpa <u000F + bne L09A5 + lda #$FF + sta <u0011 +L09A5 lda <u000F + bsr L095D + lda #$3A + sta ,y+ + leax >L0011,pcr + bsr L0A31 + ldd #$2020 + std ,y++ + ldx <u0012 + ldb #$10 + tst <u0011 + beq L09C8 + ldb <u0020 + andb #$0F + beq L0A3A + pshs b +L09C8 lda ,x+ + bsr L095D + lda #$20 + sta ,y+ + decb + bne L09C8 + tst <u0011 + beq L09E4 + ldd #$0310 + subb ,s + mul + lda #$20 +L09DF sta ,y+ + decb + bne L09DF +L09E4 ldb #$20 + std ,y++ + sta ,y+ + ldx <u0012 + asrb + tst <u0011 + beq L09F3 + ldb ,s +L09F3 lda ,x+ + anda #$7F + cmpa #$20 + bcc L09FD + lda #$2E +L09FD sta ,y+ + decb + bne L09F3 + stx <u0012 + tst <u0011 + beq L0A26 + ldb #$10 + subb ,s+ + lda #$20 +L0A0E sta ,y+ + decb + bne L0A0E + lda #$F0 + sta <u000F + bsr L0A26 +L0A19 clr <u0011 + leax >L0015,pcr + ldy #$0001 + lbra L0778 +L0A26 lda #$0D + sta ,y + leax >u01D6,u + lbra L0774 +L0A31 lda ,x+ + beq L0A39 + sta ,y+ + bra L0A31 +L0A39 rts +L0A3A lda #$F0 + sta <u000F + bra L0A19 +L0A40 ldd <u0003 + addd #$0001 + std <u0003 + bne L0A4B + inc <u0002 +L0A4B lbra L06F5 +L0A4E ldd <u0003 + bne L0A58 + tst <u0002 + lbeq L070B +L0A58 subd #$0001 + std <u0003 + cmpd #$FFFF + bne L0A4B + dec <u0002 + bra L0A4B +L0A67 lbsr L078F + leax >L0043,pcr + lbsr L0759 + ldy #$0007 + bsr L0A89 + bcs L0A84 + ldd <u0047 + std <u0003 + lda <u0046 + sta <u0002 + lbra L06F5 +L0A84 lbsr L1535 + bra L0A67 +L0A89 pshs y + clr <u001A + com <u001A + lbsr L10F5 + puls y + leax >u01D6,u + lbsr L0786 + clr <u001A + lbsr L10F5 + leay -$01,y + beq L0AEE + tfr y,d +L0AA6 lda ,x+ + bsr L0AF3 + bcs L0AEB + decb + bne L0AA6 + sty <u0045 +L0AB2 lda #$30 + ldb ,-x + leay -$01,y + beq L0ABE + lda ,-x + leay -$01,y +L0ABE bsr L0B09 + pshs b + cmpy #$0000 + bne L0AB2 + ldb <u0046 + incb + lsrb + clra + leax <u0045,u + cmpb #$04 + beq L0AE2 + sta ,x+ + cmpb #$03 + beq L0AE2 + sta ,x+ + cmpb #$02 + beq L0AE2 + sta ,x+ +L0AE2 puls a + sta ,x+ + decb + bne L0AE2 + clrb + rts +L0AEB lbsr L1535 +L0AEE leas $02,s + lbra L06F5 +L0AF3 cmpa #$30 + bcs L0B07 + cmpa #$39 + bls L0B05 + anda #$5F + cmpa #$46 + bhi L0B07 + cmpa #$41 + bcs L0B07 +L0B05 clra + rts +L0B07 coma + rts +L0B09 bsr L0B18 + pshs b + tfr a,b + bsr L0B18 + lslb + lslb + lslb + lslb + orb ,s+ + rts +L0B18 subb #$30 + cmpb #$09 + bls L0B22 + andb #$5F + subb #$07 +L0B22 rts +L0B23 clr <u001A + com <u001A + lbsr L10F5 + lbsr L078F + lbsr L07B0 + leax >L00DB,pcr + lbsr L0759 + tst <u0017 + bne L0B81 + leax >L00DF,pcr + lbsr L0759 + ldy #$0003 + bsr L0B62 + bsr L0B96 + bcs L0B79 +L0B4C leax >u00D6,u + stx <u0012 + clrb +L0B53 sta ,x+ + decb + bne L0B53 + clr <u001A + lbsr L10F5 + inc <u002D + lbra L0708 +L0B62 clra + leax >u01D6,u + os9 I$ReadLn + bcs L0B6D + rts +L0B6D cmpb #$02 + lbne L0CB6 + com <u0017 + leas $02,s + bra L0B23 +L0B79 clr <u001A + lbsr L10F5 + lbra L070B +L0B81 leax >L00E5,pcr + lbsr L0759 + ldy #$0002 + bsr L0B62 + lda ,x + cmpa #$20 + bcs L0B79 + bra L0B4C +L0B96 bsr L0BAA + bcs L0BC9 + tfr a,b + bsr L0BAA + bcs L0BC9 + lslb + lslb + lslb + lslb + pshs b + ora ,s+ + bra L0BC4 +L0BAA bsr L0BB0 + bcs L0BC9 + bra L0BCA +L0BB0 lda ,x+ + cmpa #$30 + bcs L0BC7 + cmpa #$39 + bls L0BC4 + anda #$5F + cmpa #$41 + bcs L0BC7 + cmpa #$46 + bhi L0BC7 +L0BC4 andcc #$FE + rts +L0BC7 orcc #$01 +L0BC9 rts +L0BCA suba #$30 + cmpa #$09 + bls L0BD2 + suba #$07 +L0BD2 bra L0BC4 +L0BD4 tst <u002E + lbne L070B + bsr L0BFF + lbne L070B + lbsr L078F + lbsr L07B0 + lbsr L078F + leax >L00FF,pcr + lbsr L0759 +L0BF0 lbsr L07F1 + lda <u0000 + lbsr L0C8A + tst <u002E + beq L0C74 + clr <u002D + rts +L0BFF lbsr L078F +L0C02 clr <u001A + com <u001A + lbsr L10F5 + leax >L00EB,pcr + lbsr L0759 + lbsr L07B0 + leax >u01D6,u + lbsr L07E8 + clr <u001A + lbsr L10F5 + lda ,x + anda #$5F + cmpa #$59 + rts +L0C26 tst <u0001 + bne L0C74 + clr <u001A + com <u001A + lbsr L10F5 + lbsr L078F + leax >L0110,pcr + lbsr L0759 + lbsr L07B0 + leax >u01D6,u + ldy #$001E + lbsr L0786 + clr <u001A + lbsr L10F5 + cmpy #$0001 + beq L0C74 + pshs x + leay <u006B,u +L0C59 lda ,x+ + sta ,y+ + cmpa #$20 + bhi L0C59 + lda #$0D + sta -$01,y + puls x + lda #$02 + ldb #$0B + os9 I$Create + bcs L0CB6 + sta <u0001 + bsr L0C77 +L0C74 lbra L070B +L0C77 ldd #$3021 + lbsr L0792 + leax >L0110,pcr + lbsr L0759 + leax <u006B,u + lbra L0774 +L0C8A leax >u00D6,u + ldy <u001F + os9 I$Write + bcs L0CB6 + rts +L0C97 lda <u0001 + beq L0C74 + os9 I$Close + bcs L0CB6 + ldd #$3021 + lbsr L0792 + lbsr L07B0 + clr <u0001 +L0CAB bra L0C74 +L0CAD lda <u0001 + beq L0CAB + bsr L0C8A + lbra L0A40 +L0CB6 pshs b + clr <u008B + ldd <u0005 + std <u0002 + lda <u0007 + sta <u0004 + puls b + lds <u001D + cmpb #$02 + beq L0CD7 + cmpb #$03 + bne L0CD3 + clr <u002D + bra L0CD7 +L0CD3 cmpb #$D3 + bne L0CDA +L0CD7 lbra L0B79 +L0CDA cmpb #$CD + bne L0CF2 + tst <u004D + bne L0CF2 + bsr L0D01 + leax >L000D,pcr + ldy #$0001 + lbsr L0778 + lbra L0708 +L0CF2 pshs b + lbsr L078F + lbsr L07B0 + puls b + bsr L0D01 + lbra L070B +L0D01 lda #$02 + os9 F$PErr + clr <u001A + lbsr L10F5 + leax >u01D6,u + lbra L07E8 + lda #$02 + leax >L05AC,pcr + ldy #$0078 + lbsr L077A + clrb + bra L0D34 +L0D22 lbsr L0BFF + lbne L070B + lbsr L07BA + lda <u0019 + sta <u001A + lbsr L10F5 + clrb +L0D34 os9 F$Exit +L0D37 lbsr L078F + leax >L009B,pcr + lbsr L0759 +L0D41 leax >u00D6,u + stx <u0014 + lda #$01 + sta <u0016 + lda #$23 + sta <u000F + lda #$25 + sta <u000E + lda #$58 + sta <u0010 +L0D57 lbsr L079C + lbsr L0E47 +L0D5D lda <u000E + ldb <u000F + tst <u0017 + beq L0D67 + lda <u0010 +L0D67 tst <u008C + lbeq L0E37 + ldx <u0003 + cmpx #$0001 + lbcs L0E37 + cmpx <u008F + lbhi L0E37 + pshs b,a + ldx <u0091 + ldb <u0093 + stx <u0097 + stb <u0099 + ldx <u0094 + ldb <u0096 + stx <u009A + stb <u009C + clra + ldb <u000F + subb #$23 + lda #$10 + mul + pshs b,a + clra + ldb <u000E + subb #$25 + beq L0DA9 + tfr d,x + ldd #$0003 + lbsr L1728 + tfr x,d +L0DA9 addd ,s++ + ldx <u0003 + cmpx <u008F + bcs L0DC3 + pshs b,a + ldd <u008D + clra + tfr d,x + puls b,a + leax -$01,x + pshs x + cmpd ,s++ + bhi L0DDD +L0DC3 ldx #$0008 + lbsr L16FE + tfr u,d + addd <u0098 + std <u0098 + addd #$0007 + cmpd <u0095 + bls L0DD9 + ldd <u0095 +L0DD9 std <u009B + bra L0DE3 +L0DDD clr <u009A + clr <u009B + clr <u009C +L0DE3 ldu <u001B + lbsr L07A6 + tst <u009C + bne L0DFF + tst <u009B + bne L0DFF + tst <u009A + bne L0DFF + ldd #$2034 + lbsr L0792 + lbsr L07B0 + bra L0E32 +L0DFF lbsr L1748 + ldd #$4934 + lbsr L0792 + leax >L0226,pcr + lbsr L0759 + leax >u009D,u + lda [<u0014,u] + ldb #$08 + pshs x,a +L0E1A lsl ,s + bcs L0E22 + lda #$30 + bra L0E24 +L0E22 lda #$31 +L0E24 sta ,x+ + decb + bne L0E1A + puls x,a + ldy #$0008 + lbsr L0778 +L0E32 lbsr L079C + puls b,a +L0E37 lbsr L0792 + leax >u01D6,u + tst <u0017 + lbne L0F38 + lbra L0EFE +L0E47 lda <u000E + ldb <u000F + lbsr L0792 + leay >u01D6,u + lda [<u0014,u] + pshs a + lbsr L095D + leax -$02,y + ldy #$0002 + lda #$01 + lbsr L077A + lda <u0010 + ldb <u000F + lbsr L0792 + puls a + anda #$7F + cmpa #$20 + bcc L0E76 + lda #$2E +L0E76 leax >u01D6,u + sta ,x + ldy #$0001 + lbra L0778 +L0E83 pshs x,b +L0E85 clra + ldb #$01 + os9 I$GetStt + bcc L0ED6 + cmpb #$F6 + bne L0EBF + ldx #$0001 + os9 F$Sleep + bcs L0EBF + dec <u0089 + lda <u0089 + eora <u008A + anda #$40 + beq L0EB5 + com <u008A + beq L0EAB + bsr L0EC7 + bra L0EB5 +L0EAB leax >L0019,pcr + ldy #$0002 + bsr L0ECF +L0EB5 ldb <u008B + cmpb #$02 + beq L0EBF + cmpb #$03 + bne L0E85 +L0EBF stb ,s + bsr L0EC7 + puls x,b + bra L0EE5 +L0EC7 leax >L0016,pcr + ldy #$0002 +L0ECF lda #$01 + os9 I$Write + clrb + rts +L0ED6 bsr L0EC7 + puls x,b + ldy #$0001 + clra + os9 I$Read + bcs L0EE5 + rts +L0EE5 leas $02,s + clr <u008B + cmpb #$02 + beq L0EF9 + pshs b + lbsr L101A + clr <u000F + puls b + lbra L0CB6 +L0EF9 com <u0017 + lbra L0D5D +L0EFE bsr L0E83 + bsr L0F1E + bcs L0F4A + lbsr L0778 + ldb ,x + lbsr L0E83 + bsr L0F1E + bcs L0F4A + exg a,b + lbsr L0B09 + stb [<u0014,u] + lda #$01 + sta <u002D + bra L0F75 +L0F1E lda ,x + cmpa #$30 + bcs L0F35 + cmpa #$39 + bls L0F32 + anda #$5F + cmpa #$46 + bhi L0F35 + cmpa #$41 + bcs L0F35 +L0F32 andcc #$FE + rts +L0F35 orcc #$01 + rts +L0F38 lbsr L0E83 + lda ,x + cmpa #$20 + bcs L0F4A + sta [<u0014,u] + lda #$01 + sta <u002D + bra L0F75 +L0F4A cmpa #$09 + beq L0F75 + cmpa #$08 + beq L0FB3 + cmpa #$0C + lbeq L1020 + cmpa #$0A + lbeq L1076 + cmpa #$0D + lbne L0D5D + lbsr L101A + ldd #$4934 + lbsr L0792 + lbsr L07B0 + clr <u000F + lbra L070B +L0F75 lbsr L101A + tst <u0020 + beq L0F84 + lda <u0016 + cmpa <u0020 + lbeq L0D41 +L0F84 ldd <u0014 + addd #$0001 + std <u0014 + inc <u0016 + inc <u0010 + lda <u0010 + cmpa #$68 + bcc L0F9E + lda <u000E + adda #$03 + sta <u000E + lbra L0D57 +L0F9E inc <u000F + lda <u000F + cmpa #$32 + lbhi L0D41 + lda #$25 + sta <u000E + lda #$58 + sta <u0010 + lbra L0D57 +L0FB3 bsr L101A + ldd <u0014 + subd #$0001 + std <u0014 + dec <u0016 + dec <u0010 + lda <u0010 + cmpa #$58 + bcs L0FCF + lda <u000E + suba #$03 + sta <u000E + lbra L0D57 +L0FCF dec <u000F + lda #$52 + sta <u000E + lda #$67 + sta <u0010 + lda <u000F + cmpa #$23 + bcs L0FE2 + lbra L0D57 +L0FE2 ldx <u0014 + ldb <u0020 + beq L100D + stb <u0016 + clra + leax d,x + decb + pshs b + lsrb + lsrb + lsrb + lsrb + addb #$23 + stb <u000F + lda ,s+ + anda #$0F + pshs a + adda #$58 + sta <u0010 + puls a + ldb #$03 + mul + addb #$25 + stb <u000E + bra L1015 +L100D lda #$32 + sta <u000F + leax >$0100,x +L1015 stx <u0014 + lbra L0D57 +L101A lbsr L07A6 + lbra L0E47 +L1020 bsr L101A + ldb <u0020 + beq L102C + lda <u000F + cmpa #$23 + beq L104F +L102C ldd <u0014 + subd #$0010 + std <u0014 + ldb <u0016 + subb #$10 + stb <u0016 + dec <u000F + lda <u000F + cmpa #$23 + bcc L104C + lda #$32 + sta <u000F + ldd <u0014 + addd #$0100 + std <u0014 +L104C lbra L0D57 +L104F andb #$F0 + lda <u0020 + anda #$0F + cmpa <u0016 + bcc L105B + subb #$10 +L105B clra + pshs b,a + ldd <u0014 + addd ,s+ + std <u0014 + ldb <u0016 + addb ,s + stb <u0016 + puls b + lsrb + lsrb + lsrb + lsrb + addb #$23 + stb <u000F + bra L104C +L1076 bsr L101A + ldb <u0020 + beq L1082 + subb <u0016 + cmpb #$10 + bcs L10A7 +L1082 ldd <u0014 + addd #$0010 + std <u0014 + lda <u0016 + adda #$10 + sta <u0016 + inc <u000F + lda <u000F + cmpa #$32 + lbls L0D57 + ldd <u0014 + subd #$0100 + std <u0014 +L10A0 lda #$23 + sta <u000F + lbra L0D57 +L10A7 clra + ldb <u0016 + decb + andb #$F0 + pshs b,a + ldd <u0014 + subd ,s+ + std <u0014 + ldb <u0016 + subb ,s+ + stb <u0016 + bra L10A0 +L10BD lbsr L07BA + lda <u0019 + sta <u001A + bsr L10F5 + leax >L0136,pcr + ldy #$0010 + leau >u01D6,u + lda #$0D + sta ,u + ldd #$0000 + os9 F$Fork + lbcs L0CB6 + os9 F$Wait + ldu <u001B + leax >u00D6,u + stx <u0012 + clr <u001A + bsr L10F5 +L10EF lbsr L07BA + lbra L0708 +L10F5 pshs x + leas <-$20,s + leax ,s + clra + clrb + os9 I$GetStt + lbcs L0CB6 + lda <u001A + sta $04,x + clra + os9 I$SetStt + lbcs L0CB6 + leas <$20,s + puls pc,x +L1116 lbsr L078F + leax >L0119,pcr + lbsr L0759 + ldu #$0000 + ldx #$0000 + stx <u0025 + lda <u0000 + os9 I$Seek + lbcs L0CB6 + ldu <u001B +L1133 ldd #$FFFF + std <u0029 + stb <u002B + leax >u01D6,u + ldy #$0008 + lda <u0000 + os9 I$Read + lbcs L0CB6 + cmpy #$0008 + lbne L120E + ldd ,x + cmpa #$87 + lbne L120E + cmpb #$CD + lbne L120E + ldd $02,x + cmpd #$000F + lbls L120E + subd #$0003 + std <u0021 + addd <u0025 + std <u0025 + clra + ldb #$08 +L1177 eora ,x+ + decb + bne L1177 + coma + sta ,x + ldy #$0001 + lda <u0000 + os9 I$Write + lbcs L0CB6 + ldd <u0021 + subd #$0009 + std <u0021 + leax >u01D6,u + ldy #$0009 + bsr L1201 +L119D lda <u0000 + ldy #$0078 + cmpy <u0021 + bls L11AB + ldy <u0021 +L11AB os9 I$Read + bcs L120E + sty <u0027 + bsr L1201 + ldd <u0021 + subd <u0027 + std <u0021 + bne L119D + lda <u0000 + ldb #$05 + os9 I$GetStt + tfr u,d + ldu <u001B + cmpd <u0025 + bne L120E + com <u0029 + com <u002A + com <u002B + leax <u0029,u + ldy #$0003 + lda <u0000 + os9 I$Write + lbcs L0CB6 + ldd #$0003 + addd <u0025 + std <u0025 + ldb #$06 + lda <u0000 + os9 I$GetStt + lbcc L1133 + cmpb #$D3 + lbne L0CB6 + lbsr L07C4 + lbra L0708 +L1201 leau <u0029,u + os9 F$CRC + lbcs L0CB6 + ldu <u001B + rts +L120E ldd #$2036 + lbsr L0792 + leax >L0125,pcr + lbsr L0759 + ldb #$CD + lbsr L0D01 + lbra L070B +L1223 tst <u004D + lbne L070B + ldd #$0000 + std <u0025 + std <u0023 + clr <u001A + com <u001A + lbsr L10F5 + lbsr L078F + lbsr L07B0 + leax >L013B,pcr + lbsr L0759 + leax <u004D,u + ldy #$001E + lbsr L0786 + clr <u001A + lbsr L10F5 + cmpy #$0001 + lbne L130C + lbsr L07BA + clr <u004D + leax >L0151,pcr + lbsr L0774 +L1267 ldd <u0023 + addd <u0025 + std <u0025 + tfr d,u + ldx #$0000 + lda <u0000 + os9 I$Seek + bcs L12F8 + ldu <u001B + leax >u01D6,u + ldy #$0006 + os9 I$Read + bcs L12F8 + ldd ,x++ + cmpa #$87 + bne L12F6 + cmpb #$CD + bne L12F6 + leay >u01D6,u + ldd ,x++ + std <u0023 + ldd ,x++ + pshs b,a + ldd <u0025 + bsr L12E6 + lda #$20 + sta ,y+ + ldd <u0023 + bsr L12E6 + lda #$20 + sta ,y+ + ldd <u0025 + addd ,s++ + tfr d,u + ldx #$0000 + lda <u0000 + os9 I$Seek + lbcs L0CB6 + ldu <u001B + tfr y,x + ldy #$001D + lda <u0000 + os9 I$Read + lbcs L0CB6 +L12D1 lda ,x+ + bpl L12D1 + anda #$7F + sta -$01,x + lda #$0D + sta ,x + leax >u01D6,u + lbsr L0774 + bra L1267 +L12E6 lbsr L095D + tfr b,a + lbra L095D +L12EE cmpb #$D3 + bne L12F8 + ldb #$DD + bra L12F8 +L12F6 ldb #$CD +L12F8 clr <u004D + cmpb #$D3 + lbne L0CB6 + lbsr L07E8 + leax >u00D6,u + stx <u0012 + lbra L10EF +L130C os9 F$PrsNam + lbcs L0CB6 + stb <u002C + decb + lda b,x + ora #$80 + sta b,x + stx <u0029 + ldu #$0000 +L1321 ldx #$0000 + lda <u0000 + os9 I$Seek + lbcs L0CB6 + ldu <u001B + leax >u01D6,u + ldy #$0006 + os9 I$Read + bcs L12EE + ldd ,x++ + cmpa #$87 + bne L12F6 + cmpb #$CD + bne L12F6 + ldd ,x++ + std <u0023 + ldd ,x + addd <u0025 + tfr d,u + ldx #$0000 + lda <u0000 + os9 I$Seek + bcs L12EE + ldu <u001B + leax >u01D6,u + ldy #$001D + os9 I$Read + bcs L12EE + tfr x,y + ldx <u0029 + ldb <u002C + os9 F$CmpNam + bcc L137E + ldd <u0023 + addd <u0025 + std <u0025 + tfr d,u + bra L1321 +L137E lda #$0D + sta b,x + decb + lda b,x + anda #$7F + sta b,x + ldd <u0025 + std <u0008 + ldd #$0006 + leax u0002,u +L1392 sta ,x+ + decb + bne L1392 + lbra L06F5 +L139A ldd #$3020 + lbsr L0792 + leax >L016F,pcr + lbsr L0759 + leax <u004D,u + lbsr L0774 + ldd #$5820 + lbsr L0792 + leax >L0178,pcr + lbsr L0759 + leay >u01D6,u + ldd <u0008 + lbsr L12E6 + lda #$0D + sta ,y + lbra L0778 +L13CA tst <u004D + lbeq L070B + ldd #$0008 + leax u0002,u +L13D5 sta ,x+ + decb + bne L13D5 + ldd #$3020 + lbsr L0792 + lbsr L07B0 + lbsr L07B0 + clr <u004D + lbra L06F5 +L13EB tst <u002E + beq L13FD + clr <u002E + ldd #$5933 + lbsr L0792 + lbsr L07B0 +L13FA lbra L070B +L13FD lbsr L0BFF + bne L13FA + com <u002E + ldd #$5933 + lbsr L0792 + leax >L0181,pcr + lbsr L0759 + bra L13FA +L1413 lbsr L07BA + leax >L023E,pcr + ldy #$036E + lbsr L077A + leax >u01D6,u + lbsr L07E8 + lbra L10EF +L142B clr <u001A + com <u001A + lbsr L10F5 + lbsr L078F + lbsr L07B0 + tst <u002F + bne L1471 + leax >L0194,pcr + lbsr L0759 + ldy #$0021 + lbsr L1514 + cmpy #$0001 + lbeq L1559 + leay -$01,y + tfr y,d + lsrb + lbcs L152E + stb <u0030 + leau <u0031,u +L1460 lbsr L0B96 + lbcs L152E + sta ,u+ + leay -$02,y + bne L1460 + ldu <u001B + bra L1496 +L1471 leax >L01A6,pcr + lbsr L0759 + ldy #$0011 + lbsr L1514 + cmpy #$0001 + lbeq L1559 + tfr y,d + decb + stb <u0030 + leay <u0031,u +L148F lda ,x+ + sta ,y+ + decb + bne L148F +L1496 clr <u001A + lbsr L10F5 + leax >u00D6,u +L149F ldb <u0020 + leay <u0031,u +L14A4 lda ,y + eora ,x+ + lbeq L155C + tst <u002F + beq L14B6 + bita #$5F + lbeq L155C +L14B6 decb +L14B7 bne L14A4 + pshs y,x,b,a + clra + ldb #$01 + os9 I$GetStt + bcs L14D0 + leax >u01D6,u + lbsr L07E8 + lda ,x + cmpa #$05 + beq L1546 +L14D0 puls y,x,b,a + bsr L14D6 + bra L149F +L14D6 tst <u004D + beq L14E3 + ldd <u0023 + subd #$0001 + cmpa <u0004 + beq L1546 +L14E3 ldd <u0003 + addd #$0001 + std <u0003 + bne L14EE + inc <u0002 +L14EE lbsr L07F1 + leax >u00D6,u + stx <u0012 + tst <u004D + beq L1505 + ldd <u0023 + suba <u0004 + bne L1505 + tfr d,y + bra L1509 +L1505 ldy #$0100 +L1509 lda <u0000 + os9 I$Read + bcs L1540 + sty <u001F + rts +L1514 leax >u01D6,u + clra + os9 I$ReadLn + bcs L151F + rts +L151F leas $02,s + clr <u008B + cmpb #$02 + lbne L0CB6 + com <u002F + lbra L142B +L152E ldu <u001B + bsr L1535 + lbra L142B +L1535 leax >L022B,pcr + ldy #$0001 + lbra L0778 +L1540 cmpb #$D3 + lbne L0CB6 +L1546 lds <u001D + ldd <u0005 + std <u0002 + lda <u0007 + sta <u0004 + lbsr L07C4 + sty <u001F + bsr L1535 +L1559 lbra L0B79 +L155C pshs b + decb + stb <u0044 + stx <u0042 + ldb <u0030 +L1565 decb + beq L1597 + dec ,s + beq L1588 +L156C leay $01,y + lda ,y + eora ,x+ + beq L1565 + tst <u002F + beq L157C + bita #$5F + beq L1565 +L157C leas $01,s + ldx <u0042 +L1580 leay <u0031,u + ldb <u0044 + lbra L14B7 +L1588 leas $01,s + pshs y,b + lbsr L14D6 + puls y,b + lda <u0020 + pshs a + bra L156C +L1597 leas $01,s + lda <u0004 + cmpa <u0007 + beq L15C0 + cmpx <u0042 + bcc L15B8 + ldd <u0003 + subd #$0001 + std <u0003 + cmpd #$FFFF + bne L15B2 + dec <u0002 +L15B2 lbsr L07C4 + sty <u001F +L15B8 ldd <u0002 + std <u0005 + lda <u0004 + sta <u0007 +L15C0 lbsr L081F + ldd <u0042 + subd #$0001 + std <u0014 + subd <u0012 + pshs b + andb #$0F + pshs b + addb #$58 + stb <u0010 + puls b + lda #$03 + mul + addb #$25 + stb <u000E + puls b + andb #$F0 + lsrb + lsrb + lsrb + lsrb + addb #$23 + stb <u000F + lbsr L079C + lbsr L0E47 + lbsr L07A6 + clr <u000F + lbra L1559 +L15F9 tst <u0030 + lbeq L070B + lbsr L078F + leax >L01B8,pcr + lbsr L0759 + ldx <u0042 + lbeq L1496 + lbra L1580 +L1612 lbsr L078F + leax >L01C4,pcr + lbsr L0759 + com <u0018 + leay >u01D6,u + ldd <u0049 + lbsr L095D + tfr b,a + lbsr L095D + ldd <u004B + lbsr L095D + clr <u0018 + tfr b,a + lbsr L095D + ldd #$2020 + std ,y++ + std ,y++ + leax >u01D6,u + stx <u0027 + tfr y,d + subd <u0027 + tfr d,y + lbsr L0778 + leax >L01D9,pcr + lbsr L0759 + ldy #$0009 + lbsr L0A89 + bcs L1612 + ldd #$2037 + lbsr L0792 + lbsr L0C02 + lbne L070B + ldx <u0045 + ldu <u0047 + ldb #$02 + lda <u0000 + os9 I$SetStt + lbcs L0CB6 + stx <u0049 + stu <u004B + ldu <u001B + lda <u0049 + cmpa <u0002 + bcs L1692 + bne L168F + ldd <u004A + cmpd <u0003 + bls L1696 +L168F lbra L06F5 +L1692 sta <u0002 + ldd <u004A +L1696 tst <u004C + bne L169D + subd #$0001 +L169D std <u0003 + cmpd #$FFFF + bne L168F + dec <u0002 + bra L168F +L16A9 lda <u00A5 + cmpa #$10 + bcc L16D3 + ldb #$03 + mul + leax >u00A6,u + leax b,x + ldd <u0002 + std ,x++ + lda <u0004 + sta ,x + tst <u00A5 + beq L16CE + cmpa -$03,x + bne L16CE + ldd <u0002 + cmpa -$05,x + beq L16D0 +L16CE inc <u00A5 +L16D0 lbra L070B +L16D3 lbsr L078F + leax >L022B,pcr + lbsr L0759 + lbsr L07E8 + bra L16D0 +L16E2 lda <u00A5 + beq L16D0 + ldb #$03 + mul + subb #$03 + leax >u00A6,u + leax b,x + ldd ,x++ + std <u0002 + lda ,x + sta <u0004 + dec <u00A5 + lbra L06F5 +* I think this is a general purpose 16x16 bit multiplication. +* regD is first number, regX is second number. +* Returns answer in regY and regU. +L16FE pshs u,y,x,b,a + clr $04,s + lda $03,s lower word of regX times regB + mul + std $06,s + ldd $01,s upper word of regX times regB + mul + addb $06,s + adca #$00 + std $05,s + ldb ,s original regA + lda $03,s upper word regX + mul + addd $05,s + std $05,s + bcc L171D + inc $04,s +L171D lda ,s + ldb $02,s + mul + addd $04,s + std $04,s + puls pc,u,y,x,b,a +L1728 pshs x,b,a + lda #$10 + pshs a + clra + clrb +L1730 lsl $04,s + rol $03,s + rolb + rola + cmpd $01,s + bcs L173F + subd $01,s + inc $04,s +L173F dec ,s + bne L1730 + ldx $03,s + leas $05,s + rts +L1748 ldd #$2034 + lbsr L0792 + leax >L0202,pcr BAM message + lbsr L0759 + leay >u01D6,u + pshs y + ldd <u0097 get 3 byte address and display it + lbsr L095D convert hex to ascii + tfr b,a + lbsr L095D convert hex to ascii + lda <u0099 + lbsr L095D convert hex to ascii + lda ,-y + ora #$80 + sta ,y + ldd #$3234 + lbsr L0792 + ldx ,s + lbsr L0759 + ldy ,s + ldd <u009A + lbsr L095D + tfr b,a + lbsr L095D + lda <u009C + lbsr L095D + lda ,-y + ora #$80 + sta ,y + ldd #$3D34 + lbsr L0792 + puls x + lbsr L0759 + rts + emod +eom equ * + + ELSE nam dEd OS-9 Disk Editor Version 2.01 ttl Copyright 1987 Doug DeMartinis @@ -3168,6 +4598,7 @@ emod dEDend equ * - end - - ENDC + + ENDC + + end