; Installer-Script MTRS_V2_DEMO A.Sprenger 1999

(set @askdefault "Work:")
(set @askhelp "\n  Bitte wählen Sie ein Verzeichnis,\n  in welches MTRS_V2_DEMO kopiert werden soll.")
(set @askprompt "Verzeichnisangabe für MTRS_V2_DEMO\n")
(set @bad-kick "MTRS benötigt mindestens\nKickstart 2.0 !")

(if (< (/ (getversion) 65536) 37)
	(abort @bad-kick)
)

(welcome)
(message "\n\n\nDieses Script installiert\nMTRS_V2_DEMO\nauf Ihre Festplatte.")
(complete 0)
(set @destination (askdir (prompt @askprompt)
        	  (help @askhelp)
		  (default @askdefault)
		  )
    )

(set @destination (expandpath @destination))
(set @destination (tackon @destination "MTRS"))
(copyfiles (prompt "Kopiervorgang")
	   (help "")
	   (source "")
	   (dest @destination)
	   (infos)
	   (pattern "MultiTrackRS_V2D_DEMO")
	  )
(complete 40)
(copyfiles (prompt "Kopiervorgang")
	   (help "Möchten Sie die Anleitung kopieren ?")
	   (source "")
	   (dest @destination)
	   (infos)
	   (confirm)
	   (pattern "MTRS_Anleitung.guide")
	  )

(complete 60)

(set @destination "FONTS:")

(copyfiles (prompt "Kopiervorgang")
	   (help "")
	   (source "")
	   (dest @destination)
	   (pattern "MTRS")
	  )
(complete 70)
(copyfiles (prompt "Kopiervorgang")
	   (help "")
	   (source "")
	   (dest @destination)
	   (pattern "MTRS.font")
	  )
(complete 80)
(set @destination "C:")

(copyfiles (prompt "Kopiervorgang")
	   (help "")
	   (source "")
	   (dest @destination)
	   (pattern "MTRSDEMOPlayer.TSK")
	  )
(complete 90)
(set @destination "S:")

(copyfiles (prompt "Kopiervorgang")
	   (help "")
	   (source "")
	   (dest @destination)
	   (pattern "MTRS.prefs")
	  )
(complete 100)

(message "Die Installation ist abgeschlossen. Zur Programmbedienung und Registrierung lesen Sie bitte die beigefügte Anleitung im Amiga-Guide-Format.\nViel Spaß wünscht A.Sprenger.")