; Load: 20000 ($4E20), len: 147 bytes
4E20 A9 00 LDA #$00
4E22 A2 20 LDX #$20
4E24 85 57 STA $57
4E26 86 58 STX $58
4E28 A9 08 LDA #$08
4E2A A2 20 LDX #$20
4E2C 85 59 STA $59
4E2E 86 5A STX $5A
4E30 A9 00 LDA #$00
4E32 A2 04 LDX #$04
4E34 85 5D STA $5D
4E36 86 5E STX $5E
4E38 A9 01 LDA #$01
4E3A 85 5F STA $5F
4E3C A9 00 LDA #$00
4E3E A2 20 LDX #$20
4E40 85 5B STA $5B
4E42 86 5C STX $5C
4E44 A9 00 LDA #$00
4E46 85 60 STA $60
4E48 A0 00 LDY #$00
4E4A B1 57 LDA ($57),Y
4E4C D1 5B CMP ($5B),Y
4E4E D0 26 BNE $4E76
4E50 C8 INY
4E51 C0 08 CPY #$08
4E53 D0 F5 BNE $4E4A
4E55 A5 60 LDA $60
4E57 A0 00 LDY #$00
4E59 91 5D STA ($5D),Y
4E5B A2 5D LDX #$5D
4E5D A9 01 LDA #$01
4E5F 20 A7 4E JSR $4EA7
4E62 A2 57 LDX #$57
4E64 A9 08 LDA #$08
4E66 20 A7 4E JSR $4EA7
4E69 A5 5E LDA $5E
4E6B C9 07 CMP #$07
4E6D D0 CD BNE $4E3C
4E6F A5 5D LDA $5D
4E71 C9 E8 CMP #$E8
4E73 D0 C7 BNE $4E3C
4E75 60 RTS
4E76 E6 60 INC $60
4E78 A5 60 LDA $60
4E7A C5 5F CMP $5F
4E7C F0 0A BEQ $4E88
4E7E A2 5B LDX #$5B
4E80 A9 08 LDA #$08
4E82 20 A7 4E JSR $4EA7
4E85 4C 48 4E JMP $4E48
4E88 A0 07 LDY #$07
4E8A B1 57 LDA ($57),Y
4E8C 91 59 STA ($59),Y
4E8E 88 DEY
4E8F 10 F9 BPL $4E8A
4E91 A2 59 LDX #$59
4E93 A9 08 LDA #$08
4E95 20 A7 4E JSR $4EA7
4E98 A5 60 LDA $60
4E9A F0 05 BEQ $4EA1
4E9C E6 5F INC $5F
4E9E 4C 55 4E JMP $4E55
4EA1 EE 20 D0 INC $D020
4EA4 4C A1 4E JMP $4EA1
4EA7 18 CLC
4EA8 75 00 ADC $00,X
4EAA 95 00 STA $00,X
4EAC A9 00 LDA #$00
4EAE 75 01 ADC $01,X
4EB0 95 01 STA $01,X
4EB2 60 RTS
READY.
