Forums Scripts & Popups mIRC Color Code finder

alias get_colorindex {
  var %pattern,%a 1
  if ($prop == noback) %pattern = /\x03(\d{1,2})/g
  else %pattern =  /\x03(\d{1,2}(?:,\d{1,2})?)/g
  noop $regex($1-,%pattern)
  while ($regml(%a)) var %r %r $v1,%a %a + 1
  return %r
}