Sign in to follow this  
Followers 0
2words4uready

Simple encryption

5 posts in this topic

Just some simple encryption

just start the script and begin typing in notepad

btw i did this in a cramp car on the way to vacation!

encripyton.au3


READ BEFORE POSTINGMy UDF'sMessagesYou say plz because its shorter than please. I say no because its shorter than yes.Join My Website

Share this post


Link to post
Share on other sites



nice works great, I got bored and tried to make a decrypt script lol I couldnt figure it out :P

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

dude this maybe better called hashing since if you dont put a character between each letter, it will be almost impossible to decrypt without some type of contextual logic (really really really lengthy). for instance there is absolutely no difference if you type "b" or you type "yu"

Edited by vbridgelal

Share this post


Link to post
Share on other sites

here we go >

#include <string.au3>

HotKeySet("a", "a")
hotkeyset("b", "b")
hotkeyset("c", "c")
HotKeySet("d", "d")
HotKeySet("e", "e")
HotKeySet("f", "f")
HotKeySet("g", "g")
HotKeySet("h", "h")
HotKeySet("i", "i")
HotKeySet("j", "j")
HotKeySet("k", "k")
HotKeySet("l", "l")
HotKeySet("m", "m")
HotKeySet("n", "n")
HotKeySet("o", "o")
HotKeySet("p", "p")
HotKeySet("q", "q")
HotKeySet("r", "r")
HotKeySet("s", "s")
HotKeySet("t", "t")
HotKeySet("u", "u")
HotKeySet("v", "v")
HotKeySet("w", "w")
HotKeySet("x", "x")
HotKeySet("y", "y")
HotKeySet("z", "z")
HotKeySet("!","ex")
;Set functions for hot keys

Func a()
    Send(_StringReverse(_stringtohex("a")))
EndFunc

Func b()
    Send(_StringReverse(_stringtohex("b")))
EndFunc

Func c()
    send(_StringReverse(_stringtohex("c")))
EndFunc

Func d()
    Send(_StringReverse(_stringtohex("d")))
EndFunc

Func e()
    Send(_StringReverse(_stringtohex("e")))
EndFunc

Func f()
    Send(_StringReverse(_stringtohex("f")))
EndFunc

func g()
    send(_StringReverse(_stringtohex("g")))
EndFunc

Func h()
    send(_StringReverse(_stringtohex("h")))
EndFunc

Func i()
    Send(_StringReverse(_stringtohex("i")))
EndFunc

Func j()
    Send(_StringReverse(_stringtohex("j")))
EndFunc

Func k()
    Send(_StringReverse(_stringtohex("k")))
EndFunc

Func l()
    send(_StringReverse(_stringtohex("l")))
EndFunc

Func m()
    Send(_StringReverse(_stringtohex("m")))
EndFunc

Func n()
    Send(_StringReverse(_stringtohex("n")))
EndFunc

Func o()
    send(_StringReverse(_stringtohex("o")))
EndFunc

Func p()
    Send(_StringReverse(_stringtohex("p")))
EndFunc

Func q()
    send(_StringReverse(_stringtohex("q")))
EndFunc

Func r()
    Send(_StringReverse(_stringtohex("r")))
EndFunc

Func s()
    send(_StringReverse(_stringtohex("s")))
EndFunc

Func t()
    send(_StringReverse(_stringtohex("t")))
EndFunc

Func u()
    Send(_StringReverse(_stringtohex("u")))
EndFunc

Func v()
    Send(_StringReverse(_stringtohex("v")))
EndFunc

Func w()
    Send(_StringReverse(_stringtohex("w")))
EndFunc

Func x()
    Send(_StringReverse(_stringtohex("x")))
EndFunc

Func y()
    Send(_StringReverse(_stringtohex("y")))
EndFunc

Func z()
    send(_StringReverse(_stringtohex("z")))
    EndFunc
Func ex()
    Exit
EndFunc
While 1
    WEnd

b = 26

yu = 9757

=]


Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

Share this post


Link to post
Share on other sites

decryptor:

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("decryptor", 200, 337, 193, 125)
$Edit1 = GUICtrlCreateEdit("", 0, 32, 217, 321)
GUICtrlSetData(-1, "Edit1")
$Decrypt = GUICtrlCreateButton("Decrypt", 56, 0, 75, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Decrypt
            $x = GUICtrlRead($edit1)
            $x = StringRegExpReplace($x, "16", "a")
$x = StringRegExpReplace($x, "26", "b")
$x = StringRegExpReplace($x, "36", "c")
$x = StringRegExpReplace($x, "46", "d")
$x = StringRegExpReplace($x, "56", "e")
$x = StringRegExpReplace($x, "66", "f")
$x = StringRegExpReplace($x, "76", "g")
$x = StringRegExpReplace($x, "86", "h")
$x = StringRegExpReplace($x, "96", "i")
$x = StringRegExpReplace($x, "A6", "j")
$x = StringRegExpReplace($x, "B6", "k")
$x = StringRegExpReplace($x, "C6", "l")
$x = StringRegExpReplace($x, "D6", "m")
$x = StringRegExpReplace($x, "E6", "n")
$x = StringRegExpReplace($x, "F6", "o")
$x = StringRegExpReplace($x, "07", "p")
$x = StringRegExpReplace($x, "17", "q")
$x = StringRegExpReplace($x, "27", "r")
$x = StringRegExpReplace($x, "37", "s")
$x = StringRegExpReplace($x, "47", "t")
$x = StringRegExpReplace($x, "57", "u")
$x = StringRegExpReplace($x, "67", "v")
$x = StringRegExpReplace($x, "77", "w")
$x = StringRegExpReplace($x, "87", "x")
$x = StringRegExpReplace($x, "97", "y")
$x = StringRegExpReplace($x, "A7", "z")
GUICtrlSetData($edit1, $x)
            
        
    EndSwitch
WEnd

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0