My silly little prototype-based catlang know has graphics going.
object enter
object enter
100 >x
100 >y
leave >position
object enter
25 >x
25 >y
leave >size
object enter
1 >r 1 >g 0 >b
leave >color
leave >player
: draw
player@ enter
"fill" >fill-mode :rectangle
leave drop ;


