Blame


1 5cedca1b 2004-05-15 devnull # include "e.h"
2 5cedca1b 2004-05-15 devnull # include "y.tab.h"
3 5cedca1b 2004-05-15 devnull
4 5cedca1b 2004-05-15 devnull void move(int dir, int amt, int p)
5 5cedca1b 2004-05-15 devnull {
6 5cedca1b 2004-05-15 devnull double a;
7 5cedca1b 2004-05-15 devnull
8 5cedca1b 2004-05-15 devnull yyval = p;
9 5cedca1b 2004-05-15 devnull a = EM(amt/100.0, ps);
10 eb9be703 2006-02-04 devnull printf(".ds %d ", (int)yyval);
11 5cedca1b 2004-05-15 devnull if (dir == FWD || dir == BACK)
12 5cedca1b 2004-05-15 devnull printf("\\h'%s%gm'\\*(%d\n", (dir==BACK) ? "-" : "", a, p);
13 5cedca1b 2004-05-15 devnull else if (dir == UP)
14 5cedca1b 2004-05-15 devnull printf("\\v'-%gm'\\*(%d\\v'%gm'\n", a, p, a);
15 5cedca1b 2004-05-15 devnull else if (dir == DOWN)
16 5cedca1b 2004-05-15 devnull printf("\\v'%gm'\\*(%d\\v'-%gm'\n", a, p, a);
17 fa325e9b 2020-01-10 cross dprintf(".\tmove %d dir %d amt %g; h=%g b=%g\n",
18 5cedca1b 2004-05-15 devnull p, dir, a, eht[yyval], ebase[yyval]);
19 5cedca1b 2004-05-15 devnull }