Sorry your browser is not supported!

set window on:do
cls rgb(5,5,500)
input " I am thinking of a number what number am i thinking of? ",num2
num=rnd(9)+1:if num>10 then num=10
if num2=num
 print "you win"
  else
 print "wrong try again"
endif
wait key
cls
cls rgb(500,5,5)
input " I am thinking of a number what number am i thinking of? ",num2
num=rnd(9)+1:if num>10 then num=10
if num2=num
 print "you win"
  else
 print "wrong try again"
endif
wait key:loop

DO
  cls rgb(5,5,128) : `rgb values only go up to 255.
  input " I am thinking of a number between 1 and 10, what number am i thinking of? "; num2 : `added a little more info for the user.
  num=rnd(9)+1 : `no need to check as the maximum possible is 10.
  if num2=num
    print "you win"
  else
    print "wrong try again"
  endif
  wait key
LOOP