Send space twice

[arkane]

Hi dudes.

I have a problem with my script.

#include <Misc.au3>

If _IsPressed('11') Then
    $i=0
    While $i = 2
        Send("{SPACE down}")
        sleep (300)
        Send("{Space up}")
        $i = $i + 1
    WEnd
EndIf

I want that when I press ctrl, space is pressed twice.

But when I compile my project and launch it, nothing his launched, or maybe it is automaticly and quickly closed by itself.

Do you have any idea why ?

Thanks in advance.

[FireFox]

@arkane

#include <Misc.au3>
 
 If _IsPressed('11') Then
     $i=0
     While $i <= 2
         Send("{SPACE down}")
         sleep (300)
         Send("{Space up}")
         $i = $i + 1
     WEnd
 EndIf

Cheers, FireFox.

Edited February 2, 2009 by FireFox

[spudw2k]

Hi dudes.

I have a problem with my script.

#include <Misc.au3>

If _IsPressed('11') Then
    $i=0
    While $i = 2
        Send("{SPACE down}")
        sleep (300)
        Send("{Space up}")
        $i = $i + 1
    WEnd
EndIf

I want that when I press ctrl, space is pressed twice.

But when I compile my project and launch it, nothing his launched, or maybe it is automaticly and quickly closed by itself.

Do you have any idea why ?

Thanks in advance.

Well, While i = 2 never happens cause i = 0. Try While i < 2?

[SpookMeister]

Because you do not have your script wait until you press control.

It just reads through the script... sees that _Ispressed('11') is not pressed at that split second of time, then it ends.

You need to do a loop..

#include <Misc.au3>
HotKeySet("{ESC}", "Terminate")

While 1
    Sleep(100) ; always a good idea so you dont max your cpu
    If _IsPressed('11') Then
        $i = 0
        While $i < 2
            Send("{SPACE down}")
            Sleep(300)
            Send("{Space up}")
            $i = $i + 1
        WEnd
    EndIf
WEnd

Func Terminate()
    Exit 0
EndFunc   ;==>Terminate

[edit] tweaked your other while loop so it would work too[/edit]

Edited February 2, 2009 by SpookMeister

[arkane]

wow !

what quick answers ! lol !

Thanks for your help, that was a syntax error ...

But well, it seems to work very slowly !!

I just want to convert this ahk script into an autoit one :

LControl & RAlt::
Loop 2
{
Sendinput {Space down}
sleep 30
Sendinput {Space up}
}
Return

but I'm struggling

Edit : In fact, I want to use this for a game which use 60fps.

I would like that on one frame it press space, and just on the next one, it press space again.

Edited February 2, 2009 by arkane

[SpookMeister]

what is slow?

The response to pressing CTRL?

The time between spaces?

How long it is taking to do each space?

[arkane]

The response to pressing control

[SpookMeister]

Then tweak it...

#include <Misc.au3>
HotKeySet("{ESC}", "Terminate")

While 1
    Sleep(10) ; always a good idea so you dont max your cpu
    If _IsPressed('11') Then
        $i = 0
        While $i = 2
            Send("{SPACE down}")
            Sleep(20) ; 60 FPS means you will have a frame every 16.666666... miliseconds
            Send("{Space up}")
            $i = $i + 1
        WEnd
    EndIf
WEnd

Func Terminate()
    Exit 0
EndFunc   ;==>Terminate

[arkane]

well, the problem is that it doesn't answer everytime I press control.

Is there any way to set ALTGR key instead of control ?

I tried

#include <Misc.au3>

While 1
    If _IsPressed('!Gr') Then
        $i = 0
        While $i <= 2
            Send("{SPACE down}")
            Sleep(17); 60 FPS means you will have a frame every 16.666666... miliseconds
            Send("{Space up}")
            $i = $i + 1
        WEnd
    EndIf
WEnd

but it doesn't work :/

Edited February 2, 2009 by arkane

[SpookMeister]

How about:

#include <Misc.au3>
HotKeySet("{ESC}", "Terminate")

While 1
    Sleep(10) ; always a good idea so you dont max your cpu
    If _IsPressed('11') Then
        $i = 0
        While $i = 2
            Send("{SPACE}")
            Sleep(20)
            Send("{SPACE}")
            $i = $i + 1
        WEnd
    EndIf
WEnd

Func Terminate()
    Exit 0
EndFunc   ;==>Terminate

[SpookMeister]

Try this, and play with the OPT values

#include <Misc.au3>
HotKeySet("{ESC}", "Terminate")
Opt ("SendKeyDelay",15) ; delay between sending keys - default 5
Opt ("SendKeyDownDelay",5) ; how long to hold down a key - default 5

While 1
    Sleep(10) ; always a good idea so you dont max your cpu
    If _IsPressed('11') Then Send ("{SPACE}{SPACE}") ; '11' = a CTRL key
WEnd

Func Terminate()
    Exit 0
EndFunc   ;==>Terminate

[SpookMeister]

FYI, on my machine checking _IsPressed() takes about 5 miliseconds all by itself... YMMV "Your Mileage May Vary"