[VB] Pointer+Offset Einbinden

Guten Tag Alle Zusammen !

Folgendes Problem :
Wie Baue ich diesen Pointer von CheatEngine in Mein Visual Basic EIn!
[Only registered and activated users can see links. Click Here To Register...]

Hier Code von VB da IST KEI POINTER DA IST EINFACH DIE NORMALER ADRESSE ABER WIE BAUE Ich den POINTER und offset ein ?

Quote:

Public Class Form1 Private Const ProcName = "Solitaire" Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click GetProcessId(ProcName) Dim munni As Integer munni = Read_Long(&H15A2F4) munni = munni + 500 Write_Long(&H15A2F4, munni) Button5.BackColor = Color.Lime Button3.Visible = False Button4.Visible = True End Sub

Repodet#

Du solltest erstmal wissen, was ein Pointer ist.

base auslesen -> offset addieren -> erneut auslesen

Wie Meinst du das Genau Da ist Screnn von Cheat Engine diese DINGE ergeben zzusammen den POINTER! Aber wie füge ich das in mein VB Code ein xD!

Quote:

Originally Posted by LittleChaos Wie Meinst du das Genau Da ist Screnn von Cheat Engine diese DINGE ergeben zzusammen den POINTER! Aber wie füge ich das in mein VB Code ein xD!

Wow, du bist noch unfähiger als ich dachte.

Wenn du Ja so schlau Bist dan sag mir ma den Pointer xD Und wie mann den rein macht.... Vll lern ich was aus deinem Code oder Gib mir einen link zu einen tut wie ich den pointer in vb einbaue xD

Quote:

Originally Posted by MoepMeep Du solltest erstmal wissen, was ein Pointer ist.

Mehr gibts da einfach nicht zu sagen.

Quote:

Originally Posted by mydoom Mehr gibts da einfach nicht zu sagen.

Ich mach euch die Freude kaputt und versuche das noch mal ein bischen ausführlicher zu erklären ;)

Alles was du machen must ist wie MoepMeep schon sagte:
base auslesen -> offset addieren -> erneut auslesen

Die base in deinem Fall ist : 0x0079009C
Diese liest du aus und zwar 4-Byte und im Hex Format (kanste später noch umwandeln)
Das Ergibt: 0x023EC638
Nun wird das Offset dazu gerechnet also: 0x023EC638 + 0xC = 0x023EC644

Ab hier beginnt wieder alles von vorne...

0x023EC644 auslesen: 0x023EBD48
0x023EBD48 + 0x18 = 0x023EBD60

Fertig...
Das ist nun deine Adresse: 0x023EBD60

So nun hab ich erklärt was du in Bild (CE Bild) siehst...
Wenn du die Grundlagen, um diese Schritte ausführen zu können, nicht kennst, entäuschst du mich und ich werde in Zukunft keinem 0815 Noob mehr irgendetwas dazu erklären...


Eines möchte ich aber noch wissen:

Quote:

Originally Posted by LittleChaos Bitte Antworten! Repodet#

was wilst du damit bezwecken?
Ich hoffe du weist wie mit der Report-funktion umzugehen...!!!

Ein Sehr Großes Danke Sehr ! an:-AmA-

Ich Habs Verstanden.
Und ja das sollte die Repodet# funktion sein Aber .
Ich Binn Ein Dummi ich hatte nicht viel zeit und habs einfach hin gepostet xD
Aber Egal Danke SEHR!!!!!!

Quote:

Originally Posted by LittleChaos Ein Sehr Großes Danke Sehr ! an:-AmA- Ich Habs Verstanden. Und ja das sollte die Repodet# funktion sein Aber . Ich Binn Ein Dummi ich hatte nicht viel zeit und habs einfach hin gepostet xD Aber Egal Danke SEHR!!!!!!

Immer doch...:)

1. Lezte Dumme Frage.
Wie füge ich das in mein VB Code ein Geht ürgend wioe nicht module hab ICH!

Quote:

Originally Posted by LittleChaos 1. Lezte Dumme Frage. Wie füge ich das in mein VB Code ein Geht ürgend wioe nicht module hab ICH!

Naja... was geht nicht? Debuggen...

Guten Tag

Folgendes wen ich jezt in Mein VB Code den Pointer eingebe Wie in dem Code da Unten wird x23EBD60 Blau unterringelt warum ?
brauche ich ein Andres modul wen kann eienr posten xD
Aber normale adresse funzen nur pointer nicht

Quote:

Public Class Form1 Private Const ProcName = "Solitaire" Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click GetProcessId(ProcName) Dim munni As Integer munni = Read_Long(&H0x23EBD60) munni = munni + 500 Write_Long(&H15A2F4, munni) Button5.BackColor = Color.Lime Button3.Visible = False Button4.Visible = True End Sub

was du machst:
munni = Read_Long(&H0x23EBD60)

was ich mache (aber eigentlich nicht in VB):
munni = Read_Long(&H23EBD60)

für ein neues Modul: Google
für weitere Fragen: nicht ich

&H0x23EBD60 funktioniert so nicht. Dann muss es &H23EBD60 lauten.