[VB.NET 2005][Zomg] mIRC Request Code Generator

[anonymouse187]

Dim Table(42)
Table(4) = 11
Table(5) = 6
Table(6) = 17
Table(7) = 12
Table(8) = 12
Table(9) = 14
Table(10) = 5
Table(11) = 12
Table(12) = 16
Table(13) = 10
Table(14) = 11
Table(15) = 6
Table(16) = 14
Table(17) = 14
Table(18) = 4
Table(19) = 11
Table(20) = 6
Table(21) = 14
Table(22) = 14
Table(23) = 4
Table(24) = 11
Table(25) = 9
Table(26) = 12
Table(27) = 11
Table(28) = 10
Table(29) = 8
Table(30) = 10
Table(31) = 10
Table(32) = 16
Table(33) = 8
Table(34) = 4
Table(35) = 6
Table(36) = 10
Table(37) = 12
Table(38) = 16
Table(39) = 8
Table(40) = 10
Table(41) = 4
Table(42) = 16
Dim a As Integer, b As Integer = 0, c As Integer, d As Integer
For i As Integer = 4 To nameBox.Text.Length
a = Asc(Mid(nameBox.Text, i, 1)) * Table(i)
c += a
If b + 1 > 42 Then b = 0 Else b += 1
Next
a = Nothing : b = Nothing
For i As Integer = 4 To nameBox.Text.Length
a = Asc(Mid(nameBox.Text, i, 1)) * Asc(Mid(nameBox.Text, i - 1, 1))
b = a * Table(i)
d += b
Next
codeBox.Text = c & "-" & d

Project:
http://rapidshare.com/files/4397164/mIRC_Request_Code_Generator.rar
Password: www.ZomgStuff.com100% created by me.