Post by Renatobritov » 07 Aug 2019, 18:03
Ta incompleto mais é mais ou menos por aqui, só que toda vez q eu ativo o AHK, ELE n espera eu selecionar nada, já ativa todas as teclas, sem ser checado =s E no caso eu queria q só ativasse se eu selecionasse "1" ou alguma numero de 1 a 9 da droplist e depois de selecionar eu apertasse em um botão e ativar o que estivesse sido selecioando.
Gui,1:Color, black
SetKeyDelay -1,-1,-1
Gui, 1:Add, Picture, x100 y0 w290 h120, C:\Users\Renato Brito\Desktop\Cherninh0\cherninh0.png
Gui, 1:Add, Progress, x42 y420 w60 h0 , 25
Gui, 1:Add, GroupBox, x22 y130 w450 h340 cwhite , Auto Spam Cherninh0
Gui, 1:Add, Button, x37 y420 w150 h27 +Buttons, Ativar_Auto_Spam
; Generated using SmartGUI Creator 4.0
Gui, 1:Show, x258 y100 h490 w490,Cherninh0 DoentoW!
Gui, 1:Add, Checkbox, x42 y150 w90 h20 cwhite gSubmitIt vToggle1, 1
Gui, 1:Add, CheckBox, x42 y180 w90 h20 cwhite gSubmitIt vToggle2, 2
Gui, 1:Add, CheckBox, x42 y210 w90 h20 cwhite gSubmitIt vToggle3, 3
Gui, 1:Add, CheckBox, x42 y240 w90 h20 cwhite gSubmitIt vToggle4, 4
Gui, 1:Add, CheckBox, x42 y270 w90 h20 cwhite gSubmitIt vToggle5, 5
Gui, 1:Add, CheckBox, x42 y300 w90 h20 cwhite gSubmitIt vToggle6, 6
Gui, 1:Add, CheckBox, x42 y330 w90 h20 cwhite gSubmitIt vToggle7, 7
Gui, 1:Add, CheckBox, x42 y360 w90 h20 cwhite gSubmitIt vToggle8, 8
Gui, 1:Add, CheckBox, x42 y390 w90 h20 cwhite gSubmitIt vToggle9, 9
Gui, 1:Add, CheckBox, x152 y150 w90 h20 cwhite gSubmitIt vToggleQ, Q
Gui, 1:Add, CheckBox, x152 y180 w90 h20 cwhite gSubmitIt vToggleW, W
Gui, 1:Add, CheckBox, x152 y210 w90 h20 cwhite gSubmitIt vToggleE, E
Gui, 1:Add, CheckBox, x152 y240 w90 h20 cwhite gSubmitIt vToggleR, R
Gui, 1:Add, CheckBox, x152 y270 w90 h20 cwhite gSubmitIt vToggleT, T
Gui, 1:Add, CheckBox, x152 y300 w90 h20 cwhite gSubmitIt vToggleY, Y
Gui, 1:Add, CheckBox, x152 y330 w90 h20 cwhite gSubmitIt vToggleU, U
Gui, 1:Add, CheckBox, x152 y360 w90 h20 cwhite gSubmitIt vToggleI, I
Gui, 1:Add, CheckBox, x152 y390 w90 h20 cwhite gSubmitIt vToggleO, O
Gui, 1:Add, CheckBox, x262 y150 w90 h20 cwhite gSubmitIt vToggleA, A
Gui, 1:Add, CheckBox, x262 y180 w90 h20 cwhite gSubmitIt vToggleS, S
Gui, 1:Add, CheckBox, x262 y210 w90 h20 cwhite gSubmitIt vToggleD, D
Gui, 1:Add, CheckBox, x262 y240 w90 h20 cwhite gSubmitIt vToggleF, F
Gui, 1:Add, CheckBox, x262 y270 w90 h20 cwhite gSubmitIt vToggleG, G
Gui, 1:Add, CheckBox, x262 y300 w90 h20 cwhite gSubmitIt vToggleH, H
Gui, 1:Add, CheckBox, x262 y330 w90 h20 cwhite gSubmitIt vToggleJ, J
Gui, 1:Add, CheckBox, x262 y360 w90 h20 cwhite gSubmitIt vToggleK, K
Gui, 1:Add, CheckBox, x262 y390 w90 h20 cwhite gSubmitIt vToggleL, L
Gui, 1:Add, CheckBox, x372 y150 w90 h20 cwhite gSubmitIt vToggleZ, Z
Gui, 1:Add, CheckBox, x372 y180 w90 h20 cwhite gSubmitIt vToggleX, X
Gui, 1:Add, CheckBox, x372 y210 w90 h20 cwhite gSubmitIt vToggleC, C
Gui, 1:Add, CheckBox, x372 y240 w90 h20 cwhite gSubmitIt vToggleV, V
Gui, 1:Add, CheckBox, x372 y270 w90 h20 cwhite gSubmitIt vToggleB, B
Gui, 1:Add, CheckBox, x372 y300 w90 h20 cwhite gSubmitIt vToggleN, N
Gui, 1:Add, CheckBox, x372 y330 w90 h20 cwhite gSubmitIt vToggleM, M
Gui, 1:Add, DDL, x372 y385 w90 h20 gLista_do_autopot vNumerodalista , 1|2|3|4|5|6|7|8|9|
Lista_do_autopot:
Gui, Submit, NoHide
return
if (vNumerodalista = 1)
while GetKeyState("1","P")
{
Send, {1}
sleep 150
if !GetKeyState("1","P")
break
}
if not (vNumerodalista = 2)
while GetKeyState("2","P")
{
Send, {2}
sleep 150
if !GetKeyState("2","P")
break
}
return
if (vNumerodalista = 3)
while GetKeyState("3","P")
{
Send, {3}
sleep 150
if !GetKeyState("3","P")
break
}
return
if (vNumerodalista = 4)
while GetKeyState("4","P")
{
Send, {4}
sleep 150
if !GetKeyState("4","P")
break
}
return
if (vNumerodalista = 5)
while GetKeyState("5","P")
{
Send, {5}
sleep 150
if !GetKeyState("5","P")
break
}
return
if (vNumerodalista = 6)
while GetKeyState("6","P")
{
Send, {6}
sleep 150
if !GetKeyState("6","P")
break
}
return
if (vNumerodalista = 7)
while GetKeyState("7","P")
{
Send, {7}
sleep 150
if !GetKeyState("7","P")
break
}
return
if (vNumerodalista = 8)
while GetKeyState("8","P")
{
Send, {8}
sleep 150
if !GetKeyState("8","P")
break
}
return
if (vNumerodalista = 9)
while GetKeyState("9","P")
{
Send, {9}
sleep 150
if !GetKeyState("9","P")
break
}
return
SubmitIt:
Gui, Submit, NoHide
if (toggle1 = 1)
$1::
while GetKeyState("1","P")
{
Send, {1}
MouseClick, left
if !GetKeyState("1","P")
break
}
return
if (toggle1 = 2)
$2::
while GetKeyState("2","P")
{
Send, {2}
MouseClick, left
if !GetKeyState("2","P")
break
}
return
if (toggle1 = 3)
$3::
while GetKeyState("3","P")
{
Send, {3}
MouseClick, left
if !GetKeyState("3","P")
break
}
return
if (toggle1 = 4)
$4::
while GetKeyState("4","P")
{
Send, {4}
MouseClick, left
if !GetKeyState("4","P")
break
}
return
if (toggle1 = 5)
$5::
while GetKeyState("5","P")
{
Send, {5}
MouseClick, left
if !GetKeyState("5","P")
break
}
return
if (toggle1 = 6)
$6::
while GetKeyState("6","P")
{
Send, {6}
MouseClick, left
if !GetKeyState("6","P")
break
}
return
if (toggle1 = 7)
$7::
while GetKeyState("7","P")
{
Send, {7}
MouseClick, left
if !GetKeyState("7","P")
break
}
return
if (toggle1 = 8)
$8::
while GetKeyState("8","P")
{
Send, {8}
MouseClick, left
if !GetKeyState("8","P")
break
}
return
if (toggle1 = 9)
$9::
while GetKeyState("9","P")
{
Send, {9}
MouseClick, left
if !GetKeyState("9","P")
break
}
return
ButtonAtivar_Auto_Spam:
Gui, Submit, NoHide
msgbox,CHERNINH0 ATIVADO!, GARRIDO, MAGO DE BATALHA OU BUTAR?!
return
Ta incompleto mais é mais ou menos por aqui, só que toda vez q eu ativo o AHK, ELE n espera eu selecionar nada, já ativa todas as teclas, sem ser checado =s E no caso eu queria q só ativasse se eu selecionasse "1" ou alguma numero de 1 a 9 da droplist e depois de selecionar eu apertasse em um botão e ativar o que estivesse sido selecioando.
Gui,1:Color, black
SetKeyDelay -1,-1,-1
Gui, 1:Add, Picture, x100 y0 w290 h120, C:\Users\Renato Brito\Desktop\Cherninh0\cherninh0.png
Gui, 1:Add, Progress, x42 y420 w60 h0 , 25
Gui, 1:Add, GroupBox, x22 y130 w450 h340 cwhite , Auto Spam Cherninh0
Gui, 1:Add, Button, x37 y420 w150 h27 +Buttons, Ativar_Auto_Spam
; Generated using SmartGUI Creator 4.0
Gui, 1:Show, x258 y100 h490 w490,Cherninh0 DoentoW!
Gui, 1:Add, Checkbox, x42 y150 w90 h20 cwhite gSubmitIt vToggle1, 1
Gui, 1:Add, CheckBox, x42 y180 w90 h20 cwhite gSubmitIt vToggle2, 2
Gui, 1:Add, CheckBox, x42 y210 w90 h20 cwhite gSubmitIt vToggle3, 3
Gui, 1:Add, CheckBox, x42 y240 w90 h20 cwhite gSubmitIt vToggle4, 4
Gui, 1:Add, CheckBox, x42 y270 w90 h20 cwhite gSubmitIt vToggle5, 5
Gui, 1:Add, CheckBox, x42 y300 w90 h20 cwhite gSubmitIt vToggle6, 6
Gui, 1:Add, CheckBox, x42 y330 w90 h20 cwhite gSubmitIt vToggle7, 7
Gui, 1:Add, CheckBox, x42 y360 w90 h20 cwhite gSubmitIt vToggle8, 8
Gui, 1:Add, CheckBox, x42 y390 w90 h20 cwhite gSubmitIt vToggle9, 9
Gui, 1:Add, CheckBox, x152 y150 w90 h20 cwhite gSubmitIt vToggleQ, Q
Gui, 1:Add, CheckBox, x152 y180 w90 h20 cwhite gSubmitIt vToggleW, W
Gui, 1:Add, CheckBox, x152 y210 w90 h20 cwhite gSubmitIt vToggleE, E
Gui, 1:Add, CheckBox, x152 y240 w90 h20 cwhite gSubmitIt vToggleR, R
Gui, 1:Add, CheckBox, x152 y270 w90 h20 cwhite gSubmitIt vToggleT, T
Gui, 1:Add, CheckBox, x152 y300 w90 h20 cwhite gSubmitIt vToggleY, Y
Gui, 1:Add, CheckBox, x152 y330 w90 h20 cwhite gSubmitIt vToggleU, U
Gui, 1:Add, CheckBox, x152 y360 w90 h20 cwhite gSubmitIt vToggleI, I
Gui, 1:Add, CheckBox, x152 y390 w90 h20 cwhite gSubmitIt vToggleO, O
Gui, 1:Add, CheckBox, x262 y150 w90 h20 cwhite gSubmitIt vToggleA, A
Gui, 1:Add, CheckBox, x262 y180 w90 h20 cwhite gSubmitIt vToggleS, S
Gui, 1:Add, CheckBox, x262 y210 w90 h20 cwhite gSubmitIt vToggleD, D
Gui, 1:Add, CheckBox, x262 y240 w90 h20 cwhite gSubmitIt vToggleF, F
Gui, 1:Add, CheckBox, x262 y270 w90 h20 cwhite gSubmitIt vToggleG, G
Gui, 1:Add, CheckBox, x262 y300 w90 h20 cwhite gSubmitIt vToggleH, H
Gui, 1:Add, CheckBox, x262 y330 w90 h20 cwhite gSubmitIt vToggleJ, J
Gui, 1:Add, CheckBox, x262 y360 w90 h20 cwhite gSubmitIt vToggleK, K
Gui, 1:Add, CheckBox, x262 y390 w90 h20 cwhite gSubmitIt vToggleL, L
Gui, 1:Add, CheckBox, x372 y150 w90 h20 cwhite gSubmitIt vToggleZ, Z
Gui, 1:Add, CheckBox, x372 y180 w90 h20 cwhite gSubmitIt vToggleX, X
Gui, 1:Add, CheckBox, x372 y210 w90 h20 cwhite gSubmitIt vToggleC, C
Gui, 1:Add, CheckBox, x372 y240 w90 h20 cwhite gSubmitIt vToggleV, V
Gui, 1:Add, CheckBox, x372 y270 w90 h20 cwhite gSubmitIt vToggleB, B
Gui, 1:Add, CheckBox, x372 y300 w90 h20 cwhite gSubmitIt vToggleN, N
Gui, 1:Add, CheckBox, x372 y330 w90 h20 cwhite gSubmitIt vToggleM, M
Gui, 1:Add, DDL, x372 y385 w90 h20 gLista_do_autopot vNumerodalista , 1|2|3|4|5|6|7|8|9|
Lista_do_autopot:
Gui, Submit, NoHide
return
if (vNumerodalista = 1)
while GetKeyState("1","P")
{
Send, {1}
sleep 150
if !GetKeyState("1","P")
break
}
if not (vNumerodalista = 2)
while GetKeyState("2","P")
{
Send, {2}
sleep 150
if !GetKeyState("2","P")
break
}
return
if (vNumerodalista = 3)
while GetKeyState("3","P")
{
Send, {3}
sleep 150
if !GetKeyState("3","P")
break
}
return
if (vNumerodalista = 4)
while GetKeyState("4","P")
{
Send, {4}
sleep 150
if !GetKeyState("4","P")
break
}
return
if (vNumerodalista = 5)
while GetKeyState("5","P")
{
Send, {5}
sleep 150
if !GetKeyState("5","P")
break
}
return
if (vNumerodalista = 6)
while GetKeyState("6","P")
{
Send, {6}
sleep 150
if !GetKeyState("6","P")
break
}
return
if (vNumerodalista = 7)
while GetKeyState("7","P")
{
Send, {7}
sleep 150
if !GetKeyState("7","P")
break
}
return
if (vNumerodalista = 8)
while GetKeyState("8","P")
{
Send, {8}
sleep 150
if !GetKeyState("8","P")
break
}
return
if (vNumerodalista = 9)
while GetKeyState("9","P")
{
Send, {9}
sleep 150
if !GetKeyState("9","P")
break
}
return
SubmitIt:
Gui, Submit, NoHide
if (toggle1 = 1)
$1::
while GetKeyState("1","P")
{
Send, {1}
MouseClick, left
if !GetKeyState("1","P")
break
}
return
if (toggle1 = 2)
$2::
while GetKeyState("2","P")
{
Send, {2}
MouseClick, left
if !GetKeyState("2","P")
break
}
return
if (toggle1 = 3)
$3::
while GetKeyState("3","P")
{
Send, {3}
MouseClick, left
if !GetKeyState("3","P")
break
}
return
if (toggle1 = 4)
$4::
while GetKeyState("4","P")
{
Send, {4}
MouseClick, left
if !GetKeyState("4","P")
break
}
return
if (toggle1 = 5)
$5::
while GetKeyState("5","P")
{
Send, {5}
MouseClick, left
if !GetKeyState("5","P")
break
}
return
if (toggle1 = 6)
$6::
while GetKeyState("6","P")
{
Send, {6}
MouseClick, left
if !GetKeyState("6","P")
break
}
return
if (toggle1 = 7)
$7::
while GetKeyState("7","P")
{
Send, {7}
MouseClick, left
if !GetKeyState("7","P")
break
}
return
if (toggle1 = 8)
$8::
while GetKeyState("8","P")
{
Send, {8}
MouseClick, left
if !GetKeyState("8","P")
break
}
return
if (toggle1 = 9)
$9::
while GetKeyState("9","P")
{
Send, {9}
MouseClick, left
if !GetKeyState("9","P")
break
}
return
ButtonAtivar_Auto_Spam:
Gui, Submit, NoHide
msgbox,CHERNINH0 ATIVADO!, GARRIDO, MAGO DE BATALHA OU BUTAR?!
return