; This script will install NonVolatile RAM.
; $VER: NonVolatileInstall 1.0 (WolfSoft) (08-Jan-94)

(welcome)

(set @default-dest
	(askdir
		(prompt "Choose DISK to install NonVolatile RAM on.\nDo not install it to a subdirectory!")
		(help @askdir-help)
		(default "SYS:")
	)
)

(copylib
	(prompt "NV")
	(help @copylib-help)
	(source "NV")
	(dest "C:")
	(confirm)
)

(makedir (tackon @default-dest "NonVolatile"))
(makedir (tackon @default-dest "Prefs"))
(makedir (tackon @default-dest "Prefs/Env-Archive"))
(makedir (tackon @default-dest "Prefs/Env-Archive/Sys"))

(textfile
	(dest (tackon @default-dest "Prefs/Env-Archive/Sys/NV_Location"))
	(append (tackon @default-dest "NonVolatile\n"))
)