I have three questions/requests before I think this is fit for submission:
This is the graphics workaround:
And here is what I would like to have worked:
If the disalignment can't be completely removed, I don’t think I want to use this visual style.
Also: I want to make the packed version of the script more readable. I’ll upload the new file here when it is done.
- Were I naive, I would think that the symbol shown on a site using (show Symbol "disc") would be perfectly aligned with what is shown when one adds a disc to a site during play. This way I could show a gray disc with a black stroke on each site and play with discs with a transparent stroke in order to emulate a circular tile on a circular cell. I have worked around this and scaled the symbol by 0.98 and play with discs whose stroke color is the same as the fill color. But one can still see a slight disalignment. Can this be fixed?
- When the official universal quantifier is released, I would like to replace my homemade "forAllSites" with that one.
- I am not sure if the line "if:(= (next) (who at:(to)))" is necessary in the following bit:
Code:
("forAllSites"
(sites Around (sites Group at:(last To)) Enemy)
(>
(size Group at:(last To))
(size Group
at:(site)
if:(= (next) (who at:(to)))
)
)
)
This is the graphics workaround:
Code:
(metadata
(graphics {
(show Symbol "disc" Cell (sites Board)
fillColour:(colour VeryLightGrey)
edgeColour:(colour Black)
scale:0.98
)
(region Colour (sites Board) (colour 0 0 0 0))
(board Colour InnerEdges (colour 0 0 0 0))
(board Colour OuterEdges (colour 0 0 0 0))
(piece Colour P1
fillColour:(colour Red)
strokeColour:(colour Red)
)
(piece Colour P2
fillColour:(colour DarkBlue)
strokeColour:(colour DarkBlue)
)
})
)
Code:
(metadata
(graphics {
(show Symbol "disc" Cell (sites Board)
fillColour:(colour VeryLightGrey)
edgeColour:(colour Black)
)
(region Colour (sites Board) (colour 0 0 0 0))
(board Colour InnerEdges (colour 0 0 0 0))
(board Colour OuterEdges (colour 0 0 0 0))
(piece Colour P1
fillColour:(colour Red)
strokeColour:(colour 0 0 0 0)
)
(piece Colour P2
fillColour:(colour DarkBlue)
strokeColour:(colour 0 0 0 0)
)
})
)
If the disalignment can't be completely removed, I don’t think I want to use this visual style.
Also: I want to make the packed version of the script more readable. I’ll upload the new file here when it is done.