Help Freezing a value

[TheCodKingz10]

Say im making a trainer for a game, and i want to freeze the value of ammo.
i can set the ammo to 999 ( memoryh4x(&H176C8B8, 999, 4))
but i have no idea how to keep it from going to 998 when i shoot. someone please help! thanks guys

[surtek]

Code:

for(;;){
value1 = 999;
wait 0.5
}

This code will make your ammo 999 each half second. Value1 needs to be changed to the ammo code.

[TheCodKingz10]

Code:

for(;;){
value1 = 999;
wait 0.5
}

This code will make your ammo 999 each half second. Value1 needs to be changed to the ammo code.

thats c++ i need VB

[JariZ]

@TheCodKingz10 That's not C++
@surtek He's talking about a trainer, Not GSC

I coded VB a few years ago but i really cant remember anything, sorry

[barata]

Well just use a loop like:

Code:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
While 1
( memoryh4x(&H176C8B8, 999, 4))
End While
End Sub

I hope i helped you xD

[TheCodKingz10]

Well just use a loop like:

Code:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
While 1
( memoryh4x(&H176C8B8, 999, 4))
End While
End Sub

I hope i helped you xD

im trying to link this to a check box :/ so this kinda helped...but uh do you know how i could get it to work with a check box? this is what i have to work with


Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBoxHealth.CheckedChanged
If CheckBoxHealth.Checked = True Then
memoryh4x(&H176C8B8, 999, 4)
Else
memoryh4x(&H176C8B8, 100, 4)
End If
End Sub

[barata]

Well just use a loop like:

Code:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
While 1
( memoryh4x(&H176C8B8, 999, 4))
End While
End Sub

I hope i helped you xD

im trying to link this to a check box :/ so this kinda helped...but uh do you know how i could get it to work with a check box? this is what i have to work with


Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBoxHealth.CheckedChanged
If CheckBoxHealth.Checked = True Then
memoryh4x(&H176C8B8, 999, 4)
Else
memoryh4x(&H176C8B8, 100, 4)
End If
End Sub

You need to use a loop like: For, While... so the value will always updated.

[TheCodKingz10]

Well just use a loop like:

Code:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
While 1
( memoryh4x(&H176C8B8, 999, 4))
End While
End Sub

I hope i helped you xD

im trying to link this to a check box :/ so this kinda helped...but uh do you know how i could get it to work with a check box? this is what i have to work with


Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBoxHealth.CheckedChanged
If CheckBoxHealth.Checked = True Then
memoryh4x(&H176C8B8, 999, 4)
Else
memoryh4x(&H176C8B8, 100, 4)
End If
End Sub

You need to use a loop like: For, While... so the value will always updated.

can you explain that to me? im REALLY new to VB

[barata]

Well just use a loop like:

Code:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
While 1
( memoryh4x(&H176C8B8, 999, 4))
End While
End Sub

I hope i helped you xD

im trying to link this to a check box :/ so this kinda helped...but uh do you know how i could get it to work with a check box? this is what i have to work with


Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBoxHealth.CheckedChanged
If CheckBoxHealth.Checked = True Then
memoryh4x(&H176C8B8, 999, 4)
Else
memoryh4x(&H176C8B8, 100, 4)
End If
End Sub

You need to use a loop like: For, While... so the value will always updated.

can you explain that to me? im REALLY new to VB

A loop is a code that executes other codes a lot of times or infinite times,
For i = 1 to 9999 Step 1(loop code)
memoryh4x(&H176C8B8, 999, 4)
Next

I Think that is the code.

[TheCodKingz10]

Well just use a loop like:

Code:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
While 1
( memoryh4x(&H176C8B8, 999, 4))
End While
End Sub

I hope i helped you xD

im trying to link this to a check box :/ so this kinda helped...but uh do you know how i could get it to work with a check box? this is what i have to work with


Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBoxHealth.CheckedChanged
If CheckBoxHealth.Checked = True Then
memoryh4x(&H176C8B8, 999, 4)
Else
memoryh4x(&H176C8B8, 100, 4)
End If
End Sub

You need to use a loop like: For, While... so the value will always updated.

can you explain that to me? im REALLY new to VB

A loop is a code that executes other codes a lot of times or infinite times,
For i = 1 to 9999 Step 1(loop code)
memoryh4x(&H176C8B8, 999, 4)
Next

I Think that is the code.

thanks dude! the code works and everything but im still having one MAJOR problem, once i click the checkbox now, my ammo DOES stay at 999 BUT the trainer stops responding!! what do i do now?!