# 2.11BSD#431 - /usr/src/usr.bin/eqn/font.c

##### Functions

    fatbox            X
    font              X
    globfont          X
    setfont           X

       1: #ifndef lint
       2: static char sccsid[] = "@(#)font.c	4.3 8/11/83";
       3: #endif
       4:
       5: # include "e.h"
       6:
       7: setfont(ch1) char ch1; {
       8:     /* use number '1', '2', '3' for roman, italic, bold */
       9:     yyval = ft;
      10:     if (ch1 == 'r' || ch1 == 'R')
      11:         ft = ROM;
      12:     else if (ch1 == 'i' || ch1 == 'I')
      13:         ft = ITAL;
      14:     else if (ch1 == 'b' || ch1 == 'B')
      15:         ft = BLD;
      16:     else
      17:         ft = ch1;
      18:     printf(".ft %c\n", ft);
      19: #ifndef NEQN
      20:     if(dbg)printf(".\tsetfont %c %c\n", ch1, ft);
      21: #else NEQN
      22:     if(dbg)printf(".\tsetfont %c\n", ft);
      23: #endif NEQN
      24: }
      25:
      26: font(p1, p2) int p1, p2; {
      27:         /* old font in p1, new in ft */
      28:     yyval = p2;
      29:     lfont[yyval] = rfont[yyval] = ft==ITAL ? ITAL : ROM;
      30:     if(dbg)printf(".\tb:fb: S%d <- \\f%c S%d \\f%c b=%d,h=%d,lf=%c,rf=%c\n",
      31:         yyval, ft, p2, p1, ebase[yyval], eht[yyval], lfont[yyval], rfont[yyval]);
      32:     printf(".ds %d \\f%c\\*(%d\\f%c\n",
      33:         yyval, ft, p2, p1);
      34:     ft = p1;
      35:     printf(".ft %c\n", ft);
      36: }
      37:
      38: fatbox(p) int p; {
      39:     int sh;
      40:
      41:     yyval = p;
      42:     sh = ps / 4;
      43:     nrwid(p, ps, p);
      44:     printf(".ds %d \\*(%d\\h'-\\n(%du+%du'\\*(%d\n", p, p, p, sh, p);
      45:     if(dbg)printf(".\tfat %d, sh=%d\n", p, sh);
      46: }
      47:
      48: globfont() {
      49:     char temp[20];
      50:
      51:     getstr(temp, 20);
      52:     yyval = eqnreg = 0;
      53:     gfont = temp[0];
      54:     switch (gfont) {
      55:     case 'r': case 'R':
      56:         gfont = '1';
      57:         break;
      58:     case 'i': case 'I':
      59:         gfont = '2';
      60:         break;
      61:     case 'b': case 'B':
      62:         gfont = '3';
      63:         break;
      64:     }
      65:     printf(".ft %c\n", gfont);
      66:     ft = gfont;
      67: }

#### Defined functions

fatbox defined in line 38; used 1 times

- in /usr/src/usr.bin/eqn/e.y line 65

font defined in line 26; used 1 times

- in /usr/src/usr.bin/eqn/e.y line 64

globfont defined in line 48; used 1 times

- in /usr/src/usr.bin/eqn/lex.c line 125

setfont defined in line 7; used 4 times

- in /usr/src/usr.bin/eqn/e.y line 139-142(4)

#### Defined variables

sccsid defined in line 2; never used

Last modified: 1987-02-17 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 961 |