17 lines
1.0 KiB
Plaintext
17 lines
1.0 KiB
Plaintext
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 |