VB Trainer

[DNA]

Werd's mir heute Abend mal anschauen.

[DNA]

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]

[DNA]

Hat's funktioniert?

[Struppi]

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.