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