home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / DC-POS24.LZX / pOS / pOS.lzx / pos / S / pdt_SDev < prev    next >
Encoding:
AmigaDOS Script File  |  1997-03-18  |  333 b   |  20 lines
  1. .KEY NAME/A, SEARCH/S, CREATE/S
  2.  
  3. FailAt 41
  4.  
  5. ; This script will run, by <Device not mounted>.
  6.  
  7.  
  8.  
  9. IF [SEARCH] EQ 1
  10.  ; this look at devs:mountlist.arg
  11.  MOUNT [name]
  12. ELSE
  13. ; error
  14.  ex/FileReq >env:_t Path sys: OnlyDirs Title "Create ASSIGN [name] ..." PosText "Assign [name]"
  15.  IF NOT WARN
  16.    Assign [name] $_t
  17.  ENDIF
  18.  Delete env:_t
  19. ENDIF
  20.