2words4uready Posted August 1, 2008 Share Posted August 1, 2008 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 Link to comment Share on other sites More sharing options...
will88 Posted August 1, 2008 Share Posted August 1, 2008 nice works great, I got bored and tried to make a decrypt script lol I couldnt figure it out Password-Keeper Link to comment Share on other sites More sharing options...
smartee Posted August 2, 2008 Share Posted August 2, 2008 (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 August 2, 2008 by vbridgelal Link to comment Share on other sites More sharing options...
emoyasha Posted August 6, 2008 Share Posted August 6, 2008 here we go > expandcollapse popup#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 =] Spoiler 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)----------------------------------- Link to comment Share on other sites More sharing options...
emoyasha Posted August 6, 2008 Share Posted August 6, 2008 decryptor: expandcollapse popup#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 Spoiler 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)----------------------------------- Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now