*---------------------------------------------------------* * Disassembled with The Flaming Bird Disassembler * * (c) Phoenix corp. 1992,93 - All rights reserved * *---------------------------------------------------------* REL mx %00 use ENESEG.X.S L030000 ENT DB $00 DB $00 L030002 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 L030080 DB $00 DB $00 L030082 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 L030100 DB $00 DB $00 L030102 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 L030180 DB $00 DB $00 L030182 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 L030188 ENT DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 DB $00 L0301C0 ENT PHP SEP #$20 LDY #$000C LDA ($6C),Y BEQ L0301CC PLP RTL L0301CC STA L02621E INC STA L024459 LDY #$0005 LDA ($6C),Y STA $61 STZ $60 REP #$20 LSR $60 LSR $60 LDY $60 SEP #$20 LDA L020B08,Y STA $68 LDY #$0010 LDA ($6C),Y LSR LSR LSR STA $69 LSR CLC ADC $69 STA $5C STZ $5D REP #$20 LDA $60 CLC ADC $5C STA $60 SEP #$20 LDY $60 LDA L020B08,Y SEC SBC $68 STA L024DBC LDY #$0010 LDA ($6C),Y LSR STA $64 LDY #$0004 LDA ($6C),Y CLC ADC #$05 SEC SBC $64 STA $5C BCS L03022C STZ $5C L03022C LDA $5C STA $68 LDY #$0005 LDA ($6C),Y STA $69 STA $5C STA L02444E LDX $68 STX $04 JSL L1809AE LDX $00 STX $5C LDA $5D STA $68 LDA $69 STA $60 STZ $61 LDY $60 LDA L0206A8,Y STA $61 LDA $5C STA $60 LDA $68 STA $5C CMP #$01 BEQ L030270 BCC L030269 PLP RTL L030269 LDA #$01 STA L02621E STZ $60 L030270 LDX $60 STX L024DB8 LDY #$0010 LDA ($6C),Y STA $64 LSR $64 LDY #$0004 LDA ($6C),Y CLC ADC #$05 CLC ADC $64 STA $5C CMP #$76 BCC L030293 LDA #$75 STA $5C L030293 LDA $5C STA $68 LDY #$0005 LDA ($6C),Y STA $69 LDX $68 STX $04 JSL L1809AE LDX $00 STX $60 LDA $61 STA $5C CMP #$01 BCS L0302B4 PLP RTL L0302B4 BEQ L0302C4 LDA L02621E ORA #$80 STA $5C STA L02621E LDA #$FF STA $60 L0302C4 LDX $60 STX L024DBA LDA L024DBC STA $65 LSR STA $64 LDA L024DB9 SEC SBC $64 STA L024DB9 CLC ADC $65 STA L024DBB LDA L024DB9 STA $5C CMP #$E8 BCC L0302EB PLP RTL L0302EB LDY #$0005 LDA ($6C),Y STA $5C CMP #$96 BCC L0302F8 PLP RTL L0302F8 REP #$20 LDA $6C SEC SBC #L024E00 STA $64 SEP #$20 LDA L024428 SEC SBC $65 AND #$03 STA $60 STZ $61 REP #$20 ASL $60 LDY $60 LDA L026216,Y STA $5C STA L023362 SEP #$20 LDA L02621E AND #$01 STA $5C BNE L03033F LDX L024DB8 STX L023FEE STX $60 LDA L024DBB STA $61 LDX $60 STX L023FF0 JSL L0F26B4 L03033F LDX L024DB8 STX L023FEE STX $60 LDA L024DBA STA $60 LDX $60 STX L023FF0 JSL L0F26B4 LDX L024DBA STX L023FF0 STX $60 LDA L024DB8 STA $60 LDX $60 STX L023FEE JSL L0F26B4 LDA L02621E STA $5C BMI L030388 LDX L024DBA STX L023FF0 STX $60 LDA L024DB9 STA $61 LDX $60 STX L023FEE JSL L0F26B4 L030388 LDX L024DB8 STX $60 LDX L024DBA STX $68 REP #$20 LDA $60 LDY #$0020 STA ($6C),Y SEP #$20 LDA $60 LDY #$0022 STA ($6C),Y LDA $69 LDY #$0023 STA ($6C),Y LDA $68 LDY #$0040 STA ($6C),Y LDA $61 LDY #$0041 STA ($6C),Y REP #$20 LDA $68 LDY #$0042 STA ($6C),Y LDA #$0101 LDY #$0002 STA ($6C),Y SEP #$20 LDA #$01 DEY STA ($6C),Y LDA ($6C) ORA #$80 STA ($6C) PLP RTL L0303D9 ENT PHP SEP #$20 LDA L024350 DEC STA $5C LDX #L024E00 STX $6C LDA $5C BEQ L030452 STA L024350 LDA L0266C9 CMP #$01 BNE L030404 LDA L024348 LDY #$000B STA ($6C),Y JSL L051B47 JMP L030424 L030404 LDA L0266C9 CMP #$02 BNE L030419 LDY #$000B LDA #$06 STA ($6C),Y JSL L052264 JMP L030424 L030419 LDY #$000B LDA #$01 STA ($6C),Y JSL L052982 L030424 LDA L024350 DEC ASL STA $60 STZ $61 LDY #$0004 LDA ($6C),Y STA $68 LDX $60 CLC ADC L0266A0,X STA $68 INX STX $60 LDY #$0005 LDA ($6C),Y STA $69 CLC ADC L0266A0,X STA $69 JSL L0F0384 PLP RTL L030452 LDA #$FF STA L024438 JSL L0320D8 JSL L03219C LDA #$00 STA ($6C) STZ L024412 PLP RTL L030468 LDA ($6C) AND #$80 CLC ADC #$0F STA ($6C) PLP RTL L030473 ENT PHP SEP #$20 LDY #$0010 LDA ($6C),Y CLC ADC #$23 STA $60 STZ $61 REP #$20 LDA $60 CLC ADC $68 STA $60 SEP #$20 LDA ($60) AND #$0F ASL CLC ADC #$03 STA $60 STZ $61 REP #$20 LDA $60 CLC ADC $68 STA $60 SEP #$20 LDA ($60) STA $64 REP #$20 INC $60 SEP #$20 LDA ($60) STA $65 LDY #$0012 LDA ($6C),Y BIT #$01 BEQ L0304C2 LDA #$00 SEC SBC $64 STA $64 L0304C2 LDY #$0004 LDA ($6C),Y CLC ADC $64 STA $5C CMP #$76 BCS L030527 STA ($6C),Y INY LDA ($6C),Y CLC ADC $65 STA ($6C),Y SEC SBC #$06 STA $5C CMP #$8A BCS L030527 LDY #$0011 LDA ($6C),Y DEC STA ($6C),Y BEQ L0304EF PLP RTL L0304EF LDY #$0010 LDA ($6C),Y INC STA ($6C),Y STA $64 LDX $68 STX $60 LDA ($60) STA $5C CMP $64 BCC L030527 LDA $64 CLC ADC #$23 STA $60 STZ $61 REP #$20 LDA $60 CLC ADC $68 STA $60 SEP #$20 LDA ($60) LSR LSR LSR LSR INC LDY #$0011 STA ($6C),Y PLP RTL L030527 JMP L030468 L03052A ENT PHP SEP #$20 LDA L024432 CLC ADC L024438 CMP #$09 BCC L03053A PLP RTL L03053A LDA L024438 DEC STA $60 STZ $61 REP #$20 LDA $60 CLC ADC $64 STA $60 SEP #$20 LDA ($60) STA $60 LDA L024436 CLC ADC $60 STA $5D BCC L03055D PLP RTL L03055D LDA $5D STA L024436 LDA $5C STA L024432 LDX #L024E00 STX $6C LDA #$08 STA $65 L030570 LDX $64 PHX LDA ($6C) STA $5C BNE L03057D JSL L030597 L03057D REP #$20 LDA $6C CLC ADC #$0060 STA $6C SEP #$20 PLX STX $64 DEC $65 BNE L030570 LDA #$FF STA L024438 PLP RTL L030597 LDA L024438 BNE L03059D RTL L03059D DEC STA L024438 LDA #$00 LDY #$000C STA ($6C),Y LDA L02443A CLC ADC #$10 STA ($6C) LDX L024DB8 STX $60 LDA L0201B8 STA $5C BEQ L0305C3 LDA #$7F SEC SBC $60 STA $60 L0305C3 REP #$20 LDA $60 LDY #$0004 STA ($6C),Y SEP #$20 LDA #$00 LDY #$0006 STA ($6C),Y LDA L0266C8 LDY #$0007 STA ($6C),Y LDA #$00 LDY #$0010 STA ($6C),Y LDX $68 STX $60 LDA ($60) LSR LSR LSR LSR INC LDY #$0011 STA ($6C),Y LDA L0201B8 LDY #$0012 STA ($6C),Y RTL L0305FD ENT PHP SEP #$20 LDY #$000C LDA ($6C),Y STA $5C BEQ L03060B PLP RTL L03060B JSL L0320D8 REP #$20 LDY #$0004 LDA ($6C),Y STA $68 SEP #$20 CLC ADC #$04 STA $68 JSL L031E2F LDX $60 STX L024DB8 PHX LDA $69 STA $60 STZ $61 LDY $60 LDA L0207E8,Y STA $5C LDX $60 STX $74 PLX STX $60 LDA $60 CLC ADC $5C STA $60 LDX $60 STX L024DBA LDY $74 LDA L0207E8,Y LSR STA $64 LDA $60 SEC SBC $64 STA $60 LDA $61 SEC SBC $64 STA $61 LDX $60 STX L024DBC LDA $69 CLC ADC #$04 STA $69 INC $68 JSL L031E2F LDX $60 STX L024DBE LDA #$01 STA L02445B STZ L02464A LDX L024DBC STX L024D58 STX L024D78 LDX L024DB8 STX L024D5A LDX L024DBE STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$02 STA L02445B STZ L02474A LDX L024DBC STX L024D58 STX L024D78 LDX L024DBA STX L024D7A LDX L024DBE STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 JSL L03219C LDY #$000B LDA ($6C),Y REP #$20 AND #$0007 ASL TAX LDA L0243B8,X STA L023D85 SEP #$20 LDA #$01 STA L02445B REP #$20 LDA L023D85 AND #$FFFF STA $64 STA $66 SEP #$20 JSL L072F07 LDA #$02 STA L02445B REP #$20 LDA L023D85 AND #$FCFC STA $64 LDA L023D85 AND #$CFCF STA $66 SEP #$20 JSL L072F07 LDX L024DBC STX $60 DEC $60 REP #$20 LDA $60 LDY #$0020 STA ($6C),Y SEP #$20 LDX L024DB8 STX $60 DEC $60 DEC $60 REP #$20 LDA $60 LDY #$0022 STA ($6C),Y SEP #$20 LDX L024DBE STX $60 DEC $65 REP #$20 LDA $60 LDY #$0024 STA ($6C),Y SEP #$20 LDX L024DBC STX $60 INC $60 REP #$20 LDA $60 LDY #$0040 STA ($6C),Y SEP #$20 LDX L024DBA STX $60 INC $60 INC $60 REP #$20 LDA $60 LDY #$0042 STA ($6C),Y SEP #$20 LDX L024DBE STX $60 INC $60 REP #$20 LDA $60 LDY #$0044 STA ($6C),Y LDA #$0202 LDY #$0002 STA ($6C),Y SEP #$20 LDA L024459 LDY #$0001 STA ($6C),Y LDA ($6C) ORA #$80 STA ($6C) PLP RTL L03079E ENT PHP SEP #$20 LDY #$000C LDA ($6C),Y BEQ L0307AA PLP RTL L0307AA JSL L0320D8 LDY #$0004 REP #$20 LDA ($6C),Y STA $68 SEP #$20 CLC ADC #$05 STA $68 JSL L031E2F LDX $60 PHX STZ $61 LDA $69 STA $60 LDY $60 LDA L020748,Y STA $5C PLX STX $60 LDA $5C STA $65 LDA $61 SEC SBC $65 STA $61 LDX $60 STX L024DC4 CLC ADC $65 STA $61 LDA $60 CLC ADC $65 STA $60 LDX $60 STX L024DC2 SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DC0 CLC ADC $65 STA $60 LDX $60 PHX STZ $61 LDA $69 STA $60 LDY $60 LDA L0207E8,Y STA $5C PLX STX $60 STA $65 CLC ADC $60 STA $60 LDX $60 STX L024DBA SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DB8 CLC ADC $65 STA $60 LDA $61 SEC SBC $65 STA $61 LDX $60 STX L024DBC CLC ADC $65 CLC ADC $65 STA $61 LDX $60 STX L024DBE INC $69 JSL L031E2F LDX $60 PHX LDA $69 STA $60 STZ $61 LDY $60 LDA L0207E8,Y STA $5C PLX STX $60 STA $65 CLC ADC $60 STA $60 LDX $60 STX L024DC8 SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DC6 CLC ADC $65 STA $60 LDA $61 SEC SBC $65 STA $61 LDX $60 STX L024DCA CLC ADC $65 CLC ADC $65 STA $61 LDX $60 STX L024DCC INC $69 INC $69 JSL L031E2F LDX $60 STX L024DCE LDA #$01 STA L02445B STZ L02464A LDX L024DB8 STX L024D58 STX L024D78 LDX L024DC6 STX L024D5A LDX L024DBE STX L024D7A LDX L024DCC STX L024D5C STX L024D7C LDX #$0202 STX L024456 JSL L181103 LDA #$02 STA L02445B STZ L02474A LDX L024DBA STX L024D58 STX L024D78 LDX L024DBE STX L024D5A LDX L024DC8 STX L024D7A LDX L024DCC STX L024D5C STX L024D7C LDX #$0202 STX L024456 JSL L181103 LDA #$03 STA L02445B STZ L02484A LDX L024DC4 STX L024D58 STX L024D78 LDX L024DC0 STX L024D5A LDX L024DCE STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$04 STA L02445B STZ L02494A LDX L024DBC STX L024D58 STX L024D78 LDX L024DC2 STX L024D7A LDX L024DCE STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 LDA #$05 STA L02445B STZ L024A4A LDX L024DBC STX L024D58 STX L024D78 LDX L024DB8 STX L024D5A LDX L024DCA STX L024D7A LDX L024DC6 STX L024D5C STX L024D7C LDX #$0202 STX L024456 JSL L181103 LDA #$06 STA L02445B STZ L024B4A LDX L024DBC STX L024D58 STX L024D78 LDX L024DCA STX L024D5A LDX L024DBA STX L024D7A LDX L024DC8 STX L024D5C STX L024D7C LDX #$0202 STX L024456 JSL L181103 JSL L03219C LDA #$01 STA L02445B LDX #$4444 STX $64 LDX #$8888 STX $66 JSL L072F07 LDA #$02 STA L02445B LDX #$4444 STX $64 LDX #$8888 STX $66 JSL L072F07 LDA #$00 XBA LDY #$000B LDA ($6C),Y REP #$20 ASL TAX LDA L0243B8,X STA L023D85 SEP #$20 LDA #$03 STA L02445B REP #$20 LDA L023D85 AND #$FFFF STA $64 STA $66 SEP #$20 JSL L072F07 LDA #$04 STA L02445B REP #$20 LDA L023D85 AND #$CCCC STA $64 LDA L023D85 AND #$3333 STA $66 SEP #$20 JSL L072F07 LDA #$05 STA L02445B LDX #$6666 STX $64 STX $66 JSL L072F07 LDA #$06 STA L02445B LDX #$9999 STX $64 STX $66 JSL L072F07 LDX L024DBC STX $60 DEC $61 DEC $60 REP #$20 LDA $60 LDY #$0020 STA ($6C),Y SEP #$20 LDX L024DB8 STX $60 DEC $60 REP #$20 LDA $60 LDY #$0022 STA ($6C),Y SEP #$20 LDX L024DC6 STX $60 DEC $60 REP #$20 LDA $60 LDY #$0024 STA ($6C),Y SEP #$20 LDX L024DCE STX $60 LDA $60 SEC SBC #$04 STA $60 INC $61 REP #$20 LDA $60 LDY #$0026 STA ($6C),Y SEP #$20 LDX L024DBC STX $60 DEC $61 INC $60 REP #$20 LDA $60 LDY #$0040 STA ($6C),Y SEP #$20 LDX L024DBA STX $60 INC $60 REP #$20 LDA $60 LDY #$0042 STA ($6C),Y SEP #$20 LDX L024DC8 STX $60 INC $60 REP #$20 LDA $60 LDY #$0044 STA ($6C),Y SEP #$20 LDX L024DCE STX $60 LDA $60 CLC ADC #$04 STA $60 INC $61 REP #$20 LDA $60 LDY #$0046 STA ($6C),Y LDA #$0303 LDY #$0002 STA ($6C),Y SEP #$20 LDA L024459 DEY STA ($6C),Y LDA ($6C) ORA #$80 STA ($6C) PLP RTL L030B0D ENT PHP SEP #$20 LDY #$000C LDA ($6C),Y STA $5C BEQ L030B1B PLP RTL L030B1B JSL L0320D8 LDY #$0004 LDA ($6C),Y CLC ADC #$05 STA $68 LDY #$0005 LDA ($6C),Y STA $69 JSL L031E2F LDX $60 PHX LDA $69 STA $60 STZ $61 LDY $60 LDA L0209C8,Y STA $5C PLX STX $60 LSR $5C LDA $5C STA $65 CLC ADC $60 STA $60 LDX $60 STX L024DBA SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DB8 CLC ADC $65 STA $60 SEC LDA $61 SBC $65 STA $61 LDX $60 STX L024DBC CLC LDA $61 ADC $65 STA $61 LDX $60 PHX LDA $69 STA $60 STZ $61 LDY $60 LDA L020748,Y STA $5C PLX STX $60 STA $65 CLC ADC $60 STA $60 LDX $60 STX L024DC2 SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DC0 CLC ADC $65 STA $60 SEC LDA $61 SBC $65 STA $61 LDX $60 STX L024DBE INC $69 INC $69 INC $69 JSL L031E2F LDX $60 PHX LDA $69 STA $60 STZ $61 LDY $60 LDA L020748,Y STA $5C PLX STX $60 LDA $5C STA $65 CLC ADC $60 STA $60 LDX $60 STX L024DC6 SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DC4 CLC ADC $65 STA $60 LDA $61 SEC SBC $65 STA $61 LDX $60 STX L024DC8 INC $69 INC $69 INC $69 JSL L031E2F LDX $60 STX L024DCA LDA #$01 STA L02445B STZ L02464A LDX L024DBE STX L024D58 STX L024D78 LDX L024DC0 STX L024D5A LDX L024DC8 STX L024D7A LDX L024DC4 STX L024D5C STX L024D7C LDX #$0202 STX L024456 JSL L181103 LDA #$02 STA L02445B STZ L02474A LDX L024DC8 STX L024D5A LDX L024DC2 STX L024D7A LDX L024DC6 LDX $60 STX L024D5C STX L024D7C LDX #$0202 STX L024456 JSL L181103 LDA #$03 STA L02445B STZ L02484A LDX L024DC8 STX L024D58 STX L024D78 LDX L024DC4 STX L024D5A LDX L024DCA STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$04 STA L02445B STZ L02494A LDX L024DC6 STX L024D7A LDX L024DCA STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 LDA #$05 STA L02445B STZ L024A4A LDX L024DB8 STX L024D58 LDX L024DC0 STX $60 DEC $60 LDX $60 STX L024D78 LDX L024DC4 STX $60 DEC $60 LDX $60 STX L024D5A STX L024D7A LDX #$0101 STX L024456 JSL L181103 LDA #$06 STA L02445B STZ L024B4A LDX L024DC2 STX $60 INC $60 LDX $60 STX L024D58 LDX L024DBA STX L024D78 LDX L024DC6 STX $60 INC $60 LDX $60 STX L024D5A STX L024D7A LDX #$0101 STX L024456 JSL L181103 LDA #$07 STA L02445B STZ L024C4A LDX L024DBC STX L024D58 STX L024D78 LDY #$0004 LDA ($6C),Y STA $5C CMP #$3B BCS L030D4F LDX L024DBE STX L024D5A LDX L024DC8 STX L024D5C STX L024D7A LDX #$0102 STX L024456 JMP L030D64 L030D4F LDX L024DBE STX L024D7A LDX L024DC8 STX L024D5A STX L024D7C LDX #$0201 STX L024456 L030D64 JSL L181103 JSL L03219C LDA #$01 STA L02445B LDX #$6464 STX $64 LDX #$4646 STX $66 JSL L072F07 LDA #$02 STA L02445B LDX #$8888 STX $64 STX $66 JSL L072F07 LDA #$03 STA L02445B LDX #$FCFC STX $64 LDX #$CFCF STX $66 JSL L072F07 LDA #$04 STA L02445B LDX #$CCCC STX $64 STX $66 JSL L072F07 LDA #$05 STA L02445B LDX #$5454 STX $64 LDX #$4545 STX $66 JSL L072F07 LDA #$06 STA L02445B LDX #$5454 STX $64 LDX #$4545 STX $66 JSL L072F07 LDA #$07 STA L02445B LDX #$5454 STX $64 LDX #$4545 STX $66 JSL L072F07 LDX L024DBC STX $60 DEC $60 REP #$20 LDA $60 LDY #$0020 STA ($6C),Y LDA L024DB8 STA $60 SEP #$20 DEC $60 DEC $60 REP #$20 LDA $60 LDY #$0022 STA ($6C),Y SEP #$20 LDX L024DCA STX $60 DEC $60 DEC $60 REP #$20 LDA $60 LDY #$0024 STA ($6C),Y SEP #$20 LDX L024DBC STX $60 INC $60 REP #$20 LDA $60 LDY #$0040 STA ($6C),Y SEP #$20 LDX L024DBA STX $60 INC $60 INC $60 REP #$20 LDA $60 LDY #$0042 STA ($6C),Y SEP #$20 LDX L024DCA STX $60 INC $60 INC $60 REP #$20 LDA $60 LDY #$0044 STA ($6C),Y LDA #$0202 LDY #$0002 STA ($6C),Y SEP #$20 LDA L024459 LDY #$0001 STA ($6C),Y LDA ($6C) ORA #$80 STA ($6C) PLP RTL L030E77 ENT PHP SEP #$20 LDY #$000C LDA ($6C),Y STA $5C BEQ L030E85 PLP RTL L030E85 JSL L0320D8 LDX #$5555 STX L023D85 LDA L024428 AND #$01 BNE L030E9C LDX #$FFFF STX L023D85 L030E9C LDY #$0004 LDA ($6C),Y CLC ADC #$05 STA $68 LDY #$0005 LDA ($6C),Y STA $69 STZ $61 LDA $69 STA $60 LDY $60 LDA L0207E8,Y STA $5C CMP #$06 BCC L030EC2 LDA #$05 STA $5C L030EC2 ASL $5C LDX #L026B2E STX $60 REP #$20 LDA $68 LDY #$0020 STA ($6C),Y LDA $60 LDY #$0023 STA ($6C),Y SEP #$20 LDA $5C LDY #$0022 STA ($6C),Y JSL L0F07DA LDA ($6C) ORA #$80 STA ($6C) LDA #$FE LDY #$0001 STA ($6C),Y PLP RTL L030EF5 ENT PHP REP #$20 LDA #L024E00 STA $6C LDA #$0008 STA $64 STZ $5C L030F04 LDA L023E14 BEQ L030F0F JSL L0729D3 BRA L030F18 L030F0F LDA L023E12 BEQ L030F18 JSL L072418 L030F18 SEP #$20 LDA $5D ORA ($6C) STA $5D BEQ L030F26 INC $5C STZ $5D L030F26 REP #$20 LDA $6C CLC ADC #$0060 STA $6C DEC $64 BNE L030F04 SEP #$20 LDA $5C STA L024432 LDA L02443C STA $5C BEQ L030F48 DEC L02443C JMP L030F79 L030F48 LDA L024432 CMP #$08 BCS L030F79 LDA L024438 STA $5C CMP #$FA BCS L030F79 LDA #$00 XBA LDA L02443A ASL ASL TAX REP #$20 LDAL L030000,X STAL L030F75+1 SEP #$20 LDAL L030002,X STAL L030F75+3 L030F75 JSL $000000 L030F79 STZ $5C STZ L024436 REP #$20 LDA #L024E00 STA $6C LDA #$0008 STA $64 L030F8A LDA $64 PHA SEP #$20 LDA ($6C) AND #$7F BNE L030F98 JMP L03114B L030F98 STA $5C CMP #$10 BEQ L031011 BCS L030FA3 JMP L031056 L030FA3 STA $68 LDY #$0007 LDA ($6C),Y STA $5C BEQ L030FB1 JMP L031056 L030FB1 ENT LDA $68 STA $5C CMP #$7F BNE L030FBC JMP L03114B L030FBC LDA L023E28 CMP #$FD BNE L030FCC LDA $68 CMP #$14 BNE L030FCC JMP L031056 L030FCC LDA #$02 STA L02447E LDA $68 STA $5C CMP #$11 BNE L03101B REP #$20 LDAL L030182 STA $04 SEP #$20 JSL L18071A LDA ($6C) AND #$80 CLC ADC #$10 STA ($6C) LDY #$0004 LDA ($6C),Y CMP #$40 BCS L03100A LDY #$0010 LDA #$00 STA ($6C),Y LDY #$0007 LDA #$01 STA ($6C),Y JMP L031056 L03100A LDY #$0010 LDA #$02 STA ($6C),Y L031011 LDY #$0007 LDA #$01 STA ($6C),Y JMP L031056 L03101B REP #$20 LDA $5C AND #$00FF SEC SBC #$0010 ASL TAX LDAL L030180,X STA $04 SEP #$20 JSL L18071A LDA L024412 BEQ L03104D LDA ($6C) AND #$7F CMP #$14 BNE L03104D LDA ($6C) AND #$80 CLC ADC #$0D STA ($6C) JMP L031056 L03104D LDA ($6C) AND #$80 CLC ADC #$0E STA ($6C) L031056 LDA ($6C) AND #$7F SEC SBC #$10 STA $60 BCC L0310BB LDA #$00 XBA LDA $60 ASL ASL TAX REP #$20 LDAL L030080,X STAL L03107D+1 SEP #$20 LDAL L030082,X STAL L03107D+3 L03107D JSL $000000 JMP L0310BB L031084 STZ $5C JMP L0310E1 L031089 LDA #$02 STA $5C JMP L0310E1 L031090 LDA #$03 STA $5C JMP L0310E1 L031097 LDA #$04 STA $5C JMP L0310E1 L03109E LDA #$05 STA $5C JMP L0310E1 L0310A5 LDY #$0004 LDA ($6C),Y STA $5C CMP #$20 BCC L031084 CMP #$50 BCS L031089 LDA #$01 STA $5C JMP L0310E1 L0310BB LDY #$0005 LDA ($6C),Y STA $5C CMP #$87 BCC L0310A5 LDY #$0004 LDA ($6C),Y STA $5C CMP #$08 BCC L031090 CMP #$69 BCS L031090 CMP #$25 BCC L031097 CMP #$4C BCS L03109E LDA #$01 STA $5C L0310E1 LDA $5C STA L024459 LDA #$00 XBA LDA ($6C) AND #$7F SEC SBC #$10 STA $60 BCC L031112 ASL ASL TAX REP #$20 LDAL L030100,X STAL L03110B+1 SEP #$20 LDAL L030102,X STAL L03110B+3 L03110B JSL $000000 JMP L03114B L031112 LDA #$00 XBA LDA $60 CLC ADC #$10 ASL ASL TAX LDY #$0004 LDA ($6C),Y CLC ADC #$05 STA $68 LDY #$0005 LDA ($6C),Y LDY #$000A CLC ADC ($6C),Y ROR STA $69 LDA L026E37+2,X STAL L031147+3 REP #$20 LDA L026E37,X STAL L031147+1 SEP #$20 L031147 JSL $000000 L03114B REP #$20 LDA $6C CLC ADC #$0060 STA $6C PLA DEC STA $64 BEQ L03115E JMP L030F8A L03115E PLP RTL L031160 ENT PHP REP #$20 LDX $72 PHX LDX #$00E1 STX $72 LDA #$0008 STA $64 LDA #L025100 STA $6C L031175 LDA $64 PHA SEP #$20 LDA ($6C) STA $5C BNE L031183 JMP L03130A L031183 JSL L031551 LDA L02436E STA $5C BEQ L031191 JMP L03130A L031191 LDA ($6C) AND #$7F STA $5C BNE L03119C JMP L03131C L03119C LDA $5C STA $64 SEC SBC #$02 ASL STA $5C STZ $5D LDX $5C LDY #$0020 LDA ($6C),Y STA $68 LDY #$0028 LDA ($6C),Y STA $69 LDA $68 STA $5C CMP $69 BCC L0311C8 LDA $69 STA $68 LDA $5C STA $69 L0311C8 LDY #$0018 LDA ($6C),Y STA $5C STZ $60 JMP (L0311D4,X) L0311D4 DA L0311DE DA L0311E5 DA L0311EC DA L0311F3 DA L0311FA L0311DE JSL L180989 JMP L0311FE L0311E5 JSL L180977 JMP L0311FE L0311EC JSL L180965 JMP L0311FE L0311F3 JSL L180953 JMP L0311FE L0311FA JSL L180941 L0311FE LDA $5C LDY #$0018 STA ($6C),Y LDY #$0008 LDA ($6C),Y STA $68 LDY #$0010 LDA ($6C),Y STA $69 LDY #$0030 LDA #$00 XBA LDA ($6C),Y ASL STA $5C TAX JMP (L031222,X) L031222 DA L031232 DA L031243 DA L031254 DA L031265 DA L031276 DA L031287 DA L031298 DA L0312A9 L031232 LDA $68 CLC ADC $60 STA $68 LDA $69 SEC SBC $64 STA $69 JMP L0312B7 L031243 LDA $68 CLC ADC $64 STA $68 LDA $69 SEC SBC $60 STA $69 JMP L0312B7 L031254 LDA $68 CLC ADC $64 STA $68 LDA $69 CLC ADC $60 STA $69 JMP L0312B7 L031265 LDA $68 CLC ADC $60 STA $68 LDA $69 CLC ADC $64 STA $69 JMP L0312B7 L031276 LDA $68 SEC SBC $60 STA $68 LDA $69 CLC ADC $64 STA $69 JMP L0312B7 L031287 LDA $68 SEC SBC $64 STA $68 LDA $69 CLC ADC $60 STA $69 JMP L0312B7 L031298 LDA $68 SEC SBC $64 STA $68 LDA $69 SEC SBC $60 STA $69 JMP L0312B7 L0312A9 LDA $68 SEC SBC $60 STA $68 LDA $69 SEC SBC $64 STA $69 L0312B7 LDY #$0008 LDA $68 STA ($6C),Y LDY #$0010 LDA $69 STA ($6C),Y SEC SBC #$0F ORA $68 STA $5C BEQ L03131C BMI L03131C LDA ($6C) AND #$7F STA ($6C) LDX $68 PHX LDA $68 CLC ADC #$02 STA $68 JSL L0F1E48 PLX STX $68 LDA $5C BNE L03131C LDX $68 PHX LDA $68 SEC SBC #$02 STA $68 JSL L0F1E48 PLX STX $68 LDA $5C BNE L03131C JSL L031325 LDA ($6C) BIT #$80 BEQ L03131C L03130A REP #$20 INC $6C PLA DEC STA $64 BEQ L031317 JMP L031175 L031317 PLX STX $72 PLP RTL L03131C SEP #$20 LDA #$00 STA ($6C) JMP L03130A L031325 PHP REP #$20 LDA $6C PHA LDA #$FFFF STA L024330 STA L024332 SEP #$20 LDY #$0008 LDA ($6C),Y STA $68 LDY #$0010 LDA ($6C),Y STA $69 REP #$20 LDA $68 STA $04 JSL L1809AE LDA $00 STA $60 SEP #$20 DEC $61 BEQ L03135D PLX STX $6C PLP RTL L03135D LDA $60 STA $5C LSR LSR STA $60 DEC STA $5D CMP #$3E BCC L031371 PLX STX $6C PLP RTL L031371 REP #$20 LDA $60 LDY $68 STY $60 ASL STA $68 LDA #$0000 SEP #$20 LDA $61 STA $60 STA $64 REP #$20 ASL TAX LDA L020568,X CLC ADC $68 STA $70 SEP #$20 LDA $5C AND #$02 LSR STA $68 REP #$20 TXA LSR TAX SEP #$20 LDA L0207E8,X STA $5C CMP #$02 BCS L0313B0 LDA #$02 STA $5C L0313B0 CMP #$07 BCC L0313B8 LDA #$06 STA $5C L0313B8 LDA $5C SEC SBC #$02 ASL ORA $68 STA $5C LDY #$0048 STA ($6C),Y LDA ($6C) ORA #$80 STA ($6C) LDA $5C STA $60 LDA $70 LDY #$0038 STA ($6C),Y LDY #$0040 LDA $71 STA ($6C),Y L0313DF LDA #$00 XBA LDA $60 ASL TAX JMP (L0313E9,X) L0313E9 DA L031401 DA L0313FD DA L031412 DA L031437 DA L031444 DA L031483 DA L031490 DA L0314D7 DA L0314F1 DA L0314E4 L0313FD REP #$20 INC $70 L031401 SEP #$20 LDA #$5D AND L024330 STA [$70] LDY #$00A0 STA [$70],Y JMP L03154C L031412 REP #$20 LDA $70 SEC SBC #$00A1 STA $70 L03141C LDA #$5401 AND L024330 STA [$70] LDY #$0140 STA [$70],Y LDA #$DD05 AND L024330 LDY #$00A0 STA [$70],Y JMP L03154C L031437 REP #$20 LDA $70 SEC SBC #$00A0 STA $70 JMP L03141C L031444 REP #$20 LDA $70 SEC SBC #$00A1 STA $70 L03144E SEP #$20 LDA #$55 AND L024330 LDY #$0001 STA [$70],Y LDY #$01E1 STA [$70],Y LDA #$05 AND L024330 LDY #$00A0 STA [$70],Y LDY #$0140 STA [$70],Y REP #$20 LDA #$50DD AND L024330 LDY #$00A1 STA [$70],Y LDY #$0141 STA [$70],Y JMP L03154C L031483 REP #$20 LDA $70 SEC SBC #$00A0 STA $70 JMP L03144E L031490 REP #$20 LDA $70 SEC SBC #$0141 STA $70 L03149A REP #$20 LDA #$5505 AND L024330 STA [$70] LDY #$0280 STA [$70],Y LDA #$DD5D AND L024330 LDY #$00A0 STA [$70],Y LDY #$0140 STA [$70],Y LDY #$01E0 STA [$70],Y SEP #$20 LDA #$50 AND L024330 LDY #$00A2 STA [$70],Y LDY #$0142 STA [$70],Y LDY #$01E2 STA [$70],Y JMP L03154C L0314D7 REP #$20 LDA $70 SEC SBC #$0140 STA $70 JMP L03149A L0314E4 REP #$20 LDA $70 SEC SBC #$0140 STA $70 JMP L0314FB L0314F1 REP #$20 LDA $70 SEC SBC #$0141 STA $70 L0314FB SEP #$20 LDA #$55 AND L024330 LDY #$0001 STA [$70],Y LDY #$0321 STA [$70],Y LDA #$05 AND L024330 LDY #$00A0 STA [$70],Y LDY #$0280 STA [$70],Y LDA #$5D AND L024330 LDY #$0140 STA [$70],Y LDY #$01E0 STA [$70],Y REP #$20 LDA #$50DD AND L024330 LDY #$00A1 STA [$70],Y LDY #$0281 STA [$70],Y LDA #$D5DD AND L024330 LDY #$0141 STA [$70],Y LDY #$01E1 STA [$70],Y L03154C PLX STX $6C PLP RTL L031551 PHP SEP #$20 LDA $5C AND #$80 STA $5C BNE L03155E PLP RTL L03155E LDX #$0000 STX L024330 STX L024332 LDY #$0038 LDA ($6C),Y STA $70 LDY #$0040 LDA ($6C),Y STA $71 LDY #$0048 LDA ($6C),Y STA $60 LDX $6C PHX JMP L0313DF L031582 ENT PHP SEP #$20 LDA L024434 STA $5C BNE L03158E PLP RTL L03158E INC L026E36 LDA $5C CMP L026E36 BCC L03159A PLP RTL L03159A STZ L026E36 PLP L03159E ENT PHP SEP #$20 JSL L180C51 AND #$01 STA $5C BNE L0315CF LDX L024442 STX $60 JSL L180C51 AND #$0F SEC SBC #$07 CLC ADC $60 STA $60 JSL L180C51 AND #$0F SEC SBC #$0B CLC ADC $61 STA $61 JMP L0315E2 L0315CF JSL L180C51 AND #$7F STA $60 JSL L180C51 AND #$7F CLC ADC #$10 STA $61 L0315E2 LDA $69 SEC SBC #$10 ORA $68 STA $5C BPL L0315EF PLP RTL L0315EF LDX $6C PHX LDX #L025100 STX $6C LDY #$0000 LDA ($6C) STA $5C BEQ L031636 INY LDA ($6C),Y STA $5C BEQ L031636 INY LDA ($6C),Y STA $5C BEQ L031636 INY LDA ($6C),Y STA $5C BEQ L031636 INY LDA ($6C),Y STA $5C BEQ L031636 INY LDA ($6C),Y STA $5C BEQ L031636 INY LDA ($6C),Y STA $5C BEQ L031636 INY LDA ($6C),Y STA $5C BEQ L031636 PLX STX $6C PLP RTL L031636 REP #$20 TYA CLC ADC $6C STA $6C SEP #$20 LDA L02442A STA $5C STA ($6C) LDY #$0008 LDA $68 STA ($6C),Y LDY #$0010 LDA $69 STA ($6C),Y LDA $60 SEC SBC $68 STA $5C BCS L031661 JMP L0316E4 L031661 LDY #$0020 LDA $5C STA ($6C),Y LDA $5C STA $64 LDA $61 SEC SBC $69 STA $5C BCC L0316AA LDA $5C LDY #$0028 STA ($6C),Y CMP $64 BCC L031695 LSR $5C LDY #$0018 LDA $60 STA ($6C),Y LDA #$03 LDY #$0030 STA ($6C),Y PLX STX $6C PLP RTL L031695 LSR $64 LDY #$0018 LDA $64 STA ($6C),Y LDY #$0030 LDA #$02 STA ($6C),Y PLX STX $6C PLP RTL L0316AA LDA $5C EOR #$FF INC STA $5C LDY #$0028 STA ($6C),Y CMP $64 BCC L0316CF LSR $5C LDY #$0018 LDA $5C STA ($6C),Y LDY #$0030 LDA #$00 STA ($6C),Y PLX STX $6C PLP RTL L0316CF LSR $64 LDY #$0018 LDA $64 STA ($6C),Y LDY #$0030 LDA #$01 STA ($6C),Y PLX STX $6C PLP RTL L0316E4 LDA $5C EOR #$FF INC STA $5C LDY #$0020 STA ($6C),Y STA $64 LDA $61 SEC SBC $69 STA $5C BCC L031730 LDY #$0028 LDA $5C STA ($6C),Y CMP $64 BCC L03171B LSR $5C LDY #$0018 LDA $5C STA ($6C),Y LDY #$0030 LDA #$04 STA ($6C),Y PLX STX $6C PLP RTL L03171B LSR $64 LDY #$0018 LDA $64 STA ($6C),Y LDY #$0030 LDA #$05 STA ($6C),Y PLX STX $6C PLP RTL L031730 LDA $5C EOR #$FF INC STA $5C LDY #$0028 STA ($6C),Y CMP $64 BCC L031755 LSR $5C LDY #$0018 LDA $5C STA ($6C),Y LDY #$0030 LDA #$07 STA ($6C),Y PLX STX $6C PLP RTL L031755 LSR $64 LDY #$0018 LDA $64 STA ($6C),Y LDY #$0030 LDA #$06 STA ($6C),Y PLX STX $6C PLP RTL L03176A ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) PLP RTL L031774 ENT PHP SEP #$20 LDY #$000C LDA ($6C),Y BEQ L031780 PLP RTL L031780 JSL L0320D8 LDA #$01 STA L024459 REP #$20 LDY #$0004 LDA ($6C),Y STA $68 SEP #$20 DEC $68 DEC $68 DEC $68 JSL L031E2F LDX $60 STX L024DB8 LDA $69 STA $5C STZ $5D LDY $5C STY $70 LDA L020A68,Y STA $5C CLC ADC $60 STA $60 LDX $60 STX L024DBA INC $68 INC $68 LDA $69 CLC ADC #$04 STA $69 JSL L031E2F LDX $60 STX L024DBC STZ $5D LDA $69 STA $5C LDY $5C STY $70 LDA L0207E8,Y STA $5C CLC ADC $60 STA $60 LDX $60 STX L024DBE LDA $68 SEC SBC #$06 STA $68 JSL L031E2F LDX $60 STX L024DC0 LDA $68 CLC ADC #$0E STA $68 JSL L031E2F LDX $60 STX L024DC2 INC $69 JSL L031E2F LDX $60 STX L024DC6 LDA $68 SEC SBC #$0E STA $68 JSL L031E2F LDX $60 STX L024DC4 INC $68 INC $68 INC $68 JSL L031E2F LDX $60 STX L024DC8 LDA $68 CLC ADC #$08 STA $68 JSL L031E2F LDX $60 STX L024DCA INC $69 INC $69 LDA $68 SEC SBC #$0B STA $68 JSL L031E2F LDX $60 STX L024DCC LDA $68 CLC ADC #$0E STA $68 JSL L031E2F LDX $60 STX L024DCE LDA $68 SEC SBC #$07 STA $68 JSL L031E2F STZ $5D LDA $69 STA $5C LDY $5C STY $70 LDA L0207E8,Y STA $64 LSR STA $65 STA $5C LDA $60 SEC SBC $64 STA $60 LDX $60 STX L024DD0 LDA $60 CLC ADC $64 CLC ADC $64 STA $60 LDX $60 STX L024DD2 LDA $60 SEC SBC $64 SEC SBC $65 STA $60 LDA $61 SEC SBC $64 STA $61 LDX $60 STX L024DD4 LDA $60 CLC ADC $65 CLC ADC $65 STA $60 LDX $60 STX L024DD6 LDA $61 CLC ADC $64 CLC ADC $64 STA $61 LDX $60 STX L024DDA LDA $60 SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DD8 INC $69 JSL L031E2F STZ $5D LDA $69 STA $5C LDY $5C STY $70 LDA L0209C8,Y STA $5C STA $64 CLC ADC $60 STA $60 LDX $60 STX L024DDE LDA $60 SEC SBC $64 SEC SBC $64 STA $60 LDX $60 STX L024DDC INC $69 INC $69 LDA $68 SEC SBC #$09 STA $68 JSL L031E2F LDX $60 STX L024DE0 STZ $5D LDA $69 STA $5C LDY $5C STY $70 LDA L0207E8,Y CLC ADC $60 STA $60 LDA L020748,Y EOR #$FF INC STA $5C CLC ADC $61 STA $61 LDX $60 STX L024DE4 LDA $68 CLC ADC #$12 STA $68 JSL L031E2F LDX $60 STX L024DE2 LDY $70 LDA L0207E8,Y EOR #$FF INC CLC ADC $60 STA $60 LDA L020748,Y EOR #$FF INC CLC ADC $61 STA $61 LDX $60 STX L024DE6 INC $69 LDA $68 SEC SBC #$09 STA $68 JSL L031E2F STZ $5D LDA $69 STA $5C LDY $5C STY $70 LDA L0209C8,Y STA $65 CLC ADC $60 STA $60 LDX $60 STX L024DEA LDA $60 SEC SBC $65 SEC SBC $65 STA $60 LDX $60 STX L024DE8 LDA L0207E8,Y STA $65 CLC ADC $60 STA $60 LDA $61 SEC SBC $65 STA $61 LDX $60 STX L024DEC LDA $61 CLC ADC $65 CLC ADC $65 STA $61 LDX $60 STX L024DF0 LDA L020A68,Y CLC ADC $60 STA $60 LDX $60 STX L024DF2 LDA L0207E8,Y ASL EOR #$FF INC STA $5C CLC ADC $61 STA $61 LDX $60 STX L024DEE INC $69 INC $69 LDA $68 SEC SBC #$07 STA $68 JSL L031E2F LDX $60 STX L024DF4 LDA $68 CLC ADC #$0E STA $68 JSL L031E2F LDX $60 STX L024DF6 LDA #$01 STA L02445B STZ L02464A LDX L024DB8 STX L024D58 STX L024D78 LDX L024DEC STX L024D7A LDX L024DE8 STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 LDA #$02 STA L02445B STZ L02474A LDX L024DBA STX L024D58 STX L024D78 LDX L024DEE STX L024D5A LDX L024DEA STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$03 STA L02445B STZ L02484A LDX L024DBC STX L024D58 LDX L024DBE STX L024D78 LDX L024DD4 STX L024D5A LDX L024DD6 STX L024D7A LDX #$0101 STX L024456 JSL L181103 LDA #$04 STA L02445B STZ L02494A LDX L024DBC STX L024D58 STX L024D78 LDX L024DD4 STX L024D7A LDX L024DD0 STX L024D5A STX L024D5C LDX #$0201 STX L024456 JSL L181103 LDA #$05 STA L02445B STZ L024A4A LDX L024DBE STX L024D58 STX L024D78 LDX L024DD6 STX L024D5A LDX L024DD2 STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$06 STA L02445B STZ L024B4A LDX L024DD4 STX L024D58 LDX L024DD6 STX L024D78 LDX L024DD0 STX L024D5A LDX L024DD2 STX L024D7A LDX L024DD8 STX L024D5C LDX L024DDA STX L024D7C LDX #$0202 STX L024456 JSL L181103 JSL L03219C LDY #$000B LDA ($6C),Y STA $5C LDA #$03 STA $5D LDA #$01 STA L02445B LDX #$AAAA STX $64 STX $66 JSL L072F07 LDA #$02 STA L02445B LDX #$A8A8 STX $64 LDX #$8A8A STX $66 JSL L072F07 LDA #$03 STA L02445B LDX #$5555 STX $64 STX $66 JSL L072F07 LDA #$04 STA L02445B LDX #$1111 STX $64 LDX #$4444 STX $66 JSL L072F07 LDA #$05 STA L02445B LDX #$5151 STX $64 LDX #$4545 STX $66 JSL L072F07 LDX #$5555 STX L023D85 LDA #$06 STA L02445B LDA L024428 AND #$07 STA $5C JSL L072EE5 STZ L02445B STZ L02454A LDX L024DEC STX L024D58 STX L024D78 LDX L024DE8 STX L024D5A LDX L024DF0 STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$01 STA L02445B STZ L02464A LDX L024DEE STX L024D58 STX L024D78 LDX L024DEA STX L024D7A LDX L024DF2 STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 LDA #$02 STA L02445B STZ L02474A LDX L024DC4 STX L024D58 LDX L024DC8 STX L024D78 LDX L024DCC STX L024D5A LDX L024DDC STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$03 STA L02445B STZ L02484A LDX L024DCA STX L024D58 LDX L024DC6 STX L024D78 LDX L024DCE STX L024D7A LDX L024DDE STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 LDA #$04 STA L02445B STZ L02494A LDX L024DC0 STX L024D58 STX L024D78 LDX L024DE4 STX L024D7A LDX L024DE0 STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 LDA #$05 STA L02445B STZ L024A4A LDX L024DC2 STX L024D58 STX L024D78 LDX L024DE6 STX L024D5A LDX L024DE2 STX L024D5C STX L024D7A LDX #$0201 STX L024456 JSL L181103 LDA #$06 STA L02445B STZ L024B4A LDX L024DE4 STX L024D58 STX L024D78 LDX L024DE0 STX L024D5A LDX L024DF4 STX L024D5C STX L024D7A LDX #$0102 STX L024456 JSL L181103 LDA #$07 STA L02445B STZ L024C4A LDX L024DE6 STX L024D58 STX L024D78 LDX L024DE2 STX L024D7A LDX L024DF6 STX L024D5A STX L024D7C LDX #$0201 STX L024456 JSL L181103 STZ L02445B LDX #$1111 STX $64 LDX #$4444 STX $66 JSL L072F07 LDA #$01 STA L02445B LDX #$1111 STX $64 LDX #$4444 STX $66 JSL L072F07 LDA #$02 STA L02445B LDX #$0303 STX $64 LDX #$3030 STX $66 JSL L072F07 LDA #$03 STA L02445B LDX #$0303 STX $64 LDX #$3030 STX $66 JSL L072F07 LDA #$04 STA L02445B LDX #$FFFF STX $64 STX $66 JSL L072F07 LDA #$05 STA L02445B LDX #$FCFC STX $64 LDX #$CFCF STX $66 JSL L072F07 LDA #$06 STA L02445B LDX #$FCFC STX $64 LDX #$CFCF STX $66 JSL L072F07 LDA #$07 STA L02445B LDX #$3333 STX $64 LDX #$CCCC STX $66 JSL L072F07 LDX L024DB8 STX $60 DEC $60 REP #$20 LDY #$0020 LDA $60 STA ($6C),Y LDX L024DC0 STX $60 SEP #$20 DEC $60 REP #$20 LDA $60 LDY #$0022 STA ($6C),Y LDX L024DE0 STX $60 SEP #$20 DEC $60 REP #$20 LDA $60 LDY #$0024 STA ($6C),Y LDX L024DF4 STX $60 SEP #$20 DEC $60 REP #$20 LDA $60 LDY #$0026 STA ($6C),Y LDX L024DBA STX $60 SEP #$20 INC $60 REP #$20 LDA $60 LDY #$0040 STA ($6C),Y LDX L024DC2 STX $60 SEP #$20 INC $60 INC $60 REP #$20 LDA $60 LDY #$0042 STA ($6C),Y LDX L024DE2 STX $60 SEP #$20 INC $60 INC $60 REP #$20 LDA $60 LDY #$0044 STA ($6C),Y LDX L024DF6 STX $60 SEP #$20 INC $60 REP #$20 LDA $60 LDY #$0046 STA ($6C),Y LDA #$0303 LDY #$0002 STA ($6C),Y SEP #$20 LDA #$01 LDY #$0001 STA ($6C),Y LDA ($6C) ORA #$80 STA ($6C) PLP RTL L031E2F ENT PHP REP #$20 LDA $64 PHA LDA $74 PHA SEP #$20 LDA $69 STA $61 STZ $60 REP #$20 LDA $60 LSR LSR STA $60 TAX SEP #$20 LDA $68 BIT #$40 BEQ L031EA1 LDA L020B08,X EOR #$FF INC STA $5C STZ $65 LDA $68 AND #$BF STA $64 REP #$20 LDA $60 CLC ADC $64 STA $60 TAX SEP #$20 LDA $5C CLC ADC L020B08,X CLC ADC #$80 STA $5C LDA #$00 XBA LDA $69 STA $60 TAX LDA L0206A8,X STA $61 LDA $5C STA $60 LDA L024459 ASL STA $5C TAX JMP (L031E93,X) L031E93 DA L031EE8 DA L031EEF DA L031EF9 DA L031EEF DA L031F0C DA L031F1F DA L031EF9 L031EA1 LDA $68 STA $5C STZ $5D REP #$20 TXA CLC ADC $5C STA $60 TAX SEP #$20 LDA L020B08,X STA $5C LDA $69 STA $60 STZ $61 LDX $60 LDA L0206A8,X STA $61 LDA $5C STA $60 LDA L024459 STA $5C STZ $5D REP #$20 LDA $5C ASL TAX SEP #$20 JMP (L031EDA,X) L031EDA DA L031EE8 DA L031EEF DA L031EF9 DA L031EEF DA L031F0C DA L031F1F DA L031EE8 L031EE8 LDA $60 CLC ADC #$80 STA $60 L031EEF REP #$20 PLA STA $74 PLA STA $64 PLP RTL L031EF9 SEP #$20 LDA $60 CLC ADC #$80 STA $60 REP #$20 PLA STA $74 PLA STA $64 PLP RTL L031F0C SEP #$20 LDA $60 CLC ADC #$82 STA $60 REP #$20 PLA STA $74 PLA STA $64 PLP RTL L031F1F SEP #$20 LDA $60 CLC ADC #$7A STA $60 REP #$20 PLA STA $74 PLA STA $64 PLP RTL L031F32 ENT PHP SEP #$20 LDA $5D PHA LDA $5C PHA LSR LDY #$0005 CLC ADC ($6C),Y STA $5C STA $69 LDY #$0004 LDA ($6C),Y CLC ADC #$05 STA $68 JSL L031E2F STZ $68 REP #$20 LDA $68 LSR LSR STA L024452 STA $68 SEP #$20 LDA $64 STA $5C JSL L03206C LDA $5C CLC ADC $60 STA $60 LDA $65 STA $5C JSL L03206C LDA $61 CLC ADC $5C STA $61 PLA STA $5C PLA STA $5D LDA $5C BIT #$01 BNE L031F8F PLP RTL L031F8F REP #$20 LDA $60 PHA SEP #$20 LDA L024452 CLC ADC #$40 STA L024452 LDA $5C LSR INC LDY #$0005 CLC ADC ($6C),Y STA $5C STA $69 LDY #$0004 LDA ($6C),Y CLC ADC #$05 STA $68 JSL L031E2F LDA $64 STA $5C JSL L03206C LDA $60 CLC ADC $5C STA $60 LDA $65 STA $5C JSL L03206C LDA $61 CLC ADC $5C STA $61 PLA STA $68 PLA STA $69 LDA $61 CMP $69 BCC L031FF7 LDA $61 CLC ADC $69 ROR STA $61 LDA $60 CLC ADC $68 ROR STA $60 PLP RTL L031FF7 LDA #$E1 STA $61 LDA $68 CLC ADC $60 ROR STA $5C LDA $60 STA $68 PLP RTL LDA $65 STA $69 LDA $64 STA $68 JSL L031E2F LDX $68 LDY $60 STX $60 STY $68 STZ $60 REP #$20 LDA $60 LSR LSR STA L024452 STA $60 SEP #$20 LDA ($6C) STA $5C JSL L03206C LDA $68 CLC ADC $5C STA $68 LDY #$0001 LDA ($6C),Y STA $5C JSL L03206C LDA $69 AND $5C STA $69 PLP RTL L03204E ENT PHP SEP #$20 JSL L031E2F LDX $68 LDY $60 STX $60 STY $68 STZ $60 REP #$20 LDA $60 LSR LSR STA L024452 STA $60 PLP RTL L03206C ENT PHP SEP #$20 LDA $5C BNE L032075 PLP RTL L032075 REP #$20 LDA $60 PHA LDA $68 PHA SEP #$20 STZ $5D REP #$20 LDA L024452 TAX SEP #$20 LDA L020B08,X STA $69 LDA $5C BMI L0320AF REP #$20 TXA CLC ADC $5C TAX SEP #$20 LDA L020B08,X SEC SBC $69 LSR LSR STA $5C REP #$20 PLA STA $68 PLA STA $60 PLP RTL L0320AF SEP #$20 LDA $5C EOR #$FF INC STA $5C REP #$20 TXA CLC ADC $5C TAX SEP #$20 LDA L020B08,X SEC SBC $69 LSR LSR EOR #$FF INC STA $5C REP #$20 PLA STA $68 PLA STA $60 PLP RTL L0320D8 ENT PHP SEP #$20 LDA ($6C) BIT #$80 BNE L0320E3 PLP RTL L0320E3 LDY #$0001 LDA ($6C),Y CMP #$FE BNE L0320EF JMP L032179 L0320EF BCS L032156 LDY #$0021 LDA ($6C),Y CMP #$E8 BCC L0320FC PLP RTL L0320FC SEP #$20 LDY #$0002 LDA ($6C),Y STA $64 STA L024456 REP #$20 LDA $6C CLC ADC #$0020 TAX LDY #L024D58 LDA $64 INC ASL AND #$00FF DEC PHB MVN L024D58,L024D58 PLB SEP #$20 LDY #$0003 LDA ($6C),Y STA $64 STA L024457 REP #$20 LDA $6C CLC ADC #$0040 TAX LDY #L024D78 LDA $64 INC ASL AND #$00FF DEC PHB MVN L024D78,L024D78 PLB SEP #$20 STZ L02445B LDA #$00 STA L02454A JSL L181103 PLP RTL L032156 STZ L023D85 STZ L023D86 LDY #$0022 LDA ($6C),Y STA $5C REP #$20 LDY #$0020 LDA ($6C),Y STA $68 LDY #$0023 LDA ($6C),Y STA $60 JSL L0F07DA PLP RTL L032179 STZ L023D85 STZ L023D86 LDY #$0022 LDA ($6C),Y STA $5C REP #$20 LDY #$0020 LDA ($6C),Y STA $68 LDY #$0023 LDA ($6C),Y STA $60 JSL L0F07DA PLP RTL L03219C ENT PHP SEP #$20 LDA ($6C) BIT #$80 BNE L0321A7 PLP RTL L0321A7 LDY #$0001 LDA ($6C),Y CMP #$FE BCC L0321B2 PLP RTL L0321B2 LDY #$0021 LDA ($6C),Y CMP #$E8 BCC L0321BD PLP RTL L0321BD STZ L02445B LDA L023E28 STA $5C BEQ L0321CD STZ L023D85 STZ L023D86 L0321CD LDA L024459 STA $5C REP #$20 LDA $5C PHA SEP #$20 LDY #$0001 LDA ($6C),Y STA $5C STA L024459 REP #$20 LDA #$0000 STA $64 STA $66 JSL L072F07 PLA STA $5C SEP #$20 STA L024459 PLP RTL L0321FA ENT PHP SEP #$20 LDY #$0005 LDA ($6C),Y BIT #$80 BEQ L03220A PLP JMP L0323B7 L03220A LDA $5C STA $64 STA L027176 DEC $64 REP #$20 LDA $6C CLC ADC #$0020 STA $60 L03221D SEP #$20 LDA $64 STA $65 REP #$20 LDA #L024DB8 INC STA $70 SEP #$20 LDA ($70) STA $5C REP #$20 LDA $70 STA $68 L032237 INC $70 INC $70 SEP #$20 LDA $5C CMP ($70) BCC L03224F LDA ($70) STA $5C REP #$20 LDA $70 STA $68 SEP #$20 L03224F DEC $65 REP #$20 BNE L032237 LDA $68 STA $70 SEP #$20 LDA #$FF STA ($70) REP #$20 DEC $70 SEP #$20 LDA $5C STA L027177 LDA ($70) STA $69 STA $68 LDA $61 PHA LDA $60 PHA LDA L024450 STA L027178 STA $5C REP #$20 LDA #L024648 STA $60 L032285 LDA $60 STA L025810 INC $60 INC $60 SEP #$20 LDA ($60) STA $5C BPL L03229C AND #$01 STA $5C BEQ L032309 L03229C REP #$20 LDA $60 SEC SBC #$0002 STA $60 SEP #$20 LDA ($60) STA $5C CMP #$E8 BCS L032309 DEC $5C LDA $5C CMP L027177 BCS L032309 REP #$20 INC $60 SEP #$20 LDA $5C CLC ADC ($60) STA $5C CMP L027177 BCC L032309 REP #$20 DEC $60 SEP #$20 LDA L027177 SEC SBC ($60) ASL CLC ADC #$04 STA $5C STZ $5D REP #$20 LDA L025810 CLC ADC $5C STA $60 SEP #$20 LDA ($60) STA $5C CMP $68 BCS L0322F7 LDA $5C STA $68 L0322F7 REP #$20 INC $60 SEP #$20 LDA ($60) STA $5C CMP $69 BCC L032309 LDA $5C STA $69 L032309 REP #$20 LDA L025810 CLC ADC #$0100 STA $60 SEP #$20 DEC L027178 REP #$20 BEQ L032320 JMP L032285 L032320 PLA STA $60 SEP #$20 DEC $68 DEC $68 LDA $68 STA ($60) REP #$20 LDA $60 CLC ADC #$0020 STA $60 SEP #$20 INC $69 INC $69 LDA $69 STA ($60) REP #$20 INC $60 SEP #$20 LDA L027177 STA $5C STA ($60) REP #$20 LDA $60 SEC SBC #$0020 STA $60 SEP #$20 LDA $5C STA ($60) REP #$20 INC $60 SEP #$20 DEC L027176 BEQ L03236C JMP L03221D L03236C REP #$20 LDA $6C CLC ADC #$0021 STA $60 SEP #$20 LDA ($60) DEC STA ($60) REP #$20 LDA $60 CLC ADC #$0020 STA $60 SEP #$20 LDA ($60) DEC STA ($60) LDA L024459 STA $5C REP #$20 LDA $60 SEC SBC #$0040 STA $60 SEP #$20 LDA $5C STA ($60) REP #$20 INC $60 SEP #$20 LDA $64 STA ($60) REP #$20 INC $60 SEP #$20 STA ($60) PLP RTL L0323B7 PHP SEP #$20 LDA $5C STA $64 REP #$20 LDA #L024DB8 INC STA $70 SEP #$20 LDA $64 STA $65 L0323CC LDA ($70) SEC SBC #$40 STA ($70) REP #$20 INC $70 INC $70 SEP #$20 DEC $65 BNE L0323CC LDA $64 STA $5C DEC $64 REP #$20 LDA $6C CLC ADC #$0020 STA $60 SEP #$20 LDA $5C STA L027176 L0323F6 LDA $64 STA $65 REP #$20 LDA #L024DB8 INC STA $70 SEP #$20 LDA ($70) STA $5C REP #$20 LDA $70 STA $68 L03240E INC $70 INC $70 SEP #$20 LDA $5C CMP ($70) BCC L032426 LDA ($70) STA $5C REP #$20 LDA $70 STA $68 SEP #$20 L032426 DEC $65 REP #$20 BNE L03240E LDA $68 STA $70 SEP #$20 LDA #$FF STA ($70) REP #$20 DEC $70 SEP #$20 LDA $5C STA L027177 LDA ($70) STA $5C STA $69 STA $68 LDA $61 PHA LDA $60 PHA LDA L024450 STA $5C STA L027178 REP #$20 LDA #L024648 STA $60 L03245E LDA $60 STA L025810 INC $60 INC $60 SEP #$20 LDA ($60) STA $5C BPL L032473 AND #$01 BEQ L0324DF L032473 REP #$20 LDA $60 SEC SBC #$0002 STA $60 SEP #$20 LDA ($60) STA $5C CMP #$E8 BCS L0324DF SEC SBC #$41 STA $5C CMP L027177 BCS L0324DF REP #$20 INC $60 SEP #$20 CLC ADC ($60) STA $5C CMP L027177 BCC L0324DF REP #$20 DEC $60 SEP #$20 LDA L027177 SEC SBC ($60) ASL CLC ADC #$84 STA $5C STZ $5D REP #$20 LDA L025810 CLC ADC $5C STA $60 SEP #$20 LDA ($60) STA $5C CMP $68 BCS L0324CD LDA $5C STA $68 L0324CD REP #$20 INC $60 SEP #$20 LDA ($60) STA $5C CMP $69 BCC L0324DF LDA $5C STA $69 L0324DF REP #$20 LDA L025810 CLC ADC #$0100 STA $60 SEP #$20 DEC L027178 REP #$20 BEQ L0324F6 JMP L03245E L0324F6 PLA STA $60 SEP #$20 DEC $68 DEC $68 LDA $68 STA ($60) REP #$20 LDA $60 CLC ADC #$0020 STA $60 SEP #$20 INC $69 INC $69 LDA $69 STA ($60) REP #$20 INC $60 SEP #$20 LDA L027177 CLC ADC #$40 STA $5C STA ($60) REP #$20 LDA $60 SEC SBC #$0020 STA $60 SEP #$20 LDA $5C STA ($60) REP #$20 INC $60 SEP #$20 DEC L027176 BEQ L032545 JMP L0323F6 L032545 LDA L024459 STA $5C REP #$20 LDA $6C INC STA $60 SEP #$20 LDA $5C STA ($60) REP #$20 INC $60 SEP #$20 LDA $64 STA $5C STA ($60) REP #$20 INC $60 SEP #$20 STA ($60) PLP RTL L03256D ENT PHP SEP #$20 JSL L0320D8 JSL L03219C LDA #$00 STA ($6C) PLP RTL L03257E ENT RTL L03257F ENT PHP REP #$20 LDA $68 PHA JSL L0320D8 JSL L03219C JSL L290F5E PLA STA $68 PLP L032595 ENT PHP SEP #$20 LDA L023E28 CMP #$FD BNE L0325A2 JMP L032688 L0325A2 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0201 STA $64 JSL L0F03E3 PLP RTL L0325B4 ENT PHP SEP #$20 LDA #$00 STA ($6C) REP #$20 LDA #$0600 STA $64 JSL L0F03E3 PLP RTL L0325C8 ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0200 STA $64 JSL L0F03E3 PLP RTL L0325DD ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0400 STA $64 LDA $68 PHA JSL L0F03E3 PLA STA $68 LDA #$0201 STA $64 JSL L0F03E3 PLP RTL L032601 ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0500 STA $64 LDA $68 PHA JSL L0F03E3 PLA STA $68 LDA #$0401 STA $64 JSL L0F03E3 PLP RTL L032625 ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0600 STA $64 LDA $68 PHA JSL L0F03E3 PLA STA $68 LDA #$0501 STA $64 JSL L0F03E3 PLP RTL L032649 ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0601 STA $64 JSL L0F03E3 PLP RTL L03265E ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0501 STA $64 JSL L0F03E3 PLP RTL L032673 ENT PHP SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0401 STA $64 JSL L0F03E3 PLP RTL L032688 SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0201 STA $64 LDA $68 PHA JSL L0F03E3 LDA $01,S STA $68 SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0601 STA $64 JSL L0F03E3 LDA $01,S STA $68 LDA #$0600 STA $64 JSL L0F03E3 LDA $01,S STA $68 SEP #$20 LDA ($6C) DEC STA ($6C) REP #$20 LDA #$0201 STA $64 JSL L0F03E3 PLA STA $68 LDA #$0200 STA $64 JSL L0F03E3 SEP #$20 LDA #$00 STA ($6C) PLP RTL