'GP2D120 Demo
'Place Sensor output on port 0

   dim range


loop:
   miniad 0,range
   if range > 1 then
     print "In Range :",range
   else 
     print "---"
   endif

   goto loop