home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 2: Collection B / 17Bit_Collection_B.iso / files / 1565.dms / in.adf / s / startup-sequence < prev   
Encoding:
Text File  |  1997-10-30  |  1.6 KB  |  68 lines
  1. ren CONTACT 17-BIT ON 0924 366982......THE BEST PD....
  2. :othercomms/fb
  3. :othercomms/spectype utilities/startscreen
  4. :othercomms/pointer
  5. :othercomms/stripes 0 3
  6. c:setpatch >NIL:
  7. fastmemfirst
  8. failat 30
  9. assign >NIL: RAD: exists
  10. if warn
  11.   :othercomms/pointer
  12.   resident c/echo
  13.   mount rad:
  14.   resident c/copy
  15.   resident c/makedir
  16.   makedir rad:c
  17.   makedir rad:s
  18.   makedir rad:l
  19.   echo "1.15s"
  20.   makedir rad:libs
  21.   makedir rad:devs
  22.   makedir rad:devs/printers
  23.   makedir rad:fonts
  24.   echo "1.10s"
  25.   copy df0:c/ rad:c/ quiet
  26.   echo "0.50s"
  27.   copy #? rad: quiet
  28.   echo "0.45s"
  29.   copy df0:copied/ rad: quiet
  30.   echo "0.39s"
  31.   delete rad:documents!.info
  32.   delete rad:odd-bods.info
  33.   delete rad:utilities.info
  34.   copy df0:s/newstart rad:s/ quiet
  35.   echo "0.35s"
  36.   copy df0:l rad:l/ quiet
  37.   echo "0.25s"
  38.   copy df0:libs rad:libs/ quiet
  39.   echo "0.10s"
  40.   copy df0:devs rad:devs/ quiet
  41.   copy df0:devs/printers/epson rad:devs/printers quiet
  42.   makedir rad:devs/keymaps
  43.   copy df0:devs/keymaps rad:devs/keymaps quiet
  44.   echo "0.03s"
  45.   :othercomms/stripes
  46.   copy df0:fonts rad:fonts/ quiet
  47.   echo "Done!"
  48.   echo " "
  49.   echo "Final preparations... Takes 10 seconds..."
  50.   rename rad:s/newstart rad:s/startup-sequence
  51.   copy :othercomms/button ram:
  52.   copy :othercomms/boot ram:
  53.   :othercomms/spectype utilities/startscreen2
  54.   ram:button
  55.   ram:boot
  56. else
  57.  echo "Radbench is already present!"
  58.  echo " "
  59.  echo "Starting Radbench startup-sequence..."
  60.  resident echo remove
  61.  makedir ram:t
  62.  assign t: ram:t
  63.  execute rad:s/startup-sequence
  64. endif
  65. echo "Either something has gone wrong, or you have waited for ages to"
  66. echo " "
  67. echo "get here...   Go away!"
  68.