.Key ""
set src "KingFisher.lha"

echo "KingFisher Installation Script"
echo "Copyright 1992 Udo Schuermann"
echo "(Heavily modified by Fred Fish)"
echo ""

echo "This script will unpack the KingFisher.lha archive and do an"
echo "installation to either a directory on your hard drive or a"
echo "couple of floppies."
echo ""

failat 20
version >NIL: exec.library 37
if warn
   echo "AmigaDOS 1.x Installation"
   skip ADOS13
else
   version >NIL: exec.library 38
   if warn
      echo "AmigaDOS 2.x Installation"
   else
      echo "AmigaDOS 3.x Installation"
   endif
   skip ADOS20
endif


;***************************************************************************
; AmigaDOS 1.3 Installation starts here
LAB ADOS13
; the 2.0 version will do fine under 1.3, too
skip ADOS20
skip EXIT



;***************************************************************************
; AmigaDOS 2.0+ Installation starts here
LAB ADOS20
ask "Are you installing KingFisher to a hard disk volume? (y/n)"
if warn
   ; Hard disk installation
   echo ""
   echo "Hard disk volume installation to directory sys:KingFisher"
   echo ""
   ask "Continue? (y/n)"
   if not warn
      echo ""
      echo "Installation canceled"
      quit
   endif
   set dst "sys:KingFisher"
   if not EXISTS $dst
       makedir $dst
   endif
   :c/lha -mraxe x KingFisher.lha $dst/
   copy $dst/KingFisher.hd s:KingFisher.config
else
   ; Floppy disk installation
   echo ""
   echo "Floppy disk installation."
   ask "Do you have a two blank disks available?"
   if not WARN
      echo ""
      echo "Try again when you do ..."
      echo "All Done.  Click close gadget to get rid of window."
   endif
   echo "Which drive do you want to unpack to? [0,1,2,3] "  NOLINE
   failat 20
   skip >NIL: ? 
   lab 0
     set drive "DF0:"
     skip HAVEDRIVE
   ;
   lab 1
     set drive "DF1:"
     skip HAVEDRIVE
   ;
   lab 2
     set drive "DF2:"
     skip HAVEDRIVE
   ;
   lab 3
     set drive "DF3:"
     skip HAVEDRIVE
   ;

   lab HAVEDRIVE
   ask "OK to format disk in drive $drive?"
   if not WARN
      echo "Aborted ..."
      skip EXIT
   endif
   echo ""
   set dst "KingFisher-1"
   sys:system/format drive $drive name $dst NOICONS
   :c/lha -axm x $src $dst: Disk.info Fish-0001-0500 Fish.index Name.index KingFisher.floppy KingFisher.hd KingFisher.info KingFisher
   copy $dst:KingFisher.floppy s:KingFisher.config
   echo "Installation of $dst complete, insert second floppy."
   echo ""
   
   ask "OK to format disk in drive $drive?"
   if not WARN
      echo "Aborted ..."
      skip EXIT
   endif
   echo ""
   set dst "KingFisher-2"
   sys:system/format drive $drive name $dst NOICONS
   :c/lha -axm x $src $dst: Disk.info Fish-0501-1100
   echo ""
endif
skip EXIT

LAB EXIT
echo "All Done.  Click close gadget to get rid of window."
endcli