mIRC Home    About    Download    Register    News    Help

Print Thread
#124713 10/07/05 05:36 AM
Joined: May 2005
Posts: 106
S
Vogon poet
OP Offline
Vogon poet
S
Joined: May 2005
Posts: 106
could someone make a code talk where i.e a=z and b=y and so on and forth BUT the decoder should say <time> <nickname> said and then the actually thing they wanted to say

S
Sigh
Sigh
S
Code:
#code off
  
on *:text:*:#:echo -ic i # Encoded: $$code($1-)
  
on *:input:#:{
  if (/* !iswm $1) &amp;&amp; (!$inpaste) &amp;&amp; (!$ctrlenter) {
    say $$code($1-)
    halt
  }
}
  
#code end
  
alias code {
  if ($isid) {
    var %i = $len($1),%x
    while (%i) {
      %x = $iif($mid($1,%i,1) isalpha,$chr($calc($iif($v1 isupper,155,219)-$asc($v1))),$v1) $+ %x
      dec %i
    }
    return %x
  }
  $iif($1 = on,.enable,.disable) #code
  echo -qage Code talk is now $group(#code)
}


I wasn't too sure the middle part of your question so what this does is it adds a extra line under channel text saying 'Encoded: <text>' when someone says something. /code on|off then just chat as normal

Joined: May 2005
Posts: 106
S
Vogon poet
OP Offline
Vogon poet
S
Joined: May 2005
Posts: 106
it works thanks but could ya make it only work for
#sdrawkcab

S
Sigh
Sigh
S
I was going to edit it but the time expired. Just needs to be changed in 2 places:

Code:
#code off
  
on *:text:*:[color:brown]#sdrawkcab[/color]:echo -ic i # Encoded: $$code($1-)
  
on *:input:[color:brown]#sdrawkcab[/color]:{
  if (/* !iswm $1) &amp;&amp; (!$inpaste) &amp;&amp; (!$ctrlenter) {
    say $$code($1-)
    halt
  }
}  
  
#code end
  
alias code {
  if ($isid) {
    var %i = $len($1),%x
    while (%i) {
      %x = $iif($mid($1,%i,1) isalpha,$chr($calc($iif($v1 isupper,155,219)-$asc($v1))),$v1) $+ %x
      dec %i
    }
    return %x
  }
  $iif($1 = on,.enable,.disable) #code
  echo -qage Code talk is now $group(#code)
}


Link Copied to Clipboard