Click above to get retro games delivered to your door ever month!

 PARAMCOUNT          Number of Parameter in Command Line              pp 144

 Syntax:  ParamCount ;

 Type:    Integer

 Form:    Function

 Purpose: Returns the number of parameters passed to the program in the
          command line.  Spaces and tabs serve as separators.


 ----------------------------------------------------------------------------


 Usage:
       VAR
          IntVar  : Integer                          ; { Integer variable  }
          CmdParm : String [128]                     ; { Parm string       }
          CmdTail : String [128] Absolute Cseg:$0080 ; { Command tail      }

       BEGIN
          IntVar  := ParamCount                      ; { Get parm count    }
          CmdParm := ParamStr (IntVar)               ; { Get last parm     }
          WriteLn (IntVar)                           ; { Display count     }
          WriteLn (CmdParm)                          ; { Display last parm }
          WriteLn (CmdTail)                          ; { Display cmd tail  }
       END.