MINICERN/packlib/zebra/fq/fzcvhpc.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.2  1997/03/14 17:19:50  mclareni
   6 * WNT mods
   7 *
   8 * Revision 1.1.1.1.2.1  1997/01/21 11:33:40  mclareni
   9 * All mods for Winnt 96a on winnt branch
  10 *
  11 * Revision 1.1.1.1  1996/03/06 10:47:10  mclareni
  12 * Zebra
  13 *
  14 *
  15 *   invert ASCII characters
  16 *
  17 * fzcvhpc.inc
  18 *
  19 #if defined(CERNLIB_QMDOS) || defined(CERNLIB_WINNT)
  20 C--       PC : invert ASCII characters
  21       CALL VXINVC (MS(JMS+1),MT(JMT+1),NWDO)
  22       JMT = JMT + NWDO
  23       JMS = JMS + NWDO
  24       GO TO 801
  25 #endif