home *** CD-ROM | disk | FTP | other *** search
- ; $VER: RmIcon Installation Script 0.1 (12.06.2001)
- ; Installation script for RmIcon by Renaud Lacour
-
- IF $language EQ "franτais"
- ECHO "Bienvenue dans l'utilitaire d'installation/dΘsinstallation de RmIcon."
- ASK "Voulez-vous installer (N) ou dΘsinstaller (y) RmIcon ? (^d + entrΘe pour quitter)"
- IF WARN
- IF EXISTS rexx:RmIcon.rexx
- DELETE rexx:RmIcon.rexx
- ENDIF
- IF EXISTS SYS:WBStartup/RmIcon
- DELETE SYS:WBStartup/RmIcon
- ENDIF
- IF EXISTS SYS:WBStartup/RmIcon.info
- DELETE SYS:WBStartup/RmIcon.info
- ENDIF
- IF EXISTS help:franτais/RmIcon.doc
- DELETE help:franτais/RmIcon.doc
- ENDIF
- ECHO "TerminΘ."
- WAIT 4
- QUIT
- ENDIF
- IF NOT WARN
- COPY CLONE rexx/RmIconFR.rexx REXX:RmIcon.rexx
- COPY CLONE WBStartup/RmIconFR SYS:WBStartup/RmIcon
- COPY CLONE WBStartup/RmIconFR.info SYS:WBStartup/RmIcon.info
- COPY CLONE RmIconFR.doc help:franτais/RmIcon.doc
- Rx SYS:WBStartup/RmIcon
- ASK "La documentation se trouve dans help:franτais/RmIcon.doc, voulez-vous la lire maintenant ? (yN)"
- IF WARN
- WHICH MORE >NIL:
- IF NOT WARN
- MORE help:franτais/RmIcon.doc
- QUIT
- ENDIF
- WHICH MULTIVIEW >NIL:
- IF NOT WARN
- MULTIVIEW help:franτais/RmIcon.doc
- QUIT
- ENDIF
- WHICH LESS >NIL:
- IF NOT WARN
- LESS help:franτais/RmIcon.doc
- QUIT
- ENDIF
- WHICH MUCHMORE >NIL:
- IF NOT WARN
- MUCHMORE help:franτais/RmIcon.doc
- QUIT
- ENDIF
- WHICH SMORE >NIL:
- IF NOT WARN
- SMORE help:franτais/RmIcon.doc
- QUIT
- ENDIF
- WHICH TYPE >NIL:
- IF NOT WARN
- TYPE help:franτais/RmIcon.doc
- QUIT
- ENDIF
- ECHO "Impossible de trouver un outil appropriΘ pour lire la documentation."
- ENDIF
- QUIT
- ENDIF
- ENDIF
-
- IF $language NOT EQ "franτais"
- ECHO "Welcome to the installation/uninstallation utility of RmIcon."
- ASK "Do you want to install (N) or uninstall (y) RmIcon ? (^d + enter to quit)"
- IF WARN
- IF EXISTS rexx:RmIcon.rexx
- DELETE rexx:RmIcon.rexx
- ENDIF
- IF EXISTS SYS:WBStartup/RmIcon
- DELETE SYS:WBStartup/RmIcon
- ENDIF
- IF EXISTS SYS:WBStartup/RmIcon.info
- DELETE SYS:WBStartup/RmIcon.info
- ENDIF
- IF EXISTS help:english/RmIcon.doc
- DELETE help:english/RmIcon.doc
- ENDIF
- ECHO "Finished."
- WAIT 4
- QUIT
- ENDIF
- IF NOT WARN
- COPY CLONE rexx/RmIconE.rexx REXX:RmIcon.rexx
- COPY CLONE WBStartup/RmIconE SYS:WBStartup/RmIcon
- COPY CLONE WBStartup/RmIconE.info SYS:WBStartup/RmIcon.info
- COPY CLONE RmIconE.doc help:english/RmIcon.doc
- Rx SYS:WBStartup/RmIcon
- ASK "The documentation can be found in help:english/RmIcon.doc, do you want to read it now ? (yN)"
- IF WARN
- WHICH MORE >NIL:
- IF NOT WARN
- MORE help:english/RmIcon.doc
- QUIT
- ENDIF
- WHICH MULTIVIEW >NIL:
- IF NOT WARN
- MULTIVIEW help:english/RmIcon.doc
- QUIT
- ENDIF
- WHICH LESS >NIL:
- IF NOT WARN
- LESS help:english/RmIcon.doc
- QUIT
- ENDIF
- WHICH MUCHMORE >NIL:
- IF NOT WARN
- MUCHMORE help:english/RmIcon.doc
- QUIT
- ENDIF
- WHICH SMORE >NIL:
- IF NOT WARN
- SMORE help:english/RmIcon.doc
- QUIT
- ENDIF
- WHICH TYPE >NIL:
- IF NOT WARN
- TYPE help:english/RmIcon.doc
- QUIT
- ENDIF
- ECHO "Unable to find an appropriate tool to read the documentation."
- ENDIF
- QUIT
- ENDIF
- ENDIF
-