1: /*
   2:  * Copyright (c) 1980 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[] = "@(#)subr.c	5.1 (Berkeley) 5/7/85";
   9: #endif not lint
  10: 
  11: #include "hp7221.h"
  12: 
  13: putMBP( x, y )
  14:     int     x,  y;
  15: {
  16:     int     chr;
  17: 
  18:     chr = ( x >> 10 ) & 017;
  19:     chr|= 0140;
  20:     putchar( chr );
  21:     chr = ( x >> 4 ) & 077;
  22:     if ( chr < 32 ) {
  23:     chr += 64;
  24:     }
  25:     putchar( chr );
  26:     chr = ( y >> 12 ) & 03;
  27:     chr|= ( x << 2  ) & 071;
  28:     if ( chr < 32 ) {
  29:     chr += 64;
  30:     }
  31:     putchar( chr );
  32:     chr = ( y >> 6 ) & 077;
  33:     if ( chr < 32 ) {
  34:     chr += 64;
  35:     }
  36:     putchar( chr );
  37:     chr = ( y ) & 077;
  38:     if ( chr < 32 ) {
  39:     chr += 64;
  40:     }
  41:     putchar( chr );
  42:     return;
  43: }
  44: 
  45: putMBN( i )
  46:     int     i;
  47: {
  48:     int     chr;
  49: 
  50:     chr = ( i>>12 ) & 07;
  51:     chr|= 0140;
  52:     putchar( chr );
  53:     chr = ( i>>6 ) & 077;
  54:     if ( chr < 32 ) {
  55:     chr += 64;
  56:     }
  57:     putchar( chr );
  58:     chr = i & 077;
  59:     if ( chr < 32 ) {
  60:     chr += 64;
  61:     }
  62:     putchar( chr );
  63:     return;
  64: }
  65: 
  66: putSBN( i )
  67:     int     i;
  68: {
  69:     i &= 077;
  70:     if ( i < 32 ) {
  71:     i += 64;
  72:     }
  73:     putchar( i );
  74:     return;
  75: }

Defined functions

putMBN defined in line 45; used 1 times
putSBN defined in line 66; 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: 2134
Valid CSS Valid XHTML 1.0 Strict