; APrint (V3.0) Installerscript (c) by PackMAN

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

(set #msg
(cat "\n\n"
     " > APrint V3.0 <  Installer script.\n\n"
     "APrint © 1993-1995 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 "APrint V3.0")
    (source "")
    (help "...")
    (dest (tackon name "APrint"))
    (pattern "#?")
    (infos)
    (confirm)
)
(TOOLTYPE (DEST (tackon name "APrint/APrint"))
          (SETTOOLTYPE "GERMAN" "NO")
)
(copyfiles
    (prompt "Install Libraries ?")
    (help @copyfiles-help)
    (pattern "#?")
    (source "Libs/")
    (dest "Libs:")
    (confirm)
)
(copyfiles
    (prompt "Textviewer ZMore")
    (help "...")
    (source "ZMore")
    (dest "C:" )
    (confirm)
)