def l_u_hang_danko (expr P) = T:=identity; cas := 0; dlzka := arclength P; mojkrok:=adjust_step(dlzka, 0.3u); pickup PenC; t1:=0; forever: t := arctime (cas + mojkrok/2) of P; t2 := arctime (cas + mojkrok) of P; thfill (subpath (t1,t2) of P) -- ((point t of P) + .3u * unitvector(thdir(P,t) rotated 90)) -- cycle; cas := cas + mojkrok; exitif cas > dlzka - (2*mojkrok/3); % for rounding errors t1:=t2; endfor; thdraw P; enddef; def l_u_hang_danko_legend = l_u_hang_danko(((.2,.2) -- (.8,.8)) inscale) enddef; text sk "line u:hang_danko" "skalný rad" No snáď to bude takto fungovať m. On 25.10.2011, at 13:04, Michal Danko wrote:
skoda, na znacenie brala som pouzil overhang, teraz uz len by som potreboval zmenit v legende vyraz previs na skalny rad.
mozte mi niekto poslat metapost code do layoutu?
v thbooku a wiki som nasiel par prikladov ale moc mudry z toho niesom
S pozdravom
Ing. Michal Danko
2011/10/25 martinsluka <martinsluka@mac.com> To asi zatiaľ nie
m.
On 25 Oct, 2011,at 11:33 AM, Michal Danko <michal.danko@gmail.com> wrote:
ano na povrchu, medzi dvoma jaskynami...
S pozdravom
Ing Michal Danko
2011/10/25 Martin Sluka <martinsluka@mac.com>
On 25.10.2011, at 10:26, Michal Danko wrote:
snazim sa najst ciaru pre skalny rad / bralo
Na povrchu?
m. _______________________________________________ Therion-cs mailing list Therion-cs@speleo.sk http://mailman.speleo.sk/mailman/listinfo/therion-cs
_______________________________________________ Therion-cs mailing list Therion-cs@speleo.sk http://mailman.speleo.sk/mailman/listinfo/therion-cs
_______________________________________________ Therion-cs mailing list Therion-cs@speleo.sk http://mailman.speleo.sk/mailman/listinfo/therion-cs
_______________________________________________ Therion-cs mailing list Therion-cs@speleo.sk http://mailman.speleo.sk/mailman/listinfo/therion-cs