home *** CD-ROM | disk | FTP | other *** search
/ Resource for Source: C/C++ / Resource for Source - C-C++.iso / codelib8 / v_10_08 / ryan2.lis < prev    next >
Encoding:
File List  |  1995-11-01  |  396 b   |  28 lines
  1.  
  2.  
  3. -----------------------------------------------------------------
  4.                            LISTING II
  5.                  INKEY FUNCTION FOR USE WITH SCO XENIX
  6.  
  7.  
  8. char inkey(chan)
  9. {int chan
  10. int i;
  11. char ch;
  12.     if  (rdchk(chan) > 0)
  13.         {
  14.         i=read(chan, &ch, 1);
  15.         ch = ch & 0xff;
  16.  
  17.         }
  18.     else
  19.         return (0);
  20.     
  21.     return (ch);
  22. }
  23.  
  24.   
  25.  
  26.  
  27.  
  28.