home *** CD-ROM | disk | FTP | other *** search
- .key COM/A,PAT/A,OPT1,OPT2,OPT3,OPT4
- .bra {
- .ket }
-
- ; $VER: SPat 40.1 (9.2.93)
- ; Do wildcards for single argument commands
-
- FailAt 21
-
- List >T:q{$$} {PAT} LFORMAT "{COM} *"%s%s*" {OPT1} {OPT2} {OPT3} {OPT4}"
-
- IF NOT FAIL
- Execute T:q{$$}
- Else
- Echo "{PAT} not found"
- EndIF
-
- Delete >NIL: T:q{$$} QUIET
-
- FailAt 10
-