Autor Tema: Palabras prohibidas con lista negra incluido.  (Leído 235 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado DanielGuzman07

  • Novato
  • *
  • Mensajes: 8
  • Karma: +0/-54
Palabras prohibidas con lista negra incluido.
« en: Septiembre 18, 2019, 01:17:41 am »
Hola :D  Disculpen quisiera saber como se puede estructurar un script el cual sea ban por palabras prohibidas, pero que guarde la ip configurada completa y el nick automáticamente en una lista negra y que se puedan descartar nicks/ips.... o sea como un palabras prohibidas con lista negra incluido

Desconectado Cadaver

  • Novato
  • *
  • Mensajes: 32
  • Karma: +33/-1
  • Sexo: Masculino
    • ElChatIRC.com
Re:Palabras prohibidas con lista negra incluido.
« Respuesta #1 en: Septiembre 18, 2019, 04:59:39 pm »
Se puede estructurar teniendo conocimientos mínimos de mSL, lo que pides es fácil de hacer pega el avance de tu código y dinos los errores para ayudarte a corregirlos.

Desconectado DanielGuzman07

  • Novato
  • *
  • Mensajes: 8
  • Karma: +0/-54
Re:Palabras prohibidas con lista negra incluido.
« Respuesta #2 en: Septiembre 18, 2019, 05:11:35 pm »
No tengo un codigo como tal porque no sabia de donde tomarlo o hacerlo, si habria un código a modificar seria el que hizo Quetzalcoatl el cual agradezco... Pero seria un palabras prohibidas que de ban a nick e ip; ejemplo: *trolo*... y que vaya agregando los bans ip/nick a una lista negra para que luego el usuario cuando entre sea baneado.



alias -l _chan return #mexico
alias -l _op return #ops_mexico
; -------- eventos
on *:TEXT:$addban *:*: {
  if (($Nick isop $_chan) || ($chan = $_op)) {
    writeini bans.ini $_chan $2  $2
    writeini bans.ini $_chan $address($2,4) $address($2,4)
    notice $nick $2 es Baneado de $_chan $+ .
    mode $_chan +b $2
  }
}
on *:TEXT:$bans:#: {
  if (($Nick isop $_chan) && ($chan = $_op)) {
    notice $nick $_chan Bans.
    var %c 0
    var %t $ini(bans.ini, $_chan, 0)
    while (%c < %t) {
      inc %c
      notice $nick $readini(bans.ini, $_chan, $ini(bans.ini, $_chan, %c))
    }
    notice $nick %c bans encontrados.
  }
  else { notice $nick Tu No tienes acceso a $_chan $+ .
  }
}
on *:TEXT:$delban *:*: {
  if (($Nick isop $_chan) || ($chan = $_op)) {
    remini bans.ini $_chan $2
    notice $nick $2 es Desbaneado de $_chan $+ .
    mode $_chan -b $2
  }
}
on *:TEXT:$kb *:*: {
  if (($Nick isop $_chan) || ($chan = $_op)) {
    writeini bans.ini $_chan $2 $2
    writeini bans.ini $_chan $address($2,2) $address($2,2)
    mode $_chan +b $address($2,2)
    kick $2 $_chan kickbanned by $nick
  }
}
on *:JOIN:#: {
  if ($readini(bans.ini, $_chan, $nick)) {
    ;/msg $chan encontrado $nick para ban con nick
    mode $_chan +b $address($nick, 2)
    kick $nick $_chan Banned.
  }
  if ($readini(bans.ini, $_chan, $address($nick, 4))) {
    ;/msg $chan encontrado $nick para ban con IP
    mode $_chan +b $address($nick, 2)
    kick $nick $_chan Banned
  }