[Problem] Prosze o analize kodu - prosty błąd

[wojtek109]

; Wersja 1HotKeySet("{esc}","esc")Func esc()   
ExitEndFuncFunc pass($dl)Global $passfor $i = 1 to $dl$ii = 
random(1,3,1)Switch $iicase 1$pass &= 
chr(Random(65,90,1))case 2$pass &= chr(Random(97,122,1))case 
3$pass &= Random(0,9,1)endswitchnextEndFunc#include 
<GUIConstantsEx.au3>#include <ProgressConstants.au3>#include 
<StaticConstants.au3>#include 
<WindowsConstants.au3>$sciezka_account="C:\Bot\Account.txt"$hasla_do_kont="konieczko5"$sciezka_lola="C:\Riot 
Games\League of Legends\lol.launcher.exe"func gui()Global $hGuiWin = 
GUICreate ( "LoL Bot - Wojtek1o9 PL", 900, 650)GUISetBkColor (0x000000, 
$hGuiWin )GUICtrlCreatePic('C:\Bot\tlo.jpg', 0, 0, 0, 0)$Progress1 = 
GUICtrlCreateProgress(280, 440, 326, 17)$Label1 = GUICtrlCreateLabel("Trwa 
Ładowanie ustawień", 272, 372, 340, 89,$SS_CENTER)GuiCtrlSetColor(-1, 
0xff0000)GUICtrlSetBkColor(-1, 
$GUI_BKCOLOR_TRANSPARENT)GUICtrlSetFont(-1, 20, 400, 2, "Comic Sans MS")
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState(@SW_SHOW)EndFunc If 
FileExists($sciezka_account) Then   $konta = 
FileOpen($sciezka_account, 
0)   $login=FileReadLine($konta)   if 
$login="" Then      MsgBox(0, "Napotkane 
błędy","Brak kont do nabijania , proszę zarejestrować 
nowe")      FileWrite($sciezka_account,"Brak 
Kont")      Exit      
Else   FileClose($sciezka_account)   EndIf   Else    
MsgBox(0, "Napotkane błędy","Brak pliku 
konta")  ExitEndIf ShellExecute($sciezka_lola)while 
1   $kolor=PixelGetColor(769,601)   if 
$kolor="0xB27323" Then   Sleep(500)   
MouseClick("left",769,601)   ExitLoop
   Else   Sleep(500)   
EndIf   WEnd   sleep(2000)   While 
1   $kolor_2=PixelGetColor(148,322)   if 
$kolor_2="0xF2F2F3" Then   Sleep(500)   
MouseClick("left",148,322)   Send($login)   
Sleep(2000)   Send("{TAB}")   
Sleep(2000)   Send($hasla_do_kont)   
Sleep(2000)   Send("{ENTER}")    
ExitLoop   EndIf   
WEnd     Sleep(2000)   While 
1   $kolor_3=PixelGetColor(555,96)   $kolor_4=PixelGetColor(449,456)   sLEEP(500)      
iF $kolor_3="0x880100" 
Then   $status="po_starcie"   ToolTip("zalogowano 
- bez nowego")   ExitLoop      
EndIf   if $kolor_4="0xFFFFFF" 
Then ToolTip("nowy");tworzenie 
nowego   Sleep(900)   MouseClick("left",449,456)   Sleep(1200)   pass(10)   Send($pass)   Sleep(900)   MouseClick("left",507,520)      
While 
1   $kolor_5=PixelGetColor(379,322)   Sleep(800)      
if $kolor_5="0x7B7DA0" Then      
MouseClick("left",379,322)      
Sleep(900)      
MouseClick("left",780,500)      
ExitLoop      
EndIf      WEnd   While 
1   $kolor_6=PixelGetColor(293,363)   
Sleep(800)   if $kolor_6="0x1C3049" Then   
MouseClick("left",293,363)   Sleep(800)   
MouseClick("left",720,499)  ; potwierdź   
ExitLoop   EndIf   
WEnd       While 1   
$kolor_7=PixelGetColor(550,471)   Sleep(800)   if 
$kolor_7="0xEEEEEE" 
Then   MouseClick("left",550,471)   ExitLoop   
EndIf   WEnd       While 
1   $kolor_8=PixelGetColor(550,471)   
Sleep(800)   if $kolor_8="0xEEEEEE" 
Then   MouseClick("left",550,471)   ExitLoop   
EndIf   WEnd       
EndIf   ExitLoop
     WEnd      While 
1    ToolTip("bez 
bledow")   $kolor_3=PixelGetColor(544,98)      sLEEP(500)   iF 
$kolor_3="0x840000" 
Then   $status="po_starcie"   ExitLoop   
EndIf   WEnd   MouseClick(544,98)   
While 
1   $kolor=PixelGetColor(321,248)   Sleep(800)   If 
$kolor="0x06162A" Then      
MouseClick("left",321,248)      
ExitLoop   EndIf   WEnd   SleeP(1200)   MouseClick("left",745,628)   While 
1      
$kolor=PixelGetColor(446,234)      
SleeP(800)      if $kolor="0x7E3110" 
Then      
MouseClick("left",446,234)      
Sleep(1200)      
MouseClick("left",495,645)      
ExitLoop           
EndIf      WEnd      
While 1      
$kolor=PixelGetColor(688,185)      
SleeP(800)      if $kolor="0xEEEEEE" 
Then      
MouseClick("left",688,185)      
Sleep(2000)      
MouseClick("left",649,459)           
ExitLoop           
EndIf      WEnd      
While 1      
$kolor=PixelGetColor(264,220)      
SleeP(800)      if $kolor="0x9D9D9D" 
Then      
MouseClick("left",264,220)      
Sleep(2000)      
MouseClick("left",669,470)           
ExitLoop           
EndIf      
WEnd   Sleep(20000)      
While 1      
$kolor=PixelGetColor(162,60)      
SleeP(800)      if $kolor="0x000000" 
Then      
Sleep(100)      
Else           
ExitLoop           
EndIf      WEnd   
$licznik=1   While 1     
Sleep(10000)   if $licznik=1 Then   
MouseClick("right",367,435)   $licznik=2   
Else   MouseClick("right",615,399)   
$licznik=1   EndIf   
$a=PixelGetColor(550,266)   if $a="0x450B0B" 
Then   MouseClick("left",1,1)   msgbox(0,"koniec","koniec")   ExitLoop   
EndIf   
WEnd        
 

 

Proszę o napisanie mi dlaeczego w tym momencie

 

 

While 1

ToolTip("bez bledow")

$kolor_3=PixelGetColor(544,98)

 

sLEEP(500)

iF $kolor_3="0x840000" Then

$status="po_starcie"

ExitLoop

EndIf

WEnd

MouseClick(544,98)

 

zamiast wyjść z petli i kliknąć skrypt zaly czas wyswietla tooltip

co ciekawe jeśli sam klikne w to miejsce to dalsza czesc skrypty wykonuje się jakgdyby nigdy nic

[wojtek109]

post do usuniecia bledem było brak "left" same koodry nic nie daja

 

30 min analizowania jechanego kodu i taki blad glupi