; Install_FBack V1.0 - for FBack/FMirror V1.4+
; It is an InstallerFX script !!!

(onerror (CLEANUP))

; Cleanup any temporary mess we created
(procedure CLEANUP
    ; Nothing to cleanup
    (delete "t:Logopic")
) ; CLEANUP

(set @user-level 0)

;(set Opt 3)
(complete 0)

(copyfiles
   (source "InstallerFX/Logo.gif")
   (dest "t:")
   (newname "Logopic")
)

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

(set @user-level 2)

;Get directory to install FBack to:
(set destdir 
   (askdir 
      (prompt "In which drawer should FBack/FMirror be installed?")
      (help @askdir-help)
      (default ("c:"))
   )
)
(copyfiles
   (source "c")
   (dest destdir)
   (all)
)
(complete 30)

(set destdir 
   (askdir 
      (prompt "In which drawer should FBack/FMirror Document be installed?")
      (help @askdir-help)
      (default ("help:"))
   )
)
(copyfiles
   (source "doc")
   (dest destdir)
   (all)
)
(complete 60)

(set destdir 
   (askdir 
      (prompt "In which drawer should FBack/FMirror Argue GUI be installed?")
      (help @askdir-help)
      (default ("s:"))
   )
)
(copyfiles
   (source "gui")
   (dest destdir)
   (all)
)
(complete 80)

(set destdir 
   (askdir 
      (prompt "In which drawer should Example Config be installed?")
      (help @askdir-help)
      (default ("s:"))
   )
)
(copyfiles
   (source "cfg")
   (dest destdir)
   (all)
)
(complete 100)

(CLEANUP)
(exit)