[VB6]Typing Terror Trainer[SOURCE]

[Bump J]

First We Have To Load The Game

strHTML = HTTP.GetWrapper("http://neopets.com/games/play.phtml?game_id=" & "574")
strID = GetStringBetween(strHTML, "newWin=window.open('", "'+'&width='+width+'&height='+height+'&quality='+quality," & "574" & ",params);")
strID = strID & "&width=550&height=420&quality=high"
strHTML = HTTP.GetWrapper(strID, "http://neopets.com/games/play.phtml?game_id=" & "574")
strID2 = GetStringBetween(strHTML, "</script><SCRIPT type=" & ChrW$(34) & "text/javascript" & ChrW$(34) & ">flash_object(" & ChrW$(34), ChrW$(34) & ", '100%', '100%', 'myFlash', 'high', '6', 'exactfit', '', 'white', '', 'always'")
Flash.Movie = strID2

then we got the get the variables

Private Sub Timer1_Timer()
On Error Resume Next
Call Flash.SetVariable("_level10.controller.gGame.completedNumber", "99") 'puts 99 grundos per level
strPT1 = Flash.GetVariable("_level10.controller.gGame.aWords") 'gets the words
strPT1 = Replace(strPT1, ",", "")
If strPT1 <> "" Then
Flash.SetFocus
SendKeys strPT1 'types the words
End If
End Sub

[Lil Sp3nda]

do we type that code into scar?

[second2none]

[VB6] << read the title >.> It says VB6 not scar.

I always wanted to know how to flash game edit. I kinda knew but now I actually get it xD Thanks + repped

[Lil Sp3nda]

+rep i learnt how to change games :O woot

[Zachafer]

I know this is gravedig and all.
What control do we use?
for Flash?

[thejurm]

Woo I learned how to make a good trainer! Now to try something simple like UB