I just made this a half hour ago.

I wanted to share with everyone.

Here is the source code:

Public Class Form1

    Private Sub CloseToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Close()
    End Sub

    Private Sub StatHacksToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)


    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

        Call ShockwaveFlash1.SetVariable("cash", 99999999999999)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Call ShockwaveFlash1.SetVariable("cash", Text1.Text)
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Call ShockwaveFlash1.SetVariable("item_car", 2)
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Call ShockwaveFlash1.SetVariable("item_car", 1)
    End Sub

    Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Call ShockwaveFlash1.SetVariable("Strength", Text2.Text)
    End Sub

    Private Sub Button4_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Call ShockwaveFlash1.SetVariable("Intelligence", Text3.Text)
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        Call ShockwaveFlash1.SetVariable("Charm", Text4.Text)
    End Sub

    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Call ShockwaveFlash1.SetVariable("item_car", 2)
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        Call ShockwaveFlash1.SetVariable("item_car", 1)
    End Sub

    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Call ShockwaveFlash1.SetVariable("CEO", Text4.Text)
    End Sub
End Class

Just in case you want to check it.

Go ahead and try it.

Hope you like it.

(Credits go to CE forums, for posting the super tutorial on how to make the set money, I made the set stats myself)