; $VER: Install_SViewNG.script V6.00 (3.3.97)
; © 1993-97 by Andreas R. Kleinert.
; Italian strings by Alessandro Basso (cralex@amiga.dei.unipd.it)


(set @app-name "SViewNG")
(welcome "SViewNG Installation")


; *** english is default language

 (set #Msg_wrong_OS       (cat "You need at least AmigaOS V2.04 to run SViewNG !\n\n"
                                  "SViewNG will not run with your system configuration !"))
    (set #Msg_InstallingSViewNG "Installing SViewNG now. Libraries have to be installed separately !")
    (set #Msg_SelectPath          "Select path to install SViewNG to")
    (set #Msg_InstallingCatalogs  "Installing Catalog-Files for OS V2.1+\nCode localization.")
    (set #Msg_SelectCatalogPath   "Select path to install Catalogs to")
    (set #Msg_SViewNGPath       "Now modifying your S:User-Startup for a search path...")
    (set #Msg_CopyPalette         "Copy SViewNGPalette to SYS:WBStartup ?\n(Not with MagicWB, etc.)")
    (set #Msg_RunLibInstaller     "Now install Library ?")
    (set #Msg_DoInstallSViewNG  "SViewNG has been installed.")


(if (= @language "polski")
  (
    (set #Msg_wrong_OS       (cat "Aby uruchomiź SViewNG potrzebujesz co najmniej systemu operacyjnego w wersji V2.04 SViewNG !\n\n"
                                  "SViewNG nie moūe prawidīowo pracowaź na Twojej konfiguracji !"))
    (set #Msg_InstallingSViewNG "Instalujė SViewNG. Biblioteki muszā zostaź zainstalowane oddzielnie !")
    (set #Msg_SelectPath          "Wybierz katlog, w którym ma siė znaleśź SViewNG")
    (set #Msg_InstallingCatalogs  "Installujė locale dla systemu V2.1.\n")
    (set #Msg_SelectCatalogPath   "Wybierz katalog w którym majā byź zainstalowane locale")
    (set #Msg_SViewNGPath       "Modyfikuė twój plik S:User-Startup...")
    (set #Msg_CopyPalette         "Czy skopiowaź paletė SViewNG do SYS:WBStartup?\n(Nie uūywaź z  MagicWB, etc.)")
    (set #Msg_RunLibInstaller     "Czy zainstalowaź teraz biblioteki ?")
    (set #Msg_DoInstallSViewNG  "SViewNG zostaīo zainstalowane.")
 )
)

(if (= @language "deutsch")
  (
    (set #Msg_wrong_OS       (cat "Sie benötigen mindestens AmigaOS V2.04 für SViewNG !\n\n"
                                  "SViewNG wird auf Ihrem System nicht laufen !"))
    (set #Msg_InstallingSViewNG "Installiere jetzt SViewNG. Die Libraries müssen separat installiert werden !")
    (set #Msg_SelectPath          "Wählen Sie das Zielverzeichnis für SViewNG")
    (set #Msg_InstallingCatalogs  "Installiere jetzt die Katalog-Dateien für die\nOS V2.1+ Sprach-Unterstützung.")
    (set #Msg_SelectCatalogPath   "Wählen Sie den Pfad für die Katalog-Dateien")
    (set #Msg_SViewNGPath       "Modifiziere jetzt S:User-Startup für einen Suchpfad...")
    (set #Msg_CopyPalette         "SViewNGPalette nach SYS:WBStartup kopieren ?\n(Nicht mit MagicWB, etc.)")
    (set #Msg_RunLibInstaller     "Jetzt Library installieren ?")
    (set #Msg_DoInstallSViewNG  "SViewNG wurde installiert.")
  )
)

(if (= @language "italiano")
  (
    (set #Msg_wrong_OS       (cat "Ti serve almeno AmigaOS V2.04 per usare SViewNG !\n\n"
                                  "SViewNG non funzionerą con la tua configurazione di sistema !"))
    (set #Msg_InstallingSViewNG "Ora installo SViewNG. Le Librerie dovranno essere installate separatamente !")
    (set #Msg_SelectPath          "Seleziona il percorso dove installare SViewNG")
    (set #Msg_InstallingCatalogs  "Installo File-Catalogo per OS V2.1+\nLocalizzazione del Codice.")
    (set #Msg_SelectCatalogPath   "Seleziona percorso in cui installare i Cataloghi")
    (set #Msg_SViewNGPath       "Ora modifico la tua S:User-Startup per il percorso di ricerca...")
    (set #Msg_CopyPalette         "Copio SViewNGPalette in SYS:WBStartUp ?\n(Non con MagicWB, ecc.)")
    (set #Msg_RunLibInstaller     "Installo ora le Librerie ?")
    (set #Msg_DoInstallSViewNG  "SViewNG č stato installato.")
  )
)

(set #OS_VER (/ (getversion) 65536) )

(if(< #OS_VER 37)
  (abort #Msg_wrong_OS)
)

(complete 0)

(copyfiles
  (prompt #Msg_Installing)
  (help @copyfiles-help)
  (source "")
  (set #svcomdir
              (askdir
                     (prompt #Msg_SelectPath)
                     (help @askdir-help)
                     (newpath)
                     (default "SYS:SViewNG")
              )
  )
  (dest #svcomdir)
  (all)
  (confirm)
)

(complete 70)

(copyfiles
  (prompt #Msg_InstallingCatalogs)
  (help @copyfiles-help)
  (source "locale/catalogs")
  (set #svcomdir
              (askdir
                     (prompt #Msg_SelectCatalogPath)
                     (help @askdir-help)
                     (newpath)
                     (default "SYS:locale/Catalogs")
              )
  )
  (dest #svcomdir)
  (all)
  (confirm)
)

(copyfiles
  (prompt #Msg_CopyPalette)
  (help @copyfiles-help)
  (source "Tools")
  (dest "SYS:WBStartup")
  (pattern "SuperViewPalette#?")
  (confirm)
)

(startup "SViewNG"
  (prompt #Msg_SViewNGPath)
  (help @startup-help)
  (command "Path "#svcomdir" ADD\n")
)

(makeassign "IPROGDIR" "PROGDIR:" (safe))
(set @execute-dir "SuperViewLibrary")
(run (safe) "IPROGDIR:Installer Install_SVLib")
(makeassign "IPROGDIR" "" (safe))

(complete 99)

(exit #Msg_DoInstallSViewNG)