home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l292 / 1.ddi / MISCIOFI.FOR < prev    next >
Encoding:
Text File  |  1989-10-13  |  1.3 KB  |  49 lines

  1.       INTERFACE TO SUBROUTINE OPEN_COM [C] (Cport, baud,parity,
  2.      +   stopbits, numbits, handshake, errcode)
  3.       INTEGER * 2 Cport, baud, parity, stopbits, numbits, handshake
  4.       INTEGER * 2 errcode [FAR, REFERENCE]
  5.       END
  6.  
  7.       INTERFACE TO SUBROUTINE  CLOSE_COM [C]
  8.       END
  9.  
  10.       INTERFACE TO SUBROUTINE SEND_COM [C] ( c,errcode)
  11.       CHARACTER c
  12.       INTEGER * 2 errcode [FAR, REFERENCE]
  13.       END
  14.  
  15.       INTERFACE TO SUBROUTINE CHECK_COM [C] ( c,errcode)
  16.       CHARACTER c [FAR, REFERENCE]
  17.       INTEGER * 2 errcode [FAR, REFERENCE]
  18.       END
  19.  
  20.       INTERFACE TO SUBROUTINE WRITELN_COM [C] ( s,errcode)
  21.       CHARACTER * 80 s [FAR, REFERENCE]
  22.       INTEGER * 2 errcode [FAR, REFERENCE]
  23.       END
  24.  
  25.       INTERFACE TO SUBROUTINE READLN_COM [C] ( s,errcode)
  26.       CHARACTER * 80 s [FAR, REFERENCE]
  27.       INTEGER * 2 errcode [FAR, REFERENCE]
  28.       END
  29.  
  30.       INTERFACE TO SUBROUTINE POC [C] (p, c, status)
  31.       INTEGER * 2 p
  32.       CHARACTER c
  33.       INTEGER * 2 status [FAR, REFERENCE]
  34.       END
  35.  
  36.       INTERFACE TO SUBROUTINE ReadKey [C] (c, scancode)
  37.       CHARACTER c [FAR, REFERENCE]
  38.       CHARACTER scancode [FAR, REFERENCE]
  39.       END
  40.  
  41.  
  42.       INTERFACE TO SUBROUTINE GotoXY [C] (x, y)
  43.       INTEGER * 2 x,y
  44.       END
  45.  
  46.       INTERFACE TO SUBROUTINE WriteChar [C] (c)
  47.       CHARACTER c
  48.       END
  49.