home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 16 / amigaformatcd16.iso / -coverdisks- / af100a / magicwb2.1p / install < prev    next >
Text File  |  1997-06-16  |  41KB  |  1,105 lines

  1. failat 21
  2.  
  3. if not exists XEN-Icons
  4.   echo "*n Please change current directory to that of MagicWB *n or start the installation from the Workbench!*n"
  5.   quit
  6. endif
  7.  
  8. if exists SYS:Prefs/Patterns
  9.   if exists ENVARC:sys/def_kick.info
  10.     echo "*N*N*N*N*N*n*n You have already installed an older version of MagicWB."
  11.     echo " I would recommend you to UPDATE MagicWB rather than install it for new."
  12.     Echo noline "*n Would you like to UPDATE MagicWB? "
  13.     set > nil: InpVar ?
  14.  
  15.     if $InpVar eq "ja"
  16.       skip update
  17.     endif
  18.  
  19.     if $InpVar eq "j"
  20.       skip update
  21.     endif
  22.  
  23.     if $InpVar eq "y"
  24.       skip update
  25.     endif
  26.  
  27.     if $InpVar eq "yes"
  28.       skip update
  29.     endif
  30.  
  31.   endif
  32.   echo "*e[1;1H*e[J"
  33. endif
  34.  
  35.  
  36. echo "*e[1;32m _________________________________________________________________________"
  37. echo " *e[43m                                                                         *e[0m"
  38. echo " *e[0;32;43m             Welcome to the INSTALLATION of MagicWB v2.1p*e[1m                *e[0m"
  39. echo " *e[1;4;43m                                                                         *e[0m"
  40. echo "*n*n This Installation will automatically install *e[32mMagicWB*e[0m to your SYS:"
  41. echo " directory. Don't be afraid; the only things that will be replaced"
  42. echo " (overwritten) by this installation are the old (and ugly-looking) Icons"
  43. echo " from Commodore. These old Icons will be replaced by far better-looking"
  44. echo " Icons (called XEN-Icons) from this *e[32mMagicWB*e[0m-Package.*n"
  45. echo " MagicWB now DOES PRESERVE your original tooltypes, stack and default"
  46. echo " tool settings! So (for your convenience) your personal modifications"
  47. echo " within the Icons WILL NOT be overwritten by this installation. MagicWB"
  48. echo " just REPLACES the IMAGES of your old Icons with those magic images"
  49. echo " from MagicWB (even your snapshot positions will be preserved).*n"
  50. echo " After all, you do have the old Icons by Commodore on your original"
  51. echo " Installation Disks. Therefore you won't lose anything! So, if you dislike"
  52. echo " the XEN-Icons - what I really cannot believe - then you can still replace"
  53. echo " them with the old ones by reinstalling the Workbench again.*n"
  54. echo noline "   [Return]"
  55. set > nil: Return ?
  56. echo "*e[1;1H*e[J"
  57. echo "*n Second, this installation will install THREE new FONTS to your FONTS-"
  58. echo " Drawer called 'XEN', 'XHelvetica' and 'XCourier'.*n"
  59. echo " Third, your font.prefs in the ENVARC:SYS directory will be changed to use"
  60. echo " the three new installed fonts (you can of course reconfigure these settings"
  61. echo " to fit your own personal taste; NOTHING important will be deleted).*n"
  62. echo " Fourth, your palette.ilbm will be changed to fit the XEN-Icons: You will"
  63. echo " need at least 8 colors. This new palette will NOT change the standard"
  64. echo " colors that you are probably using at the moment. These first four"
  65. echo " standard colors are Gray, Black, White and Blue. So, you will have the"
  66. echo " same standard-looking Workbench with its original colors (again: nothing"
  67. echo " will get lost).*n"
  68. echo noline "   [Return]"
  69. set > nil: Return ?
  70. echo "*e[1;1H*e[J"
  71. echo "*n IMPORTANT: The only thing you have to do is to change SCREENMODE-PREFS to"
  72. echo " a proportional resolution with 8 COLORS (e.g. 640x480 or 800x600 8 Colors)"
  73. echo " after this installation is finished!*n"
  74. echo " Finally, TWO Background-Patterns will be installed in the SYS:Prefs/Patterns"
  75. echo " directory (will be created). By default these patterns are 'Marble_CLASSIC'"
  76. echo " and 'MarbleDark'. After this installation you can manually copy all patterns"
  77. echo " or just your desired ones to this directory and configure them via the"
  78. echo " WBPattern-Prefs (only 3.x users) or the program 'NickPrefs' (for 2.x users;"
  79. echo " to be found in the 'MagicWB/Patterns/NickPrefs' drawer of this package).*n"
  80. echo " That's all! You can now proceed with this installation and in a few minutes"
  81. echo " you will be the lucky user of *e[32mMagicWB*e[0m! This installation will be inter-"
  82. echo " active, which means that you will be asked certain questions in order to"
  83. echo " influence this installation.*n"
  84. echo noline " Start the installation? "
  85.  
  86. set > nil: InpVar ?
  87.  
  88. if $InpVar eq "ja"
  89.   skip Start
  90. endif
  91.  
  92. if $InpVar eq "j"
  93.   skip Start
  94. endif
  95.  
  96. if $InpVar eq "y"
  97.   skip Start
  98. endif
  99.  
  100. if $InpVar eq "yes"
  101.   skip Start
  102. endif
  103.  
  104. echo "*n*e[32m Installation aborted! I hope I see you again..."
  105. quit
  106.  
  107.  
  108. lab Start
  109. run >NIL: AboutMagicWB
  110. echo "*e[1;1H*e[J"
  111. echo " Installation in progress...*n"
  112.  
  113. assign Magic: ""
  114. resident IU Magic:Programs/IconUpdate pure
  115. if warn
  116.   echo "*e[32m Installation aborted due to failure of the 'resident' command!*n This failure might be a bug in the Operating System with the*n 'IconX' command. Try to start the 'Install' script via the shell:"
  117.   echo " Go to the MagicWB directory (with 'cd') and type 'execute install'."
  118.   wait 20
  119.   quit
  120. endif
  121.  
  122.  
  123. echo noline " Installing XEN-Icons to SYS:System..."
  124. C:LIST > ram:MWB SYS:System/#?.info lformat "IU > NIL: tsd XEN-Icons/System/%n SYS:System/%n"
  125. failat 21
  126. execute > NIL: ram:MWB
  127.  
  128. if exists SYS:System/DiskCopy.info
  129.   delete SYS:System/DiskCopy.info  ; Icon was redundant, without function!
  130. endif
  131. if exists SYS:System/CLI.info
  132.   delete SYS:System/CLI.info  ; Icon was redundant.
  133. endif
  134. echo "..............................*e[33mDONE*e[0m"
  135.  
  136.  
  137. echo noline " Installing XEN-Icons to SYS:Utilities..."
  138. C:LIST > ram:MWB SYS:Utilities/#?.info lformat "IU > NIL: tsdc XEN-Icons/Utilities/%n SYS:Utilities/%n"
  139. failat 21
  140. execute > NIL: ram:MWB
  141. echo "...........................*e[33mDONE*e[0m"
  142.  
  143.  
  144. echo noline " Installing XEN-Icons to SYS:Tools..."
  145. C:LIST > ram:MWB SYS:Tools/#?.info lformat "IU > NIL: tsdw XEN-Icons/Tools/%n SYS:Tools/%n"
  146. failat 21
  147. execute > NIL: ram:MWB
  148. echo "...............................*e[33mDONE*e[0m"
  149.  
  150.  
  151. echo noline " Installing XEN-Icons to SYS:Tools/Commodities..."
  152. C:LIST > ram:MWB SYS:Tools/Commodities/#?.info lformat "IU > NIL: tsd XEN-Icons/Tools/Commodities/%n SYS:Tools/Commodities/%n"
  153. failat 21
  154. execute > NIL: ram:MWB
  155. echo "...................*e[33mDONE*e[0m"
  156.  
  157. echo noline " Installing XEN-Icons to SYS:WBStartup..."
  158. C:LIST > ram:MWB SYS:WBStartup/#?.info lformat "IU > NIL: tsdc XEN-Icons/Tools/Commodities/%n SYS:WBStartup/%n"
  159. failat 21
  160. execute > NIL: ram:MWB
  161. IU > NIL: tsdc Programs/Misc/TolleUhr.info SYS:WBStartup/TolleUhr.info
  162. echo "...........................*e[33mDONE*e[0m"
  163.  
  164.  
  165. if exists SYS:Devs/DataTypes
  166.   echo noline " Installing XEN-Icons to SYS:Devs/DataTypes..."
  167.   C:LIST > ram:MWB SYS:Devs/DataTypes/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/DataTypes/def_DataType.info %s%s"
  168.   failat 21
  169.   execute > NIL: ram:MWB
  170.   if exists sys:Storage/DataTypes
  171.     C:LIST > ram:MWB SYS:Storage/DataTypes/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/DataTypes/def_DataType.info %s%s"
  172.     execute > NIL: ram:MWB
  173.   endif
  174.   echo "......................*e[33mDONE*e[0m"
  175. endif
  176.  
  177.  
  178. echo noline " Installing XEN-Icons to SYS:Devs/DOSDrivers..."
  179. C:LIST > ram:MWB SYS:Devs/DOSDrivers/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/DOSDrivers/def_DOSDriver.info %s%s"
  180. failat 21
  181. execute > NIL: ram:MWB
  182. if exists sys:Storage/DOSDrivers
  183.   C:LIST > ram:MWB SYS:Storage/DOSDrivers/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/DOSDrivers/def_DOSDriver.info %s%s"
  184.   execute > NIL: ram:MWB
  185. endif
  186. echo ".....................*e[33mDONE*e[0m"
  187.  
  188.  
  189. echo noline " Installing XEN-Icons to SYS:Devs/Keymaps..."
  190. C:LIST > ram:MWB SYS:Devs/Keymaps/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/Keymaps/def_Keymap.info %s%s"
  191. failat 21
  192. execute > NIL: ram:MWB
  193. if exists sys:Storage/Keymaps
  194.   C:LIST > ram:MWB SYS:Storage/Keymaps/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/Keymaps/def_Keymap.info %s%s"
  195.   execute > NIL: ram:MWB
  196. endif
  197. echo "........................*e[33mDONE*e[0m"
  198.  
  199.  
  200. echo noline " Installing XEN-Icons to SYS:Devs/Monitors..."
  201. C:LIST > ram:MWB SYS:Devs/Monitors/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/Monitors/def_Monitor.info %s%s"
  202. failat 21
  203. execute > NIL: ram:MWB
  204. if exists sys:Storage/Monitors
  205.   C:LIST > ram:MWB SYS:Storage/Monitors/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/Monitors/def_Monitor.info %s%s"
  206.   execute > NIL: ram:MWB
  207. endif
  208. echo ".......................*e[33mDONE*e[0m"
  209.  
  210.  
  211. echo noline " Installing XEN-Icons to SYS:Devs/Printers..."
  212. C:LIST > ram:MWB SYS:Devs/Printers/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/Printers/def_Printer.info %s%s"
  213. failat 21
  214. execute > NIL: ram:MWB
  215. if exists sys:Storage/Printers
  216.   C:LIST > ram:MWB SYS:Storage/Printers/#?.info lformat "IU > NIL: tsdn XEN-Icons/Devs/Printers/def_Printer.info %s%s"
  217.   execute > NIL: ram:MWB
  218. endif
  219. echo ".......................*e[33mDONE*e[0m"
  220.  
  221.  
  222. echo noline " Installing XEN-Icons to SYS:Prefs..."
  223. C:LIST > ram:MWB SYS:Prefs/#?.info lformat "IU > NIL: tsd XEN-Icons/Prefs/%n SYS:Prefs/%n"
  224. failat 21
  225. execute > NIL: ram:MWB
  226. echo "...............................*e[33mDONE*e[0m"
  227.  
  228.  
  229. echo noline " Installing XEN-DEFAULT-Icons to ENVARC:Sys..."
  230. copy > NIL: XEN-Icons/Prefs/Env-Archive/Sys/~(PaletteAGA|palette8bit.ilbm|WBPattern.prefs) TO ENVARC:Sys all
  231. echo "......................*e[33mDONE*e[0m"
  232.  
  233.  
  234. echo noline " Updating old Drawer-Icons in SYS:..."
  235. C:LIST > ram:MWB SYS: dirs all lformat "if exists *"%f%n.info*" *n  C:LIST > ram:Length *"%f%n.info*" nohead nodates *n  search > NIL: ram:Length 1233 *n  if not warn *n  else *n    search > NIL: ram:Length 2625 *n    if not warn *n    else *n      IU > NIL: cwn XEN-Icons/Prefs/Env-Archive/Sys/def_Drawer.info *"%f%n.info*" *n    endif *n  endif *nendif*n"
  236. execute > NIL: ram:MWB
  237.  
  238. if exists SYS:Trashcan.info
  239.   IU > NIL: cw XEN-Icons/Prefs/Env-Archive/Sys/def_trashcan.info SYS:Trashcan.info
  240. endif
  241. echo "...............................*e[33mDONE*e[0m"
  242. delete > NIL: ram:Length
  243.  
  244.  
  245. version > NIL: exec.library 39
  246. if warn
  247.   skip Continue
  248. endif
  249. echo "*n Kickstart 3.x detected:*n"
  250. set > NIL: Kick30 yep
  251. echo noline " Installing Palette.prefs and WBPattern.prefs for Kickstart 3.x..."
  252. delete > NIL: envarc:sys/sysfont.prefs ; file redundant for 3.x
  253. delete > NIL: envarc:sys/wbfont.prefs  ; file redundant for 3.x
  254. copy > NIL: XEN-Icons/Prefs/Env-Archive/Sys/PaletteAGA ENVARC:Sys/Palette.prefs CLONE
  255. copy > NIL: XEN-Icons/Prefs/Env-Archive/Sys/WBPattern.prefs ENVARC:Sys
  256. copy > NIL: XEN-Icons/Prefs/Env-Archive/Sys/palette8bit.ilbm ENVARC:Sys
  257. echo "..*e[33mDONE*e[0m*n"
  258.  
  259. echo noline " Preparing MagicWB for Kickstart 3.x..."
  260. if exists SYS:S/User-Startup
  261.   search > NIL: SYS:S/User-Startup MagicWB-Demon
  262.   if warn
  263.     join Magic:Programs/AllocScript SYS:S/User-Startup TO RAM:User-Startup
  264.     copy > NIL: RAM:User-Startup SYS:S
  265.     delete > NIL: RAM:User-Startup
  266.   endif
  267. else
  268.   copy Magic:Programs/AllocScript TO SYS:S/User-Startup
  269. endif
  270.  
  271. search > NIL: SYS:S/Startup-Sequence MagicWB-Demon
  272. if warn
  273.   C:EDIT SYS:S/Startup-Sequence WITH Magic:Programs/SSScript
  274. endif
  275.  
  276. copy > NIL: magic:Programs/MagicWB-Demon SYS:C
  277. copy > NIL: magic:Programs/ataditm sys:s/mti.data
  278. echo "..*e[33mDONE*e[0m*n"
  279.  
  280.  
  281.  
  282. echo "*e[1;1H*e[J"
  283. echo noline "*n*n Do you have the AGA Chipset (A1200, A4000)? "
  284.  
  285. set > nil: AGA ?
  286. echo "*e[1;1H*e[J"
  287. if $AGA eq "ja"
  288.   skip InstallAGA
  289. endif
  290. if $AGA eq "j"
  291.   skip InstallAGA
  292. endif
  293. if $AGA eq "y"
  294.   skip InstallAGA
  295. endif
  296. if $AGA eq "yes"
  297.   skip InstallAGA
  298. endif
  299. skip Continue
  300.  
  301.  
  302. lab InstallAGA
  303.  
  304. echo "*n MagicWB offers a special goody to all AGA-Users:*n"
  305. echo " If you want, MagicWB will install a very special Background-Picture. This"
  306. echo " Background-Picture will be an IntelOutside-Logo :) with a beautiful, blue"
  307. echo " gradient on your WB (having more than 520 colors)! You can of course change"
  308. echo " the colors of the gradient.*n"
  309. echo " The magic thing about it is, that it will only need 50KB of Chip-Mem! And"
  310. echo " the result is breathtaking. Second, it will need at least a 16-color-"
  311. echo " screenmode.*n"
  312. echo " If you are not sure about this, just try it out! You may always change this"
  313. echo " configuration afterwards if you won't like it (but you will! ;).*n"
  314. echo noline " Do you want to have this special AGA-Background installed? "
  315.  
  316. set > nil: AGAPic ?
  317. echo "*e[1;1H*e[J"
  318. if $AGAPic eq "ja"
  319.   skip DoAGA
  320. endif
  321. if $AGAPic eq "j"
  322.   skip DoAGA
  323. endif
  324. if $AGAPic eq "y"
  325.   skip DoAGA
  326. endif
  327. if $AGAPic eq "yes"
  328.   skip DoAGA
  329. endif
  330. skip Continue
  331.  
  332. lab DoAGA
  333. echo "*e[1;1H*e[J"
  334. echo "*n*n*e[32m I'm sorry! This feature is only available in the REGISTERED version.*e[0m"
  335. wait 4
  336. AboutMagicWB
  337. set > NIL: AGAInstalled nope
  338.  
  339.  
  340. lab Continue
  341.  
  342. echo " Installing XEN-SPECIAL-Icons:"
  343. echo noline "     Installing Preset-Default-Icon to SYS:Prefs/Presets..."
  344. copy > NIL: XEN-Icons/SPECIAL/Misc/Preset.info SYS:Prefs/Presets
  345. echo ".........*e[33mDONE*e[0m"
  346.  
  347.  
  348. echo noline "     Installing RAM-Icon to S:RAM.info......"
  349. if exists SYS:S/RAM.info
  350.   IU > NIL: dcw XEN-Icons/SPECIAL/Devices/RAM.info SYS:S/RAM.info
  351. else
  352.   copy > NIL: XEN-Icons/SPECIAL/Devices/RAM.info SYS:S
  353. endif
  354. if exists SYS:S/User-Startup
  355.   search > NIL: SYS:S/User-Startup SYS:S/RAM.info
  356.   if warn
  357.     join Magic:Programs/RAMScript SYS:S/User-Startup TO RAM:User-Startup
  358.     copy > NIL: RAM:User-Startup SYS:S
  359.     delete > NIL: RAM:User-Startup
  360.   endif
  361. else
  362.   copy > NIL: Magic:Programs/RAMScript TO SYS:S/User-Startup
  363. endif
  364. echo "........................*e[33mDONE*e[0m"
  365.  
  366.  
  367. if exists SYS:Disk.info
  368.   echo noline "*n Installing HardDisk-Icon to SYS:..."
  369.   IU > NIL: dcw XEN-Icons/SPECIAL/Devices/HD.info SYS:Disk.info
  370.   echo "................................*e[33mDONE*e[0m*n"
  371. else
  372.   lab Path
  373.   echo noline "*n Please enter the PATH where the HardDisk-Icon should*n be installed (i.e. 'DH0:'): "
  374.   set > NIL: Path ?
  375.   if > NIL: not exists $Path
  376.     echo " Wrong path, path does not exist! Try again...*n"
  377.     skip back path
  378.   endif
  379.   echo noline " Installing HardDisk-Icon to $Path..."
  380.   cd $Path
  381.   IU > NIL: dcw Magic:XEN-Icons/SPECIAL/Devices/HD.info Disk.info
  382.   cd Magic:
  383.   echo "..*e[33mDONE*e[0m*n"
  384. endif
  385.  
  386.  
  387. lab HardDisk
  388.  
  389. echo noline " Do you want to have the HardDisk-Icon installed to other partitions? "
  390. set > nil: HardDisk ?
  391. echo "*e[1;1H*e[J"
  392. if $HardDisk eq "ja"
  393.   skip InstallHardDisk
  394. endif
  395. if $HardDisk eq "j"
  396.   skip InstallHardDisk
  397. endif
  398. if $HardDisk eq "y"
  399.   skip InstallHardDisk
  400. endif
  401. if $HardDisk eq "yes"
  402.   skip InstallHardDisk
  403. endif
  404. skip Continue
  405.  
  406. lab InstallHardDisk
  407. echo noline "*N Please enter the NAME of the desired partition (i.e. 'DH1:'): "
  408. set > nil: Device [Return]
  409. set > nil: Device ?
  410. if not exists $Device
  411.   echo " Wrong device, $Device does not exist! Try again..."
  412.   skip back InstallHardDisk
  413. endif
  414. echo noline "*n Installing HardDisk-Icon to $Device..."
  415. cd $Device
  416. if exists Disk.info
  417.   IU > NIL: dcw Magic:XEN-Icons/SPECIAL/Devices/HD.info Disk.info
  418. else
  419.   copy > NIL: Magic:XEN-Icons/SPECIAL/Devices/HD.info Disk.info
  420. endif
  421. cd Magic:
  422. echo "................................*e[33mDONE*e[0m*n"
  423. skip back HardDisk
  424.  
  425.  
  426. lab Continue
  427.  
  428.  
  429. echo "*e[1;1H*e[J"
  430. Echo noline "*n Installing new Image-Drawer-Icons..."
  431.  
  432. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DataTypes.info SYS:Devs/DataTypes.info
  433. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DataTypes.info SYS:storage/DataTypes.info
  434. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DOSDrivers.info SYS:Devs/DOSDrivers.info
  435. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DOSDrivers.info SYS:storage/DOSDrivers.info
  436. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Keymaps.info SYS:Devs/Keymaps.info
  437. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Keymaps.info SYS:storage/Keymaps.info
  438. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Monitors.info SYS:Devs/Monitors.info
  439. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Monitors.info SYS:storage/Monitors.info
  440. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Printers.info SYS:Devs/Printers.info
  441. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Printers.info SYS:storage/Printers.info
  442.  
  443. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Presets.info SYS:Prefs/Presets.info
  444. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Commodities.info SYS:Tools/Commodities.info
  445.  
  446. IU > NIL: cw XEN-Icons/Prefs.info SYS:Prefs.info
  447. IU > NIL: cw XEN-Icons/Special/ImageDrawers/System.info SYS:System.info
  448. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Tools.info SYS:Tools.info
  449. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Utilities.info SYS:Utilities.info
  450. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Devs.info SYS:Devs.info
  451. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Storage.info SYS:Storage.info
  452. IU > NIL: cw XEN-Icons/Special/ImageDrawers/WBStartup.info SYS:WBStartup.info
  453. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Expansion.info SYS:Expansion.info
  454.  
  455. echo "..................*e[33mDONE*e[0m"
  456.  
  457.  
  458. echo noline "*n Installing MagicWB-Fonts to FONTS:..."
  459. copy > NIL: Fonts/#? TO FONTS: all
  460. echo ".................*e[33mDONE*e[0m"
  461.  
  462.  
  463. if not exists SYS:Prefs/Patterns
  464.   makedir SYS:Prefs/Patterns
  465. endif
  466. version >NIL: exec.library 39
  467. if warn
  468.   echo noline "*N*n*n Installing ONE PATTERN to SYS:Prefs/Patterns*n (drawer will be created)..."
  469.   copy > NIL: Patterns/Marble_CLASSIC TO SYS:Prefs/Patterns
  470. else
  471.   echo noline "*N*n*n Installing TWO PATTERNS to SYS:Prefs/Patterns*n (drawer will be created)..."
  472.   SYS:Prefs/WBPattern FROM Magic:Programs/WBPattern.pre USE
  473.   copy > NIL: Patterns/Marble_CLASSIC TO SYS:Prefs/Patterns
  474.   copy > NIL: Patterns/MarbleDark TO SYS:Prefs/Patterns
  475. endif
  476. echo "..*e[33mDONE*e[0m"
  477.  
  478. wait 5
  479.  
  480. echo "*e[1;1H*e[J"
  481. echo "*n*n Dock-Images are used to easily launch applications by just clicking on the"
  482. echo " icon in the dock bar. Dock bars with MagicWB icons look very impressive"
  483. echo " and professional. If you don't know what dock bars are, take a look at the"
  484. echo " bottom of the MagicWB 'Preview' picture.*n*n"
  485. echo " Do you want to install the MagicWB-Dock-Images to SYS:Prefs/MagicWB-Images?"
  486. echo " The assign 'MagicWB:' for this directory will be added to 'S:User-Startup'"
  487. echo " so that you only need to append the supplied MagicWB-Docks ToolManager-"
  488. echo " configuration to your own ToolManager-config to enjoy the MagicWB-Docks."
  489. echo noline "*n Would you like to have them installed? "
  490. set > nil: docks ?
  491. if $docks eq "ja"
  492.   skip Installdocks
  493. endif
  494. if $docks eq "j"
  495.   skip Installdocks
  496. endif
  497. if $docks eq "y"
  498.   skip Installdocks
  499. endif
  500. if $docks eq "yes"
  501.   skip Installdocks
  502. endif
  503. skip Continue
  504.  
  505. lab InstallDocks
  506.  
  507. echo "*e[1;1H*e[J"
  508. echo "*n*n*e[32m I'm sorry! This feature is only available in the REGISTERED version.*e[0m"
  509. wait 4
  510. AboutMagicWB
  511. lab continue
  512. makedir > NIL: sys:prefs/MagicWB-Images
  513. if exists SYS:S/User-Startup
  514.   search > NIL: SYS:S/User-Startup "assign >NIL: MagicWB:"
  515.   if warn
  516.     echo >>sys:s/user-startup "assign >NIL: MagicWB: SYS:Prefs/MagicWB-Images"
  517.     echo ".................*e[33mDONE*e[0m"
  518.   endif
  519. else
  520.   echo >sys:s/user-startup "assign >NIL: MagicWB: SYS:Prefs/MagicWB-Images"
  521.   echo "................*e[33mDONE*e[0m"
  522. endif
  523. copy >NIL: AboutMagicWB SYS:WBStartup
  524. copy >NIL: XEN-Icons/SPECIAL/Misc/AboutMagicWB.info SYS:WBStartup
  525. copy >NIL: Registration SYS:Prefs/MagicWB-Images CLONE
  526.  
  527. Echo "*n*N*n*n*n The installation of the UNREGISTERED version is now successfully finished."
  528. echo > ENVARC:MagicWB "2.0"
  529. echo "*n*n     [Return]"
  530. set > nil: Return ?
  531. echo "*e[1;1H*e[J"
  532. echo "*n Finally some important information:*n"
  533. echo "*n There are some things you immediately have to do after this installation"
  534. echo " is finished."
  535. echo "*n- You have to change the SCREENMODE-Preferences to a proportional resolution"
  536. echo "  with at least 8 COLORS! Proportional resolutions are for example: 640x480,"
  537. echo "  640x512, 800x600, 1024x768, 1280x1024 etc. But NOT a resolution like"
  538. echo "  640x256 (=MedRes Pal) or similar resolutions where the horizontal pixels"
  539. echo "  are nearly twice as much than the vertical amount of pixels. With these"
  540. echo "  'non-square-pixel' resolutions the Icons and Fonts are being distorted."
  541. echo "  So you have to use a proportional resolution to enjoy *e[32mMagicWB*e[0m as the"
  542. echo "  author has planned it to be!"
  543.  
  544. if $AGAInstalled eq "yep"
  545.   echo noline "*n     [Return]"
  546.   set > nil: Return ?
  547.   skip continue
  548. endif
  549.  
  550. echo "*n  And you MUST select at least an 8 COLOR Workbench!"
  551. echo "*e[J*n*e[32m  Now, by pressing RETURN, the ScreenMode-Prefs will appear. Please select"
  552. echo "  a square-pixel-screenmode with 8 colors and click 'SAVE'...*e[0m"
  553. echo "  (if a system requester asks you to close all windows, just move the"
  554. echo "  requester aside and wait until this installation is finished, then"
  555. echo "  it will disappear)"
  556. echo noline "*n     [Return]"
  557. set > nil: Return ?
  558. SYS:Prefs/Screenmode
  559.  
  560. lab continue
  561.  
  562. echo "*e[1;1H*e[J*n*n- Second, you can find the patterns 'Marble_CLASSIC' and 'MarbleDark'"
  563. echo "  in the SYS:Prefs/Patterns directory. These are the only patterns that have"
  564. echo "  been installed to save diskspace. There are plenty of other patterns in"
  565. echo "  the MagicWB/Patterns directory (over 50 patterns!) that you can copy"
  566. echo "  to SYS:Prefs/Patterns if required.*n"
  567.  
  568. if $Kick30 eq "yep"
  569.   skip continue
  570. endif
  571.  
  572. echo "  If you are user of the OS2.0 or OS2.1 you will have to install the program"
  573. echo "  NickPrefs to use the Patterns of *e[32mMagicWB*e[0m. Please consult the documentation.*n"
  574.  
  575. lab continue
  576.  
  577. echo "- Programmers should take a look into the MagicWB/XEN-Icons/SPECIAL drawer!"
  578. echo "  Here you can find Icons for your programs that have logically not been"
  579. echo "  installed with this installation: AmigaGuide, ReadMe, templates,"
  580. echo "  device icons, over 50 Image-Drawers etc.*n"
  581. echo "- And everybody MUST take a look into the XEN-Icons/Dock-Brushes drawer!"
  582. echo "  (The files in this drawer have NOT been installed to your system)"
  583. echo "  Here you will find all the general purpose Images you will need in"
  584. echo "  conjunction with ToolManager (or any other similar program) and MagicWB"
  585. echo "  to get a really magic Workbench feeling!  ;)"
  586. echo "*n*n     [Return]"
  587. set > nil: Return ?
  588. echo "*e[1;1H*e[J"
  589. echo "*n*N*n Please support the author of *e[32mMagicWB*e[0m with your registration, making"
  590. echo " future versions of *e[32mMagicWB*e[0m possible. Always remember:"
  591. echo "*n*n*e[1;32m          ______________________________________________________"
  592. echo "                                                                 "
  593. echo "            A PRODUCT WORTH USING IS ALSO WORTH BEING SUPPORTED  "
  594. echo "           *e[1;31m_____________________________________________________ "
  595. echo "*n*N                 MagicWB © 1992-97 by Martin Huttenloher"
  596. echo "*n                        - Released as SHAREWARE -*n*n"
  597. echo "*n         Visit the official MagicWB homepage at: *e[32mhttp://www.sasg.com/*e[0m"
  598. echo "*n*n    [Return]"
  599. set > nil: Return ?
  600. echo "*e[1;1H*e[J"
  601. echo "*n*n*n Now have much fun with *e[32mMagicWB*e[0m...*n*n To enjoy MagicWB immediately you have to reset your AMIGA first,*n so that all configurations will be set properly!*n*n Bye, bye...*n*N"
  602. echo "*e[32m Do not forget to read the 'About MagicWB 2.0' text in the 'Documents' directory!*e[0m"
  603. echo "*n*n     [Return]"
  604. set > nil: Return ?
  605.  
  606. resident > NIL: IU remove
  607. assign > NIL: Magic: remove
  608. delete > NIL: ram:MWB
  609. run >NIL: AboutMagicWB
  610. quit
  611.  
  612. ;##################################################################################################
  613. ;##################################################################################################
  614.  
  615. lab update
  616. echo "*e[1;1H*e[J"
  617.  
  618. echo "*e[1;32m ______________________________________________________________________"
  619. echo " *e[43m                                                                      *e[0m"
  620. echo " *e[0;32;43m              Welcome to MagicWB v2.1p: UPDATE MAGICWB*e[1m                *e[0m"
  621. echo " *e[1;4;43m                                                                      *e[0m"
  622. echo "*n*n This update will provide you with the most comfortable way of updating"
  623. echo " all other MagicWB versions prior to version 2.0 of MagicWB."
  624. echo "*n This installation should only be done if you have already installed a"
  625. echo " previous version (1.0, 1.2p or 1.5) of MagicWB."
  626. echo "*n To get to know about all the changes between version 2.0 and an older"
  627. echo " version, please read the CHANGES chapter in the MagicWB.guide."
  628. echo "*n*n*e[32m Please consider that this is version 2.1p, a reduced version of 2.0.*e[0m"
  629. echo "*e[32m Do NOT update if you are already registered for MagicWB 2.0!*e[0m"
  630.  
  631. echo noline "*n*n Start the UPDATE? "
  632.  
  633. set > nil: InpVar ?
  634.  
  635. if $InpVar eq "ja"
  636.   skip Start
  637. endif
  638.  
  639. if $InpVar eq "j"
  640.   skip Start
  641. endif
  642.  
  643. if $InpVar eq "y"
  644.   skip Start
  645. endif
  646.  
  647. if $InpVar eq "yes"
  648.   skip Start
  649. endif
  650.  
  651. echo noline "*n*e[32m Update aborted."
  652. quit
  653.  
  654. lab Start
  655. assign Magic: ""
  656. resident IU Magic:Programs/IconUpdate pure
  657. if warn
  658.   echo "*e[32m Update aborted due to failure of the 'resident' command!*n This failure might be a bug in the Operating System with the*n 'IconX' command. Try to start the 'Install' script via the shell:"
  659.   echo " Go to the MagicWB directory (with 'cd') and type 'execute install'."
  660.   wait 15
  661.   quit
  662. endif
  663.  
  664. run >NIL: AboutMagicWB
  665. echo "*e[1;1H*e[J"
  666. echo " Update in progress...*n"
  667.  
  668. echo noline " Updating XEN-Icons in SYS:System..."
  669. C:LIST > ram:MWB SYS:System/#?.info lformat "IU > NIL: tsdc Magic:XEN-Icons/System/%n SYS:System/%n"
  670. failat 21
  671. execute > NIL: ram:MWB
  672.  
  673. if exists SYS:System/DiskCopy.info
  674.   delete SYS:System/DiskCopy.info  ; Icon was redundant, without function!
  675. endif
  676. if exists SYS:System/CLI.info
  677.   delete SYS:System/CLI.info  ; Icon was redundant.
  678. endif
  679. echo "..............................*e[33mDONE*e[0m"
  680.  
  681.  
  682. echo noline " Updating XEN-Icons in SYS:Utilities..."
  683. C:LIST > ram:MWB SYS:Utilities/#?.info lformat "IU > NIL: tsdc Magic:XEN-Icons/Utilities/%n SYS:Utilities/%n"
  684. failat 21
  685. execute > NIL: ram:MWB
  686. echo "...........................*e[33mDONE*e[0m"
  687.  
  688.  
  689. echo noline " Updating XEN-Icons in SYS:Tools..."
  690. C:LIST > ram:MWB SYS:Tools/#?.info lformat "IU > NIL: tsdcw Magic:XEN-Icons/Tools/%n SYS:Tools/%n"
  691. failat 21
  692. execute > NIL: ram:MWB
  693. echo "...............................*e[33mDONE*e[0m"
  694.  
  695.  
  696. echo noline " Updating XEN-Icons in SYS:Tools/Commodities..."
  697. C:LIST > ram:MWB SYS:Tools/Commodities/#?.info lformat "IU > NIL: tsdc Magic:XEN-Icons/Tools/Commodities/%n SYS:Tools/Commodities/%n"
  698. failat 21
  699. execute > NIL: ram:MWB
  700. echo "...................*e[33mDONE*e[0m"
  701.  
  702. echo noline " Updating XEN-Icons in SYS:WBStartup..."
  703. C:LIST > ram:MWB SYS:WBStartup/#?.info lformat "IU > NIL: tsdcw Magic:XEN-Icons/Tools/Commodities/%n SYS:WBStartup/%n"
  704. failat 21
  705. execute > NIL: ram:MWB
  706. IU > NIL: tsdc Programs/Misc/TolleUhr.info SYS:WBStartup/TolleUhr.info
  707. echo "...........................*e[33mDONE*e[0m"
  708.  
  709.  
  710. if exists SYS:Devs/DataTypes
  711.   echo noline " Updating XEN-Icons in SYS:Devs/DataTypes..."
  712.   C:LIST > ram:MWB SYS:Devs/DataTypes/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/DataTypes/def_DataType.info *"%s%s*""
  713.   failat 21
  714.   execute > NIL: ram:MWB
  715.   if exists sys:Storage/DataTypes
  716.     C:LIST > ram:MWB SYS:Storage/DataTypes/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/DataTypes/def_DataType.info *"%s%s*""
  717.     execute > NIL: ram:MWB
  718.   endif
  719.   echo "......................*e[33mDONE*e[0m"
  720. endif
  721.  
  722.  
  723. echo noline " Updating XEN-Icons in SYS:Devs/DOSDrivers..."
  724. C:LIST > ram:MWB SYS:Devs/DOSDrivers/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/DOSDrivers/def_DOSDriver.info %s%s"
  725. failat 21
  726. execute > NIL: ram:MWB
  727. if exists sys:Storage/DOSDrivers
  728.   C:LIST > ram:MWB SYS:Storage/DOSDrivers/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/DOSDrivers/def_DOSDriver.info %s%s"
  729.   execute > NIL: ram:MWB
  730. endif
  731. echo ".....................*e[33mDONE*e[0m"
  732.  
  733.  
  734. echo noline " Updating XEN-Icons in SYS:Devs/Keymaps..."
  735. C:LIST > ram:MWB SYS:Devs/Keymaps/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/Keymaps/def_Keymap.info %s%s"
  736. failat 21
  737. execute > NIL: ram:MWB
  738. if exists sys:Storage/Keymaps
  739.   C:LIST > ram:MWB SYS:Storage/Keymaps/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/Keymaps/def_Keymap.info %s%s"
  740.   execute > NIL: ram:MWB
  741. endif
  742. echo "........................*e[33mDONE*e[0m"
  743.  
  744.  
  745. echo noline " Updating XEN-Icons in SYS:Devs/Monitors..."
  746. C:LIST > ram:MWB SYS:Devs/Monitors/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/Monitors/def_Monitor.info %s%s"
  747. failat 21
  748. execute > NIL: ram:MWB
  749. if exists sys:Storage/Monitors
  750.   C:LIST > ram:MWB SYS:Storage/Monitors/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/Monitors/def_Monitor.info %s%s"
  751.   execute > NIL: ram:MWB
  752. endif
  753. echo ".......................*e[33mDONE*e[0m"
  754.  
  755.  
  756. echo noline " Updating XEN-Icons in SYS:Devs/Printers..."
  757. C:LIST > ram:MWB SYS:Devs/Printers/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/Printers/def_Printer.info %s%s"
  758. failat 21
  759. execute > NIL: ram:MWB
  760. if exists sys:Storage/Printers
  761.   C:LIST > ram:MWB SYS:Storage/Printers/#?.info lformat "IU > NIL: tsdcn Magic:XEN-Icons/Devs/Printers/def_Printer.info %s%s"
  762.   execute > NIL: ram:MWB
  763. endif
  764. echo ".......................*e[33mDONE*e[0m"
  765.  
  766.  
  767. echo noline " Updating XEN-Icons in SYS:Prefs..."
  768. C:LIST > ram:MWB SYS:Prefs/#?.info lformat "IU > NIL: tsdc Magic:XEN-Icons/Prefs/%n SYS:Prefs/%n"
  769. failat 21
  770. execute > NIL: ram:MWB
  771. echo "...............................*e[33mDONE*e[0m"
  772.  
  773.  
  774. echo noline " Updating XEN-DEFAULT-Icons in ENVARC:Sys..."
  775. copy > NIL: Magic:XEN-Icons/Prefs/Env-Archive/Sys/~(PaletteAGA|palette8bit.ilbm|WBPattern.prefs|font.prefs|sysfont.prefs|wbfont.prefs) TO ENVARC:Sys all
  776. echo "......................*e[33mDONE*e[0m"
  777.  
  778.  
  779. echo " Updating XEN-SPECIAL-Icons:*n"
  780. echo noline "     Updating Preset-Default-Icon in SYS:Prefs/Presets..."
  781. copy > NIL: Magic:XEN-Icons/SPECIAL/Misc/Preset.info SYS:Prefs/Presets
  782. echo ".........*e[33mDONE*e[0m"
  783.  
  784.  
  785. echo noline "     Updating RAM-Icon in S:RAM.info......"
  786. if exists SYS:S/RAM.info
  787.   IU > NIL: dcw Magic:XEN-Icons/SPECIAL/Devices/RAM.info SYS:S/RAM.info
  788. else
  789.   copy > NIL: Magic:XEN-Icons/SPECIAL/Devices/RAM.info SYS:S
  790. endif
  791. if exists SYS:S/User-Startup
  792.   search > NIL: SYS:S/User-Startup SYS:S/RAM.info
  793.   if warn
  794.     join Magic:Programs/RAMScript SYS:S/User-Startup TO RAM:User-Startup
  795.     copy > NIL: RAM:User-Startup SYS:S
  796.     delete > NIL: RAM:User-Startup
  797.   endif
  798. else
  799.   copy > NIL: Magic:Programs/RAMScript TO SYS:S/User-Startup
  800. endif
  801. echo "........................*e[33mDONE*e[0m"
  802.  
  803.  
  804. if exists SYS:Disk.info
  805.   echo noline "*n Updating HardDisk-Icon in SYS:..."
  806.   IU > NIL: dcw Magic:XEN-Icons/SPECIAL/Devices/HD.info SYS:Disk.info
  807.   echo "................................*e[33mDONE*e[0m*n"
  808. else
  809.   lab Path
  810.   echo noline "*n Please enter the PATH where the HardDisk-Icon is located (i.e. 'DH0:'): "
  811.   set > NIL: Path ?
  812.   if > NIL: not exists $Path
  813.     echo " Wrong path, path does not exist! Try again...*n"
  814.     skip back path
  815.   endif
  816.   echo noline " Updating HardDisk-Icon in $Path..."
  817.   cd $Path
  818.   IU > NIL: dcw Magic:XEN-Icons/SPECIAL/Devices/HD.info Disk.info
  819.   cd Magic:
  820.   echo "..*e[33mDONE*e[0m*n"
  821. endif
  822.  
  823.  
  824. lab HardDisk
  825.  
  826. echo noline " Do you have the HardDisk-Icon on other partitions? "
  827. set > nil: HardDisk ?
  828. echo "*e[1;1H*e[J"
  829. if $HardDisk eq "ja"
  830.   skip InstallHardDisk
  831. endif
  832. if $HardDisk eq "j"
  833.   skip InstallHardDisk
  834. endif
  835. if $HardDisk eq "y"
  836.   skip InstallHardDisk
  837. endif
  838. if $HardDisk eq "yes"
  839.   skip InstallHardDisk
  840. endif
  841. skip Continue
  842.  
  843. lab InstallHardDisk
  844. echo noline "*N Please enter the NAME of the desired partition (i.e. 'DH1:'): "
  845. set > nil: Device [Return]
  846. set > nil: Device ?
  847. if not exists $Device
  848.   echo " Wrong device, $Device does not exist! Try again..."
  849.   skip back InstallHardDisk
  850. endif
  851. echo noline "*n Updating HardDisk-Icon in $Device..."
  852. cd $Device
  853. if exists Disk.info
  854.   IU > NIL: dcw Magic:XEN-Icons/SPECIAL/Devices/HD.info Disk.info
  855. else
  856.   copy > NIL: Magic:XEN-Icons/SPECIAL/Devices/HD.info Disk.info
  857. endif
  858. cd Magic:
  859. echo "............................*e[33mDONE*e[0m*n"
  860. skip back HardDisk
  861.  
  862.  
  863. lab Continue
  864.  
  865. echo "*e[1;1H*e[J"
  866.  
  867. Echo noline "*n Installing new Image-Drawer-Icons..."
  868.  
  869. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DataTypes.info SYS:Devs/DataTypes.info
  870. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DataTypes.info SYS:storage/DataTypes.info
  871. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DOSDrivers.info SYS:Devs/DOSDrivers.info
  872. IU > NIL: cw XEN-Icons/Special/ImageDrawers/DOSDrivers.info SYS:storage/DOSDrivers.info
  873. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Keymaps.info SYS:Devs/Keymaps.info
  874. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Keymaps.info SYS:storage/Keymaps.info
  875. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Monitors.info SYS:Devs/Monitors.info
  876. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Monitors.info SYS:storage/Monitors.info
  877. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Printers.info SYS:Devs/Printers.info
  878. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Printers.info SYS:storage/Printers.info
  879.  
  880. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Presets.info SYS:Prefs/Presets.info
  881. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Commodities.info SYS:Tools/Commodities.info
  882.  
  883. IU > NIL: cw XEN-Icons/Prefs.info SYS:Prefs.info
  884. IU > NIL: cw XEN-Icons/Special/ImageDrawers/System.info SYS:System.info
  885. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Tools.info SYS:Tools.info
  886. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Utilities.info SYS:Utilities.info
  887. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Devs.info SYS:Devs.info
  888. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Storage.info SYS:Storage.info
  889. IU > NIL: cw XEN-Icons/Special/ImageDrawers/WBStartup.info SYS:WBStartup.info
  890. IU > NIL: cw XEN-Icons/Special/ImageDrawers/Expansion.info SYS:Expansion.info
  891.  
  892. echo "...............................*e[33mDONE*e[0m"
  893.  
  894.  
  895. echo noline "*n Updating old Drawer-Icons in SYS:..."
  896. C:LIST > ram:MWB SYS: dirs all lformat "if exists *"%f%n.info*" *n  C:LIST > ram:Length *"%f%n.info*" nohead nodates *n  search > NIL: ram:Length 1233 *n  if not warn *n  else *n    search > NIL: ram:Length 2625 *n    if not warn *n    else *n      IU > NIL: cwn XEN-Icons/Prefs/Env-Archive/Sys/def_Drawer.info *"%f%n.info*" *n    endif *n  endif *nendif*n"
  897. execute > NIL: ram:MWB
  898. if exists SYS:Trashcan.info
  899.   IU > NIL: cw Magic:XEN-Icons/Prefs/Env-Archive/Sys/def_trashcan.info SYS:Trashcan.info
  900. endif
  901. echo "...............................*e[33mDONE*e[0m"
  902. delete > NIL: ram:Length
  903.  
  904.  
  905. echo noline "*n Updating MagicWB-Fonts in FONTS:..."
  906. copy > NIL: Magic:Fonts/#? TO FONTS: all
  907. echo "................................*e[33mDONE*e[0m"
  908.  
  909. echo noline "*n Updating old patterns in SYS:Prefs/Patterns to the new format..."
  910. version >NIL: exec.library 39
  911. if warn
  912.   copy > NIL: Patterns/Marble_CLASSIC TO SYS:Prefs/Patterns
  913. else
  914.   SYS:Prefs/WBPattern FROM Magic:Programs/WBPattern.pre USE
  915.   C:LIST > ram:MWB SYS:Prefs/Patterns/#? files lformat "copy > NIL: Magic:Patterns/%n SYS:Prefs/Patterns/%n"
  916.   execute > NIL: ram:MWB
  917.   delete > NIL: SYS:Prefs/Patterns/NickPrefs.info
  918.   wait 2
  919.   SYS:Prefs/WBPattern FROM envarc:sys/WBPattern.prefs USE
  920. endif
  921. echo "...*e[33mDONE*e[0m"
  922. echo "*n*n*e[32m ATTENTION:*e[0m  With  MagicWB 2.0  the  patterns  have another color format."
  923. echo " Please  delete  all older MagicWB patterns in any other directories and"
  924. echo " use the new ones in SYS:Prefs/Patterns and MagicWB/Patterns."
  925. wait 10
  926.  
  927. ;------------------------ OS3.x, AGA section, START ---------------------------
  928. version > NIL: exec.library 39
  929. if warn
  930.   skip Continue
  931. endif
  932. echo "*n*n*n Kickstart 3.x detected:*n"
  933.  
  934.  
  935. echo noline " Updating MagicWB for Kickstart 3.x..."
  936. if exists SYS:S/User-Startup
  937.   search > NIL: SYS:S/User-Startup MagicWB-Demon
  938.   if warn
  939.     join Magic:Programs/AllocScript SYS:S/User-Startup TO RAM:User-Startup
  940.     copy > NIL: RAM:User-Startup SYS:S
  941.     delete > NIL: RAM:User-Startup
  942.   endif
  943. else
  944.   copy Magic:Programs/AllocScript TO SYS:S/User-Startup
  945. endif
  946.  
  947. search > NIL: SYS:S/Startup-Sequence MagicWB-Demon
  948. if warn
  949.   C:EDIT SYS:S/Startup-Sequence WITH Magic:Programs/SSScript
  950. endif
  951.  
  952. copy > NIL: magic:Programs/MagicWB-Demon SYS:C
  953. copy > NIL: magic:Programs/ataditm sys:s/mti.data
  954. C:LIST > RAM:PaletteCheck envarc:sys/palette.prefs
  955. search > NIL: RAM:PaletteCheck AGA
  956. if warn
  957.   copy > NIL: magic:XEN-Icons/Prefs/Env-Archive/Sys/PaletteAGA ENVARC:Sys/Palette.prefs CLONE
  958. endif
  959. delete > NIL: RAM:PaletteCheck
  960. copy > NIL: magic:XEN-Icons/Prefs/Env-Archive/Sys/palette8bit.ilbm ENVARC:Sys
  961. echo "..............................*e[33mDONE*e[0m*n"
  962.  
  963.  
  964. echo noline " Do you have the AGA Chipset (A1200, A4000)? "
  965.  
  966. set > nil: AGA ?
  967. echo "*e[1;1H*e[J"
  968. if $AGA eq "ja"
  969.   skip InstallAGA
  970. endif
  971. if $AGA eq "j"
  972.   skip InstallAGA
  973. endif
  974. if $AGA eq "y"
  975.   skip InstallAGA
  976. endif
  977. if $AGA eq "yes"
  978.   skip InstallAGA
  979. endif
  980. skip Continue
  981.  
  982.  
  983. lab InstallAGA
  984.  
  985. echo "*n MagicWB offers a special goody to all AGA-Users:*n"
  986. echo " If you want, MagicWB will install a very special Background-Picture. This"
  987. echo " Background-Picture will be an IntelOutside-Logo :) with a beautiful, blue"
  988. echo " gradient on your WB (having more than 520 colors)! You can of course change"
  989. echo " the colors of the gradient.*n"
  990. echo " The magic thing about it is, that it will only need 50KB of Chip-Mem! And"
  991. echo " the result is breathtaking. Second, it will need at least a 16-color-"
  992. echo " screenmode.*n"
  993. echo " If you are not sure about this, just try it out! You may always change this"
  994. echo " configuration afterwards if you won't like it (but you will! ;).*n"
  995. echo noline " Do you want to have this special AGA-Background installed? "
  996.  
  997. set > nil: AGAPic ?
  998. echo "*e[1;1H*e[J"
  999. if $AGAPic eq "ja"
  1000.   skip DoAGA
  1001. endif
  1002. if $AGAPic eq "j"
  1003.   skip DoAGA
  1004. endif
  1005. if $AGAPic eq "y"
  1006.   skip DoAGA
  1007. endif
  1008. if $AGAPic eq "yes"
  1009.   skip DoAGA
  1010. endif
  1011. skip Continue
  1012.  
  1013. lab DoAGA
  1014. echo "*e[1;1H*e[J"
  1015. echo "*n*n*e[32m I'm sorry! This feature is only available in the REGISTERED version.*e[0m"
  1016. wait 5
  1017. AboutMagicWB
  1018. ;------------------------ OS3.x, AGA section, END ---------------------------
  1019.  
  1020.  
  1021. lab Continue
  1022. echo "*e[1;1H*e[J"
  1023. echo "*n*n Dock-Images are used to easily launch applications by just clicking on the"
  1024. echo " icon in the dock bar. Dock bars with MagicWB icons look very impressive"
  1025. echo " and professional. If you don't know what dock bars are, take a look at the"
  1026. echo " bottom of the MagicWB 'Preview' picture.*n*n"
  1027. echo " Do you want to install the MagicWB-Dock-Images to SYS:Prefs/MagicWB-Images?"
  1028. echo " The assign 'MagicWB:' for this directory will be added to 'S:User-Startup'"
  1029. echo " so that you will only need to append the supplied MagicWB-Docks ToolManager-"
  1030. echo " configuration to your own ToolManager-config to enjoy the MagicWB-Docks."
  1031. echo noline "*n Would you like to have them installed? "
  1032. set > nil: docks ?
  1033. if $docks eq "ja"
  1034.   skip Installdocks
  1035. endif
  1036. if $docks eq "j"
  1037.   skip Installdocks
  1038. endif
  1039. if $docks eq "y"
  1040.   skip Installdocks
  1041. endif
  1042. if $docks eq "yes"
  1043.   skip Installdocks
  1044. endif
  1045. skip Continue
  1046.  
  1047. lab InstallDocks
  1048. echo "*e[1;1H*e[J"
  1049. echo "*n*n*e[32m I'm sorry! This feature is only available in the REGISTERED version.*e[0m"
  1050. wait 4
  1051. AboutMagicWB
  1052. lab continue
  1053. makedir > NIL: sys:prefs/MagicWB-Images
  1054. if exists SYS:S/User-Startup
  1055.   search > NIL: SYS:S/User-Startup "assign >NIL: MagicWB:"
  1056.   if warn
  1057.     echo >>sys:s/user-startup "assign >NIL: MagicWB: SYS:Prefs/MagicWB-Images"
  1058.     echo ".................*e[33mDONE*e[0m"
  1059.   endif
  1060. else
  1061.   echo >sys:s/user-startup "assign >NIL: MagicWB: SYS:Prefs/MagicWB-Images"
  1062.   echo "................*e[33mDONE*e[0m"
  1063. endif
  1064. copy >NIL: AboutMagicWB SYS:WBStartup
  1065. copy >NIL: XEN-Icons/SPECIAL/Misc/AboutMagicWB.info SYS:WBStartup
  1066. copy >NIL: Registration SYS:Prefs/MagicWB-Images CLONE
  1067.  
  1068. echo "*e[1;1H*e[J"
  1069. echo "*n*e[32m The update to the UNREGISTERED version 2.1p is now finished.*e[0m*n"
  1070. echo > ENVARC:MagicWB "2.0"
  1071. echo " In short the new features of MagicWB:*e[32m*n"
  1072. echo "   - MagicWB is now 2-3 times faster than any previous version"
  1073. echo "   - It needs over 67% less Chip-Mem compared to previous versions"
  1074. echo "   - New color allocation system provides a better color management"
  1075. echo "     for icons and patterns. There should be no color problems anymore"
  1076. echo "   - Higly improved palette especially for AGA- and graphics board users"
  1077. echo "   - Patterns now work under any Kickstart and are displayed much faster"
  1078. echo "   - New standard for drawers introducing content-specific image-drawers"
  1079. echo "     and a pool of over 50 different image-drawers for personal use"
  1080. echo "   - New XEN/11 font for higher resolutions (this time it is complete)"
  1081. echo "   - Many new beautiful patterns and a special AGA-support for a smashing"
  1082. echo "     IntelOutside-FullScreen-Pattern with more than 520 colors on-screen"
  1083. echo "   - More icons, default icons and dock-brushes"
  1084. echo "   - Overall improvement and rework of all MWB-Icons (Prefs, Devices...)"
  1085. echo "   - Support-Programs have been improved a lot (-> IconUpdate...)*e[0m"
  1086. echo " Please read the CHANGES chapter in the MagicWB.guide for detailed info.*n"
  1087. echo " *e[32m NOTE: Many of the new features are only available in the REGISTERED version!*e[0m"
  1088. echo "*n       Visit the official MagicWB homepage at: *e[32mhttp://www.sasg.com/*e[0m"
  1089. echo "*n*n [Return]"
  1090. set > NIL: Return ?
  1091. echo "*e[1;1H*e[J"
  1092. echo "*n*n*n NOTE: This installation has only updated the Drawer-Icons in your SYS:"
  1093. echo " directory (and of course all sub-directories of SYS:). So you may still find"
  1094. echo " old MagicWB-Drawers in other directories/partitions. If you also want to up-"
  1095. echo " date these Drawer-Icons (and make them less diskspace-consuming and faster),"
  1096. echo " please use the *"UPDATE DRAWERS*" installation of MagicWB. Thank you."
  1097. echo "*n [Return]"
  1098. set > NIL: Return ?
  1099.  
  1100. delete > NIL: ram:MWB
  1101. resident > NIL: IU remove
  1102. assign > NIL: magic: remove
  1103. run >NIL: AboutMagicWB
  1104. quit
  1105.