home *** CD-ROM | disk | FTP | other *** search
- ; UnInstaller script for HTMLread.rexx
- ; $VER:UnInstall HTMLread V1.0 (03.02.2001)
-
- (set @default-dest "")
- (set @app-name "HTMLread Uninstaller")
- (set @user-level 2)
- (user 1)
-
- (complete 0)
-
- (message "\nHTMLread uninstallation!\n\n\n"
- ("This script uninstalls HTMLread!\n")
- )
-
- (complete 5)
-
- (if (exists "YAM:HTMLread" (noreq))
- ( (set path "YAM:HTMLread") )
- ( ( set path (askdir (prompt "Please choose the HTMLread drawer!")
- (help @askdir-help )
- (default "YAM:")
- )
- )
- )
- )
- (if (askbool (prompt ("\n\nHTMLread UnInstaller!\n\nDo you want realy delete HTMLread\n(%s)\n?" path) )
- (help "Yes if you want delete HTMLread\n\n"
- "No, if you want skip...")
- (default 0)
- (choices "Yes, delete!" "No, skip!")
- )
- ( (complete 10)
- (run ("c:delete %s/HTMLread#? ALL QUIET FORCE" path))
- (run ("c:delete %s/Scripts#? ALL QUIET FORCE" path))
- (run ("c:delete %s/Optimizer#? QUIET FORCE" path))
- (run ("c:delete %s/MicroRexx#? ALL QUIET FORCE" path))
- (run ("c:delete %s/DOC#? ALL QUIET FORCE" path))
- (run ("c:delete %s/clearCache#? ALL QUIET FORCE" path))
- (run ("c:delete %s/DownloadListPrefs.rx#? ALL QUIET FORCE" path))
- (run ("c:delete %s/bin#? ALL QUIET FORCE" path))
- (complete 70)
- (run ("c:delete %s//UnInstall QUIET FORCE" path))
- (run ("c:delete %s//UnInstall.info QUIET FORCE" path))
- (run ("c:delete %s/UnInstall QUIET FORCE" path))
- (run ("c:delete %s/UnInstall.info QUIET FORCE" path))
- (run ("c:delete %s QUIET FORCE" path))
- (complete 80)
- (run ("c:delete %s.info QUIET FORCE" path))
- (complete 90)
- (run ("c:delete ENV:HTMLread#? ALL QUIET FORCE"))
- (run ("c:delete ENVARC:HTMLread#? ALL QUIET FORCE"))
- (complete 91)
- (run ("c:delete ENV:HRdownload#? ALL QUIET FORCE"))
- (run ("c:delete ENVARC:HRdownload#? ALL QUIET FORCE"))
- (complete 92)
- (run ("c:delete YAM:Icons/ERROR.GIF QUIET FORCE"))
- (run ("c:delete YAM:Icons/DOWNLOAD.GIF QUIET FORCE"))
- (run ("c:delete YAM:Icons/NOTFOUND.GIF QUIET FORCE"))
- (run ("c:delete C:HTMLread QUIET FORCE"))
- (run ("c:delete YAM:badurls.HTMLread QUIET FORCE"))
- (complete 93)
- (if (exists "YAM:Rexx/HTMLread.rx" (noreq))
- ( (run ("c:delete YAM:Rexx/HTMLread.rx#? ALL QUIET FORCE"))
- )
- ( (set hrexx (askfile (prompt "Please select the HTMLread.rx script:")
- (help @askdir-help)
- (default "YAM:Rexx/")
- )
- )
- (if (exists hrexx (noreq))
- ( (run ("c:delete %s QUIET FORCE" hrexx))
- (run ("c:delete %s.bak QUIET FORCE" hrexx))
- )
- )
- )
- )
- (complete 93)
- (if (exists "YAM:Rexx/checkHTML.rx" (noreq))
- ( (run ("c:delete YAM:Rexx/checkHTML.rx#? ALL QUIET FORCE"))
- )
- ( (set hrexx (askfile (prompt "Please select the checkHTML.rx script:")
- (help @askdir-help)
- (default "YAM:Rexx/")
- )
- )
- (if (exists hrexx (noreq))
- ( (run ("c:delete %s QUIET FORCE" hrexx))
- (run ("c:delete %s.bak QUIET FORCE" hrexx))
- )
- )
- )
- )
- (complete 94)
- (if (exists "YAM:Rexx/HRdownload.rx" (noreq))
- ( (run ("c:delete YAM:Rexx/HRdownload.rx#? ALL QUIET FORCE"))
- )
- ( (set hrexx (askfile (prompt "Please select the HRdownload.rx script:")
- (help @askdir-help)
- (default "YAM:Rexx/")
- )
- )
- (if (exists hrexx (noreq))
- ( (run ("c:delete %s QUIET FORCE" hrexx))
- (run ("c:delete %s.bak QUIET FORCE" hrexx))
- )
- )
- )
- )
- (complete 95)
- (if (exists "YAM:Rexx/miamionoff.rx" (noreq))
- ( (run ("c:delete YAM:Rexx/miamionoff.rx#? ALL QUIET FORCE"))
- )
- ( (set hrexx (askfile (prompt "Please select the miamionoff.rx script:")
- (help @askdir-help)
- (default "YAM:Rexx/")
- )
- )
- (if (exists hrexx (noreq))
- ( (run ("c:delete %s QUIET FORCE" hrexx))
- (run ("c:delete %s.bak QUIET FORCE" hrexx))
- )
- )
- )
- )
- (complete 96)
- (if (exists "YAM:Rexx/GENESISonoff.rx" (noreq))
- ( (run ("c:delete YAM:Rexx/GENESISonoff.rx#? ALL QUIET FORCE"))
- )
- ( (set hrexx (askfile (prompt "Please select the GENESISonoff.rx script:")
- (help @askdir-help)
- (default "YAM:Rexx/")
- )
- )
- (if (exists hrexx (noreq))
- ( (run ("c:delete %s QUIET FORCE" hrexx))
- (run ("c:delete %s.bak QUIET FORCE" hrexx))
- )
- )
- )
- )
- (complete 99)
- (message "\nHTMLread is now uninstalled!\n\nDo not forget to remove HTMLread from youre YAM-config! "
- "Start YAM and run the configwindow. Choose under ARexx: "
- "»When reading a message«. Remove »YAM:Rexx/HTMLread.rexx«\nBye, bye..."
- )
- )
- )
-
- (complete 100)
- (exit)
-
- (welcome)
-