home *** CD-ROM | disk | FTP | other *** search
/ Dream 44 / Amiga_Dream_44.iso / Amiga / workbench / archivers / xpk_User.lha / xpk_User / Install next >
Text File  |  1997-07-18  |  26KB  |  682 lines
  1. ; XpkMaster distribution Installer script.
  2. ; ⌐ Dirk St÷cker <stoecker@rcs.urz.tu-dresden.de>
  3. ; $VER: XpkMasterInstall 1.13 (18.07.97)
  4.  
  5. ; History:
  6. ; 1.10    changed WHAT_C
  7. ; 1.11    added russian language and install check for nederlands
  8. ; 1.12  added install check for espa±ol 
  9. ; 1.13  finally fixed Installer version error report
  10.  
  11. ; Translations, which equal english texts are not needed, as not used texts
  12. ; get english defaults!
  13.  
  14. (set #catalog 0)
  15.  
  16. (set #i 0)
  17. (while (set #thisfile (select #i "deutsch" "franτais" "italiano"
  18. "srpski" "├e╙tina" "russian" ""))
  19.   (
  20.     (set #i (+ #i 1))
  21.     (if (= @language #thisfile) (set #catalog #i))
  22.   )
  23. )
  24.  
  25. ; ************************** English texts ******************************
  26.  
  27. (set #GOINGIN
  28.   (cat "\n\nWelcome to XpkMaster distribution installation system.\n\n"
  29.        "All sub archives you want to install have to be unpacked to "
  30.        "one directory. This directory is the parent of the one, you "
  31.        "have started the script of!\n\nMake clear you did this!"
  32.   )
  33. )
  34. (set #INSTALLERVERSION "You need at least version 42.9 of Installer.")
  35. (set #XPKMASTER_LIB  "Update xpkmaster.library when needed.")
  36. (set #INSTALL_LIB    "Update sub library %s.")
  37. (set #WHAT_STUFF     "What programs do you like to install ?")
  38. (set #WHAT_LANGUAGE  "What language files do you like to install?")
  39. (set #WHAT_PROMPT    "What parts of the distribution do you like to install?")
  40. (set #WHAT_LIBS      "What sub libraries do you like to install?")
  41. (set #WHAT_DOCS      "\n\n\n\n\nInstall documentation?")
  42. (set #WHAT_PREFS     "\n\n\n\n\nInstall Preferences program?")
  43. (set #WHAT_PROCESSOR "\n\n\n\n\nInstall MC68020 versions of some libraries?")
  44. (set #WHAT_DEVELOP   "What parts of developer dir do you need?")
  45. (set #WHAT_C
  46.   (cat "Choose the parts you need for your C compiler. The files are "
  47.         "automatically copied into correct sub directories."
  48.   )
  49. )
  50. (set #CRYPT_SOURCE   "\n\n\n\n\nInstall cryption lib sources?")
  51. (set #STARTUP         "\n\n\n\n\nAdd XpkMasterPrefs call to startup file.")
  52. (set #PREFSFILE         "\n\n\n\n\nInstall preferences file?")
  53. (set #ASK_PATH
  54.   (cat "Select the path where %s should be installed. A drawer "
  55.        "╗%s½ will be created automatically, when not existing."
  56.   )
  57. )
  58. (set #ASK_PATH2     "Select the path where %s should be installed.")
  59. (set #WHAT_USER     "User part")
  60. (set #WHAT_DEVELOP  "Developer part")
  61. (set #WHAT_CRYPT    "cryption libraries")
  62. (set #WHAT_SOURCE   "sources and examples")
  63. (set #DEV_AUTODOCS  "Autodocs")
  64. (set #DEV_HOTHELP   "HotHelp files")
  65. (set #DEV_FD        "FD files")
  66. (set #DEV_ASM        "ASM includes")
  67. (set #DEV_C        "C/C++ includes")
  68. (set #DEVT_AUTODOCS "the autodocs")
  69. (set #DEVT_FD_FILES "the FD files")
  70. (set #DEVT_ASM      "the ASM includes")
  71. (set #DEVT_C        "the C/C++ includes")
  72. (set #DEVT_HOTHELP  "the HotHelp files")
  73. (set #CRP_SOURCES   "the sources")
  74. (set #SRC_SRC_A_EXA "the sources and examples")
  75. (set #DEVC_PRAGMA   "pragma files")
  76. (set #DEVC_GCC      "GCC inline files")
  77. (set #DEVC_REDIRECT "redirect files for older code")
  78. (set #DEVC_SAS      "SAS pragmas redirect (not needed)")
  79. (set #DEVC_PROTO    "proto files")
  80.  
  81. ; ************************** German texts *******************************
  82.  
  83. (if (= #catalog 1) (
  84. (set #GOINGIN
  85.   (cat "\n\nWillkommen zum XpkMaster Installationssystem.\n\n"
  86.        "Alle Teilarchive, die Sie installieren wollen, mⁿssen in ein "
  87.        "Verzeichnis entpackt werden. Dieses ist das vorhergehende "
  88.        "Verzeichnis zu dem, aus dem Sie dieses Script gestartet haben.\n\n"
  89.        "Stellen Sie sicher, das richtig getan zu haben!"
  90.   )
  91. )
  92. (set #INSTALLERVERSION "Sie ben÷tigen mindestens Version 42.9 des Installer Programmes.")
  93. (set #XPKMASTER_LIB  "Erneuere xpkmaster.library wenn n÷tig.")
  94. (set #INSTALL_LIB    "Erneuere Sublibrary %s.")
  95. (set #WHAT_STUFF     "Welche Programme wollen Sie installieren?")
  96. (set #WHAT_LANGUAGE  "Welche Sprachkataloge wollen Sie installieren?")
  97. (set #WHAT_PROMPT    "Welche Teile von XPK wollen Sie installieren?")
  98. (set #WHAT_LIBS      "Welche Sublibraries wollen Sie installieren?")
  99. (set #WHAT_DOCS      "\n\n\n\n\nDokumentation installieren?")
  100. (set #WHAT_PREFS     "\n\n\n\n\nVoreinsteller (Preferences) Programm installieren?")
  101. (set #WHAT_PROCESSOR "\n\n\n\n\nMC68020 Versionen einiger Libraries installieren?")
  102. (set #WHAT_DEVELOP   "Welche Teile des Entwickler Pakets ben÷tigen Sie?")
  103. (set #WHAT_C         "WΣhlen Sie die Teile, die Sie fⁿr Ihren C Compiler ben÷tigen.")
  104. (set #WHAT_C
  105.   (cat "WΣhlen Sie die Teile, die Sie fⁿr Ihren C Compiler ben÷tigen. Die"
  106.        "Dateien werden automatisch in die n÷tigen Unterverzeichnisse verteilt."
  107.   )
  108. )
  109. (set #CRYPT_SOURCE   "\n\n\n\n\nQuellkode der Verschlⁿsselungslibraries installieren?")
  110. (set #STARTUP         "\n\n\n\n\nErgΣnze XpkMasterPrefs Programmaufruf zur Startupdatei.")
  111. (set #PREFSFILE         "\n\n\n\n\nInstalliere Voreinsteller (Preferences) Datei?")
  112. (set #ASK_PATH
  113.   (cat "WΣhlen Sie den Pfad, wo %s installiert werden soll. Ein Verzeichnis "
  114.        "╗%s½ wird automatisch erstellt, falls es noch nicht existiert."
  115.   )
  116. )
  117. (set #ASK_PATH2     "WΣhlen Sie den Pfad, wo %s installiert werden soll.")
  118. (set #WHAT_USER     "Anwender Archiv")
  119. (set #WHAT_DEVELOP  "Entwickler Archiv")
  120. (set #WHAT_CRYPT    "Verschlⁿsselungslibraries")
  121. (set #WHAT_SOURCE   "Quellkodes und Beispiele")
  122. (set #DEV_HOTHELP   "HotHelp-Dateien")
  123. (set #DEV_FD        "FD-Dateien")
  124. (set #DEV_ASM        "ASM Includes")
  125. (set #DEV_C        "C/C++ Includes")
  126. (set #DEVT_AUTODOCS "die Autodocs")
  127. (set #DEVT_FD_FILES "die FD-Dateien")
  128. (set #DEVT_ASM      "die ASM Includes")
  129. (set #DEVT_C        "die C/C++ Includes")
  130. (set #DEVT_HOTHELP  "die HotHelp-Dateien")
  131. (set #CRP_SOURCES   "die Quellkodes")
  132. (set #SRC_SRC_A_EXA "die Quellkodes und Beispiele")
  133. (set #DEVC_PRAGMA   "pragma Dateien")
  134. (set #DEVC_GCC      "GCC inline Dateien")
  135. (set #DEVC_REDIRECT "Umleitungsdateien fⁿr Σlteren Kode")
  136. (set #DEVC_SAS      "SAS pragmas Umleitungsdateien (nicht ben÷tigt)")
  137. (set #DEVC_PROTO    "proto Dateien")
  138. ))
  139.  
  140. ; ************************** French texts *******************************
  141.  
  142. (if (= #catalog 2) (
  143. (set #GOINGIN
  144.   (cat "\n\nBienvenue dans le systΦme d'installation de xpkMaster.\n\n"
  145.        "Toutes les sous archives que vous voulez installer doivent Ωtre "
  146.        "dΘcompressΘes dans un rΘpertoire. Ce rΘpertoire est le parent de "
  147.        "celui duquel vous avez lancΘ ce script !\n\n"
  148.        "Assurez vous que vous ayez fait cela !"
  149.   )
  150. )
  151. (set #INSTALLERVERSION "Vous avez besoin de Installer version 42.9 au minimum.")
  152. (set #XPKMASTER_LIB  "Mise α jour de xpkmaster.library lorsque c'est nΘcessaire.")
  153. (set #INSTALL_LIB    "Mise α jour de la sous bibliothΦque %s.")
  154. (set #WHAT_STUFF     "Quels programmes voulez vous installer ?")
  155. (set #WHAT_LANGUAGE  "Quelles fichiers de langue voulez vous installer ?")
  156. (set #WHAT_PROMPT    "Quelles parties de la distribution voulez vous installer ?")
  157. (set #WHAT_LIBS      "Quelles sous bibliothΦques voulez vous installer ?")
  158. (set #WHAT_DOCS      "\n\n\n\n\nInstaller la documentation ?")
  159. (set #WHAT_PREFS     "\n\n\n\n\nInstaller le programme de prΘfΘrences ?")
  160. (set #WHAT_PROCESSOR "\n\n\n\n\nInstaller la version MC68020 de quelques bibliothΦques ?")
  161. (set #WHAT_DEVELOP   "Quelles parties du rΘpertoire dΘveloppeur voulez vous ?")
  162. (set #WHAT_C         "Choisissez les parties nΘcessaires pour votre compilateur C.")
  163. (set #CRYPT_SOURCE   "\n\n\n\n\nInstaller les sources des bibliothΦques de cryptage ?")
  164. (set #STARTUP         "\n\n\n\n\nAjouter l'appel XpkMasterPrefs au fichier de dΘmarrage.")
  165. (set #ASK_PATH
  166.   (cat "SΘlectionnez le chemin o∙ %s devrait Ωtre installΘ. Un rΘpertoire "
  167.        "½ %s ╗ sera crΘΘ automatiquement, s'il n'existe pas."
  168.   )
  169. )
  170. (set #ASK_PATH2     "SΘlectionner le chemin o∙ %s devrai(en)t Ωtre installΘ.")
  171. (set #WHAT_USER     "Partie utilisateur")
  172. (set #WHAT_DEVELOP  "Partie dΘveloppeur")
  173. (set #WHAT_CRYPT    "BibliothΦques de cryptage")
  174. (set #WHAT_SOURCE   "Sources et exemples")
  175. (set #DEV_HOTHELP   "Fichiers HotHelp")
  176. (set #DEV_FD        "Fichiers FD")
  177. (set #DEV_ASM        "Includes ASM")
  178. (set #DEV_C        "Includes C/C++")
  179. (set #DEVT_AUTODOCS "les autodocs")
  180. (set #DEVT_FD_FILES "les fichiers fd")
  181. (set #DEVT_ASM      "les includes ASM")
  182. (set #DEVT_C        "les includes C/C++")
  183. (set #DEVT_HOTHELP  "les fichiers HotHelp")
  184. (set #CRP_SOURCES   "les sources")
  185. (set #SRC_SRC_A_EXA "les sources et exemples")
  186. (set #DEVC_PRAGMA   "les fichiers pragma")
  187. (set #DEVC_GCC      "les fichiers inline GCC")
  188. (set #DEVC_REDIRECT "les fichiers de redirection pour le code plus ancien")
  189. (set #DEVC_SAS      "les pragmas de redirection SAS (pas nΘcessaire)")
  190. (set #DEVC_PROTO    "fichiers proto")
  191. ))
  192.  
  193. ; ************************** Italiano texts *****************************
  194.  
  195. (if (= #catalog 3) (
  196. (set #GOINGIN
  197.   (cat "\n\nBenvenuto nel sistema di installazione della distribuzione XpkMaster.\n\n"
  198.        "Tutti i sotto archivi che desideri installare devono essere decompressi in"
  199.        "una cartella. Questa cartella Φ la precedente a quella da cui tu hai fatto"
  200.        "partire questo script!\n\nAssicurati di averlo fatto!"
  201.   )
  202. )
  203. (#INSTALLERVERSION "Necessiti come minimo della versione 42.9 dell' Installer.")
  204. (#XPKMASTER_LIB  "Aggiorna l' xpkmaster.library quando necessario.")
  205. (#INSTALL_LIB    "Aggiorna la sotto libreria %s.")
  206. (#WHAT_STUFF     "Che programmi desideri installare ?")
  207. (#WHAT_LANGUAGE  "Che file di linguaggio desideri installare?")
  208. (#WHAT_PROMPT    "Che parti della distribuzione desideri installare?")
  209. (#WHAT_LIBS      "Che sotto-librerie desideri installare?")
  210. (#WHAT_DOCS      "\n\n\n\n\nInstallo la documentazione?")
  211. (#WHAT_PREFS     "\n\n\n\n\nInstallo il programma di Preferenze ?")
  212. (#WHAT_PROCESSOR "\n\n\n\n\nInstallo le versioni MC68020 di alcune librerie?")
  213. (#WHAT_DEVELOP   "Di che parti della cartella per sviluppatore hai bisogno?")
  214. (#WHAT_C     "Scegli le parti che ti servono per il tuo compilatore C.")
  215. (#CRYPT_SOURCE   "\n\n\n\n\nInstallo i sorgenti della libreria di crittografia?")
  216. (#STARTUP         "\n\n\n\n\nAggiungo la chiamata a XpkMasterPrefs nel file di startup.")
  217. (set #ASK_PATH
  218.   (cat "Seleziona il percorso in cui %s dovra' essere installato. Un cassetto "
  219.        "╗%s½ verra' creato automaticamente, se non esiste gia'."
  220.   )
  221. )
  222. (#ASK_PATH2     "Seleziona il percorso in cui %s dovra' essere installato.")
  223. (#WHAT_USER     "Parte Utente")
  224. (#WHAT_DEVELOP  "Parte Sviluppatore")
  225. (#WHAT_CRYPT    "Librerie di crittografia")
  226. (#WHAT_SOURCE   "sorgenti ed esempi")
  227. (#DEV_HOTHELP   "File di Aiuto in linea")
  228. (#DEVT_AUTODOCS "gli autodocs")
  229. (#DEVT_FD_FILES "i file fd")
  230. (#DEVT_ASM      "gli includes ASM")
  231. (#DEVT_C    "gli includes C/C++")
  232. (#DEVT_HOTHELP  "I file di Aiuto in linea")
  233. (#CRP_SOURCES   "I sorgenti")
  234. (#SRC_SRC_A_EXA "i sorgenti e gli esempi")
  235. (#DEVC_PRAGMA   "I file pragma")
  236. (#DEVC_REDIRECT "redirigo i file per il vecchio codice")
  237. (#DEVC_SAS      "redirigo i SAS pragmas (non necessario)")
  238. ))
  239.  
  240. ; ************************** Serbian texts ******************************
  241.  
  242. (if (= #catalog 4) (
  243. (set #GOINGIN
  244.   (cat "\n\nDobro doτli u instalacioni sistem XpkMaster paketa.\n\n"
  245.        "Sve dodatne arhive treba da se raspakuju u jedan direktorijum. "
  246.        "To je direkorijum prethodan onome iz koga se starovali "
  247.        "instalaciju!\n\n"
  248.        "Budite sigurni da ste to uradili!"
  249.   )
  250. )
  251. (set #INSTALLERVERSION "Treba vam najmanje verzija 42.9 Instalera.")
  252. (set #XPKMASTER_LIB  "Osveºi xpkmaster.library kada je porebno.")
  253. (set #INSTALL_LIB    "Osveºi pod biblioteke %s.")
  254. (set #WHAT_STUFF     "Koje programe ºelite da instalirate?")
  255. (set #WHAT_LANGUAGE  "Koje jeziƒke fajlove ºelite da instalirate?")
  256. (set #WHAT_PROMPT    "Koje delove paketa ºelite da instalirate?")
  257. (set #WHAT_LIBS      "Koje pod biblioteke ºelite da instalirate?")
  258. (set #WHAT_DOCS      "\n\n\n\n\nDa instaliram dokumentaciju?")
  259. (set #WHAT_PREFS     "\n\n\n\n\nDa instaliram program za podeτavanja?")
  260. (set #WHAT_PROCESSOR "\n\n\n\n\nDa instaliram MC68020 verzije nekih biblioteka?")
  261. (set #WHAT_DEVELOP   "Koji delovi programerskog direktorijuma vam trebaju?")
  262. (set #WHAT_C         "Odaberite delove koji vam trebaju za C kompajler.")
  263. (set #CRYPT_SOURCE   "\n\n\n\n\nDa instaliram izvorni kod biblioteka za kriptovanje?")
  264. (set #STARTUP         "\n\n\n\n\nDa dodam poziv XpkMasterPrefs-u u startap.")
  265. (set #ASK_PATH
  266.   (cat "Odaberite path gde %s treba da se instalira. Direkorijum "
  267.        "╗%s½ åe automatski biti napravljen, ako ne postoji."
  268.   )
  269. )
  270. (set #ASK_PATH2     "Odaberite path gde %s treba da se instalira.")
  271. (set #WHAT_USER     "Korisniƒki deo")
  272. (set #WHAT_DEVELOP  "Programerski deo")
  273. (set #WHAT_CRYPT    "biblioteke za τifrovanje")
  274. (set #WHAT_SOURCE   "izvorni kod i primeri")
  275. (set #DEV_AUTODOCS  "Autodokovi")
  276. (set #DEV_HOTHELP   "HotHelp fajlovi")
  277. (set #DEV_FD        "FD fajlovi")
  278. (set #DEV_ASM        "ASM inkludovi")
  279. (set #DEV_C        "C/C++ inkludovi")
  280. (set #DEVT_AUTODOCS "autodokove")
  281. (set #DEVT_FD_FILES "fd fajlove")
  282. (set #DEVT_ASM      "ASM inkludove")
  283. (set #DEVT_C        "C/C++ inkludove")
  284. (set #DEVT_HOTHELP  "HotHelp faljove")
  285. (set #CRP_SOURCES   "izvorni kod")
  286. (set #SRC_SRC_A_EXA "izvorni kod i primere")
  287. (set #DEVC_PRAGMA   "pragma fajlove")
  288. (set #DEVC_GCC      "GCC inlajn fajlove")
  289. (set #DEVC_REDIRECT "redirekt fajlove za stariji kod")
  290. (set #DEVC_SAS      "SAS pragma redirekt (nije potrebno)")
  291. (set #DEVC_PROTO    "proto fajlove")
  292. ))
  293.  
  294. ; ***************************** Czech texts *****************************
  295.  
  296. (if (= #catalog 5) (
  297. (set #GOINGIN
  298.   (cat "\n\nV╔tejte p╥i instalaci syst╫mu XpkMaster.\n\n"
  299.        "V╙echny podp╩rn╫ arch╔vy, kter╫ chcete nainstalovat mus╔ b┘t "
  300.        "rozbaleny do jednoho adres┴╥e. Tento adres┴╥ je o jeden v┘╙e "
  301.        "ne┌ ten, ze kter╫ho jste spustili instala├n╔ skript!\n\n"
  302.        "Ujist┼te se, ┌e jste tak u├inili!"
  303.   )
  304. )
  305. (set #INSTALLERVERSION "Je vy┌adov┴n Installer alespo╬ ve verzi 42.9.")
  306. (set #XPKMASTER_LIB    "Nov┴ verze knihovny xpkmaster.library.")
  307. (set #INSTALL_LIB      "Nov┴ verze podp╩rn╫ knihovny %s.")
  308. (set #WHAT_STUFF       "Kter╫ programy si p╥ejete nainstalovat?")
  309. (set #WHAT_LANGUAGE    "Kter╫ lokaliza├n╔ katalogy si p╥ejete nainstalovat?")
  310. (set #WHAT_PROMPT      "Kter╫ ├┴sti syst╫mu Xpk si p╥ejete nainstalovat?")
  311. (set #WHAT_LIBS        "Kter╫ podp╩rn╫ knihovny si p╥ejete nainstalovat?")
  312. (set #WHAT_DOCS        "\n\n\n\n\nInstalovat dokumentaci?")
  313. (set #WHAT_PREFS       "\n\n\n\n\nInstalovat Nastaven╔ pro Xpk?")
  314. (set #WHAT_PROCESSOR   "\n\n\n\n\nInstalovat verze knihoven pro MC68020?")
  315. (set #WHAT_DEVELOP     "Kter╫ ├┴sti adres┴╥e pro v┘voj┴╥e si p╥ejete nainstalovat?")
  316. (set #WHAT_C            "Volba soubor╩ pro V┴╙ kompil┴tor C.")
  317. (set #CRYPT_SOURCE     "\n\n\n\n\nInstalovat zdrojov╫ texty ╙ifrovac╔ch knihoven?")
  318. (set #STARTUP            "\n\n\n\n\nSpou╙t┼t XpkMasterPrefs automaticky p╥i startu.")
  319. (set #ASK_PATH
  320.   (cat "Volba cesty, kde by m┼l b┘t %s nainstalov┴n. Adres┴╥ "
  321.        "╗%s½ bude automaticky vytvo╥en, pokud neexistuje."
  322.   )
  323. )
  324. (set #ASK_PATH2     "Volba cesty kde by m┼l b┘t %s nainstalov┴n.")
  325. (set #WHAT_USER     "π┴st pro u┌ivatele")
  326. (set #WHAT_DEVELOP  "π┴st pro v┘voj┴╥e")
  327. (set #WHAT_CRYPT    "╙ifrovac╔ knihovny")
  328. (set #WHAT_SOURCE   "zdrojov╫ texty a p╥╔klady")
  329. ))
  330.  
  331. ; **************************** Russian texts ****************************
  332.  
  333. (if (= #catalog 6) (
  334. (set #GOINGIN
  335.   (cat "\n\n├φα∩φ εφσaΩφßa±√ ß τ∞≡±aΩΩ■±φ∩ πτ≡±∩τα≥±τß∞φΓφ εaΘΣ±a XpkMaster.\n\n"
  336.        "┴≡Σ ≡≥α-a∩⌠τß·, ∞Σφα⌠φπτδ·Σ ┴aδ πΩ■ τ∞≡±aΩΩ■⌡ττ, ∞a ∞a÷aΩφ τ∞≡±aΩΩ■⌡ττ "
  337.        "≥σΣ πφΩσ∞· α·±√ ∩a≡εaΘφßa∞· ß φπτ∞ Θa±aΩφΓ. ▄±φ± Θa±aΩφΓ ■ßΩ■Σ±≡■ ε∩Σπ·π≥∙τδ "
  338.        "Θa±aΩφΓφδ φ± ±φΓφ, τµ Θφ±φ∩φΓ· ┴· µaε≥≡±τΩτ τ∞≡±aΩΩ■±φ∩.\n\n╥αΣπτ±Σ≡√ ß ⁿ±φδ!"
  339.   )
  340. )
  341. (set #INSTALLERVERSION "╠Σφα⌠φπτδ ╟∞≡±aΩΩ■±φ∩ ΘaΘ δτ∞τδ≥δ ßΣ∩≡ττ 42.9.")
  342. (set #XPKMASTER_LIB  "═α∞φßΩΣ∞τΣ xpkmaster.library ε∩τ ∞Σφα⌠φπτδφ≡±τ.")
  343. (set #INSTALL_LIB    "═α∞φßΩΣ∞τΣ αταΩτφ±ΣΘτ εφππΣ∩σΘτ %s.")
  344. (set #WHAT_STUFF     "╔aΘτΣ ε∩φΓ∩aδδ· ┴· ⌠φ±τ±Σ ε∩φτ∞≡±aΩΩτ∩φßa±√?")
  345. (set #WHAT_LANGUAGE  "╔aΘτΣ ■µ·Θφß·Σ ≤aΦΩ· ┴· ⌠φ±τ±Σ ε∩φτ∞≡±aΩΩτ∩φßa±√?")
  346. (set #WHAT_PROMPT    "╔aΘτΣ ÷a≡±τ εaΘΣ±a ┴· ⌠φ±τ±Σ ε∩φτ∞≡±aΩΩτ∩φßa±√?")
  347. (set #WHAT_LIBS      "╔aΘτΣ αταΩτφ±ΣΘτ εφππΣ∩σΘτ ┴· ⌠φ±τ±Σ ε∩φτ∞≡±aΩΩτ∩φßa±√?")
  348. (set #WHAT_DOCS      "\n\n\n\n\n╟∞≡±aΩΩτ∩φßa±√ πφΘ≥δΣ∞±a⌡τ²?")
  349. (set #WHAT_PREFS     "\n\n\n\n\n╟∞≡±aΩΩτ∩φßa±√ ε∩φΓ∩aδδ≥ ╬∩Σπ≥≡±a∞φßφΘ?")
  350. (set #WHAT_PROCESSOR "\n\n\n\n\n╟∞≡±aΩΩτ∩φßa±√ ∞ΣΘφ±φ∩·Σ αταΩτφ±ΣΘτ εφπ MC68020?")
  351. (set #WHAT_DEVELOP   "╔aΘτΣ ÷a≡±τ πφΘ≥δΣ∞±a⌡ττ πΩ■ ε∩φΓ∩aδδτ≡±a ┴aδ ∞≥σ∞·?")
  352. (set #WHAT_C
  353.   (cat "╥Θaστ±Σ ÷a≡±τ, ∞Σφα⌠φπτδ·Σ ┴a°Σδ≥ ΘφδετΩ■±φ∩≥ ╨τ. ╙aΦΩ· aß±φδa±τ÷Σ≡Θτ "
  354.         "α≥π≥± ∩aµδΣ∙Σ∞· ß ∞≥σ∞·⌠ Θa±aΩφΓa⌠."
  355.   )
  356. )
  357. (set #CRYPT_SOURCE   "\n\n\n\n\n╟∞≡±aΩΩτ∩φßa±√ τ≡⌠φπ∞τΘτ °τ≤∩≥²∙ΣΦ αταΩτφ±ΣΘτ?")
  358. (set #STARTUP      "\n\n\n\n\n├φαaßΩ■² ß·µφß XpkMasterPrefs ß startup-≤aΦΩΣ.")
  359. (set #PREFSFILE      "\n\n\n\n\n╟∞≡±aΩΩτ∩φßa±√ ≤aΦΩ ε∩Σπ≥≡±a∞φßφΘ?")
  360. (set #ASK_PATH
  361.   (cat "╥Θaστ±Σ δa∩°∩≥± πΩ■ τ∞≡±aΩΩ■⌡ττ %s. ╬∩τ φ±≡≥±≡±ßττ "
  362.        "Θa±aΩφΓa ╗%s½, φ∞ α≥πΣ± ≡φµπa∞ aß±φδa±τ÷Σ≡Θτ."
  363.   )
  364. )
  365. (set #ASK_PATH2     "╥Θaστ±Σ δa∩°∩≥± πΩ■ τ∞≡±aΩΩ■⌡ττ %s.")
  366. (set #WHAT_USER     "╦a∩°∩≥± εφΩ√µφßa±ΣΩ■")
  367. (set #WHAT_DEVELOP  "╦a∩°∩≥± ε∩φΓ∩aδδτ≡±a")
  368. (set #WHAT_CRYPT    "αταΩτφ±ΣΘτ °τ≤∩φßΘτ")
  369. (set #WHAT_SOURCE   "τ≡⌠φπ∞τΘτ τ ε∩τδΣ∩·")
  370. (set #DEV_AUTODOCS  "╙aΦΩ· Autodocs")
  371. (set #DEV_HOTHELP   "╙aΦΩ· HotHelp")
  372. (set #DEV_FD        "╙aΦΩ· FD")
  373. (set #DEV_ASM       "ASM includes")
  374. (set #DEV_C         "C/C++ includes")
  375. (set #DEVT_AUTODOCS "≤aΦΩ· autodocs")
  376. (set #DEVT_FD_FILES "≤aΦΩ· FD")
  377. (set #DEVT_ASM      "≤aΦΩ· ASM includes")
  378. (set #DEVT_C        "≤aΦΩ· C/C++ includes")
  379. (set #DEVT_HOTHELP  "≤aΦΩ· HotHelp")
  380. (set #CRP_SOURCES   "τ≡⌠φπ∞τΘτ")
  381. (set #SRC_SRC_A_EXA "τ≡⌠φπ∞τΘτ τ ε∩τδΣ∩·")
  382. (set #DEVC_PRAGMA   "≤aΦΩ· pragma")
  383. (set #DEVC_GCC      "≤aΦΩ· GCC inline")
  384. (set #DEVC_REDIRECT "εΣ∩Σ∞aε∩aßΩ■²∙τΣ ≤aΦΩ· πΩ■ ≡±a∩·⌠ Θφπφß")
  385. (set #DEVC_SAS      "╬∩aΓδ· εΣ∩Σ∞aε∩aßΩΣ∞τ■ SAS (ßφµδφσ∞φ ∞Σ ∞≥σ∞·)")
  386. (set #DEVC_PROTO    "╙aΦΩ· proto")
  387. ))
  388.  
  389. ; ************************* global procedures ***************************
  390.  
  391. (procedure P_copylib lib pathadd path
  392.   (
  393.     (set #libr (cat "xpk" lib ".library"))
  394.     (copylib (prompt (#INSTALL_LIB libr))
  395.       (help @copylib-help)
  396.       (source (cat path "Libs" pathadd "/compressors/" libr))
  397.       (dest "LIBS:compressors/")
  398.       (confirm)
  399.     )
  400.   )
  401. )
  402.   
  403. ; ********************* xpk_User archive install *************************
  404.  
  405. (procedure P_install_user
  406.   (
  407.     (copylib (prompt #XPKMASTER_LIB)
  408.       (help @copylib-help)
  409.       (source (cat (if (< #OS_version 37) "Libs_1.3/" "Libs/") "xpkmaster.library"))
  410.       (dest "LIBS:")
  411.       (confirm)
  412.     )
  413.  
  414.     (set #p
  415.       (askoptions
  416.         (prompt #WHAT_LIBS)
  417.         (help @askoptions-help)
  418.         (choices "CBR0" "DLTA" "DUKE" "FAST" "FRLE" "HUFF" "IMPL" "NONE"
  419.           "NUKE" "RLEN" "SHRI" "SMPL" "HFMN" "MASH" "RAKE" "SQSH")
  420.         (default 4294967295)
  421.       )
  422.     )
  423.  
  424.     (set #q (if (IN #p 12 13 14 15)
  425.       (askbool
  426.         (prompt #WHAT_PROCESSOR)
  427.         (help @askbool-help)
  428.         (default 0)
  429.       ))
  430.     )
  431.  
  432.     (set #n 0)
  433.     (while (set #thisfile (select #n "CBR0" "DLTA" "DUKE" "FAST" "FRLE"
  434.       "HUFF" "IMPL" "NONE" "NUKE" "RLEN" "SHRI" "SMPL" ""))
  435.       (
  436.         (if (IN #p #n) (P_copylib #thisfile "" ""))
  437.         (set #n (+ #n 1))
  438.       )
  439.     )
  440.  
  441.     (set #i 0)
  442.     (while (set #thisfile (select #i "HFMN" "MASH" "RAKE" "SQSH" ""))
  443.       (
  444.         (if (IN #p (+ #n #i))
  445.           (P_copylib #thisfile (if #q "_68020+" "") ""))
  446.         (set #i (+ #i 1))
  447.       )
  448.     )
  449.  
  450.     (copyfiles
  451.       (source "C/")
  452.       (dest "C:")
  453.       (prompt #WHAT_STUFF)
  454.       (help @askoptions-help)
  455.       (choices "xDir" "xQuery" "xType" (if (>= #OS_version 37) "xPack" "xPK")
  456.       (if (>= #OS_version 37) "xBench") "xLoadSeg" "xScan" "xUP")
  457.       (confirm)
  458.     )
  459.  
  460.     (set #n (if (>= #OS_version 37)
  461.       (askbool
  462.         (prompt #WHAT_PREFS)
  463.         (help @askbool-help)
  464.         (default 0)
  465.       )
  466.     ))
  467.  
  468.     (if #n (
  469.       (copyfiles
  470.         (source "Prefs/")
  471.         (dest "SYS:Prefs/")
  472.         (choices "XpkMaster")
  473.         (infos)
  474.       )
  475.       (copyfiles (source "C/") (dest "C:") (choices "XpkMasterPrefs"))
  476.       (startup "XpkMasterPrefs" (prompt #STARTUP) (help @startup-help)
  477.         (command "Run >NIL: XpkMasterPrefs"))
  478.       (copyfiles (source "EnvArc/") (dest "ENVARC:") (prompt #PREFSFILE)
  479.       (help @copylib-help) (choices "xpkmaster.prefs") (confirm))
  480.     ))
  481.  
  482.     (if (>= #OS_version 37)(
  483.       (set #p
  484.         (askoptions
  485.           (prompt #WHAT_LANGUAGE)
  486.           (help @askoptions-help)
  487.           (choices "deutsch" "espa±ol" "franτais" "italiano" "nederlands"
  488.             "norsk" "polski" "russian" "srpski" "svenska" "πe╙tina")
  489.           (default #catalog)
  490.         )
  491.       )
  492.  
  493.       (set #i 0)
  494.       (while (set #thisfile (select #i "deutsch" "espa±ol" "franτais"
  495.         "italiano" "nederlands" "norsk" "polski" "russian" "srpski"
  496.         "svenska" "πe╙tina" ""))
  497.       (
  498.         (set #thisfile (tackon "catalogs/" #thisfile))
  499.         (if (IN #p #i)(
  500.           (copyfiles (source #thisfile)
  501.             (dest (tackon "LOCALE:" #thisfile))
  502.             (pattern "xpkmaster.catalog")
  503.       )
  504.           (if #n (copyfiles (source #thisfile)
  505.             (dest (tackon "LOCALE:" #thisfile))
  506.             (pattern "xpkmasterprefs.catalog")
  507.       ))
  508.         ))
  509.         (set #i (+ #i 1))
  510.       ))
  511.     ))
  512.  
  513.     (copyfiles
  514.       (source "")
  515.       (dest @default-dest)
  516.       (prompt #WHAT_STUFF)
  517.       (help @askoptions-help)
  518.       (choices "XpkMaster.guide")
  519.       (infos)
  520.       (noposition)
  521.       (confirm)
  522.     )
  523.   )
  524. )
  525.  
  526. ; ********************* xpk_Develop archive install **********************
  527.  
  528. (procedure P_install_develop
  529.   (
  530.     (set #p
  531.       (askoptions
  532.         (prompt #WHAT_DEVOP)
  533.         (help @askoptions-help)
  534.         (choices #DEV_AUTODOCS #DEV_HOTHELP #DEV_FD #DEV_ASM #DEV_C)
  535.         (default 4294967295)
  536.       )
  537.     )
  538.  
  539.     (set #dir (if(exists "INCLUDE:" (NOREQ)) "INCLUDE:" @default-dest))
  540.  
  541.     (if (IN #p 0)
  542.       (
  543.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_AUTODOCS)) (help @askdir-help) (default #dir)))
  544.         (copyfiles (source (tackon #xpk_Develop "AutoDocs/")) (dest #dir) (all))
  545.       )
  546.     )
  547.     (if (IN #p 2)
  548.       (
  549.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_FD_FILES)) (help @askdir-help) (default #dir)))
  550.         (copyfiles (source (tackon #xpk_Develop "Include/FD/")) (dest #dir) (all))
  551.       )
  552.     )
  553.     (if (IN #p 3)
  554.       (
  555.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_ASM)) (help @askdir-help) (default #dir)))
  556.         (copyfiles (source (tackon #xpk_Develop "Include/ASM/")) (dest #dir) (all))
  557.       )
  558.     )
  559.     (if (IN #p 4)
  560.       (
  561.         (set #q
  562.           (askoptions
  563.             (prompt #WHAT_DEVOP)
  564.             (help @askoptions-help)
  565.             (choices #DEVC_PRAGMA #DEVC_GCC #DEVC_REDIRECT #DEVC_SAS
  566.               #DEVC_PROTO)
  567.             (default 1)
  568.           )
  569.         )
  570.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_C)) (help @askdir-help) (default #dir)))
  571.         (copyfiles (source (tackon #xpk_Develop "Include/C/clib/")) (dest (tackon #dir "clib")) (all))
  572.         (copyfiles (source (tackon #xpk_Develop "Include/C/xpk/")) (dest (tackon #dir "xpk")) (all))
  573.     (if (IN #q 0)
  574.       (copyfiles (source (tackon #xpk_Develop "Include/C/pragma/")) (dest (tackon #dir "pragma")) (all))
  575.     )
  576.     (if (IN #q 1)
  577.       (copyfiles (source (tackon #xpk_Develop "Include/C/inline/")) (dest (tackon #dir "inline")) (all))
  578.     )
  579.     (if (IN #q 2)
  580.       (copyfiles (source (tackon #xpk_Develop "Include/Old-C/libraries/")) (dest (tackon #dir "libraries")) (all))
  581.     )
  582.     (if (IN #q 3)
  583.       (copyfiles (source (tackon #xpk_Develop "Include/OLD-C/pragmas/")) (dest (tackon #dir "pragmas")) (all))
  584.     )
  585.     (if (IN #q 4)
  586.       (copyfiles (source (tackon #xpk_Develop "Include/C/proto/")) (dest (tackon #dir "proto")) (all))
  587.     )
  588.       )
  589.     )
  590.     (if (IN #p 1)
  591.       (
  592.         (set #dir (askdir (prompt (#ASK_PATH2 #DEVT_HOTHELP)) (help @askdir-help) (default (if(exists "HOTHELP:" (NOREQ)) "HOTHELP:Projekte" @default-dest))))
  593.         (copyfiles (source (tackon #xpk_Develop "HotHelp/")) (dest #dir) (pattern "XPK#?"))
  594.       )
  595.     )
  596.   )
  597. )
  598.  
  599. ; ********************* xpk_Crypt archive install ************************
  600.  
  601. (procedure P_install_crypt
  602.   (
  603.     (set #i
  604.       (askoptions
  605.         (prompt #WHAT_LIBS)
  606.         (help @askoptions-help)
  607.         (choices "ENCO" "FEAL" "IDEA")
  608.         (default 4294967295)
  609.       )
  610.     )
  611.  
  612.     (set #n 0)
  613.     (while (set #thisfile (select #n "ENCO" "FEAL" "IDEA" ""))
  614.       (
  615.         (if (IN #i #n) (P_copylib #thisfile "" #xpk_Crypt))
  616.         (set #n (+ #n 1))
  617.       )
  618.     )
  619.  
  620.     (if (askbool (prompt #CRYPT_SOURCE) (help @askbool-help) (default 0))
  621.       (
  622.         (set #dir
  623.           (tackon
  624.             (askdir (prompt (#ASK_PATH #CRP_SOURCES "XpkSources/Crypt")) (help @askdir-help) (default @default-dest))
  625.             "XpkSources/Crypt"))
  626.         (if (NOT (exists #dir)) (makedir #dir (infos)))
  627.         (copyfiles (source (tackon #xpk_Crypt "source/")) (dest #dir) (all))
  628.       )
  629.     )
  630.   )
  631. )
  632.  
  633. ; ********************* xpk_Source archive install ***********************
  634.  
  635. (procedure P_install_source
  636.   (
  637.     (set #dir
  638.       (tackon
  639.         (askdir (prompt (#ASK_PATH #SRC_SRC_A_EXA "XpkSources")) (help @askdir-help) (default @default-dest))
  640.            "XpkSources"))
  641.         (if (NOT (exists #dir)) (makedir #dir (infos)))
  642.         (copyfiles (source #xpk_Source) (dest #dir) (all))
  643.   )
  644. )
  645.  
  646. ; ******************** here the stuff really starts **********************
  647.  
  648. (if (< @installer-version (+ (* 65536 42) 9))
  649.   (abort #INSTALLERVERSION)
  650. )
  651. ; we need at least version 42.9 of Installer, as some of it's functionality
  652. ; is used in the script
  653.  
  654. (set #xpk_Source  "/xpk_Source/")
  655. (set #xpk_Develop "/xpk_Develop/")
  656. (set #xpk_Crypt   "/xpk_Crypt/")
  657. (set #OS_version  (/ (getversion) 65536))
  658.  
  659. (message #GOINGIN)
  660. ; may be here comes an selection, where the decrunched archives are
  661.  
  662. (set #o
  663.   (askoptions
  664.     (prompt #WHAT_PROMPT)
  665.     (help @askoptions-help)
  666.     (choices #WHAT_USER
  667.       (if (exists #xpk_Develop) #WHAT_DEVELOP "")
  668.       (if (exists #xpk_Crypt)   #WHAT_CRYPT   "")
  669.       (if (exists #xpk_Source)  #WHAT_SOURCE  "")
  670.       (default 1)
  671.     )
  672.   )
  673. )
  674.  
  675. (if (IN #o 0) (P_install_user))
  676. (if (IN #o 1) (P_install_develop))
  677. (if (IN #o 2) (P_install_crypt))
  678. (if (IN #o 3) (P_install_source))
  679.  
  680. (exit (QUIET))
  681.  
  682.