; Nostalgia! 0.9ß installation utility
;
;
; Written by -Hybrid- from MELINA SOFTWORKS
;

;==================================================================
;VARIABLES
;==================================================================
(SET #bienvenue  "Bienvenue dans l'utilitaire d'installation de Nostalgia!")

(SET #askinstall "Veuillez sélectionner une destination pour Nostalgia!\n Un tiroir y sera créé")
(SET #aide       "Veuillez sélectionner une destination pour Nostalgia, un tiroir appelé Nostalgia y sera créé (environ 300Ko)")
(SET #merci      "\n\n\n\n\nMerci !")

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


(if (>= (/ @installer-version 65536) 44)
 (
  (effect "center" "radial" $F0F0F0 $8000B9)
  (showmedia "Nostalgia" "Nostalgia.jpg" "upper_center" "none" 0)
 )
)

(welcome #bienvenue)

(set #installdir
        (askdir
                (prompt #askinstall)
                (help #aide)
                (default @default-dest)
        )
)

(copyfiles
    (source "InstallStuff/")
    (dest #installdir)
    (pattern "#?")
)

(if !(exists "sys:prefs/env-archive/WarpSNES")
 (makedir "sys:prefs/env-archive/WarpSNES")
)

(EXIT #merci (QUIET))