; $VER: Buttonz Install Script V1.0 (06.02.97) by Anthony Brice.
;
; This installer language is fucking bollocks :-(
;
(set @app-name "Buttonz")
(set #wrongversion
(cat "You have an old version of the program 'Installer' "
     "on your Amiga!\n\nThe installation procedure needs at least Installer 42.9.\n\n"
     "Please check your configuration!"
))
(set YES "Yes")
(set NO "No")
(set MSG_DESTINATION "Where would you like %s to be installed?\n(%s will be directly copied there)")
(set MSG_COPYING "Going to copy %s to %s.")
(set DOCS "Where would you like the %s Guide document?\nRecommended is Help:\n")
(set MSG_DOCS "Copying %s AmigaGuide document to %s")
(set ASK_HTML "Would you like to install the HTML documentation?")
(set HTML "Where would you like the HTML documentation for %s\n Recommended is Help:")
(set HELP_HTML "HTML documentation is only of use for reading with a Web browser such as Voyager-NG,Ibrowse or Aweb.")
(set MSG_HTML "Copying %s HTML documentation to %s")
(set MSG_CONFIGS "Copying %s example configs to Envarc:Buttonz")
(set ASK_CFG "Would you like to install the example Config files?")
(set HELP_CFG "These are config files I use myself and give you an idea how Buttonz can be configured.")
(set FONT "Going to install the supplied Workstation.font\nYou MUST use this font for this version of Buttonz!\n")
(set MSG_THANKS "Thank you for installing %s!\n\nI hope you find it more than usefull :-)\n")
(set @abort-button "Abort Install!")

(set #bad-kick
  (cat "Buttonz 1.0 will only run under KickStart 2.04 or above!"
  )
)

(if (< (/ (getversion) 65536) 37) (abort #bad-kick))

(complete 0)

; Choose default tool for guide, depending on user's OS version

(set osversion  (/ (getversion) 65536))
(if (>= osversion 39)
   (set guide_reader "MultiView") 
   (set guide_reader "AmigaGuide")
)

(complete 10)

(set installed "")

(set dest_dir
   (askdir (prompt (MSG_DESTINATION @app-name @app-name))
            (help "The WBStartup directory on your boot disk is the best place "
	              "to put Buttonz. This will insure that it is run "
                  "automatically when you boot your computer."
			)
           (default "Sys:WbStartup")
           (newpath))
)

(set @default-dest dest_dir)

(complete 20)

(copyfiles  (prompt (MSG_COPYING @app-name @default-dest))
            (source "/")
            (Pattern "Buttonz")
            (dest dest_dir)
)

(complete 30)

(copyfiles  (prompt (MSG_COPYING @app-name @default-dest))
            (source "/")
            (Pattern "Buttonz.info")
            (dest dest_dir)
)

(complete 40)

(set dest_dir
   (askdir (prompt (DOCS @app-name))
           (help @askdir-help)
           (default "Help:")
           (newpath))
)

(set @default-dest dest_dir)

(copyfiles  (prompt (MSG_DOCS @app-name @default-dest))
            (help @copyfiles-help)
            (source "/docs/")
            (Pattern "#?guide#?")
            (dest dest_dir)
)

(complete 50)

(set AskWeb
 (askbool
  (prompt ASK_HTML)
  (help HELP_HTML)
  (choices YES NO)
  (default 1)
 )
)

(if AskWeb
  (askdir
   (prompt HTML @app-name)
   (help @askdir-help)
   (default "Help:")
  (newpath))
)

(set @default-dest dest_dir)

(If AskWeb
  (copyfiles  (prompt (MSG_HTML @app-name))
    (help @copyfiles-help)
    (source "/docs/HTML/")
    (pattern "#?")
    (dest dest_dir)
  )
)

(complete 60)

(set AskCfg
 (askbool
  (prompt ASK_CFG)
  (help HELP_CFG)
  (choices YES NO)
  (default 1)
 )
)

(If AskCfg
  (makedir "Envarc:Buttonz"
    (prompt "Creating config directory...")
    (infos)
  )
)

(If AskCfg
  (copyfiles (prompt (MSG_CONFIGS @app-name))
    (help @copyfiles-help)
    (source "/configs/")
    (pattern "#?")
    (dest "EnvArc:Buttonz/")
    (confirm)
  )
)

(complete 80)

(copyfiles  (prompt (FONT @app-name))
            (help @copyfiles-help)
            (source "/fonts/")
            (pattern "#?")
            (dest "Fonts:")
            (fonts)
)

(complete 90)

(if (exists (tackon @default-dest "Buttonz.guide.info") (noreq))
   (
      (tooltype   (dest (tackon @default-dest "Buttonz.guide"))
                  (noposition) (setdefaulttool guide_reader))
      (set installed "YES")         
  )
)

(complete 100)

(if (= installed "YES") 
   (exit (MSG_THANKS @app-name))
   (exit)
)   

; End of Buttonz-Installer script !

