Ir para conteúdo
Fórum Script Brasil
  • 0

AUTOIT - PRECISO DE UM SCRIPT QUE FUNCIONE ASSIM: AO CLICAR NELE VAI ABRIR UM .EXE, CASO EU APERTE A TECLA "B" DO TECLADO, ELA IRÁ FUNCIONAR NORMAL, PORÉM, SE ELA FOR PRESSIONADA POR 3 SEGUNDOS, ELA RESPONDE COMO A TECLA "I", E FECHANDO O EXE FECHA TUDO.


GabrielJP

Pergunta

AUTOIT - PRECISO DE UM SCRIPT QUE FUNCIONE ASSIM: AO CLICAR NELE VAI ABRIR UM .EXE, DENTRO DESSE PROGRAMA.... CASO EU APERTE A TECLA "B" DO TECLADO, ELA IRÁ FUNCIONAR NORMAL, PORÉM, SE ELA FOR PRESSIONADA POR 3 SEGUNDOS, QUEM VAI FUNCIONAR É A TECLA "I", E FECHANDO O EXE FECHA TUDO. OU SEJA, UMA SÓ TECLA, COM DUAS FUNÇÕES DIFERENTES.
já TENTEI MUITO MAS NÃO CONSEGUI, LOGO ABAIXO ESTÁ MINHA TENTATIVA EM AUTOIT, SE ALGUÉM PUDER AJUDAR COM QUALQUER DICA, FICAREI GRATO.
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <WinAPISys.au3>
#include <WinAPIvkeysConstants.au3>
#include <WinAPI.au3>
#include <Misc.au3>
Run ("C:\Windows\System32\notepad.exe")
Sleep (500)
Local $Key = 0x41 ; Tecla A
Local $Tempo = 0
Local $Segundos = 2000 ;
Local $hDLL = DllOpen("user32.dll")
$Tecla = _WinAPI_GetAsyncKeyState($Key)
$CONT_PRESS = TimerInit()
While 1
If Not BitAND($Tecla, 0x8000) >= 2000 Then
$ITIMER = Int(TimerDiff($CONT_PRESS))
ToolTip($ITIMER)
ExitLoop
Else
If BitAND($Tecla, 0x8000) > TimerDiff($CONT_PRESS) Then
ElseIf TimerDiff($CONT_PRESS) > $Segundos Then
Send("I")
EndIf
EndIf
Sleep(100)
WEnd
Link para o comentário
Compartilhar em outros sites

0 respostass a esta questão

Posts Recomendados

Até agora não há respostas para essa pergunta

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...