aUCBLogo Demos and Tests / forevertest


to forevertest
   
forever 
    
[   pr repcount
      
waitMS 100
      
if keyp [stop]
   
]
end