;Assign XTR: so files are copied to right directory
C:RequestFile >ENV:XTR "SYS:" TITLE "Where is XTR located" SAVEMODE NOICONS DRAWERSONLY
C:Assign >NIL: XTR: $XTR

;cd into archieve dir so I know where the files are
CD ""

;Comence Copying.  Each dir done to be neat
CD Layouts/
COPY #? TO XTR:Layouts/ QUIET
/

CD Objects/
COPY #? TO XTR:Objects/ QUIET
/

CD Palettes/
COPY #? TO XTR:Palettes/ QUIET
/

CD Tiles/
COPY #? TO XTR:Tiles/ QUIET
/

CD Tracks/
COPY #? TO XTR:Tracks/ QUIET
/

CD Worlds/
COPY #? TO XTR:Worlds/ QUIET
/

CD Backgrounds/
COPY #? TO XTR:Backgrounds/ QUIET
/

;Clean up the ENV, used to assign XTR
UnsetENV $XTR

;Just a little info
C:ECHO "  The Season File in the misc drawer"
C:ECHO "  Hasn't been copied, you can do this yourself."
C:ECHO "  Or not if you don't want."
C:Ask  "  Press Return"

;Clean up after my self
AVAIL FlUSH >NIL: