home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_200 / 286_02 / select.c < prev    next >
Text File  |  1989-05-25  |  1KB  |  47 lines
  1. #include <stdio.H>
  2. #include <gds.h>
  3. #include <prtfont.h>
  4.  
  5. SelectFont(fontnu)
  6. int fontnu;
  7. {
  8.     register int temp;
  9.  
  10.     if (FONTTAB[fontnu].status != NOT_USED) {
  11.         temp=CURFONT;
  12.         CURFONT=fontnu;
  13.         return(temp);
  14.     } else
  15.         return(-1);
  16. }
  17.  
  18. SelectFrame(frnu)
  19. int frnu;
  20. {   register struct fdesc *fptr;
  21.     register int temp;
  22.  
  23.     fptr = &FTABLE[temp=CUR_FRAME];
  24.     fptr->forgx = ORGX;
  25.     fptr->forgy = ORGY;
  26.     fptr->fwinx1 = WINX1;
  27.     fptr->fwinx2 = WINX2;
  28.     fptr->fwiny1 = WINY1;
  29.     fptr->fwiny2 = WINY2;
  30.     if ((fptr=&FTABLE[frnu])->status == NOT_USED)
  31.         return(-1);
  32.     CUR_FRAME=frnu;
  33.     LNBYTE=fptr->ln_byte;
  34.     LADDRO=LNBYTE & 0x0f;
  35.     LADDRS=LNBYTE >> 4;
  36.     FRM_ST=fptr->faddr;
  37.     WINX1=fptr->fwinx1;
  38.     WINY1=fptr->fwiny1;
  39.     WINX2=fptr->fwinx2;
  40.     WINY2=fptr->fwiny2;
  41.     XLIMIT=fptr->horz;
  42.     YLIMIT=fptr->vert;
  43.     ORGX=fptr->forgx;
  44.     ORGY=fptr->forgy;
  45.     return(temp);
  46. }
  47.