home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / lilith / m2help.mod < prev    next >
Text File  |  2020-01-01  |  2KB  |  59 lines
  1. IMPLEMENTATION MODULE KermHelp;
  2. (************************************************************************)
  3. (*  Help lists all valid commands of Modula-2 Kermit and gives a short  *)
  4. (*  explanation                                                         *)
  5. (*  written:            08.10.85     Matthias Aebi                      *)
  6. (*  last modification:  25.02.86     Matthias Aebi                      *)
  7. (************************************************************************)
  8.  
  9. FROM Terminal IMPORT WriteString, WriteLn;
  10. FROM KermMisc IMPORT ClrScr;
  11.  
  12. PROCEDURE Help;
  13. BEGIN
  14.     ClrScr;
  15.     WriteLn;
  16.     WriteString("The following are valid commands:");
  17.     WriteLn;
  18.     WriteLn;
  19.     WriteString("     Bye         Logout remote server, quit Kermit");
  20.     WriteLn;
  21.     WriteString("     Connect     Connect to remote host and act as a terminal");
  22.     WriteLn;
  23.     WriteString("     DElete      Delete files");
  24.     WriteLn;
  25.     WriteString("     DIrectory   Display directory information");
  26.     WriteLn;
  27.     WriteString("     Exit        Quit Kermit");
  28.     WriteLn;
  29.     WriteString("     Finish      Leave server mode at remote server");
  30.     WriteLn;
  31.     WriteString("     Get         Get the specified file(s) from remote server");
  32.     WriteLn;
  33.     WriteString("     Help        Display this message");
  34.     WriteLn;
  35.     WriteString("     Logout      Shut down remote server");
  36.     WriteLn;
  37.     WriteString("     Quit        Quit Kermit");
  38.     WriteLn;
  39.     WriteString("     Receive     Receive a file from remote host");
  40.     WriteLn;
  41.     WriteString("     SENd        Send a file to remote host");
  42.     WriteLn;
  43.     WriteString("     SERver      Enter server mode");
  44.     WriteLn;
  45.     WriteString("     SET         Set local Kermit parameter");
  46.     WriteLn;
  47.     WriteString("     SHow        Show local parameters");
  48.     WriteLn;
  49.     WriteString("     Type        Display a textfile at the screen");
  50.     WriteLn;
  51.     WriteString("     Version     Display the current M2-Kermit version");
  52.     WriteLn;
  53.     WriteLn;
  54.     WriteString("   Allowable abbreviations are shown in capital letters");
  55.     WriteLn;
  56. END Help;
  57.  
  58. END KermHelp.
  59.