Zugg Software :: View topic - Decoder Ring!!! For any Mud!!!!! 1.0 3-13-03

Enchanter Joined: 20 Nov 2002 Posts: 627 Location: USA

OK I have made a DecoderRing,yes it's actually codes and decodes
Why?,because were all kids at heart.

REQUIREMENTS:
1)know how to use right click on your mouse for cut and past.
2)Whom ever your codeing to will need this script also to decode.

INSTRUCTONS:
1)Select all between the lines,right click,copy.
2)make new class in Zmud (name uninportant)
3)click the tab named Class Script.
4)Select all in the box,right click,paste
5)save!!!!!
THAT'S IT!!!
_______________________________________________________________________________________

#CLASS {DecoderRing}
#ALIAS send {say ~_@step3}
#ALIAS zx {sc a big red dog}
#VAR step1 {z yrt uzg xzg}
#VAR step2 {z|.|y|r|t|.|u|z|g|.|x|z|g}
#VAR step3 {a big fat cat}
#VAR step4 {tlg rg} {tlg rg}
#VAR count1 {13}
#VAR count2 {}
#ONINPUT {^sc (*)} {#var step1 "";#var step2 "";#var step3 "";#var count1 "";#var step1 "%1";#var step2 %replace(@step1," ",".");#var count1 %len( @step2);#loop @count1,2 {#var step2 %insert("|",@step2,%i)};#loop 1,@count1 {#if %item(@step2,%i)=a {#var step3 %additem("z",@step3)};#if %item(@step2,%i)=b {#var step3 %additem("y",@step3)};#if %item(@step2,%i)=c {#var step3 %additem("x",@step3)};#if %item(@step2,%i)=d {#var step3 %additem("w",@step3)};#if %item(@step2,%i)=e {#var step3 %additem("v",@step3)};#if %item(@step2,%i)=f {#var step3 %additem("u",@step3)};#if %item(@step2,%i)=g {#var step3 %additem("t",@step3)};#if %item(@step2,%i)=h {#var step3 %additem("s",@step3)};#if %item(@step2,%i)=i {#var step3 %additem("r",@step3)};#if %item(@step2,%i)=j {#var step3 %additem("q",@step3)};#if %item(@step2,%i)=k {#var step3 %additem("p",@step3)};#if %item(@step2,%i)=l {#var step3 %additem("o",@step3)};#if %item(@step2,%i)=m {#var step3 %additem("n",@step3)};#if %item(@step2,%i)=n {#var step3 %additem("m",@step3)};#if %item(@step2,%i)=o {#var step3 %additem("l",@step3)};#if %item(@step2,%i)=p {#var step3 %additem("k",@step3)};#if %item(@step2,%i)=q {#var step3 %additem("j",@step3)};#if %item(@step2,%i)=r {#var step3 %additem("i",@step3)};#if %item(@step2,%i)=s {#var step3 %additem("h",@step3)};#if %item(@step2,%i)=t {#var step3 %additem("g",@step3)};#if %item(@step2,%i)=u {#var step3 %additem("f",@step3)};#if %item(@step2,%i)=v {#var step3 %additem("e",@step3)};#if %item(@step2,%i)=w {#var step3 %additem("d",@step3)};#if %item(@step2,%i)=x {#var step3 %additem("c",@step3)};#if %item(@step2,%i)=y {#var step3 %additem("b",@step3)};#if %item(@step2,%i)=z {#var step3 %additem("a",@step3)};#if %item(@step2,%i)=. {#var step3 %additem(".",@step3)}};#var step3 %replace(%replace(@step3,"|",""),"."," ");#alias send {say ~_@step3};send}
#TRIGGER {^(%W) says '~_(*)'} {#gag;#var step1 "";#var step2 "";#var step3 "";#var count1 "";#var step1 "%2";#var step2 %replace(@step1," ",".");#var count1 %len( @step2);#loop @count1,2 {#var step2 %insert("|",@step2,%i)};#loop 1,@count1 {#if %item(@step2,%i)=a {#var step3 %additem("z",@step3)};#if %item(@step2,%i)=b {#var step3 %additem("y",@step3)};#if %item(@step2,%i)=c {#var step3 %additem("x",@step3)};#if %item(@step2,%i)=d {#var step3 %additem("w",@step3)};#if %item(@step2,%i)=e {#var step3 %additem("v",@step3)};#if %item(@step2,%i)=f {#var step3 %additem("u",@step3)};#if %item(@step2,%i)=g {#var step3 %additem("t",@step3)};#if %item(@step2,%i)=h {#var step3 %additem("s",@step3)};#if %item(@step2,%i)=i {#var step3 %additem("r",@step3)};#if %item(@step2,%i)=j {#var step3 %additem("q",@step3)};#if %item(@step2,%i)=k {#var step3 %additem("p",@step3)};#if %item(@step2,%i)=l {#var step3 %additem("o",@step3)};#if %item(@step2,%i)=m {#var step3 %additem("n",@step3)};#if %item(@step2,%i)=n {#var step3 %additem("m",@step3)};#if %item(@step2,%i)=o {#var step3 %additem("l",@step3)};#if %item(@step2,%i)=p {#var step3 %additem("k",@step3)};#if %item(@step2,%i)=q {#var step3 %additem("j",@step3)};#if %item(@step2,%i)=r {#var step3 %additem("i",@step3)};#if %item(@step2,%i)=s {#var step3 %additem("h",@step3)};#if %item(@step2,%i)=t {#var step3 %additem("g",@step3)};#if %item(@step2,%i)=u {#var step3 %additem("f",@step3)};#if %item(@step2,%i)=v {#var step3 %additem("e",@step3)};#if %item(@step2,%i)=w {#var step3 %additem("d",@step3)};#if %item(@step2,%i)=x {#var step3 %additem("c",@step3)};#if %item(@step2,%i)=y {#var step3 %additem("b",@step3)};#if %item(@step2,%i)=z {#var step3 %additem("a",@step3)};#if %item(@step2,%i)=. {#var step3 %additem(".",@step3)}};#var step3 %replace(@step3,"|","");#var step3 %replace(@step3,"."," ");#say @step3}
#CLASS 0

_________________________________________________________________________________________

I had made one in color but Zmud forum took to long to load it. :(

have fun!!!!!

Newbie Joined: 06 Nov 2009 Posts: 4

Just wondering?

Posted: Sun Mar 23, 2014 5:29 pm

Ok I took a look to figure out how it works.
You type: sc what you want to say
Then the trigger sends to the MUD: say random letters

Enchanter Joined: 20 Nov 2002 Posts: 627 Location: USA

Yes exactly, the object is that you and other people in your group have it.
Then when you chat with them no one else will be able to understand what you are saying.
It's not a language that that can be interpreted, or understood by anyone not using this program.
Here are a few examples on how I Use it.

As a language for, secret group talk when not wanting the rest of the group to know.
to Yell something and only people in my area who can read it understand
to talk about game stuff and even The Immortals can not eaves drop.
To write, notes, bulletins,clues to treasures, secret maps.
It was just a cool idea.

By the way it is not random, the code substitutes one letter with a different one.
I have plans for making this a bit more versatile, but I only recently got back into coding and have not gotten around to this one yet.
I will also put in instructions and examples.

Alos I believe that I did expand on this a bit with my Language Script at this post: Language V 1.5