|
|
1.1 ! root 1: # include "e.h" ! 2: # include "y.tab.h" ! 3: ! 4: move(dir, amt, p) ! 5: int dir, amt, p; ! 6: { ! 7: float a; ! 8: ! 9: yyval = p; ! 10: a = EM(amt/100.0, ps); ! 11: printf(".ds %d ", yyval); ! 12: if (dir == FWD || dir == BACK) ! 13: printf("\\h'%s%gm'\\*(%d\n", (dir==BACK) ? "-" : "", a, p); ! 14: else if (dir == UP) ! 15: printf("\\v'-%gm'\\*(%d\\v'%gm'\n", a, p, a); ! 16: else if (dir == DOWN) ! 17: printf("\\v'%gm'\\*(%d\\v'-%gm'\n", a, p, a); ! 18: dprintf(".\tmove %d dir %d amt %g; h=%g b=%g\n", ! 19: p, dir, a, eht[yyval], ebase[yyval]); ! 20: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.