mIRC Snippets

Name:$text
Description: This snippets does neat things with your text. It allows you to seperate the text,reverse the text,upper and lower case each word and randomize text colors.

Code below...
> ;********************************

;
EXAMPLES BELOW:

;
REVERSE TEXT//echo -a $text(this is a reverse text).rev
;SEPARATE TEXT//echo -a $text(this text is all separate).sep
;UPPER/LOWER CASE TEXT//echo -a $text(this is upper and lower case text).ul
;RANDOM COLORS TEXT//echo -a $text(this is all random colors).rc

;********************************

alias text {
  if (
$prop == rev) {
    var %
i 1,%$len($1-),%t
    
while (%>= %i) { 
      %
= $+(%t,$iif($mid($1-,%l,1) = $chr(32),$chr(32$mid($1-,%l,1),$mid($1-,%l,1))) 
      
dec %l
    
}
    return %
t
  
}
  if (
$prop == sep) {
    var %
i 1,%$len($1-),%t
    
while (%<= %l) { 
      %
= $+(%t,$chr(32),$mid($1-,%i,1))
      
inc %i
    
}
    return %
t
  
}
  if (
$prop == ul) {
    var %
i 1,%$len($1-),%t,%$iif($islower($left($1-,1)),l,u)
    while (%
<= %l) { 
      if (
$mid($1-,%i,1) == $chr(32)) { %= $+(%t,$chr(32$iif(%l,$upper($mid($1-,%i,1)),$lower($mid($1-,%i,1)))) }
      else { %
= $+(%t,$iif(%l,$upper($mid($1-,%i,1)),$lower($mid($1-,%i,1)))) }
      %
$iif(%l,u,l)
      
inc %i
    
}
    return %
t
  
}
  if (
$prop == rc) {
    var %
i 1,%$len($1-),%t
    
while (%<= %l) { 
      if (
$mid($1-,%i,1) == $chr(32)) { %= $+(%t,$chr(32) $+(,$rand(0,15),$mid($1-,%i,1))) }
      else { %
= $+(%t,$+(,$rand(0,15),$mid($1-,%i,1))) }
      
inc %i
    
}
    return %
t
  
}
}

<

« Back to mIRC Snippets

Home | Site Map | Privacy Policy | Advertising | Contact Us
Copyright © 2006-2014 r2xDesign.net - All Rights Reserved.
eXTReMe Tracker