if :wc and :ws==2 then goto2 else goto1 end
if:wc==0 or :ws!=2thengoto1end a=0 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=1 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=2 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=3 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=4 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=3 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=2 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=1 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=0 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=-1 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=-2 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=-3 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=-4 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=-3 :ra1=a :ra3=a :ra5=a :ra7=a
if:wc==0 or :ws!=2thengoto1end a=-2 :ra1=a :ra3=a :ra5=a :ra7=a
if:ws!=2thengoto1end a=-1 :ra1=a :ra3=a :ra5=a :ra7=a goto2