home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_progs / prog_oth / turbodex.lha / examplesources / GetArgs.dex < prev    next >
Encoding:
Text File  |  1992-10-11  |  210 b   |  11 lines
  1. /* get command line args */
  2.  
  3. PROC main(ARG)
  4.   MCHAR argadr+argl-1,0           /* now terminate argstring with a 0 */
  5.   IF argl=1
  6.     WRITE 'No Args!\n'
  7.   ELSE
  8.     WRITE 'You wrote: \s\n',argadr
  9.   ENDIF
  10. ENDPROC
  11.