case $# in 0) echo 'nmakefont widthfile Name internal# ...'; exit ;; esac arch=$1 shift echo "# $* name $1 internalname $2" >$1 awk ' BEGIN { OFS = " " print "charset" } # read width file to get char number and width FILENAME != "proto" && $1 ~ /^C[0-9][0-9][0-9]/ { if ($2 > 100) $2 = substr($2,1,2) w[0+substr($1,2)] = $2 } # read proto file to get char name, number FILENAME == "proto" && $2 ~ /^[0123]$/ && NF == 3 { print $1, w[$3], $2, $3 if ($1 == "hy") print "- \" =hy" } ' $arch proto >>$1