MainRt:
    JSR SubGFX

    LDA $1528,x
    CMP #$04
    BNE .Normal
    LDY $1594,x
    LDA .DeadYSpd,y
    STA $AA,x
    JSL $01802A

    LDA $14D4,x
    BEQ .Return
    LDA $D8,x
    CMP #$21
    BCS .Return

    LDA $15AC,x
    BNE +
    LDA #$35
    STA $15AC,x
+
    LDA #$01
    STA $1594,x
    LDA #$23
    STA $1DF9

    LDA $15AC,x
    CMP #$04
    BCS .Return

    JSR KillSprites

    LDA #$02
    STA $1594,x

    LDA #$80
    STA $1DFB
    LDA #$FF
    STA $1493 ; activate "end level" flag
    LDA #$00
    STA $141C ; normal path
    LDA #$0B
    STA $71
.Return
    RTS

.DeadYSpd
    db $F0,$00,$40

.Normal
    LDA $14C8,x         ;\ Return if status ain't normal
    CMP #$08            ; |
    BNE .Return         ;/
    LDA $9D             ;\ If sprites locked, return
    BNE .Return         ;/

    JSL $01A7DC
    BCC .NoInteraction

    LDA $7D
    BMI +

    LDA $140D
    ORA $187A
    BNE .SpinJump
+
    JSL $00F5B7
    BRA .NoInteraction
.SpinJump
    LDA #$02
    STA $1DF9

    JSL $01AA33
    JSL $01AB99
.NoInteraction
    LDA $C2,x           ; Set pointers
    ASL
    TAX
    JMP (pointers,x)