Skocz do zawartości

[AutoIT] [METIN2] LVL BOT


daniel11l
# CSH External VIP Project

Masz dosyć problemów z czynnikiem zaufania w CS2 lub notorycznymi banami?

Sprawdź CSH External VIP Project.


Więcej informacji  

Rekomendowane odpowiedzi

Wrzucam Source, testowane 2 miechy temu, konstrukcyjnie powinno być dalej okej.

;####################################
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <SliderConstants.au3>
#include <DateTimeConstants.au3>
#include <ComboConstants.au3>
#include <Date.au3>
#include <ImageSearch.au3>
#NoTrayIcon
HotKeySet("{Home}","start")
HotKeySet("{Pause}","stop")
HotKeySet("{End}","wyjdz")
$szukam = 0
$kolejna_strona = 0
$expbot_number = 0
$autopot_number = 0
$autoskil_number = 0
$autologin_number = 0
$menu_number = 0
$gui_x = 516
$gui_y = 300
$x_up = 0
$y_up = 0
$x = 0
$y = 0
$x_1 = 0
$y_1 = 0
$x_2 = 0
$y_2 = 0
$x_3 = 0
$y_3 = 0
$start = 0
$serwer_num = 1
$kanal = 1
$postac = 0
$jaka_kulkax = 0
$jaka_kulkay = 0
$zbieranie_wpis = "off"
$auto_up_wpis = "off"
$exp_donate_wpis = "off"
$kulka_wpis = 1
$reg_zycie_wpis = "off"
$reg_mana_wpis = "off"
$slot1_wpis = "off"
$slot2_wpis = "off"
$slot3_wpis = "off"
$slot4_wpis = "off"
$slot5_wpis = "off"
$slot6_wpis = "off"
$account = RegRead("HKEY_CURRENT_USER\Software\LightMetin2","konto")
$bot_login = RegRead("HKEY_CURRENT_USER\Software\LightMetin2","login")
$bot_haslo = RegRead("HKEY_CURRENT_USER\Software\LightMetin2","haslo")
AdlibRegister("blokada",250)
AdlibRegister("czas",1000)
AdlibRegister("wstawanie",1000)
AdlibRegister("poter_hp",250)
AdlibRegister("poter_mp",250)
AdlibRegister("zbieranie",100)
AdlibRegister("expbot",250)
AdlibRegister("logowanie",1000)
AdlibRegister("oddawanie_expa",1000)
$GUI = GUICreate("LightMetin2 version 0.4", $gui_x, $gui_y, Default,Default ,0)
GUISetBkColor(0xFFFFFF)
$Group1 = GUICtrlCreateGroup("", 0, 0, 89, 273)
$expbot = GUICtrlCreateButton("ExpBot", 8, 16, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$autopot = GUICtrlCreateButton("AutoPot", 8, 48, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$autoskil = GUICtrlCreateButton("AutoSkil", 8, 80, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$autologin = GUICtrlCreateButton("AutoLogin", 8, 112, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$menu_button = GUICtrlCreateButton("Menu", 8, 144, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$autorzy = GUICtrlCreateButton("Autorzy", 8, 176, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$inne = GUICtrlCreateButton("Inne", 8, 208, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$wyjscie = GUICtrlCreateButton("Wyjście", 8, 240, 75, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
 
 
$Group1_lou = GUICtrlCreateGroup("", -99, -99, 1, 1)
$zbieranie = GUICtrlCreateCheckbox("Zbieranie przedmiotów", 104, 8, 129, 17)
$szybkosc_zbieranie = GUICtrlCreateInput("1", 104, 32, 40, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_READONLY,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
$up_1 = GUICtrlCreateUpdown($szybkosc_zbieranie)
GUICtrlSetLimit(-1, 10, 1)
$lab1 = GUICtrlCreateLabel("razy na sekunde", 150, 35, 80, 17)
$auto_up = GUICtrlCreateCheckbox("Automatyczne wstawanie", 104, 80, 145, 17)
$exp_donate = GUICtrlCreateCheckbox("Oddawanie doświadczenia", 104, 120, 153, 17)
$kulka1 = GUICtrlCreateRadio("1 kulka", 120, 144, 113, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
$kulka2 = GUICtrlCreateRadio("2 kulki", 120, 160, 113, 17)
$kulka3 = GUICtrlCreateRadio("3 kulki", 120, 176, 113, 17)
$kulka4 = GUICtrlCreateRadio("4 kulki", 120, 192, 113, 17)
 
$Label1 = GUICtrlCreateLabel("Regeneracja Życia", 120, 8, 111, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Regeneracja Many", 120, 80, 110, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x0000FF)
$slide_hp = GUICtrlCreateSlider(96, 32, 150, 29, BitOR($GUI_SS_DEFAULT_SLIDER,$TBS_NOTICKS,$TBS_ENABLESELRANGE))
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlSetLimit(-1, 10, 1)
GUICtrlSetData(-1, 1)
$slide_mp = GUICtrlCreateSlider(96, 104, 150, 29, BitOR($GUI_SS_DEFAULT_SLIDER,$TBS_NOTICKS,$TBS_ENABLESELRANGE))
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlSetLimit(-1, 10, 1)
GUICtrlSetData(-1, 1)
$Label3 = GUICtrlCreateLabel("100", 256, 40, 33, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$Label4 = GUICtrlCreateLabel("10", 256, 112, 26, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x0000FF)
$Label5 = GUICtrlCreateLabel("%", 288, 40, 13, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label6 = GUICtrlCreateLabel("%", 288, 112, 13, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$reg_zycie = GUICtrlCreateCheckbox("Regeneruj życie", 352, 40, 129, 17)
$reg_mana = GUICtrlCreateCheckbox("Regeneruj mane", 352, 112, 129, 17)
$Pic1 = GUICtrlCreatePic("files\mikstury.bmp", 224, 224, 124, 44)
$Label7 = GUICtrlCreateLabel("Ustawienie mikstur", 239, 200, 95, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
 
$slot1 = GUICtrlCreateCheckbox("Slot 1", 104, 56, 49, 17)
$slot2 = GUICtrlCreateCheckbox("Slot 2", 104, 88, 49, 17)
$slot3 = GUICtrlCreateCheckbox("Slot 3", 104, 120, 49, 17)
$slot4 = GUICtrlCreateCheckbox("Slot 4", 104, 152, 49, 17)
$slot5 = GUICtrlCreateCheckbox("Slot F1", 104, 184, 57, 17)
$slot6 = GUICtrlCreateCheckbox("Slot F2", 104, 216, 57, 17)
$del_1 = GUICtrlCreateInput("0", 216, 56, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetLimit(-1, 4)
$del_2 = GUICtrlCreateInput("0", 216, 88, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetLimit(-1, 4)
$del_3 = GUICtrlCreateInput("0", 216, 120, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetLimit(-1, 4)
$del_4 = GUICtrlCreateInput("0", 216, 152, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetLimit(-1, 4)
$del_5 = GUICtrlCreateInput("0", 216, 184, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetLimit(-1, 4)
$del_6 = GUICtrlCreateInput("0", 216, 216, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetLimit(-1, 4)
$labo_1 = GUICtrlCreateLabel("Numer slotu", 104, 24, 60, 17)
$labo_2 = GUICtrlCreateLabel("Opóźnienie w sekundach", 200, 24, 124, 17)
 
$labele_1 = GUICtrlCreateLabel("Nazwa użytkownika", 104, 18, 99, 17)
$login = GUICtrlCreateInput("", 208, 16, 121, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
GUICtrlSetBkColor(-1,0xFFFFFF)
$labele_2 = GUICtrlCreateLabel("Hasło", 136, 50, 33, 17)
$haslo = GUICtrlCreateInput("", 208, 48, 121, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
GUICtrlSetBkColor(-1,0xFFFFFF)
$labele_3 = GUICtrlCreateLabel("Kanał", 136, 116, 33, 17)
$channel = GUICtrlCreateCombo("", 208, 112, 121, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetData(-1, "CH1|CH2|CH3|CH4", "CH1")
$labele_4 = GUICtrlCreateLabel("Serwer", 136, 84, 37, 17)
$serwer = GUICtrlCreateCombo("", 208, 80, 121, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetData(-1, "Monastyr|Feniks|Obsydian|Twierdza|Astral|Grymuar|Almanach|Onyks|Agronas|Gromo|Arkantes|Monolit|Exandros|Kirian|Eteor|Serwandes|Elares|Phobos|Deimos|Endurion|Candia|Orion|Kronos|Phantos|Syriusz|Solar", "Monastyr")
$labele_5 = GUICtrlCreateLabel("Postać", 136, 176, 37, 17)
$postac1 = GUICtrlCreateRadio("Postać 1", 240, 208, 113, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
$postac2 = GUICtrlCreateRadio("Postać 2", 304, 176, 113, 17)
$postac3 = GUICtrlCreateRadio("Postać 3", 240, 152, 113, 17)
$postac4 = GUICtrlCreateRadio("Postać 4", 184, 176, 113, 17)
$labele_8 = GUICtrlCreateLabel("Aktualnie", 408, 16, 48, 17)
$logowanie_onoff = GUICtrlCreateLabel("Wyłączone", 400, 48, 68, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$logowanie_on = GUICtrlCreateButton("Włącz logowanie", 392, 88, 99, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$logowanie_off = GUICtrlCreateButton("Wyłącz logowanie", 392, 128, 99, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
 
$koordynuj = GUICtrlCreateButton("Koordynuj", 96, 8, 131, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$labin_2 = GUICtrlCreateLabel("Nie zostały dopasowane współrzędne..", 240, 16, 227, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$hsblok = GUICtrlCreateButton("Zablokuj HackShield", 96, 48, 131, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$t1 = GUICtrlCreateLabel("Uruchom", 96, 79, 156, 17)
$m2bin =GUICtrlCreateButton("metin2.bin", 96, 98, 131, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$m2bin2 =GUICtrlCreateButton("metin2client.bin", 240, 98, 131, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$labin_3 = GUICtrlCreateLabel("Nie zablokowano hackshield'a..", 240, 56, 184, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$komputer_off = GUICtrlCreateCheckbox("Wyłącz komputer o godzinie", 96, 134, 177, 17)
$labin_4 = GUICtrlCreateLabel("Aktualna", 96, 156, 46, 17)
$labin_5 = GUICtrlCreateLabel("Wskazana", 96, 178, 55, 17)
$aktualna = GUICtrlCreateLabel(@HOUR & ':' & @MIN & ':' & @SEC, 160, 156, 74, 21)
$godzina = GUICtrlCreateInput("0", 168, 178, 40, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_READONLY,$ES_NUMBER))
GUICtrlSetBkColor(-1,0xFFFFFF)
$up_godzina = GUICtrlCreateUpdown($godzina)
GUICtrlSetLimit($up_godzina, 23, 0)
$napis = GUICtrlCreateLabel("H",210,178)
 
 
$autorzy_pic = GUICtrlCreatePic("files\logo.jpg", 150, 30, 298, 64)
$libon_1 = GUICtrlCreateLabel("LightMetin2 BETA stworzony przez Kris006 oraz MrDeska", 96, 156, 999, 999)
$libon_2 = GUICtrlCreateLabel("CSHacked.pl", 96, 175, 999, 999)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x008000)
 
$got1 = GUICtrlCreateLabel("HotKey'e", 248, 20, 47, 17)
$Edit1 = GUICtrlCreateEdit("", 210, 40, 129, 49, BitOR($ES_CENTER,$ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN))
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetData(-1, StringFormat("Home - Uruchom\r\nPause/Break - Zatrzymaj\r\nEnd - Wyjdź"))
$m2bin3 =GUICtrlCreateButton("Ustaw kamere w grze", 210, 110, 131, 25)
$m2bin4 =GUICtrlCreateButton("Strona bota", 210, 145, 131, 25)
WinMove("LightMetin2 version 0.4","",Default,Default,200, 130)
GUICtrlSetBkColor(-1, 0xFFFFFF)
 
$lol = GUICtrlCreateLabel("LightMetin2 beta 0.4", 8, 10, 999, 17)
$lol_1 = GUICtrlCreateLabel("By Kris006 oraz MrDeska", 8, 25, 999, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x008000)
$create_bot = GUICtrlCreateButton("MoberMod", 8, 43, 83, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$zaloguj_bot = GUICtrlCreateButton("Wejście", 104, 43, 83, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$wyjdz_bot = GUICtrlCreateButton("Wyjdź", 8, 70, 181, 25)
GUICtrlSetBkColor(-1, 0xFFFFFF)
 
If $account = 1 Then
    GUICtrlSetState($create_bot,$GUI_ENABLE)
Else
    GUICtrlSetState($zaloguj_bot,$GUI_ENABLE)
EndIf
chowaj_all()
bot_chowaj()
    GUICtrlSetState($expbot,$GUI_DISABLE)
    GUICtrlSetState($autopot,$GUI_DISABLE)
    GUICtrlSetState($autoskil,$GUI_DISABLE)
    GUICtrlSetState($autologin,$GUI_DISABLE)
    GUICtrlSetState($autorzy,$GUI_DISABLE)
    GUICtrlSetState($inne,$GUI_DISABLE)
    GUICtrlSetState($menu_button,$GUI_DISABLE)
GUISetState(@SW_SHOW)
 
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $wyjscie
            Exit
            If GUICtrlRead($login_bot) = "" Then
                MsgBox(0,"Błąd","Nie wpisano loginu")
            ElseIf GUICtrlRead($haslo_bot) = "" Then
                MsgBox(0,"Błąd","Nie wpisano hasła")
                Else
            RegWrite("HKEY_CURRENT_USER\Software\LightMetin2", "login", "REG_SZ", GUICtrlRead($login_bot))
            RegWrite("HKEY_CURRENT_USER\Software\LightMetin2", "haslo", "REG_SZ", GUICtrlRead($haslo_bot))
            RegWrite("HKEY_CURRENT_USER\Software\LightMetin2", "konto", "REG_SZ", "1")
            MsgBox(0,"Operacja pomyślna","Stworzono konto, wykonaj ponowny rozruch programu")
            EndIf
        Case $zaloguj_bot
                    partia_logowanie_chowaj()
                    WinMove("LightMetin2 version 0.4","",Default,Default,516, 300)
                    bot_pokaz()
                    Sleep(200)
                    kolory()
                    GUICtrlSetBkColor($menu_button, 0xD3D3D3)
            numbery()
            $menu_number = 1
 
        partia_menu_pokaz()
     case $create_bot
        ShellExecute("https://www.cshacked.pl/")
            GUICtrlSetState($zaloguj_bot,$GUI_enable)
        Case $expbot
            kolory()
            GUICtrlSetBkColor($expbot, 0xD3D3D3)
            chowaj_all()
            Sleep(1)
            numbery()
            $expbot_number = 1
            partia_expbot_pokaz()
        Case $autopot
            kolory()
            GUICtrlSetBkColor($autopot, 0xD3D3D3)
            chowaj_all()
            Sleep(200)
            numbery()
            $autopot_number = 1
            partia_autopot_pokaz()
        Case $autoskil
            kolory()
            GUICtrlSetBkColor($autoskil, 0xD3D3D3)
            chowaj_all()
            Sleep(200)
            numbery()
            $autoskil_number = 1
            partia_autoskil_pokaz()
        Case $autologin
            kolory()
            GUICtrlSetBkColor($autologin, 0xD3D3D3)
            chowaj_all()
            Sleep(200)
            numbery()
            $autologin_number = 1
            partia_autologin_pokaz()
        Case $menu_button
            kolory()
            GUICtrlSetBkColor($menu_button, 0xD3D3D3)
            chowaj_all()
            Sleep(200)
            numbery()
            $menu_number = 1
            partia_menu_pokaz()
        Case $autorzy
            kolory()
            GUICtrlSetBkColor($autorzy, 0xD3D3D3)
            chowaj_all()
            Sleep(200)
            numbery()
            partia_autorzy_pokaz()
        Case $inne
            kolory()
            GUICtrlSetBkColor($inne, 0xD3D3D3)
            chowaj_all()
            Sleep(200)
            numbery()
            partia_inne_pokaz()
        Case $koordynuj
            koord()
         Case $m2bin
            Run("metin2.bin")
                UICtrlSetState($hsblok,$GUI_DISABLE)
                GUICtrlSetState($m2bin2,$GUI_DISABLE)
                    GUICtrlSetState($m2bin,$GUI_DISABLE)
                 Case $m2bin2
            Run("metin2client.bin")
                GUICtrlSetState($hsblok,$GUI_DISABLE)
                    GUICtrlSetState($m2bin2,$GUI_DISABLE)
                    GUICtrlSetState($m2bin,$GUI_DISABLE)
         case $m2bin3
            MsgBox(0, "Kamera", "Zaloguj się na postać i kliknij ok")
            Sleep(1000)
            Send("{g down}")
            Sleep(1500)
Send("{g up}")
Sleep(100)
Send("{f down}")
Sleep(1500)
Send("{f up}")
         case $m2bin4
            ShellExecute("www.cshacked.pl")
        Case $hsblok
            If ProcessExists("metin2client.bin") Or ProcessExists("metin2.bin") Then
                MsgBox(0,"Błąd","Najpierw wyłącz grę",5)
                Else
            FileDelete("hackshield\ehsvc.dll")
            FileCopy("files\ehsvc.dll","hshield")
            GUICtrlSetData($labin_3,"Zablokowano hackshield..")
        EndIf
    Case $logowanie_on
serw()
channel()
postac()
plik()
Case $logowanie_off
    FileDelete("logininfo.py")
Case $wyjdz_bot
    Exit
EndSwitch
WEnd
 
 
Func oddawanie_expa()
    If $start = 1 Then
    If GUICtrlRead($exp_donate) = $GUI_CHECKED Then
 
        If GUICtrlRead($kulka1) = $GUI_CHECKED Then
            $jaka_kulkax = $x+115
            $jaka_kulkay = $y-3
        EndIf
        If GUICtrlRead($kulka2) = $GUI_CHECKED Then
            $jaka_kulkax = $x+140
            $jaka_kulkay = $y-3
        EndIf
        If GUICtrlRead($kulka3) = $GUI_CHECKED Then
            $jaka_kulkax = $x+165
            $jaka_kulkay = $y-3
        EndIf
        If GUICtrlRead($kulka4) = $GUI_CHECKED Then
            $jaka_kulkax = $x+190
            $jaka_kulkay = $y-3
        EndIf
 
$experience = PixelGetColor($jaka_kulkax,$jaka_kulkay)
If $experience = 0xCBA332 Then
    $start = 0
    $inwestuj_1 = _ImageSearch("files\inwestuj_1.bmp",1,$x_1,$y_1,5)
    If $inwestuj_1 = 1 Then
        MouseClick("",$x_1,$y_1)
        Sleep(5000)
        $inwestuj_2 = _ImageSearch("files\gildia.bmp",1,$x_2,$y_2,5)
        If $inwestuj_2 = 1 Then
        MouseClick("",$x_2,$y_2)
        Sleep(5000)
        $inwestuj_3 = _ImageSearch("files\inwestuj_2.bmp",1,$x_3,$y_3,5)
        If $inwestuj_3 = 1 Then
            MouseClick("",$x_3,$y_3)
            Sleep(2000)
            Send("{Del down}")
            Sleep(1000)
            Send("{Del up}")
            Sleep(500)
            Send("{Del down}")
            Sleep(1000)
            Send("{Del up}")
            Sleep(500)
            Send("9999999999")
            Sleep(2000)
            Send("{Enter}")
            Sleep(2000)
            Send("{Esc down}")
            Sleep(1000)
            Send("{Esc up}")
            Sleep(1000)
            Send("{Esc down}")
            Sleep(1000)
            Send("{Esc up}")
            Sleep(500)
            $start = 1
        EndIf
        EndIf
    EndIf
    EndIf
EndIf
EndIf
EndFunc
 
 
Func plik()
    FileDelete("logininfo.py")
    FileWriteLine("logininfo.py","import serverInfo")
    FileWriteLine("logininfo.py","serverNum=" & $serwer_num)
    FileWriteLine("logininfo.py","serverChannel=" & $kanal)
    FileWriteLine("logininfo.py","addr_new = serverInfo.REGION_DICT[0][serverNum]['channel'][serverChannel]['ip']")
    FileWriteLine("logininfo.py","port_new = serverInfo.REGION_DICT[0][serverNum]['channel'][serverChannel]['tcp_port']")
    FileWriteLine("logininfo.py","account_addr_new = serverInfo.REGION_AUTH_SERVER_DICT[0][serverNum]['ip']")
    FileWriteLine("logininfo.py","account_port_new = serverInfo.REGION_AUTH_SERVER_DICT[0][serverNum]['port']")
    FileWriteLine("logininfo.py","addr=addr_new")
    FileWriteLine("logininfo.py","port=port_new")
    FileWriteLine("logininfo.py","id=' " & GUICtrlRead($login) & "'")
    FileWriteLine("logininfo.py","pwd='" & GUICtrlRead($haslo) & "'")
    FileWriteLine("logininfo.py","account_addr=account_addr_new")
    FileWriteLine("logininfo.py","account_port=account_port_new")
    FileWriteLine("logininfo.py","slot=" & $postac)
    FileWriteLine("logininfo.py","autoSelect=1")
    FileWriteLine("logininfo.py","autoLogin=1")
EndFunc
Func logowanie()
    If $autologin_number = 1 Then
    If Not FileExists("logininfo.py") Then
        GUICtrlSetData($logowanie_onoff,"Wyłączone")
    Else
        GUICtrlSetData($logowanie_onoff,"Włączone")
    EndIf
    EndIf
    EndFunc
Func postac()
    If GUICtrlRead($postac1) = $GUI_CHECKED Then
        $postac = 0
    EndIf
    If GUICtrlRead($postac2) = $GUI_CHECKED Then
        $postac = 1
    EndIf
    If GUICtrlRead($postac3) = $GUI_CHECKED Then
        $postac = 2
    EndIf
    If GUICtrlRead($postac4) = $GUI_CHECKED Then
        $postac = 3
    EndIf
    EndFunc
Func channel()
    If GUICtrlRead($channel) = "CH1" Then
        $kanal = 1
    EndIf
        If GUICtrlRead($channel) = "CH2" Then
        $kanal = 2
    EndIf
        If GUICtrlRead($channel) = "CH3" Then
        $kanal = 3
    EndIf
        If GUICtrlRead($channel) = "CH4" Then
        $kanal = 4
        EndIf
    EndFunc
Func serw()
    If GUICtrlRead($serwer) = "Monastyr" Then
        $serwer_num = 1
    EndIf
    If GUICtrlRead($serwer) = "Feniks" Then
        $serwer_num = 2
    EndIf
    If GUICtrlRead($serwer) = "Obsydian" Then
        $serwer_num = 3
    EndIf
    If GUICtrlRead($serwer) = "Twierdza" Then
        $serwer_num = 4
    EndIf
    If GUICtrlRead($serwer) = "Astral" Then
        $serwer_num = 5
    EndIf
    If GUICtrlRead($serwer) = "Grymuar" Then
        $serwer_num = 6
    EndIf
    If GUICtrlRead($serwer) = "Almanach" Then
        $serwer_num = 7
    EndIf
    If GUICtrlRead($serwer) = "Onyks" Then
        $serwer_num = 8
    EndIf
    If GUICtrlRead($serwer) = "Agronas" Then
        $serwer_num = 9
    EndIf
    If GUICtrlRead($serwer) = "Gromo" Then
        $serwer_num = 10
    EndIf
    If GUICtrlRead($serwer) = "Arkantes" Then
        $serwer_num = 11
    EndIf
    If GUICtrlRead($serwer) = "Monolit" Then
        $serwer_num = 12
    EndIf
    If GUICtrlRead($serwer) = "Exandros" Then
        $serwer_num = 13
    EndIf
    If GUICtrlRead($serwer) = "Kirian" Then
        $serwer_num = 14
    EndIf
    If GUICtrlRead($serwer) = "Eteor" Then
        $serwer_num = 15
    EndIf
    If GUICtrlRead($serwer) = "Elares" Then
        $serwer_num = 16
    EndIf
    If GUICtrlRead($serwer) = "Serwandes" Then
        $serwer_num = 17
    EndIf
    If GUICtrlRead($serwer) = "Phobos" Then
        $serwer_num = 18
    EndIf
    If GUICtrlRead($serwer) = "Deimos" Then
        $serwer_num = 19
    EndIf
    If GUICtrlRead($serwer) = "Endurion" Then
        $serwer_num = 20
    EndIf
    If GUICtrlRead($serwer) = "Candia" Then
        $serwer_num = 21
    EndIf
    If GUICtrlRead($serwer) = "Orion" Then
        $serwer_num = 22
    EndIf
    If GUICtrlRead($serwer) = "Kronos" Then
        $serwer_num = 23
    EndIf
    If GUICtrlRead($serwer) = "Phantos" Then
        $serwer_num = 24
    EndIf
    If GUICtrlRead($serwer) = "Syriusz" Then
        $serwer_num = 25
    EndIf
    If GUICtrlRead($serwer) = "Solar" Then
        $serwer_num = 26
    EndIf
    EndFunc
Func wstawanie()
    If GUICtrlRead($auto_up) = $GUI_CHECKED Then
    $image_wstawanie = _ImageSearch("files\wstawanie.bmp",1,$x_up,$y_up,5)
    If $image_wstawanie = 1 Then
        $start = 0
        Sleep(20000)
        MouseClick("",$x_up,$y_up,2)
        Sleep(10000)
        $start = 1
    EndIf
    EndIf
    EndFunc
Func expbot()
    If $start = 1 Then
        Sleep(1)
            If $szukam = 16 Then
        $szukam = 0
        $kolejna_strona +=1
        If $kolejna_strona = 1 Then
            MouseClick("",$x+328,$y-550);góra
        EndIf
        If $kolejna_strona = 2 Then
            MouseClick("",$x+328,$y-45);dół
            MouseClick("",$x+328,$y-45);dół
        EndIf
        If $kolejna_strona = 3 Then
            MouseClick("",$x+328,$y-550);góra
            MouseClick("",$x,$y-300);lewo
            MouseClick("",$x+590,$y-300);prawo
        EndIf
        If $kolejna_strona = 4 Then
            MouseClick("",$x+590,$y-300);prawo
            MouseClick("",$x,$y-300);lewo
            $kolejna_strona = 0
        EndIf
     EndIf
$area_one = PixelSearch($x,$y-510,$x+305,$y-45,0xEB1609,5)
If Not @error Then
    MouseClick("",$area_one[0]+Random(-5,20,1),$area_one[1],1,0)
    $szukam = 0
Else
    $szukam+=1
    $area_two = PixelSearch($x+390,$y-510,$x+590,$y-45,0xEB1609,5)
    If Not @error Then
        MouseClick("",$area_two[0]+Random(-5,20,1),$area_two[1],1,0)
        $szukam = 0
    Else
        $szukam+=1
        $area_three = PixelSearch($x,$y-510,$x+590,$y-327,0xEB1609,5)
        If Not @error Then
            MouseClick("",$area_three[0]+Random(-5,20,1),$area_three[1],1,0)
                Sleep(1)
            $szukam = 0
        Else
            $szukam+=1
            $area_four = PixelSearch($x,$y-240,$x+590,$y-45,0xEB1609,5)
            If Not @error Then
                MouseClick("",$area_four[0]+Random(-5,20,1),$area_four[1],1,0)
                $szukam = 0
            Else
                $szukam+=1
                skil1()
                EndIf
            EndIf
        EndIf
    EndIf
EndIf
EndFunc
 
 
Func skil1()
   If GUICtrlRead($slot1) = $GUI_CHECKED Then
    Sleep(100)
            Send("{1}")
            endif
            If GUICtrlRead($slot2) = $GUI_CHECKED Then
    Sleep(100)
            Send("{2}")
            endif
            If GUICtrlRead($slot3) = $GUI_CHECKED Then
    Sleep(100)
            Send("{3}")
            endif
            If GUICtrlRead($slot4) = $GUI_CHECKED Then
    Sleep(100)
            Send("{4}")
            endif
            If GUICtrlRead($slot5) = $GUI_CHECKED Then
    Sleep(100)
            Send("{f1}")
            endif
            If GUICtrlRead($slot6) = $GUI_CHECKED Then
            Sleep(100)
            Send("{f2}")
            endif
EndFunc
 
Func start()
 
    GUICtrlSetState($expbot,$GUI_DISABLE)
    GUICtrlSetState($autopot,$GUI_DISABLE)
    GUICtrlSetState($autoskil,$GUI_DISABLE)
    GUICtrlSetState($autologin,$GUI_DISABLE)
    GUICtrlSetState($autorzy,$GUI_DISABLE)
    GUICtrlSetState($inne,$GUI_DISABLE)
    GUICtrlSetState($menu_button,$GUI_DISABLE)
                kolory()
            GUICtrlSetBkColor($inne, 0xffffFF)
            chowaj_all()
            Sleep(200)
            numbery()
            partia_inne_pokaz()
    $start = 1
 
EndFunc
Func wyjdz()
    Exit
EndFunc
Func stop()
    $start = 0
    $czas_1 = 0
    $czas_2 = 0
    $czas_3 = 0
    $czas_4 = 0
    $czas_5 = 0
    $czas_6 = 0
    GUICtrlSetState($menu_button,$GUI_ENABLE)
    GUICtrlSetState($expbot,$GUI_ENABLE)
    GUICtrlSetState($autopot,$GUI_ENABLE)
    GUICtrlSetState($autoskil,$GUI_ENABLE)
    GUICtrlSetState($autologin,$GUI_ENABLE)
    GUICtrlSetState($autorzy,$GUI_ENABLE)
    GUICtrlSetState($inne,$GUI_ENABLE)
    EndFunc
Func koord()
$szukany = _ImageSearch("files\left_hpmp.bmp",1,$x,$y,5)
    If $szukany = 1 Then
Sleep(500)
GUICtrlSetState($expbot,$GUI_ENABLE)
    GUICtrlSetState($autopot,$GUI_ENABLE)
    GUICtrlSetState($autoskil,$GUI_ENABLE)
    GUICtrlSetState($autologin,$GUI_ENABLE)
    GUICtrlSetState($autorzy,$GUI_ENABLE)
    GUICtrlSetState($inne,$GUI_ENABLE)
    GUICtrlSetState($menu_button,$GUI_ENABLE)
    GUICtrlSetData($labin_2,"Współrzędne ustalone..")
        EndIf
    EndFunc
Func poter_hp()
        If $start = 1 Then
    If GUICtrlRead($reg_zycie) = $GUI_CHECKED Then
        If GUICtrlRead($slide_hp) = 10 Then
        $hp_100 = PixelGetColor($x+95,$y-6)
         If $hp_100 = 0x2C2C2C Then
             For $i = 0 to 20
            Send("{F4}")
            Next
        EndIf
     EndIf
    If GUICtrlRead($slide_hp) = 9 Then
        $hp_90 = PixelGetColor($x+85,$y-6)
        If $hp_90 = 0x2C2C2C Then
                 For $i = 0 to 20
            Send("{F4}")
            Next
        EndIf
    endif
    If GUICtrlRead($slide_hp) = 8 Then
                $hp_80 = PixelGetColor($x+75,$y-6)
        If $hp_80 = 0x2C2C2C Then
            For $i = 0 to 20
            Send("{F4}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_hp) = 7 Then
                $hp_70 = PixelGetColor($x+65,$y-6)
        If $hp_70 = 0x2C2C2C Then
        For $i = 0 to 20
            Send("{F4}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_hp) = 6 Then
                $hp_60 = PixelGetColor($x+55,$y-6)
        If $hp_60 = 0x2C2C2C Then
             For $i = 0 to 20
            Send("{F4}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_hp) = 5 Then
                $hp_50 = PixelGetColor($x+45,$y-6)
        If $hp_50 = 0x2C2C2C Then
            For $i = 0 to 30
            Send("{F4}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_hp) = 4 Then
                $hp_40 = PixelGetColor($x+35,$y-6)
        If $hp_40 = 0x2C2C2C Then
                 For $i = 0 to 30
            Send("{F4}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_hp) = 3 Then
                $hp_30 = PixelGetColor($x+25,$y-6)
        If $hp_30 = 0x2C2C2C Then
                 For $i = 0 to 30
            Send("{F4}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_hp) = 2 Then
                $hp_20 = PixelGetColor($x+15,$y-6)
        If $hp_20 = 0x2C2C2C Then
                 For $i = 0 to 30
            Send("{F4}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_hp) = 1 Then
                $hp_10 = PixelGetColor($x+8,$y-6)
        If $hp_10 = 0x2C2C2C Then
             For $i = 0 to 40
            Send("{F4}")
            Next
        EndIf
    EndIf
    EndIf
    EndIf
EndFunc
Func poter_mp()
    If $start = 1 Then
    If GUICtrlRead($reg_mana) = $GUI_CHECKED Then
        If GUICtrlRead($slide_mp) = 10 Then
        $mp_100 = PixelGetColor($x+95,$y+5)
         If $mp_100 = 0x222222 Then
             For $i = 0 to 20
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 9 Then
        $mp_90 = PixelGetColor($x+85,$y+5)
        If $mp_90 = 0x222222 Then
                 For $i = 0 to 20
            Send("{F3}")
            Next
        EndIf
    endif
    If GUICtrlRead($slide_mp) = 8 Then
                $mp_80 = PixelGetColor($x+75,$y+5)
        If $mp_80 = 0x222222 Then
            For $i = 0 to 20
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 7 Then
                $mp_70 = PixelGetColor($x+65,$y+5)
        If $mp_70 = 0x222222 Then
        For $i = 0 to 20
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 6 Then
                $mp_60 = PixelGetColor($x+55,$y+5)
        If $mp_60 = 0x222222 Then
             For $i = 0 to 20
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 5 Then
                $mp_50 = PixelGetColor($x+45,$y+5)
        If $mp_50 = 0x222222 Then
            For $i = 0 to 30
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 4 Then
                $mp_40 = PixelGetColor($x+35,$y+5)
        If $mp_40 = 0x222222 Then
                 For $i = 0 to 30
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 3 Then
                $mp_30 = PixelGetColor($x+25,$y+5)
        If $mp_30 = 0x222222 Then
                 For $i = 0 to 30
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 2 Then
                $mp_20 = PixelGetColor($x+15,$y+5)
        If $mp_20 = 0x222222 Then
                 For $i = 0 to 30
            Send("{F3}")
            Next
        EndIf
    EndIf
    If GUICtrlRead($slide_mp) = 1 Then
                $mp_10 = PixelGetColor($x+8,$y+5)
        If $mp_10 = 0x222222 Then
             For $i = 0 to 40
            Send("{F3}")
            Next
        EndIf
        EndIf
    EndIf
    EndIf
    EndFunc
Func zbieranie()
    If $start = 1 Then
        If GUICtrlRead($zbieranie) = $GUI_CHECKED Then
    $delay = GUICtrlRead($szybkosc_zbieranie)
        If $delay = 1 Then
        Sleep(900)
        Send("z")
    EndIf
        If $delay = 2 Then
        Sleep(800)
        Send("z")
    EndIf
        If $delay = 3 Then
        Sleep(700)
        Send("z")
    EndIf
        If $delay = 4 Then
        Sleep(600)
        Send("z")
    EndIf
        If $delay = 5 Then
        Sleep(500)
        Send("z")
    EndIf
        If $delay = 6 Then
        Sleep(400)
        Send("z")
    EndIf
        If $delay = 7 Then
        Sleep(300)
        Send("z")
    EndIf
        If $delay = 8 Then
        Sleep(200)
        Send("z")
    EndIf
        If $delay = 9 Then
        Sleep(100)
        Send("z")
    EndIf
        If $delay = 10 Then
        Sleep(50)
        Send("z")
    EndIf
EndIf
EndIf
    EndFunc
Func kolory()
    GUICtrlSetBkColor($expbot, 0xFFFFFF)
    GUICtrlSetBkColor($autopot, 0xFFFFFF)
    GUICtrlSetBkColor($autoskil, 0xFFFFFF)
    GUICtrlSetBkColor($autologin, 0xFFFFFF)
    GUICtrlSetBkColor($menu_button, 0xFFFFFF)
    GUICtrlSetBkColor($autorzy, 0xFFFFFF)
    GUICtrlSetBkColor($inne, 0xFFFFFF)
    EndFunc
Func czas()
    If $menu_number = 1 Then
     GUICtrlSetData($aktualna, @HOUR & ':' & "" & @MIN & ':' & @SEC)
 EndIf
If GUICtrlRead($komputer_off) = $GUI_CHECKED Then
 If @HOUR = GUICtrlRead($godzina) Then
      Shutdown(0)
  EndIf
  EndIf
    EndFunc
Func chowaj_all()
    partia_expbot_chowaj()
    partia_autopot_chowaj()
    partia_autoskil_chowaj()
    partia_autologin_chowaj()
    partia_menu_chowaj()
    partia_autorzy_chowaj()
    partia_inne_chowaj()
    EndFunc
Func partia_inne_chowaj()
        GUICtrlSetState($got1,$GUI_HIDE)
                    GUICtrlSetState($Edit1,$GUI_HIDE)
                    GUICtrlSetState($m2bin3,$GUI_HIDE)
                    GUICtrlSetState($m2bin4,$GUI_HIDE)
    EndFunc
Func partia_inne_pokaz()
        GUICtrlSetState($got1,$GUI_SHOW)
                    GUICtrlSetState($Edit1,$GUI_SHOW)
                    GUICtrlSetState($m2bin3,$GUI_SHOW)
                    GUICtrlSetState($m2bin4,$GUI_SHOW)
    EndFunc
Func partia_autorzy_pokaz()
    GUICtrlSetState($libon_1,$GUI_SHOW)
        GUICtrlSetState($libon_2,$GUI_SHOW)
    GUICtrlSetState($autorzy_pic,$GUI_SHOW)
    EndFunc
Func partia_autorzy_chowaj()
    GUICtrlSetState($libon_1,$GUI_HIDE)
        GUICtrlSetState($libon_2,$GUI_HIDE)
    GUICtrlSetState($autorzy_pic,$GUI_HIDE)
    EndFunc
Func partia_logowanie_chowaj()
    GUICtrlSetState($lol,$GUI_HIDE)
    GUICtrlSetState($lol_1,$GUI_HIDE)
    GUICtrlSetState($create_bot,$GUI_HIDE)
    GUICtrlSetState($zaloguj_bot,$GUI_HIDE)
    GUICtrlSetState($wyjdz_bot,$GUI_HIDE)
    EndFunc
    Func partia_menu_chowaj()
    GUICtrlSetState($labin_2,$GUI_HIDE)
    GUICtrlSetState($labin_3,$GUI_HIDE)
    GUICtrlSetState($labin_4,$GUI_HIDE)
    GUICtrlSetState($labin_5,$GUI_HIDE)
        GUICtrlSetState($t1,$GUI_HIDE)
    GUICtrlSetState($koordynuj,$GUI_HIDE)
    GUICtrlSetState($m2bin,$GUI_HIDE)
        GUICtrlSetState($m2bin2,$GUI_HIDE)
    GUICtrlSetState($hsblok,$GUI_HIDE)
    GUICtrlSetState($komputer_off,$GUI_HIDE)
    GUICtrlSetState($aktualna,$GUI_HIDE)
    GUICtrlSetState($godzina,$GUI_HIDE)
    GUICtrlSetState($up_godzina,$GUI_HIDE)
    GUICtrlSetState($up_godzina,$GUI_DISABLE)
    GUICtrlSetState($napis,$GUI_HIDE)
    EndFunc
Func partia_menu_pokaz()
    GUICtrlSetState($up_godzina,$GUI_SHOW)
    GUICtrlSetState($labin_2,$GUI_SHOW)
    GUICtrlSetState($t1,$GUI_SHOW)
    GUICtrlSetState($labin_3,$GUI_SHOW)
    GUICtrlSetState($labin_4,$GUI_SHOW)
    GUICtrlSetState($labin_5,$GUI_SHOW)
    GUICtrlSetState($koordynuj,$GUI_SHOW)
    GUICtrlSetState($hsblok,$GUI_SHOW)
    GUICtrlSetState($m2bin,$GUI_SHOW)
        GUICtrlSetState($m2bin2,$GUI_SHOW)
    GUICtrlSetState($komputer_off,$GUI_SHOW)
    GUICtrlSetState($aktualna,$GUI_SHOW)
    GUICtrlSetState($godzina,$GUI_SHOW)
    GUICtrlSetState($up_godzina,$GUI_ENABLE)
        GUICtrlSetState($napis,$GUI_SHOW)
    EndFunc
Func partia_autologin_chowaj()
    GUICtrlSetState($labele_1,$GUI_HIDE)
    GUICtrlSetState($labele_2,$GUI_HIDE)
    GUICtrlSetState($labele_3,$GUI_HIDE)
    GUICtrlSetState($labele_4,$GUI_HIDE)
    GUICtrlSetState($labele_5,$GUI_HIDE)
    GUICtrlSetState($labele_8,$GUI_HIDE)
    GUICtrlSetState($login,$GUI_HIDE)
    GUICtrlSetState($haslo,$GUI_HIDE)
    GUICtrlSetState($channel,$GUI_HIDE)
    GUICtrlSetState($serwer,$GUI_HIDE)
    GUICtrlSetState($postac1,$GUI_HIDE)
    GUICtrlSetState($postac2,$GUI_HIDE)
    GUICtrlSetState($postac3,$GUI_HIDE)
    GUICtrlSetState($postac4,$GUI_HIDE)
    GUICtrlSetState($logowanie_off,$GUI_HIDE)
    GUICtrlSetState($logowanie_on,$GUI_HIDE)
    GUICtrlSetState($logowanie_onoff,$GUI_HIDE)
    EndFunc
Func partia_autologin_pokaz()
    GUICtrlSetState($labele_1,$GUI_SHOW)
    GUICtrlSetState($labele_2,$GUI_SHOW)
    GUICtrlSetState($labele_3,$GUI_SHOW)
    GUICtrlSetState($labele_4,$GUI_SHOW)
    GUICtrlSetState($labele_5,$GUI_SHOW)
    GUICtrlSetState($labele_8,$GUI_SHOW)
    GUICtrlSetState($login,$GUI_SHOW)
    GUICtrlSetState($haslo,$GUI_SHOW)
    GUICtrlSetState($channel,$GUI_SHOW)
    GUICtrlSetState($serwer,$GUI_SHOW)
    GUICtrlSetState($postac1,$GUI_SHOW)
    GUICtrlSetState($postac2,$GUI_SHOW)
    GUICtrlSetState($postac3,$GUI_SHOW)
    GUICtrlSetState($postac4,$GUI_SHOW)
    GUICtrlSetState($logowanie_off,$GUI_SHOW)
    GUICtrlSetState($logowanie_on,$GUI_SHOW)
    GUICtrlSetState($logowanie_onoff,$GUI_SHOW)
    EndFunc
Func partia_autoskil_chowaj()
    GUICtrlSetState($slot1,$GUI_HIDE)
    GUICtrlSetState($slot2,$GUI_HIDE)
    GUICtrlSetState($slot3,$GUI_HIDE)
    GUICtrlSetState($slot4,$GUI_HIDE)
    GUICtrlSetState($slot5,$GUI_HIDE)
    GUICtrlSetState($slot6,$GUI_HIDE)
    GUICtrlSetState($del_1,$GUI_HIDE)
    GUICtrlSetState($del_2,$GUI_HIDE)
    GUICtrlSetState($del_3,$GUI_HIDE)
    GUICtrlSetState($del_4,$GUI_HIDE)
    GUICtrlSetState($del_5,$GUI_HIDE)
    GUICtrlSetState($del_6,$GUI_HIDE)
    GUICtrlSetState($labo_1,$GUI_HIDE)
    GUICtrlSetState($labo_2,$GUI_HIDE)
    EndFunc
Func partia_autoskil_pokaz()
    GUICtrlSetState($slot1,$GUI_SHOW)
    GUICtrlSetState($slot2,$GUI_SHOW)
    GUICtrlSetState($slot3,$GUI_SHOW)
    GUICtrlSetState($slot4,$GUI_SHOW)
    GUICtrlSetState($slot5,$GUI_SHOW)
    GUICtrlSetState($slot6,$GUI_SHOW)
    GUICtrlSetState($del_1,$GUI_SHOW)
    GUICtrlSetState($del_2,$GUI_SHOW)
    GUICtrlSetState($del_3,$GUI_SHOW)
    GUICtrlSetState($del_4,$GUI_SHOW)
    GUICtrlSetState($del_5,$GUI_SHOW)
    GUICtrlSetState($del_6,$GUI_SHOW)
    GUICtrlSetState($labo_1,$GUI_SHOW)
    GUICtrlSetState($labo_2,$GUI_SHOW)
    EndFunc
Func partia_autopot_chowaj()
    GUICtrlSetState($Label1,$GUI_HIDE)
    GUICtrlSetState($Label2,$GUI_HIDE)
    GUICtrlSetState($slide_hp,$GUI_HIDE)
    GUICtrlSetState($slide_mp,$GUI_HIDE)
    GUICtrlSetState($Label3,$GUI_HIDE)
    GUICtrlSetState($Label4,$GUI_HIDE)
    GUICtrlSetState($Label5,$GUI_HIDE)
    GUICtrlSetState($Label6,$GUI_HIDE)
    GUICtrlSetState($Label7,$GUI_HIDE)
    GUICtrlSetState($reg_mana,$GUI_HIDE)
    GUICtrlSetState($reg_zycie,$GUI_HIDE)
    GUICtrlSetState($Pic1,$GUI_HIDE)
    EndFunc
Func partia_autopot_pokaz()
    GUICtrlSetState($Label1,$GUI_SHOW)
    GUICtrlSetState($Label2,$GUI_SHOW)
    GUICtrlSetState($slide_hp,$GUI_SHOW)
    GUICtrlSetState($slide_mp,$GUI_SHOW)
    GUICtrlSetState($Label3,$GUI_SHOW)
    GUICtrlSetState($Label4,$GUI_SHOW)
    GUICtrlSetState($Label5,$GUI_SHOW)
    GUICtrlSetState($Label6,$GUI_SHOW)
    GUICtrlSetState($Label7,$GUI_SHOW)
    GUICtrlSetState($reg_mana,$GUI_SHOW)
    GUICtrlSetState($reg_zycie,$GUI_SHOW)
    GUICtrlSetState($Pic1,$GUI_SHOW)
    EndFunc
Func partia_expbot_chowaj()
    GUICtrlSetState($zbieranie,$GUI_HIDE)
        GUICtrlSetState($szybkosc_zbieranie,$GUI_HIDE)
              GUICtrlSetState($up_1,$GUI_HIDE)
                GUICtrlSetState($lab1,$GUI_HIDE)
                    GUICtrlSetState($auto_up,$GUI_HIDE)
                        GUICtrlSetState($exp_donate,$GUI_HIDE)
                        GUICtrlSetState($kulka1,$GUI_HIDE)
                        GUICtrlSetState($kulka2,$GUI_HIDE)
                        GUICtrlSetState($kulka3,$GUI_HIDE)
                        GUICtrlSetState($kulka4,$GUI_HIDE)
                    EndFunc
Func partia_expbot_pokaz()
    GUICtrlSetState($zbieranie,$GUI_SHOW)
        GUICtrlSetState($szybkosc_zbieranie,$GUI_SHOW)
                GUICtrlSetState($lab1,$GUI_SHOW)
                    GUICtrlSetState($auto_up,$GUI_SHOW)
                        GUICtrlSetState($exp_donate,$GUI_SHOW)
                        GUICtrlSetState($kulka1,$GUI_SHOW)
                        GUICtrlSetState($kulka2,$GUI_SHOW)
                        GUICtrlSetState($kulka3,$GUI_SHOW)
                        GUICtrlSetState($kulka4,$GUI_SHOW)
                        GUICtrlSetState($up_1,$GUI_SHOW)
                        GUICtrlSetState($up_1,$GUI_ENABLE)
        EndFunc
Func bot_chowaj()
    GUICtrlSetState($Group1,$GUI_HIDE)
    GUICtrlSetState($expbot,$GUI_HIDE)
    GUICtrlSetState($autopot,$GUI_HIDE)
    GUICtrlSetState($autoskil,$GUI_HIDE)
    GUICtrlSetState($autologin,$GUI_HIDE)
    GUICtrlSetState($menu_button,$GUI_HIDE)
    GUICtrlSetState($autorzy,$GUI_HIDE)
    GUICtrlSetState($inne,$GUI_HIDE)
    GUICtrlSetState($wyjscie,$GUI_HIDE)
    GUICtrlSetState($Group1_lou,$GUI_HIDE)
EndFunc
Func bot_pokaz()
    GUICtrlSetState($Group1,$GUI_SHOW)
    GUICtrlSetState($expbot,$GUI_SHOW)
    GUICtrlSetState($autopot,$GUI_SHOW)
    GUICtrlSetState($autoskil,$GUI_SHOW)
    GUICtrlSetState($autologin,$GUI_SHOW)
    GUICtrlSetState($menu_button,$GUI_SHOW)
    GUICtrlSetState($autorzy,$GUI_SHOW)
    GUICtrlSetState($inne,$GUI_SHOW)
    GUICtrlSetState($wyjscie,$GUI_SHOW)
    GUICtrlSetState($Group1_lou,$GUI_SHOW)
    EndFunc
Func numbery()
$expbot_number = 0
$autopot_number = 0
$autoskil_number = 0
$autologin_number = 0
$menu_number = 0
    EndFunc
Func blokada()
 
 
    If $menu_number = 1 Then
        If GUICtrlRead($komputer_off) = $GUI_CHECKED Then
            GUICtrlSetState($up_godzina,$GUI_ENABLE)
        Else
            GUICtrlSetState($up_godzina,$GUI_DISABLE)
        EndIf
 
    EndIf
If $autoskil_number = 1 Then
    If GUICtrlRead($slot1) = $GUI_CHECKED Then
        GUICtrlSetState($del_1,$GUI_ENABLE)
    Else
        GUICtrlSetState($del_1,$GUI_DISABLE)
    EndIf
 
        If GUICtrlRead($slot2) = $GUI_CHECKED Then
                    GUICtrlSetState($del_2,$GUI_ENABLE)
    Else
        GUICtrlSetState($del_2,$GUI_DISABLE)
    EndIf
 
            If GUICtrlRead($slot3) = $GUI_CHECKED Then
                        GUICtrlSetState($del_3,$GUI_ENABLE)
    Else
        GUICtrlSetState($del_3,$GUI_DISABLE)
    EndIf
 
                If GUICtrlRead($slot4) = $GUI_CHECKED Then
                            GUICtrlSetState($del_4,$GUI_ENABLE)
    Else
        GUICtrlSetState($del_4,$GUI_DISABLE)
    EndIf
 
                    If GUICtrlRead($slot5) = $GUI_CHECKED Then
                                GUICtrlSetState($del_5,$GUI_ENABLE)
    Else
        GUICtrlSetState($del_5,$GUI_DISABLE)
    EndIf
 
                        If GUICtrlRead($slot6) = $GUI_CHECKED Then
                                    GUICtrlSetState($del_6,$GUI_ENABLE)
    Else
        GUICtrlSetState($del_6,$GUI_DISABLE)
        EndIf
    EndIf
If $autopot_number = 1 Then
    GUICtrlSetData($Label3,GUICtrlRead($slide_hp)*10)
    GUICtrlSetData($Label4,GUICtrlRead($slide_mp)*10)
 
    If GUICtrlRead($reg_zycie) = $GUI_CHECKED Then
        GUICtrlSetState($slide_hp,$GUI_ENABLE)
    Else
        GUICtrlSetState($slide_hp,$GUI_DISABLE)
    EndIf
 
    If GUICtrlRead($reg_mana) = $GUI_CHECKED Then
        GUICtrlSetState($slide_mp,$GUI_ENABLE)
    Else
        GUICtrlSetState($slide_mp,$GUI_DISABLE)
    EndIf
    EndIf
If $expbot_number = 1 Then
    If GUICtrlRead($zbieranie) = $GUI_CHECKED Then
        GUICtrlSetState($up_1,$GUI_ENABLE)
    Else
        GUICtrlSetState($up_1,$GUI_DISABLE)
    EndIf
 
    If GUICtrlRead($exp_donate) = $GUI_CHECKED Then
        GUICtrlSetState($kulka1,$GUI_ENABLE)
        GUICtrlSetState($kulka2,$GUI_ENABLE)
        GUICtrlSetState($kulka3,$GUI_ENABLE)
        GUICtrlSetState($kulka4,$GUI_ENABLE)
    Else
        GUICtrlSetState($kulka1,$GUI_DISABLE)
        GUICtrlSetState($kulka2,$GUI_DISABLE)
        GUICtrlSetState($kulka3,$GUI_DISABLE)
        GUICtrlSetState($kulka4,$GUI_DISABLE)
    EndIf
 
    EndIf
EndFunc
Func czas_1()
            If $start = 1 Then
                    iF GUICtrlRead($slot1) = $GUI_CHECKED Then
    $czas_1 += 100
If $czas_1 >= GUICtrlRead($del_1)*1000 Then
    $czas_1 = 0
    Send("{1}")
    Send("{1}")
    Send("{1}")
    Send("{1}")
    Send("{1}")
    EndIf
EndIf
EndIf
EndFunc
 
    Func czas_2()
                If $start = 1 Then
                        iF GUICtrlRead($slot2) = $GUI_CHECKED Then
    $czas_2 += 100
If $czas_2 >= GUICtrlRead($del_2)*1000 Then
    $czas_2 = 0
    Send("{2}")
    Send("{2}")
    Send("{2}")
    Send("{2}")
    Send("{2}")
    Send("{2}")
    EndIf
EndIf
EndIf
    EndFunc
 
    Func czas_3()
                If $start = 1 Then
                        iF GUICtrlRead($slot3) = $GUI_CHECKED Then
    $czas_3 += 100
If $czas_3 >= GUICtrlRead($del_3)*1000 Then
    $czas_3 = 0
    Send("{3}")
    Send("{3}")
    Send("{3}")
    Send("{3}")
    Send("{3}")
    Send("{3}")
    EndIf
EndIf
EndIf
EndFunc
Func czas_4()
            If $start = 1 Then
                    iF GUICtrlRead($slot4) = $GUI_CHECKED Then
    $czas_4 += 100
If $czas_4 >= GUICtrlRead($del_4)*1000 Then
    $czas_4 = 0
    Send("{4}")
    Send("{4}")
    Send("{4}")
    Send("{4}")
    Send("{4}")
    Send("{4}")
    endif
EndIf
EndIf
EndFunc
 
    Func czas_5()
                If $start = 1 Then
                        iF GUICtrlRead($slot5) = $GUI_CHECKED Then
    $czas_5 += 100
        $czas_5 += 100
If $czas_5 >= GUICtrlRead($del_5)*1000 Then
    $czas_5 = 0
    Send("{F1}")
    Send("{F1}")
    Send("{F1}")
    Send("{F1}")
    Send("{F1}")
    Send("{F1}")
EndIf
EndIf
EndIf
EndFunc
 
    Func czas_6()
        If $start = 1 Then
            iF GUICtrlRead($slot6) = $GUI_CHECKED Then
    $czas_6 += 100
If $czas_6 >= GUICtrlRead($del_6)*1000 Then
    $czas_6 = 0
    Send("{F2}")
    Send("{F2}")
    Send("{F2}")
    Send("{F2}")
    Send("{F2}")
    Send("{F2}")
EndIf
EndIf
EndIf
    EndFunc

 

Odnośnik do komentarza

Dołącz do dyskusji

Możesz dodać zawartość już teraz a zarejestrować się później. Jeśli posiadasz już konto, zaloguj się aby dodać zawartość za jego pomocą.

Gość
Dodaj odpowiedź do tematu...

×   Wklejono zawartość z formatowaniem.   Usuń formatowanie

  Dozwolonych jest tylko 75 emoji.

×   Odnośnik został automatycznie osadzony.   Przywróć wyświetlanie jako odnośnik

×   Przywrócono poprzednią zawartość.   Wyczyść edytor

×   Nie możesz bezpośrednio wkleić grafiki. Dodaj lub załącz grafiki z adresu URL.

  Tagi

×
×
  • Dodaj nową pozycję...

Powiadomienie o plikach cookie

Umieściliśmy na Twoim urządzeniu pliki cookie, aby pomóc Ci usprawnić przeglądanie strony. Możesz dostosować ustawienia plików cookie, w przeciwnym wypadku zakładamy, że wyrażasz na to zgodę. Regulamin. Polityka prywatności