;CoolText
;on $*:TEXT:/^[.!](1337|Leet|CoolText)/Si:#: { 
;  .notice $nick $ascii($2-) {
;    alias ascii {
;      return $replace($1-,a,ª,b,ß,c,©,d,Ð,e,ê,f,ƒ,g,g,h,H,i,ï,j,J,k,K,l,|,m,m,n,ñ,o,ð,p,Þ,q,Q,r,®,s,§,t,t,u,ü,v,V,w,w,x,×,y,¥,z,z,?,¿,!,¡,1/4,¼,1/2,½,3/4,¾,ae,Æ,1,¹,2,²,3,³,+,?,>,»,<,«)
;    }
;  }
;}

on $*:TEXT:/^[@](1337|Leet|CoolText)/Si:#: { 
  .msg $chan $ascii($2-) {
    alias ascii {
      return $replace($1-,a,ª,b,ß,c,©,d,Ð,e,ê,f,ƒ,g,g,h,H,i,ï,j,J,k,K,l,|,m,m,n,ñ,o,ð,p,Þ,q,Q,r,®,s,§,t,t,u,ü,v,V,w,w,x,×,y,¥,z,z,?,¿,!,¡,1/4,¼,1/2,½,3/4,¾,ae,Æ,1,¹,2,²,3,³,+,?,>,»,<,«)
    }
  }
}