home *** CD-ROM | disk | FTP | other *** search
- ; $VER: Install_SampleE 3.10 (05.01.99)
- ;
- ; by Rainer Müller
- ;
- ; 15.08.1997 first installerversion
- ; 04.04.1998 some optical changes, comments now in english
- ; 15.04.1998 bumped version number to 2.90
- ; 31.05.1998 spanish support added
- ; 08.09.1998 updated script to the new directory and file structure. Because of that asking for
- ; install-dir of catalogs was removed -> removed text #AskCatdir. Because of the great
- ; number of files, switched to "gauge" while copying -> removed text #Copy_files
- ; 06.11.1998 bumped version number to 3.00
- ; 05.01.1999 bumped version number to 3.10
-
-
- (set SourceDir "/")
-
-
- ;************************************************************************
- ;* *
- ;* German Texts by Rainer Müller *
- ;* *
- ;************************************************************************
- (if (= @language "deutsch")
- (
- (set #WrongInstallerVersion
- (cat "\nSie benötigen mindestens Version 42 des Installers!\n"
- "Die Version 43.3 finden Sie im Aminet in util/misc/Installer43.3.lha\n\n"
- "Ihre Installer-Version ist: %ld.%ld"
- ))
-
- (set #WrongKickVersion
- (cat "\nSie benötigen mindestens Kickstart-Version 37!\n"
- "Ihre Kickstart-Version ist: %ld.%ld"
- ))
-
- (set #WrongUserLevel
- (cat "\nEine Installation im Einsteiger-Modus ist nicht möglich!\n"
- ))
-
- (set #AskTargetdir
- (cat "\nWo soll das Programm installiert werden?\n"
- "Ein neues Verzeichnis namens SampleE wird dort angelegt"
- ))
-
- (set #AskLibdir
- (cat "\nWo soll die reqtools.library installiert werden?\n"
- ))
-
- (set #InstallingLibs
- (cat "Installiere die reqtools.library.\n"
- ))
- ))
-
-
-
- ;************************************************************************
- ;* *
- ;* English Texts by Rainer Müller *
- ;* *
- ;************************************************************************
- (if (= @language "english")
- (
- (set #WrongInstallerVersion
- (cat "\nYou need at least V42 of the Installers!\n"
- "Version 43.3 can be found on Aminet in util/misc/Installer43.3.lha\n\n"
- "Your Installer-Version is: %ld.%ld"
- ))
-
- (set #WrongKickVersion
- (cat "\nYou need at least Kickstart-Version 37!\n"
- "Your Kickstart-Version is: %ld.%ld"
- ))
-
- (set #WrongUserLevel
- (cat "\nInstalling with Novice-Mode is not supported!\n"
- ))
-
- (set #AskTargetdir
- (cat "\nWhere do you want to install the program?\n"
- "A new directory called SampleE will be created there"
- ))
-
- (set #AskLibdir
- (cat "\nWhere do you want to install the reqtools.library?\n"
- ))
-
- (set #InstallingLibs
- (cat "Installing the reqtools.library.\n"
- ))
- ))
-
-
-
- ;************************************************************************
- ;* *
- ;* French Texts by Georges Goncalves *
- ;* *
- ;************************************************************************
- (if (= @language "français")
- (
- (set #WrongInstallerVersion
- (cat "\nVous avez besoin d'au moins la version 42 d'Installer !\n"
- "La version 43.3 peut être trouvée sur Aminet dans util/misc/Installer43.3.lha\n\n"
- "Votre version d'Installer est : %ld.%ld"
- ))
-
- (set #WrongKickVersion
- (cat "\nVous avez besoin d'au moins le Kickstart version 37 !\n"
- "Votre version de Kickstart est : %ld.%ld"
- ))
-
- (set #WrongUserLevel
- (cat "\nL'installation en mode Novice n'est pas supportée !\n"
- ))
-
- (set #AskTargetdir
- (cat "\nOù voulez vous installer le programme ?\n"
- "Un nouveau répertoire appellé SampleE y sera créé"
- ))
-
- (set #AskLibdir
- (cat "\nOù voulez vous installer la reqtools.library?\n"
- ))
-
- (set #InstallingLibs
- (cat "Installation de la reqtools.library.\n"
- ))
- ))
-
-
-
- ;************************************************************************
- ;* *
- ;* Spanish Texts by Javier de las Rivas *
- ;* *
- ;************************************************************************
- (if (= @language "español")
- (
- (set #WrongInstallerVersion
- (cat "\nNecesitas la versión V42 del Instalador!\n"
- "La versión 43.3 puedes encontrarla en Aminet en util/misc/Installer43.3.lha\n\n"
- "Tu Versión del Instalador es la: %ld.%ld"
- ))
-
- (set #WrongKickVersion
- (cat "\nNecesitas la version 37 de Kickstart!\n"
- "Tu versión del Kickstart es la: %ld.%ld"
- ))
-
- (set #WrongUserLevel
- (cat "\nLa Instalación en modo 'Usuario nuevo' no es posible!\n"
- ))
-
- (set #AskTargetdir
- (cat "¿ Donde quieres instalar el programa ?\n"
- "Se creará un directorio llamado SampleE."
- ))
-
- (set #AskLibdir
- (cat "\n¿ Donde quieres instalar reqtools.library ?\n"
- ))
-
- (set #InstallingLibs
- (cat "Instalando reqtools.library.\n"
- ))
- ))
-
-
-
-
- ;************************************************************************
- ;*** ***
- ;*** Some version-tests (Installer, OS and User-Level) ***
- ;*** ***
- ;************************************************************************
-
- ;************************************************************************
- ;* at least Version 42 of the Installer is needed *
- ;************************************************************************
- (set #vernum @installer-version)
- (set #ver (/ #vernum 65536))
- (set #rev (- #vernum (* #ver 65536) ) )
-
- (if (< #ver 42)
- (
- (abort (#WrongInstallerVersion #ver #rev) )
- ))
-
-
- ;************************************************************************
- ;* at least Kickstart 3.0 (V39) of the System is needed *
- ;************************************************************************
- (set #vernum (getversion) )
- (set #ver (/ #vernum 65536))
- (set #rev (- #vernum (* #ver 65536) ) )
-
- (if (< #ver 39)
- (abort (#WrongKickVersion #ver #rev) )
- )
-
-
- ;************************************************************************
- ;* at least a "Average User" is needed *
- ;************************************************************************
- (if (= @user-level 0)
- (
- (abort (#WrongUserLevel) )
- ))
-
-
-
-
- ;************************************************************************
- ;*** ***
- ;*** Here begins installation procedure ***
- ;*** ***
- ;*** Part 1: all needed requests ***
- ;*** ***
- ;************************************************************************
-
- ;************************************************************************
- ;* ask where SampleE shall be placed *
- ;* ==> #Installverz *
- ;************************************************************************
- (complete 0)
-
- (set #Zielverzeichnis @default-dest)
- (set #Zielverzeichnis (askdir (prompt #AskTargetdir)
- (help @askdir-help)
- (default #Zielverzeichnis)
- )
- )
-
- (set #Installverz (tackon #Zielverzeichnis "SampleE"))
- (set @default-dest #Installverz)
-
-
- ;************************************************************************
- ;* ask where the Libraries shall be placed *
- ;* ==> #Libverz *
- ;************************************************************************
- ;*** install reqtools.library
- ;*** a Average-User is not asked
- ;*** a Expert-User can choose
- (complete 5)
-
- (set #Libverz "LIBS:")
-
- ;*** ask the Expert-User
- (if (> @user-level 1)
- (
- (set #Libverz (askdir (prompt #AskLibdir)
- (help @askdir-help)
- (default #Libverz)
- )
- )
- ))
-
-
-
-
- ;************************************************************************
- ;*** ***
- ;*** Here begins installation procedure ***
- ;*** ***
- ;*** Part 2: copy needed/selected files ***
- ;*** ***
- ;************************************************************************
-
- ;************************************************************************
- ;* create destination directory *
- ;************************************************************************
- (makedir #Installverz (infos))
-
-
- ;************************************************************************
- ;* install libraries *
- ;************************************************************************
- (complete 10)
- (copylib (prompt #InstallingLibs) (source (tackon SourceDir "libs/reqtools.library"))
- (dest #Libverz)
- (help @copylib-help)
- (confirm)
- )
-
-
- ;************************************************************************
- ;* copy needed files *
- ;************************************************************************
- (complete 20)
- (working "")
-
- (copyfiles (source (tackon SourceDir "Samplee"))
- (dest #Installverz ) (infos) (noposition)
- )
- (complete 60)
-
- (copyfiles (source (tackon SourceDir "Samplee_Prefs"))
- (dest #Installverz ) (infos) (noposition)
- )
-
- (copyfiles (source (tackon SourceDir "SampleE_History"))
- (dest #Installverz ) (infos) (noposition)
- )
-
- (copyfiles (source (tackon SourceDir "se-icons"))
- (dest (tackon #Installverz "se-icons")) (all)
- )
- (complete 65)
-
- (copyfiles (source (tackon SourceDir "se-libs"))
- (dest (tackon #Installverz "se-libs")) (all)
- )
- (complete 85)
-
-
- ;************************************************************************
- ;* install catalogs *
- ;************************************************************************
- ;*** CAUTION: English is the built-in language - in this case no Catalog is needed
- (if (<> @language "english")
- (
- (set #CatVerz (tackon #Installverz "Catalogs") )
- (makedir #Catverz)
-
- (copyfiles (source (tackon SourceDir (tackon "catalogs" @language)))
- (dest (tackon #Catverz @language) ) (all)
- )
- ))
-
-
- ;************************************************************************
- ;* install documentation in the needed language *
- ;************************************************************************
- (copyfiles (source (tackon SourceDir (tackon "docs" @language)))
- (dest #Installverz ) (all) (infos) (noposition)
- )
-
-
- ;************************************************************************
- ;* finish *
- ;************************************************************************
- (complete 100)
-
- (exit)
-
-