hola buenas, Feliz Navidad
me repase el código que me brindaste Cadaver y lo tome como referencia y como no soy experto en el tema, modifique uno que uso para la entrada de nick prohibidos con un archivo de texto para agregar rangos de ip y tras estar r que r (prueba y error) jejejejeje. di con la solución de lo que necesito pero fue muy gratificante tu consejo e idea. muchas gracias por la ayuda.
dejo codigo por si alguien le puede servir:
on *:join:#canaldebug: {
$Rangoip($nick)
}
alias Rangoip {
var %cuentaRangos = 1
while (%cuentaRangos <= $lines(archivo.txt)) {
if ($read(archivo.txt,%cuentaRangos) isin $address($nick,2)) || ($read(archivo.txt,%cuentaRangos) iswm $address($nick,2)) {
echo -m Atento!! Entra a $chan $+(>>>>[ $chr(2),$nick,$chr(2) [,$address,]<<<<) Usuario vigilado
halt
}
inc %cuentarangos
}
}
alias adrangoip {
:AgregarRango
write archivo.txt $$?="Escribe aquí el Rango de ip"
echo -s » » » » » Rango de ip $! ha sido agregado!
goto AgregarRango
}
alias brangoip {
if ($1 != $null) {
if ($read(archivo.txt,w,$1) != $null) { write -dl $+ $readn archivo.txt | echo -s » » » » » El Rango ip $1 ha sido borrado }
else echo -s » » » » » Rango ip $1 no existe!
}
}
alias lrangoip {
echo -se Listado de Rangos de ip's (Total: $lines(archivo.txt) $+ ):
var %nicks = 0
:SumaNums
inc %nicks
if (%nicks <= $lines(archivo.txt)) echo -s $read(archivo.txt,%nicks)
else { echo -se $+ $str(¯,33) | return }
goto SumaNums
}
PD: ami me va de lujo introduces un rango de ip tomamos el ejemplo: AU31fE y cuando entra alguien con ese rango de ip salta el mensaje : Atento!! Entra a #canaldebug >>>>[nick [nick@123.456.AU31fE.IP]<<<< Usuario vigilado. alguna mejora sera bien recibida gracias
