Another solution is to leave "thclean qq" on its original position and change clip tmp_pic to p; draw tmp_pic; to clip tmp_pic to p; drawoptions(); draw tmp_pic; at the end of the macro definition. This approach preserves filling the blocks with a background colour. I think all built-in symbols should be updated in this way. Martin On Mon, Nov 5, 2012 at 2:20 PM, Stacho Mudrak <lists@group-s.sk> wrote:
You just need to remove filling from symbol definition.
In your layout, try to use for example this code:
code metapost def a_blocks (expr p) = T:=identity; pickup PenC; path q, qq; q = bbox p; picture tmp_pic; uu := max(u, (xpart urcorner q - xpart llcorner q)/100, (ypart urcorner q - ypart llcorner q)/100); tmp_pic := image( for i = xpart llcorner q step 2uu until xpart urcorner q: for j = ypart llcorner q step 2uu until ypart urcorner q: qq := punked (((-.5uu,-.5uu)--(.5uu,-.5uu)--(.5uu,.5uu)--(-.5uu,.5uu)--cycle) randomized (uu/2)) rotated uniformdeviate(360) shifted ((i,j) randomized 1.6uu); if xpart (p intersectiontimes qq) < 0: thdraw qq; fi; endfor; endfor; ); clip tmp_pic to p; draw tmp_pic; enddef;
This is modified a_blocks_SKBB definition with "thclean qq;" statement removed.
S.
On 4 November 2012 19:37, Bruce <bruce@tomo.co.nz> wrote:
How can I get use "area blocks" to behave like other sediments when I want colors (and no filling)?
Torstein
You will need to either choose a predefined 'area blocks' that does not have a solid fill from the standards available - currently AUT and SKBB are the only unique ones I think - and quite possibly they are both filled.
Or you will need to modify the existing definitions.
I have no time to check just now, but you might like to have a look at what I did here http://therion.speleo.sk/wiki/doku.php/examples (Sample dataset at the top of the page) and modify it a bit to see how it behaves with colour assignments.
Bruce
_______________________________________________ Therion mailing list Therion@speleo.sk http://mailman.speleo.sk/mailman/listinfo/therion
_______________________________________________ Therion mailing list Therion@speleo.sk http://mailman.speleo.sk/mailman/listinfo/therion