; ---------------------------------------------------------------------
;
;   INSTALLATION SCRIPT - BEGIN
;
; ---------------------------------------------------------------------

(set DestDir
 (askdir
  (prompt "Proszë wybraê katalog lub partycjë dysku HD gdzie    ma byê zainstalowana gra \" MISTRZ POLSKI \" ")
  (help "Installer tworzy w wybranym katalogu lub partycji dysku HD katalog \"Mistrz Polski\". Nastëpnie kopiuje tam dane z dyskietek." )
  (default "Games:")
 )
)

(set RealDest (tackon DestDir "Mistrz Polski"))

(if (= (exists RealDest) 0)
 (makedir RealDest (infos))
)




(complete 2)


; Dysk Pierwszy
;


(copyfiles
	(prompt "Kopiujë pliki z \"MISTRZ POLSKI 1\"...")
	(help @copyfiles-help)
	(source "Manager1:")
	(dest RealDest)
	(choices "LIBS" "D" "F" "FONTS" "I" "M" "P" "Mistrz Polski" "Mistrz Polski.info" "PROG")
)

(complete 25)



; Dysk Drugi
;


(askdisk
	(prompt "DYSK 1 skopiowany.\n Proszë wîoûyê DYSK 2.")
	(help @askdisk-help)
	(dest "Manager2")
)


(copyfiles
	(prompt "Kopiujë pliki z \"MISTRZ POLSKI 2\"...")
	(help @copyfiles-help)
	(source "Manager2:")
	(dest RealDest)
	(choices "D" "F" "I" "P")
)

(complete 50)
; Dysk Trzeci



(askdisk
	(prompt "DYSK 2 skopiowany.\n Proszë wîoûyê DYSK 3.")
	(help @askdisk-help)
	(dest "Manager3")
)


(copyfiles
	(prompt "Kopiujë pliki z \"MISTRZ POLSKI 3\"...")
	(help @copyfiles-help)
	(source "Manager3:")
	(dest RealDest)
	(choices "A" "F" "I" "P")
)

(complete 75)


; Dysk Czwarty
;


(askdisk
	(prompt "DYSK 3 skopiowany.\n Proszë wîoûyê DYSK 4.")
	(help @askdisk-help)
	(dest "Manager4")
)


(copyfiles
	(prompt "Kopiujë pliki z \"MISTRZ POLSKI 4\"...")
	(help @copyfiles-help)
	(source "Manager4:")
	(dest RealDest)
	(choices "I" "M" "P")
)

(complete 100)


(exit "Instalacja zakoïczona.\n Autorzy gry ûyczâ przyjemnej zabawy.")