Something

alias Code {
  msg $chan ¤ $replacex($1- ,a,c,b,x,c,p,d,z,e,q,f,v,g,m,h,w,i,b,j,n,k,a,l,e,m,l,n,r,o,k,p,s,q,t,r,j,s,d,t,y,u,o,v,f,w,u,x,h,y,i,z,g)
}
alias DeCode {
  echo -at $chan ( $+ $server $+ )*** DeCode From $nick $+ : $replacex($1- ,g,z,i,y,h,x,u,w,f,v,o,u,y,t,d,s,j,r,t,q,s,p,k,o,r,n,l,m,e,l,a,k,n,j,b,i,w,h,m,g,v,f,q,e,z,d,p,c,x,b,c,a)
}
alias CodeUpper {
  msg $chan » $replacex($1- ,A,U,B,A,C,I,D,M,E,Q,F,O,G,B,H,S,I,W,J,V,K,D,L,P,M,C,N,E,O,F,P,X,Q,N,R,G,S,R,T,Z,U,Y,V,H,W,T,X,K,Y,J,Z,L) 
}
alias DeCodeUpper {
  echo -at $chan ( $+ $server $+ )*** DeCodeUpper From $nick $+ : $replacex($1- ,L,Z,J,Y,K,X,T,W,H,V,Y,U,Z,T,R,S,G,R,N,Q,X,P,F,O,E,N,C,M,P,L,D,K,V,J,W,I,S,H,B,G,O,F,Q,E,M,D,I,C,A,B,U,A) 
}
on *:TEXT:¤*:*:{
  DeCode $2-
}
on *:TEXT:»*:*:{
  DeCodeUpper $2-
}