home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / src / cmd / eqn / move.c < prev    next >
Encoding:
C/C++ Source or Header  |  1979-01-10  |  511 b   |  19 lines
  1. # include "e.h"
  2. # include "e.def"
  3.  
  4. move(dir, amt, p) int dir, amt, p; {
  5.     int a;
  6.  
  7.     yyval = p;
  8.     a = VERT( (EFFPS(ps) * 6 * amt) / 100);
  9.     printf(".ds %d ", yyval);
  10.     if( dir == FWD || dir == BACK )    /* fwd, back */
  11.         printf("\\h'%s%du'\\*(%d\n", (dir==BACK) ? "-" : "", a, p);
  12.     else if (dir == UP)
  13.         printf("\\v'-%du'\\*(%d\\v'%du'\n", a, p, a);
  14.     else if (dir == DOWN)
  15.         printf("\\v'%du'\\*(%d\\v'-%du'\n", a, p, a);
  16.     if(dbg)printf(".\tmove %d dir %d amt %d; h=%d b=%d\n", 
  17.         p, dir, a, eht[yyval], ebase[yyval]);
  18. }
  19.