Lista de mierdas. xd

ON *:JOIN:#: {
  var %n = 1
  while (%n <= $lines(putos-trolls.txt)) {
    if ($nick isin $read(putos-trolls.txt,%n)) {
      mode $chan +b $address($nick,2)
      kick $chan $nick No trolls. xd
    }
    inc %n
  }
}
ON *:TEXT:*:#: {
  if ($level($nick) >= 500) && (!add.n == $strip($1)) {
    write putos-trolls.txt $2
    msg $chan El NiCK $2 a sido agregado a la lista negra. xd
  }
  if ($level($nick) >= 500) && (!del.n == $strip($1)) {
    write -dl putos-trolls.txt $2
    msg $chan El NiCK $2 a sido eliminado de la lista negra. xd
  }