home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.wwiv.com
/
ftp.wwiv.com.zip
/
ftp.wwiv.com
/
pub
/
PROTOCOL
/
TPHYD100.ZIP
/
H_WIN.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1993-08-18
|
2KB
|
41 lines
{$A+,B-,D-,E-,F-,I-,L-,N-,O+,R-,S-,V-}
(******************************************************************************)
(* Hydra Bi-directional Protocol *)
(* ───────────────────────── *)
(* *)
(* Low Level Screen Handler *)
(* *)
(* BY: Adam Blake Wandoo Valley Software *)
(* Arjen Lentz and Lentz Software *)
(* VER: 1.00 Development *)
(* DATE: 5th August 1993 (c) Copyright 1993 *)
(* LANGUAGE: Turbo Pascal v6.0 All Rights Reserved Worldwide *)
(******************************************************************************)
Unit h_Win;
Interface
var
hWin_OpenWindow : Procedure;
hWin_CloseWindow : Procedure;
hWin_ClearTxWindow : Procedure;
hWin_ClearRxWindow : Procedure;
hWin_ShowTxFileName : Procedure( FileName : string );
hWin_ShowRxFileName : Procedure( FileName : string );
hWin_ShowTxFileSize : Procedure( FileSize : longint );
hWin_ShowRxFileSize : Procedure( FileSize : longint );
hWin_ShowTxBytes : Procedure( Bytes, StartTime : longint );
hWin_ShowRxBytes : Procedure( Bytes, StartTime : longint );
hWin_Message : Procedure( Str : string );
hWin_Complete : Procedure( FileName : string; Bytes : longint );
hWin_RemChat : Procedure( var Buffer; Len : word );
hWin_KeyCheck : Function : boolean;
(******************************************************************************)
Implementation
(**********************************MAINLINE************************************)
end.