Rock-paper-scissors: Difference between revisions

Content added Content deleted
No edit summary
Line 2,422: Line 2,422:


=={{header|IS-BASIC}}==
=={{header|IS-BASIC}}==
<lang IS-BASIC>100 PROGRAM "Sieve.bas"
<lang IS-BASIC>100 PROGRAM "Rock.bas"
100 PROGRAM "Rock.bas"
110 RANDOMIZE
110 RANDOMIZE
120 STRING CH$(1 TO 3)*8,K$*1
120 STRING CH$(1 TO 3)*8,K$*1