(welcome "Welcome to this Worms Custom Level installer!")

(set @default-dest
   (askdir
     (prompt "Choose a directory to install the levels!")
     (help "If you have a harddrive putting them into Worms/TWCustom/ is best. If you have no hard drive, a blank, formatted floppy will be best.")
     (default "Games:") ))

(complete 02)

(if
 (askbool
    (prompt "Do you want to install the 2 'Horror' style levels?")
    (help "Do you want the Horror levels or not, matey?")
     )
        (copyfiles
        (prompt "Installing 'Horror' Levels...")
        (source "LevelData/")
        (dest @default-dest)
        (pattern "HORROR#?.????.WRM")
        (infos))
         )


(complete 20)


 (if
  (askbool
   (prompt "Do you want to install the 2 'Moon' levels?")
   (help "Do you want the 'Moon'levels or not, matey?")
    )
     (copyfiles
      (prompt "Installing 'Moon' levels...")
      (source "LevelData/")
      (dest @default-dest)
      (pattern "MOON#?.????.WRM")
      (infos))
        )

(complete 38)


 (if
  (askbool
   (prompt "Do you want to install the 2 'Mines' Levels?")
   (help "Do you want the 'Mines' levels or not, matey?")
     )
      (copyfiles
       (prompt "Installing 'Mines' levels...")
       (source "LevelData/")
       (dest @default-dest)
       (pattern "MINES#?.????.WRM")
       (infos))
          )

(complete 56)


 (if
  (askbool
   (prompt "Do you want to install the 'Maze' level?")
   (help "Do you want the 'Maze' level or not, matey?")
    )
     (copyfiles
      (prompt "Installing 'Maze' Level...")
      (source "LevelData/")
      (dest @default-dest)
      (pattern "MAZE#?.????.WRM")
      (infos))
        )

 (complete 65)

 (if
  (askbool
   (prompt "Do you want to install the 'Cheese' Level?")
   (help "Do you want the 'Cheese' level or not, matey?")
    )
     (copyfiles
       (prompt "Installing Cheesey Level...")
         (source "LevelData/")
         (pattern "CHEESE#?.????.WRM")
         (dest @default-dest)
         (infos))
           )

 (complete 74)

 (if
  (askbool
   (prompt "Do you want to install the 'Scotland' Level?")
   (help "Do you want the 'Scotland' level or not, matey?")
    )
       (copyfiles
        (prompt "Installing Scottish Level...")
        (source "LevelData/")
        (dest @default-dest)
        (pattern "SCOT#?.????.WRM")
        (infos))
          )

  (complete 83)


      (copyfiles
       (prompt "Finishing the Installation...")
       (source "LevelData/")
       (dest @default-dest)
       (pattern "FROST#?.????.WRM")
       (infos)
         )

(complete 92)

      (set DocsDir
   (askdir
      (prompt "Where do you want to install the docs?")
      (help "Where should I place the amigaguide documentation? Put it where all your docs usually are if you are a HD user. Floppy owners, just put 'em on the same disk.")
      (default "Work:")))


         (copyfiles
           (source "")
           (dest DocsDir)
           (pattern "#?.guide")
           (infos)
           (noposition))

(complete 99)

(copyfiles
           (source "Misc/script")
           (dest DocsDir)
           (noposition))

(complete 100)
