Beleza galera.
Sou novato aki, mais ja tenho um bom conteudo de autoit e outra linguagem.
estou aprofundando conhecimento em Java.
posta um Auto Click Mais Minimizer basico.
Código:
$g_szVersion = "Team SofteTi® - Auto Click 1.0"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)
#NoTrayIcon
HotKeySet("{F1}", "autoleft")
HotKeySet("{F2}", "autoright")
HotKeySet("{F3}", "mini")
HotKeySet("{F4}", "max")
HotKeySet("{PAUSE}", "pausar")
HotKeySet("{ESC}", "sair")
Global $Paused
Dim $msg
$msg = ""
$msg = $msg & " Teclas de Atalho " & @CR
$msg = $msg & "" & @CR
$msg = $msg & "* F1 = Auto Click Esquerdo " & @CR
$msg = $msg & "* F2 = Auto Click Direito " & @CR
$msg = $msg & "* F3 = Minimizar " & @CR
$msg = $msg & "* F4 = Maximizar " & @CR
$msg = $msg & "* Pause = Pausar" & @CR
$msg = $msg & "* Esc = Sair " & @CR
MsgBox(0, "Auto Click & Minimizer SofteTi", $msg)
While 1
WEnd
Func mini()
WinSetState("[CLASS:Class do programa pra minimizar]", "", @SW_MINIMIZE)
EndFunc
Func max()
WinSetState("[CLASS:Class do programa pra maximizar]", "", @SW_MAXIMIZE)
EndFunc
Func autoleft()
$pos = MouseGetPos()
While 1
MouseClick("left", $pos[0], $pos[1])
WEnd
EndFunc
Func autoright()
$pos = MouseGetPos()
While 1
MouseClick("right", $pos[0], $pos[1])
WEnd
EndFunc
Func pausar()
$Paused = NOT $Paused
While $Paused
Sleep(500)
WEnd
EndFunc
Func sair()
Exit
EndFunc
obs: alterar algumas parte, para funcionamento
Uma Ferramenta para pegar posições do Mouse, mais pratica ...
Código:
$g_szVersion = "Team SofteTi® - Posição do Mouse 1.0"
If WinExists($g_szVersion) Then
MsgBox(0, "Aviso", "Exite Um Já em Execução")
Exit
EndIf
AutoItWinSetTitle($g_szVersion)
HotKeySet("{F1}", "pega")
HotKeySet("{ESC}", "sair")
While 20
WEnd
Func pega()
$pos = MouseGetPos()
MsgBox(0, "Mouse Posição", "*Posição _ "& $pos[0] &"* - *Posição | " & $pos[1] &"*" )
EndFunc
Func sair()
Exit
EndFunc
Qualquer duvidas estamos aiii ....
Sou novato aki, mais ja tenho um bom conteudo de autoit e outra linguagem.
estou aprofundando conhecimento em Java.
posta um Auto Click Mais Minimizer basico.
Código:
$g_szVersion = "Team SofteTi® - Auto Click 1.0"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)
#NoTrayIcon
HotKeySet("{F1}", "autoleft")
HotKeySet("{F2}", "autoright")
HotKeySet("{F3}", "mini")
HotKeySet("{F4}", "max")
HotKeySet("{PAUSE}", "pausar")
HotKeySet("{ESC}", "sair")
Global $Paused
Dim $msg
$msg = ""
$msg = $msg & " Teclas de Atalho " & @CR
$msg = $msg & "" & @CR
$msg = $msg & "* F1 = Auto Click Esquerdo " & @CR
$msg = $msg & "* F2 = Auto Click Direito " & @CR
$msg = $msg & "* F3 = Minimizar " & @CR
$msg = $msg & "* F4 = Maximizar " & @CR
$msg = $msg & "* Pause = Pausar" & @CR
$msg = $msg & "* Esc = Sair " & @CR
MsgBox(0, "Auto Click & Minimizer SofteTi", $msg)
While 1
WEnd
Func mini()
WinSetState("[CLASS:Class do programa pra minimizar]", "", @SW_MINIMIZE)
EndFunc
Func max()
WinSetState("[CLASS:Class do programa pra maximizar]", "", @SW_MAXIMIZE)
EndFunc
Func autoleft()
$pos = MouseGetPos()
While 1
MouseClick("left", $pos[0], $pos[1])
WEnd
EndFunc
Func autoright()
$pos = MouseGetPos()
While 1
MouseClick("right", $pos[0], $pos[1])
WEnd
EndFunc
Func pausar()
$Paused = NOT $Paused
While $Paused
Sleep(500)
WEnd
EndFunc
Func sair()
Exit
EndFunc
obs: alterar algumas parte, para funcionamento
Uma Ferramenta para pegar posições do Mouse, mais pratica ...
Código:
$g_szVersion = "Team SofteTi® - Posição do Mouse 1.0"
If WinExists($g_szVersion) Then
MsgBox(0, "Aviso", "Exite Um Já em Execução")
Exit
EndIf
AutoItWinSetTitle($g_szVersion)
HotKeySet("{F1}", "pega")
HotKeySet("{ESC}", "sair")
While 20
WEnd
Func pega()
$pos = MouseGetPos()
MsgBox(0, "Mouse Posição", "*Posição _ "& $pos[0] &"* - *Posição | " & $pos[1] &"*" )
EndFunc
Func sair()
Exit
EndFunc
Qualquer duvidas estamos aiii ....
12/19/2017, 18:48 por MrViSiBLe
» MU LIVE SEASON 2 | INAUGURA DOMINGO 17/09
9/2/2017, 13:51 por MrViSiBLe
» Sorteio Perfumes - Forum ViSiBLe
8/25/2017, 08:27 por Convidado
» Novas Vagas Para Staff
8/24/2017, 15:20 por MrViSiBLe
» CSGO [Internal/External] Multi-Hack AIMBOT + TRIGGERBOT + ESP + BHOP
8/22/2017, 03:04 por MrViSiBLe
» REB00T 31/07/2017
8/22/2017, 03:01 por MrViSiBLe
» [CS:GO] HENTAIWARE 19/08/2017 | LEGIT | RAGE | ESP | GLOVES | FACEIT |
8/22/2017, 02:58 por MrViSiBLe
» DeviceCheats CS:GO Gratuito 31/07/2017
8/22/2017, 02:56 por MrViSiBLe
» [CS:GO] External - Glow ESP | Triggerbot | RCS | BunnyHop | Noflash
8/22/2017, 02:53 por MrViSiBLe
» [CS:GO] GLOW ESP 21/08/2017
8/22/2017, 02:49 por MrViSiBLe