(Help) Kode ComboBox For Karakter in v.b

[aboelgood]

Need kode in v.b How do karakter in ComboBox

 

[Mr.BullS]

If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If

 

[Hileli Oyun]

 

[aboelgood]

If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Pointer-----------------------------
End If

ok but karakter pointer is lot of adress.....
Example
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Dim text As String = Me.FlameTextBox1.Text

WritePointerInteger("wolftü.bin", Label1.Text + &H7000E8, "30243", &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H701090, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H70132C, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700DF4, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7008BC, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700620, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H70280C, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H702570, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7022D4, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H702038, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700B58, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700384, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7015C8, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H701D9C, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7022D4, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H701B00, '30243', &H14)


That's true??

 

[Hileli Oyun]

ok but karakter pointer is lot of adress.....
Example
If ComboBox1.Text = "ComboBox"Taki Yazı" = True Then
Dim text As String = Me.FlameTextBox1.Text

WritePointerInteger("wolftü.bin", Label1.Text + &H7000E8, "30243", &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H701090, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H70132C, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700DF4, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7008BC, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700620, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H70280C, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H702570, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7022D4, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H702038, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700B58, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H700384, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7015C8, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H701D9C, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H7022D4, '30243', &H14)
WritePointerInteger("wolftü.bin", Label1.Text + &H701B00, '30243', &H14)


That's true??

these pointer addresses may be old.

 

[aboelgood]

these pointer addresses may be old.

Ya I Know this Example
true?

 

[Hileli Oyun]

materials :
1 unit timer

Timer properties :
Enabled = True

Timer code :
On Error Resume Next
If ComboBox1.Text = ("elwerici") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Elwerici
End If

If ComboBox1.Text = ("ETSR") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") ETSR
End İf

If ComboBox1.Text = ("Legend") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Legend
End İf
If ComboBox1.Text = ("UZAS") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Uzas

End İf

 

[myhacker123]

olmuyo

 

[Hileli Oyun]

olmuyo

Timer kodunuda ekliyeceksin

 

[myhacker123]

tmm

 

[aboelgood]

tmm

 

[Hileli Oyun]

tmm

materials :
1 unit timer

Timer properties :
Enabled = True

Timer code :
On Error Resume Next
If ComboBox1.Text = ("elwerici") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Elwerici
End If

If ComboBox1.Text = ("ETSR") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") ETSR
End İf

If ComboBox1.Text = ("Legend") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Legend
End İf
If ComboBox1.Text = ("UZAS") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Uzas

End İf

 

[aboelgood]

materials :
1 unit timer

Timer properties :
Enabled = True

Timer code :
On Error Resume Next
If ComboBox1.Text = ("elwerici") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Elwerici
End If

If ComboBox1.Text = ("ETSR") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") ETSR
End İf

If ComboBox1.Text = ("Legend") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Legend
End İf
If ComboBox1.Text = ("UZAS") Then
WriteLong("wolftü.bin", label1.Text + &H35AB80, "2251829620") Uzas

End İf

but need karakter

 

[Hileli Oyun]

but need karakter

character is encoded in this way. You will find pointer addresses and you will find a search on the site.

 

[aboelgood]

character is encoded in this way. You will find pointer addresses and you will find a search on the site.

tmm