; CDpro (V3.5) Installerscript (c) by PackMAN

(set #notV37
(cat "CD pro needs OS2.x (V37.175) or higher..."))

(set #msg
(cat "\n\n"
     " > CD pro (V3.5) <  Installer script.\n\n"
     "CD pro © 1993-1996 Falk Zühlsdorff\n"
     "All rights reserved."))

(set #0
(cat "Select Drawer..."))

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

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

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

(message #msg)
(welcome)

(set name
    (askdir
        (prompt "\n" #0)
        (help @askdir-help)
        (default "SYS:")
    )
)

(copyfiles
    (prompt "CDpro V3.5")
    (source "")
    (help @copyfiles-help)
    (dest (tackon name "CDpro"))
    (pattern "~(Installiere_Deutsch#?|Install_English#?|Libs|Catalogs|CDpro.dt.guide#?)")
    (infos)
    (confirm)
)
(copylib
    (prompt "Install Reqtools.library ?")
    (help @copyfiles-help)
    (source "Libs/reqtools.library")
    (dest "Libs:")
    (safe)
    (confirm)
)