home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d579 / octamed.lha / OctaMED / UnPackDisk < prev    next >
Text File  |  1991-12-22  |  3KB  |  117 lines
  1. .K ""
  2. echo "This script will unpack the following lharc archives:"
  3. echo ""
  4. echo "  OctaMED.lzh =>    OctaMED1.00b:"
  5. echo ""
  6.  
  7. ask "Do you have a blank disk ready?"
  8. if not WARN
  9.     echo "Try again when you do ..."
  10.     echo "All Done.  Click close gadget to get rid of window."
  11.     endcli
  12. endif
  13.  
  14. ask "Is floppy drive df1: free?"
  15. if not WARN
  16.     echo "You will need to do the unpacking yourself."
  17.     echo "All Done.  Click close gadget to get rid of window."
  18.     endcli
  19. endif
  20.  
  21. echo "Formatting and unpacking disk ..."
  22.  
  23. sys:system/format drive df1: name OctaMED1.00b noicons
  24. :c/lharc -x -a -m x OctaMED.lzh OctaMED1.00b:
  25.  
  26. echo "Installing custom bootblock on df1: ..."
  27. BootBack BootBlock df1:
  28.  
  29. echo "Copying selected proprietary files from your sys: directory ..."
  30.  
  31. makedir OctaMED1.00b:devs/keymaps
  32.  
  33. if exists sys:c/Echo
  34.     copy sys:c/Echo        OctaMED1.00b:c/Echo
  35. endif
  36.  
  37. if exists sys:c/EndCLI
  38.     copy sys:c/EndCLI    OctaMED1.00b:c/EndCLI
  39. endif
  40.  
  41. if exists sys:c/EndIf
  42.     copy sys:c/EndIf    OctaMED1.00b:c/EndIf
  43. endif
  44.  
  45. if exists sys:c/FailAt
  46.     copy sys:c/FailAt    OctaMED1.00b:c/FailAt
  47. endif
  48.  
  49. if exists sys:c/IconX
  50.     copy sys:c/IconX    OctaMED1.00b:c/IconX
  51. endif
  52.  
  53. if exists sys:c/If
  54.     copy sys:c/If        OctaMED1.00b:c/If
  55. endif
  56.  
  57. if exists sys:c/LoadWB
  58.     copy sys:c/LoadWB    OctaMED1.00b:c/LoadWB
  59. endif
  60.  
  61. if exists sys:c/MakeDir
  62.     copy sys:c/MakeDir    OctaMED1.00b:c/MakeDir
  63. endif
  64.  
  65. if exists sys:c/Path
  66.     copy sys:c/Path        OctaMED1.00b:c/Path
  67. endif
  68.  
  69. if exists sys:c/Wait
  70.     copy sys:c/Wait        OctaMED1.00b:c/Wait
  71. endif
  72.  
  73.  
  74. if exists sys:devs/parallel.device
  75.     copy sys:devs/parallel.device    OctaMED1.00b:devs/parallel.device
  76. endif
  77.  
  78. if exists sys:devs/printer.device
  79.     copy sys:devs/printer.device    OctaMED1.00b:devs/printer.device
  80. endif
  81.  
  82. if exists sys:devs/ramdrive.device
  83.     copy sys:devs/ramdrive.device    OctaMED1.00b:devs/ramdrive.device
  84. endif
  85.  
  86. if exists sys:devs/keymaps/usa1
  87.     copy sys:devs/keymaps/usa1    OctaMED1.00b:devs/keymaps/usa1
  88. endif
  89.  
  90.  
  91. if exists sys:l/Aux-Handler
  92.     copy sys:l/Aux-Handler    OctaMED1.00b:l/Aux-Handler
  93. endif
  94.  
  95. if exists sys:l/Disk-Validator
  96.     copy sys:l/Disk-Validator    OctaMED1.00b:l/Disk-Validator
  97. endif
  98.  
  99. if exists sys:l/Port-Handler
  100.     copy sys:l/Port-Handler    OctaMED1.00b:l/Port-Handler
  101. endif
  102.  
  103. if exists sys:l/Ram-Handler
  104.     copy sys:l/Ram-Handler    OctaMED1.00b:l/Ram-Handler
  105. endif
  106.  
  107. if exists sys:libs/icon.library
  108.     copy sys:libs/icon.library    OctaMED1.00b:libs/icon.library
  109. endif
  110.  
  111. if exists sys:libs/diskfont.library
  112.     copy sys:libs/diskfont.library    OctaMED1.00b:libs/diskfont.library
  113. endif
  114.  
  115. echo "All Done.  Click close gadget to get rid of window."
  116. endcli
  117.