; Installer-Script MTRS_V1.3_DEMO A.Sprenger 1998

(set @askdefault "Work:")
(set @askhelp "\n  Bitte wählen Sie ein Verzeichnis,\n  in welches MTRS_V1.3_DEMO kopiert werden soll.")
(set @askprompt "Verzeichnisangabe für MTRS_V1.3_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_V1.3_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 "MTRS_V1.3_DEMO")
	  )
(complete 40)
(copyfiles (prompt "Kopiervorgang")
	   (help "Möchten Sie die Anleitung kopieren ?")
	   (source "")
	   (dest @destination)
	   (infos)
	   (confirm)
	   (pattern "MTRS_V1.3_DEMO_Anleitung")
	  )
(complete 80)
(set @destination (tackon @destination "HDR"))
(makedir @destination)

(set changechoice
                  (askchoice
                             (prompt "MTRS benötigt das logische Gerät >HDR:<.\nWenn es beim Start des Rechners automatisch\neingerichtet werden soll,wählen Sie bitte >User-Startup verändern<")
			     (help "")
			     (choices "User-Startup verändern" "Gerät per Hand zuweisen")
			    )
		 )
(if (not changechoice)
    (startup "MTRS" (prompt "Es wird die User-Startup verändert.")
	            (help "")
	            (command "ASSIGN HDR: " (expandpath (@destination)))
                   )
    )
(complete 100)
(makeassign "HDR" @destination)
(set @destination "FONTS:")

(copyfiles (prompt "Kopiervorgang")
	   (help "")
	   (source "")
	   (dest @destination)
	   (pattern "MTRS")
	  )
(copyfiles (prompt "Kopiervorgang")
	   (help "")
	   (source "")
	   (dest @destination)
	   (pattern "MTRS.font")
	  )
(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.")