if exists "s/HO!_Install"
 echo "Ziehen Sie dieses Icon in das Verzeichnis,"
 echo "wo Spaceward Ho! installiert werden soll."
 echo "Danach starten Sie HDInstall, von dort aus."
 echo " "
 echo "Es wird ein Verzeichnis Namens *"HO!*" angelegt!"
 echo "In diesem Verzeichnis finden Sie dann das Programm."
else 
 if exists "s:HO!_Install"
  echo "Sie dürfen zur Installation NICHT mit der Spieldiskette booten!!!
 else
  echo "Kopiere Daten..."
  echo "  0% fertig"
  if not exists HO!
   makedir >nil: HO!
  endif
  echo "[1A  1% fertig"
  copy HO!1:HO!.inf     HO!.info quiet
  echo "[1A  2% fertig"
  copy HO!1:HO!.info    HO!      quiet
  echo "[1A  3% fertig"
  copy HO!1:p16.iff     HO!      quiet
  echo "[1A  4% fertig"
  copy HO!1:p256.iff    HO!      quiet
  echo "[1A  5% fertig"
  copy HO!1:texte.pff   HO!      quiet
  echo "[1A 10% fertig"
  copy HO!1:HO!         HO!      quiet
  echo "[1A 15% fertig"
  copy HO!1:sound.pff   HO!      quiet
  echo "[1A 25% fertig"
  copy HO!1:image16.pff HO!      quiet
  echo "[1A 45% fertig"
  copy HO!1:fonts fonts: all     quiet
  echo "[1A 55% fertig"
  if not exists libs:arp.library
   copy HO!1:libs/arp.library libs: quiet
   echo "[1A 58% fertig"
  endif
  if exists s:User-Startup
  	echo >>s:User-Startup ";BEGIN HO!"
    cd HO!
    cd >t:_as
    cd /
    Ho!1:c/ma <t:_as >>s:User-Startup
  	echo >>s:User-Startup "assign HO!2: HO!1:"
  	echo >>s:User-Startup ";END HO!"
  	delete >nil: t:_as
  endif
  echo "[1A 60% fertig"
  HO!1:c/tv
	if warn
    copy HO!2:image256.pff HO!     quiet
  else
    echo " Die 256 Farbversion wird unter kick1.3 nicht benötigt[1A"
	endif
  echo "[1A 94% fertig"
  if not exists HO!/Save
   makedir >nil: HO!/Save
  endif
  echo "[1A 96% fertig"
  copy HO!.info  HO!/Save.info   quiet
  echo "[1A 98% fertig"
  delete >nil: HDInstall#?
  echo "[1A100% fertig"
  echo " "
  echo "Die Installation ist beendet!"
  echo " "
  echo "Sie das Fenster, in dem Spaceward Ho! installiert"
  echo "wurde schließen und neu öffnen, damit das Icon erscheint"
 endif
endif
wait 5
endcli >nil:
