The AGA Experience 2/agavol2.iso/software/icons+/icons/q-z/tng-wb_demo/install

Text File | 1995-08-18 | 6KB | 155 lines

;$VER: TNG-WB Install Version 0.9ß
; ®1995; Marc-André Tragé
; Script zum Installieren von TNG-WB ENV&reCOLOR!

(user 2)
(set @user-level 2)
(complete 0)





(set @introduction
(cat "\nMit diesem Installationsprogramm können Sie\n\nDie envARC-ICONS & reCOLOR von TNG-WB V0.9ß\n für Ihr System installieren.\n\nDie komplette Installation der Restlichen Icons sollten Sie nach Ihrem persönlichen Geschmack mit MuiReIcon machen (siehe DOC.)\n\nEs ist sehr wichtig das Sie alles RICHTIG installieren, es können sonst Fehler an ihren Farben der Icons oder Backdrops auftreten!"))
(message @introduction)
 (set destdir (askdir
              (prompt "Bitte wähle Verzeichniss wohin die envARC-ICONs von TNG-WB V0.9ß installiert werden soll.\nNormal kommen diese ins envARC:SYS/-Verzeichnis wenn Sie allerdings Ihr System geändert habe bitte das endsprechende Verzeichnis wählen!")
              (help @askdir-help)
              (default ("envARC:SYS"))
              )
 )
 (complete 5)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_dEADzone.info")
            (dest destdir)
 )
 (complete 10)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_CDDAdisk.info")
            (dest destdir)
 )
 (complete 15)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_NODOS.info")
            (dest destdir)
 )
 (complete 20)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_kick.info")
            (dest destdir)
 )
 (complete 25)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_tOOl.info")
            (dest destdir)
 )
 (complete 30)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_tRASHCAN.info")
            (dest destdir)
 )
 (complete 35)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_dRAWER.info")
            (dest destdir)
 )
 (complete 40)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_diSk.info")
            (dest destdir)



 )
 (complete 45)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_KingCON.info")
            (dest destdir)
 )
 (complete 50)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_MUI.info")
            (dest destdir)
 )
 (complete 55)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_prefs.info")
            (dest destdir)
 )
 (complete 60)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/tng-wb_v0.9ß/envARC/SYS/dEF_project.info")
            (dest destdir)

 )
 (set @introduction
 (cat "\nSoll das reColor-Tool, das für die Farben ihrer WorkBench verantwortlich ist, in Ihr WBstartup-Verzeichnis Kopiert werden?\n"))
 (message @introduction)
 (set destdir (askdir
               (prompt "Bitte wählen Sie das Verzeichniss wohin reColor installiert werden soll.")
               (help @as°kdir-help)
               (default ("SYS:WBStartup/"))
               )
 )
 (complete 65)
 (copyfiles (prompt "Installiere envARC-Icons für TNG-WB")
            (source "PACK/reCOLOR!.info")
            (noposition)
            (dest destdir)
 )
 (complete 70)
 (makedir "SYS:WBStartUP/WB-COLOR")
 (copyfiles (prompt "Installiere reCOLOR für TNG-WB")
            (source "PACK/reCOLOR!")
            (dest destdir)

 )
 (complete 75)
 (makedir "SYS:WBStartUP/WB-COLOR")
 (copyfiles (prompt "Installiere reCOLOR für TNG-WB")
            (source "PACK/WB-Color/reCOLOR")
            (dest "SYS:WBStartUP/WB-COLOR/")
)
 (complete 80)
 (copyfiles (prompt "Installiere TNG-WB-C-01 für TNG-WB")
            (source "PACK/WB-Color/TNG-WB-C-01")
            (dest "SYS:WBStartUP/WB-COLOR/")

)
 (complete 85)
 (copyfiles (prompt "Installiere TNG-WB-C-02 für TNG-WB")
            (source "PACK/WB-Color/TNG-WB-C-02")
            (dest "SYS:WBStartUP/WB-COLOR/")


)
 (complete 90)
 (copyfiles (prompt "Installiere TNG-WB-C-03 für TNG-WB")
            (source "PACK/WB-Color/TNG-WB-C-03")
            (dest "SYS:WBStartUP/WB-COLOR/")


)
 (complete 95)
 (copyfiles (prompt "Installiere TNG-WB-C-04 für TNG-WB")
            (source "PACK/WB-Color/TNG-WB-C-04")
            (dest "SYS:WBStartUP/WB-COLOR/")


)
 (complete 99)
 (copyfiles (prompt "Installiere TNG-WB-C-05 für TNG-WB")
            (source "PACK/WB-Color/TNG-WB-C-05")
            (dest "SYS:WBStartUP/WB-COLOR/")


 )
 (complete 100)
 (message "Wenn Ihnen TNG-WB gefällt und Sie es benutzen,\ndann vergessen Sie bitte nicht,\ndaß REGISTRIEREN\ninfos dazu finden Sie in dOX/HotInfo.\noder unter folgender Addresse\n\nMarc-André Tragé\nRobertBoschstr.6/1\n71691 Freiberg/N.\n\nWenn sie sich sofort registrieren lassen wollen,\nsenden sie einfach\nDM 15.-  oder  US$ 12.-\nan meie Addresse!")
 (exit "An dieser stelle möchte ich meinem Freund, Betatester und ewig zuspätem Fahrer\n > Patrick Robinson <\n DANKEN !!!\n(so jetzt kommst auch Du zu RUHM!)\n\n\nAn den ENV-ICONS bitte nix ändern bin Glücklich das die Funktionieren :-)!")
 (welcome)