;************************************************************
;**  CYBERMAGIC Installer-Script for AmigaOS3.5            **
;**  ©1997-2000 by Markus Killian                          **
;**  Last changes on 05.12.99                              **
;************************************************************

(if (= x 1) (welcome))
 (onerror (CLEANUP))

(procedure CLEANUP
 (delete "t:fx01.8svx")
 (delete "t:fx02.8svx")
 (delete "t:Background")
 (delete "t:Background.prefs")
 (delete "T:Logopic")
 (delete "T:Logopic.prefs")
)

( set OS_VER ( / ( getversion ) 65536 ) )

(complete 0)

;====================================================================
;English strings

( set #yeskey "Yes" )
( set #nokey  "No" )
( set #english "English" )
( set #german "German" )
( set #maindrawer "Please select a device or a drawer for your\ninstallation of Cybermagic.\nA drawer will be created automatically." )
( set #version "Which version should be installed ?\n" )
( set #active "Do you want to copy Cybermagic in the WBStartup drawer ?\n" )
( set #installwizard "Install Wizard.library.\n" )
( set #assign "\nMake assign of Cybermagic: to S:user-startup.\n" )
( set #falsekick "OS 3.x is required.\n" )
( set #end "\nThis is release BETA 0.4.0 of Cybermagic.\nRead the docs for more information.\nBugreport to m.killian@xpoint.at\n\n---VIVA AMIGA ---\n" );
( set #falsecpu "You need a 68020 CPU for the minimal installation.\n" )
( set #updateinstaller "You need the Installer version 43.3\n" )

;====================================================================
;German strings

( if ( = @language "deutsch" )
 (
  ( set #yeskey "Ja" )
  ( set #nokey  "Nein" )
  ( set #english "Englisch" )
  ( set #german "Deutsch" )
  ( set #maindrawer "In welches Verzeichnis soll Cybermagic installiert werden ? Eine Schublade dieses Namens wird angelegt.\n" )
  ( set #version "Welche Version soll installiert werden ?\n" )
  ( set #active "Soll Cybermagic nach WBStartup kopiert werden ?\n" )
  ( set #installwizard "Installiere Wizard.library.\n" )
  ( set #assign "\nErzeuge Zuweisung Cybermagic: in S:user-startup.\n" )
  ( set #falsekick "OS 3.x wird benötigt.\n" )
  ( set #end "\nDies ist die Version BETA 0.4.0 von Cybermagic.\nLies die Anleitung für mehr Informationen.\nFehlerreport an m.killian@xpoint.at\n\n--- VIVA AMIGA ---\n" )
  ( set #falsecpu "Es wird mindestens eine 68020 Cpu benötigt.\n" )
  ( set #updateinstaller "Es wird mindestens die Version 43.3 des Installers benötigt.\n" )
 )
)

;/* Check OS Version */

( if( < OS_VER 39 ) ( abort #falsekick ) )

;/* Check Installer Version */

( if( < InstallerVer "43.3" ) ( message #updateinstaller ) )

;/* Check CPU */

( set cpu ( database "cpu" ) )
( if( = cpu 68000 ) ( abort #falsecpu ) )
( if( = cpu 68010 ) ( abort #falsecpu ) )
( if( = cpu 68020 ) ( set #cpu 0 ) )
( if( = cpu 68030 ) ( set #cpu 0 ) )
( if( = cpu 68040 ) ( set #cpu 1 ) )
( if( = cpu 68060 ) ( set #cpu 1 ) )
( if( > ( exists ( "libs:Warp3DPPC.library" ) ) 0 ) ( set #cpu 1 ) )

;/* Starte InstallerFX */

(copyfiles
        (source "InstallerFX/fx01.8svx")
        (dest "t:")
)

(copyfiles
        (source "InstallerFX/fx02.8svx")
        (dest "t:")
)

(copyfiles
        (source "InstallerFX/Bluefade")
        (dest "t:")
        (newname "Background")
)

(copyfiles
        (source "InstallerFX/Background.prefs")
        (dest "t:")
        (newname "Background.prefs")
)

(run "run InstallerFX/InstallerFX t:background")

(copyfiles
        (source "InstallerFX/Logo_klein.iff")
        (dest "t:")
        (newname "Logopic")
)
(copyfiles
        (source "InstallerFX/CybermagicLogo.prefs")
        (dest "t:")
        (newname "Logopic.prefs")
)

(run "run InstallerFX/InstallerFX t:logopic")
(run "run InstallerFX/Dsound -2 -w t:fx01.8svx" )

;/* Beginne mit der Installation */

( user 1 )
( welcome )

(run "run InstallerFX/Dsound -2 -w t:fx02.8svx" )

(complete 10)

( set progdir1
 ( askdir
  ( prompt #maindrawer )
  ( help @askdir-help )
  ( default "SYS:utilities" )
 )
)

(run "run InstallerFX/Dsound -2 -w t:fx02.8svx" )

(complete 20)

( set CpuVersion
 ( askchoice
  ( prompt #version )
  ( help @askoptions-help )
  ( choices
           "STANDARD"
           "STANDARD+WarpOS/Warp3D"
  )
  ( default #cpu )
 )
)

(run "run InstallerFX/Dsound -2 -w t:fx02.8svx" )

(complete 30)

( Set InstallWhere
 ( askchoice
  ( prompt #active )
  ( help @askoptions-help )
  ( choices
           #yeskey
           #nokey
  )
  ( default 0 )
 )
)

(run "run InstallerFX/Dsound -2 -w t:fx02.8svx" )

(complete 40)

; /* Installiere Library */

( ( copylib
   ( prompt #installwizard )
   ( help @copylib-help )
   ( source "libs/wizard.library" )
   ( dest "Libs:" )
   ( confirm )
) )

; /* Erzeuge Programmschublade */

( ( makedir ( tackon progdir1 "Cybermagic" ) )
  ( copyfiles ( source "Icons/Cybermagic.info" )
  ( dest progdir1 ) )
  ( set progdir ( tackon progdir1 "Cybermagic" ) )
)

(complete 50)

; /* Installiere Blankermodule */

( makedir ( tackon progdir "Blanker" ) )

( copyfiles ( source "MODULE/STANDARD" )
( dest ( tackon progdir "Blanker" ) )
( all ) )

( if( = CpuVersion 1 )
 (
    ( copyfiles ( source "MODULE/WARP3D" )
    ( dest ( tackon progdir "Blanker" ) )
    ( all ) )

 )
)

(complete 60)

;/* Installiere Wizard Dateien ENGLISH */

( if( not( @language "deutsch" ) )
 (
  ( copyfiles ( source "ENGLISH/STANDARD" )
  ( dest ( tackon progdir "Blanker" ) )
  ( all ) )

  ( if( = CpuVersion 1 )
   (
    ( copyfiles ( source "ENGLISH/WARP3D" )
    ( dest ( tackon progdir "Blanker" ) )
    ( all ) )
   )
  )
 )
)

(complete 70)

;/* Installiere Wizard Dateien DEUTSCH */
( if( = @language "deutsch" )
 (
  ( copyfiles ( source "DEUTSCH/STANDARD" )
  ( dest ( tackon progdir "Blanker" ) )
  ( all ) )

  ( if( = CpuVersion 1 )
   (
    ( copyfiles ( source "DEUTSCH/WARP3D" )
    ( dest ( tackon progdir "Blanker" ) )
    ( all ) )
   )
  )
 )
)

(complete 80)

;/* Erzeuge Verzeichnis für Soundmodule */

( makedir ( tackon progdir "Sounds" ) )


;/* Installiere Rexx Scripts */

( ( copyfiles ( source "Rexx" )
  ( dest "REXX:" )
  ( all ) )
)

(complete 90)

;/* Installiere Cybermagic */

( ( copyfiles ( source "Cybermagic.config" )
  ( dest progdir ) )
  ( if( not( @language "deutsch" ) )
   (
    ( copyfiles ( source "GUIDE/ENGLISH/Cybermagic.guide" )
    ( dest progdir ) )
   )
  )
  ( if( = @language "deutsch" )
   (
    ( copyfiles ( source "GUIDE/DEUTSCH/Cybermagic.guide" )
    ( dest progdir ) )
   )
  )
  ( copyfiles ( source "Icons/Cybermagic.guide.info" )
  ( dest progdir ) )
)

( ( if( = InstallWhere 0 )
      ( ( copyfiles ( source "CM" )
        ( dest "SYS:WBStartup" ) )
        ( copyfiles ( source "Icons/CM.info" )
        ( dest "SYS:WBStartup" ) ) )
  )
  ( if( = InstallWhere 1 )
      ( ( copyfiles ( source "CM" )
        ( dest progdir ) )
        ( copyfiles ( source "Icons/CM.info" )
        ( dest progdir ) ) )
  )
)

;/* Erzeuge Assign */

( if( exists "SYS:S/User-Startup" )
    ( ( startup "CYBERMAGIC"
      ( prompt #assign )
      ( help @startup-help )
      ( command ( "Assign %s: %s" "CYBERMAGIC" progdir ) )
    )
   )
)
( makeassign "CYBERMAGIC" progdir )
( set @default-dest progdir )

(complete 100)

(CLEANUP)
(exit 0)