PWC KeyGen

Posts 1–5 of 5 · Page 1 of 1
Dude, there arn't any "keygens" most of them are keyloggers.
Some keygens can work, like Microsoft office keygens.
Keys are verified online, the only way to get them for free is probably stealing the code that is in the package in your gaming store, witch is impossible at most of the game stores , becouse you receive the cd and the code after purpache.
But here is a way to get it for 10$, i will post the topic in a hour.
And 1 more thing: You Fail! ^^
Meh, found a keylogger...
The file is clean, just uses a strange method of generating keys. It's just full of copied and pasted keys from another keygen. All this 'keygen' does is choose a random key very ineffeciently.

[highlight=vbnet]Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Me.TextBox3.Text = Conversions.ToString(Conversion.Int(CSng((VBMath.R nd * 4!))))
Dim text As String = Me.TextBox3.Text
If ([text] = Conversions.ToString(0)) Then
Me.TextBox3.Text = "U5GQ P5UG ZR9X 7Y5B 63H8"
ElseIf ([text] = Conversions.ToString(1)) Then
Me.TextBox3.Text = "JYE6 R7RK ZXH5 XTJM 5R25"
ElseIf ([text] = Conversions.ToString(2)) Then
Me.TextBox3.Text = "JZRZ S5VF TK75 BGE4 X7QM"
ElseIf ([text] = Conversions.ToString(3)) Then
Me.TextBox3.Text = "WRB3 45QM TFDJ EPT3 XXPQ"
ElseIf ([text] = Conversions.ToString(4)) Then
Me.TextBox3.Text = "6SYG JEUB QULE UESW 66HS"
ElseIf ([text] = Conversions.ToString(5)) Then
Me.TextBox3.Text = "FZR9 8VDN CQEA 97JZ JK45"
ElseIf ([text] = Conversions.ToString(6)) Then
Me.TextBox3.Text = "TGG8 T5UU VSKA YNAH 538B"
End If
End Sub
[/highlight]
Posts 1–5 of 5 · Page 1 of 1

Post a Reply

Similar Threads

Tags for this Thread

None

Talk with us