% oct"034" = dj,j,ch (crkvica), koristim kao ch % oct"076" = drugi d % oct"015" = zz % oct"016" = zz (drugi zz) % oct"035" = zx (krizz) % oct"026" = zz (glagoljski) % oct"027" = drugi r (zaobljeni) % oct"031" = yu % oct"032" = ye % oct"033" = ya % 8 = dz % 1 = dj,j,ch (pravocrtna crkvica) % 4 = d (kut) beginchar("a",.6em#,1.2cap#,.7cap#); "The letter a"; pickup pencircle xscaled 1.3thick yscaled .3thin; x7=w-x5=w-x2=w-x3=curve_sidebar; x2-x1=x4-x3=.2w; x6=x8=.5[x7,x5]; y1=-d; y4=h; bot y6=0; y8=.5h/1.2; y7=y5=.5[y6,y8]; y2=-.7d; y3=.8h; draw z1{dir(20)}..{up}z2--z3{up}..{dir(20)}z4; draw z5{down}..{left}z6..{up}z7..{right}z8; endchar; beginchar("b",.55em#,1.2cap#,0); "The letter b"; pickup pencircle xscaled 1.3thick yscaled .3thin; x6=x3=w-x5=curve_sidebar; x1=w; x2=.65w; x4=x7=.5w; bot y4=0; top y2= h; y1=.8h; y3=.5h/1.2; y6=y5=.25h/1.2; y7=.5h/1.2; draw z1{up} %{dir(90+15)} ..{left}z2.. {down}z3..{down}z6..{right}z4..{up}z5..{left}z7; pickup pencircle xscaled .3thick yscaled .3thin; draw z7{left}..{down}z6; endchar; beginchar("v",.7em#,.5cap#,0); "The letter v"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x5=w-x4=w-x8=curve_sidebar; x2=x6=w-x3=w-x7=.25w; top y1=top y2=top y3=top y4=h; bot y5=bot y6=bot y7=bot y8=0; draw z1--z4; draw z5--z8; draw z2--z6; draw z3--z7; endchar; beginchar("g",.8em#,.5cap#,.5cap#); "The letter g"; pickup pencircle xscaled 1.2thick yscaled .3thin; x1=0; w-x6=curve_sidebar; x2=.2w; x3=x4=.6w; x5=.5[x4,x6]; y1=-d; top y2=top y3=h; bot y5=0; y4=y6=x6-x5; draw z1{dir angle(z3-z1)}..{up}z2--z3--z4{down}..{right}z5..{up}z6; endchar; beginchar("d",.65em#,.5cap#,0); "The letter d (kao A)"; pickup pencircle xscaled 1.3thick yscaled .3thin; x5=x1=w-x3=w-x4=curve_sidebar; x2=.5w; bot y1=bot y4=0; y5=y3=.2h; top y2= h; draw z1--z5{up}..{right}z2..{down}z3--z4; draw z5--z3; endchar; beginchar(oct"076",.55em#,1.2cap#,.7cap#); "The letter drugi d"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x5=curve_sidebar; x5-x6=.1w; x2=x3=.3w; x4=.5w; bot y1=bot y5=0; y2=-d; y3=h; y4=.5h/1.2; y6=.5y4; z56=(x6,.5y6); draw z2{dir(90+10)}..{up}z1..{dir(90-10)}z3; pickup pencircle xscaled 1.2thick yscaled .25thin; draw z1{up}..{right}z4..{down}z6--z56{down}..{right}z5; endchar; beginchar("e",.5em#,.5cap#,0); "The letter e"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=w-x3=curve_sidebar; x4=.7w; bot y2=0; top y3= h; y1=y4=.5h; draw z3{left}..{down}z1..{right}z2; draw z1--z4; endchar; beginchar(oct"015",.9em#,.5cap#,0); "The letter zz"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x7=w-x8=w-x4=curve_sidebar; x2=1/3[x1,x4]; x3=2/3[x1,x4]; x5=w-x6=.4[x1,x2]; bot y1=bot y4=0; top y7=top y8=h; y5=y2=y3=y6=.5h; draw z1{right}..{up}z2..{left}z7; draw z4{left}..{up}z3..{right}z8; draw z5--z6; endchar; beginchar(oct"016",.95em#,.5cap#,0); "The letter zz (drugi)"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x7=w-x8=w-x4=curve_sidebar; x2=w-x3=.9*1/3[x1,x4]; x5=w-x6=.4[x1,x2]; bot y1=bot y4=0; top y7=top y8= h; y5=y2=y3=y6=.5h; draw z1{right}..{up}z2..{left}z7; draw z4{left}..{up}z3..{right}z8; draw z5--z6; z78=.5[z7,z8]; z14=.5[z1,z4]; pickup pencircle xscaled .9thick yscaled .3thin; draw z78--z14; endchar; beginchar(oct"035",.7em#,.5cap#,0); "The letter zz (krizz)"; pickup pencircle xscaled 1.2thick yscaled .3thin; x1=x4=w-x3=w-x6=curve_sidebar; x2=x5=.5w; bot y1=bot y2=y3=0; top y4=top y5=top y6= h; draw z1--z6; draw z3--z4; pickup pencircle xscaled .9thick yscaled .3thin; draw z2--z5; endchar; beginchar("z",.6em#,.5cap#,.7cap#); "The letter z"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=curve_sidebar; x4-x2=.1w; x3=.35w; x5=.25w; top y1=top y2= h; bot y3=0; y4=-.5d; y5=-d; draw z1--z2--z3{dir(10)}..{down}z4..tension1.3..{left}z5; endchar; beginchar("8",.55em#,.5cap#,0); "The letter dz"; pickup pencircle xscaled 1.2thick yscaled .3thin; x1=w-x6=curve_sidebar; x4=w-x3=.45w; x2=.6[x1,x3]; x5=.4[x4,x6]; bot y5=0; top y2= h; y1=y3=h-(x2-x1); y4=y6=x5-x4; draw z1{up}..{right}z2..{down}z3..{down}z4..{right}z5..{up}z6; endchar; beginchar("j",.55em#,cap#,0); "The letter j (meki poluglas)"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=curve_sidebar; x3=x4=.5w; x7=.7w; bot y3=0; y1=y2=.25h; y4=.5h; y7=h; path p; p=z1{up}..tension1.2..{right}z7; draw p; z8=point .5 of p; z8-z5=z6-z8=(.25w,0); draw z5--z6; draw z1{up}..{right}z4..{down}z2..{left}z3..cycle; endchar; beginchar(oct"034",.8em#,cap#,0); "The letter dj,j,CH (crkvica)"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=curve_sidebar; x3=x4=.5w;x5=w-x6=.25w; top y4= h; bot y1=bot y2=0; y3=.5h; y5=y6=.75h; draw z3--z4; draw z5--z6; draw z1{up}..{right}z3..{down}z2; endchar; beginchar("i",.55em#,.5cap#,0); "The letter i"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=w-x3=w-x4=curve_sidebar; bot y2=bot y3=0; top y1=top y4= h; z5=.5[z1,z2]; z6=.5[z3,z4]; draw z1--z2; draw z3--z4; draw z5--z6; endchar; beginchar("k",.8em#,.5cap#,0); "The letter k"; pickup pencircle xscaled 1.3thick yscaled .3thin; x2=w-x4=w-x6=curve_sidebar; x1=x3=.4w; x5=.6w; bot y1=bot y4=0; top y3=top y6= h; y2=y5=.5[y1,y3]; draw z1{left}..{up}z2..{right}z3; draw z4{left}..{up}z5..{right}z6; endchar; beginchar("l",.65em#,.5cap#,0); "The letter l"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x3=curve_sidebar; x2=.4w; bot y1=bot y3=0; top y2= h; draw z1--z2--z3; endchar; beginchar("m",.9em#,.5cap#,0); "The letter m"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x5=curve_sidebar; x3=.5w; x2=.65[x1,x3]; x4=.5[x3,x5]; bot y1=bot y3=bot y5=0; top y2=top y4= h; draw z1--z2--z3--z4--z5; endchar; beginchar("n",.5em#,cap#,0); "The letter drugi n"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=w-x3=w-x4=curve_sidebar; x5-x3=.2w; bot y1=0; y2=y3=.5h; y4=.8h; top y5= h; draw z1--z2--z3--z4{up}..{right}z5; endchar; beginchar("o",.6em#,.5cap#,0); "The letter drugi o"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=curve_sidebar; x3=x4=.5w; bot y3=0; y1=y2=.5h; top y4= h; draw z1{up}..{right}z4..{down}z2..{left}z3..cycle; endchar; beginchar("p",.6em#,.5cap#,0); "The letter drugi p"; pickup pencircle xscaled 1.3thick yscaled .3thin; x3=w-x4=curve_sidebar; x1=x5=w-x2=w-x6=.25w; bot y1=bot y2=0; top y3=top y4=top y5=top y6=h; draw z1--z5; draw z2--z6; draw z3--z4; endchar; beginchar("r",.6em#,.5cap#,.5cap#); "The letter r"; pickup pencircle xscaled 1.3thick yscaled .3thin; x2=w-x3=curve_sidebar; x1=.3w; y1=-d; top y2= h; y3=.5h; bot y4=0; z4=whatever[z1,z2]; draw z1--z2{right}..{down}z3..{left}z4; endchar; beginchar(oct"027",.65em#,.5cap#,.7cap#); "The letter drugi r"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=curve_sidebar; x3=.4w; x4=.5w; bot y1=0; top y3= h; y2=.5h; y4=-d; draw z1{right}..{up}z2..{left}z3..{down}z1..{dir(-40)}z4; endchar; beginchar("s",.6em#,.5cap#,0); "The letter drugi s"; pickup pencircle xscaled 1.3thick yscaled .3thin; x2=w-x4=w-x5=curve_sidebar; x1=x3=.5w; bot y3=0; top y1=h; y2=.5h;y4=h-y5=.2h; draw z5{dir(90+30)}..z1{left}..{down}z2..{right}z3..{dir(90-30)}z4; endchar; beginchar("t",.8em#,.5cap#,0); "The letter drugi t"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=curve_sidebar; x3=x7=w-x5=w-x8=.2w; x4=x6=.5w; top y1=top y7=top y6=top y8=top y2= h; bot y3=bot y4=bot y5=0; draw z1--z2; draw z3--z7; draw z4--z6; draw z5--z8; endchar; beginchar("h",.6em#,.5cap#,0); "The letter h"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=w-x3=w-x4=curve_sidebar; top y1=top y4= h; bot y2=bot y3=0; z5=.6[z3,z1]; draw z1--z3; draw z2{dir(70)}..z5..z4; endchar; beginchar(oct"014",.8em#,.5cap#,0); "The letter ss"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=w-x4=w-x5=curve_sidebar; x3=x6=.5w; y1=y5=h; y6=h; y2=y3=y4=0; draw z1--z2--z3--z4--z5; draw z3--z6; endchar; beginchar(oct"011",.8em#,.5cap#,.4cap#); "The letter sst"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=w-x4=w-x5=curve_sidebar; x3=x6=.5w; y1=y5=h; y6=h; y2=y4=0; y3=-d; draw z1--z2--z4--z5; draw z3--z6; endchar; beginchar("c",.6em#,.5cap#,.2cap#); "The letter c"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=w-x4=w-x5=w-x6=curve_sidebar; x3=.2[x1,x5]; top y1=top y6= h; bot y3=bot y5=0; y2-y3=x3-x2; y4=-d; draw z1--z2{down}..{right}z3--z5; draw z4--z6; endchar; beginchar(oct"013",.65em#,.5cap#,0); "The letter cc"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x3=curve_sidebar; x2=.5[x1,x3]; top y1=top y3= h; bot y2=0; draw z1--z2--z3; endchar; beginchar("u",.5em#,.5cap#,.4cap#); "The letter u"; pickup pencircle xscaled 1.2thick yscaled .3thin; x1=x5=w-x3=w-x6=curve_sidebar; x2=x4=.5w; y2=.2h; y1=y6=top h; y4=-d; y5=y3=.5[y4,y2]; path p; p= z1{down}..z2..{down}z3..{left}z4..{up}z5..z2..{up}z6; transform tt; tt=identity shifted (0,d+bot0); path q; q= p transformed tt; draw q; endchar; beginchar("f",.66em#,.8cap#,.3cap#); "The letter f"; pickup pencircle xscaled 1.3thick yscaled .3thin; x5=w-x6=curve_sidebar; x2=x4=x3=x1=.5w; y1=h; y3=.5h/.8; y5=y6=.25h/.8; y4=0; y2=-d; draw z1--z2; draw z5{up}..{right}z3..{down}z6..{left}z4..cycle; endchar; beginchar("q",.9em#,.5cap#,0); "The letter ot"; pickup pencircle xscaled 1.3thick yscaled .3thin; x2=w-x6=curve_sidebar; x4=.5w; x1=w-x7=.25w; x3=.5[x2,x4]; x5=.5[x4,x6]; top y1=top y7=h; bot y3=bot y5=0; y2=y6=y4=.5h; draw z1{dir(180+30)}..{down}z2..{right}z3..{up}z4{down}..{right}z5 ..{up}z6..{dir(180-30)}z7; endchar; beginchar("6",.6em#,cap#,0); "The letter 6 (meki poluglas)"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=0; w-x5=curve_sidebar; x3=x2=x4=1.3curve_sidebar; bot y3=0; top y1=top y2= h; y4=.5h; y5=.25h; draw z1--z2--z3{right}..{up}z5..{left}z4; endchar; beginchar("7",.66em#,cap#,0); "The letter 7 (tvrdi poluglas)"; pickup pencircle xscaled 1.3thick yscaled .3thin; x5=x7=.5curve_sidebar; w-x4=curve_sidebar; x3=x2=x1=.34w; x6-x1=x8-x1=x1-x5; y1= h; y2=.5h; bot y3=0; y4=.25h; y5=y6=.77h; y7=y8=.65h; draw z1--z3{right}..{up}z4..{left}z2; pickup pencircle xscaled thick yscaled .3thin; draw z7--z5--z6--z8; endchar; beginchar(oct"031",.85em#,.5cap#,0); "The letter ju"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=x3=w-x6=curve_sidebar; x4=.47w; x5=x7=.5[x4,x6]; top y1=top y7=h; y4=y3=y6=.5h; bot y2=bot y5= 0; draw z1--z2; draw z3--z4; draw z4{down}..{right}z5..{up}z6..{left}z7..cycle; endchar; beginchar(oct"032",.7em#,.5cap#,0); "The letter je"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=x3=w-x6=curve_sidebar; x4=.55w; x5=x7=x6; top y1=top y7= h; y4=y3=y6=.5h; bot y2=bot y5= 0; draw z1--z2; draw z3--z6; draw z7{left}..{down}z4..{right}z5; endchar; beginchar(oct"033",.55em#,.5cap#,0); "The letter ja"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=x2=w-x3=w-x4=curve_sidebar; bot y2=bot y3=0; top y1=top y4= h; z5=.5[z1,z2]; z6=.5[z3,z4]; z7=(.5w,y5); z8=(x3,0); z9=.5[z7,z8]; draw z1--z2; draw z3--z4; draw z5--z6; pickup pencircle xscaled .8thick yscaled .2thin; draw z7{down}..z9..{down}z8; endchar; beginchar("x",.55em#,.5cap#,0); "x,fiktivni"; pickup pencircle xscaled 1.3thick yscaled .3thin; draw (0,0)--(0,w); endchar; beginchar("y",.55em#,.5cap#,0); "y, fiktivni"; pickup pencircle xscaled 1.3thick yscaled .3thin; draw (0,0)--(0,w); endchar; beginchar("4",1.2em#,cap#,0); "d (kut)"; pickup pencircle xscaled 1.3thick yscaled .3thin; kut:=40; koef:=.6; x1=w-x2=curve_sidebar; y1=y2=0; y4=0; x4=koef*w; z3-z1=(z2-z1)rotated 40; % z3 z5=koef[z1,z3]; draw z2--z1--z3; draw z4{up}..{dir (90+kut)}z5; endchar; beginchar("1",.8em#,cap#,0); "dj,j,CH (crkvica, pravocrtna)"; pickup pencircle xscaled 1.3thick yscaled .3thin; x1=w-x2=curve_sidebar; x3=x4=.5w;x5=w-x6=.25w; top y4= h; bot y1=bot y2=0; y3=.5h; y5=y6=.75h; draw z3--z4; draw z5--z6; draw z1--z3--z2; endchar;