; Skidmarks Car Disks Floppy Disk Installer
; $VER: 1.00 (27/5/95)
; written by Andrew Bolt

(if (< (/ (getversion) 65536) 36)
   (abort "Installer requires Kickstart 2.0 or above - aborting...")
)

(welcome
   ("This utility will install 4 new Skidmarks cars onto your hard disk. ")
   ("Make sure that Skidmarks is already properly installed on your hard drive.")
   ("You will need about 2 Mb of free space for the installation.\n\n")


)

(if(set destdir
      (askdir
         (prompt "Use the requester to open the Skidmarks 2 Vehicles drawer on your hard drive")
         (help @askdir-help)
         (default @default-dest)
      )
   )
   (
      (set @default-dest destdir)
   )
)

(copyfiles
    (prompt "Copying Supra.AGA From Car Disk 1...")
    (source "cardisk1:vehicles/supra.AGA")
    (dest @default-dest)
    (help @copyfiles-help)
    (infos)
    (confirm)
)

(Complete 20)

(copyfiles
    (prompt "Copying Supra.set from Car Disk 1...")
    (source "cardisk1:vehicles/Supra.set")
    (dest @default-dest)
    (help @copyfile-help)
    (infos)
    (confirm)
)

(complete 25)

(copyfiles
    (prompt "Copying Truckcab.AGA from Car Disk 1...")
    (source "cardisk1:vehicles/TruckCab.AGA")
    (dest @default-dest)
    (help @copyfile-help)
    (infos)
    (confirm)
)

(Complete 45)

(copyfiles
    (prompt "Copying TruckCab.set from Car Disk 1...")
    (source "cardisk1:vehicles/TruckCab.set")
    (dest @default-dest)
    (help @copyfile-help)
    (infos)
    (confirm)
)

(complete 50)

(copyfiles
    (prompt "Copying Landrover.AGA from Car Disk 2...")
    (source "cardisk2:vehicles/landrover.aga")
    (dest @default-dest)
    (help @copyfile-help)
    (infos)
    (confirm)
)

(complete 70)

(copyfiles
    (prompt "Copying Landrover.set from Car Disk 2...")
    (source "cardisk2:vehicles/landrover.set")
    (dest @default-dest)
    (help @copyfile-help)
    (infos)
    (confirm)
)

(complete 75)

(copyfiles
    (prompt "Copying Wheelchair.AGA from Car Disk 2...")
    (source "cardisk2:vehicles/Wheelchair.aga")
    (dest @default-dest)
    (help @copyfile-help)
    (infos)
    (confirm)
)

(complete 95)

(copyfiles
    (prompt "Copying Wheelchair.set from Car Disk 2...")
    (source "cardisk2:vehicles/wheelchair.set")
    (dest @default-dest)
    (help @copyfile-help)
    (infos)
    (confirm)
)

(complete 100)

(exit
    ("All cars succesfully installed.")


)