home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 51 / af051sub.adf / PARBN31G.DMS / PARBN31G.adf / Utilities / Add.Icons < prev    next >
Encoding:
AmigaDOS Script File  |  1978-01-28  |  999 b   |  38 lines

  1. .key DRIVE
  2. .bra {
  3. .ket }
  4. failat 30
  5. echo ""
  6. if >nil: NOT exists {drive}
  7.   echo "ERROR--->      You did not select a drive!"
  8.   echo ""
  9.   echo "This icon is of the 'click, shift-click' type. To use it you"
  10.   echo "must first single click the Add.Icons icon, then hold down the"
  11.   echo "SHIFT key and double click on the drive you want to add icons"
  12.   echo "to."
  13. else
  14.   echo "You have chosen to add a ParNET Icon to drive '{drive}'"
  15.   echo ""
  16.   echo "Checking Drive '{drive}' to see if a ParNET icon already exists..."
  17.   echo ""
  18.   If exists {drive}node.rinfo
  19.     echo "Icon already exists! "
  20.     echo ""
  21.     ask "Are you sure you want to over-write the ParNET Icon on drive '{drive}'?"
  22.     if warn 
  23.       copy Node.rinfo to {drive}node.rinfo
  24.     endif
  25.   else
  26.     echo "No Previous ParNET icon found"
  27.     echo ""
  28.     echo "Adding ParNET icon to drive '{drive}'..."NOLINE
  29.       copy Node.rinfo to {drive}node.rinfo
  30.     echo "OK."
  31.   endif
  32. endif  
  33.  
  34. echo ""
  35. echo ""
  36. ask "Press RETURN to close this window."
  37.  
  38.