blob: 1b57e791b72acca877614479b4dc7fe5c9594d77 [file] [log] [blame]
(set-state
(change-flags 256)
(fill-color #C80000))
(fill-rect
(extent at (10,10) size 55x50)
(rect at (10,10) size 55x50))
(set-state
(change-flags 256)
(fill-color #0000C880))
(fill-rect
(extent at (30,30) size 55x50)
(rect at (30,30) size 55x50))