![]() |
VB Trainer - Druckversion +- Home of Gamehacking - Archiv (http://archiv-homeofgamehacking.de) +-- Forum: Coding (http://archiv-homeofgamehacking.de/forumdisplay.php?fid=15) +--- Forum: Visual Basic 6, VB.NET (http://archiv-homeofgamehacking.de/forumdisplay.php?fid=19) +--- Thema: VB Trainer (/showthread.php?tid=969) |
RE: VB Trainer - DNA - 12.04.2012 Werd's mir heute Abend mal anschauen. RE: VB Trainer - DNA - 12.04.2012 So, nimm mal den Code hier: [code=VB]Dim Tele as New Teleporter Dim Stromkasten as New Teleporter Stromkasten.XKoord = -1006153898 Stromkasten.YKoord = 1151608972 Stromkasten.ZKoord = -1048707072 Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick If GetAsyncKeyState(VK_Numpad3) Then GetProcessId(ProcName) Tele = Read_Koord(Telepointer, &H1C08B64, 0) ElseIf GetAsyncKeyState(VK_Numpad4) Then GetProcessId(ProcName) If Not Tele.XKoord = 0 Then Write_Koord(Telepointer, H1C08B64, 0, Tele) System.Threading.Thread.Sleep(500) End If ElseIf GetAsyncKeyState(VK_Numpad5) Then GetProcessId(ProcName) Write_Koord(Telepointer, H1C08B64, 0, Stromkasten) System.Threading.Thread.Sleep(500) End If[/code] RE: VB Trainer - DNA - 13.04.2012 Hat's funktioniert? RE: VB Trainer - Struppi - 09.12.2012 So da bin ich wieder ![]() Ob es zu der darmaligen Zeit funktionierte, kann ich nicht mehr sagen besser gesagt bin ich nicht mehr dazu gekommen... hatte PC probleme und halt alle Daten verloren. Nun fang ich wieder von vorne an! Teleportpositionen trage ich fest im Trainer ein, beispiel Stromkasten position + Pack A Punch position... zu diesen positionen zu Porten funktioniert ja aber habe es noch nicht geschafft das ingame aktuelle position gespeichert wird und diese dann auf eine tastenbelegung wieder zuladen. |