TUNEQU   LDA $D41C
         ORA #$02
         LDY #$00
LABEL2   CMP #$10
         BCC LABEL1
         SEC
         SBC #$10
         INY
         BNE LABEL2
LABEL1   PHA
         LDX #$00
         CPY #$00
         BEQ LABEL3
LABEL4   LDA #$08
         STA $0414,X
         DEY
         INX
         CPY #$00
         BNE LABEL4
LABEL3   PLA
         STA $0414,X
         INX
         LDA #$00
LABEL5   STA $0414,X
         INX
         CPX #$16
         BCC LABEL5
         LDA $D41B
         ORA #$02
         LDY #$00
LABEL7   CMP #$10
         BCC LABEL6
         SEC
         SBC #$10
         INY
         BNE LABEL7
LABEL6   PHA
         LDX #$00
         CPY #$00
         BEQ LABEL8
LABEL9   LDA #$08
         STA $043C,X
         DEY
         INX
         CPY #$00
         BNE LABEL9
LABEL8   PLA
         STA $043C,X
         INX
         LDA #$00
LABELA   STA $043C,X
         INX
         CPX #$16
         BCC LABELA
         LDA $D41B
         ORA #$02
         LDY #$00
LABELC   CMP #$10
         BCC LABELB
         SEC
         SBC #$10
         INY
         BNE LABELC
LABELB   PHA
         LDX #$00
         CPY #$00
         BEQ LABELD
LABELE   LDA #$08
         STA $0464,X
         DEY
         INX
         CPY #$00
         BNE LABELE
LABELD   PLA
         STA $0464,X
         INX
         LDA #$00
LABELF   STA $0464,X
         INX
         CPX #$16
         BCC LABELF
         LDX #$14
         LDY #$13
LABEL10  LDA $0400,X
         EOR #$80
         STA $0400,Y
         LDA $0428,X
         EOR #$80
         STA $0428,Y
         LDA $0450,X
         EOR #$80
         STA $0450,Y
         INX
         DEY
         CPX #$28
         BNE LABEL10
         RTS