home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / mousechg.zip / MOUSEBAK.CMD < prev    next >
OS/2 REXX Batch file  |  1993-08-15  |  911b  |  43 lines
  1. /* MOUSEBAK.CMD -- utility to change the mouse pointer for OS/2 2.1 back to 
  2. its default pointer
  3.  
  4. Steve Allen
  5. Altech Computer Services
  6. 121 Herta St.
  7. Easley, SC 29640
  8.  
  9. Aug 93
  10. */
  11.  
  12. call rxfuncadd sysloadfuncs, rexxutil, sysloadfuncs
  13. call sysloadfuncs
  14.  
  15. say ""
  16. say "MOUSEBAK v1.0 1993"
  17. say "Altech Computer Services" 'fe'x "Steve Allen"
  18. say ""
  19.  
  20. say "Deleting custom mouse pointer from OS2.INI file..."
  21. result = sysini(, 'PM_SysPointer')
  22.  
  23. if result = "" then
  24.     say "Old mouse pointer reinstalled successfully.  Now reboot."
  25. else
  26.     do
  27.         say "Error deleting 'Application' PM_SysPointer from your OS2.INI file."
  28.         say "Copy the file OS2.BAK to OS2.INI to recover, then reboot."
  29.         exit(1)
  30.     end
  31.  
  32. return
  33.  
  34.  
  35. beep_error:
  36.     duration = 100
  37.     call beep 262, duration
  38.     call beep 330, duration
  39.     call beep 262, duration
  40. return
  41.  
  42. /* end of MOUSEBAK.CMD */
  43.