 |
Cheat Engine The Official Site of Cheat Engine
|
| View previous topic :: View next topic |
| Author |
Message |
bboy500 How do I cheat?
Reputation: 0
Joined: 14 Nov 2007 Posts: 3
|
Posted: Wed Nov 14, 2007 9:40 pm Post subject: Help in VB6.0 |
|
|
Im trying to make a WolfTeam trainer. And all the addresses are working perfectly on a cheat engine. And everything works out here as well | Code: | Private Sub Command1_Click()
Timer1.Interval = 1
Timer2.Interval = 1
End Sub
Private Sub Command2_Click()
Timer3.Interval = 1
Timer4.Interval = 1
Timer5.Interval = 1
End Sub
Private Sub Command3_Click()
Timer6.Interval = 1
End Sub
Private Sub Timer1_Timer()
Call Sftnyxsux("WolfTeam", &H342C9E8C, 6004)
End Sub
Private Sub Timer2_Timer()
Call Sftnyxsux("WolfTeam", &H342C9E98, 7003)
End Sub
Private Sub Timer3_Timer()
Call Sftnyxsux("WolfTeam", &H342C9EF0, 3002)
End Sub
Private Sub Timer4_Timer()
Call Sftnyxsux("WolfTeam", &H342C9EFC, 3013)
End Sub
Private Sub Timer5_Timer()
Call Sftnyxsux("wolfteam", &H342C9F10, 3)
End Sub
Private Sub Timer6_Timer()
Call Sftnyxsux("WolfTeam", &H34305704, 2500)
End Sub
Private Sub Timer7_Timer()
Call Sftnyxsux("wolfteam", &H11210CE4, 25)
End Sub
|
But when i try to activate hacks the buttons dont do anything. Can someone tell me what im doing wrong?
O yea im also using a warrock Module. Is that the reason?
|
|
| Back to top |
|
 |
atom0s Moderator
Reputation: 205
Joined: 25 Jan 2006 Posts: 8587 Location: 127.0.0.1
|
Posted: Thu Nov 15, 2007 12:12 am Post subject: |
|
|
Umm.. firstly, don't use timers like that. Set the interval properties inside the form editor and set the Enable property to false.
When you want to activate a timer, set the Enabled property to true. As for your code, a quick example for one of them:
| Code: | Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Call Sftnyxsux("WolfTeam", &H342C9E8C, 6004)
End Sub |
Next, I HIGHLY suggest you ditch all those timers and use booleans with 1 timer. There is no need to have that many timers in your program. Keep one, leave it active at all times, and add buttons to toggle booleans.
For example:
| Code: | Private bEnableCheat1 as Boolean
Private Sub Command1_Click()
bEnableCheat1 = IIf(bEnableCheat1, False, True)
End Sub
Private Sub Timer1_Timer()
If bEnableCheat1 = True
Call Sftnyxsux("WolfTeam", &H342C9E8C, 6004)
End If
End Sub |
_________________
- Retired. |
|
| Back to top |
|
 |
bboy500 How do I cheat?
Reputation: 0
Joined: 14 Nov 2007 Posts: 3
|
Posted: Fri Nov 16, 2007 10:51 am Post subject: |
|
|
| Wiccaan wrote: | Umm.. firstly, don't use timers like that. Set the interval properties inside the form editor and set the Enable property to false.
When you want to activate a timer, set the Enabled property to true. As for your code, a quick example for one of them:
| Code: | Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Call Sftnyxsux("WolfTeam", &H342C9E8C, 6004)
End Sub |
Next, I HIGHLY suggest you ditch all those timers and use booleans with 1 timer. There is no need to have that many timers in your program. Keep one, leave it active at all times, and add buttons to toggle booleans.
For example:
| Code: | Private bEnableCheat1 as Boolean
Private Sub Command1_Click()
bEnableCheat1 = IIf(bEnableCheat1, False, True)
End Sub
Private Sub Timer1_Timer()
If bEnableCheat1 = True
Call Sftnyxsux("WolfTeam", &H342C9E8C, 6004)
End If
End Sub |
|
umm sorry for asking this but how do i exactly Set the interval properties inside the form editor and set the Enable property to false. Ive been trying to figure out but i cant find how to do it. (sorry im New with VB 6.0)
|
|
| Back to top |
|
 |
atom0s Moderator
Reputation: 205
Joined: 25 Jan 2006 Posts: 8587 Location: 127.0.0.1
|
Posted: Fri Nov 16, 2007 11:23 am Post subject: |
|
|
When you add a timer to your form, click it once, then you can edit the properties of that timer on the right in the properties editor section of the IDE.
| Description: |
|
| Filesize: |
29.45 KB |
| Viewed: |
2981 Time(s) |

|
_________________
- Retired. |
|
| Back to top |
|
 |
bboy500 How do I cheat?
Reputation: 0
Joined: 14 Nov 2007 Posts: 3
|
Posted: Wed Nov 21, 2007 10:17 am Post subject: |
|
|
| Wiccaan wrote: | Umm.. firstly, don't use timers like that. Set the interval properties inside the form editor and set the Enable property to false.
When you want to activate a timer, set the Enabled property to true. As for your code, a quick example for one of them:
| Code: | Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Call Sftnyxsux("WolfTeam", &H342C9E8C, 6004)
End Sub |
Next, I HIGHLY suggest you ditch all those timers and use booleans with 1 timer. There is no need to have that many timers in your program. Keep one, leave it active at all times, and add buttons to toggle booleans.
For example:
| Code: | Private bEnableCheat1 as Boolean
Private Sub Command1_Click()
bEnableCheat1 = IIf(bEnableCheat1, False, True)
End Sub
Private Sub Timer1_Timer()
If bEnableCheat1 = True
Call Sftnyxsux("WolfTeam", &H342C9E8C, 6004)
End If
End Sub |
|
i did that and still had no effect ing ame. Whenevr i click the buttons nothing ever changes. But when i do it in a UCE it always works perfectly.
|
|
| Back to top |
|
 |
atom0s Moderator
Reputation: 205
Joined: 25 Jan 2006 Posts: 8587 Location: 127.0.0.1
|
Posted: Wed Nov 21, 2007 2:49 pm Post subject: |
|
|
Then your Sftnyxsux function is messed up and not working.
_________________
- Retired. |
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You cannot attach files in this forum You can download files in this forum
|
|