ItsMods - Freezing a value

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 Wink

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.

(08-20-2011, 23:49)surtek Wrote: [ -> ]
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

@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 Sad

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

(08-21-2011, 01:11)barata Wrote: [ -> ]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

(08-21-2011, 01:58)TheCodKingz10 Wrote: [ -> ]
(08-21-2011, 01:11)barata Wrote: [ -> ]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.

(08-21-2011, 02:00)barata Wrote: [ -> ]
(08-21-2011, 01:58)TheCodKingz10 Wrote: [ -> ]
(08-21-2011, 01:11)barata Wrote: [ -> ]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 Sad

(08-21-2011, 02:11)TheCodKingz10 Wrote: [ -> ]
(08-21-2011, 02:00)barata Wrote: [ -> ]
(08-21-2011, 01:58)TheCodKingz10 Wrote: [ -> ]
(08-21-2011, 01:11)barata Wrote: [ -> ]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.

(08-21-2011, 02:47)barata Wrote: [ -> ]
(08-21-2011, 02:11)TheCodKingz10 Wrote: [ -> ]
(08-21-2011, 02:00)barata Wrote: [ -> ]
(08-21-2011, 01:58)TheCodKingz10 Wrote: [ -> ]
(08-21-2011, 01:11)barata Wrote: [ -> ]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!! Sad

what do i do now?!