Decision Maker 1

Date: 198x
Type: Program
Platform(s): TS 1000

Appears on

Assembled by Tim Ward from many sources. Contains programs 10001 – 10050.

Gallery

Decision Maker 1

Source Code

   5 REM *EXECUTIVE DECISIOL 1*
  10 CLS 
  20 LET X=100*RND
  30 IF X>49 THEN PRINT "YES"
  40 IF X<49 THEN PRINT "NO"
  50 IF INKEY$="" THEN GOTO 50
  60 GOTO 10
  70 CLEAR 
  80 SAVE "1001%1"
  90 RUN 

People

No people associated with this content.

Scroll to Top