home *** CD-ROM | disk | FTP | other *** search
- RequestChoice >env:l2ztmp4 "LhA2LZX Installer" "Do you want to install everything*nor just the basics?" "Everything" "Basics" "Cancel"
- if $l2ztmp4 EQ 0
- quit
- endif
- RequestFile >env:l2ztmp DRAWERSONLY TITLE "Install LhA2LZX to..." POSITIVE Install DRAWER S:
- echo $l2ztmp >env:l2ztmp1 NOLINE
- echo "LhA2LZX" >env:l2ztmp2 NOLINE
- join env:l2ztmp1 env:l2ztmp2 TO env:LhA2LZXpath
- copy env:LhA2LZXpath envarc:LhA2LZXpath >nil:
- if $l2ztmp4 EQ 2
- copy LhA2LZX~(_)#? TO $l2ztmp CLONE >NIL:
- else
- copy LhA2LZX#? TO $l2ztmp CLONE >NIL:
- endif
- cd $l2ztmp
- delete LhA2LZX.ins#? >NIL:
- RequestChoice "Install Successful!" "LhA2LZX is now installed in*n$l2ztmp1" "Marvellous!" >NIL:
- delete env:l2z#? ALL QUIET FORCE