home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / TextEditors&Viewers / Texteditors / ILS-GED1.LHA / install / Install < prev    next >
Encoding:
Text File  |  1994-09-23  |  61.4 KB  |  2,176 lines
  1. ; $VER: GoldED 1.0
  2. ; Copyright ©1994 Dietmar Eilert - All Rights Reserved
  3.  
  4. (delopts "oknodelete" "force" "askuser")
  5.  
  6. (complete 0)
  7.  
  8. ; --- English (default) strings ---
  9.  
  10. (set #introduction (cat "\n"
  11.  
  12.     "Programmer's Editor, All Rights Reserved.   \n"
  13.     "                                            \n"
  14.     "GoldED ©'94 Dietmar Eilert                  \n"
  15.     "Reqtools  ©'91-94 Nico François             \n"
  16.     "GUIMake ©'93 Rico Krasowski                 \n"
  17.     "                                            \n"
  18.     "GoldED is NOT 'freely distributable'. Please\n"
  19.     "have a look at the licence file before      \n"
  20.     "installing GoldED; installing this software \n"
  21.     "means accepting that licence. Thank you.    \n"
  22. ))
  23.  
  24. (set #badkick "\n Sorry, this package requires OS v2.04 or better.\n")
  25.  
  26. (set #error (cat
  27.  
  28.     " Some error has occurred. Please inform a GoldED  \n"
  29.     " support site (e.g. dietmar@tomate.oche.de) AFTER \n"
  30.     " having tried a different Installer release: 1.24 \n"
  31.     " is known to work fine.                           \n"
  32.     "                                                   \n"
  33.     " The following information is required: error code\n"
  34.     " (above), last error message, the percentage done \n"
  35.     " (window title) and your log file. If available:  \n"
  36.     " a SnoopDos report. Thank you !                   \n"
  37. ))
  38.  
  39. (set #assign_found "\nGOLDED: assign detected...\n")
  40.  
  41. (set #assign_found_help (cat "\n"
  42.  
  43.     " If you decide for updating your old installation\n"
  44.     " you won't be asked for directories. Directories \n"
  45.     " of your previous installation will be used.     \n"
  46.     "                                                 \n"
  47.     " If you decide for removing your current GoldED  \n"
  48.     " installation this script will try to delete     \n"
  49.     " files introduced by a former GoldED installation\n"
  50.     " However, this utility is not able to remove all \n"
  51.     " files related to GoldED. For example it won't   \n"
  52.     " remove the reqtools library since this library  \n"
  53.     " might be used by other applications, too. It    \n"
  54.     " won't remove the QuickStarter since it doesn't  \n"
  55.     " know where it has been placed.                  \n"
  56.     "                                                 \n"
  57.     " If you ever run into troubles related to this   \n"
  58.     " install script (which certainly is not perfect),\n"
  59.     " remove your outdated GED copy (use the 'remove' \n"
  60.     " option) before attempting a completely new      \n"
  61.     " installation.                                   \n"
  62.     "                                                 \n"
  63.     " Backups of your presets (if available) are made.\n"
  64.     "                                                 \n"
  65.     " Libraries are not overwritten unless they are   \n"
  66.     " outdated (depends on version/revision number).  \n"
  67. ))
  68.  
  69. (set #new    "install new")
  70. (set #update "update existing GoldED")
  71. (set #remove "remove GoldED from your system")
  72.  
  73. (set #remove_ged  "remove 'GoldED:' assign ?\n")
  74. (set #remove_hs   "remove 'HiSpeed:' assign ?\n")
  75. (set #remove_ed   "remove quickstarter access ?\n")
  76. (set #remove_gmk  "remove GUIMake access ?\n")
  77. (set #must_remove "You should have this assign/reference removed !")
  78. (set #removed     "; (removed)")
  79.  
  80. (set #pref_icons "Select preferred icon type")
  81.  
  82. (set #medres " med-res icons (pixel ratio 1:2)")
  83. (set #hires  " hi-res  icons (pixel ratio 1:1)")
  84.  
  85. (set #pref_icons_help (cat "\n"
  86.  
  87.     " Select med-res if the pixel ratio of your preferred\n"
  88.     " screen resolution is approx. 1:2 (e.g. in 640*200  \n"
  89.     " mode the pixel width is half of pixel height).     \n"
  90.     "                                                    \n"
  91.     " Select hi-res if the pixel ratio of your preferred \n"
  92.     " resolution is approx. 1:1 (eg. 640*400 or 800*600).\n"
  93. ))
  94.  
  95. (set #where " Where do you want to have the package installed ? \n")
  96.  
  97. (set #where_help (cat "\n"
  98.  
  99.     " Simply select a directory (a root directory is   \n"
  100.     " fine, too). I'm going to create a new directory  \n"
  101.     " called 'GoldED' within the directory you specify.\n"
  102.     " You should select a directory which has an icon  \n"
  103.     " attached to it (e.g. SYS:Utilities).             \n"
  104.     "                                                  \n"
  105.     " The GoldED directory will keep several support   \n"
  106.     " files/tools as well as the main editor. ARexx    \n"
  107.     " macros related to GoldED are usually kept in a   \n"
  108.     " subdirectory of GoldED. Furthermore the manuals  \n"
  109.     " reside in GoldED's directory.                    \n"
  110. ))
  111.  
  112. (set #bad_path "Sorry, can't install to RAM disk")
  113.  
  114. (set #drive_space (cat "\n"
  115.  
  116.     " This installation requires at least 1.2 MB free\n"
  117.     " disk space. Please make this space available   \n"
  118.     " and start again.                               \n"
  119. ))
  120.  
  121. (set #gold_lib "Installation of GoldED.library ...")
  122.  
  123. (set #gold_lib_help (cat "\n"
  124.  
  125.     "This library is required by the unregistered version\n"
  126.     "only. Registered users recieve a keyfile instead.   \n"
  127. ))
  128.  
  129. (set #what_catalog "\n What catalogs do you want to have installed ?\n")
  130.  
  131. (set #what_catalog_help (cat "\n"
  132.  
  133.     " Catalogs are required by OS2.1 or better to localize\n"
  134.     " GoldED, i.e. to make the editor use the language    \n"
  135.     " selected by the locale preferences program (however \n"
  136.     " menus are not loacalized since menus are not part of\n"
  137.     " the editor itself).                                 \n"
  138. ))
  139.  
  140. (set #add_ged_assign "Add 'GoldED:' assign to 's:user-startup' ?\n")
  141.  
  142. (set #add_ged_assign_help (cat "\n"
  143.             
  144.     " This editor does support user menus, i.e. you can \n"
  145.     " set up own menu items of several types (scripts,  \n"
  146.     " ARexx macros, DOS commands, ...). Thus ususally   \n"
  147.     " external files have to be referenced. It is quite \n"
  148.     " convenient - and strongly recommended - to place  \n"
  149.     " files related to GoldED in a symbolic directory   \n"
  150.     " GoldED: (or one of its subdirectories). If you    \n"
  151.     " don't set up an approbiate assign you will run    \n"
  152.     " into TROUBLE. Nevertheless, the main editor itself\n"
  153.     " does not need any assign to run. Actually it does \n"
  154.     " not need any external file at all apart from its  \n"
  155.     " config file (envarc:GOLDED/GOLDED.PREFS).         \n"
  156.     "                                                   \n"
  157. ))
  158.  
  159. (set #quickname " Choose a name for the QuickStarter")
  160.  
  161. (set #other_name "(other)")
  162.  
  163. (set #quickname_help (cat "\n"
  164.  
  165.     " The QuickStarter is a small (4 KB) GoldED front-  \n"
  166.     " end. You can use it AS IF it were a real editor.  \n"
  167.     " For example you might type 'ed letter' to edit the\n"
  168.     " file letter if the QuickStarter were named 'ed'.  \n"
  169.     " The big advantage of a QuickStarter is its abilty \n"
  170.     " to pass a new job to an already runnning instance \n"
  171.     " of GoldED (if there is any). This happens FAST.   \n"             
  172.     "                                                   \n"
  173.     " The QuickStarters default name is 'ED' but feel   \n"
  174.     " free to choose any name you like. Personally, I   \n"
  175.     " prefer to use 'ED' (replacing Commodore's ED).    \n"
  176. ))
  177.  
  178. (set #enter_name " Enter a name:\n")
  179.  
  180. (set #enter_name_help (cat "\n"
  181.  
  182.     " Any name (GED, ED, ...) will do. Existing files are \n"
  183.     " overwritten. If you decide for 'ED', the original ED\n" 
  184.     " is lost (well, let's call it a gain :-)             \n"
  185. ))
  186.  
  187. (set #place_quick (cat "\n"
  188.  
  189.     " Now let's place the QuickStarter within a valid\n"
  190.     " command directory. Select a directory:         \n"
  191. ))
  192.  
  193. (set #place_quick_help (cat "\n"
  194.  
  195.     " You should select one of these directories if you\n"
  196.     " want to run the editor simply by typing its name,\n"
  197.     " no matter what your current path is:             \n"
  198.     "                                                  \n"
  199.     " SYS:C, SYS:TOOLS, SYS:UTILITIES or SYS:SYSTEM    \n"
  200.     "                                                  \n"
  201.     " If you choose ED as default name, you must either\n"
  202.     " place the quick starter into c: or delete the old\n"
  203.     " ED from c: to prevent unpredictable behaviour.   \n"
  204. ))
  205.  
  206. (set #resident "\n Make QuickStarter resident ?\n")
  207.  
  208. (set #resident_help (cat "\n"
  209.  
  210.     " I would suggest to make the QuickStarter (4 KB)\n"
  211.     " resident - it will work faster.                \n"
  212. ))
  213.  
  214. (set #creating_bak "creating backup of old presets ...")
  215.  
  216. (set #bak_done (cat "\n"
  217.  
  218.     "Backups of your old preferences have been written\n"
  219.     "to directory:\n\n"
  220. ))
  221.  
  222. (set #what_menu "\n Choose default menu definition file:\n")
  223.  
  224. (set #what_menu_help (cat "\n"
  225.  
  226.     " GoldED is localized (i.e. uses the locale library   \n"
  227.     " of WB2.1/3.x) as far as its internal textes are     \n"
  228.     " concerned. Since menus are not part of the editor   \n"
  229.     " itself they are not localized. Instead, the user may\n"
  230.     " specify a menu definition file to get menus in his/ \n"
  231.     " her preferred language.                             \n"
  232. ))
  233.  
  234. (set #install_gui "\n Install GUIMake's menu (©'93 Rico Krasowski) ?")
  235.  
  236. (set #install_gui_help (cat "\n"
  237.  
  238.     " GUIMake is a GUI driven compiler frontend for GoldED\n"
  239.     " (to be used instead of makefiles). Supports project \n"
  240.     " management and comfortable error handling (e.g. jump\n"
  241.     " to first error after compilation). Included with    \n"
  242.     " kind permisssion of the author of GUIMake.          \n"
  243.     "                                                     \n"
  244.     " Supported compiler(s) so far: unregistered DICE and \n"
  245.     " registered DICE.                                    \n"
  246. ))
  247.  
  248. (set #screen "\n Choose default screen resolution \n")
  249.  
  250. (set #screen_help (cat "\n"
  251.  
  252.     " Decide for a default screen mode to be used when the\n"
  253.     " editor is started for the 1st time. I would suggest \n"
  254.     " to use a custom screen for this will make GoldED run\n"
  255.     " faster and look much nicer.                         \n"
  256. ))
  257.  
  258. (set #screen_ntsc   "custom screen NTSC")
  259. (set #screen_ntsc_i "custom screen NTSC interlaced")
  260. (set #screen_pal    "custom screen PAL")
  261. (set #screen_pal_i  "custom screen PAL interlaced")
  262. (set #screen_wb     "workbench screen")
  263.  
  264. (set #look_feel "Look & feel")
  265.  
  266. (set #look_feel_help (cat "\n"
  267.  
  268.     " Suggestion: use a 2-color mode if your Amiga \n"
  269.     " isn't that fast (68000) but a four color mode\n"
  270.     " for any other Amiga. Be warned: There a many \n"
  271.     " more modes available from within GoldED :-)  \n"
  272. ))
  273.  
  274. (set #mode_blue    "Blue     (2 colors, faaaast)")
  275. (set #mode_sun     "Sun      (4 colors, orange-grey)")
  276. (set #mode_tpp     "TPP      (4 colors, dark blue)")
  277. (set #mode_ocean   "Ocean    (4 colors, bright green)")
  278. (set #mode_stone   "Stone    (2 colors, grey, fast)")
  279. (set #mode_leaf    "Leaf     (4 colors, my favourite)")
  280. (set #mode_ced     "CED-Blue (4 colors, bright blue)")
  281. (set #mode_tennis  "Tennis   (4 colors, brown-green)")
  282. (set #mode_desktop "Desktop  (8 colors, slow)")
  283.  
  284. (set #what_printer "\n What printer do you own ? \n")
  285. (set #what_printer_help "\n Simply select the printer model you own.")
  286.  
  287. (set #printer_deskjet "DeskJet or 100% compabible")
  288. (set #printer_laser   "PCL laser printer")
  289. (set #printer_other   "none/other")
  290.  
  291. (set #what_proglang "\n Select preferred programming language:\n")
  292.  
  293. (set #what_proglang_other "other")
  294.  
  295. (set #what_proglang_help (cat "\n"
  296.  
  297.     " GoldED offers smart indention after keywords like   \n"
  298.     " IF. The indention scheme depends on your programming\n"
  299.     " language. Additionally, a C-dictionary is available \n"
  300.     " (required for AutoCompletion).                      \n"
  301. ))
  302.  
  303. (set #no_prefs (cat "\n"
  304.  
  305.     " Couldn't create preferences file ?! Please check    \n"
  306.     " whether the standard JOIN command of the AmigaOS is \n"
  307.     " available (c:join).                                 \n"
  308. ))
  309.  
  310. (set #bad_env "\n Warning - bad ENV: assign (pointing to ENVARC:)\n")
  311.  
  312. (set #install_aguide "Installation of AmigaGuide-Library...")
  313.  
  314. (set #install_reqtools "Installation of Reqtools-Library...")
  315.  
  316. (set #install_xpk "Installation of XpkMaster-Library...")
  317.  
  318. (set #second_disk (cat "\n"
  319.  
  320.     " Please insert part II of the GoldED distribution\n"
  321.     " into disk drive df0: ...                        \n"
  322. ))
  323.  
  324. (set #gui_assign "\n Add 'GUIMake:' assign to 's:user-startup' ?\n")
  325.  
  326. (set #gui_assign_help (cat "\n"
  327.  
  328.     " A 'GUIMake:' assign is required if you want to use\n"
  329.     " GUIMake (GUI driven compiler frontend).           \n"
  330. ))
  331.  
  332. (set #hs_assign "\n Add 'HISPEED:' assign to 's:user-startup' ?\n")
  333.  
  334. (set #hs_assign_help (cat "\n"
  335.  
  336.     " A 'HISPEED:' assign is required if you want to run\n"
  337.     " HiSpeed without having to worry about the current \n"
  338.     " path (i.e. you won't have to CD to HiSpeed's dir).\n"
  339.     " However, this assignment is not required if you   \n"
  340.     " don't intend to use the softfonts of this package.\n"
  341.     "                                                   \n"
  342. ))
  343.  
  344. (set #complete (cat "\n"
  345.  
  346.     "Installation complete. You should reboot your Amiga \n"
  347.     "before running this GED-release for the 1st time.   \n"
  348.     "Have fun :-)                                        \n"
  349. ))
  350.  
  351. ; --- German strings ---
  352.  
  353. (if (= @language "deutsch") (
  354.  
  355.     (set #introduction (cat "\n"
  356.  
  357.         "Programmer's Editor, Alle Rechte vorbehalten. \n"
  358.         "                                              \n"
  359.         "GoldED ©'94 Dietmar Eilert                    \n"
  360.         "Reqtools  ©'91-94 Nico François               \n"
  361.         "GUIMake ©'93 Rico Krasowski                   \n"
  362.         "                                              \n"
  363.         "GoldED ist NICHT 'frei vertreibbar'. Bitte    \n"
  364.         "lesen Sie die Lizenz-Datei, bevor Sie GoldED  \n"
  365.         "installieren. Mit der Installation stimmen Sie\n"
  366.         "den Lizenzbedingungen zu. Danke.              \n"
  367.  
  368.     ))
  369.  
  370.     (set #badkick "\n Sorry, dieses Paket benoetigt mind. OS2.04.\n")
  371.  
  372.     (set #error (cat
  373.  
  374.         " Ein Fehler ist aufgetreten. Bitte informieren Sie\n"
  375.         " den Support (dietmar@tomate.oche.de) NACHDEM Sie \n"
  376.         " die Intallation unter einer anderen Installer-   \n"
  377.         " Version (Empfehlung: 1.24) wiederholt haben.     \n"
  378.         "                                                  \n"
  379.         " Die folgende Information wird benoetigt: Fehler- \n"
  380.         " Code (s.o.), Fehler-Text, abgearbeiteter Prozent-\n"
  381.         " satz (s. Fenstertitel) und die Log-Datei. Falls  \n"
  382.         " vorhanden: ein SnoopDos-Report. Dank !           \n"
  383.     ))
  384.  
  385.     (set #assign_found "\nGoldED-Installation entdeckt...\n")
  386.  
  387.     (set #assign_found_help (cat "\n"
  388.  
  389.         " Wählen Sie 'Update', um die neue GED-Fassung über\n"
  390.         " ihre bisherige Kopie zu installieren; in diesem  \n"
  391.         " Fall wird das Skript auf einige Fragen verzichten\n"
  392.         " und sich dafür an der bisherigen Installation    \n"
  393.         " orientieren.                                     \n"
  394.         "                                                  \n"
  395.         " Mit 'Deinstallation' kann eine schon vorhandene  \n"
  396.         " GoldED-Version entfernt werden. Einige Dateien   \n" 
  397.         " werden dabei allerdings nicht gelöscht werden    \n"
  398.         " können (u.a. Libraries, da sie meist noch von    \n"
  399.         " anderen Programmen benötigt werden).             \n"
  400.         "                                                  \n"
  401.         " Sollten im Laufe dieser sicher nicht perfekten   \n"
  402.         " Installation Probleme auftreten, empfiehlt sich  \n"
  403.         " eine Deinstallation, bevor dann komplett neu     \n"
  404.         " installiert wird.                                \n"
  405.         "                                                  \n"
  406.         " Von Ihren bisherigen Presets (etwa Menus) werden \n"
  407.         " Sicherheitskopien angelegt.                      \n"
  408.         "                                                  \n"
  409.         " Libraries werden nicht überschrieben, sofern sie \n"
  410.         " nicht überholt sind).                            \n"
  411.     ))
  412.  
  413.     (set #new    "Neu installieren")
  414.     (set #update "Update (über bisherige Version installieren)")
  415.     (set #remove "Deinstallation (GoldED entfernen)")
  416.  
  417.     (set #remove_ged  "GoldED-Assign entfernen ?\n")
  418.     (set #remove_hs   "HiSpeed-Assign entfernen ?\n")
  419.     (set #remove_ed   "Quickstarter-Referenz entfernen ?\n")
  420.     (set #remove_gmk  "GUIMake-Assign entfernen ?\n")
  421.     (set #must_remove "Sie sollten den Assign/die Referenz entfernen lassen !")
  422.     (set #removed     "; (entfernt)")
  423.  
  424.     (set #pref_icons "Bevorzugten Icon-Typ wählen")
  425.  
  426.     (set #medres " mittlere Auflösung (Seitenverhältnis 1:2)")
  427.     (set #hires  " hohe Auflösung     (Seitenverhältnis 1:1)")
  428.  
  429.     (set #pref_icons_help (cat "\n"
  430.  
  431.         " Wählen Sie die mittlere Auflösung, wenn für Ihre  \n"
  432.         " Workbench ein Modus wie 640*200 eingestellt ist.  \n"
  433.         "                                                   \n"
  434.         " Die hohe Auflösung sollte bei einem Höhen/Breiten-\n"
  435.         " verhältnis von etwa 1:1 verwendet werden (640*512 \n"
  436.         " oder 800*600).                                    \n"
  437.     ))
  438.  
  439.     (set #where " Wo soll das Paket installiert werden ? \n")
  440.  
  441.     (set #where_help (cat "\n"
  442.  
  443.         " Wählen Sie ein beliebiges Verzeichnis. Hauptver-  \n"
  444.         " zeichnisse wie DH0: können auch benutzt werden.   \n"
  445.         " In dem angegebenen Pfad wird ein Ordner 'GoldED'  \n"
  446.         " samt Icon erzeugt werden.                         \n"
  447.         "                                                   \n"
  448.         " Sie sollten ein Verzeichnis wählen, dem ein Icon  \n"
  449.         " zugeordnet ist, um GoldED auch über die Workbench \n"
  450.         " wiederfinden zu können (etwa SYS:TOOLS).          \n"
  451.         "                                                   \n"
  452.         " Das GoldED-Verzeichnis wird neben dem Editor auch \n"
  453.         " diverse begleitende Dateien aufnehmen: neben einer\n"
  454.         " Makrosammlung einige Hilfsprogramme. Die Anleitung\n"
  455.         " werden Sie dort ebenfalls wiederfinden.           \n"
  456.     ))
  457.  
  458.     (set #bad_path "Sorry, Installation in RAM-Disk nicht möglich")
  459.  
  460.     (set #drive_space (cat "\n"
  461.  
  462.         " Diese Installation benötigt mindestens 1.2 MB\n"
  463.         " freien Platz auf dem Zieldatenträger. Bitte  \n"
  464.         " machen Sie diesen Platz verfügbar und starten\n"
  465.         " die Installation dann neu.                   \n"
  466.     ))
  467.  
  468.     (set #gold_lib "Installation der GoldED-Library ...")
  469.  
  470.     (set #gold_lib_help (cat "\n"
  471.  
  472.         "Diese Library wird nur für die unregistrierte Version\n"
  473.         "benötigt. Registrierte Benutzer erhalten ersatzweise \n"
  474.         "ein Keyfile.                                         \n"
  475.     ))
  476.  
  477.     (set #what_catalog "\n Welche Sprachen sollen installiert werden ?\n")
  478.  
  479.     (set #what_catalog_help (cat "\n"
  480.  
  481.         " Diese Daten werden vom Betriebssystem benötigt, um  \n"
  482.         " GoldED in verschiedenen Sprachen ablaufen zu lassen \n"
  483.         " (dazu ist allerdings mindestens OS2.1 erforderlich).\n"
  484.         "                                                     \n"
  485.         " Menus werden nicht automatisch lokalisiert, da sie  \n"
  486.         " benutzerabhängig und nicht Teil des Editors sind;   \n"
  487.         " dazu später mehr.                                   \n"
  488.     ))
  489.  
  490.     (set #add_ged_assign "'GoldED:'-Assign einrichten ?\n")
  491.  
  492.     (set #add_ged_assign_help (cat "\n"
  493.                 
  494.         " GoldED untererstützt benutzerdefinierbare Menus.  \n"
  495.         " In der Regel müssen dabei einige Menueinträge auf \n"
  496.         " externe Daten wie ARexx-Makros zugreifen. Es ist  \n"
  497.         " üblich, hierbei absolute symbolische Pfade zu ver-\n"
  498.         " wenden; Standard für diesen Editor ist 'GOLDED:'. \n"
  499.         " Wenn Sie diesen Assign nicht anbringen lassen,    \n"
  500.         " werden insbesondere unerfahrene Anwender und An-  \n"
  501.         " wenderinnen PROBLEME bekommen.                    \n"
  502.         "                                                   \n"
  503.         " Prinzipiell kann aber auf diesen Assign verzichtet\n"
  504.         " werden, da von GED selbst nur eine einzige externe\n"
  505.         " Datei benötigt wird (envarc:GoldED/GoldED.prefs). \n"
  506.     ))
  507.  
  508.     (set #quickname " Namen für Schnellstarter wählen")
  509.  
  510.     (set #other_name "(anderer)")
  511.  
  512.     (set #quickname_help (cat "\n"
  513.  
  514.         " Der Schnellstarter ist ein kleiner (4 K) Vorsatz  \n"
  515.         " für GoldED, der benutzt werden kann, ALS OB er    \n"
  516.         " selbst ein Editor wäre. Sie könnten so ED LETTER  \n"
  517.         " eingeben, um den Text LETTER zu bearbeiten, wenn  \n"
  518.         " der Name des Quickstarters ED lautet. Der Vorteil \n"
  519.         " des Quickstarters: Er kann einen schon laufenden  \n"
  520.         " Editor ansprechen und diesem die Aufgabe über-    \n"
  521.         " geben. Dies geschieht SEHR schnell. In der Praxis \n"
  522.         " werden Sie vermutlich bald nur noch den Schnell-  \n"
  523.         " starter verwenden.                                \n"
  524.         "                                                   \n"
  525.         " Namensvorgabe ist ED; damit würde der originale ED\n"
  526.         " Ihrer Workbench ersetzt. Es kann aber natürlich   \n"
  527.         " jeder beliebige Name benutzt werden.              \n"
  528.     ))
  529.  
  530.     (set #enter_name " Einen Namen angeben:\n")
  531.  
  532.     (set #enter_name_help (cat "\n"
  533.  
  534.         " Wählen Sie einen beliebigen Namen. Unter diesem   \n"
  535.         " Namen vorhandene Dateien werden überschrieben. Mit\n"
  536.         " ED würden sie den alten ED der Workbench ersetzen.\n"
  537.     ))
  538.  
  539.     (set #place_quick " Plazieren des Schnellstarters im Kommandopfad:\n")
  540.  
  541.     (set #place_quick_help (cat "\n"
  542.  
  543.         " Sie sollten eines der folgenden Verzeichnisse be- \n"
  544.         " nutzen, um den Starter durch einfache Namensangabe\n"
  545.         " von jedem Verzeichnis aus aufrufen zu können:     \n"
  546.         "                                                   \n"
  547.         " SYS:C, SYS:TOOLS, SYS:UTILITIES oder SYS:SYSTEM   \n"
  548.         "                                                   \n"
  549.         " Haben Sie den Starter ED genannt, so sollte er    \n"
  550.         " entweder in 'C:' plaziert werden oder der dort    \n"
  551.         " vorhandene ED gelöscht werden, um eindeutige Ver- \n"
  552.         " hältnisse zu schaffen.                            \n"
  553.     ))
  554.  
  555.     (set #resident "\n Schnellstarter resident machen ?\n")
  556.  
  557.     (set #resident_help (cat "\n"
  558.  
  559.         " Der Quickstarter sollte resident gemacht werden,\n"
  560.         " da er dann noch schneller ansprechbar ist. Der  \n"
  561.         " damit verbundene Speicherverbrauch ist vernach- \n"
  562.         " lässigbar (4 KB).                               \n"
  563.     ))
  564.  
  565.     (set #creating_bak "Sicherheitskopien der Einstellungen anlegen...")
  566.  
  567.     (set #bak_done (cat "\n"
  568.  
  569.         "Kopien der alten Einstellungen wurden im folgenden\n"
  570.         "Verzeichnis abgelegt:\n\n"
  571.     ))
  572.  
  573.     (set #what_menu "\n Sprache für Menu auswählen: \n")
  574.  
  575.     (set #what_menu_help (cat "\n"
  576.  
  577.         " GoldED ist 'lokalisiert', sprich: benutzt ab OS2.1  \n"
  578.         " die Locale-Library um seine Requester an die system-\n"
  579.         " weit eingestellte Sprache anzupassen. Da Menus aber \n"
  580.         " nicht Bestandteil von GoldED selbst sind, können sie\n"
  581.         " nicht automatisch lokalisiert werden. Statt dessen  \n"
  582.         " ist dem Programm mitzuteilen, welche Menudefinition \n"
  583.         " verwendet werden soll. Menudefinitionen stehen in   \n"
  584.         " Form von Dateien z.Zt. in Deutsch und Englisch zur  \n"
  585.         " Verfügung. Sie sind später auch jederzeit aus dem   \n"
  586.         " Editor heraus nachladbar.                           \n"
  587.     ))
  588.  
  589.     (set #install_gui "\n GUIMake einbinden (©'93 Rico Krasowski) ?")
  590.  
  591.     (set #install_gui_help (cat "\n"
  592.  
  593.         " GUIMake ist ein Make-Tool mit grafischer Oberfläche \n"
  594.         " und direkter Anbindung an GED (beim Programmieren   \n"
  595.         " als Ersatz für Makefiles zu verwenden). Unterstützt \n"
  596.         " Projekt-Management und komfortables Fehler-Handling \n"
  597.         " (Sprung zur fehlerhaften Zeile nach dem Übersetzen).\n"
  598.         " Mit freundlicher Genehmigung des Autors von GUIMake \n"
  599.         " (Rico Kraswoski).                                   \n"
  600.         "                                                     \n"
  601.         " Unterstützte Compiler zur Zeit: unregistrierter und \n"
  602.         " registrierter DICE.                                 \n"
  603.     ))
  604.  
  605.     (set #screen "\n Gewünschter Bildschirmmodus:\n")
  606.  
  607.     (set #screen_help (cat "\n"
  608.  
  609.         " Zur Einstellung des Bildschirmmodus vor dem ersten\n"
  610.         " Programmstart. Ich würde zu einem eigenen Screen  \n"
  611.         " raten, da GED dann schneller arbeitet und schöner \n"
  612.         " aussieht (bei Rechnern mit nur 512K Chip-RAM ist  \n"
  613.         " dafür aber möglicherweise zu wenig Speicher vor-  \n"
  614.         " handen).                                          \n"
  615.     ))
  616.  
  617.     (set #screen_ntsc   "eigener NTSC-Screen")
  618.     (set #screen_ntsc_i "eigener NTSC-Screen interlaced")
  619.     (set #screen_pal    "eigener PAL-Screen")
  620.     (set #screen_pal_i  "eigener PAL-Screen interlaced")
  621.     (set #screen_wb     "Workbench-Screen")
  622.  
  623.     (set #look_feel "Look & Feel")
  624.  
  625.     (set #look_feel_help (cat "\n"
  626.  
  627.         " Vorschlag: benutzen Sie einen 2-Farb-Modus,  \n"
  628.         " wenn Ihr Rechner eher langsam ist (68000er), \n"
  629.         " ansonsten einen 4-Farb-Modus. Seien Sie ge-  \n"
  630.         " warnt: innerhalb von GoldED stehen Ihnen noch\n"
  631.         " wesentlich mehr Modi zur Vefügung :-)        \n"
  632.     ))
  633.  
  634.     (set #mode_blue    "Blue     (2 Farben, schnellll)")
  635.     (set #mode_sun     "Sun      (4 Farben, orange-grau)")
  636.     (set #mode_tpp     "TPP      (4 Farben, dunkelblau)")
  637.     (set #mode_ocean   "Ocean    (4 Farben, helles Grün)")
  638.     (set #mode_stone   "Stone    (2 Farben, grau, schnell)")
  639.     (set #mode_leaf    "Leaf     (4 Farben, mein Favorit)")
  640.     (set #mode_ced     "CED-Blue (4 Farben, helles Grün)")
  641.     (set #mode_tennis  "Tennis   (4 Farben, rostbraun-grün)")
  642.     (set #mode_desktop "Desktop  (8 Farben, langsam)")
  643.  
  644.     (set #what_printer "\n Welchen Drucker besitzen Sie ? \n")
  645.     (set #what_printer_help "\n Geben Sie den Druckertyp an, den Sie besitzen.")
  646.  
  647.     (set #printer_deskjet "DeskJet oder Kompatibler")
  648.     (set #printer_laser   "PCL Laserdrucker")
  649.     (set #printer_other   "anderer/kein Drucker")
  650.  
  651.     (set #what_proglang "\n Bevorzugte Programmiersprache:\n")
  652.  
  653.     (set #what_proglang_other "andere/keine")
  654.  
  655.     (set #what_proglang_help (cat "\n"
  656.  
  657.         " GED bietet 'intelligente' Einrückung nach Schlüssel-\n"
  658.         " worten wie IF. Das Einrückungsschema hängt von Ihrer\n"
  659.         " Programmiersprache ab. Daneben wird bei Wahl von C  \n"
  660.         " auch noch ein C-Wörterbuch installiert, das der     \n"
  661.         " automatischen Korrektur von Groß-/Kleinschreibung   \n"
  662.         " sowie der automatischen Wortvervollständigung dient.\n"
  663.     ))
  664.  
  665.     (set #no_prefs (cat "\n"
  666.  
  667.         " Konfigurationsdatei konnte nicht erzeugt werden ?!  \n"
  668.         " Bitte überprüfen Sie, ob der originale JOIN-Befehl  \n"
  669.         " des Amiga-OS (c:join) vorhanden ist.                \n"
  670.     ))
  671.  
  672.     (set #bad_env "\n Warnung - falscher ENV:-Assign (zeigt auf ENVARC:)")
  673.  
  674.     (set #install_aguide "Installation der AmigaGuide-Library...")
  675.  
  676.     (set #install_reqtools "Installation der Reqtools-Library...")
  677.  
  678.     (set #install_xpk "Installation der XpkMaster-Library...")
  679.  
  680.     (set #second_disk (cat "\n"
  681.  
  682.         " Bitte legen Sie Teil II des GoldED-Paketes in\n"
  683.         " das Laufwerk df0: ein ...                    \n"
  684.     ))
  685.  
  686.     (set #gui_assign "\n 'GUIMake:'-Assign einrichten ?\n")
  687.  
  688.     (set #gui_assign_help (cat "\n"
  689.  
  690.         " Dieser Assign wird benötigt, wenn Sie GUIMake be-\n"
  691.         " nutzen möchten (ein Make-Programm mit grafischer \n"
  692.         " Benutzeroberfläche).                             \n"
  693.     ))
  694.  
  695.     (set #hs_assign "\n 'HISPEED:'-Assign einrichten ?\n")
  696.  
  697.     (set #hs_assign_help (cat "\n"
  698.  
  699.         " Dieser Assign wird benötigt, wenn Sie HiSpeed aus\n"
  700.         " jedem beliebigen Verzeichnis heraus aufrufen     \n"
  701.         " möchten. Er kann entfallen, wenn Sie die im Paket\n"
  702.         " enthaltenen DJ-Sftfonts nicht benutzen werden.   \n"
  703.     ))
  704.  
  705.     (set #complete (cat "\n"
  706.  
  707.         "Installation abgeschlossen. Sie sollen Ihren Amiga  \n"
  708.         "neu booten, bevor Sie diese GoldED-Fassung erstmalig\n"
  709.         "benutzen. Have fun :-)                              \n"
  710.     ))
  711. ))
  712.  
  713. ; --- French strings ---
  714.  
  715. (if (= @language "français") (
  716.  
  717.     (set #introduction (cat "\n"
  718.  
  719.         "L'éditeur du programmeur, Tous droits réservés \n"
  720.         "                                               \n"
  721.         "GoldED ©'94 Dietmar Eilert                     \n"
  722.         "Reqtools  ©'91-94 Nico François                \n"
  723.         "GUIMake ©'93 Rico Krasowski                    \n"
  724.         "                                               \n"
  725.         "GoldED N'EST PAS 'librement distribuable'.     \n"
  726.         "Consultez le fichier licence avant d'installer \n"
  727.         "GoldED; l'installation de ce logiciel signifie \n"
  728.         "que vous acceptez cette licence. Merci.        \n"
  729.     ))
  730.  
  731.     (set #badkick "\n Désolé, ce pack demande l'OS v2.04 ou mieux.\n")
  732.  
  733.     (set #error (cat
  734.  
  735.         " Une erreur est survenue. Informez-en svp un site  \n"
  736.         " de support de GoldED (DIETMAR@TOMATE.OCHE.DE).    \n"
  737.         " Les informations suivantes sont nécessaires: le   \n"
  738.         " code d'erreur (ci-dessus), le pourcentage atteint \n"
  739.         " et votre fichier log. Merci !                     \n"
  740.     ))
  741.  
  742.     (set #assign_found "\nAssign GOLDED: détecté...\n")
  743.  
  744.     (set #assign_found_help (cat "\n"
  745.  
  746.         " Si vous décidez de mettre à jour votre vieille    \n"
  747.         " installation, on ne vous demandera pas de réper-  \n"
  748.         " toires. Ceux de l'installation précédente seront  \n"
  749.         " utilisés.                                         \n"
  750.         "                                                   \n"
  751.         " Si vous décidez d'effacer votre installation      \n"
  752.         " actuelle de GoldED, celui-ci essaiera d'effacer   \n"
  753.         " les fichiers créés par une installation normale   \n"
  754.         " de GoldED. Cet utilitaire est par contre incapable\n"
  755.         " d'effacer tous les fichiers appartenant à GoldED. \n"
  756.         " Par exemple, il n'effacera pas la reqtools.library\n"
  757.         " car celle-ci peut être utilisée par d'autres      \n"
  758.         " application. Il n'effacera pas le QuickStarter car\n"
  759.         " il ne sait pas ou il se trouve.                   \n"
  760.         "                                                   \n"
  761.         " Si vous rencontrez des problèmes avec ce script   \n"
  762.         " d'installation (qui n'est certainement pas par-   \n"
  763.         " fait), effacez d'abord votre ancienne copie (uti- \n"
  764.         " lisez l'option remove) avant d'essayer une        \n"
  765.         " nouvelle installation.                            \n"
  766.         "                                                   \n"
  767.         " Des copies de sauvegarde de vos préférences sont  \n"
  768.         " faites.                                           \n"
  769.         "                                                   \n"
  770.         " Les bibliothèques ne sont pas effacées mais mises \n"
  771.         " à jour (selon le numéro de version/révision).     \n"
  772.     ))
  773.  
  774.     (set #new    "Installation de GoldED")
  775.     (set #update "Mettre à jour votre GoldED")
  776.     (set #remove "Effacer GoldED de votre système")
  777.  
  778.     (set #remove_ged  "Effacer l'assign 'GoldED:' ?\n")
  779.     (set #remove_hs   "Effacer l'assign 'HiSpeed:' ?\n")
  780.     (set #remove_ed   "Effacer l'accès au quickstarter ?\n")
  781.     (set #remove_gmk  "Effacer l'accès au GUIMake ?\n")
  782.     (set #must_remove "Vous devez effacer cet assign !")
  783.     (set #removed     "; (effacé)")
  784.  
  785.     (set #pref_icons "Sélectionnez le type d'icônes souhaité")
  786.  
  787.     (set #medres " Icônes moyenne résolution (aspect 1:2)")
  788.     (set #hires  " Icônes haute résolution (aspect 1:1)")
  789.  
  790.     (set #pref_icons_help (cat "\n"
  791.  
  792.         " Sélectionnez la moyenne résolution si votre écran\n"
  793.         " a une résolution de 640x256 ou de 640x200 (dans  \n"
  794.         " ce mode les pixels sont plus hauts que larges).  \n"
  795.         " Sélectionnez la haute résolution si la résolution\n"
  796.         " de votre écran est d'environ 1:1 (640x512 ou     \n"
  797.         " 800x600).                                        \n"
  798.     ))
  799.  
  800.     (set #where " Ou désirez-vous installer le répertoire de GED ?\n")
  801.  
  802.     (set #where_help (cat "\n"
  803.  
  804.         " Sélectionnez simplement un répertoire (le réper- \n"
  805.         " toire principal est très bien pour cela). Je vais\n"
  806.         " créer un répertoire GoldED dans votre répertoire.\n"
  807.         " Vous devriez sélectionner un répertoire possédant\n"
  808.         " une icône (ex: SYS:Utilities).                   \n"
  809.         "                                                  \n"
  810.         " Le répertoire de GoldED contiendra plusieurs fi- \n"
  811.         " chiers/utilitaires ainsi que l'éditeur principal.\n"
  812.         " Les macros ARexx sont normalement placés dans un \n"
  813.         " sous-répertoire de GoldED. Les manuels de GoldED \n"
  814.         " y sont également installés.                      \n"
  815.     ))
  816.  
  817.     (set #bad_path "Désolé, pas d'installation en RAM")
  818.  
  819.     (set #drive_space (cat "\n"
  820.  
  821.         " Cette installation demande environ 1.2 Mo de  \n"
  822.         " libre sur le volume dans lequel vous voulez   \n"
  823.         " GoldED. Libérez un peu de place sur ce volume \n"
  824.         " et réinstallez-le.                            \n"
  825.     ))
  826.  
  827.     (set #gold_lib "Installation de la GoldED.library ...")
  828.  
  829.     (set #gold_lib_help (cat "\n"
  830.  
  831.         " Cette bibliothèque est seulement requise pour la    \n"
  832.         " version non enregistrée de GoldED. Les utilisateurs \n"
  833.         " enregistrés reçoivent un fichier-clé à la place.    \n"
  834.     ))
  835.  
  836.     (set #what_catalog "\n Quels catalogues désirez-vous installer ?\n")
  837.  
  838.     (set #what_catalog_help (cat "\n"
  839.  
  840.         " Les catalogues sont requis par l'OS 2.1 ou plus pour\n"
  841.         " localiser GoldED, c.à.d pour que l'éditeur soit tra-\n"
  842.         " duit dans le langage de l'utilisateur (même si les  \n"
  843.         " menus ne sont pas localisés car ils ne dépendent pas\n"
  844.         " de l'éditeur lui-même).                             \n"
  845.     ))
  846.  
  847.     (set #add_ged_assign "Ajouter l'assign GoldED à la s:user-startup ?\n")
  848.  
  849.     (set #add_ged_assign_help (cat "\n"
  850.                 
  851.         " Cet éditeur gère des menus créés par l'utilisateur \n"
  852.         " (c.à.d vous pouvez attacher des commandes, des     \n"
  853.         " macros ARexx, des scripts... aux menus). Comme ces \n"
  854.         " fichiers externes sont beaucoup utilisés, il est   \n"
  855.         " plus commode - et recommandé - de placer tous les  \n"
  856.         " fichiers en rapport avec GoldED dans un répertoire \n"
  857.         " assigné GoldED: (ou l'un de ses sous-répertoires). \n"
  858.         " Si vous ne définissez pas cet assign, vous aurez   \n"
  859.         " des PROBLEMES. L'éditeur n'a en fait pas besoin de \n"
  860.         " cet assign pour fonctionner. Actuellement, il n'   \n"
  861.         " utilise aucun fichier externe, mis à part son fi-  \n"
  862.         " chier de configuration (envarc:golded/golded.prefs)\n"
  863.     ))
  864.  
  865.     (set #quickname " Choisissez un nom pour le Quickstarter")
  866.  
  867.     (set #other_name "(autre nom)")
  868.  
  869.     (set #quickname_help (cat "\n"
  870.  
  871.         " Le QuickStarter est une petite façade (4 Ko) de  \n"
  872.         " GoldED. Vous pouvez l'utiliser comme si c'était  \n"
  873.         " un vrai éditeur. Vous pouvez entrer par exemple  \n"
  874.         " 'ed lettre' si le QuickStarter s'appelle 'ed'.   \n"
  875.         " Le grand avantage du QuickStarter est qu'il peut \n"
  876.         " passer une nouveau texte à une tâche de GoldED   \n"
  877.         " déjà existante (s'il y en a une). Le Quickstarter\n"
  878.         " peut être résident (l'éditeur principal non).    \n"
  879.         "                                                  \n"
  880.         " Le nom par défaut de QuickStarter est 'ED' mais  \n"
  881.         " vous êtes libre de choisir le nom que vous       \n"
  882.         " voulez. Personnellement, je préfère ED           \n"
  883.         " (remplacant celui de Commodore).                 \n"
  884.     ))
  885.  
  886.     (set #enter_name " Entrez un nom:\n")
  887.  
  888.     (set #enter_name_help (cat "\n"
  889.  
  890.         " N'importe quel nom (GED, ...) est possible. Les \n"
  891.         " fichiers existants seront effacés. Si vous      \n"
  892.         " l'appelez ED, celui-ci sera perdu.              \n"
  893.     ))
  894.  
  895.     (set #place_quick (cat "\n"
  896.  
  897.         " Plaçons maintenant le QuickStarter dans un      \n"
  898.         " répertoire valable. Sélectionnez-en un:         \n"
  899.     ))
  900.  
  901.     (set #place_quick_help (cat "\n"
  902.  
  903.         " Vous devriez sélectionnez un de ces répertoires \n"
  904.         " si vous voulez entrer son nom sans vous occuper \n"
  905.         " de l'endroit où il se trouve:                   \n"
  906.         "                                                 \n"
  907.         " SYS:C, SYS:TOOLS, SYS:UTILITIES or SYS:SYSTEM   \n"
  908.         "                                                 \n"
  909.         " Si vous choisissez ED comme nom par défaut, vous\n"
  910.         " devez soit le placer dans C: ou effacer le vieux\n"
  911.         " ED pour éviter des conflits entre les deux.     \n"
  912.     ))
  913.  
  914.     (set #resident "\n Rendre Quickstarter résident?\n")
  915.  
  916.     (set #resident_help (cat "\n"
  917.  
  918.         " Je vous suggère de rendre résident le           \n"
  919.         " Quickstarter (4Ko) - il sera ainsi plus rapide. \n"
  920.     ))
  921.  
  922.     (set #creating_bak "Crée un backup des anciens règlages...")
  923.  
  924.     (set #bak_done (cat "\n"
  925.  
  926.         " Des copies de sauvegarde de vos anciens réglages ont\n"
  927.         " été placées dans le répertoire:\n\n"
  928.     ))
  929.  
  930.     (set #what_menu "\n Choisissez le langage de vos menus: \n")
  931.  
  932.     (set #what_menu_help (cat "\n"
  933.  
  934.         " GoldED est localisé (il utilise la locale.library  \n"
  935.         " du WB2/3.x) en ce qui concerne les textes internes.\n"
  936.         " Comme les menus ne font pas partie de l'éditeur en \n"
  937.         " lui-même, ils ne sont pas localisés. A la place, l \n"
  938.         " utilisateur peut choisir un fichier menu dans son  \n"
  939.         " langage.                                           \n"
  940.     ))
  941.  
  942.     (set #install_gui "\n Installer les menus GUIMake (©R.Krasowski) ?")
  943.  
  944.     (set #install_gui_help (cat "\n"
  945.  
  946.         " GUIMake est un interface de GoldED pour compilateurs\n"
  947.         " C (à utiliser à la place des makefiles). Celui-ci   \n"
  948.         " propose une gestion comfortable des projets et des  \n"
  949.         " erreurs (ex: il va à la 1ère erreur du projet dès la\n"
  950.         " compilation). Inclut avec la permission des auteurs \n"
  951.         " de GUIMake. Les compilateurs gérés sont: DICE       \n"
  952.         " enregistré et non enregistré.                       \n"
  953.     ))
  954.  
  955.     (set #screen "\n Choisissez la résolution de l'écran par défaut:")
  956.  
  957.     (set #screen_help (cat "\n"
  958.  
  959.         " Définit le mode d'écran à utiliser lors du premier \n"
  960.         " démarrage de GoldED. Je vous suggère d'utiliser un \n"
  961.         " écran Custom car cela rendra GoldED beaucoup plus  \n"
  962.         " rapide et beaucoup plus beau.                      \n"
  963.     ))
  964.  
  965.     (set #screen_ntsc   "Ecran Custom NTSC")
  966.     (set #screen_ntsc_i "Ecran Custom NTSC entrelacé")
  967.     (set #screen_pal    "Ecran Custom PAL")
  968.     (set #screen_pal_i  "Ecran Custom PAL entrelacé")
  969.     (set #screen_wb     "Ecran Workbench")
  970.  
  971.     (set #look_feel "Look & Feel")
  972.  
  973.     (set #look_feel_help (cat "\n"
  974.  
  975.         " Suggestion: utilisez un mode à 2 couleurs si votre\n"
  976.         " Amiga n'est pas très rapide (68000) ou n'importe  \n"
  977.         " lequel pour un autre Amiga. Attention: il existe  \n"
  978.         " d'autres modes disponibles depuis GoldED          \n"
  979.     ))
  980.  
  981.     (set #mode_blue    "Bleu     (2 couleurs, rapide)")
  982.     (set #mode_sun     "Sun      (4 couleurs, orange-gris)")
  983.     (set #mode_tpp     "TPP      (4 couleurs, bleu foncé)")
  984.     (set #mode_ocean   "Océan    (4 couleurs, vert clair)")
  985.     (set #mode_stone   "Pierre   (2 couleurs, gris, rapide)")
  986.     (set #mode_leaf    "Feuilles (4 couleurs, mon favori)")
  987.     (set #mode_ced     "Bleu CED (4 couleurs, bleu clair)")
  988.     (set #mode_tennis  "Tennis   (4 couleurs, marron-vert)")
  989.     (set #mode_desktop "Desktop  (8 couleurs, beau mais lent)")
  990.  
  991.     (set #what_printer "\n Quel imprimante possédez-vous ?\n")
  992.     (set #what_printer_help "\n Sélectionnez simplement votre modèle.")
  993.  
  994.     (set #printer_deskjet "DeskJet ou similaire (Olivetti, Fujitsu...)")
  995.     (set #printer_laser   "Imprimante Laser (PCL)")
  996.     (set #printer_other   "Aucune/Autre")
  997.  
  998.     (set #what_proglang "\n Votre langage de programmation préféré?\n")
  999.  
  1000.     (set #what_proglang_other "Autre")
  1001.  
  1002.     (set #what_proglang_help (cat "\n"
  1003.  
  1004.         " GoldED propose un formatage automatique après les\n"
  1005.         " mots-clé comme IF. Ce formatage dépend du langage\n"
  1006.         " de programmation. Un dictionnaire C est de plus  \n"
  1007.         " disponible (requis pour l'Autocomplétion).       \n"
  1008.     ))
  1009.  
  1010.     (set #no_prefs "\nImpossible de créer le fichier de préférences !?\n")
  1011.  
  1012.     (set #bad_env "\n WARNING: BAD ASSIGN (ENV: = ENVARC:)")
  1013.  
  1014.     (set #install_aguide "Installation de la AmigaGuide-Library...")
  1015.  
  1016.     (set #install_reqtools "Installation de la Reqtools-Library...")
  1017.  
  1018.     (set #install_xpk "Installation de la XpkMaster-Library...")
  1019.  
  1020.     (set #second_disk (cat "\n"
  1021.  
  1022.         " Insérez la deuxième disquette de la distribution\n"
  1023.         " de GoldED dans le lecteur df0: ...              \n"
  1024.     ))
  1025.  
  1026.     (set #gui_assign "\n Ajoutez l'assign GUIMake à la s:user-startup ?\n")
  1027.  
  1028.     (set #gui_assign_help (cat "\n"
  1029.  
  1030.         " Un assign 'GUIMake:' est requis pour pouvoir      \n"
  1031.         " utiliser GUIMake (Façade-pilote pour compilateur).\n"
  1032.     ))
  1033.  
  1034.     (set #hs_assign "\n Ajoutez l'assign HISPEED à la s:user-startup ?\n")
  1035.  
  1036.     (set #hs_assign_help (cat "\n"
  1037.  
  1038.         " Un assign 'HISPEED:' est requis si vous voulez      \n"
  1039.         " utiliser HiSpeed sans vous préoccuper des chemins   \n"
  1040.         " à utiliser (vous n'aurez pas à faire un CD HiSpeed).\n"
  1041.         " Cet assign n'est par contre pas requis si vous      \n"
  1042.         " ne comptez pas utiliser les polices soft de ce pack.\n"
  1043.     ))
  1044.  
  1045.     (set #complete (cat "\n"
  1046.  
  1047.         " Installation terminée. Vous devriez réinitialiser   \n"
  1048.         " votre machine avant d'utiliser GED pour la première \n"
  1049.         " fois. Bon amusement :-)                             \n"
  1050.     ))
  1051. ))
  1052.  
  1053. ; sure we are running under a 2.04 ROM ?
  1054.  
  1055. (if (< (/ (getversion) 65536) 37)
  1056.  
  1057.     (
  1058.         (message #badkick)
  1059.  
  1060.         (exit (quiet))
  1061.     )
  1062. )
  1063.  
  1064. (complete 0)
  1065.  
  1066. (run "sync SCRIPT=INSTALL.BAT")
  1067.  
  1068. (message #introduction)
  1069.  
  1070. (welcome)
  1071.  
  1072. (set @default-dest "")
  1073.  
  1074. ; set default language selection (catalogs) to 'none'
  1075.  
  1076. (set catalogs 0)
  1077.  
  1078. (if (not (exists "prefs:" (noreq))) (makeassign "prefs" "sys:prefs"))
  1079.  
  1080. (onerror (
  1081.  
  1082.     (if (> @ioerr 0) 
  1083.  
  1084.         (message (cat "\n ERROR CODE: " @ioerr "\n\n" #error))
  1085.     )
  1086. ))
  1087.  
  1088. (if (exists "GoldED:" (noreq))
  1089.  
  1090.     (set update (askchoice
  1091.  
  1092.         (prompt #assign_found)
  1093.         (help   #assign_found_help)
  1094.  
  1095.         (default 1)
  1096.  
  1097.         (choices
  1098.  
  1099.             #new
  1100.             #update
  1101.             #remove
  1102.         )
  1103.     ))
  1104. )
  1105.  
  1106. ; remove GoldED ?
  1107.  
  1108. (if (= update 2) (
  1109.  
  1110.     (if (exists "GoldED:" (noreq))
  1111.  
  1112.         (
  1113.             (run "assign >NIL: oldged: GoldED:/")
  1114.  
  1115.             (run "assign >NIL: HiSpeed:  remove")
  1116.             (run "assign >NIL: GoldED:   remove")
  1117.             (run "assign >NIL: GUIMake:  remove")
  1118.  
  1119.             (run "delete >NIL: oldged:GoldED all quiet force")
  1120.             (run "delete >NIL: oldged:GoldED.info")
  1121.  
  1122.             (if (exists "locale:catalogs/français/GoldED.catalog" (noreq))
  1123.                 (delete "locale:catalogs/français/GoldED.catalog")
  1124.             )
  1125.  
  1126.             (if (exists "locale:catalogs/deutsch/GoldED.catalog" (noreq))
  1127.                 (delete "locale:catalogs/deutsch/GoldED.catalog")
  1128.             )
  1129.  
  1130.             (if (exists "locale:catalogs/deutsch/SpellIT.catalog" (noreq))
  1131.                 (delete "locale:catalogs/deutsch/SpellIT.catalog")
  1132.             )
  1133.  
  1134.             (if (exists "locale:catalogs/français/SpellIT.catalog" (noreq))
  1135.                 (delete "locale:catalogs/français/SpellIT.catalog")
  1136.             )
  1137.  
  1138.             (if (exists "locale:catalogs/deutsch/HiSpeed.catalog" (noreq))
  1139.                 (delete "locale:catalogs/deutsch/HiSpeed.catalog")
  1140.             )
  1141.  
  1142.             (if (exists "locale:catalogs/français/HiSpeed.catalog" (noreq))
  1143.                 (delete "locale:catalogs/français/HiSpeed.catalog")
  1144.             )
  1145.  
  1146.             (run "delete >NIL: prefs:presets/GED_#? all quiet")
  1147.             (run "delete >NIL: prefs:presets/GoldED all quiet")
  1148.             (run "delete >NIL: envarc:GoldED        all quiet")
  1149.             (run "delete >NIL: env:GoldED           all quiet")
  1150.             (run "delete >NIL: envarc:HiSpeed       all quiet")
  1151.             (run "delete >NIL: env:HiSpeed          all quiet")
  1152.             (run "delete >NIL: fonts:GoldED         all quiet")
  1153.  
  1154.             (delete "s:GUIMake.pref")
  1155.             (delete "libs:golded.library")
  1156.  
  1157.             ((startup
  1158.  
  1159.                 "GoldED"
  1160.                 (prompt  #remove_ged)
  1161.                 (help    #must_remove)
  1162.                 (command #removed)
  1163.             ))
  1164.  
  1165.             ((startup
  1166.  
  1167.                 "HiSpeed"
  1168.                 (prompt  #remove_hs)
  1169.                 (help    #must_remove)
  1170.                 (command #removed)
  1171.             ))
  1172.  
  1173.             ((startup
  1174.  
  1175.                 "GED_quick"
  1176.                 (prompt  #remove_ed)
  1177.                 (help    #must_remove)
  1178.                 (command #removed)
  1179.             ))
  1180.  
  1181.             ((startup
  1182.  
  1183.                 "GUIMake"
  1184.                 (prompt  #remove_gmk)
  1185.                 (help    #must_remove)
  1186.                 (command #removed)
  1187.             ))
  1188.         )
  1189.     )
  1190.  
  1191.     (exit (quiet))
  1192. ))
  1193.  
  1194. (complete 1)
  1195.  
  1196. (if (= update 1)
  1197.  
  1198.     (
  1199.         ; <icons>: 0 = medRes icons, 1 = hiRes icons
  1200.  
  1201.         (if (> (getsize "golded:golded.info") 800)
  1202.  
  1203.             (set icons 1)
  1204.             (set icons 0)
  1205.         )
  1206.     )
  1207.  
  1208.     (set icons
  1209.  
  1210.         (askchoice
  1211.  
  1212.             (prompt #pref_icons)
  1213.             (help   #pref_icons_help)
  1214.  
  1215.             (choices
  1216.  
  1217.                 #medres
  1218.                 #hires
  1219.             )
  1220.  
  1221.             (default 1)
  1222.         )
  1223.     )
  1224. )
  1225.  
  1226. (complete 2)
  1227.  
  1228. ; install the main editor
  1229.  
  1230. (set reboot 1)
  1231.  
  1232. (if (= update 1)
  1233.  
  1234.     (set target "golded:/")
  1235.  
  1236.     ((set target (askdir
  1237.  
  1238.         (prompt #where)
  1239.         (help   #where_help)
  1240.  
  1241.         (default "SYS:TOOLS")
  1242.     ))
  1243. ))
  1244.  
  1245. (set @default-dest target)
  1246.  
  1247. ; no installation to RAM disk allowed ...
  1248.  
  1249. (if (= "RAM" (getdevice target))
  1250.  
  1251.     (
  1252.         (message #bad_path)
  1253.  
  1254.         (exit (quiet))
  1255.     )
  1256. )
  1257.  
  1258. (complete 5)
  1259.  
  1260. (set targetsize (getdiskspace target))
  1261.  
  1262. (if (= update 0)
  1263.  
  1264.     (if (< targetsize 1250000) (
  1265.  
  1266.         (if (<> (getdevice target) "RAM") (
  1267.  
  1268.             (abort #drive_space)
  1269.         ))
  1270.     ))
  1271. )
  1272.  
  1273. (complete 10)
  1274.  
  1275. (copyfiles
  1276.  
  1277.     (source "data/main")
  1278.     (dest target)
  1279.     (infos)
  1280.     (all)
  1281. )
  1282.  
  1283. (makeassign "GoldED" (tackon target "GoldED"))
  1284.  
  1285. ; install manuals
  1286.  
  1287. (copyfiles
  1288.  
  1289.     (source "data/doc")
  1290.     (dest "GoldED:")
  1291.     (infos)
  1292.     (all)
  1293. )
  1294.  
  1295. ; install keyfile ?
  1296.  
  1297. (if (not (exists ("envarc:GoldED"))) (makedir "envarc:GoldED"))
  1298.  
  1299. (if (exists "keyfile/keyfile")
  1300.  
  1301.     (copyfiles
  1302.  
  1303.         (source "keyfile/keyfile")
  1304.         (dest "envarc:golded")
  1305.     )
  1306.  
  1307.     (if (not (exists "envarc:golded/keyfile"))
  1308.  
  1309.         (copylib
  1310.  
  1311.             (prompt #gold_lib)
  1312.             (help   #gold_lib_help)
  1313.  
  1314.             (source "data/libs/golded.library")
  1315.             (dest "libs:")
  1316.             (confirm)
  1317.         )
  1318.     )
  1319. )
  1320.  
  1321. ; install new drawer icon ?
  1322.  
  1323. (if (not (exists (tackon target "GoldED.info")))
  1324.  
  1325.     (copyfiles
  1326.  
  1327.         (source "data/icons/drawer/GoldED.info")
  1328.         (dest target)
  1329.         (infos)
  1330.     )
  1331. )
  1332.  
  1333. ; get rid of .info file created by installer
  1334.  
  1335. (delete (tackon target ".info"))
  1336.  
  1337. (complete 15)
  1338.  
  1339. (if (= icons 0)
  1340.  
  1341.     (copyfiles
  1342.  
  1343.       (source "data/Icons/GoldED")
  1344.       (dest (tackon target "GoldED"))
  1345.       (all)
  1346.       (infos)
  1347.     )
  1348. )
  1349.  
  1350. (makeassign "GoldED" (tackon target "GoldED"))
  1351.  
  1352. ; remove obsolete files
  1353.  
  1354. (delete "GoldED:GoldED.guide" (infos))
  1355. (delete "GoldED:Hi!" (infos))
  1356. (delete "GoldED:Tools/Unlock.info" (infos))
  1357. (delete "GoldED:rx")
  1358. (delete "GoldED:API/ReadMe.info")
  1359. (delete "GoldED:API/dock/dock1.prefs")
  1360. (delete "GoldED:API/dock/dock2.prefs")
  1361. (delete "GoldED:.info")
  1362.  
  1363. (run "delete >NIL: GoldED:Tools/Unlock all")
  1364.  
  1365. ; update GoldDock icons ?
  1366.  
  1367. (if (exists "GoldED:API/GoldDock/GoldDock")
  1368.  
  1369.     (if (= icons 0)
  1370.  
  1371.         (copyfiles
  1372.  
  1373.             (source "data/icons/golddock/medres")
  1374.             (dest   "GoldED:API")
  1375.             (all)
  1376.             (infos)
  1377.         )
  1378.         (copyfiles
  1379.  
  1380.             (source "data/icons/golddock/hires")
  1381.             (dest   "GoldED:API")
  1382.             (all)
  1383.             (infos)
  1384.         )
  1385.     )
  1386. )
  1387.  
  1388. ; create GoldED ARexx macro icons
  1389.  
  1390. (if (= icons 0)
  1391.  
  1392.     (run "MOVEICONS QUIET DIR=golded:arexx ICON=data/icons/script/medres DX=100 DY=35 COLUMNS=5")
  1393.     (run "MOVEICONS QUIET DIR=golded:arexx ICON=data/icons/script/hires  DX=100 DY=40 COLUMNS=5")
  1394. )
  1395.  
  1396. (complete 20)
  1397.  
  1398. (if (= update 1)
  1399.  
  1400.     (
  1401.         ; 1=english, 2=german, 4=french (7=all, 0=none)
  1402.  
  1403.         (set catalogs 1)
  1404.  
  1405.         (if (exists "locale:catalogs/deutsch/golded.catalog" (noreq))
  1406.  
  1407.             (
  1408.                 (set catalogs (+ catalogs 2))
  1409.                 (delete "locale:catalogs/deutsch/golded.catalog")
  1410.                 (delete "locale:catalogs/deutsch/SpellIT.catalog")
  1411.             )
  1412.         )
  1413.  
  1414.         (if (exists "locale:catalogs/français/golded.catalog" (noreq))
  1415.  
  1416.             (
  1417.                 (set catalogs (+ catalogs 4))
  1418.                 (delete "locale:catalogs/français/golded.catalog")
  1419.                 (delete "locale:catalogs/français/SpellIT.catalog")
  1420.             )
  1421.         )
  1422.     )
  1423.  
  1424.     ((set catalogs (askoptions
  1425.  
  1426.         (prompt #what_catalog)
  1427.         (help   #what_catalog_help)
  1428.  
  1429.         (choices
  1430.  
  1431.             " English"
  1432.             " Deutsch"
  1433.             " Français"
  1434.         )
  1435.  
  1436.         (default 7)
  1437.     ))
  1438. ))
  1439.  
  1440. (if (not (exists "locale:" (noreq))) (
  1441.  
  1442.     (makedir "sys:locale")
  1443.     (makeassign  "locale" "sys:locale")
  1444. ))
  1445.  
  1446. (if (not (exists "locale:catalogs"))) (makedir "locale:catalogs")
  1447.  
  1448. ; install German catalog
  1449.  
  1450. (if (IN catalogs 1) (
  1451.  
  1452.     (if (not (exists "locale:catalogs/deutsch"))) (makedir "locale:catalogs/deutsch")
  1453.  
  1454.     (copyfiles
  1455.  
  1456.         (source "data/catalogs/deutsch")
  1457.         (dest   "locale:catalogs/deutsch")
  1458.         (all)
  1459.     )
  1460. ))
  1461.  
  1462. ; install French catalog
  1463.  
  1464. (if (IN catalogs 2) (
  1465.  
  1466.     (if (not (exists "locale:catalogs/français"))) (makedir "locale:catalogs/français")
  1467.  
  1468.     (copyfiles
  1469.  
  1470.         (source "data/catalogs/français")
  1471.         (dest   "locale:catalogs/français")
  1472.         (all)
  1473.     )
  1474. ))
  1475.  
  1476. (if (= update 0)
  1477.  
  1478.     (   
  1479.         (makeassign  "GoldED" (tackon target "GoldED"))
  1480.         
  1481.         (startup
  1482.  
  1483.             "GoldED"
  1484.  
  1485.             (prompt #add_ged_assign)
  1486.             (help   #add_ged_assign_help)
  1487.         
  1488.             (command  ("ASSIGN >NIL: GOLDED: %s " (tackon target "GoldED")))
  1489.         )
  1490.     )
  1491. )
  1492.  
  1493. (complete 25)
  1494.  
  1495. ; install QuickStarter
  1496.  
  1497. (set progname (askchoice
  1498.  
  1499.     (prompt #quickname)
  1500.     (help   #quickname_help)
  1501.  
  1502.     (choices 
  1503.  
  1504.         "GED"
  1505.         "ED"
  1506.         #other_name
  1507.     )
  1508.  
  1509.     (default 1)
  1510. ))
  1511.  
  1512. (complete 30)
  1513.  
  1514. (if (= progname 0) (set name "GED"))
  1515. (if (= progname 1) (set name "ED" ))
  1516.  
  1517. (if (= progname 2)
  1518.  
  1519.     (set name (askstring
  1520.  
  1521.         (prompt #enter_name)
  1522.         (help   #enter_name_help)
  1523.  
  1524.         (default "ED")
  1525.     ))
  1526. )
  1527.  
  1528. (complete 35)
  1529.  
  1530. (set comdir (askdir
  1531.  
  1532.     (prompt #place_quick)
  1533.     (help   #place_quick_help)
  1534.  
  1535.     (default "C:")
  1536. ))
  1537.  
  1538. (copyfiles 
  1539.  
  1540.     (source  "data/main/GoldED/ED")
  1541.     (dest    comdir)
  1542.     (newname name)
  1543. )
  1544.  
  1545. (run "resident >NIL: ED remove")
  1546.  
  1547. (startup
  1548.  
  1549.     "GED_quick"
  1550.  
  1551.     (prompt #resident)
  1552.     (help   #resident_help)
  1553.  
  1554.     (command (cat "resident " (tackon comdir name) " pure"))
  1555. )
  1556.  
  1557. (complete 40)
  1558.  
  1559. ; install presets ...
  1560.  
  1561. (set prefsdir "prefs:presets/GoldED")
  1562.  
  1563. (if (exists prefsdir) (
  1564.  
  1565.     (set bakdir "prefs:presets/GED_BAK")
  1566.  
  1567.     (if (exists bakdir) (
  1568.  
  1569.         (while (exists bakdir) (
  1570.  
  1571.             (set bakdir (cat bakdir "X"))
  1572.  
  1573.         ))
  1574.     ))
  1575.  
  1576.     (complete 45)
  1577.  
  1578.     (working #creating_bak)
  1579.  
  1580.     (complete 50)
  1581.  
  1582.     (copyfiles
  1583.  
  1584.       (source prefsdir)
  1585.       (dest   bakdir)
  1586.       (nogauge)
  1587.       (all)
  1588.     )
  1589.  
  1590.     (message (cat #bak_done bakdir))
  1591.  
  1592.     (run (cat "delete " prefsdir " all quiet"))
  1593. ))
  1594.  
  1595. (complete 55)
  1596.  
  1597. (copyfiles
  1598.  
  1599.   (source "data/presets")
  1600.   (dest   "prefs:presets")
  1601.   (all)
  1602. )
  1603.  
  1604. (complete 60)
  1605.  
  1606. ; install config file ...
  1607.  
  1608. (set language 255)
  1609.  
  1610. ; already a language selected (while installing main editor) ?
  1611.  
  1612. (if (= catalogs 1) (set language 0))
  1613. (if (= catalogs 2) (set language 1))
  1614. (if (= catalogs 4) (set language 2))
  1615.  
  1616. (if (= language 255) (
  1617.  
  1618.     (set language (askchoice
  1619.  
  1620.         (prompt #what_menu)
  1621.         (help   #what_menu_help)
  1622.  
  1623.         (choices
  1624.  
  1625.             "English"
  1626.             "Deutsch"
  1627.             "Français"
  1628.         )
  1629.  
  1630.         (default 0)
  1631.     ))
  1632. ))
  1633.  
  1634. (set guimake (askbool
  1635.  
  1636.     (prompt #install_gui)
  1637.     (help   #install_gui_help)
  1638.  
  1639.     (default 1)
  1640. ))
  1641.  
  1642. (if (= guimake 1)
  1643.  
  1644.     ; install GUIMake
  1645.  
  1646.     (
  1647.         (if (= language 0) (set menufile "GUI_FactoryUS.men"))
  1648.         (if (= language 1) (set menufile "GUI_FactoryD.men" ))
  1649.         (if (= language 2) (set menufile "GUI_FactoryF.men" ))
  1650.     )
  1651.  
  1652.     ; don't install GUIMake
  1653.  
  1654.     (
  1655.         (if (= language 0) (set menufile "FactoryUS.men"))
  1656.         (if (= language 1) (set menufile "FactoryD.men" ))
  1657.         (if (= language 2) (set menufile "FactoryF.men" ))
  1658.     )
  1659. )
  1660.  
  1661. (if (= (database "vblank") 50) (
  1662.  
  1663.     (set vblank 1)
  1664.     (set vblank 3)
  1665. ))
  1666.  
  1667. (complete 61)
  1668.  
  1669. (set screen (askchoice
  1670.  
  1671.     (prompt #screen)
  1672.     (help   #screen_help)
  1673.  
  1674.     (choices
  1675.  
  1676.         #screen_ntsc
  1677.         #screen_ntsc_i
  1678.         #screen_pal
  1679.         #screen_pal_i
  1680.         #screen_wb
  1681.     )
  1682.  
  1683.     (default vblank)
  1684. ))
  1685.  
  1686. (complete 62)
  1687.  
  1688. (if (= screen 4)
  1689.  
  1690.     (set display "workbench.dsp")
  1691.  
  1692.     (
  1693.         (if (< (/ (getversion) 65536) 39)
  1694.  
  1695.             (
  1696.                 (set mode (askchoice
  1697.                 
  1698.                     (prompt #look_feel)
  1699.                     (help   #look_feel_help)
  1700.  
  1701.                     (choices
  1702.  
  1703.                         #mode_blue
  1704.                         #mode_sun
  1705.                         #mode_tpp
  1706.                         #mode_ocean
  1707.                         #mode_stone
  1708.                         #mode_leaf
  1709.                     )
  1710.                 ))
  1711.             )
  1712.  
  1713.             (
  1714.                 (set mode (askchoice
  1715.                 
  1716.                     (prompt #look_feel)
  1717.                     (help   #look_feel_help)
  1718.  
  1719.                     (choices
  1720.  
  1721.                         #mode_blue
  1722.                         #mode_sun
  1723.                         #mode_tpp
  1724.                         #mode_ocean
  1725.                         #mode_stone
  1726.                         #mode_leaf
  1727.                         #mode_ced
  1728.                         #mode_tennis
  1729.                         #mode_desktop
  1730.                     )
  1731.                 ))
  1732.             )
  1733.         )
  1734.  
  1735.         (if (= mode 0) (set display "Blue"  ))
  1736.         (if (= mode 1) (set display "Sun"   ))
  1737.         (if (= mode 2) (set display "TPP"   ))
  1738.         (if (= mode 3) (set display "Ocean" ))
  1739.         (if (= mode 4) (set display "Stone" ))
  1740.         (if (= mode 5) (set display "Leaf"  ))
  1741.         (if (= mode 6) (set display "CED"   ))
  1742.         (if (= mode 7) (set display "Tennis"))
  1743.         (if (= mode 8) (set display "Desktop"))
  1744.  
  1745.         (if (or (= screen 0) (= screen 1))
  1746.  
  1747.             (set display (cat display "_NTSC"))
  1748.             (set display (cat display "_PAL" ))
  1749.         )
  1750.  
  1751.         (if (or (= screen 1) (= screen 3)) (
  1752.  
  1753.             (set display (cat display "_LACE"))
  1754.         ))
  1755.  
  1756.         (set display (cat display ".dsp"))
  1757.     )
  1758. )
  1759.  
  1760. (complete 63)
  1761.  
  1762. (set printer (askchoice
  1763.  
  1764.     (prompt #what_printer)
  1765.     (help   #what_printer_help)
  1766.  
  1767.     (choices
  1768.  
  1769.         #printer_deskjet
  1770.         #printer_laser
  1771.         #printer_other
  1772.     )
  1773.  
  1774.     (default 0)
  1775. ))
  1776.  
  1777. (if (= printer 2)
  1778.  
  1779.     (set prtfile "standard.prt"  )
  1780.     (set prtfile "DeskJetLQ.prt" )
  1781. )
  1782.  
  1783. (complete 64)
  1784.  
  1785. (set proglang (askchoice
  1786.  
  1787.     (prompt #what_proglang)
  1788.     (help   #what_proglang_help)
  1789.  
  1790.     (choices
  1791.  
  1792.         "C"
  1793.         "Pascal"
  1794.         "Basic"
  1795.         #what_proglang_other
  1796.     )
  1797.  
  1798.     (default 0)
  1799. ))
  1800.  
  1801. (if (= proglang 0) 
  1802.  
  1803.     ((set indention  "C.ind") 
  1804.      (set dictionary "C.dic"))
  1805.  
  1806.     ((set indention  "empty.ind")
  1807.      (set dictionary "empty.dic"))
  1808. )
  1809.  
  1810. (if (= proglang 1) (set indention "Pascal.ind"))
  1811. (if (= proglang 2) (set indention "Basic.ind"))
  1812.  
  1813. (if (not (exists ("envarc:GoldED"))) (makedir "envarc:GoldED"))
  1814.  
  1815. (if (exists "envarc:GoldED/GoldED.prefs" (noreq))
  1816.  
  1817.     (
  1818.         (run (cat "SplitConfig envarc:GoldED/GoldED.prefs " prefsdir " YourOldConfig"))
  1819.  
  1820.         (delete "envarc:GoldED/GoldED.prefs")
  1821.     )
  1822. )
  1823.  
  1824. (copyfiles
  1825.  
  1826.     (source "data/envarc")
  1827.     (dest "envarc:")
  1828.     (infos)
  1829.     (all)
  1830. )
  1831.  
  1832. (set prefs " data/presets/GoldED/")
  1833.  
  1834. ; create main preferences file by joining preset files (order is important)
  1835.  
  1836. (run (cat
  1837.    
  1838.    "JOIN "
  1839.  
  1840.    (cat prefs "standard.msc")
  1841.    (cat prefs "standard.key")
  1842.    (cat prefs "empty.ref"   )
  1843.    (cat prefs  display      )
  1844.    (cat prefs "standard.def")
  1845.    (cat prefs  prtfile      )
  1846.    (cat prefs "standard.tab")
  1847.  
  1848.    " AS T:GED.prefs"
  1849. ))
  1850.  
  1851. (run (cat
  1852.    
  1853.    "JOIN T:GED.prefs "
  1854.  
  1855.    (cat prefs  menufile     )
  1856.    (cat prefs  dictionary   )
  1857.    (cat prefs  indention    )
  1858.    (cat prefs "standard.lay")
  1859.    (cat prefs "empty.prj"   )
  1860.    (cat prefs "standard.hnt")
  1861.    (cat prefs "standard.gui")
  1862.    (cat prefs "standard.api")
  1863.    (cat prefs "standard.rat")
  1864.  
  1865.    " AS envarc:GoldED/GoldED.prefs"
  1866. ))
  1867.  
  1868. (if (not (exists "envarc:GoldED/GoldED.prefs"))
  1869.  
  1870.     (message #no_prefs)
  1871. )
  1872.  
  1873. (delete "t:GED.prefs")
  1874.  
  1875. (if (= (expandpath "env:") (expandpath "envarc:"))
  1876.  
  1877.     (message #bad_env)
  1878.  
  1879.     (
  1880.         (copyfiles
  1881.  
  1882.             (source "envarc:GoldED")
  1883.             (dest   "env:GoldED")
  1884.             (all)
  1885.             (infos)
  1886.         )
  1887.  
  1888.         (delete "envarc:.info")
  1889.     )
  1890. )
  1891.  
  1892. ; install 2nd set of icons (medRes, pixel ratio approx. 1:2) ?
  1893.  
  1894. (if (= icons 0)
  1895.  
  1896.     (copyfiles 
  1897.  
  1898.       (source "data/Icons/Envarc")
  1899.       (dest   "envarc:")
  1900.       (infos)
  1901.       (all)
  1902.     )
  1903. )
  1904.  
  1905. (complete 65)
  1906.  
  1907. (if (= update 0) (
  1908.  
  1909.     ; install libraries ?
  1910.  
  1911.     (if (exists "support/amigaguide")
  1912.  
  1913.         (copylib
  1914.  
  1915.             (prompt #install_aguide)
  1916.             (help @copylib-help)
  1917.             (source "support/amigaguide/amigaguide.library")
  1918.             (dest "libs:")
  1919.             (confirm)
  1920.         )
  1921.     )
  1922.  
  1923.     (if (exists "support/reqtools") (
  1924.  
  1925.         (copylib
  1926.  
  1927.             (prompt #install_reqtools)
  1928.             (help @copylib-help)
  1929.             (source "support/reqtools/reqtools.library")
  1930.             (dest "libs:")
  1931.             (confirm)
  1932.         )
  1933.  
  1934.         (if (not (exists "envarc:ReqTools.prefs")) (
  1935.  
  1936.             (copyfiles (source "support/reqtools/ReqTools.prefs") (dest "envarc:"))
  1937.  
  1938.         ))
  1939.     ))
  1940.  
  1941.     (if (exists "support/xpk") (
  1942.  
  1943.         (copylib
  1944.  
  1945.             (prompt #install_xpk)
  1946.             (help @copylib-help)
  1947.             (dest "libs:")
  1948.             (source "support/xpk/xpkmaster.library")
  1949.             (confirm)
  1950.         )
  1951.  
  1952.         (if (not (exists "libs:compressors"))
  1953.  
  1954.             (copyfiles
  1955.  
  1956.                 (source "support/xpk/compressors")
  1957.                 (dest   "libs:compressors")
  1958.                 (all)
  1959.             )
  1960.         )
  1961.     ))
  1962.  
  1963.     (complete 70)
  1964.  
  1965. ))
  1966.  
  1967. ; install font (has been revised, i.e. has to be installed in update mode, too)
  1968.  
  1969. (copyfiles
  1970.  
  1971.     (source "data/fonts" )
  1972.     (dest   "fonts:")
  1973.     (all)
  1974.     (nogauge)
  1975. )
  1976.  
  1977. (complete 75)
  1978.  
  1979. ; install tools
  1980.  
  1981. (set drive "GoldED:Tools")
  1982.  
  1983. (if (not (exists drive)) (makedir drive))
  1984.  
  1985. ; explicitely makedir drawers containing nested subdrawers (former installer versions seem to have a problem here ?!)
  1986.  
  1987. (if (not (exists (tackon drive "HiSpeed"))) (makedir (tackon drive "HiSpeed")))
  1988.  
  1989. (if (not (exists (tackon drive "GUIMake"))) (makedir (tackon drive "GUIMake")))
  1990.  
  1991. (complete 80)
  1992.  
  1993. ; get rid of blank within destination path name ("Ram disk:") ...
  1994.  
  1995. (if (= "RAM" (getdevice drive)) (set drive "RAM:"))
  1996.  
  1997. ; install catalogs
  1998.  
  1999. (if (not (exists "locale:" (noreq))) (
  2000.  
  2001.     (makedir "sys:locale")
  2002.     (makeassign  "locale" "sys:locale")
  2003. ))
  2004.  
  2005. (copyfiles 
  2006.  
  2007.     (source "data/tools/locale")
  2008.     (dest "locale:")
  2009.     (all)
  2010. )
  2011.  
  2012. (if (exists "GUIMake:" (noreq)) (set guimake 1))
  2013.  
  2014. (if (= guimake 1) (
  2015.  
  2016.     (set target (tackon drive "GUIMake"))
  2017.  
  2018.     ((startup
  2019.  
  2020.         "GUIMake"
  2021.  
  2022.         (prompt #gui_assign)
  2023.         (help   #gui_assign_help)
  2024.  
  2025.         (command  ("ASSIGN >NIL: GUIMake: %s " target))
  2026.     ))
  2027. ))
  2028.  
  2029. (set target (tackon drive "HiSpeed"))
  2030.  
  2031. (if (not (exists target)) (makedir target))
  2032.  
  2033. (makeassign "HISPEED" target)
  2034.  
  2035. (run "delete HISPEED:#? ALL QUIET")
  2036.  
  2037. (copyfiles
  2038.  
  2039.     (source "data/tools/HiSpeed")
  2040.     (dest "HISPEED:")
  2041.     (all)
  2042.     (infos)
  2043. )
  2044.  
  2045. (copyfiles (source "data/tools/HiSpeed.info") (infos) (dest drive))
  2046.  
  2047. ; create HiSpeed ARexx macro icons
  2048.  
  2049. (if (= icons 0)
  2050.  
  2051.     (run "MOVEICONS QUIET DIR=hispeed:arexx ICON=data/icons/script/medres DX=100 DY=35 COLUMNS=5")
  2052.     (run "MOVEICONS QUIET DIR=hispeed:arexx ICON=data/icons/script/hires  DX=100 DY=40 COLUMNS=5")
  2053. )
  2054.  
  2055. (complete 85)
  2056.  
  2057. (if (= update 0) (
  2058.  
  2059.     ((startup
  2060.  
  2061.         "HISPEED"
  2062.  
  2063.         (prompt #hs_assign)
  2064.         (help   #hs_assign_help)
  2065.  
  2066.         (command  ("ASSIGN >NIL: HISPEED: %s " target))
  2067.     ))
  2068.  
  2069.     ; remove obsolete files
  2070.  
  2071.     (delete "envarc:hispeed.config")
  2072.     (delete "s:HiSpeed.config")
  2073.  
  2074.     (delete "data/tools/HiSpeed/Setup"     (infos))
  2075.     (delete "data/tools/HiSpeed/ARexxDoc"  (infos))
  2076.     (delete "data/tools/HiSpeed/SetupE"    (infos))
  2077.     (delete "data/tools/HiSpeed/ARexxEDoc" (infos))
  2078. ))
  2079.  
  2080. (if (exists "envarc:HiSpeed")
  2081.  
  2082.     (
  2083.         (copyfiles
  2084.  
  2085.             (source  "envarc:HiSpeed/HiSpeed.prefs")
  2086.             (newname "HiSpeed.prefs.bak")
  2087.             (dest    "envarc:HiSpeed")
  2088.         )
  2089.  
  2090.         (delete "envarc:HiSpeed/HiSpeed.prefs")
  2091.     )
  2092.  
  2093.     (makedir "envarc:HiSpeed")
  2094. )
  2095.  
  2096. (copyfiles
  2097.  
  2098.     (source "data/tools/envarc")
  2099.     (dest   "envarc:")
  2100.     (infos)
  2101.     (all)
  2102. )
  2103.  
  2104. (delete "envarc:.info")
  2105.  
  2106. ; install keyfile ?
  2107.  
  2108. (if (exists "envarc:golded/keyfile")
  2109.  
  2110.     (copyfiles
  2111.  
  2112.         (source "envarc:golded/keyfile")
  2113.         (dest   "envarc:hispeed")
  2114.     )
  2115. )
  2116.  
  2117. (if (<> (expandpath "env:") (expandpath "envarc:"))
  2118.  
  2119.     (
  2120.         (copyfiles
  2121.  
  2122.             (source "envarc:HiSpeed")
  2123.             (dest   "env:HiSpeed")
  2124.             (all)
  2125.             (infos)
  2126.         )
  2127.  
  2128.         (delete "envarc:.info")
  2129.     )
  2130. )
  2131.  
  2132. (complete 90)
  2133.  
  2134. (copyfiles
  2135.  
  2136.     (source "data/tools")
  2137.     (dest "GoldED:Tools")
  2138.     (pattern "(ED|PRJ|REC|GUI|GED|API|CAT)#?")
  2139.     (infos)
  2140. )
  2141.  
  2142. ; delete obsolete files
  2143.  
  2144. (run "delete GoldED:Tools/GEDDock#? all quiet")
  2145.  
  2146. (makeassign "GUIMake" "GoldED:tools/guimake")
  2147.  
  2148. (copyfiles
  2149.  
  2150.     (source "data/tools/GUIMake/s/GUIMake.pref")
  2151.     (dest "s:")
  2152. )
  2153.  
  2154. ; tools: install med-res icons ?
  2155.  
  2156. (if (= icons 0) (
  2157.  
  2158.     (copyfiles
  2159.  
  2160.       (source "data/icons/tools")
  2161.       (dest "GoldED:Tools")
  2162.       (all)
  2163.       (infos)
  2164.     )
  2165. ))
  2166.  
  2167. ; snapshot drawer icons
  2168.  
  2169. (run "MOVEICONS DIR=golded:tools GRID DX=100 DY=30 COLUMNS=3")
  2170.  
  2171. (complete 95)
  2172.  
  2173. (if (not (= update 2)) (message #complete))
  2174.  
  2175. (complete 100)
  2176.