; Installationsscript für den FKM 1.32

(set quel (pathonly @icon))
(complete 0)

(set ziel
  (tackon
    (askdir
      (prompt 'Wohin soll das Verzeichnis für den FKM kopiert werden?')
      (help @askdir-help)
      (default 'Work:')
    )
    'FKM'
  )
)
(set @default-dest ziel)
(copyfiles
  (prompt (cat 'Die Datei \"FKM dt\" wird nach \"' ziel '\" kopiert.'))
  (help @copyfiles-help)
  (source quel)
  (dest ziel)
  (pattern 'FKM dt')
  (files)
  (infos)
)
(complete 20)
(rename
   (tackon ziel 'FKM dt')
   (tackon ziel 'FKM')
   (prompt 'Die Datei \"FKM dt\" wird zu \"FKM\" umbenannt.')
   (help @rename-help)
)
(rename
   (tackon ziel 'FKM dt.info')
   (tackon ziel 'FKM.info')
   (prompt 'Die Datei \"FKM dt.info\" wird zu \"FKM.info\" umbenannt.')
   (help @rename-help)
)
(complete 25)

(copyfiles
  (prompt (cat 'Die Datei \"FKM.guide\" (die Online-Hilfe und Anleitung des FKM) wird nach \"' ziel '\" kopiert.'))
  (help @copyfiles-help)
  (source (tackon quel 'Docs Deutsch'))
  (dest ziel)
  (pattern 'FKM dt.guide')
  (files)
  (infos)
)
(complete 45)
(rename
   (tackon ziel 'FKM dt.guide')
   (tackon ziel 'FKM.guide')
   (prompt 'Die Datei \"FKM dt.guide\" wird zu \"FKM.guide\" umbenannt.')
   (help @rename-help)
)
(rename
   (tackon ziel 'FKM dt.guide.info')
   (tackon ziel 'FKM.guide.info')
   (prompt 'Die Datei \"FKM dt.guide.info\" wird zu \"FKM.guide.info\" umbenannt.')
   (help @rename-help)
)
(complete 50)

(copyfiles
  (prompt 'Soll die Datei \"FKM-Bild\" (das Titelbild des FKM) kopiert werden?\nAuf Rechner mit einem 68000 Prozessor, kann das Laden des Titelbildes etwas dauern.\nDer FKM läßt sich daher auch ohne Titelbild starten, wenn es nicht vorhanden ist.')
  (help @copyfiles-help)
  (source quel)
  (dest ziel)
  (pattern 'FKM-Bild')
  (files)
  (confirm)
)
(complete 75)

(copylib
  (prompt 'Die AmigaGuide-Library wird gegebenfalls nach LIBS: kopiert.')
  (help @copylib-help)
  (source (tackon quel 'libs/amigaguide.library'))
  (dest 'LIBS:');
)
(complete 100)

(exit 'Die Demoversion des FKM v1.32 wurde erfolgreich installiert!\n\nViel Spaß mit dem FKM wünscht\nStefan Thomé');