(complete 0)
(set destdrawer
  (askdir (prompt "Please Select a Drawer to Install Catapults In")
          (help   "The software will be installed in the drawer"
                  "that you specify (not in any subdirectory thereof).")
          (default "RAM:")
          (disk))
)
(complete 10)
(copyfiles (source  "/Catapults")
           (dest    destdrawer)
           (pattern "~(Install#?)")
           (infos)
)
(complete 100)