Modifier keys stay pressed

[H1He2]

Hello everyone!

I have been working on a small AutoIt script that allows the user to toggle between Playback devices without opening the "Sound" window from the system tray in Windows 7/Vista. I did this through assigning key combinations. The script is functioning as I intended with the exception of one small problem. For some reason, very frequently, after pressing one of the assigned key combinations, the modifier keys used in the key combination (Ctrl and Alt, in this case) behave as if they are still being pressed down, even after being released. This remains the case until the user presses and releases the modifier keys. What can I do to correct this annoying phenomenon? I have just recently started using AutoIt and as a result I am still quite unaccustomed to it. Any assistance that you provide would be greatly appreciated. Thanks!

Opt("TrayIconHide", 1) 

$keypress = "{LCTRL}{LALT}"
HotKeySet($keypress&"1", "SetDevice1")
HotKeySet($keypress&"2", "SetDevice2")

While 1
    Sleep(5000)
    WEnd

Func SetDevice1()
    Run("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0")
    WinWait("Sound", "Select a playback")
    BlockInput(1)
    WinActivate("Sound", "Select a playback")
    Send("{DOWN}", 0)
    ControlClick("Sound", "Select a playback", 1002)
    WinClose("Sound", "Select a playback")
    BlockInput(0)
EndFunc
Func SetDevice2()
    Run("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0")
    WinWait("Sound", "Select a playback")
    BlockInput(1)
    WinActivate("Sound", "Select a playback")
    Send("{DOWN}{DOWN}", 0)
    ControlClick("Sound", "Select a playback", 1002)
    WinClose("Sound", "Select a playback")
    BlockInput(0)
EndFunc

[dantay9]

Take a close look at the send help file. I think sending CTRLUP and ALTUP will fix your problem.

[GEOSoft]

Just change the HotKeys to

HotKeySet("^!1", "SetDevice1")
HotKeySet("^!2", "SetDevice2")

And forget about $keypress

[MrCreatoR]

Why does the Ctrl key get stuck down after I run my script?

[H1He2]

Just change the HotKeys to

HotKeySet("^!1", "SetDevice1")
HotKeySet("^!2", "SetDevice2")

And forget about $keypress

Actually, I don't think changing that would make any difference. I had that variable there because I was planning on making the hot key user customizable in the future.