aUCBLogo Demos and Tests / testobj4


be testobj4
   
be point x y c
      
be print
         
(::print this'this'y)
      
end
      
be draw
         
setPixelXY x y c
      
end
   
end
   
p=point 200 100 "red
   
p'print
   
p'draw
end