Sending Keys To Game

Hello Guys I Need YOur Help.

I Try To Make A Program And I Make 1 button1 but if i click the button1 and will be press The Numpad1. I Dont Know What Is The Code?

NUMPAD1?

Help Plss

what do you mean explain better

@Jheamuel123
i don't know if this is what you want, but it seems to be what i perceive of your bad english.

Code:

'This to be placed inside the Button click event, on my laptop (NO VB :( ) so i can't do the sub crap.
My.Computer.Keyboard.SendKeys(Keys.NumPad1)

Thank me if i helped?

It seems to be that

I know understood what he's talking about

SendKeys Class (System.Windows.Forms)

If you have no clue what to do with the link there, you are learning the wrong way (or not even learning)

Originally Posted by raow25

@Jheamuel123
i don't know if this is what you want, but it seems to be what i perceive of your bad english.

Code:

'This to be placed inside the Button click event, on my laptop (NO VB :( ) so i can't do the sub crap.
My.Computer.Keyboard.SendKeys(Keys.NumPad1)

Thank me if i helped?

Hello I try This But This Is Working But When I Use In The Game Not Working Why?

But When I Press Numpad1 In my Keybord Is Working! Help Plss

Originally Posted by Jheamuel123

Hello I try This But This Is Working But When I Use In The Game Not Working Why?

But When I Press Numpad1 In my Keybord Is Working! Help Plss

http://www.mpgh.net/forum/33-visual-...vindictus.html

Similar problem here and solved

Originally Posted by raow25

@Jheamuel123
i don't know if this is what you want, but it seems to be what i perceive of your bad english.

Code:

'This to be placed inside the Button click event, on my laptop (NO VB :( ) so i can't do the sub crap.
My.Computer.Keyboard.SendKeys(Keys.NumPad1)

Thank me if i helped?

hi how do i get this to send the command to iw3mp it doesnt work for me
pls help

oh god guy NO!

use this,

Code:

Public Class
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

timer 1 interval = 1 enabled = true

dim f1 as boolean = false

f1 = GetAsyncKeyState(keys.f1)

if f1 = true then
msgbox("it worked")

Originally Posted by lucasheer715

oh god guy NO!

use this,

Code:

Public Class
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

timer 1 interval = 1 enabled = true

dim f1 as boolean = false

f1 = GetAsyncKeyState(keys.f1)

if f1 = true then
msgbox("it worked")

this dont work

Originally Posted by jameshk67

this dont work

Just read the rest of the answers please.

Originally Posted by Brinuz

Just read the rest of the answers please.

what answers?

Originally Posted by jameshk67

what answers?

http://www.mpgh.net/forum/33-visual-...vindictus.html

Private Sub Timer1_Timer()

If GetKeyPress(vbKey1) Then
Timer2.Interval = 1
End If

End Sub

If you have more timer e.g more Timers you just can add them like I did in the code below (you also need to add the timer on your form like you did in step 2). It should look like this:

Private Sub Timer1_Timer()

If GetKeyPress(vbKey1) Then
Timer2.Interval = 1
End If

If GetKeyPress(vbKey2) Then
Timer3.Interval = 1
End If

If GetKeyPress(vbKey3) Then
Timer4.Interval = 1
End If

End Sub

'Interval value 1 will freeze the option, like it will keep pushing the button automatically. If you want to reset it, like you want
'to have a RESET OPTIONS function, the interval of the timer needs to be 0. So we do it like this:

If GetKeyPress(vbKey9) Then
Timer2.Interval = 0
Timer3.Interval = 0
Timer4.Interval = 0
End If

5. We are done with the hotkeys now, now we need to add something to happend when the hotkeys are pressed. Example when user pushed the hotkey some new value needs to be written in an adress. So we need to use Timer2 which is set to the button "1". Double click on Timer2 and simply add your code to it, so here is an example:

Private Sub Timer2_Timer()
Call WriteAByte("Adssantado Trilogy. Book One", &H403BE8, &H90)
End Sub

What does this code do? It simply activates the piece of code when the button is pressed and it freezes it, thats why I'm using 1 for the Timer interval.

As for the hoykeys, Im using simply 1, 2, 3 etc. Just an example. vbKey1 stands for 1, its really simple. Check this link out for the other key constants in VB6.0: http://msdn.microsof*****m/en-us/libr...(v=vs.80).aspx

Originally Posted by ASM_KiLLER

I think he means how to make a hotkey function in VB6.0. I have some examples for you I will post them later. Okay This is how to do it VB6.0:

1. Start a new project in VB6.0.
2. Create two timers on the form (Timer1 and Timer2).
3. Select Timer1 and go to the properties and set 1 at the interval.
4. Now here comes the hard part, double click on the Timer1. A new window should open write the following lines:

If you have more timer e.g more Timers you just can add them like I did in the code below (you also need to add the timer on your form like you did in step 2). It should look like this:

5. We are done with the hotkeys now, now we need to add something to happend when the hotkeys are pressed. Example when user pushed the hotkey some new value needs to be written in an adress. So we need to use Timer2 which is set to the button "1". Double click on Timer2 and simply add your code to it, so here is an example:

What does this code do? It simply activates the piece of code when the button is pressed and it freezes it, thats why I'm using 1 for the Timer interval.

As for the hoykeys, Im using simply 1, 2, 3 etc. Just an example. vbKey1 stands for 1, its really simple. Check this link out for the other key constants in VB6.0: Key Code Constants for Visual Basic 6.0 Users

No, VB6 is legacy and hardly anyone uses it any more. The majority of people in this section use VB Express 2003+ as their IDE, meaning that they're using .NET, not 6. Also, using multiple timers like that is bad practice and will waste a whole lot of resources by attempting to call GetAsyncKeyState not once, not twice but THREE times every millisecond (won't actually happen due to thread synchrony and overhead, but you get the idea). It also means that an action will be fired multiple times in a single keystroke as the average user (even a fast typer) holds the key down for well over a millisecond (I've found 100-150ms to be about right when polling for keypresses).

Still, polling keypresses isn't the optimal way of going about this as their are plenty of options to register a keyboard hook which triggers a callback when the keys are actually pressed. See Register/UnregisterHotKey for implementation details.
RegisterHotKey function

Either way this isn't what the requester asked!
He doesn't want to know how to bind a hotkey to Numpad1, he wants to send a Numpad1 keypress to an application. The thread linked by both Bruno and Kevin details how to do this using the PostMessage API.

Sending Keys To Game

Post a Reply

Similar Threads

Tags for this Thread