%(c) 1992 by Jo Grant

mode_def testing=
		pixels_per_inch:=300*4;
		blacker:=.1;
		o_correction:=1;
		fillin:=.01;
		proofing:=2;
		fontmaking:=0;
		tracingtitles:=1;
	enddef;
if unknown mode:
mode:=testing; fi
mode_setup;
turningcheck := 0;

if mode=testing: screenstrokes; fi

% parameters that control what a wedge looks like.
u#      = 1/384in#;
pw#    := 4u#;
runew# := 4pw#;
runeh# := 12pw#;
runee# := 1.2pw#;

pen_thick# := .5pw#;

define_pixels(pw, runew, runeh, pen_thick, runee)

def penoct = makepen((.866,.5)--(.5,.866)--(-.5,.866)--(-.866,.5)
	--(-.866,-.5)--(-.5,-.866)--(.5,-.866)--(.866,-.5)--cycle) enddef;

def runepen = pickup penoct scaled pen_thick rotated 45; enddef;

input runes;

% the ligatures
ligtable "T": "H" =: "t";
ligtable "E": "E" =: "e", "A" =: "a";
ligtable "N": "G" =: "n";
ligtable "S": "T" =: "s";

font_normal_space 2runew#;
font_normal_stretch 2runew#/3;
font_normal_shrink 4runew#/3;

end;