db $42	;the answer to everything

JMP Return : JMP Above : JMP Return : JMP Return : JMP Return : JMP Return : JMP Return : JMP Corner : JMP Return : JMP Return

!Slip equ $FF

Above:
LDA $16
BMI NoIce
LDA $18
BMI NoIce
StillIce:
LDA #!Slip
STA $86
RTL

Corner:
NoIce:
STZ $86
Return:
RTL