Advertisement
westor

$col() identifier for Koragg v1.0

Jun 24th, 2020
2,204
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 0.56 KB | None | 0 0
  1. ; Syntax: $col(N1-N2,TEXT)
  2. ; Examples: //echo -a IS: $col(4,test1) --- $col(4-8,test2) --- --- $col(08-04,test3)
  3.  
  4. alias col {
  5.   if ($1 == $null) { return }
  6.  
  7.   var %c = $gettok($1,1-2,45)
  8.   var %n1 = $gettok(%c,1,45)
  9.   var %n2 = $gettok(%c,2,45)
  10.  
  11.   if (%n1 !== $null) && (%n1 !isnum 0-99) { return }
  12.   if (%n2 !== $null) && (%n2 !isnum 0-99) { return }
  13.  
  14.   if (%n1 !== $null) && (%n2 == $null) { var %t = %n1 }
  15.   if (%n1 !== $null) && (%n2 !== $null) { var %t = $+(%n1,$chr(44),%n2)) }
  16.  
  17.   return $+($chr(3),%t,$chr(2),$chr(2),$2-,$chr(3),$chr(2),$chr(2))
  18. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement