关闭粘滞键窗口程序

玩某些游戏的时候需要按多次Shift键，然而粘滞键是一个非常烦的东西，所以我弄了一个程序来关闭粘滞键的窗口：

import win;
import win.ui;
import win.ui.menu;
import win.util.tray;
/*DSG{{*/
var winform = win.form(text="aardio form";right=759;bottom=469)
winform.add()
/*}}*/
var tray = win.util.tray(winform);//托盘图标
winform.popmenu = win.ui.popmenu(winform);
winform.show(false);
winform.wndproc = {
	[0xACCF/*_WM_TRAYMESSAGE*/] = function(hwnd,message,wParam,lParam){
		if( lParam = 0x205/*_WM_RBUTTONUP*/){ 
	    	var pt = ::POINT();
			::User32.GetCursorPos(pt);
	    	win.setForeground(winform.hwnd);
	    	winform.popmenu.popup(pt.x,pt.y,true);
	    }
	}
}
winform.popmenu.add('&exit',function(id){ winform.close() })
while(winform.valid!=false){
	win.close(win.find(,"粘滞键"));
	win.delay(10);
}
win.loopMessage();
return winform;

利用此方法还可以不花钱使用Goldwave。