Number Juggle 1

  10 PRINT "%N%U%M%B%E%R% %J%U%G%G%L%E"
  12 PRINT 
  30 PRINT "NAME OF PLAYER"
  40 INPUT A$
  65 CLS 
  70 PRINT A$;", THINK OF A NUMBER AND"
  75 PRINT ,"DOUBLE IT"
  95 PAUSE 400
 100 CLS 
 120 PRINT A$;",ADD FIVE"
 125 PAUSE 400
 130 CLS 
 135 PRINT A$;,,"SUBTRACT SEVEN"
 140 PRINT "AND TYPE IN THE RESULT"
 145 INPUT A
 150 CLS 
 175 LET K=(A+2)/2
 185 PRINT "YOUR NUMBER, ";A$,",WAS ";K
 300 STOP 
 400 SAVE "1004%7"
 410 RUN