a = Array($argc-1)
i = 1
while ( i < $argc)
	Open($argv[i], 1);
	ClearHints();
	kpx = Strsub($argv[i], 0, Strlen($argv[i]) - 4);
	MergeKern(kpx + ".AFM.NEW");
	Generate($fontname + ".ttf", "", 4|8|0x10);
	i++
endloop