Autor Tema: ayuda en lista negra añadir variantes ips  (Leído 56 veces)

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

Desconectado Dino

  • Novato
  • *
  • Mensajes: 37
  • Karma: +0/-40
ayuda en lista negra añadir variantes ips
« en: Noviembre 19, 2020, 09:15:06 pm »
tengo este addons funciona muy bien para agregar nicks en lista negra
trate de agregar la variante que se pueda añadir ips por ejemplo:
*!*@190.55*  o tambien *!*@180.256.39* saque la variante pero solo funciona cuando agrego el identd mas ip por ejemplo:
*!*cucuxo@190.55.36*  solo asi me funciona por favor alguien que me ayuda para que este addosn reconozca toda variante para
agregar ips a las lista negra como por ejemplo: *!*@190.55*  o tambien *!*@180.256.39*

Código: [Seleccionar]
; ####################################
; #         Mr.KOlanG  ScRiPt        #
; #                                  #
; #            BlackList             #
; #                                  #
; ####################################

MenU Channel,status {
  BlaCk List:/dialog -m bl bl
}

;;;; Coding del dialog
dialog bl {
  title "Black List By Mr.KolanG"
  size -1 -1 110 100
  option dbu
  tab "List" 1, 5 5 100 90
  tab "Setup" 2,
  button "Add" 3, 7 85 25 10, tab 1
  button "Remove" 4, 35 85 25 10, tab 1
  list 5, 7 20 95 66, tab 1
  button "Close" 6, 75 85 25 10,
  check "KickBan" 7, 10 80 27 10, tab 2
  box "Setup" 8, 7 57 50 35, tab 2
  check "Kick" 9, 10 66 27 10, tab 2
  box "Reason" 10, 7 23 94 25, tab 2
  edit "" 11, 9 33 90 10, tab 2
}

;;; Coding Alias
alias bl { /dialog -m bl bl }

;;;; Coding eventi dialog
on 1:dialog:bl:init:0:{
  tokenize 32 %blacklist
  /did -a bl 5 $*
  /did -ra bl 11 %blkreason
  if (%blp == 1) { /did -c bl 7 | /did -u bl 9 }
  else { /did -c bl 9 | /did -u bl 7 }
}

on 1:dialog:bl:sclick:6: { /dialog -x bl bl }

on 1:dialog:bl:sclick:3: {
  /set -u5 %badd $input(Nick da addare alla blacklist:,-eq,Blacklist Management")
  if (!%badd) { $input(Nessun nick inserito!,-ow,Errore!) }
  else {
    if ( $istok(%blacklist,%badd,32) ) { var %errore = $input(Nick già blacklistato!,-ow,Errore!) | halt }
    else { %blacklist = $addtok(%blacklist,%badd,32) | did -a bl 5 %badd }
  }
}
on 1:dialog:bl:sclick:4:{
  if ( $did(5).seltext) { /set -u5 %brem $did(5).seltext | %blacklist = $remtok(%blacklist,%brem,1,32) | did -d bl 5 $did(5).sel }
  else { var %errore = $input(Non hai selezionato alcun nick!,-ow,Errore!) }
}

on 1:dialog:bl:edit:11:{
  if ( $did(11).text) { /set %blkreason $did(11).text } | else { /set %blkreason 9,1KolanG Script }
}

on 1:dialog:bl:sclick:7:{ /did -c bl 7 | /did -u bl 9 | /set %blp 1 }
on 1:dialog:bl:sclick:9:{ /did -c bl 9 | /did -u bl 7 | /set %blp 0 }


;;;; Coding Load
on *:join:#:{
  var %x = 32
  if ($istok(%blacklist,$address,%x)) {
    if ( %blp == 0 ) { /kick $chan $nick %blkreason }
    else { /mode # +b $nick | /kick # $nick %blkreason }
  }
  else { return }
}

on *:join:#:{
  if ($istok(%blacklist,$nick,32)) {
    if ( %blp == 0 ) { /kick $chan $nick %blkreason }
    else { /mode # +b $nick | /kick # $nick %blkreason }
  }
  else { return }
}

On *:nick:{
  if ($istok(%blacklist,$newnick,32)) {
    set %ii $comchan($newnick,0)
    if ( %blp == 0 ) { /kick $comchan($newnick,%ii) $newnick %blkreason }
    else { /ban -u300 $comchan($newnick,%ii) $newnick 1 | /kick $comchan($newnick,%ii) $newnick %blkreason }
  }
  else { return }
}

on *:load:{
  /echo -a 4K10o4l10a4n10G 4S10c4r10i4p10t 12v1.0 13,1Blacklist Loaded....
  /set %blkreason KolanG ScRiPt Blacklist
  /set %blp 0
}

Desconectado Cadaver

  • Miembro de pleno derecho
  • ***
  • Mensajes: 101
  • Karma: +138/-3
  • Sexo: Masculino
    • ElChatIRC.com
Re:ayuda en lista negra añadir variantes ips
« Respuesta #1 en: Hoy a las 12:30:52 am »
Dudo que funcione en lo mas mínimo porque no puedes buscar coincidencias con comodines solo con $istok ... dale una repasada a la ayuda de mIRC y lee la sección de Token Identifiers, otra cosa $address solo devuelve ident@host y $nick solo el nickname, anexo el ejemplo funcionando suponiendo que la variable %blacklist contiene los comodines de las direcciones en lista negra en este formato *Nick1* *!baneame@192.168.* o cualquier otro similar, reemplaza tus dos eventos on JOIN por este, para el evento del cambio de nick solo modificalo al mismo ejemplo.

Código: [Seleccionar]
on *:join:#:{
  tokenize 32 %blacklist
  var %x 1
  while %x <= $numtok(%blacklist,32) {
    if ($wildtok($fulladdress,$gettok(%blacklist,%x,32),0,32)) {
      if (%blp == 0) { kick $chan $nick %blkreason }
      else { mode # +b $nick | kick # $nick %blkreason }
    }
    inc %x
  }
}

Desconectado Dino

  • Novato
  • *
  • Mensajes: 37
  • Karma: +0/-40
Re:ayuda en lista negra añadir variantes ips
« Respuesta #2 en: Hoy a las 03:06:38 am »
me funciono bien lo del ip gracias, pero no entendi nada a lo del evento nick me puedes explicar por fa