;sorry we dont have the answer to everything here.
JMP Return : JMP Above : JMP Return : JMP Return : JMP Return : JMP Return : JMP Return

!Slip equ $FF

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

NoIce:
STZ $86
Return:
RTL