[TUT][VB.NET] Jak stworzyć trainer do WarRock

[3po3]

Mam pytanie zrobilem opcje Glass Wall ale nie wiem co mam zle bo wchodzac do gry opcja sama sie wlacza a nie za pomoca middle mouse i nie da sie jej wylaczyc

 

Zastosowanie w Timer:

 

If GetAsyncKeyState(4) Then

WriteMemory(&HB3E778, 1, 4)

Else

WriteMemory(&HB3E778, 0, 4)

End If

[jaxD]

glasswalls juz chyba tym nie wylączysz

[Propagandhi]

Mam pytanie zrobilem opcje Glass Wall ale nie wiem co mam zle bo wchodzac do gry opcja sama sie wlacza a nie za pomoca middle mouse i nie da sie jej wylaczyc

 

Zastosowanie w Timer:

 

If GetAsyncKeyState(4) Then

WriteMemory(&HB3E778, 1, 4)

Else

WriteMemory(&HB3E778, 0, 4)

End If

 

Spróbuj w ten sposób:

 

        If GetAsyncKeyState(4) Then
            WriteMemory(&HB3E778, 0, 4)
        Else
            WriteMemory(&HB3E778, 1166127104, 4)
        End If

 

A jak to nie pomoże, to spróbuj z innym przyciskiem.

[jaxD]

Ja mam pytanie do OPK:

nop(&hadres1 , 1 ,4 ) on

nop(&hadres2 , 1 ,4 ) on

nop(&hadres3 , 1 ,4 ) on

nop(&hadres4 , 1 ,4 ) on

 

nop(&hadres1 , 0 ,4 ) off

nop(&hadres2 , 0 ,4 ) off

nop(&hadres3 , 0 ,4 ) off

nop(&hadres4 , 0 ,4 ) off

 

 

I nie dziala ..Proszę o pomoc

[Propagandhi]

Ja mam pytanie do OPK:

nop(&hadres1 , 1 ,4 ) on

nop(&hadres2 , 1 ,4 ) on

nop(&hadres3 , 1 ,4 ) on

nop(&hadres4 , 1 ,4 ) on

 

nop(&hadres1 , 0 ,4 ) off

nop(&hadres2 , 0 ,4 ) off

nop(&hadres3 , 0 ,4 ) off

nop(&hadres4 , 0 ,4 ) off

I nie dziala ..Proszę o pomoc

 

Nie działa, mało tego - nie ma prawa tego skompilować, bo NOP pobiera tylko dwa argumenty (adres i jednobajtowa wartość do nadpisania) a Ty masz 3. Zerknij jak wcześniej się to zapisywało poprawnie. A na przyszłość nie kompilujcie kodu w którym pojawiają niebieskie zygzaki, bo to znaczy, że coś jest z nim nie tak. Niżej jest też konsola z błędami i jeśli przy kompilacji pojawi się jakiś zaznaczony na czerwono to znaczy, że tak naprawdę nic nie zrobiliśmy.

 

P.S.: Nie pytajcie o VIPy, bo dostanie mi się w końcu od administracji.

[mato95]

Mam problem z no recoil, qiuck spawn i boxami. Moze ktos wie w czym mam blad

 

IADSVQCNLD(&HB23702, 1, 4) <-- Box

 

IADSVQCNLD(&HDA01C8, 0, 4) <-- Spawn1

IADSVQCNLD(&H10D9014, 0, 4) <-- Spawn2

 

IADSVQCNLD(&H1395200, &H2DC, 0) <-- Recoil1

IADSVQCNLD(&H1395200, &H2E0, 0) <-- Recoil2

IADSVQCNLD(&H1395200, &H2E4, 0) <-- Recoil3

 

 

[jaxD]

Mam problem z no recoil, qiuck spawn i boxami. Moze ktos wie w czym mam blad

 

IADSVQCNLD(&HB23702, 1, 4) <-- Box

 

IADSVQCNLD(&HDA01C8, 0, 4) <-- Spawn1

IADSVQCNLD(&H10D9014, 0, 4) <-- Spawn2

 

IADSVQCNLD(&H1395200, &H2DC, 0) <-- Recoil1

IADSVQCNLD(&H1395200, &H2E0, 0) <-- Recoil2

IADSVQCNLD(&H1395200, &H2E4, 0) <-- Recoil3

 

Instant Spawn :

WriteMemory(&HADR_QUICKSPAWN1, Wartość, Bajty)

 

a nie jak u Ciebie jezeli sie nie myle WriteFloatPointer

[mato95]

Instant Spawn :

WriteMemory(&HADR_QUICKSPAWN1, Wartość, Bajty)

 

a nie jak u Ciebie jezeli sie nie myle WriteFloatPointer

 

Ok masz u mnie 5* bardzo mi pomogles

[jaxD]

Ok masz u mnie 5* bardzo mi pomogles

Proszę Bardzo i polecam sie na przyszłość

[jaxD]

Przydalby sie jeszcze TuT jak zrobic bypassa...

 

Edit:

Sry zapomnialem zrobic edit w tamtym temacie i przez pomylke zrobilem nowy post ..

[Propagandhi]

Przydalby sie jeszcze TuT jak zrobic bypassa...

 

Edit:

Sry zapomnialem zrobic edit w tamtym temacie i przez pomylke zrobilem nowy post ..

 

Nie jest to bajpas, ale trochę spacyfikuje punkbustera:

 

1) Wyłączanie PnkBstrA: przyciski "on", "off" i timer

 

Można go śmiało wyłączyć. Zdaje się, że skanuje dysk w poszukiwaniu hacków. Najlepiej jednak wrzucić kod do timera z jakimś większym interwałem np 60000 milisekund, żeby go wyłączał co minute, bo punkbuster sprawdza co jakiś czas, czy PnkBstrA działa i uruchamia go ponownie.

 

Wprowadz do timera:

Shell("taskkill /F /IM PnkBstrA.exe")

 

2) Zmiana priorytetu procesu w przypadku PnkBstrB: tylko przycisk "On"

 

PnkBstrB jest najbardziej upierdliwy i zdaje się skanuje pamięć. Nie można go wyłączyć, bo będzie nas wykopywało z gry, ale można zmienić priorytet jego procesu. Co to znaczy? Znaczy to tyle, że jeśli procesor będzie zajęty innymi aplikacjami, to najpierw zajmie się tymi z wyższym priorytetem a dopiero potem tymi z niższym.

 

Wprowadź do przycisku:

       
Dim myProcess As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("PnkBstrB")
If myProcess.Length <> 0 Then
   System.Diagnostics.Process.GetProcessById(myProcess(0).Id).PriorityClass = System.Diagnostics.ProcessPriorityClass.Idle
   Else
   MsgBox("PnkBstrB nie jest włączony")
End If

"Idle" w kodzie oznacza najniższy z możliwych priorytetów.

 

3) Czyszczenie dysku z podejrzanych dla punkbustera plików: przycisk "On"

 

Do tej metody jestem najmniej przekonany, szczególnie po wyłączeniu PnkBstrA, ale ludzie sobie chwalą "bypasy" bazujące na tej metodzie, więc zamieszczam.

 

W przycisku:

Shell("czysc.bat 0 0")

 

Teraz musimy stworzyć plik czysc.bat:

 

- otwierasz notatnik

- wklejasz dosowe komendy:

@echo off
del /s /f /q c:\windows\temp\*.*
rd /s /q c:\windows\temp
md c:\windows\temp
del /s /f /q C:\WINDOWS\Prefetch
del /s /f /q %temp%\*.*
rd /s /q %temp%
md %temp%
deltree /y c:\windows\tempor~1
deltree /y c:\windows\temp
deltree /y c:\windows\tmp
deltree /y c:\windows\ff*.tmp
deltree /y c:\windows\history
deltree /y c:\windows\cookies
deltree /y c:\windows\recent
deltree /y c:\windows\spool\printers
del c:\WIN386.SWP
cls

 

Zapisujesz plik w katalogu z hackiem, który będzie go uruchamiał i zmieniasz rozszerzenie z .txt na .bat, albo od razu go zapisujesz do .bat

 

Możesz też

Shell("czysc.bat 0 0")

wrzucić do timera z jakimś dużym interwałem, żeby się uruchamiał, co jakiś czas

 

4) Jest ambitniejszy sposób, choć go nie próbowałem, to wierze że będzie skuteczny:

 

Tu jest przykład zastosowania pewnej metody (prezentacja PowerPoint) w grze BattleField Vietnam: DOWNLOAD , SKAN

 

Można to zrobić za pomocą CE, ale dopiero jak znajdę więcej czasu to się pobawię i wyjaśnię co i jak.

[jaxD]

Ok dzieki Ci bardzo ....Jestes super...

[3po3]

Wielkie Dziekie znowu mi pomogles

[jaxD]

Wielkie Dziekie znowu mi pomogles

Chyba znow nam pomógł

 

Ja prosze a wy korzystacie :DD

[kilo_kartofli]

Dim myProcess As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("PnkBstrB")

If myProcess.Length <> 0 Then

System.Diagnostics.Process.GetProcessById(myProcess(0).Id).PriorityClass = System.Diagnostics.ProcessPriorityClass.Idle

Else

MsgBox("PnkBstrB nie jest włączony")

End If

wiesz może jak w VB6 by było?

[Propagandhi]

wiesz może jak w VB6 by było?

 

W VB6 chyba nie ma tej klasy, ale da się to też zrobić za pomocą funkcji API.

 

Tu jest jeden przykład: link

[Lukazuki]

mam taki problem wszystko działa gram na starym hacku nie kickuje i nie ma bana ale dało by sie coś zrobić z wyłączeniem PnkBstrB bo jak to właczam to wyskakuje kilkanaście okienek na raz i tak bez przerwy bo chodzi mi oto żeby było ich mniej da sie coś zrobić z tym ?? Czy tak musi być ??

 

i jak zrobić ten interwał bo nieczaje jak go zrobić oto z nim chodzi bo niewiem

 

Interval = 60000 --- Enabled = False

 

bo jak to wpiuje to podkreśla to na niebiesko i niedziała co jest żle w tym

[Propagandhi]

mam taki problem wszystko działa gram na starym hacku nie kickuje i nie ma bana ale dało by sie coś zrobić z wyłączeniem PnkBstrB bo jak to właczam to wyskakuje kilkanaście okienek na raz i tak bez przerwy bo chodzi mi oto żeby było ich mniej da sie coś zrobić z tym ?? Czy tak musi być ??

 

i jak zrobić ten interwał bo nieczaje jak go zrobić oto z nim chodzi bo niewiem

 

Interval = 60000 --- Enabled = False

 

bo jak to wpiuje to podkreśla to na niebiesko i niedziała co jest żle w tym

 

Interwał zmieniasz w okienku "Properties" po tym, jak klikniesz na timer raz. Domyślnie jest 100 milisekund. Można też w sposób jaki Ty próbowałeś, ale wtedy wyglądałoby to tak:

NazwaTwojegoTimera.Interval = JakaśTamWartość

.

 

W sumie można i w 3 sposób, chyba najlepszy. Instrukcję warunkową która sprawdza, czy PnkBstr jest włączony można zrealizować jeszcze w przycisku, zanim włączysz interwał:

 

Dim myProcess As System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("PnkBstrA") ' albo PnkBstrB - zalezy co checesz zrobic 
If myProcess.Length = 0 Then 'jeśli tablica jest pusta, czyli jeśli proces nie jest włączony, to...
MsgBox("PnkBstrA nie jest włączony") '...komunikuj, że nie jest włączony
Else ' w innym wypadku...
NazwaNaszegoTimera.Enabled = True '...uruchom timer
End If

 

a w timerze już tylko instrukcję, którą musi wykonać.

 

P.S.: Nie wyłączaj PnkBstrB, bo będziesz miał kicki :P

[jaxD]

Twoj sposob na wylaczenie pb nie dziala ... nadal sa kicki...

[kilo_kartofli]

to nie daje 100% gwarancji ze nie dostaniesz kicka czy bana

[Propagandhi]

Dokładnie jak wyżej - nie jest to bajpas, ale utrudnia robotę PB. Ktoś kiedyś ładnie zwizualizował, że bajpas powinien być jak tunel w górze. Góra to PB, za nią jest gra a to, co przejeżdża tunelem, to hacki. Metody, które opisałem bardziej próbują rozwalić górę, niż przejechać tunelem, dlatego nigdy nie będą w 100% skuteczne. Dzięki temu jednak mogę trochę dłużej popracować z CE bez bana.

 

Przyszło mi też do głowy, że skoro PB daje kicki dopiero po jakimś czasie, to może dlatego, że skanuje pamięć obszarami. Możecie spróbować np ustawić hotkey dla jakiejś kickującej opcji i włączać ją tylko gdy jest potrzebna a resztę czasu niech będzie wyłączona.

[kilo_kartofli]

dlatego np:super jump który podskakuje wysoko tak nie rzadko kickuje po zmienia na 1 sek

[bogdanzgazowni]

Help

Probuje juz 2 godziny a tu dupa.

Nijak nie moge wpasc na sposob robienia INVI. Pliiis help

jak nie w topicu to chociaz na PW. A Invi chcem umiescic w hacku(zobacz w Warrock, nowy topic)

Bardzo prosze(jak nie to chociaz wzkazowke mala)Pliiiis

[kilo_kartofli]

NIE dawać INFORMACJI O VIP HACKACH pierw invi a potem proszę o OPK tak się dzieje jak ktoś daje turiala al ludu robi hacki nie wiedząc co robi i czeka na gotowce pewnie probowałeś z WriteMemory i wartość 1 nie ? to mam dla ciebie podpowiedz źle lepiej zapytać na forum niż poszukać na google nie ?

[Gość KrZySiEqq xDD]

bogdan napisz dokładnie o co ci chodzi

 

@edit sory jak cos to gg znasz