home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / HISOFTPASCAL2,0-1.DMS / in.adf / S / SPat < prev    next >
Encoding:
AmigaDOS Script File  |  1991-07-16  |  243 b   |  13 lines
  1. .key com/a,pat/a,opt1,opt2,opt3,opt4
  2. .bra {
  3. .ket }
  4. failat 21
  5. list >t:q{$$} {pat} lformat="{com} *"%s%s*" {opt1} {opt2} {opt3} {opt4}"
  6. IF NOT FAIL
  7. execute t:q{$$}
  8. ELSE
  9. echo "{pat} not found"
  10. ENDIF
  11. failat 10
  12. ;do wildcards for single arg command
  13.