> Neither this one, nor the one from Sunday at 11:27pm EST seem to be
> functional on my system. 

I added some modifications. These are all I can do from the
documentation. If it doesn't work either, then I'm out of ideas.
It could be the MS Natural Keyboard, or some latest changes/updates to
DDK (:ntddkbd.h especially), unfortunately, both I can't access.

The usage is:
.ToggleKeys(bNum,bCap,bScr)

bNum/bCap/bScr takes 1/0/-1 and "" for on/off/reverse and unaltered.

So, .ToggleKeys() now doesn't change anything.

-------------------- ToggleKeys.PowerPro -----------------------------
args bNum,bCap,bScr,hDev,nRet,nPort,nStat

dll.call("DefineDosDevice|ui s- s b",;;+
1,"Keybd",?"\Device\KeyboardClass0")
hDev=dll.call("CreateFile|s ui ui ui ui ui ui",;;+
?"\\.\Keybd",0,1,0,3,0,0)
dll.call("DefineDosDevice|ui s- s! b",2,"Keybd","")

dll.call("DeviceIoControl|ui ui ui ui ui* ui ui* ui",;;+
hDev,0xB*65536|0x10*4,0,0,"nStat",4,"nRet",0)
nPort=nStat&65536
nStat=nStat/65536

win.debug(nPort,nStat,hDev)

if(bScr<0)
bScr=(nStat ^ bScr & 1)/1 & 1
if(bNum<0)
bNum=(nStat ^ bNum & 2)/2 & 1
if(bCap<0)
bCap=(nStat ^ bCap & 4)/4 & 1

nStat=nPort | (bScr*1 | bNum*2 | bCap*4)*65536
dll.call("DeviceIoControl|ui ui ui* ui ui ui ui* ui",;;+
hDev,0xB*65536|0x02*4,"nStat",4,0,0,"nRet",0)

dll.call("CloseHandle|ui",hDev)
quit
----------------------------------------------------------------------

Sean





Attention: PowerPro's Web site has moved: http://www.ppro.org 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/power-pro/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/power-pro/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:[EMAIL PROTECTED] 
    mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 


Reply via email to