.key ziel
.bra {
.ket }

FailAt 11

Echo "*NDie Installation von *e[1mOrbit Amiga*e[0m läuft ...*N"

; Icon für Drawer kopieren
Copy >NIL: ":empty.inf" "{ziel}Orbit.info"
IF WARN
  Echo "Fehler beim Kopieren des Icons des Unterverzeichnisses '{ziel}Orbit'!"
  Skip Error
ENDIF

IF NOT EXISTS LIBS:pack/PACK_scn1.library
  IF NOT EXISTS LIBS:pack
    MakeDir >NIL: LIBS:pack
  ENDIF
  Echo "  Installiere PACK_scn1.library ..."
  Copy >NIL: Orbit_1:libs/pack/#? LIBS:pack
  IF WARN
    Echo "Fehler beim Kopieren der library Libs:pack/PACK_scn1.library!"
    Skip Error
  ENDIF
ENDIF

echo "  Installiere FONTS ..."
Assign >NIL: FONTS: EXISTS
IF WARN
  MakeDir SYS:fonts
  Assign FONTS: SYS:fonts
ENDIF

IF NOT EXISTS FONTS:OrbitB.font
  Copy >NIL: Orbit_1:fonts/OrbitB.font FONTS:
  IF WARN
    Echo "Fehler beim Kopieren des Fonts OrbitB.font!"
    Skip Error
  ENDIF
ENDIF
IF NOT EXISTS FONTS:OrbitBS.font
  Copy >NIL: Orbit_1:fonts/OrbitBS.font FONTS:
  IF WARN
    Echo "Fehler beim Kopieren des Fonts OrbitBS.font!"
    Skip Error
  ENDIF
ENDIF
IF NOT EXISTS FONTS:OrbitBU.font
  Copy >NIL: :fonts/OrbitBU.font FONTS:
  IF WARN
    Echo "Fehler beim Kopieren des Fonts OrbitBU.font!"
    Skip Error
  ENDIF
ENDIF

IF NOT EXISTS FONTS:OrbitB
  MakeDir FONTS:OrbitB
ENDIF
IF NOT EXISTS FONTS:OrbitBS
  MakeDir FONTS:OrbitBS
ENDIF
IF NOT EXISTS FONTS:OrbitBU
  MakeDir FONTS:OrbitBU
ENDIF

IF NOT EXISTS FONTS:OrbitB/15
  Copy >NIL: Orbit_1:fonts/OrbitB/15 FONTS:OrbitB
  IF WARN
    Echo "Fehler beim Kopieren des Fonts OrbitB/15!"
    Skip Error
  ENDIF
ENDIF
IF NOT EXISTS FONTS:OrbitB/13
  Copy >NIL: Orbit_1:fonts/OrbitB/13 FONTS:OrbitB
  IF WARN
    Echo "Fehler beim Kopieren des Fonts OrbitB/13!"
    Skip Error
  ENDIF
ENDIF
IF NOT EXISTS FONTS:OrbitBU/15
  Copy >NIL: Orbit_1:fonts/OrbitBU/15 FONTS:OrbitBU
  IF WARN
    Echo "Fehler beim Kopieren des Fonts OrbitBU/15!"
    Skip Error
  ENDIF
ENDIF
IF NOT EXISTS FONTS:OrbitBS/15
  Copy >NIL: Orbit_1:fonts/OrbitBS/15 FONTS:OrbitBS
  IF WARN
    Echo "Fehler beim Kopieren des Fonts OrbitBS/15!"
    Skip Error
  ENDIF
ENDIF

Echo "  Installiere Programm und Icons ..."
Copy >NIL: Orbit_1:Orbit#? "{ziel}Orbit"
IF WARN
  Echo "Fehler beim Kopieren des Programms!"
  Skip Error
ENDIF


Echo "  Installiere Bilder von Disk 1 ..."
Makedir >NIL: "{ziel}Orbit/BILDER"
Copy >NIL: Orbit_1:BILDER/#? "{ziel}Orbit/BILDER"
IF WARN
  Echo "Fehler beim Kopieren der Bilder von Disk 1!"
  Skip Error
ENDIF
Echo "  Installiere Texte von Disk 1 ..."
Makedir >NIL: "{ziel}Orbit/TEXT"
Copy >NIL: Orbit_1:TEXT/#? "{ziel}Orbit/TEXT"
IF WARN
  Echo "Fehler beim Kopieren der Texte von Disk 1!"
  Skip Error
ENDIF

Echo "  Installiere Bilder von Disk 2 ..."
Copy >NIL: Orbit_2:BILDER/#? "{ziel}Orbit/BILDER"
IF WARN
  Echo "Fehler beim Kopieren der Bilder von Disk 2!"
  Skip Error
ENDIF

Echo "  Installiere Bilder von Disk 3 ..."
Copy >NIL: Orbit_3:BILDER/#? "{ziel}Orbit/BILDER"
IF WARN
  Echo "Fehler beim Kopieren der Bilder von Disk 3!"
  Skip Error
ENDIF


Echo "*N*NDie Installation von *e[1mOrbit Amiga*e[0m ist beendet!"
Skip End

LAB Error
Echo "*N*NDie Installation von *e[1mOrbit Amiga*e[0m ist abgebrochen!"

LAB End
ASK "Bitte <RETURN> drücken."