mirror of
https://github.com/mi57730/a2d.git
synced 2024-07-06 03:29:01 +00:00
927 lines
37 KiB
Plaintext
927 lines
37 KiB
Plaintext
ca65 V2.16 - Git f5e9b401
|
|
Main file : seg_00000_0057F.s
|
|
Current file: seg_00000_0057F.s
|
|
|
|
000000r 1 .org $2000
|
|
002000 1 ; da65 V2.16 - Git f5e9b401
|
|
002000 1 ; Created: 2017-09-17 10:59:59
|
|
002000 1 ; Input file: DESKTOP2_seg_00000_0057F
|
|
002000 1 ; Page: 1
|
|
002000 1
|
|
002000 1
|
|
002000 1 .setcpu "65C02"
|
|
002000 1
|
|
002000 1 L02B4 := $02B4
|
|
002000 1 L02B6 := $02B6
|
|
002000 1 L02C3 := $02C3
|
|
002000 1 L02C5 := $02C5
|
|
002000 1 L02E6 := $02E6
|
|
002000 1 L035F := $035F
|
|
002000 1 L0393 := $0393
|
|
002000 1 L03B3 := $03B3
|
|
002000 1 L03C1 := $03C1
|
|
002000 1 L03E5 := $03E5
|
|
002000 1 L0800 := $0800
|
|
002000 1 L0A8D := $0A8D
|
|
002000 1 L1031 := $1031
|
|
002000 1 L1039 := $1039
|
|
002000 1 L103B := $103B
|
|
002000 1 L1044 := $1044
|
|
002000 1 L10F4 := $10F4
|
|
002000 1 L1129 := $1129
|
|
002000 1 L118B := $118B
|
|
002000 1 L148D := $148D
|
|
002000 1 L3000 := $3000
|
|
002000 1 A2D := $4000
|
|
002000 1 L616F := $616F
|
|
002000 1 L6544 := $6544
|
|
002000 1 L6552 := $6552
|
|
002000 1 L6964 := $6964
|
|
002000 1 L6E61 := $6E61
|
|
002000 1 L7808 := $7808
|
|
002000 1 L7ECA := $7ECA
|
|
002000 1 L8D44 := $8D44
|
|
002000 1 UNKNOWN_CALL := $8E00
|
|
002000 1 MLI := $BF00
|
|
002000 1 RAMRDOFF := $C002
|
|
002000 1 RAMRDON := $C003
|
|
002000 1 RAMWRTOFF := $C004
|
|
002000 1 RAMWRTON := $C005
|
|
002000 1 ALTZPOFF := $C008
|
|
002000 1 ALTZPON := $C009
|
|
002000 1 LCBANK1 := $C08B
|
|
002000 1 LC100 := $C100
|
|
002000 1 LC300 := $C300
|
|
002000 1 AUXMOVE := $C311
|
|
002000 1 XFER := $C314
|
|
002000 1 FSUB := $E7A7
|
|
002000 1 FADD := $E7BE
|
|
002000 1 FMULT := $E97F
|
|
002000 1 FDIV := $EA66
|
|
002000 1 ROUND := $EB2B
|
|
002000 1 FLOAT := $EB93
|
|
002000 1 FIN := $EC4A
|
|
002000 1 FOUT := $ED34
|
|
002000 1 LFC22 := $FC22
|
|
002000 1 LFC58 := $FC58
|
|
002000 1 COUT := $FDED
|
|
002000 1 LFE89 := $FE89
|
|
002000 1 LFE93 := $FE93
|
|
002000 1 LFF69 := $FF69
|
|
002000 1 AD 83 C0 L2000: lda $C083
|
|
002003 1 AD 83 C0 L2003: lda $C083
|
|
002006 1 A0 00 ldy #$00
|
|
002008 1 B9 L2008: .byte $B9
|
|
002009 1 27 20 L2009: rmb2 $20
|
|
00200B 1 99 L200B: .byte $99
|
|
00200C 1 00 L200C: brk
|
|
00200D 1 D1 L200D: .byte $D1
|
|
00200E 1 B9 27 21 L200E: lda L2127,y
|
|
002011 1 99 L2011: .byte $99
|
|
002012 1 00 brk
|
|
002013 1 D2 88 L2013: cmp ($88)
|
|
002015 1 D0 F1 bne L2008
|
|
002017 1 AD 82 C0 lda $C082
|
|
00201A 1 20 00 BF jsr MLI
|
|
00201D 1 65 .byte $65
|
|
00201E 1 20 20 .addr L2020
|
|
002020 1 04 L2020: .byte $04
|
|
002021 1 00 L2021: brk
|
|
002022 1 00 L2022: brk
|
|
002023 1 00 brk
|
|
002024 1 00 brk
|
|
002025 1 00 brk
|
|
002026 1 00 brk
|
|
002027 1 4C 44 10 L2027: jmp L1044
|
|
00202A 1
|
|
00202A 1 00 brk
|
|
00202B 1 4D 6F 75 eor $756F
|
|
00202E 1 73 L202E: .byte $73
|
|
00202F 1 65 20 adc $20
|
|
002031 1 44 .byte $44
|
|
002032 1 65 73 adc $73
|
|
002034 1 6B .byte $6B
|
|
002035 1 00 brk
|
|
002036 1 18 clc
|
|
002037 1 4C .byte $4C
|
|
002038 1 6F .byte $6F
|
|
002039 1 61 L2039: .byte $61
|
|
00203A 1 64 69 L203A: stz $69
|
|
00203C 1 6E 67 20 ror L2067
|
|
00203F 1 41 70 eor ($70,x)
|
|
002041 1 70 6C bvs L20AF
|
|
002043 1 65 20 adc $20
|
|
002045 1 49 49 L2045: eor #$49
|
|
002047 1 20 44 65 jsr L6544
|
|
00204A 1 73 .byte $73
|
|
00204B 1 6B L204B: .byte $6B
|
|
00204C 1 54 L204C: .byte $54
|
|
00204D 1 6F 70 08 bbr6 $70,L2058
|
|
002050 1 44 .byte $44
|
|
002051 1 65 73 adc $73
|
|
002053 1 6B .byte $6B
|
|
002054 1 54 .byte $54
|
|
002055 1 6F 70 32 bbr6 $70,L208A
|
|
002058 1 04 00 L2058: tsb $00
|
|
00205A 1 00 brk
|
|
00205B 1 1E 00 04 asl $0400,x
|
|
00205E 1 00 brk
|
|
00205F 1 00 brk
|
|
002060 1 01 00 ora ($00,x)
|
|
002062 1 01 90 ora ($90,x)
|
|
002064 1 11 03 ora ($03),y
|
|
002066 1 28 plp
|
|
002067 1 10 00 L2067: bpl L2069
|
|
002069 1 1A L2069: inc a
|
|
00206A 1 00 brk
|
|
00206B 1 AD 82 C0 lda $C082
|
|
00206E 1 20 93 FE jsr LFE93
|
|
002071 1 20 89 FE jsr LFE89
|
|
002074 1 8D 0C C0 sta $C00C
|
|
002077 1 8D 0F C0 sta $C00F
|
|
00207A 1 8D 00 C0 sta $C000
|
|
00207D 1 20 00 C3 jsr LC300
|
|
002080 1 20 58 FC L2080: jsr LFC58
|
|
002083 1 A9 00 lda #$00
|
|
002085 1 8D 35 C0 L2085: sta $C035
|
|
002088 1 A9 40 lda #$40
|
|
00208A 1 8D 05 C0 L208A: sta RAMWRTON
|
|
00208D 1 8D 00 01 sta $0100
|
|
002090 1 8D 01 01 sta $0101
|
|
002093 1 8D 04 C0 sta RAMWRTOFF
|
|
002096 1 A9 0C lda #$0C
|
|
002098 1 85 25 sta $25
|
|
00209A 1 20 22 FC jsr LFC22
|
|
00209D 1 A9 50 lda #$50
|
|
00209F 1 38 sec
|
|
0020A0 1 ED 0F 10 sbc $100F
|
|
0020A3 1 4A lsr a
|
|
0020A4 1 85 24 sta $24
|
|
0020A6 1 A0 00 ldy #$00
|
|
0020A8 1 B9 10 10 lda $1010,y
|
|
0020AB 1 09 80 ora #$80
|
|
0020AD 1 20 .byte $20
|
|
0020AE 1 ED .byte $ED
|
|
0020AF 1 FD C8 CC L20AF: sbc $CCC8,x
|
|
0020B2 1 0F 10 D0 bbr0 $10,L2085
|
|
0020B5 1 F2 20 sbc ($20)
|
|
0020B7 1 00 brk
|
|
0020B8 1 BF CC 39 bbs3 $CC,L20F4
|
|
0020BB 1 10 .byte $10
|
|
0020BC 1 A2 17 ldx #$17
|
|
0020BE 1 A9 01 lda #$01
|
|
0020C0 1 9D 58 BF sta $BF58,x
|
|
0020C3 1 CA dex
|
|
0020C4 1 A9 00 lda #$00
|
|
0020C6 1 9D 58 BF L20C6: sta $BF58,x
|
|
0020C9 1 CA dex
|
|
0020CA 1 10 FA bpl L20C6
|
|
0020CC 1 A9 CF lda #$CF
|
|
0020CE 1 8D 58 BF sta $BF58
|
|
0020D1 1 AD 03 10 lda $1003
|
|
0020D4 1 D0 39 bne L210F
|
|
0020D6 1 20 00 BF L20D6: jsr MLI
|
|
0020D9 1 C7 .byte $C7
|
|
0020DA 1 3B 10 .addr L103B
|
|
0020DC 1 F0 L20DC: .byte $F0
|
|
0020DD 1 03 L20DD: .byte $03
|
|
0020DE 1 4C 8B 11 jmp L118B
|
|
0020E1 1
|
|
0020E1 1 A9 FF L20E1: lda #$FF
|
|
0020E3 1 8D 03 10 sta $1003
|
|
0020E6 1 AD FE 03 lda $03FE
|
|
0020E9 1 8D 89 11 sta $1189
|
|
0020EC 1 AD FF 03 lda $03FF
|
|
0020EF 1 8D 8A 11 sta $118A
|
|
0020F2 1 AD .byte $AD
|
|
0020F3 1 83 .byte $83
|
|
0020F4 1 C0 AD L20F4: cpy #$AD
|
|
0020F6 1 83 .byte $83
|
|
0020F7 1 C0 A0 cpy #$A0
|
|
0020F9 1 00 brk
|
|
0020FA 1 B9 00 10 L20FA: lda $1000,y
|
|
0020FD 1 99 00 D1 sta $D100,y
|
|
002100 1 B9 00 11 lda $1100,y
|
|
002103 1 99 00 D2 sta $D200,y
|
|
002106 1 88 dey
|
|
002107 1 D0 F1 bne L20FA
|
|
002109 1 AD 82 C0 lda $C082
|
|
00210C 1 4C F4 10 jmp L10F4
|
|
00210F 1
|
|
00210F 1 AD 89 11 L210F: lda $1189
|
|
002112 1 8D FE 03 sta $03FE
|
|
002115 1 AD 8A 11 lda $118A
|
|
002118 1 8D FF 03 sta $03FF
|
|
00211B 1 20 00 BF jsr MLI
|
|
00211E 1 C6 .byte $C6
|
|
00211F 1 3B 10 .addr L103B
|
|
002121 1 F0 03 beq L2126
|
|
002123 1 4C 29 11 jmp L1129
|
|
002126 1
|
|
002126 1 20 L2126: .byte $20
|
|
002127 1 00 L2127: brk
|
|
002128 1 BF C8 3E bbs3 $C8,L2169
|
|
00212B 1 10 .byte $10
|
|
00212C 1 F0 .byte $F0
|
|
00212D 1 03 L212D: .byte $03
|
|
00212E 1 4C 8B 11 L212E: jmp L118B
|
|
002131 1
|
|
002131 1 AD 43 10 L2131: lda $1043
|
|
002134 1 8D 32 10 sta $1032
|
|
002137 1 20 00 BF jsr MLI
|
|
00213A 1 CA .byte $CA
|
|
00213B 1 31 10 .addr L1031
|
|
00213D 1 F0 03 beq L2142
|
|
00213F 1 4C 8B 11 jmp L118B
|
|
002142 1
|
|
002142 1 20 00 BF L2142: jsr MLI
|
|
002145 1 CC .byte $CC
|
|
002146 1 39 10 .addr L1039
|
|
002148 1 F0 03 beq L214D
|
|
00214A 1 4C 8B 11 jmp L118B
|
|
00214D 1
|
|
00214D 1 4C 00 20 L214D: jmp L2000
|
|
002150 1
|
|
002150 1 20 00 C3 jsr LC300
|
|
002153 1 20 58 FC jsr LFC58
|
|
002156 1 A9 0C lda #$0C
|
|
002158 1 85 25 sta $25
|
|
00215A 1 20 22 FC jsr LFC22
|
|
00215D 1 A9 50 lda #$50
|
|
00215F 1 38 sec
|
|
002160 1 ED 60 11 sbc $1160
|
|
002163 1 4A lsr a
|
|
002164 1 85 24 sta $24
|
|
002166 1 A0 00 ldy #$00
|
|
002168 1 B9 L2168: .byte $B9
|
|
002169 1 61 11 L2169: adc ($11,x)
|
|
00216B 1 09 80 ora #$80
|
|
00216D 1 20 ED FD jsr COUT
|
|
002170 1 C8 iny
|
|
002171 1 CC 60 11 cpy $1160
|
|
002174 1 D0 F2 bne L2168
|
|
002176 1 8D 10 C0 L2176: sta $C010
|
|
002179 1 AD 00 C0 L2179: lda $C000
|
|
00217C 1 10 FB bpl L2179
|
|
00217E 1 29 7F and #$7F
|
|
002180 1 C9 0D cmp #$0D
|
|
002182 1 D0 F2 bne L2176
|
|
002184 1 4C 44 10 jmp L1044
|
|
002187 1
|
|
002187 1 28 plp
|
|
002188 1 49 6E eor #$6E
|
|
00218A 1 73 .byte $73
|
|
00218B 1 65 72 adc $72
|
|
00218D 1 74 20 stz $20,x
|
|
00218F 1 74 68 stz $68,x
|
|
002191 1 65 20 adc $20
|
|
002193 1 73 .byte $73
|
|
002194 1 79 73 74 adc $7473,y
|
|
002197 1 65 6D adc $6D
|
|
002199 1 20 64 69 jsr L6964
|
|
00219C 1 73 .byte $73
|
|
00219D 1 6B .byte $6B
|
|
00219E 1 20 61 6E jsr L6E61
|
|
0021A1 1 64 20 stz $20
|
|
0021A3 1 50 72 bvc L2217
|
|
0021A5 1 65 73 adc $73
|
|
0021A7 1 73 .byte $73
|
|
0021A8 1 20 52 65 jsr L6552
|
|
0021AB 1 74 75 stz $75,x
|
|
0021AD 1 72 6E adc ($6E)
|
|
0021AF 1 2E 00 00 rol a:$00
|
|
0021B2 1 85 06 sta $06
|
|
0021B4 1 4C 69 FF jmp LFF69
|
|
0021B7 1
|
|
0021B7 1 00 brk
|
|
0021B8 1 00 brk
|
|
0021B9 1 00 brk
|
|
0021BA 1 00 brk
|
|
0021BB 1 00 brk
|
|
0021BC 1 00 brk
|
|
0021BD 1 00 brk
|
|
0021BE 1 00 brk
|
|
0021BF 1 00 brk
|
|
0021C0 1 00 brk
|
|
0021C1 1 00 brk
|
|
0021C2 1 00 brk
|
|
0021C3 1 00 brk
|
|
0021C4 1 00 brk
|
|
0021C5 1 00 brk
|
|
0021C6 1 00 brk
|
|
0021C7 1 00 brk
|
|
0021C8 1 00 brk
|
|
0021C9 1 00 brk
|
|
0021CA 1 00 brk
|
|
0021CB 1 00 brk
|
|
0021CC 1 00 brk
|
|
0021CD 1 00 brk
|
|
0021CE 1 00 brk
|
|
0021CF 1 00 brk
|
|
0021D0 1 00 brk
|
|
0021D1 1 00 brk
|
|
0021D2 1 00 brk
|
|
0021D3 1 00 brk
|
|
0021D4 1 00 brk
|
|
0021D5 1 00 brk
|
|
0021D6 1 00 brk
|
|
0021D7 1 00 brk
|
|
0021D8 1 00 brk
|
|
0021D9 1 00 brk
|
|
0021DA 1 00 brk
|
|
0021DB 1 00 brk
|
|
0021DC 1 00 brk
|
|
0021DD 1 00 brk
|
|
0021DE 1 00 brk
|
|
0021DF 1 00 brk
|
|
0021E0 1 00 brk
|
|
0021E1 1 00 brk
|
|
0021E2 1 00 brk
|
|
0021E3 1 00 brk
|
|
0021E4 1 00 brk
|
|
0021E5 1 00 brk
|
|
0021E6 1 00 brk
|
|
0021E7 1 00 brk
|
|
0021E8 1 00 brk
|
|
0021E9 1 00 brk
|
|
0021EA 1 00 brk
|
|
0021EB 1 00 brk
|
|
0021EC 1 00 brk
|
|
0021ED 1 00 brk
|
|
0021EE 1 00 brk
|
|
0021EF 1 00 brk
|
|
0021F0 1 00 brk
|
|
0021F1 1 00 brk
|
|
0021F2 1 00 brk
|
|
0021F3 1 00 brk
|
|
0021F4 1 00 brk
|
|
0021F5 1 00 brk
|
|
0021F6 1 00 brk
|
|
0021F7 1 00 brk
|
|
0021F8 1 00 brk
|
|
0021F9 1 00 brk
|
|
0021FA 1 00 brk
|
|
0021FB 1 00 brk
|
|
0021FC 1 00 brk
|
|
0021FD 1 00 brk
|
|
0021FE 1 00 brk
|
|
0021FF 1 00 brk
|
|
002200 1 4C 4C 20 jmp L204C
|
|
002203 1
|
|
002203 1 03 .byte $03
|
|
002204 1 18 clc
|
|
002205 1 20 00 30 jsr L3000
|
|
002208 1 00 brk
|
|
002209 1 04 00 tsb $00
|
|
00220B 1 00 brk
|
|
00220C 1 00 brk
|
|
00220D 1 00 brk
|
|
00220E 1 00 brk
|
|
00220F 1 00 brk
|
|
002210 1 00 brk
|
|
002211 1 01 00 ora ($00,x)
|
|
002213 1 02 .byte $02
|
|
002214 1 00 brk
|
|
002215 1 80 05 bra L221C
|
|
002217 1 00 L2217: brk
|
|
002218 1 08 php
|
|
002219 1 44 .byte $44
|
|
00221A 1 65 73 adc $73
|
|
00221C 1 6B L221C: .byte $6B
|
|
00221D 1 54 .byte $54
|
|
00221E 1 6F 70 32 bbr6 $70,L2253
|
|
002221 1 00 brk
|
|
002222 1 3F 00 40 bbr3 $00,L2265
|
|
002225 1 00 brk
|
|
002226 1 40 rti
|
|
002227 1
|
|
002227 1 00 brk
|
|
002228 1 40 rti
|
|
002229 1
|
|
002229 1 00 brk
|
|
00222A 1 08 php
|
|
00222B 1 90 02 bcc L222F
|
|
00222D 1 00 brk
|
|
00222E 1 40 rti
|
|
00222F 1
|
|
00222F 1 00 L222F: brk
|
|
002230 1 D0 00 bne L2232
|
|
002232 1 FB L2232: .byte $FB
|
|
002233 1 00 brk
|
|
002234 1 40 rti
|
|
002235 1
|
|
002235 1 00 brk
|
|
002236 1 08 php
|
|
002237 1 90 02 bcc L223B
|
|
002239 1 00 brk
|
|
00223A 1 80 .byte $80
|
|
00223B 1 00 L223B: brk
|
|
00223C 1 1D 00 05 ora $0500,x
|
|
00223F 1 00 brk
|
|
002240 1 7F 00 08 bbr7 $00,L224B
|
|
002243 1 60 rts
|
|
002244 1
|
|
002244 1 01 01 ora ($01,x)
|
|
002246 1 02 .byte $02
|
|
002247 1 02 .byte $02
|
|
002248 1 00 brk
|
|
002249 1 00 brk
|
|
00224A 1 00 brk
|
|
00224B 1 06 A2 L224B: asl $A2
|
|
00224D 1 17 A9 rmb1 $A9
|
|
00224F 1 00 brk
|
|
002250 1 9D 59 BF L2250: sta $BF59,x
|
|
002253 1 CA L2253: dex
|
|
002254 1 10 FA bpl L2250
|
|
002256 1 08 php
|
|
002257 1 78 sei
|
|
002258 1 20 00 BF jsr MLI
|
|
00225B 1 C8 .byte $C8
|
|
00225C 1 03 20 .addr L2003
|
|
00225E 1 28 plp
|
|
00225F 1 29 FF and #$FF
|
|
002261 1 F0 01 beq L2264
|
|
002263 1 00 brk
|
|
002264 1 AD L2264: .byte $AD
|
|
002265 1 08 L2265: php
|
|
002266 1 20 8D 14 jsr L148D
|
|
002269 1 20 8D 0A jsr L0A8D
|
|
00226C 1 20 08 78 jsr L7808
|
|
00226F 1 20 00 BF jsr MLI
|
|
002272 1 CE .byte $CE
|
|
002273 1 13 20 .addr L2013
|
|
002275 1 28 plp
|
|
002276 1 29 FF and #$FF
|
|
002278 1 F0 01 beq L227B
|
|
00227A 1 00 brk
|
|
00227B 1 A9 00 L227B: lda #$00
|
|
00227D 1 8D DC 20 sta L20DC
|
|
002280 1 AD DC 20 lda L20DC
|
|
002283 1 CD 4B 20 cmp L204B
|
|
002286 1 D0 11 bne L2299
|
|
002288 1 08 php
|
|
002289 1 78 sei
|
|
00228A 1 20 00 BF jsr MLI
|
|
00228D 1 CC .byte $CC
|
|
00228E 1 11 20 .addr L2011
|
|
002290 1 28 plp
|
|
002291 1 29 FF and #$FF
|
|
002293 1 F0 01 beq L2296
|
|
002295 1 00 brk
|
|
002296 1 4C 00 08 L2296: jmp L0800
|
|
002299 1
|
|
002299 1 0A L2299: asl a
|
|
00229A 1 AA tax
|
|
00229B 1 BD 21 20 lda L2021,x
|
|
00229E 1 8D 0B 20 sta L200B
|
|
0022A1 1 BD 22 20 lda L2022,x
|
|
0022A4 1 8D 0C 20 sta L200C
|
|
0022A7 1 BD 39 20 lda L2039,x
|
|
0022AA 1 8D 0D 20 sta L200D
|
|
0022AD 1 BD 3A 20 lda L203A,x
|
|
0022B0 1 8D 0E 20 sta L200E
|
|
0022B3 1 08 php
|
|
0022B4 1 78 sei
|
|
0022B5 1 20 00 BF jsr MLI
|
|
0022B8 1 CA .byte $CA
|
|
0022B9 1 09 20 .addr L2009
|
|
0022BB 1 28 plp
|
|
0022BC 1 29 FF and #$FF
|
|
0022BE 1 F0 01 beq L22C1
|
|
0022C0 1 00 brk
|
|
0022C1 1 AE DC 20 L22C1: ldx L20DC
|
|
0022C4 1 BD 45 20 lda L2045,x
|
|
0022C7 1 F0 0D beq L22D6
|
|
0022C9 1 C9 02 cmp #$02
|
|
0022CB 1 F0 06 beq L22D3
|
|
0022CD 1 20 2E 21 jsr L212E
|
|
0022D0 1 4C D6 20 jmp L20D6
|
|
0022D3 1
|
|
0022D3 1 20 DD 20 L22D3: jsr L20DD
|
|
0022D6 1 EE DC 20 L22D6: inc L20DC
|
|
0022D9 1 4C 80 20 jmp L2080
|
|
0022DC 1
|
|
0022DC 1 00 brk
|
|
0022DD 1 8D 09 C0 sta ALTZPON
|
|
0022E0 1 AD 8B C0 lda LCBANK1
|
|
0022E3 1 AD 8B C0 lda LCBANK1
|
|
0022E6 1 A9 80 lda #$80
|
|
0022E8 1 8D 00 01 sta $0100
|
|
0022EB 1 8D 01 01 sta $0101
|
|
0022EE 1 A9 00 lda #$00
|
|
0022F0 1 85 06 sta $06
|
|
0022F2 1 85 08 sta $08
|
|
0022F4 1 AD DC 20 lda L20DC
|
|
0022F7 1 0A asl a
|
|
0022F8 1 AA tax
|
|
0022F9 1 BD 2E 20 lda L202E,x
|
|
0022FC 1 85 09 sta $09
|
|
0022FE 1 AD 0C 20 lda L200C
|
|
002301 1 85 07 sta $07
|
|
002303 1 18 clc
|
|
002304 1 7D 3A 20 adc L203A,x
|
|
002307 1 8D 2D 21 sta L212D
|
|
00230A 1 BD 39 20 lda L2039,x
|
|
00230D 1 F0 03 beq L2312
|
|
00230F 1 EE 2D 21 inc L212D
|
|
002312 1 A0 00 L2312: ldy #$00
|
|
002314 1 B1 06 L2314: lda ($06),y
|
|
002316 1 91 08 sta ($08),y
|
|
002318 1 C8 iny
|
|
002319 1 D0 F9 bne L2314
|
|
00231B 1 E6 07 inc $07
|
|
00231D 1 E6 09 inc $09
|
|
00231F 1 A5 07 lda $07
|
|
002321 1 CD 2D 21 cmp L212D
|
|
002324 1 D0 EE bne L2314
|
|
002326 1 8D 08 C0 sta ALTZPOFF
|
|
002329 1 AD 82 C0 lda $C082
|
|
00232C 1 60 rts
|
|
00232D 1
|
|
00232D 1 00 brk
|
|
00232E 1 A9 00 lda #$00
|
|
002330 1 85 06 sta $06
|
|
002332 1 85 08 sta $08
|
|
002334 1 AD DC 20 lda L20DC
|
|
002337 1 0A asl a
|
|
002338 1 AA tax
|
|
002339 1 BD 2E 20 lda L202E,x
|
|
00233C 1 85 09 sta $09
|
|
00233E 1 AD 0C 20 lda L200C
|
|
002341 1 85 07 sta $07
|
|
002343 1 18 clc
|
|
002344 1 7D 3A 20 adc L203A,x
|
|
002347 1 8D 68 21 sta L2168
|
|
00234A 1 8D 02 C0 sta RAMRDOFF
|
|
00234D 1 8D 05 C0 sta RAMWRTON
|
|
002350 1 A0 00 ldy #$00
|
|
002352 1 B1 06 L2352: lda ($06),y
|
|
002354 1 91 08 sta ($08),y
|
|
002356 1 C8 iny
|
|
002357 1 D0 F9 bne L2352
|
|
002359 1 E6 07 inc $07
|
|
00235B 1 E6 09 inc $09
|
|
00235D 1 A5 07 lda $07
|
|
00235F 1 CD 68 21 cmp L2168
|
|
002362 1 D0 EE bne L2352
|
|
002364 1 8D 04 C0 sta RAMWRTOFF
|
|
002367 1 60 rts
|
|
002368 1
|
|
002368 1 00 brk
|
|
002369 1 00 brk
|
|
00236A 1 00 brk
|
|
00236B 1 00 brk
|
|
00236C 1 00 brk
|
|
00236D 1 00 brk
|
|
00236E 1 00 brk
|
|
00236F 1 00 brk
|
|
002370 1 00 brk
|
|
002371 1 00 brk
|
|
002372 1 00 brk
|
|
002373 1 00 brk
|
|
002374 1 00 brk
|
|
002375 1 00 brk
|
|
002376 1 00 brk
|
|
002377 1 00 brk
|
|
002378 1 00 brk
|
|
002379 1 00 brk
|
|
00237A 1 00 brk
|
|
00237B 1 00 brk
|
|
00237C 1 00 brk
|
|
00237D 1 00 brk
|
|
00237E 1 00 brk
|
|
00237F 1 00 brk
|
|
002380 1 00 brk
|
|
002381 1 00 brk
|
|
002382 1 00 brk
|
|
002383 1 00 brk
|
|
002384 1 00 brk
|
|
002385 1 00 brk
|
|
002386 1 00 brk
|
|
002387 1 00 brk
|
|
002388 1 00 brk
|
|
002389 1 00 brk
|
|
00238A 1 00 brk
|
|
00238B 1 00 brk
|
|
00238C 1 00 brk
|
|
00238D 1 00 brk
|
|
00238E 1 00 brk
|
|
00238F 1 00 brk
|
|
002390 1 00 brk
|
|
002391 1 00 brk
|
|
002392 1 00 brk
|
|
002393 1 00 brk
|
|
002394 1 00 brk
|
|
002395 1 00 brk
|
|
002396 1 00 brk
|
|
002397 1 00 brk
|
|
002398 1 00 brk
|
|
002399 1 00 brk
|
|
00239A 1 00 brk
|
|
00239B 1 00 brk
|
|
00239C 1 00 brk
|
|
00239D 1 00 brk
|
|
00239E 1 00 brk
|
|
00239F 1 00 brk
|
|
0023A0 1 00 brk
|
|
0023A1 1 00 brk
|
|
0023A2 1 00 brk
|
|
0023A3 1 00 brk
|
|
0023A4 1 00 brk
|
|
0023A5 1 00 brk
|
|
0023A6 1 00 brk
|
|
0023A7 1 00 brk
|
|
0023A8 1 00 brk
|
|
0023A9 1 00 brk
|
|
0023AA 1 00 brk
|
|
0023AB 1 00 brk
|
|
0023AC 1 00 brk
|
|
0023AD 1 00 brk
|
|
0023AE 1 00 brk
|
|
0023AF 1 00 brk
|
|
0023B0 1 00 brk
|
|
0023B1 1 00 brk
|
|
0023B2 1 00 brk
|
|
0023B3 1 00 brk
|
|
0023B4 1 00 brk
|
|
0023B5 1 00 brk
|
|
0023B6 1 00 brk
|
|
0023B7 1 00 brk
|
|
0023B8 1 00 brk
|
|
0023B9 1 00 brk
|
|
0023BA 1 00 brk
|
|
0023BB 1 00 brk
|
|
0023BC 1 00 brk
|
|
0023BD 1 00 brk
|
|
0023BE 1 00 brk
|
|
0023BF 1 00 brk
|
|
0023C0 1 00 brk
|
|
0023C1 1 00 brk
|
|
0023C2 1 00 brk
|
|
0023C3 1 00 brk
|
|
0023C4 1 00 brk
|
|
0023C5 1 00 brk
|
|
0023C6 1 00 brk
|
|
0023C7 1 00 brk
|
|
0023C8 1 00 brk
|
|
0023C9 1 00 brk
|
|
0023CA 1 00 brk
|
|
0023CB 1 00 brk
|
|
0023CC 1 00 brk
|
|
0023CD 1 00 brk
|
|
0023CE 1 00 brk
|
|
0023CF 1 00 brk
|
|
0023D0 1 00 brk
|
|
0023D1 1 00 brk
|
|
0023D2 1 00 brk
|
|
0023D3 1 00 brk
|
|
0023D4 1 00 brk
|
|
0023D5 1 00 brk
|
|
0023D6 1 00 brk
|
|
0023D7 1 00 brk
|
|
0023D8 1 00 brk
|
|
0023D9 1 00 brk
|
|
0023DA 1 00 brk
|
|
0023DB 1 00 brk
|
|
0023DC 1 00 brk
|
|
0023DD 1 00 brk
|
|
0023DE 1 00 brk
|
|
0023DF 1 00 brk
|
|
0023E0 1 00 brk
|
|
0023E1 1 00 brk
|
|
0023E2 1 00 brk
|
|
0023E3 1 00 brk
|
|
0023E4 1 00 brk
|
|
0023E5 1 00 brk
|
|
0023E6 1 00 brk
|
|
0023E7 1 00 brk
|
|
0023E8 1 00 brk
|
|
0023E9 1 00 brk
|
|
0023EA 1 00 brk
|
|
0023EB 1 00 brk
|
|
0023EC 1 00 brk
|
|
0023ED 1 00 brk
|
|
0023EE 1 00 brk
|
|
0023EF 1 00 brk
|
|
0023F0 1 00 brk
|
|
0023F1 1 00 brk
|
|
0023F2 1 00 brk
|
|
0023F3 1 00 brk
|
|
0023F4 1 00 brk
|
|
0023F5 1 00 brk
|
|
0023F6 1 00 brk
|
|
0023F7 1 00 brk
|
|
0023F8 1 00 brk
|
|
0023F9 1 00 brk
|
|
0023FA 1 00 brk
|
|
0023FB 1 00 brk
|
|
0023FC 1 00 brk
|
|
0023FD 1 00 brk
|
|
0023FE 1 00 brk
|
|
0023FF 1 00 brk
|
|
002400 1 48 pha
|
|
002401 1 AD 61 C0 lda $C061
|
|
002404 1 2D 62 C0 and $C062
|
|
002407 1 10 07 bpl L2410
|
|
002409 1 AD 00 C0 lda $C000
|
|
00240C 1 C9 D0 cmp #$D0
|
|
00240E 1 F0 04 beq L2414
|
|
002410 1 68 L2410: pla
|
|
002411 1 4C CA 7E jmp L7ECA
|
|
002414 1
|
|
002414 1 8D 10 C0 L2414: sta $C010
|
|
002417 1 8D 01 C0 sta $C001
|
|
00241A 1 8D 0D C0 sta $C00D
|
|
00241D 1 8D 5E C0 sta $C05E
|
|
002420 1 AD 50 C0 lda $C050
|
|
002423 1 AD 57 C0 lda $C057
|
|
002426 1 8D 08 C0 sta ALTZPOFF
|
|
002429 1 8D 82 C0 sta $C082
|
|
00242C 1 A9 00 lda #$00
|
|
00242E 1 8D C5 03 sta $03C5
|
|
002431 1 4C 5F 03 jmp L035F
|
|
002434 1
|
|
002434 1 A0 00 ldy #$00
|
|
002436 1 B9 CF 03 lda $03CF,y
|
|
002439 1 F0 07 beq L2442
|
|
00243B 1 20 C1 03 jsr L03C1
|
|
00243E 1 C8 iny
|
|
00243F 1 4C B6 02 jmp L02B6
|
|
002442 1
|
|
002442 1 60 L2442: rts
|
|
002443 1
|
|
002443 1 A0 00 ldy #$00
|
|
002445 1 B9 DE 03 lda $03DE,y
|
|
002448 1 F0 07 beq L2451
|
|
00244A 1 20 C1 03 jsr L03C1
|
|
00244D 1 C8 iny
|
|
00244E 1 4C C5 02 jmp L02C5
|
|
002451 1
|
|
002451 1 60 L2451: rts
|
|
002452 1
|
|
002452 1 A2 00 ldx #$00
|
|
002454 1 BD E0 02 L2454: lda $02E0,x
|
|
002457 1 20 C1 03 jsr L03C1
|
|
00245A 1 E8 inx
|
|
00245B 1 E0 06 cpx #$06
|
|
00245D 1 D0 F5 bne L2454
|
|
00245F 1 60 rts
|
|
002460 1
|
|
002460 1 1B .byte $1B
|
|
002461 1 47 30 rmb4 $30
|
|
002463 1 35 36 and $36,x
|
|
002465 1 30 20 bmi L2487
|
|
002467 1 D2 02 cmp ($02)
|
|
002469 1 A0 00 ldy #$00
|
|
00246B 1 8C CC 03 sty $03CC
|
|
00246E 1 A9 01 lda #$01
|
|
002470 1 8D C9 03 sta $03C9
|
|
002473 1 A9 00 lda #$00
|
|
002475 1 8D C6 03 sta $03C6
|
|
002478 1 8D C7 03 sta $03C7
|
|
00247B 1 A9 08 L247B: lda #$08
|
|
00247D 1 8D CB 03 sta $03CB
|
|
002480 1 AD C5 03 lda $03C5
|
|
002483 1 8D C8 03 sta $03C8
|
|
002486 1 AD L2486: .byte $AD
|
|
002487 1 C8 L2487: iny
|
|
002488 1 03 .byte $03
|
|
002489 1 20 93 03 jsr L0393
|
|
00248C 1 AD CC 03 lda $03CC
|
|
00248F 1 4A lsr a
|
|
002490 1 A8 tay
|
|
002491 1 8D 54 C0 sta $C054
|
|
002494 1 B0 03 bcs L2499
|
|
002496 1 8D 55 C0 sta $C055
|
|
002499 1 B1 06 L2499: lda ($06),y
|
|
00249B 1 2D C9 03 and $03C9
|
|
00249E 1 C9 01 cmp #$01
|
|
0024A0 1 6E CA 03 ror $03CA
|
|
0024A3 1 EE C8 03 inc $03C8
|
|
0024A6 1 CE CB 03 dec $03CB
|
|
0024A9 1 D0 DB bne L2486
|
|
0024AB 1 AD CA 03 lda $03CA
|
|
0024AE 1 49 FF eor #$FF
|
|
0024B0 1 8D 54 C0 sta $C054
|
|
0024B3 1 20 C1 03 jsr L03C1
|
|
0024B6 1 AD C6 03 lda $03C6
|
|
0024B9 1 C9 2F cmp #$2F
|
|
0024BB 1 D0 07 bne L24C4
|
|
0024BD 1 AD C7 03 lda $03C7
|
|
0024C0 1 C9 02 cmp #$02
|
|
0024C2 1 F0 17 beq L24DB
|
|
0024C4 1 0E C9 03 L24C4: asl $03C9
|
|
0024C7 1 10 08 bpl L24D1
|
|
0024C9 1 A9 01 lda #$01
|
|
0024CB 1 8D C9 03 sta $03C9
|
|
0024CE 1 EE CC 03 inc $03CC
|
|
0024D1 1 EE C6 03 L24D1: inc $03C6
|
|
0024D4 1 D0 A5 bne L247B
|
|
0024D6 1 EE C7 03 inc $03C7
|
|
0024D9 1 D0 A0 bne L247B
|
|
0024DB 1 8D 54 C0 L24DB: sta $C054
|
|
0024DE 1 60 rts
|
|
0024DF 1
|
|
0024DF 1 20 B3 03 jsr L03B3
|
|
0024E2 1 20 B4 02 jsr L02B4
|
|
0024E5 1 20 E6 02 L24E5: jsr L02E6
|
|
0024E8 1 A9 0D lda #$0D
|
|
0024EA 1 20 C1 03 jsr L03C1
|
|
0024ED 1 A9 0A lda #$0A
|
|
0024EF 1 20 C1 03 jsr L03C1
|
|
0024F2 1 AD C8 03 lda $03C8
|
|
0024F5 1 8D C5 03 sta $03C5
|
|
0024F8 1 C9 C0 cmp #$C0
|
|
0024FA 1 90 E9 bcc L24E5
|
|
0024FC 1 A9 0D lda #$0D
|
|
0024FE 1 20 C1 03 jsr L03C1
|
|
002501 1 A9 0D lda #$0D
|
|
002503 1 20 C1 03 jsr L03C1
|
|
002506 1 20 C3 02 jsr L02C3
|
|
002509 1 8D 09 C0 sta ALTZPON
|
|
00250C 1 AD 8B C0 lda LCBANK1
|
|
00250F 1 AD 8B C0 lda LCBANK1
|
|
002512 1 60 rts
|
|
002513 1
|
|
002513 1 48 pha
|
|
002514 1 29 C7 and #$C7
|
|
002516 1 49 08 eor #$08
|
|
002518 1 85 07 sta $07
|
|
00251A 1 29 F0 and #$F0
|
|
00251C 1 4A lsr a
|
|
00251D 1 4A lsr a
|
|
00251E 1 4A lsr a
|
|
00251F 1 85 06 sta $06
|
|
002521 1 68 pla
|
|
002522 1 29 38 and #$38
|
|
002524 1 0A asl a
|
|
002525 1 0A asl a
|
|
002526 1 45 06 eor $06
|
|
002528 1 0A asl a
|
|
002529 1 26 07 rol $07
|
|
00252B 1 0A asl a
|
|
00252C 1 26 07 rol $07
|
|
00252E 1 45 06 eor $06
|
|
002530 1 85 06 sta $06
|
|
002532 1 60 rts
|
|
002533 1
|
|
002533 1 A9 C1 lda #$C1
|
|
002535 1 85 37 sta $37
|
|
002537 1 A9 00 lda #$00
|
|
002539 1 85 36 sta $36
|
|
00253B 1 A9 8D lda #$8D
|
|
00253D 1 20 E5 03 jsr L03E5
|
|
002540 1 60 rts
|
|
002541 1
|
|
002541 1 20 ED FD jsr COUT
|
|
002544 1 60 rts
|
|
002545 1
|
|
002545 1 00 brk
|
|
002546 1 00 brk
|
|
002547 1 00 brk
|
|
002548 1 00 brk
|
|
002549 1 00 brk
|
|
00254A 1 00 brk
|
|
00254B 1 00 brk
|
|
00254C 1 00 brk
|
|
00254D 1 00 brk
|
|
00254E 1 00 brk
|
|
00254F 1 1B .byte $1B
|
|
002550 1 65 1B adc $1B
|
|
002552 1 54 .byte $54
|
|
002553 1 31 36 and ($36),y
|
|
002555 1 09 4C ora #$4C
|
|
002557 1 20 44 8D jsr L8D44
|
|
00255A 1 09 5A ora #$5A
|
|
00255C 1 8D 00 1B sta $1B00
|
|
00255F 1 4E 1B 54 lsr $541B
|
|
002562 1 32 34 and ($34)
|
|
002564 1 00 brk
|
|
002565 1 4C 00 C1 jmp LC100
|
|
002568 1
|
|
002568 1 00 brk
|
|
002569 1 00 brk
|
|
00256A 1 00 brk
|
|
00256B 1 00 brk
|
|
00256C 1 00 brk
|
|
00256D 1 00 brk
|
|
00256E 1 00 brk
|
|
00256F 1 00 brk
|
|
002570 1 00 brk
|
|
002571 1 00 brk
|
|
002572 1 00 brk
|
|
002573 1 00 brk
|
|
002574 1 00 brk
|
|
002575 1 00 brk
|
|
002576 1 00 brk
|
|
002577 1 00 brk
|
|
002578 1 00 brk
|
|
002579 1 00 brk
|
|
00257A 1 00 brk
|
|
00257B 1 00 brk
|
|
00257C 1 00 brk
|
|
00257D 1 00 brk
|
|
00257E 1 00 brk
|
|
00257F 1 00 brk
|
|
00257F 1
|