;=============================================================================
;
; NOG2 installation script for AmigaDOS 2.0 or higher.
;
; NOG2 v2.94
;
; (german and english)
;
;=============================================================================




(complete 0)

;=============================================================================
; German strings
;
;(if (=@language "deutsch")
;(

(set #introduction
(cat "\n\nDieses Programm installiert Ihnen NOG2."
     "Es kann verwendet werden um eine aeltere NOG2 Version zu updaten oder"
     "fuer eine Neuinstalation.")
)

(set #dest_dir
(cat "In welchem Ordner oder Diskette wollen Sie NOG2 installiert haben?")
)

(set #where_dir
(cat "Wo kann ich die zu installierende NOG2 Version finden?")
)

(set #copy_nog2
(cat "Kopiere NOG2...")
)

(set #copy_iff
(cat "Soll ich die 'iff.library' ebenfalls kopieren?")
)

(set #iff_note
(cat "NOG2 braucht die iff.library nur fuer die 'GrabView' Funktion.")
)

(set #script_copy
(cat "Soll ich das 'NOG2.script' ebenfalls kopieren?")
)

(set #script_note
(cat "NOG2 braucht das Scriptfile nur fuer die 'Script' Funktion"
     " des Traphandlers. Sie koennen aber selbst einsolches erzeugen"
     " mit Hilfe eines Texteditors."
     "\n(Sehen Sie im Handbuch nach fuer weiter Informationen)")
)

(set #guru_copy
(cat "Soll ich die 'guru' Files, guru1 - guru8, ebenfalls kopieren?")
)

(set #guru_note
(cat "Sie koennen die 'guru' Files verwenden um den Umgang mit NOG2"
     " zu ueben. Doch sie werden von NOG2 sonst nicht gebraucht."
     "\nBevor sie die Files anwenden, nehmen Sie bitte das Handbuch"
     " zu rate!")
)

(set #copying_guru
(cat "Kopiere die 'guru' Files...")
)

(set #copy_sim
(cat "Wollen Sie den S.I.M. auch noch kopiert haben?")
)

(set #copying_sim
(cat "Kopiere SIM...")
)

(set #sim_note
(cat "S.I.M. - System Independend Monitor\n"
     "Hierbei handelt es sich um ein Monitor System, das von NOG2 aktiv"
     " unterstuetzt wird.\n"
     "Fuer weitere Informationen schauen Sie im Handbuch nach.")
)

(set #copy_docs
(cat "Welche Dokumentationen zum S.I.M. soll ich kopieren?")
)

(set #doc_note
(cat "SIM.doc\n"
     "Das Handbuch zum S.I.M., sollte umbedingt gelesen werden bevor Sie"
     " den S.I.M benutzen.\n\n\n"
     "SIM.specialdoc\n"
     "Ist eine Zusammenstellung/Liste aller S.I.M. Befehle.")
)

(set #yes
(cat "Ja")
)

(set #no
(cat "Nein")
)


;))

;=============================================================================
; English strings
;
(if (= @language "english")
(

(set #introduction
(cat "\n\nThis program lets you install NOG2 on a hard drive or disk."
     " It can be used to upgrade an older release or to intsall from scratch.")
)

(set #dest_dir
(cat "In which disk or drawer should NOG2 be installed?")
)

(set #where_dir
(cat "Where can I find the uninstalled NOG2?")
)

(set #copy_nog2
(cat "Copying NOG2...")
)

(set #copy_iff
(cat "Should I copy the iff.library?")
)

(set #iff_note
(cat "Note that NOG2 needs this library only for the 'GrabView' function.")
)

(set #script_copy
(cat "Should the 'NOG2.script' also be copied?")
)

(set #script_note
(cat "Note that NOG2 needs the script file for the traphandler 'Script' function."
     " You may generate another new script using a texteditor and put the script"
     " into the 's:' directory."
     "\n(Refer to the manual for more information)")
)

(set #guru_copy
(cat "Should I also copy the guru files (guru1 - guru8)?")
)

(set #guru_note
(cat "You may use this guru files to generate system crashes to practise"
     " the use of NOG2."
     "\nPlease refer to the manual before using them.")
)

(set #copying_guru
(cat "Copying 'guru' files...")
)

(set #copy_sim
(cat "Do you want to have the SIM copied to the disk/drawer?")
)

(set #copying_sim
(cat "Copying SIM...")
)

(set #sim_note
(cat "S.I.M. - System Independend Monitor\n"
     "It's a monitor system which is supported by NOG2.\n"
     "Refer to the manual for more information.")
)

(set #copy_docs
(cat "Select the documentation to be copied:")
)

(set #doc_note
(cat "SIM.doc\n"
     "The manual for S.I.M., please read it before using S.I.M.\n\n\n"
     "SIM.specialdoc\n"
     "It's a short command overview for S.I.M.")
)

(set #yes
(cat "Yes")
)

(set #no
(cat "No")
)

))

;=============================================================================

(message #introduction)
(welcome)


(set NOG2Name
	(tackon
		(askdir
			(prompt #dest_dir)
			(help @askdir-help)
			(default @default-dest)
		)
		""
	)
)

(set SourceName "NOG2:" )



(complete 30)
(set @default-dest NOG2Name)

(copyfiles
	(prompt #copy_nog2)
	(help @copyfiles-help)
	(source (tackon SourceName ""))
	(dest (tackon NOG2Name ""))
	(choices "NOG2")
	(infos)
)



(complete 50)
(copylib
	(prompt #copy_iff)
	(help #iff_note)
	(source	(tackon SourceName "libs/iff.library"))
	(dest "libs:")
	(confirm)
)	



(complete 57)
(copyfiles
	(prompt #script_copy)
	(help #script_note)
	(source	(tackon SourceName "s/nog2.script"))
	(dest "s:" )
	(confirm)
)	



(complete 65)
(set guru_answer
	(askbool
		(prompt #guru_copy)
		(help #guru_note)
		(default 0)
	)
)



(complete 70)
(if guru_answer
(	
		(copyfiles
			(prompt #copying_guru)
			(help @copyfiles-help)
			(source (tackon SourceName "Gurus"))
			(dest (tackon NOG2Name "Gurus"))
			(choices "LIES_MICH" "guru1" "guru2" "guru3" "guru4" "guru5" "guru6" "guru7" "guru8")
			(infos)
		)
	
))



(complete 80)

(set answer_sim
	(askchoice
		(prompt #copy_sim)
		(help #sim_note)
		(choices #yes #no)
		(default 1)
	)
)



(complete 85)
(if (not answer_sim)
(
	(copyfiles
		(prompt #copying_sim)
		(help #sim_note)
		(source (tackon SourceName "SIM"))
		(dest "c:" )
		(confirm)
	)


	(complete 90)
	(copyfiles
		(prompt #copy_docs)
		(help #doc_note)
		(source (tackon SourceName ""))
		(dest (tackon NOG2Name ""))
		(choices "SIM.doc" "SIM.specialdoc")
		(confirm)
		(infos)
	)
))


(complete 100)
(exit)

;=============================================================================