\input abbr.tex \makeatletter \def\resetefcode#1{% \@tempcnta=0 \loop \efcode#1\@tempcnta=1000 \advance\@tempcnta 1 \ifnum\@tempcnta < 256 \repeat } \makeatother \def\setefcode#1{% \efcode#1`\2=700 \efcode#1`\3=700 \efcode#1`\6=700 \efcode#1`\8=700 \efcode#1`\9=700 \efcode#1`\A=500 \efcode#1`\B=700 \efcode#1`\C=700 \efcode#1`\D=500 \efcode#1`\E=700 \efcode#1`\F=700 \efcode#1`\G=500 \efcode#1`\H=700 \efcode#1`\K=700 \efcode#1`\M=700 \efcode#1`\N=700 \efcode#1`\O=500 \efcode#1`\P=700 \efcode#1`\Q=500 \efcode#1`\R=700 \efcode#1`\S=700 \efcode#1`\U=700 \efcode#1`\W=700 \efcode#1`\Z=700 \efcode#1`\a=700 \efcode#1`\b=700 \efcode#1`\c=700 \efcode#1`\d=700 \efcode#1`\e=700 \efcode#1`\g=700 \efcode#1`\h=700 \efcode#1`\k=700 \efcode#1`\m=700 \efcode#1`\n=700 \efcode#1`\o=700 \efcode#1`\p=700 \efcode#1`\q=700 \efcode#1`\s=700 \efcode#1`\u=700 \efcode#1`\w=700 \efcode#1`\z=700 }