z=4 if :wc and :ws==4 then goto2 else goto1 end
if:wc==0 or :ws!=4 thengoto1else :ra2=c :ra4=c :ra6=c :ra8=c end
ifb==0 thenc+=4 elsec-=1end ifc>z thenb=1 end ifc<-4 thenb=0end goto2