;;;;
;;;;
;;;; Install_RB - RunBar installation script for Installer
;;;;
;;;; Copyright © 1996 Sergej Kravchenko
;;;;                  All Right reserved.
;;;;                  email dlife@pub.osf.lt
;;;;
;;;;     Installer and Installer project icon
;;;;     (c) Copyright 1991-93 Commodore-Amiga, Inc.  All Rights Reserved.
;;;;     Reproduced and distributed under license from Commodore.
;;;;
;;;;     INSTALLER SOFTWARE IS PROVIDED "AS-IS" AND SUBJECT TO CHANGE;
;;;;     NO WARRANTIES ARE MADE.  ALL USE IS AT YOUR OWN RISK.  NO LIABILITY
;;;;     OR RESPONSIBILITY IS ASSUMED.
;;;;
(complete 0)


(set #welcome           (cat "Welcome to the RunBar 1.1 installation\n\nThis program is shareware\nPlease register\n\n\n\n© 1996 Sergej Kravchenko\nemail: dlife@pub.osf.lt"))
(set #dir-choice        (cat "Select the directory where copy guide." ))
(set #dir-choic         (cat "Select the directory where Guide files will be copyed." ))
(set #copy              (cat "Copying RunBar "))
(set #copy-guide        (cat "Copying Guide"))
(set #copy-key          (cat "Copying Library"))
(set #msg  (cat "!!!!!!!!!ATTENTION!!!!!!!!!\n\nWhen program run, no window appears\non screen.To activate window\nmove mouse pointer to bottom of\nworkbench screen or\npress HotKey (default F1)."))
;=============================================================================
(message #welcome)
(welcome)


;========================================================================
;
; Select the RunBar directory
;
(complete 0)

(complete 10)
(copyfiles
   (prompt #copy)
   (source "RunBar")
   (help   @copyfiles-help)
   (infos)
   (dest "SYS:WBStartup")
)

(complete 20)
(set NTdir
   ( askdir
      ( prompt #dir-choic )
      (help "")
      (default "s:")
      (newpath)
   )
)
(complete 30)
(copyfiles
   (prompt #copy-guide)
   (source "RunBar.guide")
   (help   @copyfiles-help)
   (infos)
   (dest NTdir)
)
(complete 40)
(copylib
   (prompt "Updating wbstart.library")
   (help "This action will install wbstart.library on your HD.")
   (source "Libs/wbstart.library")
   (dest "Libs:")
   (confirm)
)

(complete 60)
(copylib
   (prompt #copy-key)
   (source "L/WBStart-Handler")
   (help   @copyfiles-help)
   (dest "L:")
   (confirm)
)
(message #msg) 
(complete 100)

(exit)