• Just a reminder that providing specifics on, sharing links to, or naming websites where ROMs can be accessed is against the rules. If your post has any of this information it will be removed.
  • Our friends from the Johto Times are hosting a favorite Pokémon poll - and we'd love for you to participate! Click here for information on how to vote for your favorites!
  • Serena, Kris, Dawn, Red - which Pokémon protagonist is your favorite? Let us know by voting in our grand final favorite protagonist poll!
  • PokéCommunity supports the Stop Killing Games movement. If you're a resident of the UK or EU, consider signing one of the petitions to stop publishers from destroying games. Click here for more information!
  • Welcome to PokéCommunity! Register now and join one of the best fan communities on the 'net to talk Pokémon and more! We are not affiliated with The Pokémon Company or Nintendo.

[Lua] String Encrypt-er / Unencrypt-er

Ho-oh 112

Advance Scripter
  • 308
    Posts
    14
    Years
    • Seen Mar 8, 2014
    I made a random lua script for everyone, it allows you to compile a string using:
    Code:
    encryptString(string,NumberToEncryptBy)
    also it comes with a unencrypter:
    Code:
    unencryptString(string,NumberToEncryptBy)
    so basicly it's not usable for RMXP...

    script:
    Code:
    function encryptString(str,code)
    	-- character table
        chars="1234567890!@#$%^&*()qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM ,<.>/?;:'[{]}\|`~"
    	-- new code begin
        newcode=""
    	-- we start
        for i=1, 999 do
            if string.sub(str,i,i) == "" then
                break
            else
    			com=string.sub(str,i,i)
    		end
            for x=1, 90 do
    			cur=string.sub(chars,x,x)
    			if com == cur then
    				new=x+code
    				while new > 90 do
    					new = new - 90
    				end
    				newcode=""..newcode..""..string.sub(chars,new,new)..""
    			end
    		end
        end
        print("you new code is: "..newcode.."")
        return newcode
    end
    
    function unencryptString(str,code)
    	-- character table
        chars="1234567890!@#$%^&*()qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM ,<.>/?;:'[{]}\|`~"
    	-- new code begin
        newcode=""
    	-- we start
        for i=1, 999 do
            if string.sub(str,i,i) == "" then
                break
            else
    			com=string.sub(str,i,i)
    		end
            for x=1, 90 do
    			cur=string.sub(chars,x,x)
    			if com == cur then
    				new=x-code
    				while new < 0 do
    					new = new + 90
    				end
    				newcode=""..newcode..""..string.sub(chars,new,new)..""
    			end
    		end
        end
        print("you old string is: "..newcode.."")
        return newcode
    end
     
    Back
    Top