skip();
if(((i = (getch() & CMASK) - '0' -1) < 0) || (i >3)){prstr("fp: bad font position\n"); return;}
if(skip() || !(j = getrq())){prstr("fp: no font name\n"); return;}
skip();
if(((i = (getch() & CMASK) - '0' -1) < 0) || (i >3)){prstr("fp: bad font position\n"); return;}
if(skip() || !(j = getrq())){prstr("fp: no font name\n"); return;}