4000-   AD 00 BF    LDA   $BF00
4003-   C9 4C       CMP   #$4C
4005-   F0 27       BEQ   $402E
4007-   20 8D 44    JSR   $448D
400A-   8D 8D 87    STA   $878D
400D-   BF          ???
400E-   C5 D2       CMP   $D2
4010-   D2 CF       CMP   ($CF)
4012-   D2 A0       CMP   ($A0)
4014-   A0 D2       LDY   #$D2
4016-   D5 CE       CMP   $CE,X
4018-   A0 D5       LDY   #$D5
401A-   CE C4 C5    DEC   $C5C4
401D-   D2 A0       CMP   ($A0)
401F-   D0 D2       BNE   $3FF3
4021-   CF          ???
4022-   C4 CF       CPY   $CF
4024-   D3          ???
4025-   A0 CF       LDY   #$CF
4027-   CE CC D9    DEC   $D9CC
402A-   00          BRK
402B-   4C D0 03    JMP   $03D0
402E-   AD 00 C0    LDA   $C000    r:KBD  w:CLR80COL
4031-   2C 10 C0    BIT   $C010    r:KBDSTRB
4034-   49 DC       EOR   #$DC
4036-   49 CD       EOR   #$CD
4038-   C9 95       CMP   #$95
403A-   F0 03       BEQ   $403F
403C-   4C 45 41    JMP   $4145
403F-   20 58 FC    JSR   $FC58    F8ROM:HOME
4042-   A9 00       LDA   #$00
4044-   85 01       STA   $01
4046-   A9 04       LDA   #$04
4048-   85 02       STA   $02
404A-   A9 0A       LDA   #$0A
404C-   85 00       STA   $00
404E-   20 AE EF    JSR   $EFAE
4051-   A9 AE       LDA   #$AE
4053-   A4 A1       LDY   $A1
4055-   91 01       STA   ($01),Y
4057-   C6 00       DEC   $00
4059-   D0 F3       BNE   $404E
405B-   E6 02       INC   $02
405D-   A5 02       LDA   $02
405F-   C9 08       CMP   #$08
4061-   D0 E7       BNE   $404A
4063-   A2 09       LDX   #$09
4065-   20 59 F2    JSR   $F259
4068-   A2 07       LDX   #$07
406A-   20 EA F7    JSR   $F7EA
406D-   20 8D 44    JSR   $448D
4070-   D0 F2       BNE   $4064
4072-   EF          ???
4073-   C4 CF       CPY   $CF
4075-   D3          ???
4076-   A0 C3       LDY   #$C3
4078-   E8          INX
4079-   E5 E1       SBC   $E1
407B-   F4          ???
407C-   A0 A6       LDY   #$A6
407E-   A0 C3       LDY   #$C3
4080-   F2 E1       SBC   ($E1)
4082-   E3          ???
4083-   EB          ???
4084-   E5 F2       SBC   $F2
4086-   A0 F6       LDY   #$F6
4088-   B1 AE       LDA   ($AE),Y
408A-   B0 00       BCS   $408C
408C-   A2 0A       LDX   #$0A
408E-   20 59 F2    JSR   $F259
4091-   A2 11       LDX   #$11
4093-   20 EA F7    JSR   $F7EA
4096-   20 8D 44    JSR   $448D
4099-   E2          ???
409A-   F9 A0 AD    SBC   $ADA0,Y
409D-   C4 C3       CPY   $C3
409F-   AD 00 A2    LDA   $A200
40A2-   0E 20 59    ASL   $5920
40A5-   F2 A2       SBC   ($A2)
40A7-   0B          ???
40A8-   20 EA F7    JSR   $F7EA
40AB-   20 8D 44    JSR   $448D
40AE-   D3          ???
40AF-   E8          INX
40B0-   EF          ???
40B1-   EF          ???
40B2-   F4          ???
40B3-   E9 EE       SBC   #$EE
40B5-   E7          ???
40B6-   A0 D3       LDY   #$D3
40B8-   F4          ???
40B9-   E1 F2       SBC   ($F2,X)
40BB-   A0 B2       LDY   #$B2
40BD-   B1 ED       LDA   ($ED),Y
40BF-   E7          ???
40C0-   00          BRK
40C1-   A2 0F       LDX   #$0F
40C3-   20 59 F2    JSR   $F259
40C6-   A2 0E       LDX   #$0E
40C8-   20 EA F7    JSR   $F7EA
40CB-   20 8D 44    JSR   $448D
40CE-   B2 B0       LDA   ($B0)
40D0-   B6 AF       LDX   $AF,Y
40D2-   B8          CLV
40D3-   B3          ???
40D4-   B8          CLV
40D5-   AD B7 B6    LDA   $B6B7
40D8-   B8          CLV
40D9-   B6 00       LDX   $00,Y
40DB-   A2 18       LDX   #$18
40DD-   20 59 F2    JSR   $F259
40E0-   A2 10       LDX   #$10
40E2-   20 EA F7    JSR   $F7EA
40E5-   20 8D 44    JSR   $448D
40E8-   B0 B5       BCS   $409F
40EA-   AF          ???
40EB-   B3          ???
40EC-   B1 AF       LDA   ($AF),Y
40EE-   B8          CLV
40EF-   B9 00 A9    LDA   $A900,Y
40F2-   00          BRK
40F3-   A2 FF       LDX   #$FF
40F5-   A0 DA       LDY   #$DA
40F7-   8D 4C 90    STA   $904C
40FA-   8E 9B 1C    STX   $1C9B
40FD-   8C 9C 1C    STY   $1C9C
4100-   AD 4C 90    LDA   $904C
4103-   AE 9C 1C    LDX   $1C9C
4106-   20 1F 41    JSR   $411F
4109-   AD 00 C0    LDA   $C000    r:KBD  w:CLR80COL
410C-   30 0B       BMI   $4119
410E-   EE 4C 90    INC   $904C
4111-   AD 4C 90    LDA   $904C
4114-   CD 9B 1C    CMP   $1C9B
4117-   90 E7       BCC   $4100
4119-   2C 10 C0    BIT   $C010    r:KBDSTRB
411C-   4C 45 41    JMP   $4145
411F-   8D 83 70    STA   $7083
4122-   8E 84 70    STX   $7084
4125-   AE 85 70    LDX   $7085
4128-   BC 00 FA    LDY   $FA00,X
412B-   88          DEY
412C-   D0 FD       BNE   $412B
412E-   AD 30 C0    LDA   $C030    rw:SPKR
4131-   AC 83 70    LDY   $7083
4134-   F0 03       BEQ   $4139
4136-   88          DEY
4137-   D0 FD       BNE   $4136
4139-   AD 30 C0    LDA   $C030    rw:SPKR
413C-   CE 85 70    DEC   $7085
413F-   CE 84 70    DEC   $7084
4142-   D0 E1       BNE   $4125
4144-   60          RTS
4145-   AD B3 44    LDA   $44B3
4148-   F0 17       BEQ   $4161
414A-   2C 52 C0    BIT   $C052    rw:MIXCLR
414D-   2C 54 C0    BIT   $C054    rw:TXTPAGE1
4150-   2C 57 C0    BIT   $C057    rw:HIRES
4153-   2C 50 C0    BIT   $C050    rw:TXTCLR
4156-   2C 10 C0    BIT   $C010    r:KBDSTRB
4159-   AD 00 C0    LDA   $C000    r:KBD  w:CLR80COL
415C-   10 FB       BPL   $4159
415E-   2C 51 C0    BIT   $C051    rw:TXTSET
4161-   A9 00       LDA   #$00
4163-   85 22       STA   $22
4165-   20 58 FC    JSR   $FC58    F8ROM:HOME
4168-   20 8D 44    JSR   $448D
416B-   20 20 20    JSR   $2020
416E-   20 20 20    JSR   $2020
4171-   20 20 20    JSR   $2020
4174-   20 20 20    JSR   $2020
4177-   20 20 20    JSR   $2020
417A-   20 20 20    JSR   $2020
417D-   20 20 20    JSR   $2020
4180-   20 20 20    JSR   $2020
4183-   20 20 20    JSR   $2020
4186-   20 20 20    JSR   $2020
4189-   20 20 20    JSR   $2020
418C-   20 20 20    JSR   $2020
418F-   20 20 20    JSR   $2020
4192-   20 20 20    JSR   $2020
4195-   20 20 20    JSR   $2020
4198-   20 20 20    JSR   $2020
419B-   20 20 20    JSR   $2020
419E-   20 20 20    JSR   $2020
41A1-   20 20 20    JSR   $2020
41A4-   20 20 20    JSR   $2020
41A7-   20 20 20    JSR   $2020
41AA-   20 20 20    JSR   $2020
41AD-   20 20 20    JSR   $2020
41B0-   20 20 20    JSR   $2020
41B3-   20 20 20    JSR   $2020
41B6-   20 20 20    JSR   $2020
41B9-   20 20 20    JSR   $2020
41BC-   20 20 20    JSR   $2020
41BF-   20 20 20    JSR   $2020
41C2-   20 20 20    JSR   $2020
41C5-   20 20 20    JSR   $2020
41C8-   20 20 20    JSR   $2020
41CB-   20 20 20    JSR   $2020
41CE-   20 20 20    JSR   $2020
41D1-   20 20 20    JSR   $2020
41D4-   20 20 20    JSR   $2020
41D7-   20 20 20    JSR   $2020
41DA-   20 20 20    JSR   $2020
41DD-   20 20 20    JSR   $2020
41E0-   20 20 20    JSR   $2020
41E3-   20 20 20    JSR   $2020
41E6-   20 20 20    JSR   $2020
41E9-   20 20 20    JSR   $2020
41EC-   20 20 20    JSR   $2020
41EF-   20 20 20    JSR   $2020
41F2-   20 20 20    JSR   $2020
41F5-   20 20 20    JSR   $2020
41F8-   20 20 20    JSR   $2020
41FB-   20 20 20    JSR   $2020
41FE-   20 20 20    JSR   $2020
4201-   20 20 20    JSR   $2020
4204-   20 20 20    JSR   $2020
4207-   20 20 20    JSR   $2020
420A-   20 AD AD    JSR   $ADAD
420D-   AD AD AD    LDA   $ADAD
4210-   AD AD AD    LDA   $ADAD
4213-   AD AD AD    LDA   $ADAD
4216-   AD AD AD    LDA   $ADAD
4219-   AD AD AD    LDA   $ADAD
421C-   AD AD AD    LDA   $ADAD
421F-   AD AD AD    LDA   $ADAD
4222-   AD AD AD    LDA   $ADAD
4225-   AD AD AD    LDA   $ADAD
4228-   AD AD AD    LDA   $ADAD
422B-   AD AD AD    LDA   $ADAD
422E-   AD AD AD    LDA   $ADAD
4231-   AD AD A0    LDA   $A0AD
4234-   A0 C3       LDY   #$C3
4236-   F2 E5       SBC   ($E5)
4238-   E1 F4       SBC   ($F4,X)
423A-   E5 E4       SBC   $E4
423C-   A0 F7       LDY   #$F7
423E-   E9 F4       SBC   #$F4
4240-   E8          INX
4241-   A0 D0       LDY   #$D0
4243-   F2 EF       SBC   ($EF)
4245-   C4 CF       CPY   $CF
4247-   D3          ???
4248-   A0 C3       LDY   #$C3
424A-   E8          INX
424B-   E5 E1       SBC   $E1
424D-   F4          ???
424E-   A0 CD       LDY   #$CD
4250-   E1 EB       SBC   ($EB,X)
4252-   E5 F2       SBC   $F2
4254-   A0 F6       LDY   #$F6
4256-   B1 AE       LDA   ($AE),Y
4258-   B0 A0       BCS   $41FA
425A-   A0 A0       LDY   #$A0
425C-   A0 A0       LDY   #$A0
425E-   C3          ???
425F-   E1 EC       SBC   ($EC,X)
4261-   EC A0 D3    CPX   $D3A0
4264-   E8          INX
4265-   EF          ???
4266-   EF          ???
4267-   F4          ???
4268-   E9 EE       SBC   #$EE
426A-   E7          ???
426B-   A0 D3       LDY   #$D3
426D-   F4          ???
426E-   E1 F2       SBC   ($F2,X)
4270-   A0 E1       LDY   #$E1
4272-   F4          ???
4273-   A0 B2       LDY   #$B2
4275-   B0 B6       BCS   $422D
4277-   AF          ???
4278-   B8          CLV
4279-   B3          ???
427A-   B8          CLV
427B-   AD B7 B6    LDA   $B6B7
427E-   B8          CLV
427F-   B6 A0       LDX   $A0,Y
4281-   A0 A0       LDY   #$A0
4283-   AD AD AD    LDA   $ADAD
4286-   AD AD AD    LDA   $ADAD
4289-   AD AD AD    LDA   $ADAD
428C-   AD AD AD    LDA   $ADAD
428F-   AD AD AD    LDA   $ADAD
4292-   AD AD AD    LDA   $ADAD
4295-   AD AD AD    LDA   $ADAD
4298-   AD AD AD    LDA   $ADAD
429B-   AD AD AD    LDA   $ADAD
429E-   AD AD AD    LDA   $ADAD
42A1-   AD AD AD    LDA   $ADAD
42A4-   AD AD AD    LDA   $ADAD
42A7-   AD AD AD    LDA   $ADAD
42AA-   AD 00 A9    LDA   $A900
42AD-   04 85       TSB   $85
42AF-   22          ???
42B0-   20 8D 44    JSR   $448D
42B3-   8D 8D 8D    STA   $8D8D
42B6-   A0 A0       LDY   #$A0
42B8-   A0 A0       LDY   #$A0
42BA-   A0 A0       LDY   #$A0
42BC-   A0 BC       LDY   #$BC
42BE-   C9 EE       CMP   #$EE
42C0-   F3          ???
42C1-   E5 F2       SBC   $F2
42C3-   F4          ???
42C4-   A0 E4       LDY   #$E4
42C6-   E9 F3       SBC   #$F3
42C8-   EB          ???
42C9-   A0 E1       LDY   #$E1
42CB-   EE E4 A0    INC   $A0E4
42CE-   E8          INX
42CF-   E9 F4       SBC   #$F4
42D1-   A0 E1       LDY   #$E1
42D3-   A0 EB       LDY   #$EB
42D5-   E5 F9       SBC   $F9
42D7-   BE 8D 00    LDX   $008D,Y
42DA-   2C 10 C0    BIT   $C010    r:KBDSTRB
42DD-   AD 00 C0    LDA   $C000    r:KBD  w:CLR80COL
42E0-   C9 80       CMP   #$80
42E2-   30 F9       BMI   $42DD
42E4-   2C 10 C0    BIT   $C010    r:KBDSTRB
42E7-   20 8D 44    JSR   $448D
42EA-   8D 8D D3    STA   $D38D
42ED-   E3          ???
42EE-   E1 EE       SBC   ($EE,X)
42F0-   EE E9 EE    INC   $EEE9
42F3-   E7          ???
42F4-   A0 E4       LDY   #$E4
42F6-   E9 F3       SBC   #$F3
42F8-   EB          ???
42F9-   AE AE AE    LDX   $AEAE
42FC-   00          BRK
42FD-   4C 47 43    JMP   $4347
4300-   A9 B4       LDA   #$B4
4302-   85 00       STA   $00
4304-   A9 44       LDA   #$44
4306-   85 01       STA   $01
4308-   A9 03       LDA   #$03
430A-   8D 00 03    STA   $0300
430D-   AD 30 BF    LDA   $BF30
4310-   8D 01 03    STA   $0301
4313-   A9 00       LDA   #$00
4315-   8D 02 03    STA   $0302
4318-   A9 10       LDA   #$10
431A-   8D 03 03    STA   $0303
431D-   A0 04       LDY   #$04
431F-   B1 00       LDA   ($00),Y
4321-   8D 04 03    STA   $0304
4324-   C8          INY
4325-   B1 00       LDA   ($00),Y
4327-   8D 05 03    STA   $0305
432A-   20 00 BF    JSR   $BF00    P8:READ_BLOCK(3:Unit/1,Buff,BlkNum)
432D-   80                $80
432E-   00 03             $0300
4330-   90 03       BCC   $4335
4332-   4C ED 43    JMP   $43ED
4335-   A0 02       LDY   #$02
4337-   B1 00       LDA   ($00),Y
4339-   18          CLC
433A-   69 00       ADC   #$00
433C-   85 02       STA   $02
433E-   C8          INY
433F-   B1 00       LDA   ($00),Y
4341-   69 10       ADC   #$10
4343-   85 03       STA   $03
4345-   18          CLC
4346-   60          RTS
4347-   20 00 43    JSR   $4300
434A-   A0 00       LDY   #$00
434C-   B1 02       LDA   ($02),Y
434E-   AC B2 44    LDY   $44B2
4351-   D1 00       CMP   ($00),Y
4353-   D0 08       BNE   $435D
4355-   20 6A 43    JSR   $436A
4358-   B0 34       BCS   $438E
435A-   4C 4A 43    JMP   $434A
435D-   EE B2 44    INC   $44B2
4360-   AD B2 44    LDA   $44B2
4363-   C9 02       CMP   #$02
4365-   D0 E0       BNE   $4347
4367-   4C 24 44    JMP   $4424
436A-   A5 00       LDA   $00
436C-   18          CLC
436D-   69 06       ADC   #$06
436F-   85 00       STA   $00
4371-   A5 01       LDA   $01
4373-   69 00       ADC   #$00
4375-   85 01       STA   $01
4377-   A0 00       LDY   #$00
4379-   B1 00       LDA   ($00),Y
437B-   C9 DC       CMP   #$DC
437D-   F0 03       BEQ   $4382
437F-   4C 1D 43    JMP   $431D
4382-   C8          INY
4383-   B1 00       LDA   ($00),Y
4385-   C9 DC       CMP   #$DC
4387-   F0 03       BEQ   $438C
4389-   4C 1D 43    JMP   $431D
438C-   38          SEC
438D-   60          RTS
438E-   AD B2 44    LDA   $44B2
4391-   F0 22       BEQ   $43B5
4393-   20 8D 44    JSR   $448D
4396-   E3          ???
4397-   F5 F2       SBC   $F2,X
4399-   F2 E5       SBC   ($E5)
439B-   EE F4 EC    INC   $ECF4
439E-   F9 A0 EE    SBC   $EEA0,Y
43A1-   EF          ???
43A2-   F4          ???
43A3-   A0 E9       LDY   #$E9
43A5-   EE F3 F4    INC   $F4F3
43A8-   E1 EC       SBC   ($EC,X)
43AA-   EC E5 E4    CPX   $E4E5
43AD-   AE 00 CE    LDX   $CE00
43B0-   B2 44       LDA   ($44)
43B2-   4C D1 43    JMP   $43D1
43B5-   20 8D 44    JSR   $448D
43B8-   E3          ???
43B9-   F5 F2       SBC   $F2,X
43BB-   F2 E5       SBC   ($E5)
43BD-   EE F4 EC    INC   $ECF4
43C0-   F9 A0 E9    SBC   $E9A0,Y
43C3-   EE F3 F4    INC   $F4F3
43C6-   E1 EC       SBC   ($EC,X)
43C8-   EC E5 E4    CPX   $E4E5
43CB-   AE 8D 00    LDX   $008D
43CE-   EE B2 44    INC   $44B2
43D1-   20 00 43    JSR   $4300
43D4-   AC B2 44    LDY   $44B2
43D7-   B1 00       LDA   ($00),Y
43D9-   A0 00       LDY   #$00
43DB-   91 02       STA   ($02),Y
43DD-   20 00 BF    JSR   $BF00    P8:WRITE_BLOCK(3:Unit/1,Buff,BlkNum)
43E0-   81                $81
43E1-   00 03             $0300
43E3-   B0 08       BCS   $43ED
43E5-   20 6A 43    JSR   $436A
43E8-   B0 7A       BCS   $4464
43EA-   4C D4 43    JMP   $43D4
43ED-   85 00       STA   $00
43EF-   20 8D 44    JSR   $448D
43F2-   8D 8D CD    STA   $CD8D
43F5-   CC C9 A0    CPY   $A0C9
43F8-   C5 F2       CMP   $F2
43FA-   F2 EF       SBC   ($EF)
43FC-   F2 A0       SBC   ($A0)
43FE-   A4 00       LDY   $00
4400-   A5 00       LDA   $00
4402-   20 DA FD    JSR   $FDDA    F8ROM:PRBYTE
4405-   20 8D 44    JSR   $448D
4408-   A0 AD       LDY   #$AD
440A-   AD A0 D0    LDA   $D0A0
440D-   F2 EF       SBC   ($EF)
440F-   E7          ???
4410-   F2 E1       SBC   ($E1)
4412-   ED A0 D4    SBC   $D4A0
4415-   E5 F2       SBC   $F2
4417-   ED E9 EE    SBC   $EEE9
441A-   E1 F4       SBC   ($F4,X)
441C-   E5 E4       SBC   $E4
441E-   8D 8D 00    STA   $008D
4421-   4C D0 03    JMP   $03D0
4424-   20 8D 44    JSR   $448D
4427-   E5 F2       SBC   $F2
4429-   F2 EF       SBC   ($EF)
442B-   F2 A1       SBC   ($A1)
442D-   8D 8D D4    STA   $D48D
4430-   E8          INX
4431-   E9 F3       SBC   #$F3
4433-   A0 E9       LDY   #$E9
4435-   F3          ???
4436-   A0 EE       LDY   #$EE
4438-   EF          ???
4439-   F4          ???
443A-   A0 F4       LDY   #$F4
443C-   E8          INX
443D-   E5 A0       SBC   $A0
443F-   E3          ???
4440-   EF          ???
4441-   F2 F2       SBC   ($F2)
4443-   E5 E3       SBC   $E3
4445-   F4          ???
4446-   A0 E4       LDY   #$E4
4448-   E9 F3       SBC   #$F3
444A-   EB          ???
444B-   AE 8D D0    LDX   $D08D
444E-   F2 EF       SBC   ($EF)
4450-   E7          ???
4451-   F2 E1       SBC   ($E1)
4453-   ED A0 D4    SBC   $D4A0
4456-   E5 F2       SBC   $F2
4458-   ED E9 EE    SBC   $EEE9
445B-   E1 F4       SBC   ($F4,X)
445D-   E5 E4       SBC   $E4
445F-   AE 8D 8D    LDX   $8D8D
4462-   00          BRK
4463-   60          RTS
4464-   20 8D 44    JSR   $448D
4467-   8D 8D A0    STA   $A08D
446A-   A0 A0       LDY   #$A0
446C-   A0 A0       LDY   #$A0
446E-   A0 A0       LDY   #$A0
4470-   AD A5 BE    LDA   $BEA5
4473-   A0 C3       LDY   #$C3
4475-   E8          INX
4476-   E1 EE       SBC   ($EE,X)
4478-   E7          ???
4479-   E5 F3       SBC   $F3
447B-   A0 C3       LDY   #$C3
447D-   EF          ???
447E-   ED F0 EC    SBC   $ECF0
4481-   E5 F4       SBC   $F4
4483-   E5 E4       SBC   $E4
4485-   A0 BC       LDY   #$BC
4487-   A5 AD       LDA   $AD
4489-   8D 8D 00    STA   $008D
448C-   60          RTS
448D-   68          PLA
448E-   85 FE       STA   $FE
4490-   68          PLA
4491-   85 FF       STA   $FF
4493-   A0 01       LDY   #$01
4495-   B1 FE       LDA   ($FE),Y
4497-   F0 0A       BEQ   $44A3
4499-   20 ED FD    JSR   $FDED    F8ROM:COUT
449C-   C8          INY
449D-   D0 F6       BNE   $4495
449F-   E6 FF       INC   $FF
44A1-   D0 F2       BNE   $4495
44A3-   18          CLC
44A4-   98          TYA
44A5-   65 FE       ADC   $FE
44A7-   85 FE       STA   $FE
44A9-   A5 FF       LDA   $FF
44AB-   69 00       ADC   #$00
44AD-   48          PHA
44AE-   A5 FE       LDA   $FE
44B0-   48          PHA
44B1-   60          RTS
44B2-   00          BRK
44B3-   00          BRK
44B4-   10 00       BPL   $44B6
44B6-   FE 01 00    INC   $0001,X
44B9-   00          BRK
44BA-   10 20       BPL   $44DC
44BC-   FF          ???
44BD-   01 00       ORA   ($00,X)
44BF-   00          BRK
44C0-   DC          ???
44C1-   DC          ???
