if :wc and :ws==2 then goto2 else goto1 end
if:wc==0 or :ws!=2thengoto1end a=0 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=1 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=2 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=3 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=4 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=3 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=2 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=1 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=0 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=-1 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=-2 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=-3 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=-4 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=-3 :ra2=a :ra4=a :ra6=a :ra8=a
if:wc==0 or :ws!=2thengoto1end a=-2 :ra2=a :ra4=a :ra6=a :ra8=a
if:ws!=2thengoto1end a=-1 :ra2=a :ra4=a :ra6=a :ra8=a goto2