*---------------------------------------------------------* * Disassembled with The Flaming Bird Disassembler * * (c) Phoenix corp. 1992,93 - All rights reserved * *---------------------------------------------------------* REL mx %00 use DEMOSEG.X.S use DEMOSEG.E.S use 4/Mem.Macs use 4/Util.Macs *------------------------------- PHP SEP #$20 LDX #L0238AC STX L023836 PLP L11000A ENT PHP SEP #$20 JSL L291003 LDX #$0000 STX L023FEC LDX #L020368 STX L023FE8 LDA #$01 STA L024426 SEP #$20 SEP #$20 STZ L023834 LDX #L023740 STX L0237EB LDA #$01 STA L024459 LDA #$01 STA L02445B STZ L02464A L11003C LDX L0237EB STX $60 LDA ($60) STA $5C REP #$20 INC $60 LDA $60 STA L0237EB SEP #$20 LDA $5C CMP #$FF BNE L110060 JSL L1101BD JSL L1102A9 PLP RTL L110060 LDA $5C BIT #$01 BNE L1100A4 STZ $61 STA $60 LDY $60 REP #$20 LDA L023696,Y STA $70 SEP #$20 JSL L110120 LDA $64 STA L024458 REP #$20 LDX #L023364 LDY #L024D98 LDA #$000F PHB MVN L023364,L024D98 PLB SEP #$20 JSL L181526 JSL L11017C JSL L1200BA BCC L1100A1 JMP L11033F L1100A1 JMP L11003C L1100A4 LDA $5C AND #$FE STA $5C STZ $61 STA $60 LDY $60 REP #$20 LDA L023696,Y STA $70 SEP #$20 JSL L110120 LDA $64 STA L024458 LDX #L023364 STX $60 LDA $64 STA $65 ASL STA $5C STZ $5D REP #$20 LDA $60 CLC ADC $5C STA $60 LDA #L024D98 STA $70 L1100DE DEC $60 SEP #$20 LDA ($60) STA $64 LDX $60 DEX STX $60 LDA ($60) EOR #$FF INC STA $5C STA ($70) LDX $70 INX STX $70 LDA $64 STA $5C STA ($70) LDX $70 INX STX $70 DEC $65 REP #$20 BNE L1100DE SEP #$20 JSL L181526 JSL L11017C JSL L1200BA BCC L11011D JMP L11033F L11011D JMP L11003C L110120 PHP SEP #$20 STZ $64 LDX #L023364 STX $60 L11012A LDA ($70) STA $5C CMP #$F0 BCS L110157 LDA $5C LSR CLC ADC #$31 STA ($60) LDX $60 INX STX $60 LDY #$0001 LDA ($70),Y STA $5C STA ($60) REP #$20 INC $60 INC $70 INC $70 SEP #$20 INC $64 JMP L11012A L110157 LDA $5C CLC ADC #$08 ASL ASL STA $5C STZ $61 STA $60 REP #$20 LDY $60 LDA L023811,Y STA $68 STA L0237EF INY INY LDA L023811,Y STA $6A STA L0237F1 PLP RTL L11017C PHP SEP #$20 LDA L023833 INC STA L023833 AND #$03 BNE L11019A LDA L023833 AND #$0F JSL L110395 JMP L11019A JSL L1101BD L11019A LDX #$0000 STX L023D85 LDX #$FFFF STX $64 STX $66 LDX #$FFFF STX L023D85 LDX L0237EF STX $64 LDX L0237F1 STX $66 JSL L072F07 PLP RTL L1101BD PHP SEP #$20 LDX #L023374 STX L0237ED L1101C6 LDY L0237ED STY $70 LDA ($70) STA $5C CMP #$FF BNE L1101D5 PLP RTL L1101D5 LSR $5C LDA $5C CLC ADC #$31 STA $60 LDY #$0001 LDA ($70),Y STA $61 LDX $60 PHX REP #$20 INC $70 INC $70 LDX #$6666 STX L023D85 L1101F4 LDX $60 STX L023FEE SEP #$20 LDA ($70) STA $5C CMP #$F0 BCS L11025E LDX $70 INX STX $70 LSR $5C LDA $5C CLC ADC #$31 STA $5C STA $60 LDA ($70) STA $61 LDX $70 INX STX $70 LDX $60 STX L023FF0 LDX $60 PHX LDX $70 PHX LDX L023D85 STX $60 JSL L0F2148 PLX STX $70 LDA L023FEE EOR #$FF INC STA $5C STA L023FEE LDA L023FF0 EOR #$FF INC STA $5C STA L023FF0 LDX $70 PHX LDX L023D85 STX $60 JSL L0F2148 PLX STX $70 PLX STX $60 JMP L1101F4 L11025E LDX $70 INX STX $70 STX L0237ED LDX $60 STX L023FEE PLX STX $60 STX L023FF0 LDX $70 PHX LDX L023D85 STX $60 JSL L0F2148 LDA L023FEE EOR #$FF INC STA L023FEE LDA L023FF0 EOR #$FF INC STA L023FF0 LDX L023D85 STX $60 JSL L0F2148 PLX STX $70 JSL L1200BA BCC L1102A6 PLX PLX JMP L11033F L1102A6 JMP L1101C6 L1102A9 PHP SEP #$20 JSL L1104B9 LDX #$001E STX $64 L1102B5 LDX $64 PHX JSL L110407 PLX STX $64 JSL L1200BA BCC L1102CA PLX PLX JMP L11033F L1102CA LDX $64 DEX STX $64 BNE L1102B5 JSL L29101E JSL L1103A0 STZ L024426 LDX #$0000 STX L023D85 LDX #$0063 STX $64 LDX #$2000 STX $70 LDX #$9C60 STX $6C LDX #$00E1 STX $72 STX $6E REP #$20 L1102FA LDX $64 PHX LDA #$0000 STA [$6C] STA [$70] LDX $70 TXY INY LDA #$007E PHB MVN $E10000,$E10000 PLB LDX $6C TXY INY LDA #$007E PHB MVN $E10000,$E10000 PLB LDA $70 CLC ADC #$0140 STA $70 LDA $6C SEC SBC #$0140 STA $6C LDX #$0005 STX L023C89 JSL L120000 PLX DEX STX $64 BEQ L11033F JMP L1102FA L11033F STZ L024426 REP #$20 LDA #$0000 STAL $E12000 LDA #$00C8 STA $44 LDX #$2000 LDY #$2001 LDA #$007E L110359 PHB MVN $E10000,$E10000 PLB TYA CLC ADC #$0020 TAY LDX #$2000 LDA #$007F DEC $44 BNE L110359 SEP #$20 LDX #L0237FB STX $70 STZ $60 LDX #$0008 STX $64 L11037C LDA ($70) STA $61 LDX $70 INX STX $70 INC $60 LDX $64 DEX STX $64 BNE L11037C LDA #$04 STA L023834 PLP RTL L110395 PHP REP #$20 LDX #$0020 STX L023C89 PLP RTL L1103A0 PHP SEP #$20 LDY #L023838 STY L023836 L1103A9 JSL L1200BA BCC L1103B4 PLX PLX JMP L11033F L1103B4 LDX L023836 STX $60 LDA ($60) STA $5C LDX $60 INX STX $60 STX L023836 LDA ($60) STA $5C CMP #$FF BEQ L1103F0 LDA $5C STA $61 STZ $60 REP #$20 LDA $60 LSR STA $68 LSR CLC ADC $68 ASL CLC ADC #L1C0000 STA $60 STA $6C LDA #^L1C0000 STA $6E JSL L1104FB L1103F0 REP #$20 JSL L110407 LDA L023836 STA $60 SEP #$20 LDA ($60) STA $5C CMP #$FF BNE L1103A9 PLP RTL L110407 PHP SEP #$20 JSL L110421 LDX #L023E26 STX $60 STZ L023E26 L110416 LDA L023E26 STA $5C CMP #$0A BCC L110416 PLP RTL L110421 PHP SEP #$20 LDA L023928 DEC STA $5C BNE L110430 LDA #$09 STA $5C L110430 LDA $5C STA L023928 LDX #L023904 STX $60 ASL $5C ASL $5C STZ $5D REP #$20 LDA $60 CLC ADC $5C STA $60 LDA ($60) STA $68 INC $60 INC $60 LDA ($60) STA $6A LDA #$FFFF STA L023D85 LDA #$00E1 STA $72 LDA #$450E STA $70 LDA $68 STA $64 JSL L11047F LDA $6A STA $64 JSL L11047F LDA $68 STA $64 JSL L11047F PLP RTL L11047F PHP REP #$20 LDA $64 AND #$FF00 STA [$70] LDX $70 INX INX STX $70 LDA #$0010 STA $46 L110494 LDA $64 STA [$70] LDX $70 INX INX STX $70 DEC $46 BNE L110494 LDA $64 AND #$F0FF STA [$70] LDX #$007E STX $64 REP #$20 LDA $70 CLC ADC $64 STA $70 PLP RTL L1104B9 PHP REP #$20 LDY #$5734 STY $70 LDY #$00E1 STY $72 LDA #$0000 STA [$70] LDA #$0010 STA $44 LDX $70 TXY INY LDA #$0016 L1104D7 PHB MVN $E10000,$E10000 PLB TYA CLC ADC #$0088 TAY LDX $70 LDA #$0017 DEC $44 BNE L1104D7 SEP #$20 LDY #L1C0000 STY $6C LDY #^L1C0000 STY $6E PLP JMP L1104FB L1104FB PHP SEP #$20 LDY #$5734 STY $70 LDA #$E1 STAL L11051E+1 LDA $6E STAL L11051E+2 REP #$20 LDA #$0010 STA $44 LDX $6C LDY $70 L11051A LDA #$0017 PHB L11051E MVN $000000,$000000 PLB TYA CLC ADC #$0088 TAY DEC $44 BNE L11051A SEP #$20 PLP RTL L110530 DW $0000 DW $001E DW $0003 DW $00B4 DW $0003 DW $00FA DW $0004 DW $0014 DW $0005 DW $012C DW $0007 DW $0096 DW $0008 DW $0003 DW $000A DW $00E0 DW $000C DW $0050 DW $000D DW $005A DW $000F DW $0078 DW $0010 DW $003C DW $0011 DW $0136 DW $0012 DW $00C8 DW $0013 DW $0118 DW $0014 DW $0032 DW $0016 DW $00B4 DW $0018 DW $0028 DW $001A DW $00F0 DW $001C DW $0014 L110580 DW $0000 DW $0082 DW $0003 DW $0050 DW $0003 DW $0096 DW $0004 DW $0078 DW $0005 DW $001E DW $0007 DW $00FA DW $0008 DW $000D DW $000A DW $007C DW $000C DW $0008 DW $000D DW $00BE DW $000F DW $00DC DW $0010 DW $00A0 DW $0011 DW $001E DW $0012 DW $0064 DW $0013 DW $0014 DW $0014 DW $005A DW $0016 DW $0118 DW $0018 DW $008C DW $001A DW $0028 DW $001C DW $0078 DW $001E DW $00E6 DW $0021 DW $00B4 DW $0021 DW $0032 DW $0022 DW $0078 DW $0023 DW $001E DW $0025 DW $0096 DW $0026 DW $000D DW $0028 DW $007C DW $002A DW $0026 DW $002B DW $00BE DW $002D DW $0078 DW $002E DW $003C DW $002F DW $0025 DW $0030 DW $0082 DW $0031 DW $0046 DW $0032 DW $0082 DW $0034 DW $008C DW $0036 DW $0078 DW $0038 DW $002B DW $003A DW $008C DW $003C DW $0082 DW $003F DW $0050 DW $003F DW $0028 DW $0040 DW $00A0 DW $0041 DW $003C DW $0043 DW $00A0 DW $0044 DW $0042 DW $0046 DW $00A4 DW $0048 DW $004E DW $0049 DW $00AA DW $004B DW $00AA DW $004C DW $0046 DW $004D DW $004D DW $004E DW $00AA DW $004F DW $00AA DW $0050 DW $00B4 DW $0052 DW $00B4 DW $0054 DW $00B4 DW $0056 DW $0053 DW $0058 DW $00B4 DW $005A DW $0082 DW $005D DW $005A DW $005D DW $0031 DW $005E DW $00BE DW $005F DW $005A DW $0061 DW $00BE DW $0062 DW $0060 DW $0064 DW $00A0 DW $0066 DW $0026 DW $0067 DW $0096 DW $0069 DW $0082 DW $006A DW $00E6 DW $006B DW $00ED DW $006C DW $0046 DW $006D DW $0078 DW $006E DW $0078 DW $0070 DW $0050 DW $0072 DW $008C DW $0074 DW $002B DW $0076 DW $005A L1106C0 ENT PHP REP #$20 LDX $5C PHX LDX $60 PHX LDX $64 PHX LDX $68 PHX LDX $6C PHX LDX $70 PHX LDA L0242E1 PHA PEA ^L026753 PEA L026753 JSL L0E0000 PLA STA $70 PLA STA $72 LDA [$70] STA L026763 LDY #$0002 LDA [$70],Y STA L026765 LDY #$0004 LDA [$70],Y STA L026767 LDY #$0006 LDA [$70],Y STA L026769 PLA STA L0242E1 CMP #$FFFF BNE L110715 STZ L0242E1 JMP L110C8C L110715 PEA $0000 PEA $0000 PEA $0000 PEA $364C LDA L020000 PHA PEA $0010 PEA $0000 PEA $0000 _NewHandle BCC L11073F PLA PLA STZ L02674B JMP L110C80 L11073F PLA PLX STA L0266ED STX L0266EF STA $00 STX $02 LDY #$0004 LDA [$00],Y ORA #$8000 STA [$00],Y DEY DEY LDA [$00],Y STA L026751 LDA [$00] STA L02674F LDA #$0001 STA L02674B PEA $0000 PEA $0000 PEA $0000 PEA $4B00 LDA L020000 PHA PEA $0010 PEA $0000 PEA $0000 _NewHandle BCC L110791 PLA PLA STZ L02674D JMP L110C71 L110791 PLA PLX STA L0266F1 STX L0266F3 STA $00 STX $02 LDY #$0004 LDA [$00],Y ORA #$8000 STA [$00],Y DEY DEY LDA [$00],Y STA L026707 LDA [$00] STA L026705 LDA #$0001 STA L02674D LDA #$FF06 STA $5C JSL L2909FD LDA #$0001 STA L0242D5 JSL L1122D7 LDX L026751 STX L0266F7 STX L0266FB STX $72 LDX L02674F STX L0266F5 STX $70 STX L0266F9 LDX L026767 STX $6C LDX L026769 STX $6E SEP #$20 STZ $5C LDA #$02 STA $5D JSL L111D24 LDX $60 STX L02671D LDA $5C STA L026747 LDX $70 STX L0266FD LDX $72 STX L0266FF LDX L026767 STX $6C LDX L026769 STX $6E STZ $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L02671F LDA $5C STA L026748 LDX $70 STX L026701 LDX $72 STX L026703 LDX L026767 STX $6C LDX L026769 STX $6E STZ $5C STZ $5D JSL L111D24 LDX $60 STX L026721 LDA $5C STA L026749 LDX $70 STX L026709 LDX $72 STX L02670B LDX L026763 STX $6C LDX L026765 STX $6E SEP #$20 STZ $5C STZ $5D JSL L111D24 LDX $60 STX L026723 LDX $70 STX L02670D LDX $72 STX L02670F LDX L026763 STX $6C LDX L026765 STX $6E SEP #$20 LDA #$01 STA $5C STZ $5D JSL L111D24 LDX $60 STX L026727 LDX $70 STX L026711 LDX $72 STX L026713 LDX L026763 STX $6C LDX L026765 STX $6E LDA #$01 STA $5C STA $5D JSL L111D24 LDX $60 STX L02672B LDX $70 STX L026715 LDX $72 STX L026717 LDX L026763 STX $6C LDX L026765 STX $6E LDA #$01 STA $5C LDA #$02 STA $5D JSL L111D24 LDX $60 STX L02672F LDX $70 STX L026719 LDX $72 STX L02671B LDX L026763 STX $6C LDX L026765 STX $6E SEP #$20 LDA #$01 STA $5C LDA #$03 STA $5D JSL L111D24 LDX $60 STX L026733 LDX $64 PHX LDX L026705 STX $70 LDX L026707 STX $72 STZ $5C SEP #$20 LDA $72 STAL L110931+1 STAL L110931+2 LDA #$00 STA [$70] REP #$20 LDX $70 LDY $70 INY LDA #$4AFE PHB L110931 MVN $000000,$000000 PLB LDA #L110530 STA $6C LDA #^L110530 STA $6E LDX #$0013 STX $64 L110944 PHX LDA [$6C] STA $64 LDA $6C CLC ADC #$0002 STA $6C LDA [$6C] STA $68 LDA $6C CLC ADC #$0002 STA $6C PHA JSL L112089 PLA STA $6C PLX DEX BNE L110944 LDA #L110530 STA $6C LDX #$0013 STX $64 L110973 PHX LDA [$6C] CLC ADC #$00A5 STA $64 LDA $6C CLC ADC #$0002 STA $6C LDA [$6C] STA $68 LDA $6C CLC ADC #$0002 STA $6C PHA JSL L112089 PLA STA $6C PLX DEX BNE L110973 LDA #L110580 STA $6C LDA #^L110580 STA $6E LDX #$000A STX $64 L1109AB PHX LDA [$6C] CLC ADC #$0082 STA $64 LDA $6C CLC ADC #$0002 STA $6C LDA [$6C] STA $68 LDA $6C CLC ADC #$0002 STA $6C PHA JSL L112089 PLA STA $6C PLX DEX BNE L1109AB PLX STX $64 LDA #$000F STA L026737 STA L026739 LDA #$001E STA L02673B LDA #$0032 STA L02673D LDA #$0046 STA $64 LDA #$00A0 STA L02673F LDA #$0094 STA L026741 STZ L026743 L110A00 SEP #$20 LDAL KBD BPL L110A15 STAL KBDSTROBE AND #$7F CMP #$0D BNE L110A15 JMP L110C54 L110A15 REP #$20 LDA $64 BIT #$0001 BEQ L110A21 INC L026737 L110A21 LDX $64 PHX LDX L026705 STX $70 LDX L026707 STX $72 STZ $5C SEP #$20 LDA $72 STAL L110A4B+1 STAL L110A4B+2 LDA #$00 STA [$70] REP #$20 LDX $70 LDY $70 INY LDA #$4AFE PHB L110A4B MVN $000000,$000000 PLB LDA #L110580 STA $6C LDA #^L110580 STA $6E LDX #$004A STX $64 L110A5E PHX LDX L026705 STX $70 LDA [$6C] STA $64 LDA $6C CLC ADC #$0002 STA $6C LDA [$6C] STA $68 LDA $6C CLC ADC #$0002 STA $6C PHA JSL L11206B PLA STA $6C PLX DEX BNE L110A5E STZ $68 STZ $64 LDX L026701 STX $6C LDX L026703 STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L026721 STX $5C JSL L111FD6 PLX STX $64 DEC L02673F LDX L02673F STX $68 LDX L026741 STX $60 LDX L026709 STX $6C LDX L02670B STX $6E LDX L026723 STX $5C JSL L112161 LDA L02673F CLC ADC #$0021 STA $68 LDA L026741 CLC ADC #$0002 STA $60 LDA #L02670D CLC ADC L026743 STA $70 LDA ($70) STA $6C LDY #$0002 LDA ($70),Y STA $6E LDA #L026727 CLC ADC L026743 STA $70 LDA ($70) STA $5C JSL L112161 LDX $64 PHX LDX L026737 STX $68 LDX L026739 STX $64 LDX L0266FD STX $6C LDX L0266FF STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L02671F STX $5C SEP #$20 LDA L026748 STA $60 REP #$20 JSL L111E48 DEC L02673F LDX L02673F STX $68 LDX L026741 STX $60 LDX L026709 STX $6C LDX L02670B STX $6E LDX L026723 STX $5C JSL L112161 LDA L02673F CLC ADC #$0021 STA $68 LDA L026741 CLC ADC #$0002 STA $60 LDA #L02670D CLC ADC L026743 STA $70 LDA ($70) STA $6C LDY #$0002 LDA ($70),Y STA $6E LDA #L026727 CLC ADC L026743 STA $70 LDA ($70) STA $5C JSL L112161 INC L02673B LDX L02673B STX $68 LDX L02673D STX $64 LDX L0266F9 STX $6C LDX L0266FB STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L02671D STX $5C SEP #$20 LDA L026747 STA $60 REP #$20 JSL L111E48 LDX #$0000 STX $68 LDX #$001E STX $60 LDX L026705 STX $6C LDX L026707 STX $6E SEP #$20 LDA #$78 STA $5D REP #$20 JSL L1120AC DEC L02673F LDX L02673F STX $68 LDX L026741 STX $60 LDX L026709 STX $6C LDX L02670B STX $6E LDX L026723 STX $5C JSL L112161 LDA L02673F CLC ADC #$0021 STA $68 LDA L026741 CLC ADC #$0002 STA $60 LDA #L02670D CLC ADC L026743 STA $70 LDA ($70) STA $6C LDY #$0002 LDA ($70),Y STA $6E LDA #L026727 CLC ADC L026743 STA $70 LDA ($70) STA $5C JSL L112161 REP #$20 LDA L026743 CLC ADC #$0004 STA L026743 CMP #$000E BCC L110C4B STZ L026743 L110C4B PLA DEC STA $64 BEQ L110C54 JMP L110A00 L110C54 REP #$20 JSL L290C4C JSL L0F01AC JSL L0F0135 LDA L0266F3 PHA LDA L0266F1 PHA _DisposeHandle L110C71 LDA L0266EF PHA LDA L0266ED PHA _DisposeHandle L110C80 LDA L0242E1 PHA JSL L0E00B9 PLA STA L0242E1 L110C8C PLA STA $70 PLA STA $6C PLA STA $68 PLA STA $64 PLA STA $60 PLA STA $5C PLP RTL L110CA0 ENT PHP REP #$20 LDX $5C PHX LDX $60 PHX LDX $64 PHX LDX $68 PHX LDX $6C PHX LDX $6C PHX LDA L0242DB PHA PEA ^L026832 PEA L026832 JSL L0E0000 PLA STA $70 PLA STA $72 LDA [$70] STA L026846 LDY #$0002 LDA [$70],Y STA L026848 LDY #$0004 LDA [$70],Y STA L026842 LDY #$0006 LDA [$70],Y STA L026844 PLA STA L0242DB CMP #$FFFF BNE L110CF5 STZ L0242DB JMP L11144C L110CF5 PEA $0000 PEA $0000 PEA $0000 PEA $FDF0 LDA L020000 PHA PEA $0010 PEA $0000 PEA $0000 _NewHandle BCC L110D1F PLA PLA STZ L02674B JMP L111440 L110D1F PLA PLX STA L0266ED STX L0266EF STA $00 STX $02 LDY #$0004 LDA [$00],Y ORA #$8000 STA [$00],Y DEY DEY LDA [$00],Y STA L026751 LDA [$00] STA L02674F LDA #$0001 STA L02674B LDA #$FF07 STA $5C JSL L2909FD LDA #$0001 STA L0242D5 JSL L1122D7 LDX L026751 STX L0266F7 STX $72 LDX L02674F STX L0266F5 STX $70 LDX L026846 STX $6C LDX L026848 STX $6E JSL L111CED LDA $70 STA L02676B LDA $72 STA L02676D LDA L026842 STA $6C LDA L026844 STA $6E STZ $5C JSL L111D24 LDX $60 STX L02671D SEP #$20 LDA $5C STA L02682B LDX $70 STX L02676F LDX $72 STX L026771 LDX L026842 STX $6C LDX L026844 STX $6E STZ $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L02671F LDA $5C STA L02682C LDX $70 STX L026783 LDX $72 STX L026785 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$01 STA $5C STZ $5D JSL L111D24 LDX $60 STX L02679F LDX $70 STX L026787 LDX $72 STX L026789 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$01 STA $5C STA $5D JSL L111D24 LDX $60 STX L0267A3 LDX $70 STX L02678B LDX $72 STX L02678D LDX L026842 STX $6C LDX L026844 STX $6E LDA #$01 STA $5C LDA #$02 STA $5D JSL L111D24 LDX $60 STX L0267A7 LDX $70 STX L02678F LDX $72 STX L026791 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$01 STA $5C LDA #$03 STA $5D JSL L111D24 LDX $60 STX L0267AB LDX $70 STX L026793 LDX $72 STX L026795 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$01 STA $5C LDA #$04 STA $5D JSL L111D24 LDX $60 STX L0267AF LDX $70 STX L026797 LDX $72 STX L026799 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$01 STA $5C LDA #$05 STA $5D JSL L111D24 LDX $60 STX L0267B3 LDX $70 STX L02679B LDX $72 STX L02679D LDX L026842 STX $6C LDX L026844 STX $6E LDA #$01 STA $5C LDA #$06 STA $5D JSL L111D24 LDX $60 STX L0267B7 LDX $70 STX L0267BB LDX $72 STX L0267BD LDX L026842 STX $6C LDX L026844 STX $6E LDA #$02 STA $5C STZ $5D JSL L111D24 LDX $60 STX L0267CF LDX $70 STX L0267BF LDX $72 STX L0267C1 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$02 STA $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L0267D3 LDX $70 STX L0267C3 LDX $72 STX L0267C5 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$02 STA $5D STA $5C JSL L111D24 LDX $60 STX L0267D7 LDX $70 STX L0267C7 LDX $72 STX L0267C9 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$02 STA $5C LDA #$03 STA $5D JSL L111D24 LDX $60 STX L0267DB LDX $70 STX L0267CB LDX $72 STX L0267CD LDX L026842 STX $6C LDX L026844 STX $6E LDA #$02 STA $5C LDA #$04 STA $5D JSL L111D24 LDX $60 STX L0267DF LDX $70 STX L0267E3 LDX $72 STX L0267E5 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C STZ $5D JSL L111D24 LDX $60 STX L026803 LDX $70 STX L0267E7 LDX $72 STX L0267E9 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L026807 LDX $70 STX L0267EB LDX $72 STX L0267ED LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C LDA #$02 STA $5D JSL L111D24 LDX $60 STX L02680B LDX $70 STX L0267EF LDX $72 STX L0267F1 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C LDA #$03 STA $5D JSL L111D24 LDX $60 STX L02680F LDX $70 STX L0267F3 LDX $72 STX L0267F5 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C STA $5D JSL L111D24 LDX $60 STX L026813 LDX $70 STX L0267F7 LDX $72 STX L0267F9 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C LDA #$05 STA $5D JSL L111D24 LDX $60 STX L026817 LDX $70 STX L0267FB LDX $72 STX L0267FD LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C LDA #$06 STA $5D JSL L111D24 LDX $60 STX L02681B LDX $70 STX L0267FF LDX $72 STX L026801 LDX L026842 STX $6C LDX L026844 STX $6E LDA #$04 STA $5C LDA #$07 STA $5D JSL L111D24 LDX $60 STX L02681F LDX $70 STX L0266FD LDX $72 STX L0266FF LDX #$0056 STX $68 LDX #$0027 STX $64 LDX L026783 STX $6C LDX L026785 STX $6E LDX L02679F STX $5C LDX L0266F5 STX $70 LDX L0266F7 STX $72 JSL L111FD6 LDX #$0049 STX $68 LDX #$0027 STX $64 LDX L0267BB STX $6C LDX L0267BD STX $6E LDX L0267CF STX $5C LDX L0266F5 STX $70 LDX L0266F7 STX $72 JSL L111FD6 LDX #$0000 STX $68 LDX #$000A STX $60 LDX L0266F5 STX $6C LDX L0266F7 STX $6E LDA #$BE STA $5D JSL L1120AC REP #$20 STZ L02682F LDX #$00D2 STX $64 LDX #$0050 STX L02673F LDX #$00C8 STX L026741 STZ L026823 STZ L026827 L11112E SEP #$20 STZ L026831 LDAL KBD BPL L111149 AND #$7F CMP #$0D BNE L111146 STAL KBDSTROBE JMP L111423 L111146 STA L026831 L111149 REP #$20 LDX $64 PHX DEC L02673F LDX L02673F STX $68 LDX #$0064 STX $64 LDX L02671D STX $5C LDX L0266F5 STX $6C LDX L0266F7 STX $6E LDX L0266FD STX $70 LDX L0266FF STX $72 JSL L11201F LDX $70 STX L026701 LDX $72 STX L026703 LDX L02673F STX $68 LDX #$0064 STX $64 SEP #$20 LDA L02682B STA $60 LDX L02676B STX $6C LDX L02676D STX $6E LDX L02671D STX $5C LDX L0266F5 STX $70 LDX L0266F7 STX $72 JSL L111E48 LDX L02673F STX $68 LDX #$0064 STX $64 REP #$20 LDA $68 CLC ADC #$003F STA $68 LDA L02671F STA $5C LDA L0266F5 STA $6C LDA L0266F7 STA $6E LDA L026701 STA $70 LDA L026703 STA $72 JSL L11201F REP #$20 LDA L02673F STA $68 LDA #$0064 STA $64 LDA $68 CLC ADC #$003F STA $68 SEP #$20 LDA L02682C STA $60 LDX L02676F STX $6C LDX L026771 STX $6E LDX L02671F STX $5C LDX L0266F5 STX $70 LDX L0266F7 STX $72 JSL L111E48 REP #$20 STZ $68 LDA #$0064 STA $60 LDA L02674F CLC ADC #$3E80 STA $6C LDX L026751 STX $6E SEP #$20 LDA #$39 STA $5D JSL L1120AC LDX L02673F STX $68 LDX #$0064 STX $64 LDX L02671D STX $5C LDX L0266FD STX $6C LDX L0266FF STX $6E LDX L0266F5 STX $70 LDX L0266F7 STX $72 JSL L111FD6 LDX L02673F STX $68 LDX #$0064 STX $64 REP #$20 LDA $68 CLC ADC #$003F STA $68 LDX L02671F STX $5C LDX L026701 STX $6C LDX L026703 STX $6E LDX L0266F5 STX $70 LDX L0266F7 STX $72 JSL L111FD6 LDX #$0056 STX $68 LDX #$0027 STX $64 REP #$20 LDA #L026783 CLC ADC L026823 STA $70 LDA ($70) STA $6C LDY #$0002 LDA ($70),Y STA $6E LDA #L02679F CLC ADC L026823 STA $70 LDA ($70) STA $5C LDA L0266F5 STA $70 LDA L0266F7 STA $72 JSL L111FD6 REP #$20 PLA STA $64 PHA CMP #$00AB BCC L111322 SEP #$20 LDAL KBD BPL L11131F AND #$7F CMP #$64 BNE L1112F1 LDA L02682F ORA #$01 STA L02682F JMP L11131B L1112F1 CMP #$61 BNE L111300 LDA L02682F ORA #$02 STA L02682F JMP L11131B L111300 CMP #$65 BNE L11130F LDA L02682F ORA #$04 STA L02682F JMP L11131B L11130F CMP #$0D BEQ L11131F STAL KBDSTROBE PLX JMP L111423 L11131B STAL KBDSTROBE L11131F JMP L11132D L111322 SEP #$20 LDA L026831 BEQ L11132D STAL KBDSTROBE L11132D REP #$20 LDA $64 CMP #$00AA BEQ L11133B BCC L11133B JMP L1113E4 L11133B LDA L02682F CMP #$0007 BEQ L111395 LDA $64 CMP #$00A5 BEQ L11134C BCS L11134F L11134C JMP L1113E4 L11134F LDA #$0049 STA $68 LDA #$0027 STA $64 LDA #L0267BB CLC ADC L026827 STA $70 LDA ($70) STA $6C LDY #$0002 LDA ($70),Y STA $6E LDA #L0267CF CLC ADC L026827 STA $70 LDA ($70) STA $5C LDA L0266F5 STA $70 LDA L0266F7 STA $72 JSL L111FD6 LDA L026827 CLC ADC #$0004 STA L026827 JMP L1113E4 L111395 LDA $64 CMP #$00A2 BEQ L11139E BCS L1113A1 L11139E JMP L1113E4 L1113A1 LDA #$0049 STA $68 LDA #$0027 STA $64 LDA #L0267E3 CLC ADC L026827 STA $70 LDA ($70) STA $6C LDY #$0002 LDA ($70),Y STA $6E LDA #L026803 CLC ADC L026827 STA $70 LDA ($70) STA $5C LDA L0266F5 STA $70 LDA L0266F7 STA $72 JSL L111FD6 LDA L026827 CLC ADC #$0004 STA L026827 L1113E4 LDA #$0000 STA $68 LDA #$0032 STA $60 LDA L02674F CLC ADC #$1900 STA $6C LDA L026751 STA $6E SEP #$20 LDA #$0D STA $5D JSL L1120AC REP #$20 LDA L026823 CLC ADC #$0004 STA L026823 CMP #$001A BCC L11141A STZ L026823 L11141A PLA DEC STA $64 BEQ L111423 JMP L11112E L111423 REP #$20 JSL L290C4C JSL L0F01AC JSL L0F0135 LDA L0266EF PHA LDA L0266ED PHA _DisposeHandle L111440 LDA L0242DB PHA JSL L0E00B9 PLA STA L0242DB L11144C PLA STA $70 PLA STA $6C PLA STA $68 PLA STA $64 PLA STA $60 PLA STA $5C PLP RTL L111460 ENT PHP REP #$20 LDX $5C PHX LDX $60 PHX LDX $64 PHX LDX $68 PHX LDX $6C PHX LDX $6C PHX LDX #$34BC STX L026705 LDA L0242DD PHA PEA ^L02689A PEA L02689A JSL L0E0000 PLA STA $70 PLA STA $72 LDA [$70] STA L0268AA LDY #$0002 LDA [$70],Y STA L0268AC PLA STA L0242DD CMP #$FFFF BNE L1114AB STZ L0242DD JMP L111AA8 L1114AB PEA $0000 PEA $0000 PEA $0000 PEA $FDF0 LDA L020000 PHA PEA $0010 PEA $0000 PEA $0000 _NewHandle BCC L1114D5 PLA PLA STZ L02674B JMP L111A9C L1114D5 PLA PLX STA L0266ED STX L0266EF STA $00 STX $02 LDY #$0004 LDA [$00],Y ORA #$8000 STA [$00],Y DEY DEY LDA [$00],Y STA L026751 LDA [$00] STA L02674F LDA #$0001 STA L02674B LDA #$FF04 STA $5C JSL L2909FD LDA #$0001 STA L0242D5 JSL L1122D7 LDX L026751 STX L026707 STX L0266F7 STX L0266FB STX $72 LDA L026705 CLC ADC L02674F STA L026705 LDX L02674F STX L0266F5 STX $70 STX L0266F9 LDA L0268AA STA $6C LDA L0268AC STA $6E STZ $5C JSL L111D24 LDX $60 STX L02671D SEP #$20 LDA $5C STA L026747 LDX $70 STX L026773 LDX $72 STX L026775 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$01 STA $5C STZ $5D JSL L111D24 LDX $60 STX L02684A LDA $5C STA L026748 LDX $70 STX L026777 LDX $72 STX L026779 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$01 STA $5C STA $5D JSL L111D24 LDX $60 STX L02684E LDX $70 STX L02677B LDX $72 STX L02677D LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$01 STA $5C LDA #$02 STA $5D JSL L111D24 LDX $60 STX L026852 LDX $70 STX L02677F LDX $72 STX L026781 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$01 STA $5C LDA #$03 STA $5D JSL L111D24 LDX $60 STX L026856 LDX $70 STX L02685A LDX $72 STX L02685C LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$02 STA $5C STZ $5D JSL L111D24 LDX $60 STX L02687A LDA $5C STA L026749 LDX $70 STX L02685E LDX $72 STX L026860 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$02 STA $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L02687E LDX $70 STX L026862 LDX $72 STX L026864 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$03 STA $5C STZ $5D JSL L111D24 LDX $60 STX L026882 LDX $70 STX L026866 LDX $72 STX L026868 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$03 STA $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L026886 LDX $70 STX L02686A LDX $72 STX L02686C LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$04 STA $5C STZ $5D JSL L111D24 LDX $60 STX L02688A LDX $70 STX L02686E LDX $72 STX L026870 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$04 STA $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L02688E LDX $70 STX L026872 LDX $72 STX L026874 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$05 STA $5C STZ $5D JSL L111D24 LDX $60 STX L026892 LDX $70 STX L026876 LDX $72 STX L026878 LDX L0268AA STX $6C LDX L0268AC STX $6E LDA #$05 STA $5C LDA #$01 STA $5D JSL L111D24 LDX $60 STX L026896 LDX $70 STX L0266FD LDX $72 STX L0266FF REP #$20 LDA $70 CLC ADC L026852 CLC ADC #$2710 STA $70 STA L026705 LDX $64 PHX STZ $5C SEP #$20 LDA $72 STAL L111744+1 STAL L111744+2 LDA #$00 STA [$70] REP #$20 LDX $70 LDY $70 INY LDA #$4AFE PHB L111744 MVN $000000,$000000 PLB LDA #L110530 STA $6C LDA #^L110530 STA $6E LDX #$0013 STX $64 L111757 PHX LDA ($6C) STA $64 LDA $6C CLC ADC #$0002 STA $6C LDA ($6C) STA $68 LDA $6C CLC ADC #$0002 STA $6C PHA JSL L11206B PLA STA $6C PLX DEX BNE L111757 PLX STX $64 LDX #L110580 STX $6C LDX #^L110580 STX $6E LDX #$004A STX $64 L11178E PHX LDX L026705 STX $70 LDA ($6C) STA $64 LDA $6C CLC ADC #$0002 STA $6C LDA ($6C) STA $68 LDA $6C CLC ADC #$0002 STA $6C PHA JSL L11206B PLA STA $6C PLX DEX BNE L11178E LDX #$0032 STX $68 LDX #$000A STX $64 LDX L0266F9 STX $6C LDX L0266FB STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L02671D STX $5C SEP #$20 LDA L026747 STA $60 JSL L111E48 LDX #$0000 STX $68 LDX #$0050 STX $64 LDX L02685A STX $6C LDX L02685C STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L02687A STX $5C SEP #$20 LDA L026749 STA $60 JSL L111E48 LDX #$0050 STX $68 STX $64 LDX L02685E STX $6C LDX L026860 STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L02687E STX $5C SEP #$20 LDA L026749 STA $60 JSL L111E48 LDX #$0000 STX $68 LDX #$0064 STX $64 LDX L026862 STX $6C LDX L026864 STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L026882 STX $5C SEP #$20 LDA L026749 STA $60 JSL L111FD6 LDX #$0050 STX $68 LDX #$0064 STX $64 LDX L026866 STX $6C LDX L026868 STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L026886 STX $5C SEP #$20 LDA L026749 STA $60 JSL L111FD6 LDX #$0000 STX $68 LDX #$0078 STX $64 LDX L02686A STX $6C LDX L02686C STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L02688A STX $5C SEP #$20 LDA L026749 STA $60 JSL L111FD6 LDX #$0050 STX $68 LDX #$0078 STX $64 LDX L02686E STX $6C LDX L026870 STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L02688E STX $5C SEP #$20 LDA L026749 STA $60 JSL L111FD6 LDX #$0000 STX $68 LDX #$008C STX $64 LDX L026872 STX $6C LDX L026874 STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L026892 STX $5C SEP #$20 LDA L026749 STA $60 JSL L111FD6 LDX #$0050 STX $68 LDX #$008C STX $64 LDX L026876 STX $6C LDX L026878 STX $6E LDX L026705 STX $70 LDX L026707 STX $72 LDX L026896 STX $5C SEP #$20 LDA L026749 STA $60 JSL L111FD6 LDX #$0000 STX $68 LDX #$001E STX $60 LDX L026705 STX $6C LDX L026707 STX $6E LDA #$A0 STA $5D JSL L1120AC REP #$20 LDX #$00C8 STX $64 LDX #$00A0 STX L02673F LDX #$00C8 STX L026741 STZ L026823 L111985 SEP #$20 LDAL KBD BPL L11199A STAL KBDSTROBE AND #$7F CMP #$0D BNE L11199A JMP L111A7F L11199A REP #$20 LDX $64 PHX DEC L02673F LDX L02673F STX $68 LDX #$0028 STX $64 LDA #L02684A CLC ADC L026823 STA $70 LDA ($70) STA $5C LDX L026705 STX $6C LDX L026707 STX $6E LDX L0266FD STX $70 LDX L0266FF STX $72 JSL L11201F LDX L02673F STX $68 LDX #$0028 STX $64 SEP #$20 LDA L026748 STA $60 REP #$20 LDA #L026773 CLC ADC L026823 STA $70 LDA ($70) STA $6C LDY #$0002 LDA ($70),Y STA $6E LDA #L02684A CLC ADC L026823 STA $70 LDA ($70) STA $5C LDA L026705 STA $70 LDA L026707 STA $72 JSL L111E48 LDX #$0000 STX $68 LDX #$001E STX $60 LDX L026705 STX $6C LDX L026707 STX $6E SEP #$20 LDA #$3C STA $5D REP #$20 JSL L1120AC LDX L02673F STX $68 LDX #$0028 STX $64 LDA #L02684A CLC ADC L026823 STA $70 LDA ($70) STA $5C LDA L0266FD STA $6C LDA L0266FF STA $6E LDA L026705 STA $70 LDA L026707 STA $72 JSL L111FD6 REP #$20 LDA L026823 CLC ADC #$0004 STA L026823 CMP #$000E BCC L111A76 STZ L026823 L111A76 PLA DEC STA $64 BEQ L111A7F JMP L111985 L111A7F REP #$20 JSL L290C4C JSL L0F01AC JSL L0F0135 LDA L0266EF PHA LDA L0266ED PHA _DisposeHandle L111A9C LDA L0242DD PHA JSL L0E00B9 PLA STA L0242DD L111AA8 PLA STA $70 PLA STA $6C PLA STA $68 PLA STA $64 PLA STA $60 PLA STA $5C PLP RTL PHP REP #$20 LDA $64 PHA LDA $60 PHA LDA $64 AND #$00FF ASL TAY LDA #$2000 CLC ADC L026997,Y CLC ADC $68 STA $70 PLX STX $60 PLA STA $64 XBA AND #$00FF STA $68 LDA L026B2C AND #$00FF STA $64 BEQ L111AF9 LDA $6C L111AF0 CLC ADC $60 DEC $64 BNE L111AF0 STA $6C L111AF9 LDA $6C PHA LDA $5C PHA LDA #$00A0 SEC SBC $60 STA $5C LDA $60 STA $64 LDA $70 CLC ADC #$00A0 STA $6C LDX $6C LDY $70 L111B17 PHB LDA $64 DEC MVN $E10000,$E10000 PLB TYA CLC ADC $5C TAY CLC ADC #$00A0 TAX DEC $68 BNE L111B17 PLA STA $5C PLX SEP #$20 LDA $6E STAL L111B45+2 LDA #$E1 STAL L111B45+1 REP #$20 PHB LDA $64 DEC L111B45 MVN $000000,$000000 PLB INC L026B2C SEP #$20 LDA $5D CMP L026B2C BEQ L111B5B REP #$20 STZ $5C PLP RTL L111B5B REP #$20 LDA #$00FF STA $5C STZ L026B2C PLP RTL L111B67 PHP REP #$20 LDA $60 PHA LDA $64 PHA LDA $68 PHA LDA $6C PHA LDA $70 PHA STZ $44 LDA $64 BEQ L111B8A LDA $70 L111B81 CLC ADC $5C DEC $64 BNE L111B81 STA $70 L111B8A LSR $68 BCC L111B93 LDA #$00FF STA $44 L111B93 LDA $70 CLC ADC $68 STA $70 LDA $5C STA $4A SEP #$20 LDA $61 STA $46 ASL ASL ASL ASL STA $48 STZ $61 REP #$20 LDA $60 ASL CLC ADC #$0006 TAY LDA [$6C],Y STA $60 TAY LDA [$6C],Y STA $5C TYA CLC ADC #$0002 STA $60 LDX $5C PHX SEP #$20 LDA $44 STA $64 L111BCF LDX $5C PHX LDX $70 PHX LDX $64 PHX LDY $60 LDA [$6C],Y STA $68 STZ $69 L111BE0 LDA $69 CMP #$08 BNE L111BF1 INY STY $60 LDA [$6C],Y STA $68 LDA #$FF STA $69 L111BF1 INC $69 LDA $64 CMP #$FF BEQ L111C10 ASL $68 BCC L111C05 LDA [$70] AND #$0F ORA $48 STA [$70] L111C05 LDA #$FF STA $64 DEC $5C BNE L111BE0 JMP L111C2A L111C10 ASL $68 BCC L111C1C LDA [$70] AND #$F0 ORA $46 STA [$70] L111C1C LDX $70 INX STX $70 STZ $64 DEC $5C BNE L111BE0 JMP L111C2A L111C2A REP #$20 INC $60 PLA STA $64 PLA CLC ADC $4A STA $70 PLA STA $5C SEP #$20 DEC $5D BNE L111BCF REP #$20 PLA STA $5C PLA STA $70 PLA STA $6C PLA STA $68 PLA STA $64 PLA STA $60 PLP RTL PHP REP #$20 LDA $68 STA $4E STZ $4C L111C5F SEP #$20 LDA [$74] STA $60 REP #$20 INC $74 INC $4C SEP #$20 LDA $60 BEQ L111C9A CMP #$3A BEQ L111C8D L111C75 LDX $5C PHX JSL L111B67 STZ $5D REP #$20 LDA $68 CLC ADC $5C STA $68 PLA STA $5C JMP L111C5F L111C8D REP #$20 LDA $4E CLC ADC #$0032 STA $68 JMP L111C75 L111C9A REP #$20 LDA $4C STA $5C PLP RTL PHP REP #$20 LDX $5C PHX LDX $64 PHX LDX $68 PHX LDX $70 PHX LDX $6C PHX LDX $6E PHX STZ $64 LDA $60 ASL CLC ADC #$0004 ADC $6C STA $6C SEP #$20 LDA $68 STA $64 LDA [$6C] ORA [$70] STA [$70] LDY #$0001 LDA [$6C],Y ORA [$70],Y STA [$70],Y PLX STX $6E PLX STX $6C PLX STX $70 PLX STX $68 PLX STX $64 PLX STX $5C PLP RTL L111CED PHP LDX #$76C0 STX $5C L111CF3 SEP #$20 STZ $65 LDA [$6C] STA $64 REP #$20 INC $6C SEP #$20 LDA [$6C] STA $68 REP #$20 INC $6C L111D09 SEP #$20 LDA $68 STA [$70] REP #$20 INC $70 DEC $5C DEC $64 BNE L111D09 LDA $5C CMP #$0000 BEQ L111D22 BCS L111CF3 L111D22 PLP RTL L111D24 PHP SEP #$20 LDX $64 PHX LDX $74 PHX LDX $68 PHX LDA $5C CMP [$6C] BCC L111D3B BEQ L111D3B JMP L111E3D L111D3B LDX $60 PHX LDA $5C STA $64 STZ $65 REP #$20 LDA $6C STA $60 LDA $6E STA $62 ASL $64 LDA $60 CLC ADC $64 CLC ADC #$0008 STA $60 LDA [$60] CLC ADC $6C STA $60 SEP #$20 LDA $5D CMP [$60] BEQ L111D6F BCC L111D6F JMP L111E3D L111D6F LDA $5D STA $64 STZ $65 REP #$20 ASL $64 LDA $60 CLC ADC $64 CLC ADC #$0004 STA $60 LDA [$60] CLC ADC $6C STA $60 STA $74 CLC ADC #$0008 STA $6C LDA $6E STA $76 PLX STX $60 LDY #$0002 LDA [$74],Y STA $64 LSR $68 L111DA3 STZ L026B27 LDX $60 PHX LDX $64 PHX LDX $68 PHX STZ $68 SEP #$20 STZ $65 L111DB5 SEP #$20 LDA [$6C] STA $5C ROR ROR ROR ROR STA $5D AND #$0F STA $64 LDA $5D ROR AND #$F0 STA $5D REP #$20 LDA $68 CLC ADC $64 STA $68 SEP #$20 LDA $5C AND #$0F STA $5C LDA L026B27 BIT #$01 BNE L111DEE L111DE4 SEP #$20 LDA $5D STA [$70] DEC $64 BEQ L111E02 L111DEE LDA [$70] ORA $5C STA [$70] REP #$20 INC $70 DEC $64 BNE L111DE4 STZ L026B27 JMP L111E09 L111E02 SEP #$20 LDA #$FF STA L026B27 L111E09 REP #$20 INC $6C LDA $68 CMP [$74] BCC L111DB5 INC $70 PLX STX $68 PLX STX $64 PLA CLC ADC #$0002 STA $60 DEC $64 BEQ L111E29 JMP L111DA3 L111E29 SEP #$20 LDA [$74] STA $60 LDY #$0002 LDA [$74],Y STA $61 LDY #$0006 LDA [$74],Y STA $5C L111E3D PLX STX $68 PLX STX $74 PLX STX $64 PLP RTL L111E48 PHP REP #$20 LDX $64 PHX LDA $68 BMI L111E5C CMP #$00A0 BCC L111E5C BEQ L111E5C JMP L111E9C L111E5C LDA $64 INC ASL TAY LDA $70 CLC ADC L026997,Y STA $70 STZ L026B28 SEP #$20 LSR $5C REP #$20 LDA $68 BPL L111EAD EOR #$FFFF INC STA $68 CLC ADC $6C STA $6C SEP #$20 STZ $65 LDA $5C STA $64 REP #$20 LDA $64 SEC SBC $68 STA $64 SEP #$20 LDA $64 STA $5C BEQ L111E9C BCS L111EA1 L111E9C PLX STX $64 PLP RTL L111EA1 REP #$20 LDA $68 STA L026B28 STZ $68 JMP L111EDE L111EAD LDA $68 SEC SBC #$0020 STA $64 BMI L111EDE LDA $68 STA $64 SEP #$20 CLC ADC $5C SEC SBC #$A1 STA $64 BMI L111EDE INC $64 LDA $5C SEC SBC $64 STA $5C BEQ L111E9C BCS L111ED7 JMP L111E9C L111ED7 REP #$20 LDA $64 STA L026B28 L111EDE REP #$20 LDA $70 CLC ADC $68 STA $70 SEP #$20 LDA $60 STA $68 STA $61 ROR ROR $60 ROR ROR $60 ROR ROR $60 ROR ROR $60 LDA $60 ORA $68 STA $68 STZ $65 LDA $5D STA $64 L111F07 SEP #$20 LDX $64 PHX LDX $70 PHX STZ $65 LDA $5C STA $64 L111F15 SEP #$20 LDA [$6C] STA $5D STA $69 LDA $68 CMP $69 BEQ L111F3D LDA $69 AND #$F0 STA $69 CMP $60 BEQ L111F63 LDA $5D AND #$0F STA $69 CMP $61 BEQ L111F9B LDA $5D STA $69 STA [$70] L111F3D REP #$20 INC $70 INC $6C DEC $64 BNE L111F15 PLA CLC ADC #$00A0 STA $70 LDA $6C INC CLC ADC L026B28 STA $6C PLA DEC STA $64 BEQ L111F60 JMP L111F07 L111F60 JMP L111E9C L111F63 SEP #$20 LDA [$70] AND #$F0 STA [$70] LDA $5D AND #$0F STA $69 ORA [$70] STA [$70] REP #$20 INC $70 INC $6C DEC $64 BNE L111F15 PLA CLC ADC #$00A0 STA $70 LDA $6C INC CLC ADC L026B28 STA $6C PLA DEC STA $64 BEQ L111F98 JMP L111F07 L111F98 JMP L111E9C L111F9B SEP #$20 LDA [$70] AND #$0F STA [$70] LDA $5D AND #$F0 STA $69 ORA [$70] STA [$70] REP #$20 INC $70 INC $6C DEC $64 BEQ L111FBA JMP L111F15 L111FBA PLA CLC ADC #$00A0 STA $70 LDA $6C INC CLC ADC L026B28 STA $6C PLA DEC STA $64 BEQ L111FD3 JMP L111F07 L111FD3 JMP L111E9C L111FD6 PHP REP #$20 LDA $64 INC ASL TAY LDA $70 CLC ADC L026997,Y CLC ADC $68 STA $70 SEP #$20 LSR $5C LDA $6E STAL L112009+2 LDA $72 STAL L112009+1 L111FF9 LDX $70 PHX REP #$20 PHB LDX $6C LDY $70 LDA $5C AND #$00FF DEC L112009 MVN $000000,$000000 PLB PLA CLC ADC #$00A0 STA $70 INX STX $6C SEP #$20 DEC $5D BNE L111FF9 PLP RTL L11201F PHP REP #$20 LDA $64 INC ASL TAY LDA L026997,Y CLC ADC $68 CLC ADC $6C STA $6C SEP #$20 STZ $65 LSR $5C LDA $6E STAL L112055+2 LDA $72 STAL L112055+1 L112044 LDX $6C PHX LDA $5C STA $64 REP #$20 PHB LDX $6C LDY $70 LDA $64 DEC L112055 MVN $000000,$000000 PLB PLA CLC ADC #$00A0 STA $6C INY STY $70 SEP #$20 DEC $5D BNE L112044 PLP RTL L11206B PHP REP #$20 LDA $64 PHA ASL TAY LDA $70 CLC ADC L026997,Y CLC ADC $68 STA $70 SEP #$20 LDA #$0F STA [$70] PLX STX $64 PLP RTL L112089 PHP REP #$20 LDA $64 PHA ASL TAY LDA #$2000 CLC ADC L026997,Y CLC ADC $68 STA $70 LDA #$00E1 STA $72 LDA #$000F STA [$70] PLA STX $64 PLP RTL L1120AC PHP REP #$20 LDA $64 PHA LDA $5C PHA LDA $60 PHA ASL TAY LDA #$2000 CLC ADC L026997,Y STA $70 LDA $5D AND #$00FF ASL ASL ASL ASL ASL STA $64 ASL ASL CLC ADC $64 STA $5C SEP #$20 LDA $6E STAL L1120EE+2 LDA #$E1 STAL L1120EE+1 REP #$20 PHB LDX $6C LDY $70 LDA $5C DEC L1120EE MVN $000000,$000000 PLB PLX STX $60 PLX STX $5C PLX STX $64 PLP RTL PHP REP #$20 LDA $64 PHA LDA $5C PHA LDA $60 PHA ASL TAY LDA L026997,Y PHA CLC ADC #$2000 CLC ADC $68 STA $70 PLA CLC ADC $6C CLC ADC $68 STA $6C SEP #$20 LDA $6E STAL L11213E+2 LDA #$E1 STAL L11213E+1 REP #$20 PHB LDX $6C LDY $70 L112136 PHX PHY LDA $5C AND #$00FF DEC L11213E MVN $000000,$000000 PLA CLC ADC #$00A0 TAY PLA CLC ADC #$00A0 TAX SEP #$20 DEC $5D REP #$20 BNE L112136 PLB PLX STX $60 PLX STX $5C PLX STX $64 PLP RTL L112161 PHP SEP #$20 LDX $64 PHX LDX $5C PHX LDX $60 PHX LSR $5C REP #$20 STZ L026B28 LDA $68 SEC SBC #$0000 BPL L1121A4 EOR #$FFFF INC STA $68 CLC ADC $6C STA $6C SEP #$20 LDA $5C SEC SBC $68 STA $5C BEQ L112194 BCS L112197 L112194 JMP L11221C L112197 LDX $68 STX L026B28 LDX #$0000 STX $68 JMP L1121CA L1121A4 SEP #$20 LDA $68 CLC ADC $5C REP #$20 AND #$00FF SEC SBC #$00A0 STA $64 SEP #$20 BMI L1121CA LDA $5C SEC SBC $64 STA $5C BMI L11221C BEQ L11221C LDX $64 STX L026B28 L1121CA REP #$20 LDA $60 ASL TAY LDA #$2000 CLC ADC L026997,Y CLC ADC $68 STA $70 SEP #$20 STZ L026B2B LDA #$A0 SEC SBC $5C STA L026B2A LDA $5C STA $64 STZ $65 LDA $6E STAL L112205+2 LDA #$E1 STAL L112205+1 LDX $6C LDY $70 L1121FF REP #$20 LDA $64 DEC PHB L112205 MVN $000000,$000000 PLB TXA CLC ADC L026B28 INC TAX TYA CLC ADC L026B2A TAY SEP #$20 DEC $5D BNE L1121FF L11221C PLX STX $60 PLX STX $5C PLX STX $64 PLP RTL PHP REP #$20 LDA $64 PHA LDA $5C PHA LDA $60 PHA ASL TAY LDA L026997,Y CLC ADC #$2000 ADC $68 STA $70 LDA $5D AND #$00FF STA $64 LDA $5C AND #$00FF LSR STA $5C SEP #$20 LDA $6E STAL L112268+2 LDA #$E1 STAL L112268+1 REP #$20 PHB LDX $6C LDY $70 L112264 PHY LDA $5C DEC L112268 MVN $000000,$000000 PLA CLC ADC #$00A0 TAY INX DEC $64 BNE L112264 PLB PLX STX $60 PLX STX $5C PLX STX $64 PLP RTL PHP REP #$20 LDA $64 PHA LDA $5C PHA LDA $60 PHA ASL TAY LDA L026997,Y CLC ADC #$2000 ADC $68 STA $70 LSR $64 SEP #$20 LDA $6E STAL L1122BE+2 LDA #$E1 STAL L1122BE+1 REP #$20 LDA $5C XBA AND #$00FF STA $5C PHB LDX $6C LDY $70 L1122BA PHY LDA $64 DEC L1122BE MVN $000000,$000000 PLA CLC ADC #$00A0 TAY DEC $5C BNE L1122BA PLB PLX STX $60 PLX STX $5C PLX STX $64 PLP RTL L1122D7 PHP SEP #$20 LDX #$00C7 LDY #$0001 L1122E0 LDAL $E19D00,X AND #$10 DEY BNE L1122F0 LDY #$0014 ORA #$0F BRA L1122F2 L1122F0 ORA #$0F L1122F2 STAL $E19D00,X DEX BPL L1122E0 REP #$20 LDX #$001E L1122FE LDAL L11230C,X STAL $E19FE0,X DEX DEX BPL L1122FE PLP RTL L11230C HEX 00000F008000DB00000C7D0B5008BB0B HEX 7707BF00E000FD00980F9F0DE00EFF0F L11232C ENT PHP REP #$20 LDY #$00C8 LDA #$0000 TAX L112336 STA L026997,X CLC ADC #$00A0 INX INX DEY BNE L112336 PLP RTL PHP REP #$20 LDX $5C PHX LDX $60 PHX LDX $64 PHX LDX $68 PHX LDA $70 PHA CLC ADC #$2000 STA $70 LDA #$00E1 STA $72 LDA #$0000 STA [$70] LDX $70 TXY INY LDA $5D AND #$00FF STA $4C LDA $68 AND #$00FF DEC PHA DEC L112379 PHY PHB MVN $E10000,$E10000 PLB LDX $70 PLA CLC ADC #$00A0 TAY LDA $01,S DEC $4C BNE L112379 PLA PLA PLP RTL