to game
 # Initailaize number and counter
 globalmake "number random 32
 globalmake "counter 0
 loop
 end
 
 to loop
 read [choose a number] "try
 if numberp :try[
   # if the value is a number
   if :number=:try[print sentence sentence [You win in ] :counter+1 [tries]][
     if :try>:number [print [Lesser]][print [Greater]]
     globalmake "counter :counter+1
     loop
   ]
 ]
 [print [Enter a Valid number!] loop]
 end