home *** CD-ROM | disk | FTP | other *** search
- ;;;;
- ;;;; $VER: XTruderKeymaker-Installer V1.0 (23.6.96)
- ;;;;
-
- (set @bad-kick
- (cat "You need OS2.04 or higher!"
- ))
-
- (if (< (/ (getversion) 65536) 37) (abort #bad-kick))
-
- (complete 0)
- (set destdir (askdir
- (help @askdir-help)
- (prompt "Select a path for installing. A drawer will be created.")
- (default ("WORK:Tools/"))
- )
-
- )
- (complete 7)
- (set destdir (tackon destdir "XTKM"))
- (makedir destdir (prompt "Installing drawer...")(infos))
- (complete 26)
- (copyfiles (prompt "Installing XTruderKeymaker...")
- (source "XTruderKeymaker")
- (dest destdir)
- )
- (complete 39)
- (copyfiles (prompt "Installing XTruderKeymaker...")
- (source "icons/XTruderKeymaker.info")
- (dest destdir)
- )
- (complete 53)
- (copyfiles (prompt "Installing dox...")
- (source "XTruderKeymaker.guide")
- (dest destdir)
- )
- (complete 78)
- (copyfiles (prompt "Installing dox...")
- (source "icons/XTruderKeymaker.guide.info")
- (dest destdir)
- )
- (complete 86)
- (copyfiles (prompt "Installing default keyfile...")
- (help @nohelp)
- (source "XTruder.key")
- (dest "L:")
- (confirm)
- )
- (complete 92)
- (copyfiles (prompt "Installing reqtools.library...")
- (help @nohelp)
- (source "reqtools.library")
- (dest "LIBS:")
- (confirm)
- )
- (set @default-dest destdir)
- (complete 100)
- (exit)