; IFX
;
(
(welcome "About to install\nIFX v1.0\n(intuition sound effects)\n\n Dobes Vandermeer\n")
(set @app-name "IFX")
(set @default-dest "SYS:")
(if (askbool
		(prompt "Okay to copy\nexecutable to dir\nSYS:WBStartup?")
		(help "Press yes to copy,\nno to select another dir.")
		(default 1)
		)
	(set #bindir "SYS:WBStartup")
	(set #bindir 
		(askdir
			(prompt "Select directory for executable.\n")
			(help "Since you didn't want\nto install to the\ndefault directory,\nPlease select another.\n")
			(default "SYS:Tools/Commodities")
			)
		)
	)
(complete 15)
(copyfiles 
	(prompt "Copying executable to:\n" #bindir)
	(help "Make sure all boxes are checked, \nand select proceed.")
	(source "")
	(choices "IFX" "IFX.info")
	(dest "SYS:WBStartup")
	)

(complete 30)
(set #docdir
	(askdir
		(prompt "Where would you like me\nto install the documentation?")
		(help "Find the directory where\nyou would like\ntosave the amigaguide\ndocumentation, and press\nProceed.\n")
		(default "SYS:Docs")
		)
	)

(complete 45)
(copyfiles
	(prompt ("Copying documentation to:\n" #bindir))
	(help "Make sure all boxes \nare checked and press \nProceed.\n")
	(source "")
	(choices "IFX.guide" "IFX.guide.info")
	(dest #docdir)
	)
(complete 60)
(run "type IDs >>s:UPD.ids"
	(prompt "Add IDs to s:UPD.ids?")
	(help "If you have already added\nthe IDs to your file,\nselect skip, otherwise,\nselect proceed.\n")
	(confirm)
	)
(if (askbool 
	(prompt "Would you like to edit\nyour ID's file?\n")
	(help "For more info on UPD's\nID file, see the UPD\ndocumentation.\nNote:\n  This will use the editor c:Ed.\n")
	)
	(
	(complete 80)
	(run "c:ed s:UPD.IDs WIDTH 256")
	)
)	

(complete 100)
(exit "Installation of IFX complete.\n\nPlease reboot to test\nIFX.\n\nDocumentation can be found \nin " #docdir " and the \nexecutable is in \n" #bindir (quiet)) 
)
