home *** CD-ROM | disk | FTP | other *** search
- ; Installer script for Worm Wars 5.1
- ; © Copyright 1999 Amigan Software
- ; $VER: Worm Wars 5.2 (29.12.1999)
-
- (set @app-name ("Worm Wars 5.2"))
- (welcome "Welcome to the Worm Wars 5.2 installation script!")
-
- (set new_dir
- (askdir
- (prompt "Where do you want to install Worm Wars?\n"
- "A drawer called \"WormWars\" will be created.\n")
- (default "SYS:")
- (help "This is self-explanatory.")
- )
- )
- (set @default-dest (tackon new_dir "WormWars"))
- (makedir @default-dest (infos))
- (complete 10)
- (copylib
- (prompt "Installing MEDPlayer.library to LIBS:")
- (help "Worm Wars can use MEDPlayer.library to play music.")
- (source "medplayer.library")
- (dest "LIBS:")
- (confirm)
- )
- (complete 30)
- (set #fontchoice
- (askchoice
- (prompt "Would you like to install WormWars.font?")
- (help "Worm Wars can use this 8x8 monospaced font rather than Topaz 8.")
- (choices "Yes" "No")
- (default 0)
- )
- )
- (if (= #fontchoice 0)
- ( (copyfiles
- (source "WormWars.font")
- (dest "FONTS:")
- )
- (complete 35)
- (makedir ("FONTS:WormWars"))
- (complete 40)
- (copyfiles
- (source "WormWars/8")
- (dest "FONTS:WormWars")
- )
- )
- )
- (complete 50)
- (copyfiles
- (prompt "Copying other files...")
- (source "")
- (help @copyfiles-help)
- (dest @default-dest)
- (all)
- (infos)
- )
- ;copy directory .info file?
- (complete 75)
- (delete (tackon @default-dest "MEDPlayer.library"))
- (complete 80)
- (delete (tackon @default-dest "WormWars.font"))
- (complete 85)
- (delete (tackon @default-dest "WormWars/8"))
- (complete 90)
- (delete (tackon @default-dest "WormWars"))
- (complete 95)
- (delete (tackon @default-dest "Install"))
-
- ;delete source directory and all subdirectories of it?
- ;options as to whether to install the effects and/or source code?
- ;update and uninstall functions?
-
- (complete 100)
- (exit bye)
-