[Release] GameCard Generator

[Zaxer]

This program generates a desired number of random GameCard codes and save them into a .txt file.
Pic:

Click to download!
No Virus, proof:

Feel free to post your own scan results

[Trollblod]

Zaxer, I really want to trust you, any chance you could send me 1 code so I can test? And is it for EU or US?
Scanned at VirusTotal.
And Mcafee, none of them found anything, but I still feel insecure about it. Feel too small and too little information about it...

[Zaxer]

You want me to post the source code?
It is coded in VB.NET

[grassynole]

Hes not a member i know well, so tbh its not something im going to risk trying out.
I don't recognize the virus scanner either.

[Trollblod]

Hes not a member i know well, so tbh its not something im going to risk trying out.
I don't recognize the virus scanner either.

Ye, exactly, but I tried it with Mcafee and VirusTotal.. no results, but give me a code so I can test, if not it's a virus in there, maybe you can send us the code, but what will that help? How do we know that's what you're using in that file?
Just send me a code instead.

[Synthelo]

Please post a screenshot of the site saying "Your gamecard was verified"

How are we supposed to trust you without a proof :P

[aamlord]

Is it a random guesser where you have to enter multiple tries before finding 1 that works?

[zzack]

Hmm... Isn't it just a random code generator to scam people? I mean... using them ingame to make other people pay you for 'em. Like this?
http://www.mmowned.com/forums/bots-p...atch-file.html

[Danne206]

If I got it right, this does just create random GCs, you've got to test by yourself, but that is NOT the purpose of this program, right?

[Zaxer]

Yes, exactly. Here is the cource code anyways:

Imports System.IO
Public Class Form1
    Dim sw As New StreamWriter("codes.txt")
    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For a = 1 To NumericUpDown1.Value
            Dim value4 As Integer = CInt(Int((8999 * Rnd()) + 1000))
            Dim value6 As Integer = CInt(Int((899999 * Rnd()) + 100000))
            Dim value5 As Integer = CInt(Int((89999 * Rnd()) + 10000))
            Dim value42 As Integer = CInt(Int((8999 * Rnd()) + 1000))
            Dim value62 As Integer = CInt(Int((899999 * Rnd()) + 100000))
            ListBox1.Tag = value42 & " - " & value62 & " - " & value5 & " - " & value6 & " - " & value4
            ListBox1.Items.Add(ListBox1.Tag)
            Label3.Text = ListBox1.Items.Count & " Codes"
            sw.WriteLine(ListBox1.Tag)
            sw.Flush()
        Next
        ToolStripStatusLabel1.Text = "Scripted By Zaxer | Generated"
    End Sub

    Private Sub ListBox1_SelectedValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedValueChanged
        TextBox2.Text = ListBox1.SelectedItem
        TextBox2.SelectAll()
        TextBox2.Copy()
    End Sub
End Class

[Trollblod]

Yes, exactly. Here is the cource code anyways:

Imports System.IO
Public Class Form1
    Dim sw As New StreamWriter("codes.txt")
    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For a = 1 To NumericUpDown1.Value
            Dim value4 As Integer = CInt(Int((8999 * Rnd()) + 1000))
            Dim value6 As Integer = CInt(Int((899999 * Rnd()) + 100000))
            Dim value5 As Integer = CInt(Int((89999 * Rnd()) + 10000))
            Dim value42 As Integer = CInt(Int((8999 * Rnd()) + 1000))
            Dim value62 As Integer = CInt(Int((899999 * Rnd()) + 100000))
            ListBox1.Tag = value42 & " - " & value62 & " - " & value5 & " - " & value6 & " - " & value4
            ListBox1.Items.Add(ListBox1.Tag)
            Label3.Text = ListBox1.Items.Count & " Codes"
            sw.WriteLine(ListBox1.Tag)
            sw.Flush()
        Next
        ToolStripStatusLabel1.Text = "Scripted By Zaxer | Generated"
    End Sub

    Private Sub ListBox1_SelectedValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedValueChanged
        TextBox2.Text = ListBox1.SelectedItem
        TextBox2.SelectAll()
        TextBox2.Copy()
    End Sub
End Class

I just wrote... who cares, maybe you don't use that code for it, maybe you added a worm to it...

[Zaxer]

Tell me a well known virus scan and I'll scan it and post the pic

[Trollblod]

Tell me a well known virus scan and I'll scan it and post the pic

Dude, some viruses won't be detected, just PM me a stupid damn code for wow so I can test it and confirm, damnit, is it that hard?

[petrix]

Its a fake gamecard generator.... It either used for scamming or claiming it to be working and getting loads of attention lolz... Cant be that hard to understand?

[Barnzy]

I just used it... Obviously the game cards have a 1 in 100000000000000 chance of being correct but it has no virus.