krzaczekqqqq

dziala ale ztrzeba robic wszystko z uwaga i rozwaznie.

nie nie na tej zasadzie ze pier... bo nie dam rady... i nie typowy polaczek.... powiem wam dlaczego.... akurat do tego czego wykorzystuje podany kod nie przepuszczaja blokady danego procesu i nieda sie jak narazie tego pzreskoczyc na danym oesie ktorym uzywam... ale na innych moze isc i jestem pewien ze idzie. wiec mozecie korzystac przerabiac i próbowac... ja sobie dam rade.... w przeciwienistwie do innych... typowych polaczkow.

minusa nikomu nie dalem a skad sie znalazy tam gdzie sa zapytaj innych gosci na tym forum. Ktos inny sobie robi jaja specjalnie.. szczerze mam gdzies te plusy i minusy bo do szczescia one nie sa mi potzrebne. po niektorych widac ze to typowe polaczki. a problem został rozwiazany.

4ggr35510n zrobilem jak mowiles ale to tez nic nie daje. ma ktos moze jeszce jakeis pomysly..

nie wiem czemu sie tak czegos przyczepiliscie pointerow czy adresow bazowych jak wszystko jest podane w formie przykladu a do czego pozniej sobie wykorzystuje rozwiazanie to jest inna sprawa... czy do 4story czy do innej gry bo potrafie pozmieniac te rzczey na swoje potzreby.. wiec nie pisz tak jak bym byl. niedorozwiniety bo to jest forma przykladu a nie konkretnej gry. a to ze sa podobne adresy to jest akurat dla mnie nie wazne. To jest tylko przyklad dodatko zmienie ci w przykladzie zeby nie bylo ze to 4stry czy inna gra...

mam i pointer i ofset adres dynamiczny specjalnie jeszce sprawdzam na CE game.exe=przyklad gry a nie konkretnie diablo bo dia to nie jest calu krotki kodzik. na ktorym widac wszystko #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <Memory.au3> #include <NomadMemory.au3> #RequireAdmin #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("hack", 253, 36, 200, 122) $Button1 = GUICtrlCreateButton("On", 160, 8, 25, 17, $WS_GROUP) GUICtrlSetFont(-1, 8, 400, 0, "Palatino Linotype") $Button2 = GUICtrlCreateButton("Off", 192, 8, 25, 17, $WS_GROUP) GUICtrlSetFont(-1, 8, 400, 0, "Palatino Linotype") $Input1 = GUICtrlCreateInput("", 80, 8, 73, 19) GUICtrlSetFont(-1, 6, 400, 0, "Palatino Linotype") $Label1 = GUICtrlCreateLabel("hack", 8, 8, 58, 20) GUICtrlSetFont(-1, 8, 400, 0, "Palatino Linotype") $Graphic1 = GUICtrlCreateGraphic(224, 8, 25, 17) GUICtrlSetColor(-1, 0x000000) GUICtrlSetBkColor(-1, 0xFF0000) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Global $Open_Process_ = _MemoryOpen(ProcessExists("przkladowa_gra.exe")) Global $Baseadresse = 0xprzykladowy_dares_bazowy ;adres podstawowy basowy Dim $hack[3] $hack[0] = 0 $hack[1] = 0xtakisobie_pointer1; pointer $hack[2] = 0xtakisobie_pointer2 While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 AdlibRegister("_hack1", 20) ;GUICtrlSetBkColor($Graphic1, 65280) _MemoryClose($Open_Process_) ;_Casten() Case $Button2 AdlibUnRegister("_hack1") _MemoryPointerWrite($Baseadresse,$Open_Process_,$hack, wartosc_podstawowa) _MemoryClose($Open_Process_) ;GUICtrlSetBkColor($Graphic1, 16711680) EndSwitch WEnd Func _hack1() _MemoryPointerWrite($Baseadresse,$Open_Process_,$hack, wartosc_zmieniona) EndFunc Func _Casten() ControlSend("jaks_tam_sobie_gra", "", 0, "{F12}") EndFunc

wielce to minie pomogles bo o tym co napisales to wiem i uzywam tego... niewiem czy wogole patrzyles na przykladowy kod. czy tylko od tak sobie posta napisales.

sam baypas tez nidziala i niewiem czy wogole dzialal

A minowicie mam o to taki kawalek kodu i nie wiem czemu nie moge zapisac do konkretnego adresu pamieci mjej wartosc. moze by mi ktos podpowiedzial co robie zle bo jestem w martwym punkcie. $GamePid1= ProcessExists ("game.exe") $GameHandle1 = _MemoryOpen($GamePid1) $BaseAdresse1 = 0xab565566 Dim $costam[3] $costam[0] = 0 $costam[1] = 0x111 $costam[2] = 0x22 While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 AdlibRegister("$hack", 20) GUICtrlSetBkColor($Graphic1, 65280) Case $Button2 AdlibUnRegister("_hack") _MemoryPointerWrite($BaseAdresse1,$GameHandle1,$costam, 9999) GUICtrlSetBkColor($Graphic1, 16711680) EndSwitch WEnd Func _hack() _MemoryPointerWrite($BaseAdresse1,$GameHandle1,$costam, GUICtrlRead($Input1)) GUICtrlSetBkColor($Graphic1, 65280) EndFunc

Dzieki serdeczne za pomoc. Szukalem czegos takiego lecz jakos to pzreoczylem. Teraz skrypcik. dziala tak jak chce. otwiera plik kasuje linie zamyka i otwiera. i tak az do konca pliku pliku. + dla Ciebie.

Witam. jestem troche zielony w programowaniu wiec prosze was o pomoc. Mam plik dane.txt a w nim 200 lini wrazow. Mianowicie chodzi mi o to aby za kazdym razem kiedy petla odczyta linie i wykona swoje dziłlenie skasowała przeczytana linie. Tak aby kiedy programik skonczy dzilanie w pliku dane.txt nie zostala ani jedna zapisana linia.. wtedy program automatycznie sie wylacza. oto kod petli jak mam do wykonania operacji na tym pliku. prosze o jakas wskazowke lub pomoc w rozwinieciu tego kodu. $file = FileOpen("dane.txt", 0) If $file = -1 Then MsgBox(16, "Błąd!", "Nie mogę otworzyć pliku z danymi! Kończę skrypt.") Exit EndIf ; odczytujemy plik w petli While 1 For $n=1 to 200 $nick = FileReadLine($file) ; odczyt wiersza z pliku If @error = -1 Then ExitLoop(2); jesli osiagnieto koniec pliku wyjscie z (dwoch) petli Send("^t") Sleep(3000) Send("cos") Send("{ENTER}") Sleep(3000) MouseClick("", 550, 450) Sleep(3000) Send("{TAB}") Sleep(3000) Send($nick) Sleep(3000) Send("{ENTER}") Sleep(3000) Send("^w") Sleep(500) Next Sleep(500) WEnd FileClose($file) ;