Mercurial > hg > Members > kono > nitros9-code
changeset 490:7e5b18941974
basic09.asm removed
Makefile changed to add runb to CMDS on Disk 2
| author | boisy |
|---|---|
| date | Wed, 09 Oct 2002 14:46:20 +0000 |
| parents | c9cad71c4605 |
| children | 570b83b872f6 |
| files | level1/cmds/basic09.asm level1/cmds/makefile |
| diffstat | 2 files changed, 2 insertions(+), 12218 deletions(-) [+] |
line wrap: on
line diff
--- a/level1/cmds/basic09.asm Wed Oct 09 14:44:30 2002 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,12216 +0,0 @@ - nam Basic09 - ttl program module - -* Disassembled 02/07/15 21:36:55 by Disasm v1.6 (C) 1988 by RML - - ifp1 - use defsfile - endc - -tylg set Prgrm+Objct -atrv set ReEnt+rev -rev set $01 -edition set $16 - - 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 1 -u0009 rmb 1 -u000A rmb 1 -u000B rmb 1 -u000C rmb 1 -u000D rmb 1 -u000E rmb 1 -u000F rmb 1 -u0010 rmb 1 -u0011 rmb 1 -u0012 rmb 1 -u0013 rmb 1 -u0014 rmb 1 -u0015 rmb 1 -u0016 rmb 1 -u0017 rmb 1 -u0018 rmb 1 -u0019 rmb 1 -u001A rmb 1 -u001B rmb 1 -u001C rmb 2 -u001E rmb 1 -u001F rmb 1 -u0020 rmb 1 -u0021 rmb 1 -u0022 rmb 1 -u0023 rmb 2 -u0025 rmb 1 -u0026 rmb 1 -u0027 rmb 3 -u002A rmb 2 -u002C rmb 1 -u002D rmb 1 -u002E rmb 1 -u002F rmb 1 -u0030 rmb 1 -u0031 rmb 1 -u0032 rmb 1 -u0033 rmb 1 -u0034 rmb 1 -u0035 rmb 1 -u0036 rmb 1 -u0037 rmb 2 -u0039 rmb 1 -u003A rmb 1 -u003B rmb 1 -u003C rmb 1 -u003D rmb 1 -u003E rmb 1 -u003F rmb 1 -u0040 rmb 2 -u0042 rmb 1 -u0043 rmb 1 -u0044 rmb 1 -u0045 rmb 1 -u0046 rmb 2 -u0048 rmb 1 -u0049 rmb 1 -u004A rmb 1 -u004B rmb 1 -u004C rmb 1 -u004D rmb 1 -u004E rmb 2 -u0050 rmb 1 -u0051 rmb 1 -u0052 rmb 1 -u0053 rmb 1 -u0054 rmb 1 -u0055 rmb 1 -u0056 rmb 1 -u0057 rmb 1 -u0058 rmb 1 -u0059 rmb 1 -u005A rmb 2 -u005C rmb 2 -u005E rmb 1 -u005F rmb 1 -u0060 rmb 1 -u0061 rmb 1 -u0062 rmb 2 -u0064 rmb 2 -u0066 rmb 1 -u0067 rmb 1 -u0068 rmb 1 -u0069 rmb 1 -u006A rmb 1 -u006B rmb 1 -u006C rmb 1 -u006D rmb 1 -u006E rmb 1 -u006F rmb 1 -u0070 rmb 2 -u0072 rmb 2 -u0074 rmb 1 -u0075 rmb 1 -u0076 rmb 1 -u0077 rmb 1 -u0078 rmb 1 -u0079 rmb 1 -u007A rmb 1 -u007B rmb 1 -u007C rmb 1 -u007D rmb 1 -u007E rmb 1 -u007F rmb 1 -u0080 rmb 1 -u0081 rmb 1 -u0082 rmb 1 -u0083 rmb 1 -u0084 rmb 1 -u0085 rmb 1 -u0086 rmb 1 -u0087 rmb 1 -u0088 rmb 1 -u0089 rmb 1 -u008A rmb 1 -u008B rmb 1 -u008C rmb 2 -u008E rmb 2 -u0090 rmb 1 -u0091 rmb 1 -u0092 rmb 2 -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 1 -u009E rmb 1 -u009F rmb 1 -u00A0 rmb 1 -u00A1 rmb 1 -u00A2 rmb 1 -u00A3 rmb 1 -u00A4 rmb 1 -u00A5 rmb 1 -u00A6 rmb 1 -u00A7 rmb 1 -u00A8 rmb 1 -u00A9 rmb 1 -u00AA rmb 1 -u00AB rmb 1 -u00AC rmb 1 -u00AD rmb 1 -u00AE rmb 1 -u00AF rmb 1 -u00B0 rmb 1 -u00B1 rmb 2 -u00B3 rmb 1 -u00B4 rmb 1 -u00B5 rmb 2 -u00B7 rmb 2 -u00B9 rmb 1 -u00BA rmb 1 -u00BB rmb 1 -u00BC rmb 1 -u00BD rmb 1 -u00BE rmb 1 -u00BF rmb 2 -u00C1 rmb 2 -u00C3 rmb 2 -u00C5 rmb 1 -u00C6 rmb 1 -u00C7 rmb 1 -u00C8 rmb 2 -u00CA rmb 1 -u00CB rmb 1 -u00CC rmb 1 -u00CD rmb 1 -u00CE rmb 1 -u00CF rmb 1 -u00D0 rmb 1 -u00D1 rmb 1 -u00D2 rmb 1 -u00D3 rmb 1 -u00D4 rmb 2 -u00D6 rmb 2 -u00D8 rmb 1 -u00D9 rmb 1 -u00DA rmb 1 -u00DB rmb 1 -u00DC rmb 1 -u00DD rmb 1 -u00DE rmb 1 -u00DF rmb 1 -u00E0 rmb 1 -u00E1 rmb 1 -u00E2 rmb 2 -u00E4 rmb 1 -u00E5 rmb 1 -u00E6 rmb 2 -u00E8 rmb 2 -u00EA rmb 1 -u00EB rmb 4 -u00EF rmb 3 -u00F2 rmb 1 -u00F3 rmb 2 -u00F5 rmb 4 -u00F9 rmb 1 -u00FA rmb 4 -u00FE rmb 1 -u00FF rmb 1 -u0100 rmb 3840 -size equ . - -L000D fcb $00 - fcb $DC \ - fcb $1C - fcb $A5 % - fcb $25 % - fcb $5A Z - fcb $31 1 - fcb $E8 h - fcb $3C < - fcb $09 - fcb $50 P - fcb $84 - fcb $00 - fcb $00 - -name equ * -L001B fcs /Basic09/ - fcb edition - - fcb $07 -L0024 fcb $0C - fcc " BASIC09" - fcb C$LF - fcc " RS VERSION 01.00.00" - fcb C$LF - fcc "COPYRIGHT 1980 BY MOTOROLA INC." - fcb C$LF - fcc " AND MICROWARE SYSTEMS CORP." - fcb C$LF - fcc " REPRODUCED UNDER LICENSE" - fcb C$LF - fcc " TO TANDY CORP." - fcb C$LF - fcc " ALL RIGHTS RESERVED." - - fcb $8A - fcb $34 4 - fcb $16 - fcb $E6 f - fcb $F8 x - fcb $04 - fcb $30 0 - fcb $8C - fcb $08 - fcb $EC l - fcb $85 - fcb $30 0 - fcb $8B - fcb $AF / - fcb $64 d - fcb $35 5 - fcb $96 - fcb $0E - fcb $A5 % - fcb $11 - fcb $9B - fcb $07 - fcb $AD - - fcb $07 - fcb $A3 # - fcb $17 - fcb $D2 R - fcb $0D - fcb $87 - fcb $0D - fcb $81 - fcb $0D - fcb $A3 # - fcb $1A - fcb $B6 6 - fcb $12 - fcb $0D - fcb $18 - fcb $C5 E - fcb $10 - fcb $20 - fcb $0F - fcb $3A : - fcb $0F - fcb $C0 @ - fcb $0F - fcb $C5 E -L010A fcb $9D - fcb $1E - fcb $04 -L010D fcb $9D - fcb $1E - fcb $02 -L0110 fcb $9D - fcb $1E - fcb $00 -L0113 fcb $9D - fcb $21 ! - fcb $00 -L0116 fcb $9D - fcb $24 $ - fcb $00 -L0119 fcb $9D - fcb $24 $ - fcb $04 -L011C fcb $9D - fcb $24 $ - fcb $02 -L011F fcb $9D - fcb $2A * - fcb $02 -L0122 fcb $9D - fcb $1E - fcb $0A -L0125 fcb $9D - fcb $1E - fcb $06 -L0128 fcb $9D - fcb $21 ! - fcb $02 -L012B fcb $9D - fcb $21 ! - fcb $06 -L012E fcb $9D - fcb $21 ! - fcb $04 - fcb $9D - fcb $24 $ - fcb $0A -L0134 fcb $9D - fcb $24 $ - fcb $0C -L0137 fcb $9D - fcb $24 $ - fcb $08 -L013A fcb $9D - fcb $2A * - fcb $00 - fcb $00 - fcb $72 r - fcb $02 -L0140 fcb $01 - fcb $01 - fcb $50 P - fcb $41 A - fcb $52 R - fcb $41 A - fcb $CD M - fcb $02 - fcb $01 - fcb $54 T - fcb $59 Y - fcb $50 P - fcb $C5 E - fcb $03 - fcb $01 - fcb $44 D - fcb $49 I - fcb $CD M - fcb $04 - fcb $01 - fcb $44 D - fcb $41 A - fcb $54 T - fcb $C1 A - fcb $05 - fcb $01 - fcb $53 S - fcb $54 T - fcb $4F O - fcb $D0 P - fcb $06 - fcb $01 - fcb $42 B - fcb $59 Y - fcb $C5 E - fcb $07 - fcb $01 - fcb $54 T - fcb $52 R - fcb $4F O - fcb $CE N - fcb $08 - fcb $01 - fcb $54 T - fcb $52 R - fcb $4F O - fcb $46 F - fcb $C6 F - fcb $09 - fcb $01 - fcb $50 P - fcb $41 A - fcb $55 U - fcb $53 S - fcb $C5 E - fcb $0A - fcb $01 - fcb $44 D - fcb $45 E - fcb $C7 G - fcb $0B - fcb $01 - fcb $52 R - fcb $41 A - fcb $C4 D - fcb $0C - fcb $01 - fcb $52 R - fcb $45 E - fcb $54 T - fcb $55 U - fcb $52 R - fcb $CE N - fcb $0D - fcb $01 - fcb $4C L - fcb $45 E - fcb $D4 T - fcb $0F - fcb $01 - fcb $50 P - fcb $4F O - fcb $4B K - fcb $C5 E - fcb $10 - fcb $01 - fcb $49 I - fcb $C6 F - fcb $11 - fcb $01 - fcb $45 E - fcb $4C L - fcb $53 S - fcb $C5 E - fcb $12 - fcb $01 - fcb $45 E - fcb $4E N - fcb $44 D - fcb $49 I - fcb $C6 F - fcb $13 - fcb $01 - fcb $46 F - fcb $4F O - fcb $D2 R - fcb $14 - fcb $01 -L01AC fcb $4E N - fcb $45 E - fcb $58 X - fcb $D4 T - fcb $15 - fcb $01 - fcb $57 W - fcb $48 H - fcb $49 I - fcb $4C L - fcb $C5 E - fcb $16 - fcb $01 - fcb $45 E - fcb $4E N - fcb $44 D - fcb $57 W - fcb $48 H - fcb $49 I - fcb $4C L - fcb $C5 E - fcb $17 - fcb $01 - fcb $52 R - fcb $45 E - fcb $50 P - fcb $45 E - fcb $41 A - fcb $D4 T - fcb $18 - fcb $01 - fcb $55 U - fcb $4E N - fcb $54 T - fcb $49 I - fcb $CC L - fcb $19 - fcb $01 - fcb $4C L - fcb $4F O - fcb $4F O - fcb $D0 P - fcb $1A - fcb $01 - fcb $45 E - fcb $4E N - fcb $44 D - fcb $4C L - fcb $4F O - fcb $4F O - fcb $D0 P - fcb $1B - fcb $01 - fcb $45 E - fcb $58 X - fcb $49 I - fcb $54 T - fcb $49 I - fcb $C6 F - fcb $1C - fcb $01 - fcb $45 E - fcb $4E N - fcb $44 D - fcb $45 E - fcb $58 X - fcb $49 I - fcb $D4 T - fcb $1D - fcb $01 - fcb $4F O - fcb $CE N - fcb $1E - fcb $01 - fcb $45 E - fcb $52 R - fcb $52 R - fcb $4F O - fcb $D2 R - fcb $1F - fcb $01 -L01FD fcb $47 G - fcb $4F O - fcb $54 T - fcb $CF O - fcb $21 ! - fcb $01 -L0203 fcb $47 G - fcb $4F O - fcb $53 S - fcb $55 U - fcb $C2 B - fcb $23 # - fcb $01 -L020A fcb $52 R - fcb $55 U - fcb $CE N - fcb $24 $ - fcb $01 - fcb $4B K - fcb $49 I - fcb $4C L - fcb $CC L - fcb $25 % - fcb $01 - fcb $49 I - fcb $4E N - fcb $50 P - fcb $55 U - fcb $D4 T - fcb $26 & - fcb $01 - fcb $50 P - fcb $52 R - fcb $49 I - fcb $4E N - fcb $D4 T - fcb $27 ' - fcb $01 - fcb $43 C - fcb $48 H - fcb $C4 D - fcb $28 ( - fcb $01 - fcb $43 C - fcb $48 H - fcb $D8 X - fcb $29 ) - fcb $01 - fcb $43 C - fcb $52 R - fcb $45 E - fcb $41 A - fcb $54 T - fcb $C5 E - fcb $2A * - fcb $01 - fcb $4F O - fcb $50 P - fcb $45 E - fcb $CE N - fcb $2B + - fcb $01 - fcb $53 S - fcb $45 E - fcb $45 E - fcb $CB K - fcb $2C , - fcb $01 - fcb $52 R - fcb $45 E - fcb $41 A - fcb $C4 D - fcb $2D - - fcb $01 - fcb $57 W - fcb $52 R - fcb $49 I - fcb $54 T - fcb $C5 E - fcb $2E . - fcb $01 - fcb $47 G - fcb $45 E - fcb $D4 T - fcb $2F / - fcb $01 - fcb $50 P - fcb $55 U - fcb $D4 T - fcb $30 0 - fcb $01 - fcb $43 C - fcb $4C L - fcb $4F O - fcb $53 S - fcb $C5 E - fcb $31 1 - fcb $01 - fcb $52 R - fcb $45 E - fcb $53 S - fcb $54 T - fcb $4F O - fcb $52 R - fcb $C5 E - fcb $32 2 - fcb $01 - fcb $44 D - fcb $45 E - fcb $4C L - fcb $45 E - fcb $54 T - fcb $C5 E - fcb $33 3 - fcb $01 - fcb $43 C - fcb $48 H - fcb $41 A - fcb $49 I - fcb $CE N - fcb $34 4 - fcb $01 -L0277 fcb $53 S - fcb $48 H - fcb $45 E - fcb $4C L - fcb $CC L - fcb $35 5 - fcb $01 -L027E fcb $42 B - fcb $41 A - fcb $53 S - fcb $C5 E - fcb $37 7 - fcb $01 -L0284 fcb $52 R - fcb $45 E - fcb $CD M - fcb $39 9 - fcb $01 - fcb $45 E - fcb $4E N - fcb $C4 D - fcb $40 @ - fcb $03 - fcb $42 B - fcb $59 Y - fcb $54 T - fcb $C5 E - fcb $41 A - fcb $03 - fcb $49 I - fcb $4E N - fcb $54 T - fcb $45 E - fcb $47 G - fcb $45 E - fcb $D2 R - fcb $42 B - fcb $03 - fcb $52 R - fcb $45 E - fcb $41 A - fcb $CC L - fcb $43 C - fcb $03 - fcb $42 B - fcb $4F O - fcb $4F O - fcb $4C L - fcb $45 E - fcb $41 A - fcb $CE N - fcb $44 D - fcb $03 - fcb $53 S - fcb $54 T - fcb $52 R - fcb $49 I - fcb $4E N - fcb $C7 G - fcb $45 E - fcb $03 -L02B4 fcb $54 T - fcb $48 H - fcb $45 E - fcb $CE N - fcb $46 F - fcb $03 - fcb $54 T - fcb $CF O - fcb $47 G - fcb $03 - fcb $53 S - fcb $54 T - fcb $45 E - fcb $D0 P - fcb $48 H - fcb $03 - fcb $44 D - fcb $CF O - fcb $49 I - fcb $03 - fcb $55 U - fcb $53 S - fcb $49 I - fcb $4E N - fcb $C7 G - fcb $3D = - fcb $03 - fcb $50 P - fcb $52 R - fcb $4F O - fcb $43 C - fcb $45 E - fcb $44 D - fcb $55 U - fcb $52 R - fcb $C5 E - fcb $92 - fcb $04 - fcb $41 A - fcb $44 D - fcb $44 D - fcb $D2 R - fcb $94 - fcb $04 - fcb $53 S - fcb $49 I - fcb $5A Z - fcb $C5 E - fcb $96 - fcb $04 - fcb $50 P - fcb $4F O - fcb $D3 S - fcb $97 - fcb $04 -L02EB fcb $45 E - fcb $52 R - fcb $D2 R - fcb $98 - fcb $04 - fcb $4D M - fcb $4F O - fcb $C4 D - fcb $9A - fcb $04 - fcb $52 R - fcb $4E N - fcb $C4 D - fcb $9C - fcb $04 - fcb $53 S - fcb $55 U - fcb $42 B - fcb $53 S - fcb $54 T - fcb $D2 R - fcb $9B - fcb $04 - fcb $50 P - fcb $C9 I - fcb $9F - fcb $04 - fcb $53 S - fcb $49 I - fcb $CE N - fcb $A0 - fcb $04 - fcb $43 C - fcb $4F O - fcb $D3 S - fcb $A1 ! - fcb $04 - fcb $54 T - fcb $41 A - fcb $CE N - fcb $A2 " - fcb $04 - fcb $41 A - fcb $53 S - fcb $CE N - fcb $A3 # - fcb $04 - fcb $41 A - fcb $43 C - fcb $D3 S - fcb $A4 $ - fcb $04 - fcb $41 A - fcb $54 T - fcb $CE N - fcb $A5 % - fcb $04 - fcb $45 E - fcb $58 X - fcb $D0 P - fcb $A8 ( - fcb $04 - fcb $4C L - fcb $4F O - fcb $C7 G - fcb $A9 ) - fcb $04 - fcb $4C L - fcb $4F O - fcb $47 G - fcb $31 1 - fcb $B0 0 - fcb $9D - fcb $04 - fcb $53 S - fcb $47 G - fcb $CE N - fcb $A6 & - fcb $04 - fcb $41 A - fcb $42 B - fcb $D3 S - fcb $AA * - fcb $04 - fcb $53 S - fcb $51 Q - fcb $52 R - fcb $D4 T - fcb $AA * - fcb $04 - fcb $53 S - fcb $51 Q - fcb $D2 R - fcb $AC , - fcb $04 - fcb $49 I - fcb $4E N - fcb $D4 T - fcb $AE . - fcb $04 - fcb $46 F - fcb $49 I - fcb $D8 X - fcb $B0 0 - fcb $04 - fcb $46 F - fcb $4C L - fcb $4F O - fcb $41 A - fcb $D4 T - fcb $B2 2 - fcb $04 - fcb $53 S - fcb $D1 Q - fcb $B4 4 - fcb $04 - fcb $50 P - fcb $45 E - fcb $45 E - fcb $CB K - fcb $B5 5 - fcb $04 - fcb $4C L - fcb $4E N - fcb $4F O - fcb $D4 T - fcb $B6 6 - fcb $04 - fcb $56 V - fcb $41 A - fcb $CC L - fcb $B7 7 - fcb $04 - fcb $4C L - fcb $45 E - fcb $CE N - fcb $B8 8 - fcb $04 - fcb $41 A - fcb $53 S - fcb $C3 C - fcb $B9 9 - fcb $04 - fcb $4C L - fcb $41 A - fcb $4E N - fcb $C4 D - fcb $BA : - fcb $04 - fcb $4C L - fcb $4F O - fcb $D2 R - fcb $BB ; - fcb $04 - fcb $4C L - fcb $58 X - fcb $4F O - fcb $D2 R - fcb $BC < - fcb $04 - fcb $54 T - fcb $52 R - fcb $55 U - fcb $C5 E - fcb $BD = - fcb $04 - fcb $46 F - fcb $41 A - fcb $4C L - fcb $53 S - fcb $C5 E - fcb $BE > - fcb $04 - fcb $45 E - fcb $4F O - fcb $C6 F - fcb $BF ? - fcb $04 - fcb $54 T - fcb $52 R - fcb $49 I - fcb $4D M - fcb $A4 $ - fcb $C0 @ - fcb $04 - fcb $4D M - fcb $49 I - fcb $44 D - fcb $A4 $ - fcb $C1 A - fcb $04 - fcb $4C L - fcb $45 E - fcb $46 F - fcb $54 T - fcb $A4 $ - fcb $C2 B - fcb $04 - fcb $52 R - fcb $49 I - fcb $47 G - fcb $48 H - fcb $54 T - fcb $A4 $ - fcb $C3 C - fcb $04 - fcb $43 C - fcb $48 H - fcb $52 R - fcb $A4 $ - fcb $C4 D - fcb $04 - fcb $53 S - fcb $54 T - fcb $52 R - fcb $A4 $ - fcb $C6 F - fcb $04 - fcb $44 D - fcb $41 A - fcb $54 T - fcb $45 E - fcb $A4 $ - fcb $C7 G - fcb $04 - fcb $54 T - fcb $41 A - fcb $C2 B - fcb $CD M - fcb $05 - fcb $4E N - fcb $4F O - fcb $D4 T - fcb $D0 P - fcb $05 - fcb $41 A - fcb $4E N - fcb $C4 D - fcb $D1 Q - fcb $05 - fcb $4F O - fcb $D2 R - fcb $D2 R - fcb $05 - fcb $58 X - fcb $4F O - fcb $D2 R - fcb $F7 w - fcb $03 - fcb $55 U - fcb $50 P - fcb $44 D - fcb $41 A - fcb $54 T - fcb $C5 E - fcb $F8 x - fcb $03 - fcb $45 E - fcb $58 X - fcb $45 E - fcb $C3 C - fcb $F9 y - fcb $03 - fcb $44 D - fcb $49 I - fcb $D2 R -L03F5 fcb $40 @ - fcb $00 - fcb $00 - fcb $00 - fcb $FD - fcb $49 I - fcb $00 - fcb $FD - fcb $4D M - fcb $00 - fcb $FD - fcb $50 P - fcb $00 - fcb $FD - fcb $52 R - fcb $00 - fcb $FD - fcb $55 U - fcb $00 - fcb $FD - fcb $58 X - fcb $00 - fcb $FD - fcb $5A Z - fcb $00 - fcb $FD - fcb $5D ] - fcb $00 - fcb $FD - fcb $61 a - fcb $00 - fcb $FD - fcb $65 e - fcb $00 - fcb $FD - fcb $67 g - fcb $00 - fcb $FD - fcb $69 i - fcb $00 - fcb $FD - fcb $6E n - fcb $40 @ - fcb $00 - fcb $00 - fcb $00 - fcb $FD - fcb $6D m - fcb $00 - fcb $FD - fcb $70 p - fcb $63 c - fcb $FD - fcb $71 q - fcb $02 - fcb $FD - fcb $74 t - fcb $01 - fcb $FD - fcb $78 x - fcb $22 " - fcb $0F - fcb $E7 g - fcb $01 - fcb $FD - fcb $7D ý - fcb $62 b - fcb $FD - fcb $81 - fcb $01 - fcb $FD - fcb $88 - fcb $02 - fcb $FD - fcb $8D - fcb $01 - fcb $FD - fcb $91 - fcb $62 b - fcb $FD - fcb $94 - fcb $02 - fcb $FD - fcb $9A - fcb $63 c - fcb $FD - fcb $9F - fcb $00 - fcb $FD - fcb $A5 % - fcb $00 - fcb $FD - fcb $A6 & - fcb $20 - fcb $0F - fcb $76 v - fcb $20 - fcb $0F - fcb $73 s - fcb $20 - fcb $0F - fcb $6A j - fcb $20 - fcb $0F - fcb $67 g - fcb $20 - fcb $0F - fcb $B0 0 - fcb $00 - fcb $FD - fcb $AD - - fcb $00 - fcb $FD - fcb $B0 0 - fcb $00 - fcb $FD - fcb $B4 4 - fcb $00 - fcb $FD - fcb $B8 8 - fcb $00 - fcb $FD - fcb $BA : - fcb $00 - fcb $FD - fcb $BC < - fcb $00 - fcb $FD - fcb $C1 A - fcb $00 - fcb $FD - fcb $C4 D - fcb $00 - fcb $FD - fcb $C7 G - fcb $00 - fcb $FD - fcb $CA J - fcb $00 - fcb $FD - fcb $CE N - fcb $00 - fcb $FD - fcb $D0 P - fcb $00 - fcb $FD - fcb $D2 R - fcb $00 - fcb $FD - fcb $D6 V - fcb $00 - fcb $FD - fcb $DC \ - fcb $00 - fcb $FD - fcb $E1 a - fcb $00 - fcb $FD - fcb $E5 e - fcb $20 - fcb $0F - fcb $6D m - fcb $20 - fcb $0F - fcb $6A j - fcb $20 - fcb $0F - fcb $A1 ! - fcb $20 - fcb $0F - fcb $98 - fcb $00 - fcb $FD - fcb $E8 h - fcb $20 - fcb $0F - fcb $2B + - fcb $20 - fcb $0F - fcb $28 ( - fcb $40 @ - fcb $00 - fcb $00 - fcb $20 - fcb $0F - fcb $96 - fcb $40 @ - fcb $20 - fcb $5C \ - fcb $20 - fcb $0E - fcb $21 ! - fcb $10 - fcb $FD - fcb $D8 X - fcb $10 - fcb $FD - fcb $DB [ - fcb $10 - fcb $FD - fcb $E1 a - fcb $10 - fcb $FD - fcb $E4 d - fcb $10 - fcb $FD - fcb $EA j - fcb $20 - fcb $0F - fcb $5F _ - fcb $60 ` - fcb $FD - fcb $F2 r - fcb $60 ` - fcb $FD - fcb $F3 s - fcb $00 - fcb $FD - fcb $F6 v - fcb $00 - fcb $FD - fcb $F7 w - fcb $20 - fcb $0F - fcb $8A - fcb $40 @ - fcb $2C , - fcb $00 - fcb $40 @ - fcb $3A : - fcb $00 - fcb $40 @ - fcb $28 ( - fcb $00 - fcb $40 @ - fcb $29 ) - fcb $00 - fcb $40 @ - fcb $5B [ - fcb $00 - fcb $40 @ - fcb $5D ] - fcb $00 - fcb $40 @ - fcb $3B ; - fcb $20 - fcb $40 @ - fcb $3A : - fcb $3D = - fcb $40 @ - fcb $3D = - fcb $00 - fcb $40 @ - fcb $23 # - fcb $00 - fcb $20 - fcb $15 - fcb $EC l - fcb $20 - fcb $0E - fcb $92 - fcb $20 - fcb $0E - fcb $8F - fcb $20 - fcb $0E - fcb $8C - fcb $20 - fcb $0E - fcb $89 - fcb $20 - fcb $0E - fcb $86 - fcb $20 - fcb $0E - fcb $83 - fcb $21 ! - fcb $0E - fcb $80 - fcb $22 " - fcb $0E - fcb $7D ý - fcb $23 # - fcb $0E - fcb $7A z - fcb $20 - fcb $0E - fcb $73 s - fcb $21 ! - fcb $0E - fcb $70 p - fcb $22 " - fcb $0E - fcb $6D m - fcb $23 # - fcb $0E - fcb $6A j - fcb $26 & - fcb $0E - fcb $9F - fcb $27 ' - fcb $0E - fcb $AD - - fcb $24 $ - fcb $0E - fcb $7B û - fcb $24 $ - fcb $0E - fcb $B9 9 - fcb $27 ' - fcb $0E - fcb $CB K - fcb $11 - fcb $FD - fcb $AC , - fcb $80 - fcb $00 - fcb $00 - fcb $11 - fcb $FD - fcb $AC , - fcb $80 - fcb $00 - fcb $00 - fcb $10 - fcb $FD - fcb $AC , - fcb $10 - fcb $FD - fcb $AE . - fcb $12 - fcb $FD - fcb $B0 0 - fcb $12 - fcb $FD - fcb $AD - - fcb $11 - fcb $FD - fcb $AF / - fcb $10 - fcb $FD - fcb $B9 9 - fcb $12 - fcb $FD - fcb $AE . - fcb $11 - fcb $FD - fcb $E6 f - fcb $11 - fcb $FD - fcb $E3 c - fcb $11 - fcb $FD - fcb $B1 1 - fcb $11 - fcb $FD - fcb $B3 3 - fcb $11 - fcb $FD - fcb $B5 5 - fcb $11 - fcb $FD - fcb $B7 7 - fcb $11 - fcb $FD - fcb $B9 9 - fcb $11 - fcb $FD - fcb $BB ; - fcb $11 - fcb $FD - fcb $BD = - fcb $11 - fcb $FD - fcb $D0 P - fcb $11 - fcb $FD - fcb $CD M - fcb $11 - fcb $FD - fcb $B9 9 - fcb $11 - fcb $FD - fcb $BB ; - fcb $11 - fcb $FD - fcb $C9 I - fcb $11 - fcb $FD - fcb $C6 F - fcb $11 - fcb $FD - fcb $CE N - fcb $11 - fcb $FD - fcb $CB K - fcb $11 - fcb $FD - fcb $CD M - fcb $11 - fcb $FD - fcb $CA J - fcb $11 - fcb $FD - fcb $CC L - fcb $11 - fcb $FD - fcb $C9 I - fcb $11 - fcb $FD - fcb $CD M - fcb $11 - fcb $FD - fcb $CA J - fcb $11 - fcb $FD - fcb $CB K - fcb $11 - fcb $FD - fcb $CE N - fcb $11 - fcb $FD - fcb $D1 Q - fcb $11 - fcb $FD - fcb $D3 S - fcb $11 - fcb $FD - fcb $D5 U - fcb $12 - fcb $FD - fcb $D7 W - fcb $12 - fcb $FD - fcb $DA Z - fcb $12 - fcb $FD - fcb $DC \ - fcb $10 - fcb $FD - fcb $DF _ - fcb $10 - fcb $FD - fcb $E2 b - fcb $11 - fcb $FD - fcb $E6 f - fcb $11 - fcb $FD - fcb $E8 h - fcb $13 - fcb $FD - fcb $EC l - fcb $12 - fcb $FD - fcb $EF o - fcb $12 - fcb $FD - fcb $F3 s - fcb $11 - fcb $FD - fcb $F8 x - fcb $11 - fcb $FD - fcb $FB - fcb $11 - fcb $FD - fcb $F8 x - fcb $10 - fcb $FD - fcb $FB - fcb $11 - fcb $FD - fcb $FF - fcb $80 - fcb $00 - fcb $00 - fcb $80 - fcb $00 - fcb $00 - fcb $80 - fcb $00 - fcb $00 - fcb $80 - fcb $00 - fcb $00 - fcb $80 - fcb $00 - fcb $00 - fcb $11 - fcb $FD - fcb $F2 r - fcb $51 Q - fcb $2D - - fcb $00 - fcb $51 Q - fcb $2D - - fcb $00 - fcb $0A - fcb $FD - fcb $EE n - fcb $09 - fcb $FD - fcb $F0 p - fcb $09 - fcb $FD - fcb $F1 q - fcb $4B K - fcb $3E > - fcb $00 - fcb $4B K - fcb $3E > - fcb $00 - fcb $4B K - fcb $3E > - fcb $00 - fcb $4B K - fcb $3C < - fcb $00 - fcb $4B K - fcb $3C < - fcb $00 - fcb $4B K - fcb $3C < - fcb $00 - fcb $4B K - fcb $3C < - fcb $3E > - fcb $4B K - fcb $3C < - fcb $3E > - fcb $4B K - fcb $3C < - fcb $3E > - fcb $4B K - fcb $3C < - fcb $3E > - fcb $4B K - fcb $3D = - fcb $00 - fcb $4B K - fcb $3D = - fcb $00 - fcb $4B K - fcb $3D = - fcb $00 - fcb $4B K - fcb $3D = - fcb $00 - fcb $4B K - fcb $3E > - fcb $3D = - fcb $4B K - fcb $3E > - fcb $3D = - fcb $4B K - fcb $3E > - fcb $3D = - fcb $4B K - fcb $3C < - fcb $3D = - fcb $4B K - fcb $3C < - fcb $3D = - fcb $4B K - fcb $3C < - fcb $3D = - fcb $4C L - fcb $2B + - fcb $00 - fcb $4C L - fcb $2B + - fcb $00 - fcb $4C L - fcb $2B + - fcb $00 - fcb $4C L - fcb $2D - - fcb $00 - fcb $4C L - fcb $2D - - fcb $00 - fcb $4D M - fcb $2A * - fcb $00 - fcb $4D M - fcb $2A * - fcb $00 - fcb $4D M - fcb $2F / - fcb $00 - fcb $4D M - fcb $2F / - fcb $00 - fcb $4E N - fcb $5E ^ - fcb $00 - fcb $4E N - fcb $2A * - fcb $2A * - fcb $20 - fcb $0D - fcb $3C < - fcb $21 ! - fcb $0D - fcb $39 9 - fcb $22 " - fcb $0D - fcb $36 6 - fcb $23 # - fcb $0D - fcb $33 3 - fcb $20 - fcb $0D - fcb $2C , - fcb $21 ! - fcb $0D - fcb $29 ) - fcb $22 " - fcb $0D - fcb $26 & - fcb $23 # - fcb $0D - fcb $23 # - fcb $00 - fcb $02 - fcb $02 -L0668 fcb $03 - fcb $91 - fcb $A4 $ - fcb $02 - fcb $E4 d - fcb $8D - fcb $00 - fcb $0E - fcb $02 - fcb $07 - fcb $FC - fcb $42 B - fcb $59 Y - fcb $C5 E - fcb $02 - fcb $D4 T - fcb $44 D - fcb $49 I - fcb $D2 R - fcb $0F - fcb $15 - fcb $45 E - fcb $44 D - fcb $49 I - fcb $D4 T - fcb $0F - fcb $0F - fcb $C5 E - fcb $06 - fcb $7E þ - fcb $4C L - fcb $49 I - fcb $53 S - fcb $D4 T - fcb $07 - fcb $3D = - fcb $52 R - fcb $55 U - fcb $CE N - fcb $08 - fcb $09 - fcb $4B K - fcb $49 I - fcb $4C L - fcb $CC L - fcb $06 - fcb $5F _ - fcb $53 S - fcb $41 A - fcb $56 V - fcb $C5 E - fcb $04 - fcb $28 ( - fcb $4C L - fcb $4F O - fcb $41 A - fcb $C4 D - fcb $03 - fcb $91 - fcb $52 R - fcb $45 E - fcb $4E N - fcb $41 A - fcb $4D M - fcb $C5 E - fcb $04 - fcb $A8 ( - fcb $50 P - fcb $41 A - fcb $43 C - fcb $CB K - fcb $02 - fcb $69 i - fcb $4D M - fcb $45 E - fcb $CD M - fcb $03 - fcb $70 p - fcb $43 C - fcb $48 H - fcb $C4 D - fcb $03 - fcb $6F o - fcb $43 C - fcb $48 H - fcb $D8 X - fcb $00 - fcb $02 - fcb $02 -L06C1 fcb $03 - fcb $38 8 - fcb $A4 $ - fcb $09 - fcb $C7 G - fcb $8D - fcb $00 - fcb $0E - fcb $02 - fcb $09 - fcb $D0 P - fcb $43 C - fcb $4F O - fcb $4E N - fcb $D4 T - fcb $02 - fcb $7A z - fcb $44 D - fcb $49 I - fcb $D2 R - fcb $09 - fcb $93 - fcb $D1 Q - fcb $0A - fcb $0C - fcb $4C L - fcb $49 I - fcb $53 S - fcb $D4 T - fcb $0A - fcb $B7 7 - fcb $50 P - fcb $52 R - fcb $49 I - fcb $4E N - fcb $D4 T - fcb $0B - fcb $25 % - fcb $53 S - fcb $54 T - fcb $41 A - fcb $54 T - fcb $C5 E - fcb $0A - fcb $A9 ) - fcb $54 T - fcb $52 R - fcb $4F O - fcb $CE N - fcb $0A - fcb $A3 # - fcb $54 T - fcb $52 R - fcb $4F O - fcb $46 F - fcb $C6 F - fcb $0A - fcb $9C - fcb $44 D - fcb $45 E - fcb $C7 G - fcb $0A - fcb $97 - fcb $52 R - fcb $41 A - fcb $C4 D - fcb $0A - fcb $92 - fcb $4C L - fcb $45 E - fcb $D4 T - fcb $09 - fcb $74 t - fcb $53 S - fcb $54 T - fcb $45 E - fcb $D0 P - fcb $0B - fcb $18 - fcb $42 B - fcb $52 R - fcb $45 E - fcb $41 A - fcb $CB K - fcb $00 - fcb $08 - fcb $02 -L0718 fcb $0F - fcb $86 - fcb $CC L - fcb $0F - fcb $83 - fcb $EC l - fcb $12 - fcb $7C ü - fcb $C4 D - fcb $12 - fcb $79 y - fcb $E4 d - fcb $0E - fcb $C3 C - fcb $AB + - fcb $0E - fcb $C0 @ - fcb $AD - - fcb $0E - fcb $BD = - fcb $8D - fcb $0E - fcb $D4 T - fcb $A0 - fcb $00 - fcb $04 - fcb $02 - fcb $10 - fcb $28 ( - fcb $D3 S - fcb $10 - fcb $28 ( - fcb $C3 C - fcb $11 - fcb $A6 & - fcb $D2 R - fcb $12 - fcb $57 W - fcb $D1 Q -L073F fcb $0E - fcb $52 R - fcb $65 e - fcb $61 a - fcb $64 d - fcb $F9 y -L0745 fcb $57 W - fcb $68 h - fcb $61 a - fcb $74 t - fcb $BF ? -L074A fcb $20 - fcb $66 f - fcb $72 r - fcb $65 e - fcb $E5 e -L074F fcb $50 P - fcb $72 r - fcb $6F o - fcb $67 g - fcb $72 r - fcb $61 a - fcb $ED m -L0756 fcb $50 P - fcb $52 R - fcb $4F O - fcb $43 C - fcb $45 E - fcb $44 D - fcb $55 U - fcb $52 R - fcb $C5 E - fcb $0D -L0760 fcb $0A - fcb $20 - fcb $20 - fcb $4E N - fcb $61 a - fcb $6D m - fcb $65 e - fcb $20 - fcb $20 - fcb $20 - fcb $20 - fcb $20 - fcb $20 - fcb $50 P - fcb $72 r - fcb $6F o - fcb $63 c - fcb $2D - - fcb $53 S - fcb $69 i - fcb $7A z - fcb $65 e - fcb $20 - fcb $20 - fcb $44 D - fcb $61 a - fcb $74 t - fcb $61 a - fcb $2D - - fcb $53 S - fcb $69 i - fcb $7A z - fcb $E5 e -L0781 fcb $52 R - fcb $65 e - fcb $77 w - fcb $72 r - fcb $69 i - fcb $74 t - fcb $65 e - fcb $3F ? - fcb $3A : - fcb $20 -L078B fcb $52 R - fcb $41 A - fcb $4E N - fcb $47 G - fcb $45 E - fcb $87 -L0791 fcb $0E - fcb $42 B - fcb $52 R - fcb $45 E - fcb $41 A - fcb $4B K - fcb $3A : - fcb $A0 -L0799 fcb $63 c - fcb $61 a - fcb $6C l - fcb $6C l - fcb $65 e - fcb $64 d - fcb $20 - fcb $62 b - fcb $F9 y -L07A2 fcb $6F o - fcb $EB k -L07A4 fcb $44 D - fcb $BA : -L07A6 fcb $45 E - fcb $BA : -L07A8 fcb $42 B - fcb $BA : -L07AA fcb $63 c - fcb $61 a - fcb $6E n - fcb $27 ' - fcb $74 t - fcb $20 - fcb $66 f - fcb $69 i - fcb $6E n - fcb $64 d - fcb $BA : -L07B5 fcb $A6 & - fcb $63 c - fcb $1F - fcb $8B - fcb $D7 W - fcb $35 5 - fcb $08 - fcb $34 4 - fcb $43 C - fcb $06 - fcb $34 4 - fcb $3B ; -start equ * - pshs u - leau >u0100,u - clra - clrb -L07C9 std ,--u - cmpu ,s - bhi L07C9 - puls b,a - leau ,x - std <u0000 - inca - sta <u00D9 - std <u0080 - std <u0082 - adda #$02 - std <u0046 - std <u0044 - inca - tfr d,s - std <u0004 - inca - std <u0008 - std <u004A - tfr u,d - subd <u0000 - std <u0002 - clra - ldb #$01 - std <u002D - sta <u00BD - lda #$03 -L07FC os9 I$Close - inca - cmpa #$10 - bcs L07FC - lda #$02 - os9 I$Dup - sta <u00BE - clr <u0035 - pshs x - leax <L07B5,pcr - os9 F$Icpt - ldx <u0008 - clra - clrb -L0819 std ,--x - cmpx <u0004 - bhi L0819 - leax >L0000,pcr - pshs x - ldx <u0000 - leax <$1B,x - leay >L000D,pcr -L082E lda #$7E - sta ,x+ - ldd ,y++ - addd ,s - std ,x++ - ldd ,y - bne L082E - leas $02,s - lbsr L0116 - puls y - leax >L0140,pcr - stx <u009E - ldb ,y - cmpb #$0D - beq L08A6 - leax <L0860,pcr - pshs y - bsr L0870 - lbsr L0F91 - bcc L088F - lbsr L0AC3 - bra L088F -L0860 puls y - bsr L086D - ldx <u0004 - ldd ,x - std <u002F - lbsr L0DC7 -L086D leax <L08B2,pcr -L0870 puls u - bsr L0899 - pshs u - clr <u0034 - ldd <u0000 - addd <u0002 - subd <u0008 - subd <u000A - std <u000C - leau $02,s - stu <u0046 - stu <u0044 - leas >-$00FE,s - jmp [<-u0002,u] -L088F lds <u00B7 - puls b,a - std <u00B7 -L0896 lbra L0DBB -L0899 ldd <u00B7 - pshs b,a - sts <u00B7 - ldd $02,s - stx $02,s - tfr d,pc -L08A6 leax >L0024,pcr - bsr L08D0 - leax >L001B,pcr - bsr L08D0 -L08B2 bsr L086D - leax >L073F,pcr - bsr L08D0 - leax >L07A8,pcr - leay >L0668,pcr - clr <u0084 - bsr L08D3 - bcc L088F - bsr L08CC - bra L088F -L08CC leax >L0745,pcr -L08D0 lbra L125F -L08D3 pshs y,x - clr <u0035 - lbsr L126B - bsr L0896 - lda <u00BD - beq L08E3 - os9 I$Close -L08E3 clr <u00BD - lbsr L0B2D - bcc L08F8 - cmpb #$D3 - bne L0915 - ldd #$6279 - std ,y - ldd #$650D - std $02,y -L08F8 ldx $02,s - lda #$80 - lbsr L010A - bne L090F - lbsr L010D - beq L0915 - leax $03,x - lda #$20 - lbsr L010A - beq L0915 -L090F ldd ,x - leas $04,s - jmp d,x -L0915 coma - puls pc,y,x - lbsr L0A90 - bne L093C - leax ,y - ldd <u0008 - addd <u000A - inca - subd <u0000 - pshs b,a - lbsr L1748 - bcs L0946 - cmpd ,s++ - bcs L0948 - os9 F$Mem - bcs L093C - subd #$0001 - std <u0002 -L093C lbsr L0DBB - ldd <u0002 - bsr L09BA -L0943 lbra L1264 -L0946 leas $02,s -L0948 coma - rts - leax ,y - lbsr L0D5F - leax >L0760,pcr - lbsr L125F - ldy <u0004 - bra L099B -L095B pshs y,x - lda #$20 - tst $06,x - beq L0965 - lda #$2D -L0965 lbsr L1373 - lda #$20 - cmpx <u002F - bne L0970 - lda #$2A -L0970 lbsr L1373 - ldd $04,x - leax d,x - lbsr L135A - ldd #$1102 - bsr L09AD - ldd #$1C0B - bsr L09AD - ldd $0B,x - addd #$0040 - cmpd <u000C - bcs L0993 - lda #$3F - lbsr L1373 -L0993 bsr L0943 - puls y,x - tst <u0035 - bne L099F -L099B ldx ,y++ - bne L095B -L099F ldd <u000C - bsr L09BA - leax >L074A,pcr - lbsr L1261 - lbra L0D51 -L09AD pshs b - ldb #$10 - lbsr L011F - puls b - ldx $02,s - ldd b,x -L09BA pshs y,x,b,a - pshs b,a - leay <L09ED,pcr -L09C1 ldx #$2F00 -L09C4 puls b,a -L09C6 leax >$0100,x - subd ,y - bcc L09C6 - addd ,y++ - pshs b,a - ldd ,y - tfr x,d - beq L09E6 - cmpd #$3000 - beq L09C1 - lbsr L1373 - ldx #$2F01 - bra L09C4 -L09E6 lbsr L1373 - leas $02,s - puls pc,y,x,b,a -L09ED beq L09FF - com <u00E8 - neg <u0064 - neg <u000A - neg <u0001 - neg <u0000 - lbsr L0A90 - leau ,y - clrb -L09FF incb - lda ,y+ - cmpa #$0D - bne L09FF - clra - tfr d,y - leax >L0277,pcr - lda #$01 - clrb - os9 F$Fork - bcs L0A86 - pshs a -L0A17 os9 F$Wait - cmpa ,s - bne L0A17 - leas $01,s - tstb - bne L0A86 - rts - lda #$83 - bra L0A2A - lda #$84 -L0A2A leax ,y - os9 I$ChgDir - bcs L0A86 - rts - bsr L0A9D - lbsr L0F6E - bcs L0A8C - pshs x - ldx ,x - tst $06,x - bne L0A8C - bsr L0A90 - beq L0A48 -L0A45 comb - puls pc,x -L0A48 lbsr L010D - beq L0A45 - pshs y - lbsr L0F6E - bcs L0A58 - cmpx $02,s - bne L0A84 -L0A58 ldx $02,s - lbsr L1A2E - puls x - ldy <u004A -L0A62 lda ,x+ - sta ,y+ - bpl L0A62 - sty <u00AB - ldx [,s++] - ldd $04,x - leay d,x - ldb <$18,x - lda <u00A6 - sta <$18,x - clra - lbsr L19B1 - addd <u005E - std <u005E -L0A81 lbra L1995 -L0A84 ldb #$2C -L0A86 lbsr L1287 -L0A89 lbra L088F -L0A8C ldb #$2B - bra L0A86 -L0A90 ldb ,y+ - cmpb #$2C - beq L0A9C - cmpb #$20 - beq L0A9C - leay -$01,y -L0A9C rts -L0A9D lbsr L010D - bne L0AB0 -L0AA2 ldy <u002F - beq L0AAC - ldd $04,y - leay d,y - rts -L0AAC leay >L074F,pcr -L0AB0 rts -L0AB1 ldb #$2B - bra L0ABD -L0AB5 ldb #$20 -L0AB7 pshs b - bsr L0A81 - puls b -L0ABD cmpb #$D3 - beq L0A89 - bra L0A86 -L0AC3 leax ,y - lda #$01 - os9 I$Open - bcs L0ABD - sta <u00BD - bsr L0B2D - bsr L0B3C - bne L0AB1 -L0AD4 lbsr L010D - beq L0AB1 - pshs y - lbsr L0F6E - bcs L0AE8 - ldy ,s - leay -$01,y - lbsr L0E98 -L0AE8 ldy ,s - lbsr L0EFD - lbsr L1A2E - puls x - lbsr L125F -L0AF6 ldb <u0035 - bne L0AB7 - bsr L0B2D - bcs L0AB7 - lda <u000C - cmpa #$02 - bcs L0AB5 - bsr L0B3C - beq L0B14 - ldy <u0080 - ldd <u0060 - std <u005C - lbsr L1606 - bra L0AF6 -L0B14 ldx <u0080 - pshs y,x -L0B18 lda ,x+ - cmpa #$0D - bne L0B18 - stx <u0080 - stx <u0082 - lbsr L0128 - puls y,x - stx <u0080 - stx <u0082 - bra L0AD4 -L0B2D lda <u00BD - ldx <u0080 - ldy #$0100 - os9 I$ReadLn - ldy <u0080 - rts -L0B3C lbsr L010D - leax >L0756,pcr -L0B43 lda ,x+ - eora ,y+ - anda #$DF - bne L0B50 - tst -$01,x - bpl L0B43 - clra -L0B50 rts - lbsr L0C83 - ldu <u0046 - bra L0B79 -L0B58 ldy ,y - tst $06,y - lbne L0E68 - lda <$17,y - rora - lbcs L0E68 - ldd $0D,y - leay d,y - ldd -$03,y - lslb - rola - inca - cmpd <u000C - lbhi L0F69 -L0B79 ldy ,--u - bne L0B58 - ldd #$0607 - lbsr L0D6B - ldy <u0046 - stu <u0046 - lbra L0C7A -L0B8C pshs y - lbsr L1A2E - clr <u00D9 - lbsr L0128 - inc <u00D9 - ldx <u0062 - leay ,x - ldd <u0000 - addd <u0002 - tfr d,u - ldd -$03,x - beq L0C18 - pshs u -L0BA8 pshs b,a - leax $01,x - ldd ,x - pshu b,a - clr ,x+ - clr ,x+ -L0BB4 lda ,x+ - bpl L0BB4 - puls b,a - subd #$0001 - bne L0BA8 - ldy <u005E - bra L0BD1 -L0BC4 ldd ,y - ldx <u0062 - leax d,x - ldd $01,x - sty $01,x - std ,y++ -L0BD1 lbsr L1BC2 - bcc L0BC4 - puls u - ldx <u0062 - ldd -$03,x - leay ,x -L0BDE leau -u0002,u - pshs u,b,a - clra - ldu $01,x - beq L0C04 - pshs x - tfr y,d - subd <u0062 - bra L0BF3 -L0BEF std ,u - leau ,x -L0BF3 ldx ,u - bne L0BEF - std ,u - puls x - lda ,x - sta ,y+ - ldu [<$02,s] - stu ,y++ -L0C04 leax $03,x -L0C06 ldb ,x+ - cmpa #$A0 - bne L0C0E - stb ,y+ -L0C0E tstb - bpl L0C06 - puls u,b,a - subd #$0001 - bne L0BDE -L0C18 ldx <u002F - ldd $02,x - pshs b,a - clr ,y+ - clr ,y+ - clr ,y+ - tfr y,d - subd <u002F - std $02,x - ldd ,s - subd $02,x - std ,s - addd <u000C - std <u000C - ldd <u000A - subd ,s++ - std <u000A - addd <u0008 - std <u004A - ldb #$22 - stb $06,x - ldb #$80 - stb <$17,x - leau ,y - ldd #$FFFF - std ,--u - sta ,-u - ldb #$07 -L0C52 eora b,x - decb - bpl L0C52 - sta $08,x - ldy $02,x - leay -$03,y - os9 F$CRC - com ,u+ - com ,u+ - com ,u+ - ldy $02,x - lda #$02 - os9 I$Write - lda #$C0 - sta <$17,x - lbcs L0DB6 - puls y -L0C7A ldx ,--y - lbne L0B8C - lbra L0D51 -L0C83 bsr L0C9D - lda ,y - cmpa #$0D - bne L0C9A - ldx <u0046 - ldx [<-$02,x] - ldd $04,x - leax d,x - lbsr L135A - lbsr L12CF -L0C9A leax ,y - rts -L0C9D ldu <u0046 - stu <u0044 - lbsr L0A90 - beq L0CC6 - cmpb #$2A - bne L0CCB - ldx <u0004 -L0CAC ldd ,x - beq L0CB4 - tfr x,d - leax $02,x -L0CB4 std ,--u - bne L0CAC - stu <u0044 - lda ,y - cmpa #$0D - beq L0CC2 - leay $01,y -L0CC2 sty <u0082 - rts -L0CC6 lbsr L010D - bne L0CD9 -L0CCB sty <u0082 - lbsr L0AA2 - lbsr L0F6E - bcc L0CE1 -L0CD6 lbra L0A8C -L0CD9 lbsr L0F6E - bcs L0CD6 - sty <u0082 -L0CE1 stx ,--u - ldy <u0082 - lbsr L0A90 - bne L0CF0 - lbsr L010D - bne L0CD9 -L0CF0 clra - clrb - bra L0CB4 - tst <u000C - lbeq L0F69 - lda #$80 - sta <u0084 - bsr L0C83 - bra L0D06 - bsr L0C9D - leax ,y -L0D06 stx <u005C - bsr L0D5F - ldy <u0046 - stu <u0046 - bra L0D49 -L0D11 pshs y - ldy [,y] - sty <u002F - ldd $09,y - addd <u002F - std <u005E - ldd $0F,y - addd <u002F - std <u0060 - ldd $0D,y - addd <u002F - std <u0062 - tst $06,y - bne L0D47 - leax <L0D3B,pcr - lbsr L0899 - lbsr L10E4 -L0D38 lbra L088F -L0D3B tst <u0084 - bmi L0D47 - ldx [,s] - lbsr L1A2E - lbsr L0128 -L0D47 puls y -L0D49 ldx ,--y - bne L0D11 -L0D4D bsr L0D51 - bra L0D38 -L0D51 pshs b - lda #$02 - os9 I$Close - lda <u00BE - os9 I$Dup - puls pc,b -L0D5F lbsr L0A90 - cmpb #$0D - beq L0DB5 - stx <u0082 - ldd #$020B -L0D6B pshs u,x,b,a - lda #$02 - os9 I$Close - ldd ,s - os9 I$Create - bcc L0DB3 - cmpb #$DA - bne L0DB6 - ldd ,s - ldx $02,s - os9 I$Open - bcs L0DB6 - leax >L0781,pcr - ldy #$000A - lda <u00BE - os9 I$WritLn - clra - leax ,--s - ldy #$0002 - os9 I$ReadLn - puls b,a - eora #$59 - anda #$DF - bne L0D4D - lda #$02 - ldb #$02 - ldx #$0000 - leau ,x - os9 I$SetStt - bcs L0DB6 -L0DB3 puls pc,u,y,b,a -L0DB5 rts -L0DB6 bsr L0D51 - lbra L0A86 -L0DBB clr <u007D - inc <u007D - pshs x - ldx <u0080 - stx <u0082 - puls pc,x -L0DC7 lbsr L010D - bne L0DDF - pshs y - lbsr L0A9D - ldx ,s -L0DD3 lda ,y+ - sta ,x+ - bpl L0DD3 - lda #$0D - sta ,x - puls y -L0DDF lbsr L0F91 - lbcs L0A8C - ldx ,x - stx <u002F - lda $06,x - beq L0DF6 - anda #$0F - cmpa #$02 - bne L0E68 - bra L0DFC -L0DF6 lda <$17,x - rora - bcs L0E68 -L0DFC lbsr L0110 - ldy <u004A - ldb ,y - cmpb #$3D - beq L0E68 - sty <u005E - sty <u005C - ldx <u00AB - stx <u0060 - stx <u004A - ldd <u000C - pshs y,b,a - lbsr L0113 - puls y,b,a - std <u000C - sty <u004A - ldx <u002F - lda <$17,x - rora - bcs L0E68 - leas >$0102,s - ldd <u0000 - addd <u0002 - tfr d,y - std <u0046 - std <u0044 - ldu #$0000 - stu <u0031 - stu <u00B3 - inc <u00B4 - clr <u0036 - ldd <u004A - ldx <u000C - pshs x,b,a - leax >L0E5F,pcr - lbsr L0899 - ldx <u004A - lbsr L0119 - lbsr L0DBB - ldx <u002F - lbsr L011C - bra L0E65 -L0E5F puls x,b,a - std <u004A - stx <u000C -L0E65 lbra L088F -L0E68 ldb #$33 - lbra L0A86 - bsr L0E8F - clrb - os9 F$Exit - lbsr L010D - beq L0E8B - lbsr L0F6E - bcs L0E8B - ldu <u0046 - clra - clrb - pshu x,b,a - inca - sta <u0035 - bsr L0E9F - clr <u0035 - rts -L0E8B comb - ldb #$2B - rts -L0E8F ldy <u0082 - lda #$2A - sta ,y - sta <u0035 -L0E98 lbsr L0C9D - clr <u002F - clr <u0030 -L0E9F ldu <u0046 - stu <u0044 - bra L0EE3 -L0EA5 ldx ,x - ldb $06,x - beq L0EC0 - cmpb #$22 - bne L0EB5 - ldb <$17,x - lslb - bmi L0EC0 -L0EB5 pshs u - leau ,x - os9 F$UnLink - puls u - bra L0EDE -L0EC0 tst <u0035 - bne L0EE3 - ldx ,u - lbsr L0FB6 - ldy ,x - ldd <u000A - subd $02,y - std <u000A - ldd $02,y - addd <u000C - std <u000C - ldd <u004A - subd $02,y - std <u004A -L0EDE ldd #$FFFF - std [,u] -L0EE3 ldx ,--u - bne L0EA5 - ldx <u0004 - tfr x,y -L0EEB ldd ,x++ - cmpd #$FFFF - beq L0EEB -L0EF3 std ,y++ - bne L0EEB - cmpd ,y - bne L0EF3 - rts -L0EFD bsr L0F6E - bcs L0F02 - rts -L0F02 pshs u,x - tfr x,d - cmpb #$FE - beq L0F69 - ldx <u000C - cmpx #$00FF - bcs L0F69 - leax <-$1C,x - ldu <u004A - ldb #$FF -L0F18 incb - clr b,u - cmpb #$18 - bne L0F18 -L0F1F incb - leax -$01,x - beq L0F69 - inc <u0018,u - lda ,y+ - sta b,u - bpl L0F1F - incb - stx <u000C - clra - std <u0015,u - std u0009,u - std u000F,u - stu [,s] - pshs b - addd #$0003 - std u0002,u - std u000D,u - addd <u000A - std <u000A - ldd #$87CD - std ,u - ldd #$0019 - std u0004,u - ldd #$0081 - std u0006,u - ldd #$0016 - std u000B,u - puls b - leax d,u - ldb #$03 - sta ,x+ - std ,x++ - stx <u004A - puls pc,u,x -L0F69 ldb #$20 - lbra L0A86 -L0F6E pshs u,y - ldx <u0004 -L0F72 ldy ,s - ldu ,x++ - beq L0F8E - ldd u0004,u - leau d,u -L0F7D lda ,y+ - eora ,u+ - anda #$DF - bne L0F72 - clra - tst -u0001,u - bpl L0F7D -L0F8A leax -$02,x - puls pc,u,b,a -L0F8E coma - bra L0F8A -L0F91 bsr L0F6E - bcs L0F96 - rts -L0F96 pshs u,y,x - ldb $01,s - cmpb #$FE - beq L0F69 - leax ,y - clra - clrb - os9 F$Link - bcc L0FB0 - ldx $02,s - clra - clrb - os9 F$Load - bcs L0FB4 -L0FB0 stx $02,s - stu [,s] -L0FB4 puls pc,u,y,x -L0FB6 pshs y,x - ldd <u0008 - addd <u000A - tfr d,y - ldx ,x - sty [,s] - ldd $02,x - bsr L0FE3 - pshs y,x,b,a - ldx <u0004 - bra L0FDB -L0FCD cmpd $02,s - bcs L0FDB - cmpd $04,s - bhi L0FDB - subd ,s - std -$02,x -L0FDB ldd ,x++ - bne L0FCD - leas $06,s - puls pc,y,x -L0FE3 pshs u,y,x,b,a - ldu #$0000 - tfr x,d - subd $04,s - pshs x,b,a - addd $04,s - beq L1022 -L0FF2 lda ,x - pshs a - bra L1000 -L0FF8 lda ,y - sta ,x - leau u0001,u - tfr y,x -L1000 tfr x,d - addd $05,s - cmpd $09,s - bcs L100B - addd $01,s -L100B tfr d,y - cmpd $03,s - bne L0FF8 - puls a - sta ,x - leax $01,y - stx $02,s - leau u0001,u - tfr u,d - addd ,s - bne L0FF2 -L1022 leas $04,s - puls pc,u,y,x,b,a - pshs u,y,x,b,a - lda <u0036 - cmpa #$39 - beq L1068 - tst <u00A0 - bne L10AA - inc <u00A0 - lda <u0035 - bne L1064 - ldd <u00B3 - subd #$0001 - bhi L1089 - bmi L104E -L1041 lbsr L0DBB - leax >L0791,pcr - lbsr L135A - lbsr L124D -L104E leax >L07A4,pcr - leay >L06C1,pcr - lbsr L08D3 - bcc L104E - lda <u0035 - bne L1064 - lbsr L08CC - bra L104E -L1064 cmpa #$02 - bne L1041 -L1068 lbsr L0134 - lda #$03 -L106D cmpa <u00BE - beq L1074 - os9 I$Close -L1074 inca - cmpa #$10 - bcs L106D - lbra L088F - lbsr L0A90 - bne L108E - leax ,y - lbsr L1748 - bcc L1091 - rts -L1089 bsr L1091 - clrb - bra L1090 -L108E ldb #$01 -L1090 clra -L1091 std <u00B3 - lsl <u0034 - coma - ror <u0034 - bra L10A6 - lbsr L0DBB - lsl <u0034 - lsr <u0034 - ldd #$0001 - std <u00B3 -L10A6 leas $02,s - clr <u00A0 -L10AA puls pc,u,y,x,b,a - ldy <u0019 - jsr ,y - pshs u,y,x,b,a - cmpy <u0046 - beq L10E2 - ldb <u007D - ldx <u0080 - ldu <u0082 - pshs u,x,b - stu <u0080 - lbsr L0DBB - lda #$3D - lbsr L1373 - ldb ,y - addb #$01 - cmpb #$06 - bcc L10D7 - leax ,y - lbsr L13AA -L10D7 lbsr L1264 - puls u,x,b - stb <u007D - stx <u0080 - stu <u0082 -L10E2 puls pc,u,y,x,b,a -L10E4 lbsr L124B - tst <$17,x - bmi L110A - ldx <u005E -L10EE clr <u0074 -L10F0 tst <u0035 - bne L110A - leay ,x - lbsr L1BC9 - bsr L110C - exg x,y - cmpx <u0060 - bcs L10F0 - cmpx <u005C - bne L110A - cmpy <u0060 - bcs L10F0 -L110A clra - rts -L110C pshs u,y,x - lbsr L0DBB - ldx <u002F - tst <$17,x - bmi L1193 - ldx ,s - tfr y,d - subd ,s - bmi L1190 - pshs x,b,a - addd #$0040 - cmpd <u000C - lbcc L0F69 - tst <u0084 - bmi L1158 - lda #$20 - cmpx <u005C - bhi L113F - beq L113D - cmpy <u005C - bls L113F -L113D lda #$2A -L113F lbsr L1373 - cmpx <u0060 - bcc L1158 - tfr x,d - subd <u005E - ldx <u0082 - lbsr L012B - lda #$20 - sta ,x+ - stx <u0082 - lbsr L1270 -L1158 puls y,b,a - cmpy <u0060 - bcc L1190 - ldu <u004A - lbsr L19EF - lbsr L11F2 - stu <u005C - leax d,u - stx <u0060 - stx <u004A - leay ,u - tst <u0084 - bmi L1183 - leax ,y - lbsr L1677 - bne L1183 - leax >L02EB,pcr - lbsr L126B -L1183 lbsr L0DBB - lbsr L1AC6 - lbsr L128B - bsr L11D5 - dec <u0083 -L1190 lbsr L1264 -L1193 puls pc,u,y,x - ldx <u002F - tst <$17,x - bpl L119E - coma - rts -L119E ldy <u0080 - lbsr L0122 - bsr L11F2 - ldx <u004A - lbsr L1677 - beq L11D5 - stx <u005E - stx <u005C - leay ,x - ldx <u00AB - stx <u0060 - stx <u004A - lbsr L012E - ldx <u002F - lda <$17,x - clr <$17,x - tsta - bne L11D5 - leax <L11D5,pcr - lbsr L0899 - ldx <u005E - lbsr L0137 - lbra L088F -L11D5 pshs u,y,x,b,a - ldu <u0046 - pulu y,x,b,a - sty <u000A - stx <u000C - std <u004A - pulu y,x,b,a - sty <u0060 - stx <u005E - std <u005C -L11EB stu <u0046 - stu <u0044 - clra - puls pc,u,y,x,b,a -L11F2 pshs u,y,x,b,a - ldu <u0046 - ldd <u005C - ldx <u005E - ldy <u0060 - pshu y,x,b,a - ldd <u004A - ldx <u000C - ldy <u000A - pshu y,x,b,a - bra L11EB - ldy <u0031 - leax >L0756,pcr -L1211 bsr L1223 - lbsr L135A - ldx $03,y - bsr L1256 - leax >L0799,pcr - ldy $07,y - bne L1211 -L1223 lbra L0DBB - lbsr L010D - beq L1249 - lbsr L0F6E - bcs L1249 - ldx ,x - ldy <u0031 -L1235 ldy $07,y - beq L1249 - cmpx $03,y - bne L1235 - lsl ,y - coma - ror ,y - leax >L07A2,pcr - bra L125F -L1249 coma - rts -L124B bsr L1223 -L124D leax >L0756,pcr - lbsr L135A - ldx <u002F -L1256 pshs x - leax <$19,x - bsr L1261 - puls pc,x -L125F bsr L1223 -L1261 lbsr L1392 -L1264 lbsr L1371 - bsr L1270 - bra L1223 -L126B bsr L1223 - lbsr L1392 -L1270 pshs y,x,b,a - ldd <u0082 - subd <u0080 - bls L1285 - tfr d,y - ldx <u0080 - lda #$02 - os9 I$WritLn - bcc L1285 - bsr L1287 -L1285 puls pc,y,x,b,a -L1287 os9 F$PErr - rts -L128B ldy <u005C - cmpy <u0060 - bcc L12CF - ldb ,y - cmpb #$3A - bne L12A3 - leay $01,y - lbsr L13CF - lbsr L135C - ldb ,y -L12A3 tst <u0084 - bmi L12B8 - bsr L12F9 - ldb <u0074 - pshs b - bsr L12D8 - puls a - sta <u0074 - tfr b,a - lbsr L134E -L12B8 ldb ,y+ - bmi L12C4 - bsr L12F9 - bsr L12D8 - bsr L130C - bra L12C7 -L12C4 lbsr L1489 -L12C7 cmpy <u0060 - bcs L12B8 -L12CC sty <u005C -L12CF lda #$0D - lbra L1373 - leas $02,s - bra L12CC -L12D8 sta ,-s - bmi L12F6 - anda #$03 - beq L12F6 - cmpa #$01 - bne L12E8 - inc <u0074 - bra L12F6 -L12E8 decb - bpl L12EC - clrb -L12EC cmpa #$03 - beq L12F6 - dec <u0074 - bpl L12F6 - clr <u0074 -L12F6 lda ,s+ - rts -L12F9 leax >L03F5,pcr - tstb - bpl L1302 - subb #$2A -L1302 lda #$03 - mul - leax d,x - lda ,x - rts -L130A bsr L12F9 -L130C leax $01,x - anda #$60 - beq L1318 - cmpa #$60 - bne L132A - leay $02,y -L1318 lda -$01,x - pshs a - ldd ,x - leax d,x - puls a - anda #$18 - cmpa #$10 - beq L1392 - bra L1358 -L132A cmpa #$20 - bne L1332 - ldd ,x - jmp d,x -L1332 bsr L133A - bsr L1336 -L1336 lda ,x+ - bne L1373 -L133A lda <u007D - cmpa #$41 - bcs L1357 - lda #$0A - bsr L1373 - clr <u007D - tst <u0084 - bmi L1357 - lda <u0074 - adda #$03 -L134E lsla - adda #$06 - ldb #$10 - lbsr L011F - clra -L1357 rts -L1358 bsr L135C -L135A bsr L1392 -L135C pshs u,b,a - bsr L133A - bcc L136F - ldu <u0082 - lda #$20 - cmpa -u0001,u - beq L136F - cmpu <u0080 - bne L1377 -L136F puls pc,u,b,a -L1371 lda #$0D -L1373 pshs u,b,a - ldu <u0082 -L1377 sta ,u+ - ldd <u0082 - subd <u0080 - tsta - bne L1384 - inc <u007D - stu <u0082 -L1384 puls pc,u,b,a - lda #$2E - bsr L1373 -L138A ldx ,y++ - ldd <u0062 - leax d,x - leax $03,x -L1392 pshs x -L1394 lda ,x - anda #$7F - bsr L1373 - tst ,x+ - bpl L1394 - puls pc,x - ldb #$03 - ldx <u0044 - pshs y,b - leay -$01,y - bra L13AC -L13AA pshs y,b -L13AC ldd $04,y - std ,--x - ldd $02,y - std ,--x - ldd ,y - std ,--x - leay ,x - puls b - bra L13DC - ldb ,y - clra - bra L13D1 - leax >L0203,pcr - bra L13CD - leax >L01FD,pcr -L13CD bsr L1358 -L13CF ldd ,y++ -L13D1 pshs y - ldy <u0044 - leay -$06,y - std $01,y - ldb #$02 -L13DC lbsr L011F - puls pc,y -L13E1 bsr L13F1 -L13E3 lda ,y+ - cmpa #$FF - beq L13F1 - bsr L1373 - cmpa #$22 - bne L13E3 - bra L13E1 -L13F1 lda #$22 -L13F3 lbra L1373 - lda #$24 - bsr L13F3 - ldb #$14 - lbsr L011F - leay $02,y - rts - leax >L027E,pcr - lbsr L135A - lda -$01,y - adda #$FB - bra L13F3 - leax >L020A,pcr -L1413 lbsr L135A - lbra L138A - leax >L01AC,pcr - leay $01,y - bsr L1413 - leay $06,y - rts - leax >L02B4,pcr - lbsr L1358 - lda ,y - cmpa #$3A - beq L1433 - inc <u0074 -L1433 rts -L1434 bvc L13E0 - leax >L1434,pcr - bra L1440 - leax >L0284,pcr -L1440 lbsr L135A - ldb ,y+ -L1445 decb - beq L1433 - lda ,y+ - bsr L13F3 -L144C bra L1445 - com <u00EF - bita <u0001 - std ,--w - aim #$ED,<u00F2 - lsr <u00EF - anda <u0080 - stu [e,x] - neg <u00A6 - suba -$0C,y - aim #$86,<u003A -L1464 bsr L13F3 - leax <L144C,pcr -L1469 leax $02,x - lda ,s - anda ,x - cmpa ,x+ - bne L1469 - tsta - beq L1487 - eora ,s - sta ,s - ldd ,x - leax d,x - lbsr L1392 - lda #$2B - tst ,s - bne L1464 -L1487 puls pc,a -L1489 pshs u - ldu <u0044 - clr ,-u - clr ,-u - leay -$01,y -L1493 ldb ,y - bpl L14C4 - lbsr L12F9 - tfr a,b - lda ,y+ - bitb #$80 - bne L1493 - orb #$80 - pshu b,a - bitb #$18 - bne L1493 - andb #$7F - pshu b,a - bitb #$04 - bne L14B8 - ldd ,y++ - std u0002,u - bra L1493 -L14B8 leay -$01,y - sty u0002,u - ldb ,y+ - lbsr L1B68 - bra L1493 -L14C4 sty <u005C - leay ,u - clra - clrb - std ,--y - pshs b,a - sta <u00BF - sta <u00B1 -L14D3 ldd ,u++ - bitb #$08 - beq L14FE - andb #$07 - cmpb <u00BF - bhi L14F2 - bne L14EF - cmpb #$06 - bne L14EB - tst <u00B1 - beq L14EF - bra L14F2 -L14EB tst <u00B1 - beq L14F2 -L14EF lbsr L1581 -L14F2 stb <u00BF - orb #$80 - std ,--y - lda #$01 - sta <u00B1 - bra L14D3 -L14FE clr <u00B1 - bitb #$03 - beq L152D - bitb #$04 - bne L152D - bitb #$10 - bne L1510 - pulu x - stx ,--y -L1510 std ,--y - andb #$03 - bsr L1581 - cmpa #$BE - bne L151F - ldx #$54FF - stx ,--y -L151F ldx #$4B80 - bra L1526 -L1524 stx ,--y -L1526 decb - bne L1524 - stb <u00BF -L152B bra L14D3 -L152D bitb #$10 - bne L1535 - pulu x -L1533 pshs x -L1535 pshs b,a - cmpa #$89 - bcs L153F - cmpa #$8C - bls L14D3 -L153F ldd ,y++ - tstb - bmi L154A - beq L1558 - ldx ,y++ - bra L1533 -L154A pshs b,a - clr $01,s - bitb #$10 - bne L153F - andb #$07 - stb <u00BF - bra L152B -L1558 ldx ,u++ - beq L1569 - pshu x - std ,--y - bra L152B -L1562 puls y - ldb ,y+ - lbsr L130A -L1569 ldd ,s++ - beq L157C - bitb #$04 - bne L1562 - leay ,s - exg a,b - lbsr L130A - leas ,y - bra L1569 -L157C ldy <u005C - puls pc,u -L1581 ldx ,s - pshs x - ldx #$4E00 - stx $02,s - ldx #$4DFF - stx ,--y - rts - lbsr L0A9D - lbsr L0EFD - ldy ,x - tst $06,y - bne L15E5 - pshs x - lbsr L1A2E - lbsr L124B - ldy <u005E - bsr L15F3 -L15AA lda <u0035 - cmpa #$02 - bne L15B3 - lbsr L1993 -L15B3 leax >L07A6,pcr - leay >L0718,pcr - lbsr L08D3 - bcc L15AA - tst <u0035 - bne L15AA - leax >L15AA,pcr - pshs x - ldx <u0080 - lsl ,x - lsr ,x - lbsr L1748 - lbcs L08CC - lbsr L1A0D - lda ,x - cmpa #$0D - beq L15F3 - ldy <u0080 - bra L1601 -L15E5 coma - rts - leax -$01,y - lsl ,x - asr ,x - lbsr L16F2 - lbsr L16BD -L15F3 sty <u005C - lbsr L1682 - leax ,y - lbsr L1BC9 - lbra L16AD -L1601 bsr L1606 - bcc L15F3 - rts -L1606 tst <u000C - beq L1670 - clr <u00A0 - lbsr L0122 - ldx <u004A - lda ,x - cmpa #$3A - bne L165E - clra - clrb - sta ,-s - ldy <u005C - lbsr L1A10 - cmpy <u0060 - bcc L162F - ldd $01,x - cmpd $01,y - bls L162F - inc ,s -L162F ldy <u005E - ldd $01,x - lbsr L1A0D - tst ,s+ - bne L1642 - bcc L1642 - cmpy <u005C - bcc L165E -L1642 sty <u005C - cmpy <u0060 - bcc L165E - ldx <u004A - ldd $01,x - cmpd $01,y - bne L165E - pshs y - lbsr L1BC9 - tfr y,d - subd ,s++ - bra L1660 -L165E clra - clrb -L1660 ldy <u005C - lbsr L19B1 - ldx <u005C - bsr L1677 - bne L166E - leay ,x -L166E clra - rts -L1670 ldb #$20 - lbsr L1287 - coma - rts -L1677 lda ,x - cmpa #$3A - bne L167F - lda $03,x -L167F cmpa #$3D - rts -L1682 ldx #$0000 - ldy <u005E -L1688 cmpy <u005C - bcc L1697 - leax $01,x - lbsr L1BC9 - cmpy <u0060 - bcs L1688 -L1697 sty <u005C - stx <u00B5 - clra - rts - bsr L16CE - bsr L16BD - cmpx <u005E - bhi L16AD - pshs y,x - lbsr L124B - puls y,x -L16AD ldd <u0060 - pshs b,a - sty <u0060 - lbsr L10EE - puls b,a - std <u0060 - clra - rts -L16BD pshs x,b - ldx <u0082 - ldb ,x - cmpb #$0D - bne L16C9 - puls pc,x,b -L16C9 leas $05,s - lbra L08CC -L16CE lda ,y+ - cmpa #$20 - beq L16CE - cmpa #$2A - bne L16E1 - sty <u0082 - ldx <u005E - ldy <u0060 - rts -L16E1 leax -$01,y - bsr L16F2 - bcs L16F1 - ldx <u005C - cmpy <u005C - bcc L16F1 - exg x,y - clra -L16F1 rts -L16F2 clr ,-s - ldd ,x - cmpa #$2B - bne L1707 - ldy <u0060 -L16FD cmpb #$2A - bne L1712 - leax $02,x - stx <u0082 - puls pc,a -L1707 cmpa #$2D - bne L1714 - inc ,s - ldy <u005E - bra L16FD -L1712 leax $01,x -L1714 lda ,x - cmpa #$30 - bcs L171E - cmpa #$39 - bls L1723 -L171E ldd #$0001 - bra L1727 -L1723 bsr L1748 - bcs L1742 -L1727 stx <u0082 - ldy <u005C - tst ,s+ - beq L173D - ldy <u005E - pshs b,a - ldd <u00B5 - subd ,s++ - bcc L173D - clra - clrb -L173D lbsr L1BCF - clra - rts -L1742 ldy <u005C - com ,s+ - rts -L1748 ldy <u0046 - lbsr L013A - lda ,y+ - cmpa #$02 - beq L1759 - clra - ldd ,y - bne L175A -L1759 coma -L175A rts - clrb - bra L1760 - ldb #$01 -L1760 leas -$0F,s - stb ,s - lda ,y - clr $01,s - cmpa #$2A - bne L1770 - sta $01,s - leay $01,y -L1770 ldb ,y+ - cmpb #$20 - beq L1770 - tfr b,a - sty <u0082 - lbsr L18AA - stu $02,s - lbmi L1985 - tst ,s - beq L1791 - lbsr L18AA - stu $04,s - lbmi L1985 -L1791 cmpa #$0D - beq L179D - lda ,y+ - cmpa #$0D - lbne L1985 -L179D ldu <u0046 - stu $0D,s -L17A1 lda ,-y - sta ,-u - cmpy <u0082 - bhi L17A1 - stu <u0046 - stu <u0044 - ldd $02,s - leau d,u - leau u0001,u - stu $06,s - ldy <u005C - sty $0B,s - clr $0A,s - lbra L1878 -L17C1 lbsr L0DBB - sty <u005C - lbsr L128B - ldy <u0080 - leay $05,y - lsl $0A,s - asr $0A,s -L17D3 tst <u0035 - bne L183A - ldd <u0082 - subd $02,s - ldx <u0046 - lbsr L18BE - bcs L182F - lda #$81 - sta $0A,s - tst ,s - beq L182F - ldd <u0082 - addd $04,s - subd $02,s - subd <u0080 - cmpd #$00E6 - bhi L182F - ldx <u0082 - exg x,y - ldd $02,s - lbsr L0FE3 - tfr y,d - subd $02,s - tfr d,y - ldu $06,s - pshs x,b,a -L180B lda ,u+ - sta ,y+ - cmpa #$FF - bne L180B - leay -$01,y - ldd ,s++ - subd ,s - puls x - lbsr L0FE3 - sty <u0082 - ldd $04,s - leay d,x - ldd $02,s - bne L182B - leay $01,y -L182B tst $01,s - bne L17D3 -L182F tst $0A,s - bpl L1872 - ldy $08,s - ldd ,s - bne L1845 -L183A ldx $0D,s - stx <u0046 - stx <u0044 - leas $0F,s - lbra L15F3 -L1845 lbsr L1270 - sty $0B,s - tst ,s - beq L1872 - leax ,y - lbsr L1BC9 - lbsr L19A5 - sty <u005C - ldy <u0080 - lbsr L1606 - sty <u005C - ldy $08,s - lbsr L1BC9 - cmpy <u005C - bne L1882 - tst $01,s - beq L1882 -L1872 ldy $08,s - lbsr L1BC9 -L1878 sty $08,s - cmpy <u0060 - lbcs L17C1 -L1882 lbsr L0DBB - tst $0A,s - bne L1899 - leax >L07AA,pcr - lbsr L135A - ldy <u0046 - lbsr L13E1 - lbsr L1264 -L1899 ldy $0B,s - sty <u005C - ldx $0D,s - stx <u0046 - stx <u0044 - leas $0F,s - lbra L1682 -L18AA ldu #$FFFF -L18AD cmpa #$0D - beq L18B9 - leau u0001,u - lda ,y+ - cmpb -$01,y - bne L18AD -L18B9 clr -$01,y - com -$01,y - rts -L18BE pshs b,a - bra L18D2 -L18C2 pshs y,x -L18C4 lda ,x+ - cmpa #$FF - beq L18DA - cmpa ,y+ - beq L18C4 - puls y,x - leay $01,y -L18D2 cmpy ,s - bls L18C2 - coma - puls pc,b,a -L18DA puls y,x - clra - puls pc,b,a - ldd #$0064 - ldx #$000A - pshs x,b,a - leax ,y - ldy <u00B5 - lda ,x - cmpa #$2A - bne L18FA - ldy #$0000 -L18F6 leax $01,x - lda ,x -L18FA cmpa #$20 - beq L18F6 - pshs y - cmpa #$0D - beq L191C - lbsr L1748 - bcs L1981 - std $02,s - lda ,x+ - cmpa #$0D - beq L191C - lbsr L1748 - bcs L1981 - std $04,s - bmi L1981 - lda ,x -L191C cmpa #$0D - bne L1981 - bsr L1995 - ldd ,s++ - ldy <u005E - lbsr L1BCF - sty <u005C - ldd ,s - lbsr L1A0D - clr ,-s - cmpy <u005C - bcs L198A - bsr L1960 - cmpx #$0000 - ble L198A - tst <u0035 - bne L194C - tst <u0035 - bne L194C - inc ,s - bsr L1960 -L194C leas $05,s - ldx $02,s - lbsr L1A2E - ldy <u005E - ldd <u00B5 - lbsr L1BCF - sty <u005C - clra - rts -L1960 ldy <u005C - ldx $03,s -L1965 clra - clrb - lbsr L1A10 - cmpy <u0060 - bcc L1980 - tst $02,s - beq L1975 - stx $01,y -L1975 lbsr L1BC9 - tfr x,d - addd $05,s - tfr d,x - bpl L1965 -L1980 rts -L1981 leas $06,s - bra L1987 -L1985 leas $0F,s -L1987 lbra L08CC -L198A leax >L078B,pcr - lbsr L125F - bra L194C -L1993 leas $04,s -L1995 lbsr L0128 - clra - rts - lbsr L16CE - lbsr L16BD - bsr L19A5 - lbra L15F3 -L19A5 ldd <u004A - std <u00AB - tfr y,d - pshs x - subd ,s++ - leay ,x -L19B1 pshs u,y,x,b,a - leax d,y - pshs x - ldy <u00AB - ldd <u004A - subd ,s - beq L19C3 - lbsr L0FE3 -L19C3 ldd <u00AB - ldu ,s - subd ,s++ - bls L19D1 - ldy $04,s - lbsr L0125 -L19D1 ldd <u00AB - subd <u004A - ldy $04,s - leay d,y - sty $04,s - subd ,s++ - pshs b,a - addd <u0060 - std <u0060 - std <u004A - ldd <u000C - subd ,s - std <u000C - puls pc,u,y,x,b,a -L19EF pshs y,x,b,a - leay d,y - leau d,u - andb #$03 -L19F7 beq L1A06 - lda ,-y - sta ,-u - decb - bra L19F7 -L1A00 ldx ,--y - ldd ,--y - pshu x,b,a -L1A06 cmpy $04,s - bne L1A00 - puls pc,y,x,b,a -L1A0D ldy <u005E -L1A10 pshs b,a - bra L1A17 -L1A14 lbsr L1BC9 -L1A17 cmpy <u0060 - bcc L1A2B - lda ,y - cmpa #$3A - bne L1A14 - ldd ,s - cmpd $01,y - bhi L1A14 - puls pc,b,a -L1A2B coma - puls pc,b,a -L1A2E pshs u,y,x,b,a - lbsr L0FB6 - ldx ,x - stx <u002F - ldd $09,x - addd <u002F - std <u005E - ldd $0F,x - addd <u002F - std <u0060 - std <u004A - ldd $02,x - subd $0F,x - pshs b,a - ldd <u0000 - addd <u0002 - subd ,s - tfr d,u - std <u0066 - ldd <u002F - addd $0F,x - tfr d,y - puls b,a - bsr L19EF - ldd $0D,x - subd $0F,x - subd #$0003 - std <u0068 - addd <u0066 - addd #$0003 - std <u0062 - ldd $02,x - subd $0D,x - addd #$0003 - std <u0064 - ldy <u005E - bsr L1AC6 - ldx <u0062 - ldd -$03,x - beq L1A9E -L1A83 pshs b,a - leau ,x - leax $03,x -L1A89 ldb ,x+ - bpl L1A89 - lda #$02 - cmpb #$A4 - bne L1A95 - lda #$04 -L1A95 sta ,u - puls b,a - subd #$0001 - bgt L1A83 -L1A9E ldx <u0066 - ldd <u0068 - leax d,x - stx <u00DA - stx <u0066 - addd <u000C - std <u000C - clr <u0068 - clr <u0069 - puls pc,u,y,x,b,a -L1AB2 ldb ,y+ - bpl L1AB8 - subb #$2A -L1AB8 clra - leax >L1BD5,pcr - ldb d,x - lsrb - lsrb - lsrb - lsrb - lbsr L1B75 -L1AC6 cmpy <u0060 - bcs L1AB2 - rts -L1ACC daa - lbsr L3013 - pshs u,b,a - bgt L1B21 - mul - brn L1B2A - exg x,0 - orcc #$0F - lda -$01,y - adda #$93 - sta -$01,y - leay $01,y -L1AE3 leay $01,y - rts - dec -$01,y - dec -$01,y - dec -$01,y - rts - ldd ,y - addd <u005E - tfr d,x - ldd -$02,x - std ,y++ - dec -$03,y - rts - lda ,y+ - cmpa #$85 - bne L1B03 - leay $09,y - rts -L1B03 clrb - bsr L1B23 - leay $07,y - rts - lda ,y - cmpa #$4F - bne L1AE3 - leay $05,y - rts -L1B12 lda ,y+ - cmpa #$FF - bne L1B12 - rts - ldb ,y - clra - leay d,y - rts - ldb -$01,y -L1B21 andb #$04 -L1B23 lda #$60 - pshs b,a - lda #$85 - sta -$01,y - ldx <u0062 - ldd -$03,x - ldu ,y - bra L1B40 -L1B33 puls b,a -L1B35 subd #$0001 - beq L1B65 - leax $03,x -L1B3C tst ,x+ - bpl L1B3C -L1B40 cmpu $01,x - bne L1B35 - pshs b,a - lda ,x - anda #$E0 - cmpa $02,s - bne L1B33 - lda ,x - anda #$18 - bne L1B33 - lda ,x - anda #$04 - eora $03,s - bne L1B33 - tfr x,d - subd <u0062 - std ,y++ - leas $02,s -L1B65 leas $02,s - rts -L1B68 tstb - bpl L1B6D - subb #$2A -L1B6D leax <L1BD5,pcr - clra - ldb d,x - andb #$0F -L1B75 leax >L1ACC,pcr - ldb b,x - jmp b,x -L1B7D pshs u - ldb ,y+ -L1B81 cmpb ,u+ - bhi L1B81 - puls u - beq L1B91 - bsr L1B68 -L1B8B cmpy <u0060 - bcs L1B7D - coma -L1B91 puls pc,u,x,b,a -L1B93 tfr y,x - abx - stu >$3456 - leau >L1B93,pcr - bra L1B8B -L1B9F fcb $3E > -L1BA0 swi - fcb $FF - pshs u,x,b,a - leau <L1B9F,pcr - bra L1B8B -L1BA9 pshs u,x,b,a - leau <L1BA0,pcr - bra L1B8B -L1BB0 bls L1B37 - lda #$87 - eora #$89 - ora #$8B - cmpx #$F2F3 - andb >$F5F6 - stb >$F8F9 - stu >$3456 - leau <L1BB0,pcr - bra L1B8B -L1BC9 clra - clrb -L1BCB bsr L1BA9 - bcs L1BD4 -L1BCF subd #$0001 - bcc L1BCB -L1BD4 rts -L1BD5 neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0022 - neg <u0000 - lsr $00,x - bhi L1BED -L1BED neg <u0000 - bhi L1BF1 -L1BF1 bhi L1BF3 -L1BF3 neg <u0022 - sbca <u0022 - sbca <u0022 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0077 - asr >$0022 - sbca <u0077 - asr >$0000 - neg <u0000 - neg <u0000 - suba #$00 - bhi L1C3F - neg <u0000 - fcb $11 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - bhi L1BCE - sbca ,-y - sbca ,-y - bhi L1C54 - bhi L1C56 - bhi L1C58 - bhi L1C5A - fcb $11 - bhi L1C6E - fcb $55 U - bhi L1C3E -L1C3E neg <u0000 - neg <u0000 - neg <u0000 - suba >$0000 - neg <u0000 - suba >$0000 - neg <u0000 - neg <u0000 - neg <u0000 - suba >$0000 - neg <u00B0 - neg <u00B0 - neg <u00B0 - neg <u00B0 - neg <u00B0 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u00B0 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u00B0 - neg <u0000 - neg <u0000 - suba >$C000 - suba >$C000 - suba >$C0D0 - neg <u00B0 - subb #$D0 - neg <u00B0 - subb #$00 - suba >$C000 - suba >$C000 - suba >$00B0 - neg <u00B0 - neg <u0000 - sbcb ,-s - sbcb ,-s - sbcb ,-s - sbcb ,-s - pshs x,b,a - ldb [<$04,s] - leax <L1CB5,pcr - ldd b,x - leax d,x - stx $04,s - puls pc,x,b,a -L1CB5 aim #$E9,<u0007 - tim #$08,>$7508 - comb - lsl <u0008 - oim #$74,<u009D - fcb $1B - aim #$9D,<u001B - lsr <u009D - fcb $1B - ror <u009D - bpl L1CCD -L1CCD jsr <u001B - nop - neg <u0021 - com <u00CB - adcb <u000A - cwai #$BE - addb #$D9 - dec <u003E - cmpx >$CBE4 - dec <u003C - jsr >$CBE4 - dec <u003D -L1CE6 cmpx >$CBE1 - dec <u003E - jsr >$CBE1 - dec <u003D - ldx >$CB52 - lsl <u003A - jsr >$CBF1 - eim #$2A,<u00AA - addb #$38 - oim #$28,<u00AA - addb #$3E - aim #$DC,<u00CB - addd <u000A - ldx >$CBD6 - dec <u00BC - addb #$DD - rol <u00BD - addb #$E7 - eim #$AB,<u00CB - orb $05,x - jsr d,u - ldd $05,x - ora d,u - ldu $05,x - stx d,u - subb >$05DE - addb #$4C - inc <u00BA - addb #$4F - inc <u00DB - addb #$50 - inc <u00DD - addb #$51 - inc <u00BB - addb #$54 - tim #$A3,<u00CB - bne L1D3C - stx >$CB37 - oim #$A1,<u00A1 - neg <u000C - ora #$CB - fcb $4B K - inc <u00AC - addb #$4D - inc <u00A8 - addb #$4E - inc <u00A9 - andb <u0089 - inc <u00AE - brn L1CE6 - ror <u00A2 - neg <u0091 - ror <u00A4 - addb #$3F - aim #$8D,<u0003 - adda >$0122 - oim #$12,<u0001 - bhi L1D6A - com >$02C9 - com <u00AB - com <u00AB - com <u00AB - aim #$C9,<u0003 - adda $03,x - adda $03,x - adda $03,x - addd #$03BB - oim #$81,<u0001 - ora #$01 - stx <u0003 - adda $01,x - subd $01,x - andb #$01 - ldu #$01DD - com <u00AB - oim #$D9,<u0003 - adda $01,x - std <u0001 - cmpb $01,x - std <u0001 - ldd $03,x - ldd <u0002 - beq L1DA4 - adda >$0227 -L1DA4 com <u00BB - aim #$54,<u0003 - ldd <u0002 - lda <u0002 - adcb #$03 - ldd <u0003 - ldd <u0003 - leau $03,x - leau $03,x - bls L1DBB - orb >$0307 - com <u0011 - com <u0011 - com <u0072 - com <u007C - com <u00DC - com <u00DC - com <u00DC - com <u0080 - com <u0080 - com <u0098 - com <u0098 - aim #$C9,<u0096 - tim #$34,<u0002 - ldx <u00A7 - lda #$0D -L1DDC lsl ,x - lsr ,x - cmpa ,x+ - bne L1DDC - ldx <u00A7 - bsr L1E1F - ldd <u00B9 - subd <u00A7 - pshs b - ldx <u00AF - stx <u00AB - ldy <u00A7 - lda #$3D - lbsr L2415 - lbsr L20F8 - lbsr L2415 - lda #$20 - ldx <u0080 -L1E04 sta ,x+ - dec ,s - bpl L1E04 - ldd #$5E0D - std -$01,x - ldx <u0080 - bsr L1E1F - puls b,a - lbsr L1CC1 - ldx <u0046 - stx <u0044 -L1E1C lbra L1CC7 -L1E1F ldy #$0100 - lda <u002E - os9 I$WritLn - rts - puls x - lbsr L1CC4 - lbsr L1F90 - lbsr L214C - sty <u00A7 - ldx <u00AB - stx <u00AF -L1E3B bsr L1E4C - lda <u00A3 - lbsr L2415 - cmpa #$3E - beq L1E3B - cmpa #$3F - bne L1DD4 - bra L1E1C -L1E4C lbsr L233E - lda <u00A4 - cmpa #$01 - bne L1E62 - ldb <u00A3 - clra - lslb - rola - leax >L1D60,pcr - ldd d,x - jmp d,x -L1E62 cmpa #$02 - lbne L2126 -L1E68 pshs x - ldx <u00AB - leax -$01,x - stx <u00AB - puls pc,x - lbsr L2167 - cmpa #$DD - lbne L211F - bsr L1E68 - lda #$53 - lbsr L2415 -L1E82 lbsr L2167 - cmpa #$4D - bne L1E9B - lbsr L216E - bne L1E96 - lbsr L216E - bne L1E96 - lbsr L216E -L1E96 lbsr L22BF - bsr L1EC9 -L1E9B lbsr L21A1 - beq L1E82 - cmpa #$4C - bne L1EC3 - bsr L1EC9 - ldb <u00A4 - cmpb #$00 - beq L1EC1 - cmpb #$03 - bne L1ECC - cmpa #$44 - bne L1EC1 - bsr L1EC9 - cmpa #$4F - bne L1EC3 - lbsr L216E - cmpa #$50 - bne L1ECC -L1EC1 bsr L1EC9 -L1EC3 cmpa #$51 - beq L1E82 - bra L1E68 -L1EC9 lbra L233E -L1ECC lda #$18 - bra L1F36 -L1ED0 lbsr L2415 - bsr L1F1D - lbsr L21A1 - beq L1ED0 -L1EDA lda #$55 -L1EDC lbsr L2415 - bra L1F2B - lbsr L213C - lbsr L21A6 - lbra L2139 - bsr L1F39 - cmpa #$45 - bne L1EFB - lbsr L2415 - lbsr L214C - bcc L1F3F - lbra L1E4C -L1EFB lda #$26 - bra L1F36 - bsr L1F2B - bra L1F49 - lbsr L2193 - lbsr L212D - lda <u00A3 - cmpa #$46 - bne L1F20 - bsr L1F1B - lda <u00A3 - cmpa #$47 - bne L1EDA - bsr L1F1B - bra L1EDA -L1F1B bsr L1EDC -L1F1D lbra L213C -L1F20 lda #$27 - bra L1F36 - lbsr L2193 - bsr L1F2B - bsr L1F2B -L1F2B lbra L2176 - bsr L1F39 - cmpa #$48 - beq L1F47 - lda #$1F -L1F36 lbra L1DD6 -L1F39 bsr L1F1D - bra L1EDA - bsr L1F2B -L1F3F bra L1F8D - bsr L1F39 - cmpa #$45 - bne L1EFB -L1F47 bsr L1FB1 -L1F49 lbra L1E4C - ldd <u00AB - pshs y,b,a - lbsr L233E - cmpa #$1E - bne L1F60 - leas $04,s - bsr L1F8D - cmpa #$1F - beq L1F8A - rts -L1F60 puls y,b,a - std <u00AB - bsr L1F39 - ldx <u00AB - leax -$01,x - pshs x - cmpa #$1F - beq L1F7C - cmpa #$21 - beq L1F7C - lda #$21 - bra L1F36 -L1F78 bsr L1FB1 - lda #$3A -L1F7C inc [,s] - bsr L1F8A - lbsr L21A1 - beq L1F78 - puls pc,x - lbsr L210E -L1F8A lbsr L2156 -L1F8D lbra L210B -L1F90 sty <u00A7 - ldx <u004A - stx <u00AF - stx <u00AB - clr <u00BB - clr <u00BC - rts - bsr L1F90 - inc <u00A0 - lbsr L210B - bsr L1FC0 - clr <u00A0 - lda <u00A3 - cmpa #$3F - lbne L1DD4 -L1FB1 lbra L2415 - lbsr L210E - pshs x - lbsr L2193 - ldb #$23 - stb [,s++] -L1FC0 cmpa #$4D - bne L1FF5 -L1FC4 bsr L1FB1 - ldd <u00AB - pshs y,b,a - lbsr L233E - ldd #$0005 - cmpa <u00A4 - beq L1FD8 - stb <u00A4 - bra L1FDB -L1FD8 lbsr L2182 -L1FDB puls y,b,a - std <u00AB - ldb <u00A4 - cmpb #$05 - beq L1FE8 - lbsr L225D -L1FE8 lbsr L2314 - lbsr L21A1 - beq L1FC4 - pshs a - lbra L22F7 -L1FF5 rts - sty <u00A9 - lbsr L2186 - bne L2007 - sty <u00A9 - bsr L2022 - bsr L1FB1 - bsr L1F8D -L2007 ldy <u00A9 - cmpa #$90 - bne L201A - lbsr L233E - lbsr L1F8D -L2014 bsr L2022 -L2016 lda #$4B - bsr L2080 -L201A bsr L2073 - lbsr L219B - beq L2016 -L2021 rts -L2022 lbsr L219B - beq L2021 - bra L207D - sty <u00A9 - lbsr L2186 - beq L203A - cmpa #$49 - beq L203E -L2035 ldy <u00A9 - bra L2045 -L203A cmpa #$49 - bne L2054 -L203E lbsr L2139 - bra L2054 -L2043 bsr L2080 -L2045 lbsr L245D - cmpa #$0D -L204A lbeq L210B - cmpa #$5C - beq L204A - bsr L2085 -L2054 lbsr L219B - beq L2043 - rts - sty <u00A9 - lbsr L2186 - beq L2014 - ldy <u00A9 - bra L201A - sty <u00A9 - lbsr L2186 - beq L2054 - bra L2035 - bsr L2078 -L2073 inc <u00BC - lbra L2180 -L2078 lbsr L2186 - bne L20D7 -L207D lbsr L21A6 -L2080 lbra L2415 - bsr L2078 -L2085 lbra L213C -L2088 bge L208B - blt L208E - stb >$03F8 - lsr <u00F9 - suba #$00 - lbsr L233E - cmpa #$54 - bne L20D7 - bsr L2073 - bsr L207D - bsr L2085 - lda <u00A3 - cmpa #$4C - bne L2114 - lda #$4A - bsr L2080 - clr ,-s -L20AC bsr L210B - leax <L2088,pcr -L20B1 cmpa ,x++ - bhi L20B1 - bne L20C7 - ldb -$01,x - orb ,s - stb ,s - bsr L210B - cmpa #$E7 - beq L20AC - lda ,s+ - bne L2080 -L20C7 lda #$0F - bra L20D9 -L20CB lbsr L21A1 - bne L2114 - bsr L2080 - lbsr L2186 - beq L20CB -L20D7 lda #$1C -L20D9 lbra L1DD6 - bsr L214C - bra L210B - lbsr L245D - leay $01,y - suba #$30 - beq L210B - cmpa #$01 - lbne L21C9 - bsr L210E - lda #$36 - lbsr L2415 - bra L210B -L20F8 ldx <u00AB - lbsr L245D - clra -L20FE lbsr L2415 - inc ,x - lda ,y+ - cmpa #$0D - bne L20FE - leay -$01,y -L210B lbsr L233E -L210E ldx <u00AD - stx <u00AB - lda <u00A3 -L2114 rts -L2115 lda <u00A4 - cmpa #$00 - beq L2114 - lda #$0C - bra L20D9 -L211F lda #$1B -L2121 bra L20D9 - lbsr L233E -L2126 bsr L2115 - inc <u00BC - lbsr L21FC -L212D lda <u00A3 - cmpa #$52 - beq L2139 - cmpa #$DD - bne L211F - lda #$53 -L2139 lbsr L2415 -L213C lda #$39 -L213E ldx <u0044 - clrb - lbsr L22BA -L2144 bsr L21B4 - lbsr L2262 - bcc L2144 -L214B rts -L214C lbsr L245D - lbsr L246E - bcs L214B - lda #$3A -L2156 bsr L217D - lbsr L23A6 - beq L2163 - ldd ,x - lbgt L240C -L2163 lda #$10 - bra L2121 -L2167 bsr L216B - bsr L2115 -L216B lbra L1EC9 -L216E lda #$8E - bsr L2156 - bsr L216B - bra L21A1 -L2176 clra - bsr L217D - bsr L217D - bra L218E -L217D lbra L2415 -L2180 bsr L216B -L2182 bsr L2115 - bra L21FC -L2186 bsr L210B - cmpa #$54 - bne L2192 - bsr L2139 -L218E lda <u00A3 - cmpa <u00A3 -L2192 rts -L2193 bsr L216B - lbsr L2115 -L2198 lbra L210B -L219B lda <u00A3 - cmpa #$51 - beq L21A5 -L21A1 lda <u00A3 - cmpa #$4B -L21A5 rts -L21A6 bsr L21A1 - beq L21A5 - lda #$1D - bra L21CB -L21AE clrb - bsr L21F5 - lbsr L210E -L21B4 bsr L21EA - bsr L21CE - cmpa #$4D - beq L21AE - ldb <u00A4 - cmpb #$06 - beq L2198 - cmpb #$04 - bne L2182 - lbra L22CA -L21C9 lda #$12 -L21CB lbra L1DD6 -L21CE cmpa #$CD - beq L21E3 - cmpa #$EA - bne L21A5 - lda ,y - lbsr L246E - bcc L21ED - cmpa #$2E - beq L21ED - lda #$CE -L21E3 ldb #$07 - bsr L21F5 - lbsr L210E -L21EA lbra L233E -L21ED leay -$01,y - lbsr L1E68 - lbra L237A -L21F5 ldx <u0044 - std ,--x - stx <u0044 - rts -L21FC ldd #$8500 -L21FF pshs b,a - ldd <u00A1 - bsr L21F5 - puls b,a - bsr L21F5 - lbsr L210E - lbsr L210B - clrb - cmpa #$4D - beq L2226 -L2214 cmpa #$89 - bne L2247 - bsr L2257 - bsr L2247 - bsr L21EA - lbsr L2115 - ldd #$8900 - bra L21FF -L2226 bsr L2257 - incb - pshs b - lbsr L2314 - lbsr L21A1 - bne L223E - ldb ,s+ - cmpb #$03 - bcs L2226 - lda #$2A - lbra L1DD6 -L223E bsr L22BF - lbsr L210B - puls b - bra L2214 -L2247 clr <u00BC - ldx <u0044 - addb ,x++ - lbsr L2413 - ldd ,x++ - stx <u0044 - lbra L240C -L2257 tst <u00BC - beq L228A - clr <u00BC -L225D lda #$0E -L225F lbra L2415 -L2262 ldb <u00A3 - clra - cmpb #$4E - beq L228B - tstb - bpl L2273 - lbsr L1CCD - bita #$08 - bne L228B -L2273 ldx <u0044 -L2275 ldd ,x++ - cmpa #$4D - beq L22C5 - bsr L225F - tstb - bne L2275 - cmpa #$39 - bne L2287 - lbsr L1E68 -L2287 stx <u0044 - coma -L228A rts -L228B anda #$07 - tfr a,b - ldx <u0044 - bra L2297 -L2293 lda ,x++ - bsr L230F -L2297 cmpb $01,x - bcs L2293 - bhi L22B8 - cmpb #$06 - beq L22B8 - tstb - bne L2293 - lda ,x++ - cmpa #$4D - bne L22B0 - stx <u0044 - bsr L22FE - bra L2262 -L22B0 cmpa #$39 - beq L2307 - bsr L230F - bra L2287 -L22B8 lda <u00A3 -L22BA std ,--x - stx <u0044 -L22BE rts -L22BF lda <u00A3 - cmpa #$4E - beq L22BE -L22C5 lda #$25 -L22C7 lbra L1DD6 -L22CA lbsr L1E68 - lda <u00A3 - pshs a - bsr L22FE - ldb ,s - lbsr L1CCD - leax <L22F7,pcr - pshs x - anda #$03 - beq L230B - cmpa #$02 - beq L231B - bhi L2322 - ldb $02,s - cmpb #$92 - beq L2331 - cmpb #$94 - beq L2331 - cmpb #$BE - beq L2326 - bra L2312 -L22F7 bsr L22BF - puls a - lbsr L2415 -L22FE lbra L210B -L2301 lda <u00A3 - cmpa #$4D - beq L22BE -L2307 lda #$22 - bra L22C7 -L230B leas $02,s - puls a -L230F lbra L2415 -L2312 bsr L2301 -L2314 clra - lbsr L213E - lbra L1E68 -L231B bsr L2312 -L231D lbsr L21A6 - bra L2314 -L2322 bsr L231B - bra L231D -L2326 bsr L2301 - bsr L22FE - cmpa #$54 - beq L2314 - lbra L20D7 -L2331 bsr L2301 - incb - lbsr L2413 - lbra L2180 -L233A lda #$0A - bra L22C7 -L233E ldd <u00AB - std <u00AD - lbsr L245D - sty <u00B9 - lbsr L2430 - lbne L23E1 - lda ,y - lbsr L246E - bcc L237A - leax >L1CD3,pcr - lda #$80 - lbsr L252A - beq L233A - ldb ,x - leau <L239D,pcr - jmp b,u -L2368 ldd $01,x -L236A stb <u00A4 - sta <u00A3 - lbra L2415 - lda ,y - lbsr L246E - bcs L2368 - leay -$01,y -L237A bsr L23A6 - bne L238F - ldd #$8F05 -L2381 sta <u00A3 -L2383 bsr L23D6 - lda ,x+ - decb - bpl L2383 - lda #$06 - sta <u00A4 - rts -L238F ldd #$8E02 - tst ,x - bne L2381 - ldd #$8D01 - leax $01,x - bra L2381 -L239D leay -$01,y - bsr L23A6 - ldd #$9102 - bra L2381 -L23A6 lbsr L245D - leax ,y - ldy <u0044 - lbsr L1CCA - exg x,y - bcs L23BA - lda ,x+ - cmpa #$02 - rts -L23BA lda #$16 - bra L23DA - bsr L2368 - bra L23C4 -L23C2 bsr L2415 -L23C4 lda ,y+ - cmpa #$0D - beq L23D8 - cmpa #$22 - bne L23C2 - cmpa ,y+ - beq L23C2 - leay -$01,y - lda #$FF -L23D6 bra L2415 -L23D8 lda #$29 -L23DA lbra L1DD6 -L23DD lda #$31 - bra L23DA -L23E1 ldx <u009E - lbsr L2528 - beq L23EF - stx <u00A1 - ldd ,x -L23EC lbra L236A -L23EF tst <u00A0 - bmi L23DD - ldx <u0062 - lbsr L2528 - bne L2401 - tst <u00A0 - bne L23DD - lbsr L2494 -L2401 ldd #$8500 - bsr L23EC - tfr x,d - subd <u0062 - std <u00A1 -L240C bsr L2415 - bsr L2413 - lda <u00A3 - rts -L2413 tfr b,a -L2415 pshs x,b,a - ldx <u00AB - sta ,x+ - stx <u00AB - ldd <u00AB - subd <u004A - cmpb #$FF - bcc L2428 - clra - puls pc,x,b,a -L2428 lda #$0D - lbsr L1CC1 - lbra L1CC7 -L2430 bsr L245D - pshs y - ldb #$02 - stb <u00A5 - clrb - bsr L2478 - bcs L2459 - leay $01,y -L243F incb - lda ,y+ - bsr L246A - bcc L243F - cmpa #$24 - bne L2451 - incb - leay $01,y - lda #$04 - sta <u00A5 -L2451 leay -$01,y - lda #$80 - ora -$01,y - sta -$01,y -L2459 stb <u00A6 - puls pc,y -L245D lda ,y+ - cmpa #$20 - beq L245D - cmpa #$0A - beq L245D - leay -$01,y - rts -L246A bsr L2478 - bcc L2493 -L246E cmpa #$30 - bcs L2493 - cmpa #$39 - bls L2491 - bra L248E -L2478 anda #$7F - cmpa #$41 - bcs L2493 - cmpa #$5A - bls L2491 - cmpa #$5F - beq L2493 - cmpa #$61 - bcs L2493 - cmpa #$7A - bls L2491 -L248E orcc #$01 - rts -L2491 andcc #$FE -L2493 rts -L2494 ldx <u0062 - ldd -$03,x - addd #$0001 - std -$03,x - ldb <u00A6 - clra - addd #$0003 - sty <u00A9 - bsr L24EE - pshs y - lda <u00A5 - clrb - std ,y++ - clr ,y+ - ldx <u00A9 -L24B3 lda ,x+ - sta ,y+ - bpl L24B3 - leay ,x - puls pc,x -L24BD pshs u,b,a - ldd <u000C - subd ,s - bcc L24CA - lda #$20 - lbra L1DD6 -L24CA std <u000C - ldd <u0066 - subd ,s - std <u0066 - ldu <u00DA - ldd <u00DA - subd ,s - std <u00DA - tfr d,y - ldd <u0066 - subd <u00DA - addd <u0068 - bsr L2508 - ldd <u0068 - addd ,s++ - std <u0068 - leax ,u - puls pc,u -L24EE pshs u,b,a - bsr L24BD - subd ,s - std <u0068 - leau ,x - leax $03,y - stx <u0062 - ldd <u0064 - bsr L2508 - addd ,s++ - std <u0064 - leax ,u - puls pc,u -L2508 pshs x,b,a - leax d,u - pshs x -L250E bitb #$03 - beq L251F - lda ,u+ - sta ,y+ - decb - bra L250E -L2519 pulu x,b,a - std ,y++ - stx ,y++ -L251F cmpu ,s - bcs L2519 - clr ,s++ - puls pc,x,b,a -L2528 lda #$20 -L252A pshs u,y,x,a - ldu -$03,x - ldb -$01,x -L2530 stx $01,s - cmpu #$0000 - beq L2558 - leau -u0001,u - ldy $03,s - leax b,x -L253F lda ,x+ - eora ,y+ - beq L2551 - cmpa ,s - beq L2551 - leax -$01,x -L254B lda ,x+ - bpl L254B - bra L2530 -L2551 tst -$01,x - bpl L253F - sty $03,s -L2558 puls pc,u,y,x,a - pshs x,b,a - ldb [<$04,s] - leax <L256A,pcr - ldd b,x - leax d,x - stx $04,s - puls pc,x,b,a -L256A ror <u00E6 - tim #$36,<u0001 - bvc L2572 - subd <u009D - fcb $1B - aim #$9D,<u001B - ror <u009D - fcb $1B - sexw -L257B jsr <u001E - lsl <u009D - exg d,w -L2581 asr <u0086 - oim #$FE,<u0001 - sta $02,x - aim #$03,<u00A9 - asr <u0007 - asr <u009F - asr <u009F - asr <u009F - asr <u0007 - asr <u009F - asr <u009F - asr <u009F - com <u00D3 - com <u00D1 - lsr <u0023 - lsr <u00AF - lsr <u00CA - lsr <u00E1 - lsr <u00F3 - eim #$8B,<u0005 - orb <u0005 - eorb $06,x - neg <u0006 - asr <u0006 - fcb $1B - ror <u001F - ror <u0023 - ror <u0040 - lsr <u002A - lsr <u0099 - lsr <u004B - tim #$0C,<u0004 - fcb $4B K - tim #$0C,<u0006 - ldx <u0007 - lda #$06 - andb $07,x - asr <u0007 - lda #$07 - lda #$07 - fcb $45 E - asr <u0045 - asr <u0061 - ror <u00E4 - asr <u0007 - asr <u006F - asr <u006F - asr <u0079 - asr <u0097 - asr <u0086 - asr <u0086 - asr <u0086 - asr <u009F - asr <u009F - oim #$47,<u0001 - asra - asr <u0007 - neg <u00DC - tim #$0C,<u000B - inc <u0001 - nega - oim #$97,<u0001 - sta <u0020 - bra L260A - neg <u0043 - nega - bvc L262E - neg <u0043 - coma - coma - coma - coma - coma - coma - eim #$00,<u0043 - coma - coma - neg <u0045 - neg <u0025 - neg <u0045 - neg <u0005 - neg <u0021 - brn L2669 - beq L264B - bhi L2648 - bhi L2688 - neg $01,s - fcb $87 - ora #$89 - adca #$81 - bita #$00 - suba #$81 - subb ,s+ - subb ,s+ - subb $0B,s - eim #$00,<u006C - inc $0C,s - tst $00,x - neg <u006D - neg <u0000 - jmp $00,x - neg <u0000 -L2648 jmp $00,x - neg <u0000 - tst $00,x - neg <u006D - neg <u0000 - tst <u0000 - neg <u0006 - neg <u0006 - neg <u0006 - neg <u0044 - lsra - ldd ,y - tst <u00D9 - bne L2675 - pshs b,a - leay -$01,y - ldd <u0060 -L2669 std <u00AB - ldd #$0003 - lbsr L2578 - puls b,a - bra L2677 -L2675 leay $02,y -L2677 lbsr L29DE - bcc L268E - std ,x - tfr y,d - subd <u005E - leax $02,x -L2684 ldu ,x - std ,x -L2688 leax ,u - bne L2684 - bra L2692 -L268E lda #$4B - bsr L26CE -L2692 leax >L2581,pcr - ldb ,y+ - bpl L269F - ldd #$03D1 - bra L26A9 -L269F lslb - clra - ldd d,x - cmpd #$03D1 - bcs L26BF -L26A9 tst <u00C7 - bne L26BF - inc <u00C7 - pshs b,a - tfr y,d - subd <u005E - subd #$0001 - ldu <u002F - std <u0015,u - puls b,a -L26BF jmp d,x - ldx <u002F - lda #$01 - sta <$17,x - ldb ,y+ - clra - leay d,y - rts -L26CE pshs y,x,b,a - ldx <u002F - lda #$01 - sta <$17,x - lda <u0084 - bmi L26FB - ldd $04,s - subd <u005E - leas -$05,s - leax ,s - bsr L26FD - lda #$20 - sta ,x+ - lda #$02 - leax ,s - ldy #$0005 - os9 I$Write - leas $05,s - ldb ,s - lbsr L2572 -L26FB puls pc,y,x,b,a -L26FD bsr L2701 - tfr b,a -L2701 pshs a - lsra - lsra - lsra - lsra - bsr L270D - puls a - anda #$0F -L270D adda #$30 - cmpa #$39 - bls L2715 - adda #$07 -L2715 sta ,x+ - rts -L2718 ldb ,y - bsr L2721 - bne L2720 -L271E leay $01,y -L2720 rts -L2721 cmpb #$3F - beq L2727 - cmpb #$3E -L2727 rts - lbsr L2F43 - ldb <u00CF - beq L2733 - lda #$4C - bsr L26CE -L2733 leay $04,y - lda #$40 - sta <u00CE - ldd <u00C1 - pshs b,a - clra - clrb - std <u00C1 - bsr L2787 - ldd <u00CC - subd <u0060 - beq L277A - addd #$0003 - cmpd <u000C - lbcc L2A0D - pshs y,x - lbsr L257B - ldd <u00C1 - leau ,y - std ,y++ - clr ,y+ - ldx <u0060 -L2762 ldd ,x++ - subd <u0062 - std ,y++ - inc u0002,u - cmpx <u00CC - bcs L2762 - tfr u,d - puls y,x - subd <u0066 - std $01,x - lda #$25 - sta ,x -L277A puls b,a - std <u00C1 - rts - lda #$80 - bra L2785 - lda #$60 -L2785 sta <u00CE -L2787 ldd <u0060 - pshs x,b,a - std <u00CC -L278D bsr L27E0 - ldb ,y+ - cmpb #$4B - beq L278D - cmpb #$4C - beq L279F - leay -$01,y - ldb #$01 - bra L27A3 -L279F lbsr L283A - clrb -L27A3 pshs y,b - ldx $03,s - ldd <u00CC - std $03,s - stx <u00CC - subd <u00CC - lslb - rola - addd $03,s - cmpd <u00DA - lbcc L2A0D - bra L27CE -L27BC ldu ,x++ - tst ,s - beq L27CB - lda ,u - sta <u00D1 - lbsr L3083 - std <u00D6 -L27CB lbsr L2878 -L27CE cmpx $03,s - bcs L27BC - ldd <u00CC - std $03,s - puls y,b - ldb ,y+ - cmpb #$51 - beq L278D - puls pc,x,b,a -L27E0 lbsr L2F43 - ldb <u00CF - beq L27FF - lda #$4C - lbsr L26CE - leay $03,y - ldb ,y - cmpb #$4D - bne L27FE - leay $01,y -L27F6 bsr L282E - ldb ,y+ - cmpb #$4B - beq L27F6 -L27FE rts -L27FF ldd <u00CC - addd #$000A - cmpd <u00DA - lbcc L2A0D - ldx <u00CC - ldd <u00D2 - std ,x++ - leau ,x - clr ,x+ - leay $03,y - ldb ,y - cmpb #$4D - bne L282B - leay $01,y -L281F bsr L282E - std ,x++ - inc ,u - ldb ,y+ - cmpb #$4B - beq L281F -L282B stx <u00CC - rts -L282E ldb ,y+ - clra - cmpb #$8D - beq L2837 - lda ,y+ -L2837 ldb ,y+ - rts -L283A lda ,y+ - cmpa #$85 - beq L285B - suba #$40 - sta <u00D1 - cmpa #$04 - bne L2856 - ldb ,y - cmpb #$4F - bne L2856 - leay $01,y - bsr L282E - leay $01,y - bra L2875 -L2856 lbsr L3083 - bra L2875 -L285B leay -$01,y - lbsr L2F43 - leay $03,y - ldb <u00CF - cmpb #$20 - beq L286D - lda #$18 - lbra L26CE -L286D ldd $01,x - std <u00D2 - ldx <u0066 - ldd d,x -L2875 std <u00D6 - rts -L2878 ldb ,x+ - beq L28D0 - pshs b - lslb - lslb - lslb - stb <u00D0 - lsrb - lsrb - leax b,x - addb #$04 - pshs u,x - lda <u00D1 - cmpa #$04 - bcs L2893 - addb #$02 -L2893 clra - cmpd <u000C - lbhi L2A0D - lbsr L257B - ldx ,s - leau $02,y - ldd #$0001 - std ,u++ -L28A7 ldd ,--x - std ,u++ - bsr L28F7 - dec $04,s - bne L28A7 - lda <u00D1 - cmpa #$04 - bls L28BC - ldd <u00D2 - std ,u - coma -L28BC ldd <u00D6 - bcs L28C2 - std ,u -L28C2 bsr L28F7 - tfr y,d - puls u,x - subd <u0066 - std u0001,u - leas $01,s - bra L28E0 -L28D0 stb <u00D0 - lda <u00D1 - cmpa #$04 - bhi L28DC - ldd <u00D6 - bra L28DE -L28DC ldd <u00D2 -L28DE std u0001,u -L28E0 lda <u00D1 - ora <u00D0 - ora <u00CE - sta ,u - pshs x - leax ,u - lbsr L2FEE - ldx <u00CC - stu ,x++ - stx <u00CC - puls pc,x -L28F7 pshs b,a - ldb $02,y - mul - bne L2923 - lda $01,s - ldb $02,y - mul - tsta - bne L2923 - stb $02,y - lda ,s - ldb $03,y - mul - tsta - bne L2923 - addb $02,y - bcs L2923 - stb $02,y - lda $01,s - ldb $03,y - mul - adda $02,y - bcs L2923 - std $02,y - puls pc,b,a -L2923 lda #$49 - lbsr L26CE - puls pc,b,a - ldu <u00CA - bne L2936 - tfr y,d - subd <u005E - std <u00C8 - bra L293C -L2936 tfr y,d - subd <u005E - std ,u -L293C lbsr L2D65 - lbsr L2E52 - ldb ,y+ - cmpb #$4B - beq L293C - sty <u00CA - ldd <u00C8 - std ,y++ - lbra L271E - leay -$01,y - bsr L2984 - leay $01,y - lbsr L2D65 - lbsr L2E52 - sta <u00D1 - lbsr L2E52 - cmpa <u00D1 - beq L2981 - cmpa #$02 - bhi L297E - beq L2971 - lda #$C8 - bra L2973 -L2971 lda #$CB -L2973 ldb <u00D1 - cmpb #$02 - bhi L297E - lbsr L2FBE - bra L2981 -L297E lbsr L2A26 -L2981 lbra L2718 -L2984 lda ,y - cmpa #$0E - lbne L2D65 - leay $01,y - lbsr L2D65 -L2991 lda -$03,y - cmpa #$85 - bcc L299F - ldd <u00D2 - subd <u0062 - std -$02,y - lda #$85 -L299F adda #$6D - sta -$03,y - rts - bsr L29A6 -L29A6 bsr L2A1A - leay $01,y - rts - ldb ,y+ - cmpb #$1E - beq L29C5 - leay -$01,y - bsr L29A6 - ldd ,y++ -L29B7 pshs b,a - leay $01,y - bsr L29CC - puls b,a - subd #$0001 - bne L29B7 - rts -L29C5 ldb ,y+ - lbsr L2721 - beq L29DD -L29CC ldd ,y - bsr L29DE - ldd $02,x - bcc L29D7 - sty $02,x -L29D7 std ,y - inc -$01,y - leay $03,y -L29DD rts -L29DE ldx <u0066 - pshs b,a - bra L29ED -L29E4 ldd ,x - anda #$7F - cmpd ,s - beq L2A08 -L29ED leax -$04,x - cmpx <u00DA - bcc L29E4 - ldd <u000C - subd #$0004 - bcs L2A0D - std <u000C - ldd ,s - ora #$80 - std ,x - clra - clrb - std $02,x - stx <u00DA -L2A08 lda ,x - rola - puls pc,b,a -L2A0D lda #$20 - sta <u0036 - lbsr L26CE - lbsr L30EB - lbra L2575 -L2A1A lbsr L2D65 - lbsr L2E52 - cmpa #$02 - beq L2A2B - bcs L29DD -L2A26 lda #$47 - lbra L26CE -L2A2B lda #$C8 - lbra L2FBE - lbsr L2BAF - lda $03,y - cmpa #$3A - beq L2A3E - lda #$10 - lbra L2BA8 -L2A3E pshs y - leay $04,y - bsr L29CC - tfr y,d - subd <u005E - std [,s++] - rts - ldd #$1002 - lbsr L2BDD - ldu $01,x - sty $01,x - leay $02,y - lbsr L2718 - tfr y,d - subd <u005E - std ,u - rts - ldd #$1001 - lbsr L2BDD - leay $01,y -L2A6A tfr y,d - subd <u005E - std [<$01,x] - lbra L2C01 - lbsr L2F43 - lbsr L2EE3 - cmpa #$60 - bne L2A88 - lda <u00D1 - cmpa #$01 - beq L2A94 - cmpa #$02 - beq L2A94 -L2A88 lda #$46 - lbsr L26CE - ldd #$FFFF - std <u00D2 - bra L2AA0 -L2A94 ldb <u00D0 - bne L2A88 - adda #$80 - sta ,y - ldd $01,x - std $01,y -L2AA0 ldx <u0044 - leax -$07,x - stx <u0044 - lda <u00D1 - sta ,x - ldd <u00D2 - subd <u0062 - std $01,x - clra - clrb - std $05,x - leay $04,y - bsr L2AF1 - bsr L2AD4 - std $03,x - lda ,y - cmpa #$47 - bne L2AC6 - bsr L2AD4 - std $05,x -L2AC6 leay $01,y - sty ,--x - lda #$13 - sta ,-x - stx <u0044 - leay $03,y -L2AD3 rts -L2AD4 ldd <u00C1 - pshs b,a - std $01,y - ldx <u0044 - lda ,x - leax >L307E,pcr - ldb a,x - clra - addd <u00C1 - std <u00C1 - leay $03,y - bsr L2AF1 - ldx <u0044 - puls pc,b,a -L2AF1 lbsr L2D65 - lbsr L2E52 - cmpa ,u - beq L2AD3 - cmpa #$02 - bcs L2B07 - lbne L2A26 - lda #$C8 - bra L2B09 -L2B07 lda #$CB -L2B09 lbra L2FBE - leay -$01,y - ldd #$130B - lbsr L2BDD - ldd $02,y - cmpd $04,x - beq L2B22 - lda #$46 - lbsr L26CE - bra L2B51 -L2B22 addd <u0062 - exg d,x - ldx $01,x - exg d,x - std $02,y - lda $03,x - anda #$02 - sta $01,y - ldd $06,x - std $04,y - ldd $08,x - std $06,y - beq L2B3E - inc $01,y -L2B3E ldu $01,x - tfr y,d - subd <u005E - addd #$0001 - std ,u - leau u0003,u - tfr u,d - subd <u005E - std $08,y -L2B51 leay $0B,y - lbsr L2C01 - leax $07,x - stx <u0044 - rts - leau -$01,y - pshs u - bsr L2BAF - puls b,a - std ,y - lda #$15 - bra L2BA8 - ldd #$1503 - bsr L2BDD - ldx $01,x - ldd ,x - subd <u005E - std ,y - leay $03,y - tfr y,d - subd <u005E - std ,x - lbra L2C01 - lda #$17 -L2B83 lbsr L271E - bra L2BD3 - bsr L2BAF - lda #$17 -L2B8C leay -$01,y - ldb #$03 - bsr L2BDD - ldd $01,x - subd <u005E - std $01,y - leay $04,y - bra L2C01 - lda #$19 - bra L2B83 - lda #$19 - bra L2B8C - bsr L2BAF - lda #$1B -L2BA8 bsr L2BD3 - leay $03,y - lbra L2718 -L2BAF lbsr L2D65 - lbsr L2E52 - cmpa #$03 - beq L2BBE - lda #$47 - lbsr L26CE -L2BBE leay $01,y - rts - ldd #$1B03 - bsr L2BDD - leau ,y - leay $03,y - lbsr L2A6A - stu ,--x - lda #$1C - bra L2BD8 -L2BD3 ldx <u0044 - sty ,--x -L2BD8 sta ,-x - stx <u0044 - rts -L2BDD pshs a - ldx <u0044 - bra L2BE5 -L2BE3 leax $03,x -L2BE5 cmpx <u0046 - bcc L2BF3 - lda ,x - cmpa #$1C - beq L2BE3 - cmpa ,s - beq L2BFF -L2BF3 leas $03,s - lda #$45 - lbsr L26CE - leay b,y - lbra L2718 -L2BFF puls pc,a -L2C01 ldx <u0044 - bra L2C14 -L2C05 lda ,x - cmpa #$1C - bne L2C1A - tfr y,d - subd <u005E - std [<$01,x] - leax $03,x -L2C14 cmpx <u0046 - bcs L2C05 - bra L2C1C -L2C1A leax $03,x -L2C1C stx <u0044 - rts - leay -$01,y - lbsr L2F43 - lda <u00CF - beq L2C41 - cmpa #$A0 - beq L2C4E - cmpa #$60 - bcs L2C3A - lda <u00D0 - bne L2C3A - lda <u00D1 - cmpa #$04 - beq L2C4E -L2C3A lda #$4C - lbsr L26CE - bra L2C4E -L2C41 lda #$A0 - sta ,x - ldd <u00C5 - std $01,x - addd #$0002 - std <u00C5 -L2C4E leay $03,y - ldb ,y+ - cmpb #$4D - bne L2C64 -L2C56 lbsr L2984 - lbsr L2E52 - ldb ,y+ - cmpb #$4B - beq L2C56 - leay $01,y -L2C64 rts - bsr L2CB2 - leay -$01,y - cmpb #$90 - bne L2C72 - lbsr L2D0B - leay $01,y -L2C72 lbsr L2984 - lbsr L2E52 - cmpa #$05 - bcs L2C81 - lda #$4D - lbsr L26CE -L2C81 lda ,y+ - cmpa #$4B - beq L2C72 - rts - bsr L2CB2 - cmpb #$49 - bne L2C92 - bsr L2D0B -L2C90 ldb ,y+ -L2C92 cmpb #$4B - beq L2C90 - cmpb #$51 - beq L2C90 - lbsr L2721 - beq L2CC5 - leay -$01,y - lbsr L2D65 - lbsr L2E52 - cmpa #$05 - bcs L2C90 - lda #$47 - lbsr L26CE - bra L2C90 -L2CB2 ldb ,y+ - cmpb #$54 - bne L2CC5 - lbsr L2A1A -L2CBB ldb ,y+ - cmpb #$4B - beq L2CBB - cmpb #$51 - beq L2CBB -L2CC5 rts - leay $01,y - lbsr L2984 - lbsr L2E52 - cmpa #$01 - beq L2CD5 - lbsr L2A26 -L2CD5 leay $01,y - bsr L2D0B - lda ,y+ - cmpa #$4A - bne L2CE1 - leay $02,y -L2CE1 rts - bsr L2D02 - bsr L2D65 - lbsr L2E52 - cmpa #$42 - bls L2D20 - lbra L2A26 - bsr L2D02 - lbsr L2984 - lbsr L2E52 - bra L2D20 -L2CFA bsr L2D02 - cmpb #$4B - beq L2CFA - bra L2D20 -L2D02 leay $01,y - lbra L29A6 - bsr L2D0B - bra L2D20 -L2D0B bsr L2D65 - lbsr L2E52 - cmpa #$04 - beq L2D17 - lbsr L2A26 -L2D17 rts - ldb ,y+ - cmpb #$3A - lbeq L29CC -L2D20 lbra L2718 -L2D23 cmpb #$96 - bcc L2D2C - lbsr L2E5F - bra L2D65 -L2D2C cmpb #$F2 - lbcc L308D - subb #$96 - leax >L2601,pcr - leax b,x - ldb ,x - lbeq L308D - andb #$1F - beq L2D4A - leau <L2DA2,pcr - lslb - jsr b,u -L2D4A ldb ,x - andb #$E0 - beq L2D60 - clra - rolb - rola - rolb - rola - rolb - rola - cmpa #$07 - bne L2D60 - lbsr L2FD4 - bra L2D65 -L2D60 lbsr L2E3B - leay $01,y -L2D65 ldb ,y - bmi L2D23 - rts -L2D6A bsr L2D6F - incb - bra L2D71 -L2D6F ldb #$C8 -L2D71 lbsr L2E52 - cmpa #$02 - bcs L2D85 - beq L2D7E - bsr L2DC3 - bra L2D83 -L2D7E tfr b,a - lbsr L2FBE -L2D83 lda #$01 -L2D85 rts -L2D86 bsr L2D8B - incb - bra L2D8D -L2D8B ldb #$CB -L2D8D lbsr L2E52 - cmpa #$02 - beq L2DA1 - bcs L2D9A - bsr L2DC3 - bra L2D9F -L2D9A tfr b,a - lbsr L2FBE -L2D9F lda #$02 -L2DA1 rts -L2DA2 bra L2DC0 - bra L2D6F - bra L2D6A - bra L2D8B - bra L2D86 - bra L2DDE - bra L2DC8 - bra L2DF4 - bra L2DF2 - bra L2DFF - bra L2E04 - bra L2E30 - bra L2E2E - bra L2E13 - bra L2E09 -L2DC0 lbra L308D -L2DC3 lda #$43 - lbra L26CE -L2DC8 bsr L2DE7 - pshs a - bsr L2DE7 - cmpa ,s+ - beq L2DE0 - lda #$CB - bcc L2DD7 - inca -L2DD7 lbsr L2FBE - lda #$02 - bra L2DE4 -L2DDE bsr L2DE7 -L2DE0 cmpa #$02 - bne L2DE6 -L2DE4 inc ,y -L2DE6 rts -L2DE7 bsr L2E52 - cmpa #$02 - bls L2DF1 - bsr L2DC3 - lda #$02 -L2DF1 rts -L2DF2 bsr L2DF4 -L2DF4 bsr L2E52 - cmpa #$04 - beq L2DFE - bsr L2DC3 - lda #$04 -L2DFE rts -L2DFF lbsr L2D6F - bra L2DF4 -L2E04 lbsr L2D6A - bra L2DF4 -L2E09 lda #$03 - bsr L2E20 - bne L2E13 - ldb #$03 - bra L2E1B -L2E13 lda #$04 - bsr L2E20 - bne L2DC8 - ldb #$02 -L2E1B addb ,y - stb ,y - rts -L2E20 ldu <u0044 - cmpa ,u+ - bne L2E2D - cmpa ,u+ - bne L2E2D - stu <u0044 - clrb -L2E2D rts -L2E2E bsr L2E30 -L2E30 bsr L2E52 - cmpa #$03 - beq L2E3A - bsr L2DC3 - lda #$03 -L2E3A rts -L2E3B cmpa #$00 - bne L2E41 - lda #$01 -L2E41 ldu <u0044 - cmpa #$05 - bne L2E4D - ldd <u00D4 - std ,--u - lda #$05 -L2E4D sta ,-u - stu <u0044 - rts -L2E52 ldu <u0044 - lda ,u+ - cmpa #$05 - bne L2E5C - leau u0002,u -L2E5C stu <u0044 - rts -L2E5F cmpb #$85 - lbcs L308D - cmpb #$89 - bcs L2EAB - subb #$8D - lbcs L2F07 - leau <L2E75,pcr - lslb - jmp b,u -L2E75 bra L2E87 - bra L2E89 - bra L2E8F - bra L2E95 - bra L2E89 - bra L2E9F - bra L2EA8 - bra L2E9F - bra L2EA8 -L2E87 leay -$01,y -L2E89 leay $03,y - lda #$01 - bra L2E3B -L2E8F leay $06,y - lda #$02 - bra L2E3B -L2E95 ldb ,y+ - cmpb #$FF - bne L2E95 - lda #$04 - bra L2E3B -L2E9F lbsr L2991 - bsr L2E52 - lda #$01 - bsr L2E3B -L2EA8 leay $01,y - rts -L2EAB lbsr L2F43 - bsr L2EE3 - cmpa #$60 - beq L2EBF - cmpa #$80 - beq L2EBF - lda #$12 - lbsr L26CE - bra L2EDC -L2EBF ldb #$85 - lbsr L2F5E - ldb ,y - cmpb #$85 - bne L2EDC - ldb <u00CF - cmpb #$60 - bne L2EDC - cmpa #$05 - bcc L2EDC - adda #$80 - sta ,y - ldd $01,x - std $01,y -L2EDC lda <u00D1 - leay $03,y - lbra L2E3B -L2EE3 lda <u00CF - cmpa #$00 - bne L2F06 - ldd #$0060 - sta <u00D0 - stb <u00CF - lda #$60 - ora <u00D1 - sta ,x - anda #$07 - cmpa #$04 - bne L2F01 - ldd #$0020 - std $01,x -L2F01 lbsr L2FEE - lda <u00CF -L2F06 rts -L2F07 bsr L2F43 - ldb #$89 - bsr L2F5E - lbsr L2E52 - cmpa #$05 - beq L2F19 - ldu #$FFFF - bra L2F1B -L2F19 ldu -u0002,u -L2F1B pshs u - bsr L2EDC - puls u - cmpu #$FFFF - beq L2F3E - ldb u0002,u - stb <u00D6 - ldd <u00D2 - subd <u0062 - leau u0003,u -L2F31 cmpd ,u++ - beq L2F5D - dec <u00D6 - bne L2F31 - lda #$14 - bra L2F40 -L2F3E lda #$42 -L2F40 lbra L26CE -L2F43 ldd $01,y - addd <u0062 - std <u00D2 - ldx <u00D2 -L2F4B lda ,x - anda #$E0 - sta <u00CF - lda ,x - anda #$18 - sta <u00D0 - lda ,x - anda #$07 - sta <u00D1 -L2F5D rts -L2F5E pshs b - ldb ,y - subb ,s+ - bne L2F73 - tst <u00D0 - beq L2F9D - lda #$05 - sta <u00D1 - ldd #$FFFF - bra L2FB9 -L2F73 lslb - lslb - lslb - cmpb <u00D0 - beq L2F7F - lda #$41 - lbsr L26CE -L2F7F lda #$C8 - sta <u00D8 -L2F83 lbsr L2E52 - cmpa #$02 - bcs L2F97 - beq L2F93 - lda #$47 - lbsr L26CE - bra L2F97 -L2F93 lda <u00D8 - bsr L2FBE -L2F97 inc <u00D8 - subb #$08 - bne L2F83 -L2F9D lda <u00D1 - cmpa #$05 - bne L2FBD - ldd $01,x - addd <u0066 - tfr d,u - ldb <u00D0 - beq L2FB5 - lsrb - lsrb - addb #$04 - ldd b,u - bra L2FB7 -L2FB5 ldd u0002,u -L2FB7 addd <u0066 -L2FB9 std <u00D4 - lda <u00D1 -L2FBD rts -L2FBE pshs x,b - ldx <u000C - cmpx #$0010 - lbls L2A0D - ldx <u0060 - sta ,x+ - stx <u00AB - clrb - bsr L2FDA - puls pc,x,b -L2FD4 ldd <u0060 - std <u00AB - ldb #$01 -L2FDA clra - lbra L2578 -L2FDE neg <u0049 - neg <u005C - neg <u0060 - neg <u006A - neg <u0066 - neg <u0072 - neg <u0072 - neg <u0076 -L2FEE pshs u,y,x - leay <L2FDE,pcr - ldb ,x - andb #$E0 - cmpb #$60 - beq L3005 - cmpb #$40 - beq L3005 - cmpb #$80 - bne L3025 - leay $08,y -L3005 ldb ,x - andb #$18 - beq L300F - ldd $06,y - bra L3023 -L300F ldb ,x - andb #$07 -L3013 cmpb #$04 - bcs L3021 - bhi L301D - ldd $02,y - bra L3023 -L301D ldd $04,y - bra L3023 -L3021 ldd ,y -L3023 jsr d,y -L3025 puls pc,u,y,x - lda ,x - anda #$07 - leay $01,x - bsr L3083 -L302F pshs b,a - ldd <u00C1 - std ,y - addd ,s++ - std <u00C1 - rts - bsr L3069 - bra L302F - bsr L3069 - addd <u0066 - tfr d,x - ldd ,x - bra L302F - bsr L3060 - bra L302F - leay $01,x -L304E ldd <u00C3 - std ,y - addd #$0004 - std <u00C3 - rts - bsr L3069 - bra L304E - bsr L3060 - bra L304E -L3060 ldd $01,x - addd <u0066 - tfr d,y - ldd $02,y - rts -L3069 ldd #$0004 - lbsr L257B - ldx $04,s - ldd $01,x - std $02,y - tfr y,d - subd <u0066 - std $01,x - ldd $02,y - rts -L307E oim #$02,<u0005 - oim #$20,<u0034 - addr a,0 - ldb >$E686 - clra - puls pc,x -L308D ldy <u0060 - lda #$30 - lbra L26CE -L3095 oim #$02,<u0003 - asr <u0008 - rol <u0037 - fcb $38 8 - fcb $3E > - swi - fcb $FF - ldd #$0016 - std <u00C1 - clrb - std <u00C3 - std <u00C5 - sta <u00C7 - std <u00C8 - std <u00CA - ldx <u002F - sta <$17,x - std <$15,x - ldy <u005E - bra L30E2 -L30BD pshs y - lbsr L2692 - puls x - ldb <u00D9 - bne L30E2 - lda ,x - leau <L3095,pcr -L30CD cmpa ,u+ - bcs L30E2 - bne L30CD - pshs x - tfr y,d - subd ,s++ - leay ,x - ldu <u004A - stu <u00AB - lbsr L2578 -L30E2 ldx <u0060 - clr ,x - cmpy <u0060 - bcs L30BD -L30EB ldx <u0066 - bra L310B -L30EF lda ,x - bpl L310B - anda #$7F - sta ,x - ldy $02,x -L30FA ldu ,y - ldd ,x - std ,y - dec -$01,y - lda #$4A - lbsr L26CE - leay ,u - bne L30FA -L310B leax -$04,x - cmpx <u00DA - bcc L30EF - ldd <u0066 - subd <u00DA - addd <u000C - std <u000C - ldx <u0044 - bra L3131 -L311D ldy $01,x - lda #$45 - lbsr L26CE - lda ,x - cmpa #$13 - bne L312D - leax $07,x -L312D leax $03,x - stx <u0044 -L3131 cmpx <u0046 - bcs L311D - ldu <u0066 - ldy <u0060 - ldd <u0064 - addd <u0068 - lbsr L257E - ldx <u002F - ldd <u00C8 - std <$13,x - ldd <u00C1 - std <$11,x - addd <u00C5 - std <u00C5 - std $0B,x - ldb <$18,x - clra - addd #$0019 - std $09,x - addd <u0060 - subd <u005E - std $0F,x - addd <u0068 - addd #$0003 - std $0D,x - subd #$0003 - addd <u0064 - std $02,x - addd <u002F - std <u004A - subd <u0008 - std <u000A - ldd <u002F - addd $0D,x - std <u0062 - ldd <u002F - addd $0F,x - std <u0066 - ldu <u0062 - bra L31E2 -L3188 leax ,u - lbsr L2F4B - lda <u00CF - cmpa #$60 - bcs L31BD - cmpa #$A0 - bne L319F - ldd $01,x - addd <u00C1 - std $01,x - bra L31DC -L319F cmpa #$80 - bne L31BD - ldb <u00D0 - bne L31B1 - lda <u00D1 - cmpa #$04 - bcc L31B1 - leax u0001,u - bra L31B7 -L31B1 ldd u0001,u - addd <u0066 - tfr d,x -L31B7 ldd ,x - addd <u00C5 - std ,x -L31BD lda <u00D1 - cmpa #$05 - bne L31DC - ldb <u00D0 - beq L31CD - lsrb - lsrb - addb #$04 - bra L31CF -L31CD ldb #$02 -L31CF clra - addd u0001,u - ldx <u0066 - leay d,x - ldd ,y - ldd d,x - std ,y -L31DC leau u0003,u -L31DE lda ,u+ - bpl L31DE -L31E2 cmpu <u004A - bcs L3188 - rts - pshs x,b,a - ldb [<$04,s] - leax <L31F8,pcr - ldd b,x - leax d,x - stx $04,s - puls pc,x,b,a -L31F8 dec <u0007 - neg <u00E5 - rol <u0067 - lsl <u0003 - oim #$B6,<u0008 - oim #$08,>$7B9D - fcb $1B - ror <u009D - fcb $1B - inc <u009D - fcb $1B - jmp <u009D - fcb $1B - aim #$9D,<u001B - neg <u009D - fcb $1B - dec <u009D - fcb $1B - fcb $10 -L321B jsr <u001E - ror <u009D - beq L3225 -L3221 jsr <u0027 - dec <u009D -L3225 beq L3229 -L3227 jsr <u0027 -L3229 inc <u009D - beq L323B -L322D jsr <u0027 - neg <u009D - bpl L3235 -L3233 jsr <u001B -L3235 fcb $18 -L3236 jsr <u001B - lbra LCF56 -L323B orcc #$9D - fcb $1B - andcc #$08 - nop - lsl <u0012 - lsl <u0012 - lsl <u0012 - lsl <u0012 - com <u00A0 - com <u00B1 - lsl <u002A - lsl <u0034 - com <u00B4 - lsl <u001E - lsl <u0022 - com <u00DA - oim #$6F,<u0002 - ldu $03,x - subd <u0001 - tst >$018D - oim #$94,<u0002 - ldx $01,x - eora $01,x - sta <u0001 - bsr L326F - clr $01,x - sta <u0001 - clr $01,x - bsr L3277 - sta <u0001 - bsr L327D - addd >$07B8 -L327D lsl <u001A - oim #$8D,<u0008 - orcc #$03 - ora >$084B - rol <u00B4 - lsr <u00AF - ror <u0017 - asr <u003E - asr <u004B - lsr <u0049 - lsr <u0052 - lsr <u0080 - eim #$8C,<u0006 - subd $06,x - eorb <u0006 - stu <u0007 - tim #$07,<u0018 - asr <u0031 - asr <u0061 - asr <u007D - asr <u00FE - lsl <u0001 - lsl <u0009 - lsl <u0009 - oim #$58,<u0001 - tst $01,x - tst $08,x - clr <u0008 - orcc #$01 - inc $01,x - inc $03,x - nop - com <u0021 - com <u0030 - com <u0012 - com <u0049 - com <u007C -L32CB comb - lsrb - clra - negb - bra L3316 - jmp $03,s - clr -$0B,s - jmp -$0C,s - eim #$72,$05,s - lsr $0A,x - stu >$A688 - lbsr LB7E3 - beq L32E8 - ldb #$33 - bra L3304 -L32E8 tfr s,d - subd #$0100 - cmpd <u0080 - bcc L32F6 - ldb #$39 - bra L3304 -L32F6 ldd <u000C - subd $0B,x - bcs L3302 - cmpd #$0100 - bcc L3307 -L3302 ldb #$20 -L3304 lbra L39FB -L3307 std <u000C - tfr y,d - subd $0B,x - exg d,u - sts u0005,u - std u0007,u - stx u0003,u -L3316 ldd #$0001 - std <u0042 - sta u0001,u - sta <u0013,u - stu <u0014,u - bsr L3351 - ldd <$13,x - beq L332C - addd <u005E -L332C std <u0039 - ldd $0B,x - leay d,u - pshs y - ldd <$11,x - leay d,u - clra - clrb - bra L333F -L333D std ,y++ -L333F cmpy ,s - bcs L333D - leas $02,s - ldx <u002F - ldd <u005E - addd <$15,x - tfr d,x - bra L3391 -L3351 stx <u002F - stu <u0031 - ldd $0D,x - addd <u002F - std <u0062 - ldd $0F,x - addd <u002F - std <u0066 - std <u0060 - ldd $09,x - addd <u002F - std <u005E - ldd <u0014,u - std <u0046 - std <u0044 - rts -L3371 stx <u005C - lda <u0034 - beq L338F - bpl L3382 - anda #$7F - sta <u0034 - lbsr L3233 - lda <u0034 -L3382 rora - bcc L338F - leay ,x - lbsr L3218 - clr <u0074 - lbsr L3236 -L338F bsr L33AE -L3391 cmpx <u0060 - bcs L3371 - bra L33A1 - ldb ,x - lbsr L384F - beq L33A1 - lbsr L3856 -L33A1 lbsr L3A73 - ldu <u0031 - lds u0005,u - ldu u0007,u -L33AB rts - leax $02,x -L33AE ldb ,x+ - bpl L33B4 - addb #$40 -L33B4 lslb - clra - ldu <u000E - ldd d,u - jmp d,u - jsr <u0016 - tst $02,y - beq L33CC - leax $03,x - ldb ,x - cmpb #$3B - bne L33AB - leax $01,x -L33CC ldd ,x - addd <u005E - tfr d,x - rts - leax $01,x - rts - jsr <u0016 - tst $02,y - beq L33CC - leax $03,x - rts -L33DF neg <u0026 - neg <u003F - neg <u007B - neg <u00C6 - leay <L33DF,pcr -L33EA ldb ,x+ - lslb - ldd b,y - ldu <u0031 - jmp d,y - ldd ,x - leay d,u - bra L3410 - ldd ,x - leay d,u - ldd $04,x - lda d,u - bpl L3410 - bra L3430 - ldd ,x - leay d,u - ldd ,y - addd #$0001 - std ,y -L3410 ldd $02,x - leax $06,x - ldd d,u - cmpd ,y - bge L33CC - leax $03,x - rts - ldd ,x - leay d,u - ldd $04,x - ldd d,u - pshs a - addd ,y - std ,y - tst ,s+ - bpl L3410 -L3430 ldd $02,x - leax $06,x - ldd d,u - cmpd ,y - ble L33CC - leax $03,x - rts - ldy <u0046 - clrb - bsr L348E - bra L347E - ldy <u0046 - clrb - bsr L348E - ldd $04,x - addd #$0004 - ldu <u0031 - lda d,u - lsra - bcc L347E - bra L34CC - ldy <u0046 - clrb - bsr L348E - leay -$06,y - ldd #$0180 - std $01,y - clra - clrb - std $03,y - sta $05,y - lbsr L321E - bsr L34DC - ldd $01,y - std ,u - ldd $03,y - std u0002,u - lda $05,y - sta u0004,u -L347E ldb #$02 - bsr L348E - leax $06,x - lbsr L3221 - lble L33CC - leax $03,x - rts -L348E ldd b,x - addd <u0031 - tfr d,u - leay -$06,y - lda #$02 - ldb ,u - std ,y - ldd u0001,u - std $02,y - ldd u0003,u - std $04,y - rts - ldy <u0046 - clrb - bsr L348E - stu <u00D2 - ldb #$04 - bsr L348E - lda u0004,u - sta <u00D1 - lbsr L321E - bsr L34DC - ldu <u00D2 - ldd $01,y - std ,u - ldd $03,y - std u0002,u - lda $05,y - sta u0004,u - lsr <u00D1 - bcc L347E -L34CC ldb #$02 - bsr L348E - leax $06,x - lbsr L3221 - lbge L33CC - leax $03,x -L34DB rts -L34DC ldb <u0034 - bitb #$01 - beq L34DB - lbra L323C -L34E5 stu >$0EFF - sexw - stu >$59FF - oim #$E6,,x+ - cmpb #$82 - beq L3515 - bsr L3560 - bsr L3508 - ldb -$01,x - cmpb #$47 - bne L34FF - bsr L3508 -L34FF lbsr L33CC - leay <L34E5,pcr - lbra L33EA -L3508 ldd ,x++ - addd <u0031 - pshs b,a - jsr <u0016 - ldd $01,y - std [,s++] - rts -L3515 bsr L356F - bsr L3523 - ldb -$01,x - cmpb #$47 - bne L34FF - bsr L3523 - bra L34FF -L3523 ldd ,x++ - addd <u0031 - pshs b,a - jsr <u0016 - bra L3579 - jsr <u0016 -L352F cmpa #$04 - bcs L3537 - pshs u - ldu <u003E -L3537 pshs u,a - leax $01,x - jsr <u0016 -L353D puls a - lsla - leau <L3545,pcr - jmp a,u -L3545 bra L355B - bra L356A - bra L3579 - bra L355B - bra L359C - bra L35C1 - ldd ,x - addd <u0031 - pshs b,a - leax $03,x - jsr <u0016 -L355B ldb $02,y - stb [,s++] - rts -L3560 ldd ,x - addd <u0031 - pshs b,a - leax $03,x - jsr <u0016 -L356A ldd $01,y - std [,s++] - rts -L356F ldd ,x - addd <u0031 - pshs b,a - leax $03,x - jsr <u0016 -L3579 puls u - ldd $01,y - std ,u - ldd $03,y - std u0002,u - lda $05,y - sta u0004,u - rts - ldd ,x - addd <u0066 - tfr d,u - ldd ,u - addd <u0031 - pshs b,a - ldd u0002,u - pshs b,a - leax $03,x - jsr <u0016 -L359C puls u,b,a - tstb - bne L35A2 - deca -L35A2 sta <u003E - ldy $01,y - sty <u0048 -L35AA lda ,y+ - sta ,u+ - cmpa #$FF - beq L35B9 - decb - bne L35AA - dec <u003E - bpl L35AA -L35B9 clra - rts - lbsr L3224 - lbra L352F -L35C1 puls u,b,a - cmpd $03,y - bls L35CA - ldd $03,y -L35CA ldy $01,y - exg y,u - lbra L321B - jsr <u0016 - ldd $01,y - pshs b,a - jsr <u0016 - ldb $02,y - stb [,s++] - rts - lbsr L3856 - lda <u002E - sta <u007F - leax >L32CB,pcr - lbsr L375F - lbra L3206 - lbra L3209 - lbsr L3856 - lbra L3233 - ldd ,x - leax $03,x -L35FD ldy <u0031 - ldu <$14,y - cmpu <u004A - bhi L360D - ldb #$35 - lbra L39FB -L360D stx ,--u - stu <$14,y - stu <u0046 - addd <u005E - tfr d,x - rts - ldy <u0031 - cmpy <$14,y - bhi L3627 - ldb #$36 - lbra L39FB -L3627 ldu <$14,y - ldx ,u++ - stu <$14,y - stu <u0046 - rts - ldd ,x - cmpa #$1E - beq L366D - jsr <u0016 - ldd ,x - lslb - rola - lslb - rola - addd #$0002 - leau d,x - pshs u - ldd $01,y - ble L366B - cmpd ,x++ - bhi L366B - subd #$0001 - lslb - rola - lslb - rola - addd #$0001 - ldd d,x - pshs b,a - ldb ,x - cmpb #$22 - puls x,b,a - beq L35FD - addd <u005E - tfr d,x - rts -L366B puls pc,x -L366D ldu <u0031 - cmpb #$20 - bne L3682 - ldd $02,x - addd <u005E - std <u0011,u - lda #$01 - sta <u0013,u - leax $05,x - rts -L3682 clr <u0013,u - leax $02,x - rts - bsr L36A6 - ldb #$0B - os9 I$Create - bra L3696 - bsr L36A6 - os9 I$Open -L3696 lbcs L39FB - puls u,b - cmpb #$01 - bne L36A2 - clr ,u+ -L36A2 sta ,u - puls pc,x -L36A6 leax $01,x - lbsr L3779 - leax $01,x - jsr <u0016 - lda #$03 - cmpb #$4A - bne L36B7 - lda ,x++ -L36B7 ldu $03,s - stx $03,s - ldx $01,y - jmp ,u - lbsr L37B6 - jsr <u0016 - ldb #$0E - lbsr L3230 - lbcs L39FD - rts -L36CE swi - fcb $20 - stu >$2A2A - bra L371E - jmp -$10,s - eim #$74,>$2065 - aim #$72,>$6F72 - bra L370E - bra L3755 - eim #$65,$0E,s - lsr >$6572 - bra L3715 - bpl L36FA - stu >$962E - lbsr L37B6 - lda #$2C - sta <u00DD - pshs x -L36F9 ldx ,s - ldb ,x - cmpb #$90 - bne L3709 - jsr <u0016 - pshs x - ldx $01,y - bra L370E -L3709 pshs x - leax <L36CE,pcr -L370E bsr L375F - puls x - lda <u007F - cmpa <u002E - bne L371C - lda <u002D - sta <u007F -L371C ldb #$06 -L371E lbsr L3230 - bcc L3730 - cmpb #$03 - lbne L39FD - lbsr L3A23 - clr <u0036 - bra L36F9 -L3730 bsr L3743 - bcc L373B - leax <L36D1,pcr - bsr L375F - bra L36F9 -L373B ldb ,x+ - cmpb #$4B - beq L3730 - puls pc,b,a -L3743 bsr L3779 - ldb ,s - addb #$07 - ldy <u0046 - lbsr L3230 - lbcc L353D - lda ,s -L3755 cmpa #$04 - bcs L375B - leas $02,s -L375B leas $03,s - coma - rts -L375F pshs y - leas -$06,s - leay ,s - stx $01,y - ldd <u0080 - std <u0082 - ldb #$05 - lbsr L3230 - ldb #$00 - lbsr L3230 - leas $06,s - puls pc,y -L3779 lda ,x+ - cmpa #$0E - bne L3783 - jsr <u0016 - bra L37A8 -L3783 suba #$80 - cmpa #$04 - bcs L379E - beq L3790 - lbsr L3224 - bra L37A8 -L3790 ldd ,x++ - addd <u0066 - tfr d,u - ldd u0002,u - std <u003E - ldd ,u - bra L37A0 -L379E ldd ,x++ -L37A0 addd <u0031 - tfr d,u - lda -$03,x - suba #$80 -L37A8 puls y - cmpa #$04 - bcs L37B2 - pshs u - ldu <u003E -L37B2 pshs u,a - jmp ,y -L37B6 ldb ,x - cmpb #$54 - bne L37C8 - leax $01,x - jsr <u0016 - cmpb #$4B - beq L37C6 - leax -$01,x -L37C6 lda $02,y -L37C8 sta <u007F - rts - ldb ,x - cmpb #$54 - bne L37F5 - bsr L37B6 - clr <u00DD - cmpb #$4B - bne L37DB - leax -$01,x -L37DB ldb #$06 - lbsr L3230 - bcc L37EE - cmpb #$E4 - beq L37DB -L37E6 lbra L39FD -L37E9 lbsr L3743 - bcs L37E6 -L37EE ldb ,x+ - cmpb #$4B - beq L37E9 - rts -L37F5 bsr L384F - beq L3832 -L37F9 bsr L3802 - ldb ,x+ - cmpb #$4B - beq L37F9 - rts -L3802 lbsr L3779 - bsr L3834 - lda ,s - bne L380C - inca -L380C cmpa ,y - lbeq L353D - cmpa #$02 - bcs L381C - beq L3828 -L3818 ldb #$47 - bra L383C -L381C lda ,y - cmpa #$02 - bne L3818 - lbsr L3227 - lbra L353D -L3828 cmpa ,y - bcs L3818 - lbsr L322A - lbra L353D -L3832 leax $01,x -L3834 pshs x - ldx <u0039 - bne L383F - ldb #$4F -L383C lbra L39FB -L383F jsr <u0016 - cmpb #$4B - beq L384B - ldd ,x - addd <u005E - tfr d,x -L384B stx <u0039 - puls pc,x -L384F cmpb #$3F - beq L3855 - cmpb #$3E -L3855 rts -L3856 lda <u002E - lbsr L37B6 - ldd <u0080 - std <u0082 - ldb ,x+ - cmpb #$49 - beq L38A3 -L3865 bsr L384F - beq L388B -L3869 cmpb #$4B - beq L387F - cmpb #$51 - beq L3883 - leax -$01,x - jsr <u0016 - ldb ,y - addb #$01 - bsr L389B - ldb -$01,x - bra L3865 -L387F ldb #$0D - bsr L389B -L3883 ldb ,x+ - bsr L384F - bne L3869 - bra L388F -L388B ldb #$0C - bsr L389B -L388F ldb #$00 - bsr L389B - lda <u00DE - clr <u00DE - tsta - bne L38A0 -L389A rts -L389B lbsr L3230 - bcc L389A -L38A0 lbra L39FD -L38A3 jsr <u0016 - ldd <u004A - std <u008E - std <u008C - ldu <u0046 - pshs u,b,a - clr <u0094 - ldd <u0048 - std <u004A -L38B5 ldb -$01,x - bsr L384F - beq L38D7 - ldb ,x+ - bsr L384F - beq L38D2 - leax -$01,x - ldb #$11 - lbsr L3230 - bcc L38B5 - puls u,b,a - std <u004A - stu <u0046 - bra L38A0 -L38D2 leay <L388F,pcr - bra L38DA -L38D7 leay <L388B,pcr -L38DA puls u,b,a - std <u004A - stu <u0046 - jmp ,y - lda <u002E - lbsr L37B6 - ldu <u0080 - stu <u0082 - ldb ,x+ - lbsr L384F - beq L3914 - cmpb #$4B - beq L3902 - leax -$01,x - bra L3902 -L38FA clra - ldb #$12 - lbsr L3230 - bcs L38A0 -L3902 jsr <u0016 - ldb ,y - addb #$01 - lbsr L3230 - bcs L38A0 - ldb -$01,x - lbsr L384F - bne L38FA -L3914 lbra L388B - bsr L392A - os9 I$Read - bra L3923 - bsr L392A - os9 I$Write -L3923 leax ,u - bcc L3949 -L3927 lbra L39FB -L392A lbsr L37B6 - lbsr L3779 - leau ,x - puls a - cmpa #$04 - bcc L3943 - leax >L3B5B,pcr - ldb a,x - clra - tfr d,y - bra L3945 -L3943 puls y -L3945 puls x - lda <u007F -L3949 rts -L394A lbsr L37B6 - os9 I$Close - bcs L3927 - cmpb #$4B - beq L394A - rts - ldb ,x+ - cmpb #$3B - beq L3967 - ldu <u002F - ldd <u0013,u -L3962 addd <u005E - std <u0039 - rts -L3967 ldd ,x - addd #$0001 - leax $03,x - bra L3962 - jsr <u0016 - pshs x - ldx $01,y - os9 I$Delete -L3979 bcs L3927 - puls pc,x - jsr <u0016 - lda #$03 -L3981 pshs x - ldx $01,y - os9 I$ChgDir - bra L3979 - jsr <u0016 - lda #$04 - bra L3981 - lbsr L3779 - ldy <u0046 - leay -$06,y - ldb <u007F - clra - std $01,y - lbra L353D - jsr <u0016 - ldy $01,y - pshs u,y,x - lbsr L320C - puls u,y,x - bsr L39E0 - sts <u00B1 - lds <u0080 - os9 F$Chain - lds <u00B1 - bra L39FB - jsr <u0016 - pshs u,x - ldy $01,y - bsr L39E0 - os9 F$Fork - bcs L39FB - pshs a -L39CC os9 F$Wait - cmpa ,s - bne L39CC - leas $01,s - tstb - bne L39FB - puls pc,u,x -L39DA comb - lsla - fcb $45 E - inca - inca - tst <u009E - lsla - lda #$0D - sta -$01,x - tfr x,d - leax >L39DA,pcr - leau ,y - pshs y - subd ,s++ - tfr d,y - clra - clrb - rts - jsr <u0016 - ldb $02,y -L39FB stb <u0036 -L39FD ldu <u0031 - beq L3A1B - tst <u0013,u - beq L3A14 - lds u0005,u - ldx <u0011,u - ldd <u0014,u - std <u0046 - lbra L3371 -L3A14 bsr L3A23 - bsr L3A73 - lbra L3206 -L3A1B lbsr L320F - lbra L3206 -L3A21 jmp <u00FF -L3A23 leax <L3A21,pcr - lbsr L375F - ldx <u005C - leay ,x - lbsr L3218 - clr <u0074 - lbsr L3236 - ldb <u0036 - lbsr L320F - lbra L3233 - clrb - bra L3A42 - ldb #$01 -L3A42 clra - std <u0042 - leax $01,x - rts - ldb ,x+ - clra - leax d,x - rts - exg x,pc - rts - leay ,x - lbsr L3218 - leax ,y - rts - ldb #$33 - bra L39FB - lda #$01 - bra L3A62 - clra -L3A62 ldu <u0031 - sta u0001,u - leax $01,x - rts -L3A69 lda <u0034 - bita #$01 - bne L3A89 - ora #$01 - bra L3A7B -L3A73 lda <u0034 - bita #$01 - beq L3A89 - anda #$FE -L3A7B sta <u0034 - ldd <u0017 - pshs b,a - ldd <u0019 - std <u0017 - puls b,a - std <u0019 -L3A89 rts - lbsr L3224 - pshs x - ldb <u00CF - cmpb #$A0 - beq L3AB6 - ldy <u0048 - ldx <u003E -L3A9A lda ,u+ - leax -$01,x - beq L3AA8 - sta ,y+ - cmpa #$FF - bne L3A9A - lda ,--y -L3AA8 ora #$80 - sta ,y - ldy <u0048 - lbsr L3212 - bcs L3AF4 - leau ,x -L3AB6 ldd ,u - bne L3AC8 - ldy <u00D2 - leay $03,y - lbsr L3212 - bcs L3AF4 - ldd ,x - std ,u -L3AC8 ldx ,s - std ,s - ldu <u0031 - lda <u0034 - sta ,u - ldb <u0043 - stb u0002,u - ldd <u004A - std u000D,u - ldd <u0040 - std u000F,u - ldd <u0039 - std u0009,u - bsr L3B5F - stx u000B,u - puls x - lda $06,x - beq L3B23 - cmpa #$22 - beq L3B23 - cmpa #$21 - beq L3AF9 -L3AF4 ldb #$2B -L3AF6 lbra L39FB -L3AF9 ldd u0005,u - pshs b,a - sts u0005,u - leas ,y - ldd <u0040 - pshs y - subd ,s++ - lsra - rorb - lsra - rorb - pshs b,a - ldd $09,x - leay >L32DD,pcr - jsr d,x - ldu <u0031 - lds u0005,u - puls x - stx u0005,u - bcc L3B3C - bra L3AF6 -L3B23 lbsr L3A73 - lda <u0034 - anda #$7F - sta <u0034 - lbsr L32DD - lda ,u - bita #$01 - beq L3B3C - lbsr L3A69 - lda ,u - sta <u0034 -L3B3C ldd u000D,u - std <u004A - ldd u000F,u - std <u0040 - ldd u0009,u - std <u0039 - ldb u0002,u - sex - std <u0042 - ldx u0003,u - lbsr L3351 - ldx u000B,u - ldd <u0044 - subd <u004A - std <u000C - rts -L3B5B oim #$02,<u0005 - oim #$34,<u0040 - ldb ,x+ - clra - pshs x,a - cmpb #$4D - bne L3BE1 - leay ,s -L3B6C pshs y - ldb ,x - cmpb #$0E - beq L3BA3 - jsr <u0016 - leax -$01,x - cmpa #$02 - beq L3B86 - cmpa #$04 - beq L3B93 - ldd $01,y - std $04,y - lda ,y -L3B86 ldb #$06 - leau <L3B5B,pcr - subb a,u - leau b,y - stu <u0046 - bra L3BA7 -L3B93 ldu $01,y - ldd <u0048 - subd <u004A - std <u003E - ldd <u0048 - std <u004A - lda #$04 - bra L3BA7 -L3BA3 leax $01,x - jsr <u0016 -L3BA7 puls y - inc ,y - cmpa #$04 - bcs L3BB3 - pshs u - ldu <u003E -L3BB3 pshs u,a - ldb ,x+ - cmpb #$4B - beq L3B6C - leax $01,x - stx $01,y - leax <L3B5B,pcr - ldu <u0046 - stu <u0040 -L3BC6 puls b - cmpb #$04 - bcs L3BD0 - puls b,a - bra L3BD3 -L3BD0 ldb b,x - clra -L3BD3 std ,--u - puls b,a - std ,--u - dec ,y - bne L3BC6 - leay ,u - bra L3BE7 -L3BE1 ldy <u0046 - sty <u0040 -L3BE7 tfr y,d - subd <u004A - lbcs L3302 - std <u000C - puls pc,u,x,a - jsr <u0016 - ldy $01,y - pshs x - lbsr L3215 - puls pc,x - lbsr L322D - leax >L323F,pcr - stx <u000E - rts - pshs x,b,a - ldb [<$04,s] - leax <L3C19,pcr - ldd b,x - leax d,x - stx $04,s - puls pc,x,b,a -L3C19 sexw - pulu cc - asr $03,x - eora <u0004 - ora >$061B - lsl <u0030 - rol <u0022 - lsl <u00EA -L3C29 jsr <u001B - lsl <u009D - bcc L3C35 -L3C2F jsr <u002A - aim #$9D,<u001B - orcc #$12 - rol -$0E,x - blt L3C4C - fcb $45 E - nop - nop - nop - stu -$0E,x - addd >$1343 - sync - lbsr L44CD - lsl <u00EB - lsl <u00F2 - lsl <u004E - lsl <u007F - ror <u00E0 - oim #$F3,<u0002 - stu $06,x - addb #$06 - cmpb <u0006 - stb <u0007 - deca - asr <u008E - asr <u001C - asr <u0022 - asr <u0070 - ror <u00FE - asr <u0032 - asr <u007C - asr <u0010 - asr <u0068 - asr <u003A - asr <u0082 - asr <u000A - asr <u0060 - asr <u0042 - asr <u0088 - asr <u0016 - asr <u002A - asr <u0076 - asr <u0004 - oim #$FA,<u0002 - ldd >$0830 - aim #$03,<u0002 - ldb >$020C - lsr <u0017 - aim #$67,<u0005 - lsl >$0681 - ror <u0081 - neg <u00B7 - neg <u00B7 - neg <u00B7 - neg <u00B7 - neg <u00BD - neg <u00BD - neg <u00BD - neg <u00BD - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 - neg <u0000 -L3CB5 oim #$CC,<u0001 - sbcb $02,x - eorb <u0006 - adca >$0812 - neg <u00A4 - neg <u00A4 - neg <u00A4 - neg <u00A4 - neg <u00B3 - neg <u00B3 - neg <u00B3 - neg <u00B3 - oim #$C8,<u0001 - ldu <u0002 - fcb $C7 G - asr <u00E2 - oim #$DE,<u000A - ora #$0A - ora #$0A - cmpx <u000A - cmpx <u0009 - cwai #$09 - bgt L3CEF - std $09,x - bitb >$1125 - jmp <u004E - nop - sbcb #$09 - bra L3CFB - nop - tst <u00CD - tst <u00FA - jmp <u0008 - inc <u0072 -L3CFB inc <u00B3 - tst <u004E - tim #$AF,<u0009 - neg <u0008 - adcb >$0AF6 - dec <u00EA - rol <u0040 - rol <u0040 - lsl <u004E - dec <u0011 - rol <u003B - lsl <u0086 - lsl <u004E - rol <u003B - dec <u0050 - dec <u0059 - rol <u000B - dec <u00C5 - dec <u006A - ldf >$1208 - dec <u00CA - dec <u00DA - dec <u00D2 - dec <u00B4 - dec <u00B9 - sync - suba #$12 - ora $01,x - fcb $52 R - oim #$68,<u0002 - fcb $5E ^ - ror <u003F - asr <u00A2 - asr <u00C1 -L3D41 ldy <u0046 - ldd <u004A - std <u0048 - bra L3D51 -L3D4A lslb - ldu <u0010 - ldd b,u - jsr d,u -L3D51 ldb ,x+ - bmi L3D4A - clra - lda ,y - rts - bsr L3D80 -L3D5B pshs pc,u - ldu <u0012 - lsla - ldd a,u - leau d,u - stu $02,s - puls pc,u - bsr L3D78 - bra L3D5B - leas $02,s - lda #$F2 - bra L3D82 - leas $02,s - lda #$F6 - bra L3D7A -L3D78 lda #$89 -L3D7A sta <u00A3 - clr <u003B - bra L3D86 -L3D80 lda #$85 -L3D82 sta <u00A3 - sta <u003B -L3D86 ldd ,x++ - addd <u0062 - std <u00D2 - ldu <u00D2 - lda ,u - anda #$E0 - sta <u00CF - eora #$80 - sta <u00CE - lda ,u - anda #$07 - ldb -$03,x - subb <u00A3 - pshs b,a - lda ,u - anda #$18 - lbeq L3E3F - ldd u0001,u - addd <u0066 - tfr d,u - ldd ,u - std <u003C - lda $01,s - bne L3DC4 - lda #$05 - sta ,s - ldd u0002,u - std <u003E - clra - clrb - bra L3E17 -L3DC4 leay -$06,y - clra - clrb - std $01,y - leau u0004,u - bra L3DD5 -L3DCE ldd ,u - std $01,y - lbsr L3EC1 -L3DD5 ldd $07,y - subd <u0042 - cmpd ,u++ - bcs L3DE3 - ldb #$37 - lbra L3C2C -L3DE3 addd $01,y - std $07,y - dec $01,s - bne L3DCE - lda ,s - beq L3DFF - cmpa #$02 - bcs L3E03 - beq L3E0B - cmpa #$04 - bcs L3DFF - ldd ,u - std <u003E - bra L3E0E -L3DFF ldd $07,y - bra L3E07 -L3E03 ldd $07,y - lslb - rola -L3E07 leay $0C,y - bra L3E17 -L3E0B ldd #$0005 -L3E0E std $01,y - lbsr L3EC1 - ldd $01,y - leay $06,y -L3E17 tst <u00CE - bne L3E33 - pshs b,a - ldd <u003C - addd <u0031 - cmpd <u0040 - bcc L3E78 - tfr d,u - puls b,a - cmpd u0002,u - bhi L3E78 - addd ,u - bra L3E73 -L3E33 addd <u003C - tst <u003B - bne L3E71 -L3E39 addd $01,y - leay $06,y - bra L3E73 -L3E3F lda ,s - cmpa #$04 - ldd u0001,u - bcs L3E51 - addd <u0066 - tfr d,u - ldd u0002,u - std <u003E - ldd ,u -L3E51 tst <u003B - beq L3E39 - addd <u0031 - tfr d,u - tst <u00CE - bne L3E75 - cmpd <u0040 - bcc L3E78 - ldd <u003E - cmpd u0002,u - bcs L3E6D - ldd u0002,u - std <u003E -L3E6D ldu ,u - bra L3E75 -L3E71 addd <u0031 -L3E73 tfr d,u -L3E75 clra - puls pc,b,a -L3E78 ldb #$38 - lbra L3C2C - leau ,x+ - bra L3E87 - ldd ,x++ - addd <u0031 - tfr d,u -L3E87 ldb ,u - clra - leay -$06,y - std $01,y - lda #$01 - sta ,y - rts - leau ,x++ - bra L3E9D - ldd ,x++ - addd <u0031 - tfr d,u -L3E9D ldd ,u - leay -$06,y - std $01,y - lda #$01 - sta ,y - rts - clra - clrb - subd $01,y - std $01,y - rts - ldd $07,y - addd $01,y - leay $06,y - std $01,y - rts - ldd $07,y - subd $01,y - leay $06,y - std $01,y - rts -L3EC1 ldd $07,y - beq L3EFA - cmpd #$0002 - bne L3ECF - ldd $01,y - bra L3EDB -L3ECF ldd $01,y - beq L3EDD - cmpd #$0002 - bne L3EE1 - ldd $07,y -L3EDB lslb - rola -L3EDD std $07,y - bra L3EFA -L3EE1 lda $08,y - mul - sta $03,y - lda $08,y - stb $08,y - ldb $01,y - mul - addb $03,y - lda $07,y - stb $07,y - ldb $02,y - mul - addb $07,y - stb $07,y -L3EFA leay $06,y - rts -L3EFD clr ,y - ldd $07,y - bpl L3F0B - nega - negb - sbca #$00 - std $07,y - com ,y -L3F0B ldd $01,y - bpl L3F17 - nega - negb - sbca #$00 - std $01,y - com ,y -L3F17 cmpd #$0002 - rts -L3F1C bsr L3EFD - bne L3F2E - ldd $07,y - beq L3F3B - asra - rorb - std $07,y - ldd #$0000 - rolb - bra L3F65 -L3F2E ldd $01,y - bne L3F37 - ldb #$2D - lbra L3C2C -L3F37 ldd $07,y - bne L3F40 -L3F3B leay $06,y - std $03,y - rts -L3F40 tsta - bne L3F4B - exg a,b - std $07,y - ldb #$08 - bra L3F4D -L3F4B ldb #$10 -L3F4D stb $03,y - clra - clrb -L3F51 lsl $08,y - rol $07,y - rolb - rola - subd $01,y - bmi L3F5F - inc $08,y - bra L3F61 -L3F5F addd $01,y -L3F61 dec $03,y - bne L3F51 -L3F65 std $09,y - tst ,y - bpl L3F79 - nega - negb - sbca #$00 - std $09,y - ldd $07,y - nega - negb - sbca #$00 - std $07,y -L3F79 leay $06,y - rts - leay -$06,y - ldb ,x+ - lda #$02 - std ,y - ldd ,x++ - std $02,y - ldd ,x++ - std $04,y - rts - ldd ,x++ - addd <u0031 - tfr d,u -L3F93 leay -$06,y - lda #$02 - ldb ,u - std ,y - ldd u0001,u - std $02,y - ldd u0003,u - std $04,y - rts - lda $05,y - eora #$01 - sta $05,y - rts -L3FAB ldb $05,y - eorb #$01 - stb $05,y -L3FB1 pshs x - tst $02,y - beq L3FC7 - tst $08,y - bne L3FCB -L3FBB ldd $01,y - std $07,y - ldd $03,y - std $09,y - lda $05,y - sta $0B,y -L3FC7 leay $06,y - puls pc,x -L3FCB lda $07,y - suba $01,y - bvc L3FD5 - bpl L3FBB - bra L3FC7 -L3FD5 bmi L3FDD - cmpa #$1F - ble L3FE5 - bra L3FC7 -L3FDD cmpa #$E1 - blt L3FBB - ldb $01,y - stb $07,y -L3FE5 ldb $0B,y - andb #$01 - stb ,y - eorb $05,y - andb #$01 - stb $01,y - ldb $0B,y - andb #$FE - stb $0B,y - ldb $05,y - andb #$FE - stb $05,y - tsta - beq L4031 - bpl L4029 - nega - leax $06,y - bsr L4082 - tst $01,y - beq L4039 -L400B subd $04,y - exg d,x - sbcb $03,y - sbca $02,y - bcc L404D - coma - comb - exg d,x - coma - comb - addd #$0001 - exg d,x - bcc L4025 - addd #$0001 -L4025 dec ,y - bra L404D -L4029 leax ,y - bsr L4082 - stx $02,y - std $04,y -L4031 ldx $08,y - ldd $0A,y - tst $01,y - bne L400B -L4039 addd $04,y - exg d,x - adcb $03,y - adca $02,y - bcc L404D - rora - rorb - exg d,x - rora - rorb - inc $07,y - exg d,x -L404D tsta - bmi L4060 -L4050 dec $07,y - lbvs L40DD - exg d,x - lslb - rola - exg d,x - rolb - rola - bpl L4050 -L4060 exg d,x - addd #$0001 - exg d,x - bcc L4071 - addd #$0001 - bcc L4071 - rora - inc $07,y -L4071 std $08,y - tfr x,d - andb #$FE - tst ,y - beq L407C - incb -L407C std $0A,y - leay $06,y - puls pc,x -L4082 suba #$10 - bcs L40A0 - suba #$08 - bcs L4091 - pshs a - clra - ldb $02,x - bra L4097 -L4091 adda #$08 - pshs a - ldd $02,x -L4097 ldx #$0000 - tst ,s - beq L40C9 - bra L40BD -L40A0 adda #$08 - bcc L40B3 - pshs a - clra - ldb $02,x - ldx $03,x - tst ,s - bne L40BF - exg d,x - bra L40C9 -L40B3 adda #$08 - pshs a - ldd $02,x - ldx $04,x - bra L40BF -L40BD exg d,x -L40BF lsra - rorb - exg d,x - rora - rorb - dec ,s - bne L40BD -L40C9 leas $01,s - rts -L40CC bsr L40D3 - lbcs L3C2C - rts -L40D3 pshs x - lda $02,y - bpl L40DD - lda $08,y - bmi L40E9 -L40DD clra - clrb - std $07,y - std $09,y - sta $0B,y - leay $06,y - puls pc,x -L40E9 lda $01,y - adda $07,y - bvc L40F6 -L40EF bpl L40DD - comb - ldb #$32 - puls pc,x -L40F6 sta $07,y - ldb $0B,y - eorb $05,y - andb #$01 - stb ,y - lda $0B,y - anda #$FE - sta $0B,y - ldb $05,y - andb #$FE - stb $05,y - mul - sta ,-s - clr ,-s - clr ,-s - lda $0B,y - ldb $04,y - mul - addd $01,s - std $01,s - bcc L4120 - inc ,s -L4120 lda $0A,y - ldb $05,y - mul - addd $01,s - std $01,s - bcc L412D - inc ,s -L412D ldb $02,s - ldx ,s - stx $01,s - clr ,s - lda $0B,y - ldb $03,y - mul - addd $01,s - std $01,s - bcc L4142 - inc ,s -L4142 lda $0A,y - ldb $04,y - mul - addd $01,s - std $01,s - bcc L414F - inc ,s -L414F lda $09,y - ldb $05,y - mul - addd $01,s - std $01,s - bcc L415C - inc ,s -L415C ldb $02,s - ldx ,s - stx $01,s - clr ,s - lda $0B,y - ldb $02,y - mul - addd $01,s - std $01,s - bcc L4171 - inc ,s -L4171 lda $0A,y - ldb $03,y - mul - addd $01,s - std $01,s - bcc L417E - inc ,s -L417E lda $09,y - ldb $04,y - mul - addd $01,s - std $01,s - bcc L418B - inc ,s -L418B lda $08,y - ldb $05,y - mul - addd $01,s - std $01,s - bcc L4198 - inc ,s -L4198 ldb $02,s - ldx ,s - stx $01,s - clr ,s - stb $0B,y - lda $0A,y - ldb $02,y - mul - addd $01,s - std $01,s - bcc L41AF - inc ,s -L41AF lda $09,y - ldb $03,y - mul - addd $01,s - std $01,s - bcc L41BC - inc ,s -L41BC lda $08,y - ldb $04,y - mul - addd $01,s - std $01,s - bcc L41C9 - inc ,s -L41C9 ldb $02,s - ldx ,s - stx $01,s - clr ,s - stb $0A,y - lda $09,y - ldb $02,y - mul - addd $01,s - std $01,s - bcc L41E0 - inc ,s -L41E0 lda $08,y - ldb $03,y - mul - addd $01,s - std $01,s - bcc L41ED - inc ,s -L41ED lda $08,y - ldb $02,y - mul - addd ,s - bmi L4202 - lsl $0B,y - rol $0A,y - rol $02,s - rolb - rola - dec $07,y - bvs L421B -L4202 std $08,y - lda $02,s - ldb $0A,y - addd #$0001 - bcc L4220 - inc $09,y - bne L4222 - inc $08,y - bne L4222 - ror $08,y - inc $07,y - bvc L4222 -L421B leas $03,s - lbra L40EF -L4220 andb #$FE -L4222 orb ,y - std $0A,y - leay $06,y - leas $03,s - clrb - puls pc,x -L422D bsr L4234 - lbcs L3C2C -L4233 rts -L4234 comb - ldb #$2D - tst $02,y - beq L4233 - pshs x - tst $08,y - lbeq L40DD - lda $07,y - suba $01,y - lbvs L40EF - sta $07,y - lda #$21 - ldb $05,y - eorb $0B,y - andb #$01 - std ,y - lsr $02,y - ror $03,y - ror $04,y - ror $05,y - ldd $08,y - ldx $0A,y - lsra - rorb - exg d,x - rora - rorb - clr $0B,y - bra L426F -L426D exg d,x -L426F subd $04,y - exg d,x - bcc L4278 - subd #$0001 -L4278 subd $02,y - beq L42AB - bmi L42A7 -L427E orcc #$01 -L4280 dec ,y - beq L42F8 - rol $0B,y - rol $0A,y - rol $09,y - rol $08,y - exg d,x - lslb - rola - exg d,x - rolb - rola - bcc L426D - exg d,x - addd $04,y - exg d,x - bcc L42A1 - addd #$0001 -L42A1 addd $02,y - beq L42AB - bpl L427E -L42A7 andcc #$FE - bra L4280 -L42AB leax ,x - bne L427E - ldb ,y - decb - subb #$10 - blt L42CD - subb #$08 - blt L42C2 - stb ,y - lda $0B,y - ldb #$80 - bra L42EB -L42C2 addb #$08 - stb ,y - ldd #$8000 - ldx $0A,y - bra L42ED -L42CD addb #$08 - blt L42DB - stb ,y - ldx $09,y - lda $0B,y - ldb #$80 - bra L42ED -L42DB addb #$07 - stb ,y - ldx $08,y - ldd $0A,y - orcc #$01 -L42E5 rolb - rola - exg d,x - rolb - rola -L42EB exg d,x -L42ED andcc #$FE - dec ,y - bpl L42E5 - exg d,x - tsta - bra L42FC -L42F8 ldx $0A,y - ldd $08,y -L42FC bmi L430C - exg d,x - rolb - rola - exg d,x - rolb - rola - dec $07,y - lbvs L40DD -L430C exg d,x - addd #$0001 - exg d,x - bcc L4321 - addd #$0001 - bcc L4321 - rora - inc $07,y - lbvs L40EF -L4321 std $08,y - tfr x,d - andb #$FE - orb $01,y - std $0A,y - inc $07,y - lbvs L40EF -L4331 leay $06,y - clrb - puls pc,x - pshs x - ldd $07,y - beq L4331 - ldx $01,y - bne L434F - leay $06,y -L4342 ldd #$0180 - std $01,y - clr $03,y - clr $04,y - clr $05,y - puls pc,x -L434F std $01,y - stx $07,y - ldd $09,y - ldx $03,y - std $03,y - stx $09,y - lda $0B,y - ldb $05,y - sta $05,y - stb $0B,y - puls x - lbsr L47AB - lbsr L40CC - lbra L4864 - ldd ,x++ - addd <u0031 - tfr d,u - ldb ,u - clra - leay -$06,y - std $01,y - lda #$03 - sta ,y - rts - ldb $08,y - andb $02,y - bra L4390 - ldb $08,y - orb $02,y - bra L4390 - ldb $08,y - eorb $02,y -L4390 leay $06,y - std $01,y - rts - com $02,y - rts -L4398 pshs y,x - ldx $01,y - ldy $07,y - sty <u0048 -L43A2 lda ,y+ - cmpa ,x+ - bne L43AC - cmpa #$FF - bne L43A2 -L43AC inca - inc -$01,x - cmpa -$01,x - puls pc,y,x - bsr L4398 - bcs L4405 - bra L4409 - bsr L4398 - bls L4405 - bra L4409 - bsr L4398 - beq L4405 - bra L4409 - bsr L4398 - bne L4405 - bra L4409 - bsr L4398 - bcc L4405 - bra L4409 - bsr L4398 - bhi L4405 - bra L4409 - ldd $07,y - subd $01,y - blt L4405 - bra L4409 - ldd $07,y - subd $01,y - ble L4405 - bra L4409 - ldd $07,y - subd $01,y - bne L4405 - bra L4409 - ldd $07,y - subd $01,y - beq L4405 - bra L4409 - ldd $07,y - subd $01,y - bge L4405 - bra L4409 - ldd $07,y - subd $01,y - ble L4409 -L4405 ldb #$FF - bra L440B -L4409 ldb #$00 -L440B clra - leay $06,y - std $01,y - lda #$03 - sta ,y - rts - ldb $08,y - cmpb $02,y - beq L4405 - bra L4409 - ldb $08,y - cmpb $02,y - bne L4405 - bra L4409 - bsr L4449 - blt L4405 - bra L4409 - bsr L4449 - ble L4405 - bra L4409 - bsr L4449 - bne L4405 - bra L4409 - bsr L4449 - beq L4405 - bra L4409 - bsr L4449 - bge L4405 - bra L4409 - bsr L4449 - bgt L4405 - bra L4409 -L4449 pshs y - andcc #$F0 - lda $08,y - bne L4461 - lda $02,y - beq L445F -L4455 lda $05,y -L4457 anda #$01 - bne L445F -L445B andcc #$F0 - orcc #$08 -L445F puls pc,y -L4461 lda $02,y - bne L446B - lda $0B,y - eora #$01 - bra L4457 -L446B lda $0B,y - eora $05,y - anda #$01 - bne L4455 - leau $06,y - lda $05,y - anda #$01 - beq L447D - exg u,y -L447D ldd u0001,u - cmpd $01,y - bne L445F - ldd u0003,u - cmpd $03,y - bne L4491 - lda u0005,u - cmpa $05,y - beq L445F -L4491 bcs L445B - andcc #$F0 - puls pc,y -L4497 clrb - stb <u003E -L449A ldu <u0048 - leay -$06,y - stu $01,y - sty <u0044 -L44A3 cmpu <u0044 - bcc L44C2 - lda ,x+ - sta ,u+ - cmpa #$FF - beq L44BB - decb - bne L44A3 - dec <u003E - bpl L44A3 - lda #$FF - sta ,u+ -L44BB stu <u0048 - lda #$04 - sta ,y - rts -L44C2 ldb #$2F - lbra L3C2C - ldd ,x++ - addd <u0066 - tfr d,u -L44CD ldd ,u - addd <u0031 - ldu u0002,u - stu <u003E - tfr d,u - pshs x - ldb <u003F - bne L44DF - dec <u003E -L44DF leax ,u - bsr L449A - puls pc,x - ldu $01,y - leay $06,y -L44E9 lda ,u+ - sta -u0002,u - cmpa #$FF - bne L44E9 - leau -u0001,u - stu <u0048 - rts - ldd <u003E - leay -$06,y - std $03,y - stu $01,y - lda #$05 - sta ,y - rts -L4503 clra - clrb - std $04,y - ldd $01,y - bne L4512 - stb $03,y - lda #$02 - sta ,y - rts -L4512 ldu #$0210 - tsta - bpl L451E - nega - negb - sbca #$00 - inc $05,y -L451E tsta - bne L4526 - ldu #$0208 - exg a,b -L4526 tsta - bmi L452F -L4529 leau -u0001,u - lslb - rola - bpl L4529 -L452F std $02,y - stu ,y - rts - leay $06,y - bsr L4503 - leay -$06,y - rts -L453B ldb $01,y - bgt L454E - bmi L454A - lda $02,y - bpl L454A - ldd #$0001 - bra L4591 -L454A clra - clrb - bra L4599 -L454E subb #$10 - bhi L458C - bne L4566 - ldd $02,y - ror $05,y - bcc L4599 - cmpd #$8000 - bne L458C - tst $04,y - bpl L4599 - bra L458C -L4566 cmpb #$F8 - bhi L4578 - pshs b - ldd $02,y - std $03,y - clr $02,y - puls b - addb #$08 - beq L4581 -L4578 lsr $02,y - ror $03,y - ror $04,y - incb - bne L4578 -L4581 ldd $02,y - tst $04,y - bpl L4591 - addd #$0001 - bvc L4591 -L458C ldb #$34 - lbra L3C2C -L4591 ror $05,y - bcc L4599 - nega - negb - sbca #$00 -L4599 std $01,y - lda #$01 - sta ,y - rts - leay $06,y - bsr L453B - leay -$06,y - rts - leay $0C,y - bsr L453B - leay -$0C,y - rts - lda $05,y - anda #$FE - sta $05,y - rts - ldd $01,y - bpl L45BF - nega - negb - sbca #$00 - std $01,y -L45BF rts - clra - ldb [<$01,y] - std $01,y - rts - lda $02,y - beq L45DB - lda $05,y - anda #$01 - bne L45DE -L45D1 ldb #$01 - bra L45E0 - ldd $01,y - bmi L45DE - bne L45D1 -L45DB clrb - bra L45E0 -L45DE ldb #$FF -L45E0 sex - bra L45EA - ldb <u0036 - clr <u0036 -L45E7 clra - leay -$06,y -L45EA std $01,y - lda #$01 - sta ,y -L45F0 rts - ldb <u007D - bra L45E7 -L45F5 ldb $05,y - asrb - lbcs L4FC7 - ldb #$1F - stb <u006E - ldd $01,y - beq L45F0 - inca - asra - sta $01,y - ldd $02,y - bcs L4616 - lsra - rorb - std -$04,y - ldd $04,y - rora - rorb - bra L461A -L4616 std -$04,y - ldd $04,y -L461A std -$02,y - clra - clrb - std $02,y - std $04,y - std -$06,y - std -$08,y - bra L4638 -L4628 orcc #$01 - rol $05,y - rol $04,y - rol $03,y - rol $02,y - dec <u006E - beq L467A - bsr L468F -L4638 ldb -$04,y - subb #$40 - stb -$04,y - ldd -$06,y - sbcb $05,y - sbca $04,y - std -$06,y - ldd -$08,y - sbcb $03,y - sbca $02,y - std -$08,y - bpl L4628 -L4650 andcc #$FE - rol $05,y - rol $04,y - rol $03,y - rol $02,y - dec <u006E - beq L467A - bsr L468F - ldb -$04,y - addb #$C0 - stb -$04,y - ldd -$06,y - adcb $05,y - adca $04,y - std -$06,y - ldd -$08,y - adcb $03,y - adca $02,y - std -$08,y - bmi L4650 - bra L4628 -L467A ldd $02,y - bra L4684 -L467E dec $01,y - lbvs L40DD -L4684 lsl $05,y - rol $04,y - rolb - rola - bpl L467E - std $02,y - rts -L468F bsr L4691 -L4691 lsl -$01,y - rol -$02,y - rol -$03,y - rol -$04,y - rol -$05,y - rol -$06,y - rol -$07,y - rol -$08,y - rts - lbsr L3F1C - ldd $03,y - std $01,y - rts -L46AA leau -$0C,y - pshs y -L46AE ldd ,y++ - std ,u++ - cmpu ,s - bne L46AE - leas $02,s - leay -u000C,u - lbsr L422D - bsr L46C6 - lbsr L40CC - lbra L3FAB -L46C6 lda $01,y - bgt L46D3 - clra - clrb - std $01,y - std $03,y - stb $05,y -L46D2 rts -L46D3 cmpa #$1F - bcc L46D2 - leau $06,y - ldb -u0001,u - andb #$01 - pshs u,b - leau $01,y -L46E1 leau u0001,u - suba #$08 - bcc L46E1 - beq L46F5 - ldb #$FF -L46EB lslb - inca - bne L46EB - andb ,u - stb ,u+ - bra L46F9 -L46F5 leau u0001,u -L46F7 sta ,u+ -L46F9 cmpu $01,s - bne L46F7 - puls u,b - orb $05,y - stb $05,y - rts - leay -$06,y - ldd $07,y - std $01,y - lbra L3EC1 - leay -$06,y - ldd $0A,y - std $04,y - ldd $08,y - std $02,y - ldd $06,y - std ,y - lbra L40CC - ldd <u0080 - ldu <u0082 - pshs u,b,a - ldd $01,y - std <u0080 - std <u0082 - std <u0048 - leay $06,y - ldb #$09 - lbsr L3C2F - puls u,b,a - std <u0080 - stu <u0082 - lbcs L4FC7 - rts - lbsr L3D51 - leay -$06,y - stu $01,y -L4746 lda #$01 - sta ,y - leax $01,x - rts -L474D oim #$02,<u0005 - oim #$17,<u00F5 - std >$313A - cmpa #$04 - bcc L4763 - leau >L474D,pcr - ldb a,u - clra - bra L4765 -L4763 ldd <u003E -L4765 std $01,y - bra L4746 - ldd #$00FF - bra L4771 - ldd #$0000 -L4771 leay -$06,y - std $01,y - lda #$03 - sta ,y - rts - com $01,y - com $02,y - rts - ldd $01,y - anda $07,y - andb $08,y - bra L4795 - ldd $01,y - eora $07,y - eorb $08,y - bra L4795 - ldd $01,y - ora $07,y - orb $08,y -L4795 std $07,y - leay $06,y - rts -L479A stu >$DE5B - eorb <u00AA - bsr L47AB - leau >L479A,pcr - lbsr L3F93 - lbra L40CC -L47AB pshs x - ldb $05,y - asrb - lbcs L4FC7 - ldd $01,y - lbeq L4FC7 - pshs a - ldb #$01 - stb $01,y - leay <-$1A,y - leax <$1B,y - leau ,y - lbsr L4BCC - lbsr L4CC7 - clra - clrb - std <$14,y - std <$16,y - sta <$18,y - leax >L4C7F,pcr - stx <$19,y - lbsr L4909 - leax <$14,y - leau <$1B,y - lbsr L4BCC - lbsr L4CE1 - leay <$1A,y - ldb #$02 - stb ,y - ldb $05,y - orb #$01 - stb $05,y - puls b - bsr L480A - puls x - lbra L3FB1 -L4805 neg <u00B1 - aim #$17,>$F81D - bpl L480E - negb -L480E anda #$01 - pshs b,a - leau >L4805,pcr - lbsr L3F93 - ldb $05,y - lda $01,s - cmpa #$01 - beq L485C - mul - stb $05,y - ldb $04,y - sta $04,y - lda $01,s - mul - addb $04,y - adca #$00 - stb $04,y - ldb $03,y - sta $03,y - lda $01,s - mul - addb $03,y - adca #$00 - stb $03,y - ldb $02,y - sta $02,y - lda $01,s - mul - addb $02,y - adca #$00 - beq L4858 -L484B inc $01,y - lsra - rorb - ror $03,y - ror $04,y - ror $05,y - tsta - bne L484B -L4858 stb $02,y - ldb $05,y -L485C andb #$FE - orb ,s - stb $05,y - puls pc,b,a -L4864 pshs x - ldb $01,y - beq L4880 - cmpb #$07 - ble L4877 - ldb $05,y - rorb - rorb - eorb #$80 - lbra L491C -L4877 cmpb #$E4 - lble L4342 - tstb - bpl L488A -L4880 clr ,-s - ldb $05,y - andb #$01 - beq L48CD - bra L48BB -L488A lda #$71 - mul - adda $01,y - ldb $05,y - andb #$01 - pshs b,a - eorb $05,y - stb $05,y - ldb ,s -L489B lbsr L480A - lbsr L3FAB - ldb $01,y - ble L48AD - addb ,s - stb ,s - ldb $01,y - bra L489B -L48AD puls b,a - pshs a - tstb - beq L48CD - nega - sta ,s - orb $05,y - stb $05,y -L48BB leau >L4805,pcr - lbsr L3F93 - lbsr L3FB1 - dec ,s - ldb $05,y - andb #$01 - bne L48BB -L48CD leay <-$1A,y - leax <$1B,y - leau <$14,y - lbsr L4BCC - lbsr L4CC7 - ldd #$1000 - std ,y - clra - std $02,y - sta $04,y - leax >L4C61,pcr - stx <$19,y - bsr L4909 - leax ,y - leau <$1B,y - lbsr L4BCC - lbsr L4CE1 - leay <$1A,y - puls b - addb $01,y - bvs L491C - lda #$02 - std ,y - puls pc,x -L4909 lda #$01 - sta <u009A - leax >L4D6F,pcr - stx <u0095 - leax >$005F,x - stx <u0097 - lbra L4B97 -L491C leay -$06,y - lbpl L40DD - ldb #$32 - lbra L3C2C - pshs x - bsr L495D - ldd $01,y - lbeq L4A91 - cmpd #$0180 - bgt L4943 - bne L4946 - ldd $03,y - bne L4943 - lda $05,y - lbeq L4A0E -L4943 lbra L4FC7 -L4946 lbsr L49CB - leay <-$14,y - leax <$15,y - leau ,y - lbsr L4BCC - lbsr L4CC7 - leax <$1B,y - lbra L4A3E -L495D ldb $05,y - andb #$01 - stb <u006D - eorb $05,y - stb $05,y - rts - leau <L49AB,pcr - pshs u,x - bsr L495D - ldd $01,y - lbeq L4A0E - cmpd #$0180 - bgt L4943 - bne L4995 - ldd $03,y - bne L4943 - lda $05,y - bne L4943 - lda <u006D - bne L498E - clrb - std $01,y - puls pc,u,x -L498E leay $06,y - puls u,x - lbra L4B03 -L4995 bsr L49CB - leay <-$14,y - leax <$1B,y - leau ,y - lbsr L4BCC - lbsr L4CC7 - leax <$15,y - lbra L4A3E -L49AB lda $05,y - bita #$01 - beq L49C5 - ldu <u0031 - tst u0001,u - beq L49BF - leau <L49C6,pcr - lbsr L3F93 - bra L49C2 -L49BF lbsr L4B03 -L49C2 lbra L3FB1 -L49C5 rts -L49C6 lsl <u00B4 - neg <u0000 - neg <u0096 - tst -$0C,y - aim #$31,<u00A8 - ldu <L49D6,pcr - oim #$ED,<u002C - lda #$80 - clrb - std $0E,y - clra - std <$10,y - ldd <$12,y - std ,y - std $06,y - ldd <$14,y - std $02,y - std $08,y - ldd <$16,y - std $04,y - std $0A,y - lbsr L40CC - lbsr L3FAB - lbsr L45F5 - puls a - sta <u006D - rts - pshs x - lbsr L495D - ldb $01,y - cmpb #$18 - blt L4A17 -L4A0E leay $06,y - lbsr L4B03 - dec $01,y - bra L4A6A -L4A17 leay <-$1A,y - ldd #$1000 - std ,y - clra - std $02,y - sta $04,y - ldb <$1B,y - bra L4A34 -L4A29 asr ,y - ror $01,y - ror $02,y - ror $03,y - ror $04,y - decb -L4A34 cmpb #$02 - bgt L4A29 - stb <$1B,y - leax <$1B,y -L4A3E leau $0A,y - lbsr L4BCC - lbsr L4CC7 - clra - clrb - std <$14,y - std <$16,y - sta <$18,y - leax >L4C2C,pcr - stx <$19,y - lbsr L4B89 - leax <$14,y - leau <$1B,y - lbsr L4BCC - lbsr L4CE1 - leay <$1A,y -L4A6A lda $05,y - ora <u006D - sta $05,y - ldu <u0031 - tst u0001,u - beq L4A91 - leau >L4AFE,pcr - lbsr L3F93 - lbsr L40CC - bra L4A91 - pshs x - lbsr L4B0A - leax $0A,y - bsr L4A97 - lda $05,y -L4A8D eora <u009C -L4A8F sta $05,y -L4A91 lda #$02 - sta ,y - puls pc,x -L4A97 leau <$1B,y - lbsr L4BCC - lbsr L4CE1 - leay <$14,y - leax >L4D6A,pcr - leau $01,y - lbsr L4BCC - lbra L40CC - pshs x - bsr L4B0A - leax ,y - bsr L4A97 - lda $05,y - eora <u009B - bra L4A8F - pshs x - bsr L4B0A - leax $0A,y - leau <$1B,y - lbsr L4BCC - lbsr L4CE1 - leax ,y - leay <$14,y - leau $01,y - lbsr L4BCC - lbsr L4CE1 - ldd $01,y - bne L4AEB - leay $06,y - ldd #$7FFF -L4AE2 std $01,y - lda #$FF - std $03,y - deca - bra L4AF0 -L4AEB lbsr L422D - lda $05,y -L4AF0 eora <u009B - bra L4A8D - aim #$C9,<u000F - orb <u00A2 -L4AF9 addb >$8EFA - puls x,a -L4AFE ror <u00E5 - bgt L4AE2 - andb <u0033 - bsr L4B05 - std -$0A,x - andb >$89DE - leay $0D,s - fcb $41 A - beq L4B1A - leau >L4AF9,pcr - lbsr L3F93 - lbsr L40CC -L4B1A clr <u009B - ldb $05,y - andb #$01 - stb <u009C - eorb $05,y - stb $05,y - bsr L4B03 - inc $01,y - lbsr L4449 - blt L4B36 - lbsr L46AA - bsr L4B03 - bra L4B38 -L4B36 dec $01,y -L4B38 lbsr L4449 - blt L4B4A - inc <u009B - lda <u009C - eora #$01 - sta <u009C - lbsr L3FAB - bsr L4B03 -L4B4A dec $01,y - lbsr L4449 - ble L4B64 - lda <u009B - eora #$01 - sta <u009B - inc $01,y - lda $0B,y - ora #$01 - sta $0B,y - lbsr L3FB1 - leay -$06,y -L4B64 leay <-$14,y - leax >L4C33,pcr - stx <$19,y - leax <$1B,y - leau <$14,y - bsr L4BCC - lbsr L4CC7 - ldd #$1000 - std ,y - clra - std $02,y - sta $04,y - std $0A,y - std $0C,y - sta $0E,y -L4B89 leax >L4D29,pcr - stx <u0095 - leax >$0041,x - stx <u0097 - clr <u009A -L4B97 ldb #$25 - stb <u0099 - clr <u009D -L4B9D leau <$1B,y - ldx <u0095 - cmpx <u0097 - bcc L4BAE - bsr L4BCC - leax $05,x - stx <u0095 - bra L4BB2 -L4BAE ldb #$01 - bsr L4C1E -L4BB2 leax ,y - leau $05,y - bsr L4BDE - tst <u009A - bne L4BC2 - leax $0A,y - leau $0F,y - bsr L4BDE -L4BC2 jsr [<$19,y] - inc <u009D - dec <u0099 - bne L4B9D - rts -L4BCC pshs y,x - lda ,x - ldy $01,x - ldx $03,x - sta ,u - sty u0001,u - stx u0003,u - puls pc,y,x -L4BDE ldb ,x - sex - ldb <u009D - lsrb - lsrb - lsrb - bcc L4BE9 - incb -L4BE9 pshs b - beq L4BF2 -L4BED sta ,u+ - decb - bne L4BED -L4BF2 ldb #$05 - subb ,s+ - beq L4BFF -L4BF8 lda ,x+ - sta ,u+ - decb - bne L4BF8 -L4BFF leau -u0005,u - ldb <u009D - andb #$07 - beq L4C2B - cmpb #$04 - bcs L4C1E - subb #$08 - lda ,x -L4C0F lsla - rol u0004,u - rol u0003,u - rol u0002,u - rol u0001,u - rol ,u - incb - bne L4C0F - rts -L4C1E asr ,u - ror u0001,u - ror u0002,u - ror u0003,u - ror u0004,u - decb - bne L4C1E -L4C2B rts -L4C2C lda $0A,y - eora ,y - coma - bra L4C36 -L4C33 lda <$14,y -L4C36 tsta - bpl L4C4D - leax ,y - leau $0F,y - bsr L4C8F - leax $0A,y - leau $05,y - bsr L4CAB - leax <$14,y - leau <$1B,y - bra L4C8F -L4C4D leax ,y - leau $0F,y - bsr L4CAB - leax $0A,y - leau $05,y - bsr L4C8F - leax <$14,y - leau <$1B,y - bra L4CAB -L4C61 leax <$14,y - leau <$1B,y - bsr L4CAB - bmi L4C8F - bne L4C79 - ldd $01,x - bne L4C79 - ldd $03,x - bne L4C79 - ldb #$01 - stb <u0099 -L4C79 leax ,y - leau $05,y - bra L4C8F -L4C7F leax ,y - leau $05,y - bsr L4C8F - cmpa #$20 - bcc L4CAB - leax <$14,y - leau <$1B,y -L4C8F ldd $03,x - addd u0003,u - std $03,x - ldd $01,x - bcc L4CA0 - addd #$0001 - bcc L4CA0 - inc ,x -L4CA0 addd u0001,u - std $01,x - lda ,x - adca ,u - sta ,x - rts -L4CAB ldd $03,x - subd u0003,u - std $03,x - ldd $01,x - bcc L4CBC - subd #$0001 - bcc L4CBC - dec ,x -L4CBC subd u0001,u - std $01,x - lda ,x - sbca ,u - sta ,x - rts -L4CC7 ldb ,u - clr ,u - addb #$04 - bge L4CDE - negb - lbra L4C1E -L4CD3 lsl u0004,u - rol u0003,u - rol u0002,u - rol u0001,u - rol ,u - decb -L4CDE bne L4CD3 - rts -L4CE1 lda ,u - bpl L4CEE - clra - clrb - std ,u - std u0002,u - sta u0004,u - rts -L4CEE ldd #$2004 -L4CF1 decb - lsl u0004,u - rol u0003,u - rol u0002,u - rol u0001,u - rol ,u - bmi L4D05 - deca - bne L4CF1 - clrb - std ,u - rts -L4D05 lda ,u - stb ,u - ldb u0001,u - sta u0001,u - lda u0002,u - stb u0002,u - ldb u0003,u - addd #$0001 - andb #$FE - std u0003,u - bcc L4D28 - inc u0002,u - bne L4D28 - inc u0001,u - bne L4D28 - ror u0001,u - inc ,u -L4D28 rts -L4D29 inc <u0090 - std >$AA22 - asr <u006B - daa - cmpb #$58 - com <u00EB - jmp [>$2601] - std >$5BA9 - adda $00,x - stu >$AADD - adca >$007F - bitb >$56EF - neg <u003F - ldu >$AAB7 - neg <u001F - stu >$D556 - neg <u000F - stu >$FAAB - neg <u0007 - stu >$FF55 - neg <u0003 - stu >$FFEB - neg <u0001 - stu >$FFFD - neg <u0001 - neg <u0000 - neg <u0000 - adda <u0074 - std <$0B,y - lbsr L6EF2 - jmp >$067C - eorb #$FB - leax $03,x - cmpa <u00FE - eorb >$F301 - sbcb -$10,s - ror >$E300 - eorb >$5186 - oim #$00,<u007E - dec <u006C - abx - neg <u003F - cmpa #$51 - aim #$00,-$01,x - subb $0A,y - tim #$00,$0F,x - eorb >$0551 - neg <u0007 - ldu >$00AA - neg <u0003 - stu >$8015 - neg <u0001 - stu >$E003 - neg <u0000 - stu >$F800 - neg <u0000 - clr >$FE00 - neg <u0000 - swi - fcb $FF - suba #$00 - neg <u001F - stu >$E000 - neg <u000F - stu >$F800 - neg <u0007 - stu >$FE00 - neg <u0004 - neg <u0000 -L4DCE jmp <u0012 - sexw - sbca [d,y] - nega - ldb $0D,y - pshu x,dp,cc - aim #u00E9,$0F,u - clrb - std <u004C - std <u004E - pshs a - lda $02,y - beq L4DFC - ldb $05,y - bitb #$01 - bne L4DF0 - com ,s - bra L4DFC -L4DF0 addb #$FE - addb $01,y - lda $04,y - std <u0052 - ldd $02,y - std <u0050 -L4DFC lda <u0053 - ldb <u0057 - mul - std <u004E - lda <u0052 - ldb <u0057 - mul - addd <u004D - bcc L4E0E - inc <u004C -L4E0E std <u004D - lda <u0053 - ldb <u0056 - mul - addd <u004D - bcc L4E1B - inc <u004C -L4E1B std <u004D - lda <u0051 - ldb <u0057 - mul - addd <u004C - std <u004C - lda <u0052 - ldb <u0056 - mul - addd <u004C - std <u004C - lda <u0053 - ldb <u0055 - mul - addd <u004C - std <u004C - lda <u0050 - ldb <u0057 - mul - addb <u004C - stb <u004C - lda <u0051 - ldb <u0056 - mul - addb <u004C - stb <u004C - lda <u0052 - ldb <u0055 - mul - addb <u004C - stb <u004C - lda <u0053 - ldb <u0054 - mul - addb <u004C - stb <u004C - ldd <u004E - addd <u005A - std <u0052 - ldd <u004C - adcb <u0059 - adca <u0058 - std <u0050 - tst ,s+ - bne L4E98 - ldd <u0050 - std $02,y - ldd <u0052 - std $04,y - clr $01,y -L4E78 lda #$1F - pshs a - ldd $02,y - bmi L4E8E -L4E80 dec ,s - beq L4E8E - dec $01,y - lsl $05,y - rol $04,y - rolb - rola - bpl L4E80 -L4E8E std $02,y - ldb $05,y - andb #$FE - stb $05,y - puls pc,b -L4E98 ldd <u0052 - andb #$FE - std ,--y - ldd <u0050 - std ,--y - clra - clrb - std ,--y - bsr L4E78 - lbra L40CC - ldd <u0048 - ldu $01,y - subd $01,y - subd #$0001 - stu <u0048 -L4EB6 std $01,y - lda #$01 - sta ,y - rts - ldd $01,y - std <u0048 - ldb [<$01,y] - clra - bra L4EB6 - ldd $01,y - tsta - lbne L4FC7 - ldu <u0048 - stu $01,y - stb ,u+ - lbsr L4FEA - sty <u0044 - cmpu <u0044 - lbcc L44C2 - rts -L4EE2 ldd $01,y - ble L4EF4 - addd $07,y - tfr d,u - cmpd <u0048 - bcc L4EF1 - bsr L4F70 -L4EF1 leay $06,y - rts -L4EF4 leay $06,y - ldu $01,y - bra L4F70 - ldd $01,y - ble L4EF4 - pshs x - ldd <u0048 - subd $01,y - subd #$0001 - cmpd $07,y - bls L4F1A - tfr d,x - ldu $07,y -L4F10 lda ,x+ - sta ,u+ - cmpa #$FF - bne L4F10 - stu <u0048 -L4F1A leay $06,y - puls pc,x - ldd $01,y - ble L4F26 - ldd $07,y - bgt L4F2E -L4F26 ldd $01,y - leay $06,y - std $01,y - bra L4EE2 -L4F2E subd #$0001 - beq L4F26 - addd $0D,y - cmpd <u0048 - bcs L4F3E - leay $06,y - bra L4EF4 -L4F3E pshs x - tfr d,x - ldb $02,y - ldu $0D,y -L4F46 lda ,x+ - sta ,u+ - cmpa #$FF - beq L4F59 - decb - bne L4F46 - dec $01,y - bpl L4F46 - lda #$FF - sta ,u+ -L4F59 stu <u0048 - leay $0C,y - puls pc,x - ldu <u0048 - leau -u0001,u -L4F63 cmpu $01,y - beq L4F70 - lda ,-u - cmpa #$20 - beq L4F63 - leau u0001,u -L4F70 lda #$FF - sta ,u+ - stu <u0048 - rts - pshs y,x - ldd <u0048 - subd $01,y - addd $07,y - addd #$0001 - ldx $07,y - ldy $01,y - lbsr L3C29 - bcc L4F90 - clra - clrb - bra L4F99 -L4F90 tfr y,d - ldx $02,s - subd $01,x - addd #$0001 -L4F99 puls y,x - std $07,y - lda #$01 - sta $06,y - leay $06,y - rts - ldb #$02 - bra L4FAA - ldb #$03 -L4FAA lda <u007D - ldu <u0082 - pshs u,x,a - lbsr L3C2F - bcs L4FC7 - ldx <u0082 - lda #$FF - sta ,x - ldx $03,s - lbsr L4497 - puls u,x,a - sta <u007D - stu <u0082 - rts -L4FC7 ldb #$43 - lbra L3C2C - pshs x - ldd $01,y - blt L4FC7 - sty <u0044 - ldu <u0048 - stu $01,y - lda #$20 -L4FDB cmpb <u007D - bls L4FEC - sta ,u+ - decb - cmpu <u0044 - bcs L4FDB - lbra L44C2 -L4FEA pshs x -L4FEC lda #$FF - sta ,u+ - stu <u0048 - lda #$04 - sta ,y - puls pc,x - pshs x - leay -$06,y - leax -$06,y - ldu <u0048 - stu $01,y - os9 F$Time - bcs L4FEC - bsr L5021 - lda #$2F - bsr L501F - lda #$2F - bsr L501F - lda #$20 - bsr L501F - lda #$3A - bsr L501F - lda #$3A - bsr L501F - bra L4FEC -L501F sta ,u+ -L5021 lda ,x+ - ldb #$2F -L5025 incb - suba #$0A - bcc L5025 - stb ,u+ - ldb #$3A -L502E decb - inca - bne L502E - stb ,u+ - rts - lda $02,y - ldb #$06 - os9 I$GetStt - bcc L5046 - cmpb #$D3 - bne L5046 - ldb #$FF - bra L5048 -L5046 ldb #$00 -L5048 clra - std $01,y - lda #$03 - sta ,y - rts - ldb #$06 - pshs y,x,b - tfr dp,a - ldb #$50 - tfr d,y - leax >L4DCE,pcr -L505E ldd ,x++ - std ,y++ - dec ,s - bne L505E - leax >L3CB5,pcr - stx <u0010 - leax >L3D35,pcr - stx <u0012 - lda #$7E - sta <u0016 - leax >L3D41,pcr - stx <u0017 - leax >L3C32,pcr - stx <u0019 - puls pc,y,x,b - pshs x,b,a - ldb [<$04,s] - leax <L5094,pcr - ldd b,x - leax d,x - stx $04,s - puls pc,x,b,a -L5094 neg <u00BA - neg <u0010 -L5098 jsr <u0027 - inc <u009D - beq L50AC -L509E jsr <u0027 - lsl <u009D - beq L50AA - pshs pc,x,b,a - lslb - leax <L50B2,pcr -L50AA ldd b,x -L50AC leax d,x - stx $04,s - puls pc,x,b,a -L50B2 lsr <u005F - eim #$C3,<u0005 - addd #$04B7 - eim #$B3,<u0005 - ora $04,x - deca - aim #$58,<u0002 - tim #$02,-$0B,y - aim #$A2,<u0002 - clr >$05F9 - eim #$E9,<u0004 - lsl >$0A11 -L50D2 eim #$DA,<u0006 - ora >$0562 - asr <u0059 -L50DA ror <u0002 - beq L50EE - com <u00E8 - neg <u0064 - neg <u000A -L50E4 lsr <u00A0 - neg <u0000 - neg <u0007 - eorb #$00 - neg <u0000 -L50EE dec <u00FA - neg <u0000 - neg <u000E - cmpx <u0040 - neg <u0000 - fcb $11 - addd #$5000 - neg <u0014 - andb >$2400 - neg <u0018 - eora <u0096 - suba #$00 - fcb $1B - ldx >$BC20 - neg <u001E - ldu $0B,s - bvc L5111 -L5111 bhi L50A8 - aim #$F9,<u0000 - bcs L50D2 - coma - sta >$4028 - eorb [,u] - bita -$10,x - bge L50B3 - anda #$E7 - bpl L5155 - bita >$E620 - andb >$32E3 - clrb - adca -$0E,y - pshu pc,dp,b,a - fcb $1B - adcb #$C0 - rts - cmpa >$A2BC - bgt L5176 - ldu <u000B - tim #u003A,$00,u - ora #$C7 - bls L5147 -L5143 lsrb - aim #$75,>$65FF -L5148 rora - oim #$6C,-$0D,s - eim #$FF,-$0C,y - nega - leay -$06,y - clra - clrb - sta <u0075 - sta <u0076 - sta <u0077 - sta <u0078 - sta <u0079 - std $04,y - std $02,y - sta $01,y - lbsr L5390 - bcc L5172 - leax -$01,x - cmpa #$2C - bne L51DE - lbra L51FB -L5172 cmpa #$24 - lbeq L52B2 - cmpa #$2B - beq L5182 - cmpa #$2D - bne L5184 - inc <u0078 -L5182 lda ,x+ -L5184 cmpa #$2E - bne L5190 - tst <u0077 - bne L51DE - inc <u0077 - bra L5182 -L5190 lbsr L57DE - bcs L51E5 - pshs a - inc <u0076 - ldd $04,y - ldu $02,y - bsr L51CB - std $04,y - stu $02,y - bsr L51CB - bsr L51CB - addd $04,y - exg d,u - adcb $03,y - adca $02,y - bcs L51D8 - exg d,u - addb ,s+ - adca #$00 - bcc L51BF - leau u0001,u - stu $02,y - beq L51DA -L51BF std $04,y - stu $02,y - tst <u0077 - beq L5182 - inc <u0079 - bra L5182 -L51CB lslb - rola - exg d,u - rolb - rola - exg d,u - bcs L51D6 - rts -L51D6 leas $02,s -L51D8 leas $01,s -L51DA ldb #$3C - bra L51E0 -L51DE ldb #$3B -L51E0 stb <u0036 - coma - puls pc,u -L51E5 eora #$45 - anda #$DF - beq L520E - leax -$01,x - tst <u0076 - bne L51F3 - bra L51DE -L51F3 tst <u0077 - bne L523C - ldd $02,y - bne L523C -L51FB ldd $04,y - bmi L523C - tst <u0078 - beq L5207 - nega - negb - sbca #$00 -L5207 std $01,y -L5209 lda #$01 - lbra L5295 -L520E lda ,x - cmpa #$2B - beq L521A - cmpa #$2D - bne L521C - inc <u0075 -L521A leax $01,x -L521C lbsr L57DC - bcs L51DE - tfr a,b - lbsr L57DC - bcc L522C - leax -$01,x - bra L5233 -L522C pshs a - lda #$0A - mul - addb ,s+ -L5233 tst <u0075 - bne L5238 - negb -L5238 addb <u0079 - stb <u0079 -L523C ldb #$20 - stb $01,y - ldd $02,y - bne L524D - cmpd $04,y - bne L524D - clr $01,y - bra L5293 -L524D tsta - bmi L525A -L5250 dec $01,y - lsl $05,y - rol $04,y - rolb - rola - bpl L5250 -L525A std $02,y - clr <u0075 - ldb <u0079 - beq L528B - bpl L5267 - negb - inc <u0075 -L5267 cmpb #$13 - bls L527B - subb #$13 - pshs b - leau >L513E,pcr - bsr L529B - puls b - lbcs L51DA -L527B decb - lda #$05 - mul - leau >L50E4,pcr - leau b,u - bsr L529B - lbcs L51DA -L528B lda $05,y - anda #$FE - ora <u0078 - sta $05,y -L5293 lda #$02 -L5295 sta ,y - andcc #$FE - puls pc,u -L529B leay -$06,y - ldd ,u - std $01,y - ldd u0002,u - std $03,y - ldb u0004,u - stb $05,y - lda <u0075 - lbeq L509E - lbra L50A1 -L52B2 lbsr L57DC - bcc L52C7 - cmpa #$61 - bcs L52BD - suba #$20 -L52BD cmpa #$41 - bcs L52DC - cmpa #$46 - bhi L52DC - suba #$37 -L52C7 inc <u0076 - ldb #$04 -L52CB lsl $02,y - rol $01,y - lbcs L51DA - decb - bne L52CB - adda $02,y - sta $02,y - bra L52B2 -L52DC leax -$01,x - tst <u0076 - lbeq L51DE - lbra L5209 - pshs x - ldx <u0082 - lbsr L514E - bcc L52F2 -L52F0 puls pc,x -L52F2 cmpa #$02 - beq L52F9 - lbsr L509B -L52F9 lbsr L5384 - bcs L5305 - ldb #$3D - stb <u0036 - coma - puls pc,x -L5305 stx <u0082 - clra - puls pc,x - pshs x - ldx <u0082 - lbsr L514E - bcs L52F0 - cmpa #$01 - bne L532A - tst $01,y - beq L52F9 - bra L532A - pshs x - ldx <u0082 - lbsr L514E - bcs L52F0 - cmpa #$01 - beq L52F9 -L532A ldb #$3A - stb <u0036 - coma - puls pc,x - pshs u,x - leay -$06,y - ldu <u004A - stu $01,y - lda #$04 - sta ,y - ldx <u0082 -L533F lda ,x+ - bsr L5396 - bcs L5349 - sta ,u+ - bra L533F -L5349 stx <u0082 - lda #$FF - sta ,u+ - stu <u0048 - clra - puls pc,u,x - pshs x - leay -$06,y - lda #$03 - sta ,y - clr $02,y - ldx <u0082 - bsr L5390 - bcs L537F - cmpa #$54 - beq L5379 - cmpa #$74 - beq L5379 - eora #$46 - anda #$DF - beq L537B - ldb #$3A - stb <u0036 - coma - puls pc,x -L5379 com $02,y -L537B bsr L5384 - bcc L537B -L537F stx <u0082 - clra - puls pc,x -L5384 lda ,x+ - cmpa #$20 - bne L5396 - bsr L5390 - bcc L53A5 - bra L53A7 -L5390 lda ,x+ - cmpa #$20 - beq L5390 -L5396 cmpa <u00DD - beq L53A7 - cmpa #$0D - beq L53A5 - cmpa #$FF - beq L53A5 - andcc #$FE - rts -L53A5 leax -$01,x -L53A7 orcc #$01 - rts -L53AA pshs u,x - clra - sta $03,y - sta <u0076 - sta <u0078 - lda #$04 - sta <u007E - ldd $01,y - bpl L53C1 - nega - negb - sbca #$00 - inc <u0078 -L53C1 leau >L50DA,pcr -L53C5 clr <u007A - leau u0002,u -L53C9 subd ,u - bcs L53D1 - inc <u007A - bra L53C9 -L53D1 addd ,u - tst <u007A - bne L53DB - tst $03,y - beq L53E6 -L53DB inc $03,y - pshs a - lda <u007A - lbsr L54EA - puls a -L53E6 dec <u007E - bne L53C5 - tfr b,a - lbsr L54EA - leay $06,y - puls pc,u,x -L53F3 pshs u,x - clr <u0075 - clr <u0078 - clr <u007C - clr <u007B - clr <u0079 - clr <u0076 - leau ,x - ldd #$0A30 -L5406 stb ,u+ - deca - bne L5406 - ldd $01,y - bne L5413 - inca - lbra L54E4 -L5413 ldb $05,y - bitb #$01 - beq L541F - stb <u0078 - andb #$FE - stb $05,y -L541F ldd $01,y - bpl L5426 - inc <u0075 - nega -L5426 cmpa #$03 - bls L5457 - ldb #$9A - mul - lsra - nop - nop - tfr a,b - tst <u0075 - beq L5437 - negb -L5437 stb <u0079 - cmpa #$13 - bls L544A - pshs a - leau >L513E,pcr - lbsr L529B - puls a - suba #$13 -L544A leau >L50E4,pcr - deca - ldb #$05 - mul - leau d,u - lbsr L529B -L5457 ldd $02,y - tst $01,y - beq L5483 - bpl L546F -L545F lsra - rorb - ror $04,y - ror $05,y - ror <u007C - inc $01,y - bne L545F - std $02,y - bra L5483 -L546F lsl $05,y - rol $04,y - rolb - rola - rol <u007B - dec $01,y - bne L546F - std $02,y - inc <u0079 - lda <u007B - bsr L54EA -L5483 ldd $02,y - ldu $04,y -L5487 clr <u007B - bsr L54F1 - std $02,y - stu $04,y - pshs a - lda <u007B - sta <u007C - puls a - bsr L54F1 - bsr L54F1 - exg d,u - addd $04,y - exg d,u - adcb $03,y - adca $02,y - pshs a - lda <u007B - adca <u007C - bsr L54EA - lda <u0076 - cmpa #$09 - puls a - beq L54C1 - cmpd #$0000 - bne L5487 - cmpu #$0000 - bne L5487 -L54C1 sta ,y - lda <u0076 - cmpa #$09 - bcs L54E2 - ldb ,y - bpl L54E2 -L54CD lda ,-x - inca - sta ,x - cmpa #$39 - bls L54E2 - lda #$30 - sta ,x - cmpx ,s - bne L54CD - inc ,x - inc <u0079 -L54E2 lda #$09 -L54E4 sta <u0076 - leay $06,y - puls pc,u,x -L54EA ora #$30 - sta ,x+ - inc <u0076 - rts -L54F1 exg d,u - lslb - rola - exg d,u - rolb - rola - rol <u007B - rts - pshs y,x - ldx <u0080 - stx <u0082 - lda #$01 - sta <u007D - ldy #$0100 - lda <u007F - os9 I$ReadLn - bra L5524 - pshs y,x - ldd <u0082 - subd <u0080 - beq L5528 - tfr d,y - ldx <u0080 - stx <u0082 - lda <u007F - os9 I$WritLn -L5524 bcc L5528 - stb <u0036 -L5528 puls pc,y,x - pshs u,x - lda ,y - cmpa #$02 - beq L5536 - ldu $01,y - bra L553D -L5536 lda $01,y - bgt L5542 - ldu #$0000 -L553D ldx #$0000 - bra L555E -L5542 ldx $02,y - ldu $04,y - suba #$20 - bcs L554F - ldb #$4E - coma - bra L5565 -L554F exg x,d - lsra - rorb - exg d,u - rora - rorb - exg d,x - exg x,u - inca - bne L554F -L555E lda <u007F - os9 I$Seek - bcc L5567 -L5565 stb <u0036 -L5567 puls pc,u,x - pshs u,x - leas -$0A,s - leax ,s - lbsr L53F3 - pshs x - lda #$09 - leax $09,x -L5578 ldb ,-x - cmpb #$30 - bne L5583 - deca - cmpa #$01 - bne L5578 -L5583 sta <u0076 - puls x - ldb <u0079 - bgt L55AC - negb - tfr b,a - cmpb #$09 - bhi L55C6 - addb <u0076 - cmpb #$09 - bhi L55C6 - pshs a - lbsr L5643 - clra - bsr L5612 - puls b - tstb - beq L55A8 - lbsr L5634 -L55A8 lda <u0076 - bra L55BF -L55AC cmpb #$09 - bhi L55C6 - lbsr L5643 - tfr b,a - bsr L5601 - bsr L5612 - lda <u0076 - suba <u0079 - bls L55C1 -L55BF bsr L5601 -L55C1 leas $0A,s - clra - puls pc,u,x -L55C6 bsr L5643 - lda #$01 - bsr L5601 - bsr L5612 - lda <u0076 - deca - bne L55D4 - inca -L55D4 bsr L5601 - bsr L55DA - bra L55C1 -L55DA lda #$45 - bsr L5614 - lda <u0079 - deca - pshs a - bpl L55EB - neg ,s - bsr L5647 - bra L55ED -L55EB bsr L564B -L55ED puls b - clra -L55F0 subb #$0A - bcs L55F7 - inca - bra L55F0 -L55F7 addb #$0A - bsr L55FD - tfr b,a -L55FD adda #$30 - bra L5614 -L5601 tfr a,b - tstb - beq L560D -L5606 lda ,x+ - bsr L5614 - decb - bne L5606 -L560D rts -L560E lda #$20 - bra L5614 -L5612 lda #$2E -L5614 pshs u,a - leau <-$40,s - cmpu <u0082 - bhi L562A - cmpa #$0D - beq L562A - lda #$50 - sta <u0036 - sta <u00DE - bra L5632 -L562A ldu <u0082 - sta ,u+ - stu <u0082 - inc <u007D -L5632 puls pc,u,a -L5634 lda #$30 -L5636 tstb - beq L563E -L5639 bsr L5614 - decb - bne L5639 -L563E rts -L563F tst <u0078 - beq L560E -L5643 tst <u0078 - beq L563E -L5647 lda #$2D - bra L5614 -L564B lda #$2B - bra L5614 -L564F lda #$20 - bra L5636 -L5653 bsr L5614 -L5655 lda ,x+ - cmpa #$FF - bne L5653 - rts - pshs x - ldx $01,y -L5660 bsr L5655 - clra - puls pc,x - pshs x - leax >L5143,pcr - lda $02,y - bne L5660 - leax >L5148,pcr - bra L5660 - pshs u,x - leas -$05,s - leax ,s - lbsr L53AA - bsr L5643 - lda <u0076 - leax ,s - lbsr L5601 - leas $05,s - clra - puls pc,u,x - tfr a,b -L568E pshs u - ldu <u0082 - subb <u007D - bls L5698 - bsr L564F -L5698 clra - puls pc,u - lbsr L560E -L569E lda <u007D - anda #$0F - cmpa #$01 - beq L56B2 - lbsr L560E - bra L569E - lda #$0D - clr <u007D - lbsr L5614 -L56B2 clra - rts - pshs u - lda #$04 - leau ,y - tst ,u - bne L56C1 - asra - leau u0001,u -L56C1 sta <u0086 - tfr a,b - asrb - lbsr L585D - puls pc,u -L56CB clrb - stb <u0087 - cmpa #$3C - beq L56DE - cmpa #$3E - bne L56D9 - incb - bra L56DE -L56D9 cmpa #$5E - bne L56E2 - decb -L56DE stb <u0087 - lda ,x+ -L56E2 cmpa #$2C - beq L571E - cmpa #$FF - bne L56FC - lda <u0094 - beq L56F2 - leax -$01,x - bra L5707 -L56F2 ldx <u008E - tst <u00DC - beq L5700 - clr <u00DC - bra L571E -L56FC cmpa #$29 - beq L5703 -L5700 orcc #$01 - rts -L5703 lda <u0094 - beq L5700 -L5707 dec <u0092 - bne L571C - ldu <u0046 - pulu y,a - sta <u0092 - sty <u0090 - stu <u0046 - lda ,x+ - dec <u0094 - bra L56E2 -L571C ldx <u0090 -L571E stx <u008C - andcc #$FE - rts -L5723 rola - neg <u00DF - lsla - neg <u00DC - fcb $52 R - neg <u00CF - fcb $45 E - neg <u00CC - comb - neg <u00D3 - fcb $42 B - neg <u00D0 - lsrb - neg <u000A - lslb - neg <u0012 - beq L573D -L573D orcc #$00 - bsr L56E2 - bcs L57A7 - ldb <u0086 - lbsr L568E - bra L5772 - bsr L56E2 - bcs L57A7 - ldb <u0086 - lbsr L564F - bra L5772 -L5755 cmpa #$FF - beq L57A7 - cmpa #$27 - bne L5765 - lda ,x+ - bsr L56E2 - bcs L57A7 - bra L5772 -L5765 lbsr L5614 - lda ,x+ - bra L5755 - pshs y,x - clr <u00DC - inc <u00DC -L5772 ldx <u008C - bsr L57C2 - bcs L5791 - cmpa #$28 - bne L57AB - lda <u0092 - stb <u0092 - beq L57AB - inc <u0094 - ldu <u0046 - ldy <u0090 - pshu y,a - stu <u0046 - stx <u0090 - lda ,x+ -L5791 leay >L5723,pcr - clrb -L5796 pshs a - eora ,y - anda #$DF - puls a - beq L57B2 - leay $03,y - incb - tst ,y - bne L5796 -L57A7 ldb #$3F - bra L57AD -L57AB ldb #$3E -L57AD stb <u0036 - coma - puls pc,y,x -L57B2 stb <u0085 - ldd $01,y - leay d,y - bsr L57C2 - bcc L57BE - ldb #$01 -L57BE stb <u0086 - jmp ,y -L57C2 bsr L57DC - bcs L57EB - tfr a,b - bsr L57DC - bcs L57E8 - bsr L57EE - bsr L57DC - bcs L57E8 - bsr L57EE - tsta - beq L57D8 - clrb -L57D8 lda ,x+ - bra L57E8 -L57DC lda ,x+ -L57DE cmpa #$30 - bcs L57EB - cmpa #$39 - bhi L57EB - suba #$30 -L57E8 andcc #$FE - rts -L57EB orcc #$01 - rts -L57EE pshs a - lda #$0A - mul - addb ,s+ - adca #$00 - rts - cmpa #$2E - bne L57A7 - bsr L57C2 - bcs L57A7 - stb <u0089 - lbsr L56CB - bcs L57A7 - puls y,x - inc <u00DC - ldb <u0085 - lbeq L58B3 - decb - beq L5826 - decb - lbeq L5969 - decb - lbeq L5A10 - decb - lbeq L591E - lbra L5904 -L5826 jsr <u0016 - cmpa #$04 - bcs L583C - ldu $01,y - clrb -L582F lda ,u+ - cmpa #$FF - beq L5838 - incb - bne L582F -L5838 ldu $01,y - bra L585D -L583C leau $01,y - lda ,y - cmpa #$02 - bne L5848 - ldb #$05 - bra L585D -L5848 cmpa #$01 - bne L5852 - ldb #$02 - cmpb <u0086 - bcs L5856 -L5852 ldb #$01 - leau u0001,u -L5856 tfr b,a - lsla - cmpa <u0086 - bhi L5893 -L585D tst <u0087 - beq L5889 - bmi L5870 - pshs b - lslb - pshs b - ldb <u0086 - subb ,s+ - bcs L5887 - bra L587C -L5870 pshs b - lslb - pshs b - ldb <u0086 - subb ,s+ - bcs L5887 - asrb -L587C pshs b - lda <u0086 - suba ,s+ - sta <u0086 - lbsr L564F -L5887 puls b -L5889 lda ,u - lsra - lsra - lsra - lsra - bsr L58A3 - beq L58A1 -L5893 lda ,u+ - bsr L58A3 - beq L58A1 - decb - bne L5889 - ldb <u0086 - lbsr L564F -L58A1 clra - rts -L58A3 anda #$0F - cmpa #$09 - bls L58AB - adda #$07 -L58AB lbsr L55FD - dec <u0086 - rts -L58B1 coma - rts -L58B3 jsr <u0016 - cmpa #$02 - bcs L58BE - bne L58B1 - lbsr L5098 -L58BE pshs u,x - leas -$05,s - leax ,s - lbsr L53AA - ldb <u0086 - decb - subb <u0076 - bpl L58D5 - leas $05,s - puls u,x - lbra L5A07 -L58D5 tst <u0087 - beq L58E3 - bmi L58F4 - lbsr L564F - lbsr L563F - bra L58FA -L58E3 lbsr L563F - pshs b - lda <u0076 - lbsr L5601 - puls b - lbsr L564F - bra L58FF -L58F4 lbsr L563F - lbsr L5634 -L58FA lda <u0076 - lbsr L5601 -L58FF leas $05,s - clra - puls pc,u,x -L5904 jsr <u0016 - cmpa #$03 - bne L58B1 - pshs u,x - leax >L5143,pcr - ldb #$04 - lda $02,y - bne L5932 - leax >L5148,pcr - ldb #$05 - bra L5932 -L591E jsr <u0016 - cmpa #$04 - bne L58B1 - pshs u,x - ldx $01,y - ldd <u0048 - subd $01,y - subd #$0001 - tsta - bne L5936 -L5932 cmpb <u0086 - bls L5938 -L5936 ldb <u0086 -L5938 tfr b,a - negb - addb <u0086 - tst <u0087 - beq L594F - bmi L5953 - pshs a - lbsr L564F - puls a - lbsr L5601 - bra L5966 -L594F pshs b - bra L595E -L5953 lsrb - bcc L5957 - incb -L5957 pshs b,a - lbsr L564F - puls a -L595E lbsr L5601 - puls b - lbsr L564F -L5966 clra - puls pc,u,x -L5969 jsr <u0016 - cmpa #$02 - beq L5976 - lbcc L58B1 - lbsr L509B -L5976 pshs u,x - leas -$0A,s - leax ,s - lbsr L53F3 - lda <u0079 - cmpa #$09 - bgt L5996 - lbsr L5A6A - lda <u0086 - suba #$02 - bmi L5996 - suba <u0089 - bmi L5996 - suba <u008A - bpl L599C -L5996 leas $0A,s - puls u,x - bra L5A07 -L599C sta <u0088 - leax ,s - ldb <u0087 - beq L59AC - bmi L59B2 - bsr L59E9 - bsr L59BE - bra L59B9 -L59AC bsr L59BE - bsr L59E9 - bra L59B9 -L59B2 bsr L59E9 - bsr L59C1 - lbsr L563F -L59B9 leas $0A,s - clra - puls pc,u,x -L59BE lbsr L563F -L59C1 lda <u008A - lbsr L5601 - lbsr L5612 - ldb <u0079 - bpl L59F9 - negb - cmpb <u0089 - bls L59D4 - ldb <u0089 -L59D4 pshs b - lbsr L5634 - ldb <u0089 - subb ,s+ - stb <u0089 - lda <u008B - cmpa <u0089 - bls L59E7 - lda <u0089 -L59E7 bra L59FB -L59E9 ldb <u0088 - lbra L564F -L59EE lbsr L563F - lda <u008A - lbsr L5601 - lbsr L5612 -L59F9 lda <u008B -L59FB lbsr L5601 - ldb <u0089 - subb <u008B - ble L5A0F - lbra L5634 -L5A07 ldb <u0086 - lda #$2A - lbsr L5636 - clra -L5A0F rts -L5A10 jsr <u0016 - cmpa #$02 - beq L5A1D - lbcc L58B1 - lbsr L509B -L5A1D pshs u,x - leas -$0A,s - leax ,s - lbsr L53F3 - lda <u0079 - pshs a - lda #$01 - sta <u0079 - bsr L5A6A - puls a - ldb <u0079 - cmpb #$01 - beq L5A39 - inca -L5A39 ldb #$01 - stb <u008A - sta <u0079 - lda <u0086 - suba #$06 - bmi L5A4D - suba <u0089 - bmi L5A4D - suba <u008A - bpl L5A53 -L5A4D leas $0A,s - puls u,x - bra L5A07 -L5A53 sta <u0088 - ldb <u0087 - beq L5A62 - bsr L59E9 - bsr L59EE - lbsr L55DA - bra L5A67 -L5A62 bsr L59EE - lbsr L55DA -L5A67 lbra L59B9 -L5A6A pshs x - lda <u0079 - adda <u0089 - bne L5A78 - lda ,x - cmpa #$35 - bcc L5A8F -L5A78 deca - bmi L5AAB - cmpa #$07 - bhi L5AAB - leax a,x - ldb $01,x - cmpb #$35 - bcs L5AAB -L5A87 inc ,x - ldb ,x - cmpb #$39 - bls L5AAB -L5A8F ldb #$30 - stb ,x - leax -$01,x - cmpx ,s - bcc L5A87 - ldx ,s - leax $08,x -L5A9D lda ,-x - sta $01,x - cmpx ,s - bhi L5A9D - lda #$31 - sta ,x - inc <u0079 -L5AAB puls x - lda <u0079 - bpl L5AB2 - clra -L5AB2 sta <u008A - nega - adda #$09 - bpl L5ABA - clra -L5ABA cmpa <u0089 - bls L5AC0 - lda <u0089 -L5AC0 sta <u008B - rts - ldb #$30 - stb <u0036 - coma - rts - - emod -eom equ * - end
--- a/level1/cmds/makefile Wed Oct 09 14:44:30 2002 +0000 +++ b/level1/cmds/makefile Wed Oct 09 14:46:20 2002 +0000 @@ -2,7 +2,7 @@ DEPENDS = ./Makefile -BASIC09FILES = gfx.asm inkey.asm syscall.asm +BASIC09FILES = runb.asm gfx.asm inkey.asm syscall.asm COCOCMDS_D1 = attr backup binex build cmp copy date \ dcheck debug deiniz del deldir dir display dsave dump \ echo edit error exbin free help ident iniz link \ @@ -10,7 +10,7 @@ printerr procs pwd pxd \ rename save setime shell sleep tee tmode tsmon \ tuneport unlink verify xmode gfx inkey syscall -COCOCMDS_D2 = asm config help copy del dir os9gen rename park +COCOCMDS_D2 = asm config help copy del dir os9gen rename runb park COCOCMDS = cobbler format os9gen grfo DRAGONCMDS = cobbler_d64 format_d64 os9gen_d64 drvr51.dr go51 ALLOBJS = $(COCOCMDS_D1) $(COCOCMDS_D2) $(COCOCMDS) $(DRAGONCMDS)