home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / PROTOCOL / TPHYD100.ZIP / H_COMMS.PAS < prev    next >
Pascal/Delphi Source File  |  1993-08-18  |  2KB  |  39 lines
  1. {$A+,B-,D-,E-,F-,I-,L-,N-,O+,R-,S-,V-}
  2. (******************************************************************************)
  3. (*                      Hydra Bi-directional Protocol                         *)
  4. (*                        ─────────────────────────                           *)
  5. (*                                                                            *)
  6. (*                             Com Port Handler                               *)
  7. (*                                                                            *)
  8. (* BY: Adam Blake                                      Wandoo Valley Software *)
  9. (*     Arjen Lentz                                         and Lentz Software *)
  10. (* VER: 1.00                                                      Development *)
  11. (* DATE: 5th August 1993                                   (c) Copyright 1993 *)
  12. (* LANGUAGE: Turbo Pascal v6.0                  All Rights Reserved Worldwide *)
  13. (******************************************************************************)
  14. Unit h_Comms;
  15. Interface
  16.  
  17. var
  18.   Com_TxFlush : Procedure;
  19.   Com_RxFlush : Procedure;
  20.   Com_TxEmpty : Function : boolean;
  21.   Com_RxReady : Function : boolean;
  22.   Com_Carrier : Function : boolean;
  23.   Com_Break   : Procedure;
  24.   Com_TxByte  : Procedure( Ch : byte );
  25.   Com_TxBlock : Procedure( var Buffer; Len : word );
  26.   Com_RxByte  : Function : byte;
  27.  
  28.   Com_TXChars : ^word;  (*Points to a variable of type word which contains the*)
  29.                         (*number of characters contained in the output buffer *)
  30.  
  31.  
  32. (******************************************************************************)
  33. Implementation
  34.  
  35. (**********************************MAINLINE************************************)
  36.  
  37. end.
  38.  
  39.