Need help with _ispressed

[aRd78 0]

Hi there,

I´m trying to remap a keypad

My sample code looks like this..

HotKeySet("{Esc}","_Exit_app")
#include <Misc.au3>
$dll = DllOpen("user32.dll")


While 1

    if ( _IsPressed("6A", $dll)) Then
        ToolTip("test")
        sleep(500)
        ToolTip("")
    EndIf


sleep(100)
WEnd

Func _Exit_app()
DllClose($dll)
Exit
EndFunc

My problem is that when pressing the * key my "hot key" works but i also get a * sent to the application. I want to stop the sending of the *.

Hope you guys understand my problem..

Edited December 7, 2010 by aRd78

[JohnOne 1,541]

Try telling it to send something else.

[aRd78 0]

Try telling it to send something else.

I described a little bit crazy. I want to capture the real key press in order to replace it with another one. Normally, I would be able to use hotkeyset but it does not work on asterisk (*).

[JohnOne 1,541]

Im not sure I follow, you know what the real ispressed is, its "6A".

[aRd78 0]

Im not sure I follow, you know what the real ispressed is, its "6A".

I'll try to explain better. I want to achieve: when I press the asterisk (*) on the numpad, AutoIt would stop that press and send backspace instead. But right now I just manage to accomplish the following, when I for example in notepad, press the asterisk (*) asterisk symbol will occur in notepad (not what I want) and then my script sends a backspace.

The reason I use _ispressed is that I never had a Hotkeyset to work with asterisk!

see new example code!!!

HotKeySet("{Esc}","_Exit_app")
#include <Misc.au3>
$dll = DllOpen("user32.dll")


While 1

    if ( _IsPressed("6A", $dll)) Then
        send("{BACKSPACE}")
    EndIf


sleep(100)
WEnd



func _Exit_app()
DllClose($dll)
Exit
EndFunc

[JoHanatCent 7]

Are you using the num pad "*"

or trying with shift and 8?

[Bert 1,168]

The reason I use _ispressed is that I never had a Hotkeyset to work with asterisk!

Try this:

HotKeySet("+8", "_msg")

while 1
    sleep( 10) ;idle around
wend    

func _msg()
    msgbox(0, "", "* pressed!")
EndFunc

Or this:

HotKeySet("*", "_msg")

while 1
    sleep( 10) ;idle around
wend    

func _msg()
    msgbox(0, "", "* pressed!")
EndFunc

Both will work on SHIFT&8, but will not work on the asterisk key.

edit: This is an interesting problem. I'm looking around to see how to solve this.

Edited December 7, 2010 by MPH

[Bert 1,168]

This will work on the asterisk key in question. It is referred to as the "Multiply" key

#include <Misc.au3> 
$dll = DllOpen("user32.dll")
 While 1
     Sleep ( 250 )
     If _IsPressed("6A", $dll) Then
         MsgBox(0,"_IsPressed", "End Key Pressed")
         ExitLoop
     EndIf
 WEnd

[JohnOne 1,541]

I think that is basically the code the OP has to begin with.

I'm thinking he wants a function more like hotkeyset(), because that will intercept the sending of the asterix and send some other character, where as

#include <Misc.au3>
$dll = DllOpen("user32.dll")
 While 1
     Sleep ( 250 )
     If _IsPressed("6A", $dll) Then
         Send("a")
         ExitLoop
     EndIf
 WEnd

will send both

If something like HotKeySet("6A","_func") were possible, would be a solution.

[BrewManNH 978]

@MPH & @aRd78

To get a hotkeyset to work for the numberpad * to work, you need to use {NUMPADMULT}.

[JohnOne 1,541]

Spot on BrewManNH

HotKeySet("{NUMPADMULT}","_run")

While 1
    Sleep(10)
WEnd

Func _run()
    Send("x")
EndFunc

[aRd78 0]

Spot on BrewManNH

HotKeySet("{NUMPADMULT}","_run")

While 1
    Sleep(10)
WEnd

Func _run()
    Send("x")
EndFunc

Hopefully this solves my problem! But I'm still curious

if it is possible to prevent the letter / character from being sent when you use _ispressed?

I´ll give it a try at work tomorrow...

Thx!!!

Edited December 7, 2010 by aRd78

[Bert 1,168]

@MPH & @aRd78

To get a hotkeyset to work for the numberpad * to work, you need to use {NUMPADMULT}.

I didn't see that one. Nice catch!

[iamtheky 581]

if it is possible to prevent the letter / character from being sent when you use _ispressed?

Maybe playing with sendkeydelay - then next onto getting it to only backspace over a single character

#Include <Misc.au3>

Opt("SendKeyDelay", 30)          ;5 milliseconds

While 1
    If _IsPressed("6A") Then
        send ("{BS 1}")
        sleep (50)
    EndIf
WEnd