home *** CD-ROM | disk | FTP | other *** search
/ Merciful 3 / Merciful_Release_3.bin / software / a / artstudiov2.0.lha / artstudio / Install_ArtStudio < prev    next >
Text File  |  1996-10-29  |  11KB  |  560 lines
  1. ; $VER: ArtStudio_Install 2.009 (28.05.96)
  2. ; Script to install ArtStudio Version 2.0
  3.  
  4. (complete 0)
  5. (user 1)
  6.  
  7. ;=============================================================================
  8. ; English strings
  9.  
  10. (set default_lang 4)
  11.  
  12. (set #bad-kick "ArtStudio needs Amiga-OS 2.0 or higher")
  13.  
  14. (set SelectDir1Msg
  15.      (cat "Please select a directory\nto install ArtStudio in"
  16.      )
  17. )
  18.  
  19. (Set ProgMsg
  20.      (cat "Which parts should i install?"
  21.      )
  22. )
  23.  
  24. (set Choise1Msg "ArtStudio Mainprogram (1.2MB)")
  25. (set Choise2Msg "ArtStudio Instruction (5MB)")
  26. (set Choise3Msg "ArtStudio Tools (50KB)")
  27. (set Choise5Msg "Example Images (3MB)")
  28.  
  29. (set ChoiseGrey16 "Grey 16")
  30. (set ChoiseColor16 "Color 16")
  31. (set ChoiseColor256 "Color 256")
  32. (set ChoiseHAM8 "Color HAM8")
  33. (set Choise24BIT "Color 24Bit")
  34.  
  35. (set InstallArtStudioProg "Installing ArtStudio release 2.0 main program...")
  36. (set InstallLoader "Installing loader...")
  37. (set InstallSaver "Installing saver...")
  38. (set InstallOperator "Installing Operator files...")
  39. (set InstallViewer "Installing viewers...")
  40. (set InstallARexx "Installing ARexx files...")
  41. (set InstallColor "Installing color files...")
  42. (set InstallGuide "Installing Guide-File...")
  43. (set InstallCatalog "Installing Catalogs files...")
  44. (set InstallTools "Installing Tools...")
  45. (set InstallDataBase "Installing DataBase...")
  46. (set InstallImages "Installing Images...")
  47. (set AssignAdd1
  48.      (cat "\nAdding the ArtStudio assignment to s:user-startup - it currently looks like this:\n\n%s\n\n"
  49.           (cat "assign ArtStudio: " ArtStudioDir)
  50.      )
  51. )
  52. (set SelectDir2 "Please select a directory\nto install the catalogs in")
  53.  
  54. (set SelectDir3 "Please select a directory\nto install the images in")
  55.  
  56. (set UpDateASL "Checking and updating ASL.library, if needed...")
  57.  
  58.  
  59. ;=============================================================================
  60. ; German strings
  61.  
  62. (if   (= @language "deutsch")
  63. (
  64.  (set default_lang 2)
  65.  
  66.  (set #bad-kick "ArtStudio benötigt mindestens Amiga-OS 2.0 oder höher")
  67.  
  68.  (set SelectDir1Msg
  69.       (cat "Wählen Sie ein Verzeichnis, wo Sie ArtStudio "
  70.            "installieren möchten. Ein Verzeichnis mit den "
  71.            "Namen ArtStudio wird automatisch angelegt!"
  72.       )
  73.  )
  74.  
  75.  (Set ProgMsg
  76.       (cat "\nWelche Dateien sollen installiert werden?\n"
  77.       )
  78.  )
  79.  
  80.  (set Choise1Msg "ArtStudio Hauptprogramm (ca. 1.2MB)")
  81.  (set Choise2Msg "ArtStudio Anleitung (ca. 5MB)")
  82.  (set Choise3Msg "ArtStudio Tools (ca. 50KB)")
  83.  (set Choise5Msg "Beispiel Bilder (ca. 3MB)")
  84.  
  85.  (set ChoiseGrey16 "16 Graustufen")
  86.  (set ChoiseColor16 "16 Farben")
  87.  (set ChoiseColor256 "256 Farben")
  88.  (set ChoiseHAM8 "HAM8 Farben")
  89.  (set Choise24BIT "24Bit Farben")
  90.  
  91.  (set InstallArtStudioProg "Installiere ArtStudio Version 2.0 Hauptprogramm...")
  92.  (set InstallLoader "Installiere Lademodule...")
  93.  (set InstallSaver "Installiere Speichermodule...")
  94.  (set InstallOperator "Installiere Bildbearbeitungsmodule...")
  95.  (set InstallViewer "Installiere Anzeigemodule...")
  96.  (set InstallARexx "Installiere ARexx Programme...")
  97.  (set InstallColor "Installiere Farbdateien...")
  98.  (set InstallGuide "Installiere Guide-Datei...")
  99.  (set InstallCatalog "Installiere Sprachkataloge...")
  100.  (set InstallTools "Installiere Werkzeuge...")
  101.  (set InstallDataBase "Installiere Kataloge...")
  102.  (set InstallImages "Installiere Bilder...")
  103.  (set AssignAdd1
  104.       (cat "\nFüge ArtStudio Zuweisung an s:user-startup - Es würde wie folgt Aussehen:\n\n%s\n\n"
  105.            (cat "assign ArtStudio: " ArtStudioDir)
  106.       )
  107.  )
  108.  (set SelectDir2
  109.       (cat "Wählen Sie ein Verzeichnis, wo Sie die "
  110.            "Kataloge installieren möchten."
  111.       )
  112.  )
  113.  (set SelectDir3
  114.       (cat "Wählen Sie ein Verzeichnis, wo Sie die "
  115.            "Bilder installieren möchten."
  116.       )
  117.  )
  118.  
  119.  (set UpDateASL "Prüfe und Erneuere die ASL.library, wenn nötig...")
  120.  
  121. )
  122. )
  123.  
  124. (if (> (* 37 65536) (getversion "exec.library" (resident)))
  125.         (abort #bak-kick)
  126. )
  127.  
  128.  
  129. (welcome)
  130. (set old_level @user-level)
  131.  
  132. (user 2)
  133.  
  134. (set target (askdir
  135.         (prompt SelectDir1Msg)
  136.         (help #which-dir-help)
  137.         (default "ArtStudio:")
  138. ))
  139. (user old_level)
  140.  
  141. (set @default-dest target)
  142.  
  143. (set ArtStudioDir        (tackon target "ArtStudio"))
  144.  
  145. (set WAS
  146.       (askoptions
  147.       (prompt ProgMsg)
  148.       (help   @askchoice-help)
  149.       (choices Choise1Msg Choise2Msg Choise3Msg Choise5Msg)
  150.       (default 31)
  151.       )
  152. )
  153.  
  154. (set LoaderDir        (tackon ArtStudioDir "Loader"))
  155. (set OperatorDir    (tackon ArtStudioDir "Operator"))
  156. (set ViewerDir        (tackon ArtStudioDir "Viewer"))
  157. (set SaverDir        (tackon ArtStudioDir "Saver"))
  158. (set RexxDir        (tackon ArtStudioDir "Rexx"))
  159. (set ColorDir        (tackon ArtStudioDir "Color"))
  160. (set ToolsDir        (tackon ArtStudioDir "Tools"))
  161.  
  162. (If (IN WAS 0)
  163.  (
  164.   (if ( < (exists ArtStudioDir (noreq) ) 2)
  165.     (makedir ArtStudioDir
  166.         (prompt "Creating ArtStudio directory...")
  167.         (help @makedir-help)
  168.         (infos)
  169.     )
  170.   )
  171.  
  172.   (complete 10)
  173.  
  174.   (if ( < (exists LoaderDir (noreq) ) 2)
  175.     (makedir LoaderDir
  176.         (prompt "Creating Loader directory...")
  177. ;        (help @makedir-help)
  178.     )
  179.   )
  180.  
  181.   (complete 11)
  182.  
  183.   (if ( < (exists ViewerDir (noreq) ) 2)
  184.     (makedir ViewerDir
  185.         (prompt "Creating Viewer directory...")
  186. ;        (help @makedir-help)
  187.     )
  188.   )
  189.  
  190.   (complete 12)
  191.  
  192.   (if ( < (exists RexxDir (noreq) ) 2)
  193.     (makedir RexxDir
  194.         (prompt "Creating Rexx directory...")
  195. ;        (help @makedir-help)
  196.     )
  197.   )
  198.  
  199.   (complete 13)
  200.  
  201.   (if ( < (exists ColorDir (noreq) ) 2)
  202.     (makedir ColorDir
  203.         (prompt "Creating Color directory...")
  204. ;        (help @makedir-help)
  205.     )
  206.   )
  207.  
  208.   (complete 14)
  209.  
  210.   (if ( < (exists SaverDir (noreq) ) 2)
  211.     (makedir SaverDir
  212.         (prompt "Creating Saver directory...")
  213. ;        (help @makedir-help)
  214.     )
  215.   )
  216.  
  217.   (complete 15)
  218.  
  219.   (if ( < (exists ToolsDir (noreq) ) 2)
  220.     (makedir ToolsDir
  221.         (prompt "Creating Tools directory...")
  222. ;        (help @makedir-help)
  223.     )
  224.   )
  225.  
  226.   (complete 16)
  227.  
  228.   (if ( < (exists OperatorDir (noreq) ) 2)
  229.     (makedir OperatorDir
  230.         (prompt "Creating Operator directory...")
  231. ;        (help @makedir-help)
  232.     )
  233.   )
  234.  
  235.  
  236.   (complete 15)
  237.  
  238.   (copyfiles
  239.     (prompt "Copy ArtStudio...")
  240.     (help @copyfiles-help)
  241.     (source "ArtStudio")
  242.     (dest "ram:")
  243.     (confirm)
  244.   )
  245.  
  246.   (complete 25)
  247.  
  248.   (run "c/Registration"
  249.      (prompt "ArtStudio registrieren...")
  250.      (help "Keine Hilfe verfügbar.")
  251.   )
  252.  
  253.   (complete 30)
  254.  
  255.   (copyfiles
  256.     (prompt "Installing ArtStudio release 1.0 main program...")
  257.     (help @copyfiles-help)
  258.     (source "ram:ArtStudio")
  259.     (dest ArtStudioDir)
  260.     (confirm)
  261.   )
  262.  
  263.   (complete 35)
  264.  
  265.   (run "c/delete ram:ArtStudio"
  266.        (prompt "Delete ram:ArtStudio...")
  267.        (help "Keine Hilfe verfügbar.")
  268.   )
  269.  
  270.   (complete 37)
  271.  
  272.   (copyfiles
  273.     (prompt "Installing ArtStudio Icon...")
  274.     (help @copyfiles-help)
  275.     (source "ArtStudio.info")
  276.     (dest ArtStudioDir)
  277.     (confirm)
  278.   )
  279.  
  280.   (complete 38)
  281.  
  282.   (copyfiles
  283.     (prompt "Installing loader...")
  284.     (help @copyfiles-help)
  285.     (source "Loader/")
  286.     (dest LoaderDir)
  287.     (all)
  288.     (confirm)
  289.   )
  290.  
  291.   (complete 40)
  292.  
  293.   (copyfiles
  294.     (prompt "Installing saver...")
  295.     (help @copyfiles-help)
  296.     (source "Saver/")
  297.     (dest SaverDir)
  298.     (all)
  299.     (confirm)
  300.   )
  301.  
  302.   (complete 45)
  303.  
  304.   (copyfiles
  305.     (prompt "Installing Operator files...")
  306.     (help @copyfiles-help)
  307.     (source "Operator/")
  308.     (dest OperatorDir)
  309.     (all)
  310.     (confirm)
  311.   )
  312.  
  313.   (complete 50)
  314.  
  315.   (copyfiles
  316.     (prompt "Installing viewers...")
  317.     (help @copyfiles-help)
  318.     (source "Viewer/")
  319.     (dest ViewerDir)
  320.     (all)
  321.     (confirm)
  322.   )
  323.  
  324.   (complete 55)
  325.  
  326.   (copyfiles
  327.     (prompt "Installing ARexx files...")
  328.     (help @copyfiles-help)
  329.     (source "Rexx/")
  330.     (dest RexxDir)
  331.     (all)
  332.     (confirm)
  333.   )
  334.  
  335.   (complete 60)
  336.  
  337.   (copyfiles
  338.     (prompt "Installing color files...")
  339.     (help @copyfiles-help)
  340.     (source "Color/")
  341.     (dest ColorDir)
  342.     (all)
  343.     (confirm)
  344.   )
  345.  
  346.   (complete 65)
  347.  
  348.   (copyfiles
  349.     (prompt "Installing Catalogs files...")
  350.     (help @copyfiles-help)
  351.     (source "Catalogs/")
  352.     (dest "Sys:Locale/Catalogs/")
  353.     (all)
  354.     (confirm)
  355.   )
  356.  
  357.   (complete 68)
  358.  
  359.   (startup "ArtStudio"
  360.     (prompt ("\nAdding the ArtStudio assignment to s:user-startup - it currently looks like this:\n\n%s\n\n" (cat "assign ArtStudio: " ArtStudioDir) ) )
  361.     (help @startup-help)
  362.     (command (cat "assign ArtStudio: " ArtStudioDir))
  363.   )
  364.  
  365.  )
  366. )
  367.  
  368.   (complete 70)
  369.  
  370. (If (IN WAS 1)
  371.  (
  372.  
  373.   (copyfiles
  374.     (prompt "Installing Tools...")
  375.     (help @copyfiles-help)
  376.     (source "Tools/")
  377.     (dest ToolsDir)
  378.         (all)
  379.         (infos)
  380.     (confirm)
  381.   )
  382.  
  383.  )
  384. )
  385.  
  386. (If (IN WAS 2)
  387.  (
  388.  
  389.   (complete 75)
  390.  
  391.   (if (= default_lang 4)
  392.   (
  393.     (set ArtStudioDocDir (askdir
  394.         (prompt "Please select a directory\nto install the instruction in")
  395.         (help #which-dir-help)
  396.         (default ArtStudioDir)
  397.     ))
  398.  
  399.       (copyfiles
  400.           (prompt "Copying instruction...")
  401.           (help @copyfiles-help)
  402.           (source "Instruction/")
  403.           (dest ArtStudioDocDir)
  404.           (infos)
  405.           (all)
  406.           (confirm)
  407.       )
  408.  
  409.   ))
  410.  
  411.   (if (= default_lang 2)
  412.    (
  413.      (set ArtStudioDocDir (askdir
  414.         (prompt "Wählen Sie ein Verzeichnis, wo Sie die "
  415.                 "Anleitung installieren möchten.")
  416.         (help #which-dir-help)
  417.         (default ArtStudioDir)
  418.      ))
  419.  
  420.       (copyfiles
  421.           (prompt "Kopiere Anleitung...")
  422.           (help @copyfiles-help)
  423.           (source "Anleitung/" )
  424.           (dest ArtStudioDocDir)
  425.           (infos)
  426.           (all)
  427.           (confirm)
  428.       )
  429.    )
  430.   )
  431.  )
  432. )
  433.  
  434. (If (IN WAS 3)
  435.  (
  436.  
  437.   (set WAS3
  438.         (askoptions
  439.          (prompt ProgMsg)
  440.          (help   @askchoice-help)
  441.          (choices ChoiseGrey16 ChoiseColor16 ChoiseColor256 ChoiseHAM8 Choise24BIT)
  442.          (default 31)
  443.         )
  444.   )
  445.  
  446.  
  447.   (set DataBaseDir (askdir
  448.         (prompt "Wählen Sie ein Verzeichnis, wo Sie die "
  449.                 "Kataloge installieren möchten."
  450.                 )
  451.         (help #which-dir-help)
  452.         (default ArtStudioDir)
  453.   )
  454.  
  455.  )
  456.   (If (IN WAS3 0)
  457.     (copyfiles
  458.     (prompt "Installing Catalogs...")
  459.     (help @copyfiles-help)
  460.     (source "BaseDatei/Grey16_128x96/")
  461.     (dest (tackon DataBaseDir "Grey16_128x96"))
  462.     (all)
  463.     (confirm)
  464.     )
  465. )
  466.   (If (IN WAS3 1)
  467.     (copyfiles
  468.     (prompt "Installing Catalogs...")
  469.     (help @copyfiles-help)
  470.     (source "BaseDatei/Color16_128x96/")
  471.     (dest (tackon DataBaseDir "Color16_128x96"))
  472.     (all)
  473.     (confirm)
  474.     )
  475. )
  476.   (If (IN WAS3 2)
  477.     (copyfiles
  478.     (prompt "Installing Catalogs...")
  479.     (help @copyfiles-help)
  480.     (source "BaseDatei/Color256_128x96/")
  481.     (dest (tackon DataBaseDir "Color256_128x96"))
  482.     (all)
  483.     (confirm)
  484.     )
  485. )
  486.   (If (IN WAS3 3)
  487.     (copyfiles
  488.     (prompt "Installing Catalogs...")
  489.     (help @copyfiles-help)
  490.     (source "BaseDatei/ColorHam8_128x96/")
  491.     (dest (tackon DataBaseDir "ColorHam8_128x96"))
  492.     (all)
  493.     (confirm)
  494.     )
  495. )
  496.   (If (IN WAS3 4)
  497.     (copyfiles
  498.     (prompt "Installing Catalogs...")
  499.     (help @copyfiles-help)
  500.     (source "BaseDatei/Color24Bit_128x96/")
  501.     (dest (tackon DataBaseDir "Color24Bit_128x96"))
  502.     (all)
  503.     (confirm)
  504.     )
  505. )
  506.  
  507.   (complete 75)
  508.  
  509.  )
  510. )
  511.  
  512. (If (IN WAS 4)
  513.  (
  514.   (set ImageDir (askdir
  515.         (prompt "Wählen Sie ein Verzeichnis, wo Sie die "
  516.                 "Bilder installieren möchten."
  517.                 )
  518.         (help #which-dir-help)
  519.         (default ArtStudioDir)
  520.   ))
  521.  
  522.   (complete 80)
  523.  
  524.   (copyfiles
  525.     (prompt "Installing Images...")
  526.     (help @copyfiles-help)
  527.     (source "Images/")
  528.     (dest ImageDir)
  529.     (all)
  530.     (confirm)
  531.   )
  532.  
  533.   (complete 85)
  534.  
  535.   (startup "ASDisk4"
  536.     (prompt ("\nAdding the ArtStudioCD assignment to s:user-startup - it currently looks like this:\n\n%s\n\n" (cat "assign ArtStudioCD: " ImageDir) ) )
  537.     (help @startup-help)
  538.     (command (cat "assign ArtStudioCD: " ImageDir))
  539.   )
  540.  )
  541. )
  542.  
  543. (If (IN WAS 0)
  544.  (
  545.  
  546.   (complete 90)
  547.  
  548.   (copylib
  549.     (prompt "Checking and updating ASL.library, if needed...")
  550.     (help @copylib-help)
  551.     (source "libs/asl.library")
  552.     (dest "libs:")
  553.     (confirm)
  554.   )
  555.  
  556.  )
  557. )
  558.  
  559. (complete 100)
  560.