home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 109 / EnigmaAmiga109CD.iso / software / manutenzione / ioblixuser / install < prev    next >
Text File  |  2000-01-03  |  13KB  |  394 lines

  1. ;
  2. ; $VER: IOBlix installation 1.6 (4.1.00)
  3. ;
  4. ; Copyright (c) 1998 Thore Böckelmann and RBM Computertechnik
  5. ;
  6.  
  7. ;****************************************************************************
  8. ;
  9. ; English texts
  10. ;
  11. (if (not (= @language "deutsch"))
  12.     (
  13.         (set #bad-kick      "You must have AmigaOS 2.0 (V37) or newer to be able to use the IOBlix I/O board.")
  14.         (set #bad-cpu       "You must have at least an MC68020 to use the IOBlix software.")
  15.         (set #cantremove    (cat "Cannot remove old ioblix.resource! "
  16.                                  "Please quit any software using the IOBlix before installing the new drivers!"))
  17.         (set #cantinit      (cat "Cannot initialize ioblix.resource! "
  18.                                  "Please quit any software using the IOBlix before installing the new drivers!"))
  19.         (set #noioblix      (cat "You have no IOBlix board installed! "
  20.                                  "Please install the board first, before you install the software!"))
  21.         (set #selectboard   (cat "You have an IOBlixZ2 board and an IOBlix1200 module installed!\n"
  22.                                  "For which hardware do you want to install the software?"))
  23.         (set #installz2     "\n\nI will now install the software for the IOBlixZ2 board.")
  24.         (set #install1200   "\n\nI will now install the software for a IOBlix1200 module.")
  25.         (set #selectdevs    "\nWhere to install the device drivers?\n")
  26.         (set #selectl       "\nWhere to install the IOBlix-Handler?\n")
  27.         (set #selecttool    "\nWhere to install the additional tools (a new drawer will be created automatically)?\n")
  28.         (set #copyserdev    "\nCopying serial device driver...\n")
  29.         (set #copypardev    "\nCopying parallel device driver...\n")
  30.         (set #copyhandler   "\nCopying IOBlix-Handler...\n")
  31.         (set #copydosdriver "\nCopying DOSDrivers...\n")
  32.         (set #copytools     (cat "\nCopying Tools...\n"
  33.                                  "For information about the AutoMounter read the help page.\n"))
  34.         (set #tools-help    (cat "The AutoMounter makes mount files for ZIP media nearly obsolete, as long as you use ZIP media with an "
  35.                                  "Amiga compliant RDB. The RDB is written by programms like HDToolbox or any other program to prepare a "
  36.                                  "harddisk. The AutoMounter checks for every ZIP drive connected to a parallel port in case of a media change "
  37.                                  "if the inserted media is already mounted. If not, the AutoMounter tries to mount it, similar if you entered "
  38.                                  "\"mount <device>\" in a shell.\n"
  39.                                  "If you use a new FileSystem with the media the AutoMounter also will try to load that FileSystem from the RDB.\n"
  40.                                  "If all that could be done successfully the media will be ready ca. 5 seconds after insertion.\n"
  41.                                  "\n"
  42.                                  "The AutoMounter will NOT work for PC-formatted media, because these have no RDB! If you wish to work with "
  43.                                  "PC-formatted media you will have to use mount files, just as before!"))
  44.         (set #createtest    "\nCreating \"Test_Board\" script...\n")
  45.         (set #ssmodify      "\nAdding some command to S:User-Startup...\n")
  46.         (set #toolsource    "C/english")
  47.         (set #nsdinfo       (cat "\n"
  48.                                  "\n"
  49.                                  "If don't want to use IOBlix' own drivers SERxx: and PARxx: "
  50.                                  "but the original drivers instead, then you also have to install the NSDPatch software!\n"
  51.                                  "\n"
  52.                                  "NSDPatch can be found in the drawer \"Goodies\""))
  53.     )
  54. )
  55.  
  56. ;****************************************************************************
  57. ;
  58. ; Deutsche Texte
  59. ;
  60. (if (= @language "deutsch")
  61.     (
  62.         (set #bad-kick      "Sie müssen AmigaOS 2.0 (V37) oder höher installieren, um die IOBlix-Karte zu benutzen.")
  63.         (set #bad-cpu       "Sie brauchen mindestens einen MC68020, um die IOBlix-Software zu benutzen.")
  64.         (set #cantremove    (cat "Kann alte ioblix.resource nicht aus dem System entfernen!\n"
  65.                                  "Bitte beenden Sie alle Programme, die den IOBlix benutzen, bevor Sie die neue Software installieren!"))
  66.         (set #cantinit      (cat "Kann ioblix.resource nicht initialisieren!\n"
  67.                                  "Bitte beenden Sie alle Programme, die den IOBlix benutzen, bevor Sie die neue Software installieren!"))
  68.         (set #noioblix      (cat "Sie haben keine IOBlix-Karte in Ihrem Rechner installiert! "
  69.                                  "Bitte bauen Sie erst die Karte ein, bevor Sie die Software installieren!"))
  70.         (set #selectboard   (cat "Sie haben ein IOBlixZ2-Karte und ein IOBlix1200-Modul installiert!\n"
  71.                                  "Für welche Hardware wollen Sie die Software installieren?"))
  72.         (set #installz2     "\n\nEs wird jetzt die Software für die IOBlixZ2-Karte installiert.")
  73.         (set #install1200   "\n\nEs wird jetzt die Software für ein IOBlix1200-Modul installiert.")
  74.         (set #selectdevs    "\nWohin sollen die Gerätetreiber kopiert werden?\n")
  75.         (set #selectl       "\nWohin soll der IOBlix-Handler kopiert werden?\n")
  76.         (set #selecttool    "\nWohin sollen die Zusatzprogramme kopiert werden (eine neue Schublade wird automatisch angelegt)?\n")
  77.         (set #copyserdev    "\nKopiere seriellen Gerätetreiber...\n")
  78.         (set #copypardev    "\nKopiere parallelen Gerätetreiber...\n")
  79.         (set #copyhandler   "\nKopiere IOBlix-Handler...\n")
  80.         (set #copydosdriver "\nKopiere DOSDrivers...\n")
  81.         (set #copytools     (cat "\nKopiere Zusatzprogramme...\n"
  82.                                  "Für Informationen über den AutoMounter lesen Sie bitte die Hilfeseite.\n"))
  83.         (set #tools-help    (cat "Mit dem AutoMounter werden Mount-Dateien so gut wie unnötig, solange Sie mit ZIP-Medien arbeiten, "
  84.                                  "die einen Amiga-kompatiblen RDB besitzen. Der RDB wird von Programmen wie der HDToolbox oder ähnlichen "
  85.                                  "Programmen zum Partitionieren von Festplatten geschrieben. Der AutoMounter überprüft für jedes in ein "
  86.                                  "am Parallel-Port angeschlossenes ZIP-Drive bei einem Medienwechsel, ob das Medium bereits angemeldet ist, "
  87.                                  "und wenn nicht, so wird versucht es anzumelden, genauso als wenn Sie in einer Shell \"mount <device>\" "
  88.                                  "eingegeben hätten.\n"
  89.                                  "Wird ein FileSystem benutzt, daß bisher nicht im System verwendet wird, so wird ebenfalls versucht das "
  90.                                  "FileSystem aus dem RDB des Mediums zu laden.\n"
  91.                                  "Ist das alles erfolgreich abgelaufen, so steht Ihnen nach ca. 5 Sekunden das Medium zur Arbeit bereit.\n"
  92.                                  "\n"
  93.                                  "Dieses Verfahren funktioniert NICHT bei PC-formatierten Medien, da diese keinen RDB besitzen! Um mit "
  94.                                  "PC-formatierten Medien zu arbeiten müssen Sie also auch weiterhin eine Mount-Datei benutzen!"))
  95.         (set #createtest    "\nErstelle \"Test_Board\" Skript...\n")
  96.         (set #ssmodify      "\nFüge Befehle in S:User-Startup ein...\n")
  97.         (set #toolsource    "C/deutsch")
  98.         (set #nsdinfo       (cat "\n"
  99.                                  "\n"
  100.                                  "Wenn Sie statt der IOBlix-eigenen Treibern SERxx: und PARxx: "
  101.                                  "lieber weiterhin die originalen Treiber benutzen wollen, dann müssen Sie noch die NSDPatch-Software installieren!\n"
  102.                                  "\n"
  103.                                  "NSDPatch finden Sie in der Schublade \"Goodies\""))
  104.     )
  105. )
  106.  
  107. ;****************************************************************************
  108. ;
  109. ; Setup
  110. ;
  111.  
  112. (complete 0)
  113.  
  114. (if (< (/ (getversion) 65536) 37)
  115.     (abort #bad-kick)
  116. )
  117.  
  118. (if (patmatch "68000|68010" (database "cpu"))
  119.     (abort #bad-cpu)
  120. )
  121.  
  122. (run "execute install-assign")
  123.  
  124. ;****************************************************************************
  125. ;
  126. ; Welcome
  127. ;
  128.  
  129. (welcome)
  130.  
  131. (complete 10)
  132.  
  133. ;****************************************************************************
  134. ;
  135. ; Check for IOBlix board
  136. ;
  137.  
  138. (set #setupcheck (run "C/english/SetupIOBlix remove" (safe)))
  139. (if (< 0 #setupcheck)
  140.     (abort #cantremove)
  141. )
  142.  
  143. (set #setupcheck (run "C/english/SetupIOBlix reinit" (safe)))
  144. (if (< 0 #setupcheck)
  145.     (abort #cantinit)
  146. )
  147.  
  148. (set #ioblixz2
  149.     (+
  150.         (run "C/Look4IOBlix hw=ser" (safe))
  151.         (run "C/Look4IOBlix hw=par" (safe))
  152.     )
  153. )
  154. (set #ioblix1200
  155.     (+
  156.         (run "C/Look4IOBlix a1200 hw=ser" (safe))
  157.         (run "C/Look4IOBlix a1200 hw=par" (safe))
  158.     )
  159. )
  160.  
  161. (if (> 2 @user-level)
  162.     (
  163.         (if (and (= 0 #ioblixz2) (= 0 #ioblix1200))
  164.             (abort #noioblix)
  165.         )
  166.     )
  167.     (
  168.         (set #ioblixz2 5)
  169.         (set #ioblix1200 5)
  170.     )
  171. )
  172.  
  173. (if (and (< 0 #ioblixz2) (< 0 #ioblix1200))
  174.     (
  175.         (set #ioblixboard
  176.             (askchoice
  177.                 (prompt #selectboard)
  178.                 (help @askchoice-help)
  179.                 (choices "IOBlixZ2" "IOBlix1200")
  180.                 (default 0)
  181.             )
  182.         )
  183.     )
  184.     (
  185.         (if (< 0 #ioblixz2)
  186.             (
  187.                 (set #ioblixboard 0)
  188.             )
  189.             (
  190.                 (set #ioblixboard 1)
  191.             )
  192.         )
  193.     )
  194. )
  195.  
  196. (if (= 0 #ioblixboard)
  197.     (
  198.         (message #installz2)
  199.     )
  200.     (
  201.         (message #install1200)
  202.     )
  203. )
  204.  
  205. (complete 20)
  206.  
  207. ;****************************************************************************
  208. ;
  209. ; Setup directory
  210. ;
  211.  
  212. (set #destdevs
  213.     (askdir
  214.         (prompt #selectdevs)
  215.         (help @askdir-help)
  216.         (default "DEVS:")
  217.     )
  218. )
  219.  
  220. (set #destl
  221.     (askdir
  222.         (prompt #selectl)
  223.         (help @askdir-help)
  224.         (default "L:")
  225.     )
  226. )
  227.  
  228. (set #desttool
  229.     (askdir
  230.         (prompt #selecttool)
  231.         (help @askdir-help)
  232.         (default "SYS:IOBlix")
  233.         (newpath)
  234.     )
  235. )
  236.  
  237. (set @default-dest #desttool)
  238.  
  239. (complete 20)
  240.  
  241. (makedir #desttool
  242.     (prompt "")
  243.     (help @makedir-help)
  244.     (infos)
  245. )
  246.  
  247. (complete 30)
  248.  
  249. ;****************************************************************************
  250. ;
  251. ; Install devices
  252. ;
  253.  
  254. (if (= 0 #ioblixboard)
  255.     (
  256.         (set #file "Devs/IOBlixZ2/ioblixser.device")
  257.     )
  258.     (
  259.         (set #file "Devs/IOBlix1200/ioblix12ser.device")
  260.     )
  261. )
  262. (copylib
  263.     (help @copylib-help)
  264.     (prompt #copyserdev)
  265.     (source #file)
  266.     (dest #destdevs)
  267.     (confirm)
  268. )
  269.  
  270. (if (= 0 #ioblixboard)
  271.     (
  272.         (set #file "Devs/IOBlixZ2/ioblixpar.device")
  273.     )
  274.     (
  275.         (set #file "Devs/IOBlix1200/ioblix12par.device")
  276.     )
  277. )
  278. (copylib
  279.     (help @copylib-help)
  280.     (prompt #copypardev)
  281.     (source #file)
  282.     (dest #destdevs)
  283.     (confirm)
  284. )
  285.  
  286. (copylib
  287.     (help @copylib-help)
  288.     (prompt #copyhandler)
  289.     (source "l/IOBlix-Handler")
  290.     (dest #destl)
  291.     (confirm)
  292. )
  293.  
  294. (if (= 0 #ioblixboard)
  295.     (
  296.         (copyfiles
  297.             (help @copyfiles-help)
  298.             (prompt #copydosdriver)
  299.             (source "Devs/IOBlixZ2/DOSDrivers")
  300.             (choices "PAR00" "PAR01" "SER00" "SER01" "SER02" "SER03")
  301.             (dest "SYS:Storage/DOSDrivers")
  302.             (infos)
  303.             (confirm)
  304.         )
  305.     )
  306.     (
  307.         (copyfiles
  308.             (help @copyfiles-help)
  309.             (prompt #copydosdriver)
  310.             (source "Devs/IOBlix1200/DOSDrivers")
  311.             (choices "PAR00" "PAR01" "SER00" "SER01" "SER02" "SER03")
  312.             (dest "SYS:Storage/DOSDrivers")
  313.             (infos)
  314.             (confirm)
  315.         )
  316.     )
  317. )
  318.  
  319. (complete 40)
  320.  
  321. ;****************************************************************************
  322. ;
  323. ; Install tools
  324. ;
  325.  
  326. (copyfiles
  327.     (help #tools-help)
  328.     (prompt #copytools)
  329.     (source #toolsource)
  330.     (choices "SetupIOBlix" "QueryIOBlix" "ResetQuaddddroPort" "AutoMount.demon")
  331.     (dest #desttool)
  332.     (confirm)
  333. )
  334.  
  335. (if (<> 0 #ioblixboard)
  336.     (
  337.         (if (<> 0 (run "search S:User-Startup ResetQuaddddroPort >nil:" (safe)))
  338.             (
  339.                 (textfile
  340.                     (dest "S:User-Startup.old")
  341.                     (prompt "")
  342.                     (help "")
  343.                     (include "S:User-Startup")
  344.                 )
  345.                 (textfile
  346.                     (dest "S:User-Startup")
  347.                     (prompt "")
  348.                     (help "")
  349.                     (append (cat (tackon #desttool "ResetQuaddddroPort") "\n"))
  350.                     (include "S:User-Startup.old")
  351.                 )
  352.             )
  353.         )
  354.     )
  355. )
  356.  
  357. (startup "IOBlix I/O Board"
  358.     (help @startup-help)
  359.     (prompt #ssmodify)
  360.     (command (cat (tackon #desttool "SetupIOBlix") " automounter >NIL:"))
  361. )
  362.  
  363. (complete 60)
  364.  
  365. (copyfiles
  366.     (help @copyfiles-help)
  367.     (prompt #createtest)
  368.     (dest #desttool)
  369.     (source "Test_Board")
  370.     (infos)
  371. )
  372.  
  373. (textfile
  374.     (dest (tackon #desttool "Test_Board"))
  375.     (prompt #createtest)
  376.     (help "")
  377.     (append (tackon #desttool "QueryIOBlix >t:queryioblix{$$}\n"))
  378.     (append "more t:queryioblix{$$}\n")
  379.     (append "delete t:queryioblix{$$} >nil:\n")
  380. )
  381.  
  382. ;complete 80)
  383.  
  384. (message #nsdinfo)
  385.  
  386. ;****************************************************************************
  387. ;
  388. ; Exit
  389. ;
  390.  
  391. (complete 100)
  392. (exit)
  393.  
  394.