#tootcoding #commonLisp
(uiop:run-program "gimp")
;; I saved IMGS/SOIL.PNG and IMGS/GRASS.PNG .
(loop
:for cmd
:in (list '(com-set-cur1 imgs/grass.png)
'(com-swap)
'(com-set-cur1 grass)
'(com-set-bitmap))
:do
(execute-frame-command *nic* cmd)
(sleep 1))
(loop
:for cmd
:in (list '(com-set-cur1 imgs/soil.png)
'(com-swap)
'(com-set-cur1 soil)
'(com-set-bitmap))
:do
(execute-frame-command *nic* cmd)
(sleep 1))
Some brown squiggles 32x32 pixels denoting SOIL
Some green squiggles 32x32 pixels denoting grass.
The map symbol SOIL has changed to some brown squiggles in the hextille grid, and there is one green GRASS squiggle overlaid at position 1-1 (in the fourth quadrant as normal)