Updejtowanie adresow co 3 sekundy

[Kahras]

Jak odpalam bota to pobiera mi adresy i.. :

 

Gdybym wbil level to dalej by mi pisalo ze mam 20 poziom.

Wie ktos jak zrobic updatowanie adresow co 3 sekundy?

[IZZER4]

Musisz zapetlic odczytywanie lvl?

[Kahras]

Zrobilem tak:

 

$HP=0x05C6848
$proces = ProcessExists("Tibia.exe") ; sprawdza czy istnieje proces
$proces2 = _MemoryOpen($proces)
While 1
$HP2 = _MemoryRead($HP, $proces2)
WEnd

I jest 0 errorow a program sie nie odpala (tzn. nie widac GUI)

[M4niak]

GUISetState(@SW_SHOW)
---
Sleep(3000)

Wszystko co ci potrzebne.

[Kahras]

Dalej nie dziala

[MistrzMaster]

Bo program jeszcze prawdopodobnie nie wczytał GUI, a ty już zapętlasz wieczne odczytywanie wartości... To jest pętla while, nie możesz tak zrobić.

[Kahras]

czyli jak to zrobic?

[Sopelek997]

Tak jak ci napisali, tylko najpierw trzeba włączyć mózg i nauczyć się programować, żeby wiedzieć jak to działa.

[MistrzMaster]

Zależy do czego ma służyć ten program...

Jeśli tylko i wyłącznie do odczytywania adresów to po prostu daj wczytać gui i zapętl pobieranie/odczytywanie adresów.

[IZZER4]

Po pierwsze ; Musisz to dac w glownej petki programu - Autoit nie obsluguje wielowatkowosci.

Po Drugie ; I co z tego ze odczytales skoro nie zmieniles wartosci w gui - GUICtrlSETdata

Po trzecie ; 

$proces = ProcessExists("Tibia.exe") ; sprawdza czy istnieje proces

 

I co z tego ze sprawdza? Musisz dodac if;

 

If $proces = 1 Then 

$proces2 = _MemoryOpen($proces)

$HP2 = _MemoryRead($HP, $proces2)

GUICtrlSETdata($Label1,$HP2)

Endif

[Kahras]

Mam tak i updatuje to adresy co 3 sekundy tylko jak chce wyłączyć program na:

"X" to się nie chce wyłączyć 

GUISetState(@SW_SHOW)
; -------- Mana -----------
While 1
$MP=0x05C682C
$procesMP = ProcessExists("Tibia.exe") ; sprawdza czy istnieje proces
$proces2MP = _MemoryOpen($procesMP)
$MP2 = _MemoryRead($MP, $proces2MP)
$ManaLabel = GUICtrlCreateLabel("Mana: "&$MP2, 16, 45, 80, 17)
_MemoryClose($Proces2MP)
Sleep(3000)
WEnd

[IZZER4]

To sa wlasnie autoit

To dodajesz na poczatku skryptu;

GUIRegisterMsg(0x0112, "_WM_SYS_COMMAND")

 

Func _WM_SYS_COMMAND($hWnd, $iMsg, $wParam, $lParam)

Switch $hWnd

Case $Form1

Switch $wParam

Case 0xf060

ConsoleWrite("!Exit pressed" & @LF)

Exit

EndSwitch

EndSwitch

EndFunc   ;==>_WM_SYS_COMMAND

 

Lepsze sa timery ; 

$starttime = _Timer_Init()

While 1

If _Timer_Diff($starttime) >= 3000 Then
$MP=0x05C682C
$procesMP = ProcessExists("Tibia.exe") ; sprawdza czy istnieje proces
$proces2MP = _MemoryOpen($procesMP)
$MP2 = _MemoryRead($MP, $proces2MP)
$ManaLabel = GUICtrlCreateLabel("Mana: "&$MP2, 16, 45, 80, 17)
_MemoryClose($Proces2MP)

_Timer_KillTimer($form1,$starttime)

$starttime = _Timer_Init()
EndIf
WEnd

 

 

Wiesz co Petla nie jest nawet tutaj potrzebna ;

 

$id = _Timer_SetTimer($form1,3000,"hp") ; Co 3s bedzie wywolywac funkcje.

 

func hp ()

$MP=0x05C682C

$procesMP = ProcessExists("Tibia.exe") ; sprawdza czy istnieje proces

If $procesMP = 1 Then
$proces2MP = _MemoryOpen($procesMP)
$MP2 = _MemoryRead($MP, $proces2MP)
$ManaLabel = GUICtrlCreateLabel("Mana: "&$MP2, 16, 45, 80, 17)
_MemoryClose($Proces2MP)

EndIf

Endfunc

[Kahras]

Dziala =]

[IZZER4]

Jak bedziesz mial jeszce jakis problem to wal smialo

[lokuxd]

pod jaka to tibie? i skad wziales adresy hp i many?

[VereX.]

pod jaka to tibie? i skad wziales adresy hp i many?

Pewnie Cheat Enginem