Skocz do zawartości

Polecane posty

Witam mam problem ze spell casterem, nie wiem dlaczego mi to nie działa, jest identycznie jak z poradnika. Anty-idle i jedzenie fooda śmiga.

Link do tematu: https://www.mpcforum.pl/topic/108326-nomadau3-czyli-piszemy-trainera/

Kod: 

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <nomad.au3>
#include <Timers.au3>
#Region ### START Koda GUI section ### Form=C:\Users\Valar\Desktop\bot\Form1.kxf
$Form1 = GUICreate("bot do tibi", 192, 368, 192, 124)
$Button1 = GUICtrlCreateButton("spell caster", 8, 16, 75, 25, $WS_GROUP)
$Input1 = GUICtrlCreateInput("czar", 0, 64, 121, 21)
$Input2 = GUICtrlCreateInput("mana", 0, 104, 121, 21)
$Button2 = GUICtrlCreateButton("anty-idle", 8, 136, 75, 25, $WS_GROUP)
$Input3 = GUICtrlCreateInput("czas", 0, 176, 121, 21)
$Button3 = GUICtrlCreateButton("jedzenie fooda", 8, 208, 75, 25, $WS_GROUP)
$Input4 = GUICtrlCreateInput("guzik", 0, 256, 121, 21)
$Input5 = GUICtrlCreateInput("czas", 0, 296, 121, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $Button1
            global $pid = ProcessExists("Kasteria.exe")
            $memaaa = _MemoryOpen($pid)
            _Timer_SetTimer($form1,500,"spell")
        case $Button2
            $ff = GUICtrlRead($input3)
            $ff *= 1000
            _Timer_SetTimer($form1,$ff,"afk")
        case $Button3
            $ks = GUICtrlRead($Input4)
            $ksks = GUICtrlRead($Input5)
			$ksks *= 1000
            _Timer_SetTimer($form1,$ksks,"food")
    EndSwitch
WEnd
func food($1,$2,$3,$4)
    ControlSend("Kasteria","","",$ks)
    EndFunc
func afk($1,$2,$3,$4)
    ControlSend("Kasteria","","","{ctrldown}{down}{ctrlup}")
    ControlSend("Kasteria","","","{ctrldown}{up}{ctrlup}")
    ControlSend("Kasteria","","","{ctrldown}{left}{ctrlup}")
    ControlSend("Kasteria","","","{ctrldown}{right}{ctrlup}")
EndFunc

Func spell()
    $kk = guictrlread($input2)
    $mem = _MemoryRead(0x00635EF0,$memaaa)
    if $mem >= $kk then
        controlsend("Kasteria","","",guictrlread($input1))
        controlsend("Kasteria","","","{enter}")
EndIf
EndFunc

 

Udostępnij ten post


Link to postu
Pani Kasia

Pani Kasia

Bądź aktywny! Zaloguj się lub utwórz konto

Tylko zarejestrowani użytkownicy mogą komentować zawartość tej strony

Utwórz konto

Zarejestruj nowe konto, to proste!

Zarejestruj nowe konto

Zaloguj się

Posiadasz własne konto? Użyj go!

Zaloguj się
  • Kto przegląda   0 użytkowników

    Brak zalogowanych użytkowników przeglądających tę stronę.


×
Okienko zamknie się za 5 sekund...