i=$$
c,*a=*$<
$*[i]=c[3]%8while c=a[$*[i+=c[4]-61]||0][c[5]*4%37,6]
$><<$*