1 #ifndef lint 2 static char sccsid[] = "@(#)move.c 2.2 (CWI) 87/04/01"; 3 #endif lint 4 # include "e.h" 5 # include "y.tab.h" 6 7 move(dir, amt, p) 8 int dir, amt, p; 9 { 10 float a; 11 12 yyval = p; 13 a = EM(amt/100.0, ps); 14 printf(".ds %d ", yyval); 15 if (dir == FWD || dir == BACK) 16 printf("\\h'%s%gm'\\*(%d\n", (dir==BACK) ? "-" : "", a, p); 17 else if (dir == UP) 18 printf("\\v'-%gm'\\*(%d\\v'%gm'\n", a, p, a); 19 else if (dir == DOWN) 20 printf("\\v'%gm'\\*(%d\\v'-%gm'\n", a, p, a); 21 dprintf(".\tmove %d dir %d amt %g; h=%g b=%g\n", 22 p, dir, a, eht[yyval], ebase[yyval]); 23 } 24