2.9BSD - /usr/src/cmd/eqn/move.c

   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: }

Defined functions