; Installer-Script für den Textloader, von Pascal Gisin

(set #notV37
(cat "» Textloader « benötigt OS2 (V37.175) oder höher..."))

(set #msg
(cat "\n\n"
     " » Textloader «  Installer script.\n\n"
     "Dieses Script Installiert den TEXTLOADER  "C:"\n\n"
     "Textloader © 1994-1997 B.S.E.\n"
     "All rights reserved. P.Gisin"))

(set #msg2
(cat "\n\n"
     "Der Textloader Editor, wurde nun Installiert!\n"
     "Sie können nun Ihren Computer Neu starten,\n"
     "um das Textloader Programm zu aktivieren!\n\n"

     "Updates gibt es gegen eine Kopiergebühr und\n"
     "eine Versandgebühr! Unter 10 sFr!!! Bei:\n\n"

     "        GISIN PASCAL\n"
     "        FIECHTENWEG 11\n"
     "        CH - 4147 AESCH"))

(set #SPEZIAL
(cat "\n\n"
     "Nun werden auf Wunsch, noch zusätzliche Librarys\n"
     "Installiert, die nicht für den Textloader nötig\n"
     "sind! Aber von vielen anderen Programmen benötigt\n"
     "werden! Wenn Sie PROCEED anklicken, werden diese\n"
     "Libs installiert. Haben Sie bereits eine Version,\n"
     "Installiert. Wird Ihnen das Mitgeteilt!... \n"))


;=============================================================================
; OS2 ?

(if (< (/ (getversion) 65536) 37)
(
    (abort #notV37)
))

;=============================================================================

(message #msg)
(welcome)

(copyfiles
    (prompt "Texteditor Textloader")
    (help " Die Textloader Installation wurde stark\n vereinfacht. Bitte Markieren Sie\n jede Datei die Sie Installieren möchten\n mit einem Häckchen!\n\n Der <Personal.font>, wird Automatisch, ohne\n Abfrage Installiert.")
    (source "Textloader")
    (dest "C:" )
    (confirm)
)

(complete 10)

(copyfiles
    (prompt "Icon/Pictogramm von Textloader?")
    (help "Hilfe ist leider noch nicht geschrieben!")
    (source "Textloader.info")
    (dest "C:" )
    (confirm)
)

(copyfiles
    (prompt " Installation für den Textloader.font?\n Bitte Help anklicken!")
    (help "Der Personal.font ist ein spezieller\n Zeichensatz, den der Textloader benutzt!\n Dieser Font bietet viele Vorteile,\n die nicht mit dem Standard TOPAZ-font\n Ausgenutzt werden können.\n\n\n BITTE UMBEDINGT INSTALLIEREN...")
    (source "TL_Fonts")
    (dest "Fonts:" )
    (infos)
    (all)

)

(complete 20)

(copyfiles
    (prompt "Textloader Dokumentationen!")
    (help "only the viewer no doc will be installed")
    (source "Textloader.dok")
    (dest "C:" )
    (confirm)
)

(copyfiles
    (prompt "Icon/Piktogramm mitkopieren?")
    (help "only the viewer no doc will be installed")
    (source "Textloader.dok.info")
    (dest "C:" )
    (confirm)
)

(copyfiles
    (prompt "Textloader.guide installieren?")
    (help "only the viewer no doc will be installed")
    (source "Textloader.guide")
    (dest "C:" )
    (confirm)
)

(copyfiles
    (prompt "Textloader.guide.info kopieren? ICON?")
    (help "only the viewer no doc will be installed")
    (source "Textloader.guide.info")
    (dest "C:" )
    (confirm)
)

(copyfiles
    (prompt "Textloader.history installieren?")
    (help "Installiert die History Dokumentation!")
    (source "History.dok")
    (dest "C:" )
    (confirm)

)

(complete 50)

(copyfiles
   (prompt "Textloader.history <ICON> kopieren?")
   (help "Installiert das Piktogramm! Der Textdatei!")
   (source "History.dok.info")
   (dest "C:" )
   (confirm)
)

(copyfiles
   (prompt "PPshow4.0 von N.Francois Installieren?")
   (help "Installiert PPshow!")
   (source "Util/ppshow")
   (dest "C:" )
   (confirm)

)

(set #copying-Mathieeedoub  "\nCopying Mathieeedoubbas.lib to LIBS:")
(set #copying-Mathrans       "\nCopying Mathieeedoubbtrans.lib to LIBS:")
    

(copylib
    (prompt "Copying-Mathieeedoub")
    (source "TL_Libs/mathieeedoubbas.library")
    (dest "sys:libs/")
    (infos)
    (help @copylib-help)
    (confirm)
)

(copylib
    (prompt #copying-mathrans)
    (source "TL_Libs/mathieeedoubtrans.library")
    (dest "sys:libs/")
    (infos)
    (help @copylib-help)
    (confirm)
)


(message #SPEZIAL)

(complete 75)

(copylib
    (prompt "Copying Powerpacker.library")
    (source "TL_Libs/powerpacker.library")
    (dest "sys:libs/")
    (infos)
    (help @copylib-help)
    (confirm)
)

(copylib
    (prompt "Copying Reqtools.library")
    (source "TL_Libs/reqtools.library")
    (dest "sys:libs/")
    (infos)
    (help @copylib-help)
    (confirm)
)

(copylib
    (prompt "Copying Req.library")
    (source "TL_Libs/req.library")
    (dest "sys:libs/")
    (infos)
    (help @copylib-help)
    (confirm)
)

(complete 90)

(copylib
    (prompt "Copying Arp.library")
    (source "TL_Libs/arp.library")
    (dest "sys:libs/")
    (infos)
    (help @copylib-help)
    (confirm)
)

(copylib
    (prompt "Copying Iff.library")
    (source "TL_Libs/iff.library")
    (dest "sys:libs/")
    (infos)
    (help @copylib-help)
    (confirm)
)

(complete 100)

(message #msg2)