;SOCCER 81 ;© Bengt and Jefa ; "->" is the STO>-button ; PrgmX:TPSOCCER :0->E :0->F :ClrHome :Disp "" :Disp "" :Disp " TPSOCCER" :Disp "" :Disp " BY JEFA AND BW" :Pause :Lbl A :ClrHome :Int Rand6+1->A :Int Rand6+1->G :Disp " -----------" :Disp " I 4 5 6 I" :Disp " I I" :Disp " I ¤ I" \\ "¤" is the pi-sign. :Disp " I 1 2 3 I" :Disp "0 = EXIT" :Disp "SHOT WHERE?" :Input B :If B=0 :End :If B<0 :Goto A :If B>6 :Goto A :If B=A :Goto G :If B=G :Goto G :ClrHome :Disp "MISS" :Pause :Goto D :Lbl G :ClrHome :Disp "GOAL" :E+1->E :Pause :Lbl D :F+1->F :ClrHome :Disp " STATS" :Disp " =====" :Disp "" :Disp " TRIES" :Disp F :Disp " GOALS" :Disp E :Pause :Goto A end of file...