home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / ftaskbar.zip / tuinstal.cmd < prev   
OS/2 REXX Batch file  |  1995-10-16  |  2KB  |  67 lines
  1. /*
  2.  * FM/2 Taskbar deinstallation program
  3.  */
  4. '@Echo off'
  5. 'cls'
  6. /* tell the nice people who we are */
  7. say ''
  8. say ' ┌────────────────────────────────────────────────────────────────────────────┐'
  9. say ' │                                                                            │'
  10. say ' │                   FM/2 Taskbar deinstallation program                      │'
  11. say ' ├────────────────────────────────────────────────────────────────────────────┤'
  12. say ' │   FM/2, FM/2 Utilities, and FM/2 Taskbar copyright (c) 1995 by M. Kimes    │'
  13. say ' │                             all rights reserved                            │'
  14. say ' │                                                                            │'
  15. say ' └────────────────────────────────────────────────────────────────────────────┘'
  16. say ''
  17. /* get current directory */
  18. curdir = directory()
  19. /* see if we have what we need to kill off */
  20. rc = stream('taskhook.dll','c','query exists')
  21. if rc = '' then
  22. do
  23.   say 'Sorry, TASKHOOK.DLL not found.  Must not be right directory.  Terminating.'
  24.   exit
  25. end
  26. rc = stream('taskbar.exe','c','query exists')
  27. if rc = '' then
  28. do
  29.   say 'Sorry, TASKBAR.EXE not found.  Must not be right directory.  Terminating.'
  30.   exit
  31. end
  32. /* load system utility functions */
  33. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  34. call SysLoadFuncs
  35. /* be sure they meant it */
  36. call charout ,"Remove FM/2 Taskbar from your system? [Y/N] "
  37. /* get input */
  38. dummy = ''
  39. do forever
  40.   dummy = SysGetKey('NOECHO')
  41.   parse upper var dummy dummy
  42.   if dummy = '1b'x then dummy = 'N'
  43.   if dummy = '0d'x then dummy = 'Y'
  44.   if dummy = 'N' then leave
  45.   if dummy = 'Y' then leave
  46. end
  47. call charout ,dummy
  48. say ''
  49. /* well, did they really mean it? */
  50. if dummy = 'N' then exit
  51. /* disembowel ourself */
  52. call SysDestroyObject "<FM/2 Taskbar>"
  53. 'del taskbar.exe'
  54. 'del taskhook.dll'
  55. 'del taskbar.ini'
  56. 'del tinstal.cmd'
  57. 'del file_id.diz'
  58. 'del texclude.lst'
  59. 'del vexclude.lst'
  60. 'del tread.me'
  61. cd..
  62. /* tell the nice people we're done */
  63. say 'Deinstallation complete.  Remove directory '
  64. say curdir' if desired with RMDIR.'
  65. /* now blow our brains out all over the wall */
  66. 'del 'curdir'\tuinstal.cmd'
  67.