home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / s / spat < prev    next >
AmigaDOS Script File  |  1995-02-27  |  283b  |  19 lines

  1. .key com/a,pat/a,opt1,opt2,opt3,opt4
  2. .bra {
  3. .ket }
  4.  
  5. ; $VER: spat 38.1 (11.10.91)
  6. ; Do wildcards for single arg commands
  7.  
  8. FailAt 21
  9.  
  10. List >T:q{$$} {pat} LFORMAT "{com} *"%s%s*" {opt1} {opt2} {opt3} {opt4}"
  11.  
  12. IF NOT FAIL
  13.   Execute T:q{$$}
  14. Else
  15.   Echo "{pat} not found"
  16. EndIF
  17.  
  18. FailAt 10
  19.