"The included file" (war par in embedded Metapost...)

"The included file" (war par in embedded Metapost...)

[Johannes Hüsing]

[-- Attachment #1: Type: text/plain, Size: 195 bytes --]

Hi all,

"the included file" was not included, and instead is here.

Sorry.

As to Tobias' text: I am pretty certain Hraban is right and
for instance "Rednerskat" spells with a long s.

Johannes

[-- Attachment #2: zahnrad.mp --]
[-- Type: text/plain, Size: 934 bytes --]

def ptc(expr radius, angle) =
(radius*cosd(angle), radius*sind(angle)) enddef;

def zahnrad(expr r, dr, dw) =
  ptc(r, 0)
  for i=0 step dw until 360:
    --ptc(r+dr,i)--ptc(r+dr, i+.44*dw)
    --ptc(r, i+.44*dw)..ptc(r, i+.73*dw)..ptc(r, i+dw)
  endfor
  ;
enddef;

pi = 3.14159;

beginfig(1);
  path p[];
  numeric r[], zahn, zahnzahl, dw;
  zahn = 12;
  r1 = 36;
  r2 = 46;
  r3 = 56;
  r4 = 51;
  show pi;
  show r1;
  show zahn;
  for i=1 upto 4:
    zahnzahl[i] = floor(r[i]*pi/zahn);
    dw[i] = 360/zahnzahl[i];
    p[i] = zahnrad(r[i], 8, dw[i]);
  endfor
  pickup pencircle scaled 1;
  draw p1 shifted (60,58);
  label (btex Power etex, (60,58));
  draw p2 rotated .28dw2 shifted (60,151);
  label (btex Fallzahl etex, (60,58));
  draw p3 rotated .53dw2 shifted (161,199);
  label (btex Irrtumswahrscheinlichkeit etex, (60,58));
  draw p4 rotated .75dw2 shifted (158,65);
  label (btex Präzision etex, (60,58));
endfig;
end;

Re: "The included file" (war par in embedded Metapost...)

[Hans Hagen]

At 08:24 AM 10/14/00 +0200, Johannes Hüsing wrote:
>Hi all,
>
>"the included file" was not included, and instead is here.
>
>Sorry.

How is that one used? What is the beginfig doing there? This will certainly
clash with the internal numbering. 

\startuseMPgraphic{tandwiel}
  your code without the begin/endfig
\stopuseMPgraphic

\useMPgraphic{tandwiel}

>As to Tobias' text: I am pretty certain Hraban is right and
>for instance "Rednerskat" spells with a long s.

If you guys can sort this out and tobias can make a nice german language
and setup doc, I will make a (nice) cover and we have yet another
installation manual, this time language specific. 

Hans 
-------------------------------------------------------------------------
                                                  Hans Hagen | PRAGMA ADE
                      Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
 tel: +31 (0)38 477 53 69 | fax: +31 (0)38 477 53 74 | www.pragma-ade.com
-------------------------------------------------------------------------