blob: 701aa1688b9a7d7988d7c2fd2a088da78243fbe6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
beginchar(5,half_big#*6/2,let_height#,0);
wlen(1) := h/3; wwid(1) := 2w/3; rot(1) := -90;
wlen(2) := h/3; wwid(2) := 1w/3; rot(2) := -90;
wlen(3) := h/3; wwid(3) := 1w/3; rot(3) := -90;
wlen(4) := h/3; wwid(4) := 1w/3; rot(4) := -90;
wlen(5) := h/3; wwid(5) := 1w/3; rot(5) := -90;
wlen(6) := h/3; wwid(6) := 1w/3; rot(6) := -90;
wlen(7) := h/3; wwid(7) := 1w/3; rot(7) := -90;
wcw(5) = (0, h);
wcw(6) = wccw(5);
wcw(7) = wccw(6);
tback(2) = wpnt(5);
wcw(3) = wccw(2);
wcw(4) = wccw(3);
wcw(1) = wpnt(2);
wedgeset(1, 7);
endchar;
|
