Thank you anyone,
i wanted the ladder symbol different in three ways:
1. the sides at the top and bottom of the ladder should extend the last rung
a little. With steps it looks not lie a ladder really.
2. the width is too much for my taste and the relation to the height of the
rung-spacing.
3. I dont want to care about additional parameters, i just want to draw a
line:fixed-ladder and be fine with it. This way i may exchange the symbol
with other variants if neccessary without having to deal with representation
in my th2-file.
Lets see what rowena has.
An idea striking me suddenly as i write this, is to dig into the meander
symbol as this is somewhat similar.
Am 2017-01-25 10:00, schrieb Bruce Mutton via Therion:
This post from January 2014 explains the rectangle with number of steps
specified.
https://www.mail-archive.com/therion@speleo.sk/msg04814.html
Bruce
-----Original Message-----
From: Therion [mailto:therion-boun...@speleo.sk] On Behalf Of Martin Sluka
via Therion
Sent: Wednesday, 25 January 2017 7:45 PM
To: List for Therion users <therion@speleo.sk>
Cc: Martin Sluka <martinsl...@mac.com>
Subject: Re: [Therion] Symbol for fixed ladder
Isn't there one on wiki? The principle was to draw rectangle and to add
the parameter as number of steps.
Odesláno z iPhonu
24. 1. 2017 v 23:51, Benedikt Hallinger via Therion <therion@speleo.sk>:
Hello,
i get gray hair with metapost while i want to make a line symbol for
ladders, so i can nicely draw them in my maps as the cave have alot of
them.
The basic idea i had was, t define a symbol of one "rung" segment
(rung and a little of either sides, like the letter "H") as a symbol
picture. Then i wanted to apply this image seamlessly over the length of
the given path (straight lines) What i have for now is the following,
however it does not show at all (still shows a red line with symbol set AUT
in effect), so i have no clue how to even debug this.
I tried to start with the example from thbook salted a little with peeks
to the internal metapost codes.
Can someone assist please?
Thank you very much!
# Symbol for fixed ladder
def l_fixedladder_SKBB (expr P) =
T:=identity;
cas := 0;
dlzka := arclength P;
mojkrok:=adjust_step(dlzka, 1.0u);
pickup PenC;
sideL := (-.20u,0)--(-.20u,0.20u);
sideR := (.20u,0)--(.20u,0.20u);
rung := (-.20u,0.10u)--(.20u,0.10u);
picture symbol,test_symbol;
symbol:= image (
thdraw sideL;
thdraw sideR;
thdraw rung;
);
forever:
t := arctime cas of P;
thdraw symbol shifted (point t of P) withcolor black;
cas := cas + mojkrok;
exitif cas > dlzka + (mojkrok / 3); % for rounding errors
endfor;
enddef;
_______________________________________________
Therion mailing list
Therion@speleo.sk
https://mailman.speleo.sk/listinfo/therion
_______________________________________________
Therion mailing list
Therion@speleo.sk
https://mailman.speleo.sk/listinfo/therion
_______________________________________________
Therion mailing list
Therion@speleo.sk
https://mailman.speleo.sk/listinfo/therion
_______________________________________________
Therion mailing list
Therion@speleo.sk
https://mailman.speleo.sk/listinfo/therion