macros/generic/infpic/sipky.mf


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27


input incpic

beginch("A",30mm#,10mm#,0mm#,3,1);
strednipero;
draw(0,0)--(1,1);
draw(1,0)--(2,1);
draw(2,0)--(3,1);
draw(0,1)--(3,1);
endch;

beginch("B",50mm#,30mm#,0mm#,5,3);
strednipero;
draw(0,0)--(1,1);
draw(1,0)--(2,1);
draw(2,0)--(3,1);
draw(0,1)--(4,1);
draw(4,3)--(5,1.5);
draw(4,1)--(5,1.5);
draw(0,2)--(1,3);
draw(1,2)--(2,3);
draw(2,2)--(3,3);
draw(0,3)--(4,3);

endch;

end