mIRC Homepage
Posted By: MaGoOsCuRo Reverse Stuff - 01/09/03 04:21 AM


i want to do a writing addon ,not like others ,just i write on reverse

any help thnx
Posted By: MaGoOsCuRo Re: Reverse Stuff - 01/09/03 05:11 AM
menu nicklist {
® -= NOCHERO =- ®
.Letras:set %letras 213
}

on *:INPUT:*:{
if ($active == Status Window) && ($left($1-,1) != /) { echo *** No puedes escribir en Status ! halt }
if ($left($1-,1) == /) { $1- | halt }
if ( %letras == 213 ) { .say 14,15 GRR 02,08 $1- 14,15 GRR  | halt }

}



how can i add a reverse stuff?
Posted By: LocutusofBorg Re: Reverse Stuff - 01/09/03 05:16 AM
Reverse color or reverse the letters. The first is by using ctrl+r - the second involves a loop, where you start reading at the last character, then work your way to the beginning, and write the letters to a variable. Then you send the variable to the window.

Personally I wouldn't though, it's annoying.
Posted By: MaGoOsCuRo Re: Reverse Stuff - 01/09/03 05:21 AM
can i use $reverse?
Posted By: LocutusofBorg Re: Reverse Stuff - 01/09/03 05:42 AM
Yes you can.

Code:
on *:INPUT:#: {
  [color:green]; don't trigger when you are issuing a /command![/color]
  if (/* !iswm $1) msg $target $reverse($1-)
  [color:green]; don't send the text you typed![/color]
  halt
}
[color:green] [/color]
alias reverse {
  [color:blue]put the code I described in my earlier post here[/color]
}
Posted By: MaGoOsCuRo Re: Reverse Stuff - 01/09/03 06:05 AM
what early code? i dot get it
Posted By: MaGoOsCuRo Re: Reverse Stuff - 01/09/03 06:50 AM
i thinx a little ,and i get it
thnx so much
Posted By: LocutusofBorg Re: Reverse Stuff - 01/09/03 08:57 AM
My bad, I meant "description of code"
Posted By: demitrix Re: Reverse Stuff - 02/09/03 05:18 AM
Code:
on *:INPUT:#: {
  if (/* !iswm $1) {
    msg $target $reverse($1-)
    halt
  }
} 
alias reverse {  
  var %txt  
  var %i = 1  
  while (%i <= $len($1-)) {    
    %txt = $mid($1-,%i,1) $+ %txt    
    inc %i  
  }  
  return %txt
}
© mIRC Discussion Forums