1: /*
   2:  * Copyright (c) 1985 Regents of the University of California.
   3:  * All rights reserved.  The Berkeley software License Agreement
   4:  * specifies the terms and conditions for redistribution.
   5:  */
   6: 
   7: #ifndef lint
   8: static char sccsid[] = "@(#)label.c	5.1 (Berkeley) 9/21/85";
   9: #endif not lint
  10: 
  11: #include "imPcodes.h"
  12: #include "imp.h"
  13: extern imPcsize;
  14: label(s)
  15: char *s;
  16: {
  17:     register i,c;
  18:     putch(imP_SET_ABS_H);
  19:     putwd((int)((imPx-obotx)*scalex+botx)-imPcsize/2);
  20:     putch(imP_SET_ABS_V);
  21:     putwd((int)((imPy-oboty)*scaley+boty-(imPcsize/1.6)));
  22:     for(i=0; c=s[i]; i++)
  23:     {
  24:         imPx += imPcsize/scalex;
  25:         putch((c == ' ')?imP_SP:c);
  26:     }
  27: }

Defined functions

label defined in line 14; never used

Defined variables

sccsid defined in line 8; never used
Last modified: 1987-02-18
Generated: 2016-12-26
Generated by src2html V0.67
page hit count: 1446
Valid CSS Valid XHTML 1.0 Strict