home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / pibsoft / terminal / source / pt4updwn.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1988-03-04  |  1.9 KB  |  46 lines
  1. UNIT PT4UPDWN;
  2.  
  3. INTERFACE
  4.  
  5. USES
  6.    Dos, Crt, GlobType, GlobRout, StringMan, PibTimer, PibAsync,
  7.    PT4SCRI, PT4KERM, PT4ASCI, PT4XMOD;
  8.  
  9. (* EXPORTS *)
  10.  
  11.    PROCEDURE Display_Transfer_Types(     Menu_Title    : AnyStr;
  12.                                          Menu_Default  : Transfer_Type;
  13.                                          Allow_None    : BOOLEAN;
  14.                                          Row           : INTEGER;
  15.                                          Column        : INTEGER;
  16.                                          Width         : INTEGER;
  17.                                          Height        : INTEGER;
  18.                                          Menu_Depth    : INTEGER;
  19.                                          Menu_Erase    : BOOLEAN;
  20.                                      VAR Transfer_Kind : Transfer_Type );
  21.  
  22.    PROCEDURE PibUpLoad  ( Transfer_Protocol : Transfer_Type );
  23.    PROCEDURE PibDownLoad( Transfer_Protocol : Transfer_Type );
  24.    FUNCTION  Get_Zmodem_Type : Transfer_Type;
  25.  
  26. IMPLEMENTATION
  27.                                    (* Display transfer types menu       *)
  28. {$I DISPLYTT.MOD }
  29.                                    (* Get upload protocol -- Alt_S      *)
  30. {$I GETUPLOA.MOD }
  31.                                    (* Get download protocol -- Alt_R    *)
  32. {$I GETDOWNL.MOD }
  33.                                    (* Signal end of transfer            *)
  34. {$I SIGENDTR.MOD }
  35.                                    (* Transfer file through batch file  *)
  36. {$I TRANSBAT.MOD }
  37.                                    (* Finds which ext. prot. is Zmodem  *)
  38. {$I GETZMODE.MOD }
  39.                                    (* General file transfer handler     *)
  40. {$I PIBUPDOW.MOD }
  41.                                    (* General upload handler -- Alt_S   *)
  42. {$I PIBUPLOD.MOD }
  43.                                    (* General download handler -- Alt_R *)
  44. {$I PIBDWLOD.MOD }
  45.  
  46. END   (* PT4UPDWN *).