Stone, Scissor And Bag. Made by Bengt and Jefa from Transmission Productions. "->" is the STO>-button. Prgm8:STONE :O->C :Lbl A :ClrHome :Disp " 1.STONE" :Disp " 2.SCISSORS" :Dsip " 3.BAG" :Disp "*---------*" :Disp " 4.QUIT" :Disp "SCORE" :Disp C :Input A :ClrHome :Int Rand3->M :If A>4 :Goto A :If A=4 :Stop :Disp "YOU" :If A<1 :Goto A :If A=1 :Disp "STONE" :If A=2 :Disp "SCISSORS" :If A=3 :Disp "BAG" :Disp "" :Disp "COMPUTER" :If M=0 :Goto E :If M=1 :Goto F :If M=2 :Goto G :Lbl E :Disp "STONE" :If A=1 :Goto N :If A=2 :Goto O :If A=3 :Goto Q :Lbl F :Disp "SCISSORS" :If A=1 :Goto Q :If A=2 :Goto N :If A=3 :Goto O :Lbl G :Disp "BAG" :If A=1 :Goto O :If A=2 :Goto Q :If A=3 :Goto N :Lbl N :Disp "" :Disp "A DRAW" :Goto R :Lbl O :Disp "" :Disp "YOU LOSE" :C-1->C :Goto R :Lbl Q :Disp "" :Disp "YOU WON" :C+1->C :Goto R :Lbl R :Pause :Goto A End of file...