Ok, I cannot get NLED to work!? This is rather frustrating.
I have RC11 installed, the script installed at "\Windows\Start Menu\Programs\MortScript\NLED\NLED.mscr". I also have a shortcut in the startup folder. I have Chines and TreoVibe working successfully, so I know it isn't an issue with my installation or setup of MortScript. I even added simple messages inside the NLED script to tell me if is actually running (which it doesn't seem to be doing).
Anyways, ANY advice would be definitely helpful. LEDUp.exe is installed and I can run it (which it doesn't really do much either w/o extensions). I'm running a Cingular 750. I do have a registry hack on the
Code:
HKCU\ControlPanel\Notifications\Reminders\AutoSnooze\AutoSnoozeMins = 0
so it doesn't send reminders more then once. The script isn't even running so I don't think this is the issue. Thanks guys; MortScript is wonderful.
BTW, my modified version of the script (after the original wasn't working) is/was (and yes, I know its a loop so I would get many many messages if it actually was running...)
Code:
#
# NLED.mscr - Monitors notifications and turns on and off the notification LED accordingly.
#
# check dependencies
If ( NOT FileExists( "\Windows\LEDUp.exe" ) )
Message ( "Installation of LEDUp.exe is required! Exiting...", "NLED script" )
Exit
EndIf
# initialize variables
LedOn = FALSE
Notify = FALSE
Message ( "RUNNING NLED", "NLED script" )
# start notification check loop
While ( 1 )
# check the registry for any notifications
Notify = RegValueExists( "HKLM", "System\State\Shell\Notifications\Active", "CLSID" )
# turn on the led if any notifications are pending. Keep turning on each iteration since
# the OS turns it off whenever there is a new notification.
If ( Notify )
RunWait( "\Windows\LEDUp.exe", "0 1" )
LedOn = TRUE
Message ( "LED ON", "NLED script" )
EndIf
# turn off the led if no notifications are pending
If ( LedOn && NOT Notify )
RunWait( "\Windows\LEDUp.exe", "0 0" )
LedOn = FALSE
Message ( "LED OFF", "NLED script" )
EndIf
# wait 5 seconds
Sleep( 5000 )
EndWhile