[Therion] How to avoid that symbol-colour area blocks fills the blocks with chosen color

[Martin Budaj]

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 at 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 at 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 at speleo.sk
>> http://mailman.speleo.sk/mailman/listinfo/therion
>
>
>
> _______________________________________________
> Therion mailing list
> Therion at speleo.sk
> http://mailman.speleo.sk/mailman/listinfo/therion
>