[RELEASE]New Bot AutoLogin By Bruno8 & Cloude
- Autore discussione thenumber8
- Data d'inizio
- Stato
Bravi
x me è molto utile...![:\](/forum/data/assets/smilies/mhhae.gif "Mhhae :\")
grz ma è un po' vekkio... ora ce ne sono di migliori...
l'autoit lo pratico da poco comque faccio un esempio di relogin con esso, lo ho fatto in velocità quindi non è perfezionato al 100% ma funzionante funziona guardando quando appare il pallibo blu in fondo alla schermata di login:
Codice:
#Include <GUIConstants.au3>
$Gui = GUICreate("esempio", 655, 300)
$start = GUICtrlCreateButton("sart",50,50,50,50)
$RE1 = GUICtrlCreateInput("",60, 180, 150, 17)
$RE2 = GUICtrlCreateInput("",260, 180, 150, 17)
$Label5 = GUICtrlCreateLabel("ID:", 35, 180, 25, 17)
$Label5 = GUICtrlCreateLabel("PW:", 230, 180, 30, 17)
$RE3 = GUICtrlCreateradio("Omega", 10, 200, 50, 17)
$RE4 = GUICtrlCreateradio("Revenge", 65, 200, 60, 17)
$RE5 = GUICtrlCreateradio("Lyra", 130, 200, 37, 17)
$RE6 = GUICtrlCreateradio("Gemini", 170, 200, 50, 17)
$RE7 = GUICtrlCreateradio("Pavo", 225, 200, 42, 17)
$RE8 = GUICtrlCreateradio("Andromeda", 270, 200, 75, 17)
$RE9 = GUICtrlCreateradio("Hydra", 345, 200, 50, 17)
$RE10 = GUICtrlCreateradio("Virgo", 395, 200, 50, 17)
$RE11 = GUICtrlCreateradio("Draco", 445, 200, 45, 17)
$Label5 = GUICtrlCreateLabel("N° personaggio:", 35, 220, 120, 17)
$RE12 = GUICtrlCreateCheckbox("1°", 150, 220, 30, 17)
$RE13 = GUICtrlCreateCheckbox("2°", 180, 220, 30, 17)
$RE14 = GUICtrlCreateCheckbox("3°", 210, 220, 30, 17)
$RE15 = GUICtrlCreateCheckbox("4°", 240, 220, 30, 17)
$Label5 = GUICtrlCreateLabel("ATTENZIONE: premerne solo 1!", 280, 223, 800, 17)
GUICtrlCreateGroup("Relogin",5,140,488,100)
$RE50 = "c"
$RE51 = "d"
GUISetState(@SW_SHOW)
while 1
$MSG = GUIGetMsg()
Switch $Msg
case $start
while 1
$RE52 = PixelGetColor(542, 610)
IF $RE52 = 23973 Then
SLEEP(5000)
if gUICtrlRead($RE3) = $GUI_CHECKED Then
Mouseclick("left",350,388,1,20)
elseif gUICtrlRead($RE4) = $GUI_CHECKED Then
Mouseclick("left",350,404,1,20)
elseif gUICtrlRead($RE5) = $GUI_CHECKED Then
Mouseclick("left",350,426,1,20)
elseif gUICtrlRead($RE6) = $GUI_CHECKED Then
Mouseclick("left",350,448,1,20)
elseif gUICtrlRead($RE7) = $GUI_CHECKED Then
Mouseclick("left",350,470,1,20)
elseif gUICtrlRead($RE8) = $GUI_CHECKED Then
Mouseclick("left",350,492,1,20)
elseif gUICtrlRead($RE9) = $GUI_CHECKED Then
Mouseclick("left",350,516,1,20)
elseif gUICtrlRead($RE10) = $GUI_CHECKED Then
Mouseclick("left",350,538,1,20)
elseif gUICtrlRead($RE11) = $GUI_CHECKED Then
Mouseclick("left",350,560,1,20)
endif
Mouseclick("left",515,519, 3,20)
$carota1 = gUICtrlRead($RE1)
sleep(500)
send($carota1&"{enter}")
sleep(200)
;send("{enter}")
$carota2 = gUICtrlRead($RE2)
sleep(500)
send($carota2&"{enter}")
sleep(200)
;send("{enter}")
sleep(40000)
if gUICtrlRead($RE12) = $GUI_CHECKED Then
sleep(5000)
elseif gUICtrlRead($RE13) = $GUI_CHECKED Then
Mouseclick("left",473,556,1,20)
elseif gUICtrlRead($RE14) = $GUI_CHECKED Then
Mouseclick("left",473,556,2,20)
elseif gUICtrlRead($RE15) = $GUI_CHECKED Then
Mouseclick("left",473,556,3,20)
endif
send("{enter}")
sleep(50000)
send("i")
MouseClick("right", 333, 617,1 ,5)
sleep(1000)
MouseClick("right", 569, 612,1, 5)
MouseMove(656,235,50)
endif
wend
EndSwitch
wendBravo Erre!!!!!
sl ke io di autoit nn ci capisco proprio nnt... ho provato anke a leggermi una guida ma... zero...
- Stato