ronin/examples/test1.lisp
2019-07-13 14:14:59 +09:00

7 lines
181 B
Common Lisp

; test file
((clear)
(stroke (rect 15 15 120 80) 2 "red")
(fill (rect 30 30 120 80) "#72dec2")
(clear (rect 45 45 45 45))
(clone (rect 0 0 200 200) (rect 100 100 200 200)))