krazedkat
I post too much
![]() Reputation: 0
Joined: 29 Aug 2007
Posts: 2255
Location: Hell, Norway
|
 Posted: Thu Mar 04, 2010 11:21 pm Post subject: Help with VBS translator/encrypter? |
 |
|
| Code: | strAnswer = InputBox("Please enter the text you wish to
translate:", _
"MD Code Translator V0.1 ~Krazedkat")
if strAnswer= "a" then
Wscript.Echo "0q"
End if
if strAnswer= "b" then
Wscript.Echo "1w"
End if
if strAnswer= "c" then
Wscript.Echo "10e"
End if
if strAnswer= "d" then
Wscript.Echo "11r"
End if
if strAnswer= "e" then
Wscript.Echo "0t"
End if
if strAnswer= "f" then
Wscript.Echo "2y"
End if
if strAnswer= "g" then
Wscript.Echo "20u"
End if
if strAnswer= "h" then
Wscript.Echo "22i"
End if
if strAnswer= "i" then
Wscript.Echo "0o"
End if
if strAnswer= "j" then
Wscript.Echo "3p"
End if
if strAnswer= "k" then
Wscript.Echo "30a"
End if
if strAnswer= "l" then
Wscript.Echo "33s"
End if
if strAnswer= "m" then
Wscript.Echo "0d"
End if
if strAnswer= "n" then
Wscript.Echo "4f"
End if
if strAnswer= "o" then
Wscript.Echo "40g"
End if
if strAnswer= "p" then
Wscript.Echo "44h"
End if
if strAnswer= "q" then
Wscript.Echo "0j"
End if
if strAnswer= "r" then
Wscript.Echo "5k"
End if
if strAnswer= "s" then
Wscript.Echo "50l"
End if
if strAnswer= "t" then
Wscript.Echo "55z"
End if
if strAnswer= "u" then
Wscript.Echo "0x"
End if
if strAnswer= "v" then
Wscript.Echo "6c"
End if
if strAnswer= "w" then
Wscript.Echo "60v"
End if
if strAnswer= "x" then
Wscript.Echo "66b"
End if
if strAnswer= "y" then
Wscript.Echo "0n"
End if
if strAnswer= "z" then
Wscript.Echo "7m"
End if
|
That is what I have but I need to be able to input words and come up with a full string of constant variable combos... Any help?
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
