blob: 99f24548421e03ac5ea830bf7f3a6233c5908122 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
font_identifier:="xtie20";
mode_setup;
font_size 20pt#;
thick#:=1pt#;
stepwidth#:=4pt#;
define_pixels(stepwidth);
define_blacker_pixels(thick);
picture pic;
slope=.009;
for i=1 upto 100:
beginchar((i-1),0,0,0);
x3=-x1=.5i*stepwidth; x2=y1=y3=0; y2=slope*i*stepwidth;
penpos1(thick,90); penpos2(thick,90); penpos3(thick,90);
penstroke z1e..z2e..z3e;
pic:= currentpicture;
endchar;
beginchar((128+i-1),0,0,0);
currentpicture:= pic reflectedabout(origin,right);
endchar;
endfor
end
|