rc4 crypter!
Heres your chance to share your own tutorials with the community. Just post them on here. If your lucky they may even be posted on the main site.
10 posts
Page 1 of 1
Hi today I have a tutorial on a rc4 crypter it can take text and crypt/decrypt rc4!|
|
------------------------------------------------------------------------------------------------------------------|
What you need: |
3 Text boxes |
2 Buttons |
1 Label
A brain! |
-------------------------------------------------------------------------------------------------------------------
button 1 text = Encrypt / Decrypt and goes under textbox3
textbox 1 size = 287, 79, scrollbars vertical, multi-line - true
textbox 3 goes under textbox 1 with label by it and label1 text = password
textbox2 = readonly vertical scroll bars multi line true and size 287, 79
button 2 under textbox2 and says exit
Put this in code!
Credits: a friend of mine 5%
me 95%
|
------------------------------------------------------------------------------------------------------------------|
What you need: |
3 Text boxes |
2 Buttons |
1 Label
A brain! |
-------------------------------------------------------------------------------------------------------------------
button 1 text = Encrypt / Decrypt and goes under textbox3
textbox 1 size = 287, 79, scrollbars vertical, multi-line - true
textbox 3 goes under textbox 1 with label by it and label1 text = password
textbox2 = readonly vertical scroll bars multi line true and size 287, 79
button 2 under textbox2 and says exit
Put this in code!
Code: Select all
and you are finished! wahooo; Imports System.Text
Public Class Form1
Public Shared Function rc4(ByVal message As String, ByVal password As String) As String
Dim i As Integer = 0
Dim j As Integer = 0
Dim cipher As New StringBuilder
Dim returnCipher As String = String.Empty
Dim sbox As Integer() = New Integer(256) {}
Dim key As Integer() = New Integer(256) {}
Dim intLength As Integer = password.Length
Dim a As Integer = 0
While a <= 255
Dim ctmp As Char = (password.Substring((a Mod intLength), 1).ToCharArray()(0))
key(a) = Microsoft.VisualBasic.Strings.Asc(ctmp)
sbox(a) = a
System.Math.Max(System.Threading.Interlocked.Increment(a), a - 1)
End While
Dim x As Integer = 0
Dim b As Integer = 0
While b <= 255
x = (x + sbox(b) + key(b)) Mod 256
Dim tempSwap As Integer = sbox(b)
sbox(b) = sbox(x)
sbox(x) = tempSwap
System.Math.Max(System.Threading.Interlocked.Increment(b), b - 1)
End While
a = 1
While a <= message.Length
Dim itmp As Integer = 0
i = (i + 1) Mod 256
j = (j + sbox(i)) Mod 256
itmp = sbox(i)
sbox(i) = sbox(j)
sbox(j) = itmp
Dim k As Integer = sbox((sbox(i) + sbox(j)) Mod 256)
Dim ctmp As Char = message.Substring(a - 1, 1).ToCharArray()(0)
itmp = Asc(ctmp)
Dim cipherby As Integer = itmp Xor k
cipher.Append(Chr(cipherby))
System.Math.Max(System.Threading.Interlocked.Increment(a), a - 1)
End While
returnCipher = cipher.ToString
cipher.Length = 0
Return returnCipher
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Then
MessageBox.Show("Enter something to Encrypt / Decrypt", "Error!", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End If
If TextBox3.Text = "" Then
MessageBox.Show("Enter a password!", "Error!", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End If
TextBox2.Text = rc4(TextBox1.Text, TextBox3.Text)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub
End Class
Credits: a friend of mine 5%
me 95%
You do not have the required permissions to view the files attached to this post.
<a href="http://www.points2shop.com/s/xbox_point ... 5082"><img src="http://points2shop.com/images/promotion ... ricoxg.gif" border="0"/></a>
mshimranpro wrote:what is a crypter and what does it do ?lol look at the image and guess :P basically you type whatever in top then any password and then crpyt or if it is crypted decrypt and it reverse will show text or show strings of rc4
<a href="http://www.points2shop.com/s/xbox_point ... 5082"><img src="http://points2shop.com/images/promotion ... ricoxg.gif" border="0"/></a>
mshimranpro wrote:#pip still i didnt get it:/ it is something really simple lol just make it and you'll see:
RC4 is a stream cipher designed by Rivest for RSA Data Security (now RSA Security). It is a variable key-size stream cipher with byte-oriented operations. The algorithm is based on the use of a random permutation. Analysis shows that the period of the cipher is overwhelmingly likely to be greater than 10100. Eight to sixteen machine operations are required per output byte, and the cipher can be expected to run very quickly in software. Independent analysts have scrutinized the algorithm and it is considered secure.
<a href="http://www.points2shop.com/s/xbox_point ... 5082"><img src="http://points2shop.com/images/promotion ... ricoxg.gif" border="0"/></a>
pip wrote:mshimranpro wrote:#pip still i didnt get it:/ it is something really simple lol just make it and you'll see:
RC4 is a stream cipher designed by Rivest for RSA Data Security (now RSA Security). It is a variable key-size stream cipher with byte-oriented operations. The algorithm is based on the use of a random permutation. Analysis shows that the period of the cipher is overwhelmingly likely to be greater than 10100. Eight to sixteen machine operations are required per output byte, and the cipher can be expected to run very quickly in software. Independent analysts have scrutinized the algorithm and it is considered secure.
mshimranpro wrote:#pip now i understand what it is thank you so much +repWell I didn't understand a single thing of what pip said :lol: Speak english please? xD
Seems like nice work I've always just used the classes included in .NET to encrypt :P Way easier
LMAOSHMSFOAIDMT
Laughing my a** of so hard my sombrero fell off and I dropped my taco lmao;
Over 30 projects with source code!
Please give reputation to helpful members!
Laughing my a** of so hard my sombrero fell off and I dropped my taco lmao;
Over 30 projects with source code!
Please give reputation to helpful members!
if you type some thing in the top text box and password and press the encrypt/decrypt button nothing happenes :x
pip wrote:I couldn't find A Brain in the Visual Basic Toolbox, please help me!!!mshimranpro wrote:#pip still i didnt get it:/ it is something really simple lol just make it and you'll see:
RC4 is a stream cipher designed by Rivest for RSA Data Security (now RSA Security). It is a variable key-size stream cipher with byte-oriented operations. The algorithm is based on the use of a random permutation. Analysis shows that the period of the cipher is overwhelmingly likely to be greater than 10100. Eight to sixteen machine operations are required per output byte, and the cipher can be expected to run very quickly in software. Independent analysts have scrutinized the algorithm and it is considered secure.
please help from where you downloaded the brain component me too i didnt find it! hellpPPP!
10 posts
Page 1 of 1
Copyright Information
Copyright © Codenstuff.com 2020 - 2023