Mensajes recientes

Páginas: 1 2 [3] 4 5 ... 10
21
Ayuda scripting IRcap / Re:Bot De Invites
« Último mensaje por Hercules en Diciembre 16, 2018, 12:05:20 am »
buenas,joikervg el bot que pides lo tienes para descargar en google. se llama manbot
22
Ayuda scripting IRcap / Re:ayuda codigo
« Último mensaje por Hercules en Diciembre 16, 2018, 12:01:51 am »
alguien me puede ayudar?
23
Ayuda scripting IRcap / ayuda codigo
« Último mensaje por Hercules en Diciembre 14, 2018, 10:36:01 pm »
Hola,queria saber si me pueden ayudar con este codigo que no me suelta las noticias ,las noticias son sacadas de rtve.es On *:CONNECT:{
  joinall
  timernt 0 05 nt
}
on *:sockopen:nt:{
  var %o sockwrite -tn $sockname
  %o GET /rss/temas_tiempo.xml HTTP/1.0
  %o Host: www.rtve.es
  ;%o User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko)
  %o Connection: Keep-Alive
  %o $crlf
}
on *:sockread:nt:{
  sockread -f %nt
  if <item> isin %nt {

    set %item si
  }
  if <title> isin %nt && %item == si {
    set %titulo $xmltag(%nt,title)
    set %title si
    halt
  }

  if <description> isin %nt && %title == si {
    set %description  $sinhtml($xmltag($remove($unicode($xmltag(%nt,description)),<em>),li))
    if %ult != %titulo {   
      .amsg 2T1iempo   4[2R1tve4]  1 $utf8(%titulo)  $+ $utf8($iif(%description, |2 %description)) 
      set %ult %titulo
    }
    if %ult == %titulo {
      unset %item
      unset %title 
      unset %description
      unset %titulo
      unset %nnt
      sockclose $sockname
      halt
    }
    unset %item
    unset %title 
    unset %description
    unset %titulo
    unset %nnt
    sockclose $sockname
    halt
  }
}


on *:sockclose:nt:{
  unset %item %title %titulo %descripcion %titulo %nnt
  unset %nnt
}
alias nospam {
  set -u0 %x $nospam2($1)
  return $remove(%x,http://,http,www.,.com,.org,.net,.es,.ve,&lt,&amp;,#309,:,;p,&gt,;;a,;p&gt;;a,width=130,&lt;/p&gt;&lt;br clear="all"/&gt;,item,title)
}
alias nospam2 {
  return $1
  var %a 1
  while %a <= $numtok($1,32) {
    set -u0 %o %o $gettok($1,%a,32)
    if href= !isin  $gettok($1,%a,32)  http://*.* !iswm $gettok($1,%a,32) && $count($gettok($1,%a,32),/) < 1 if &lt !isin %o && align= !isin %o && heigh !isin %o && border="0" !isin %o && width= !isin %o &&  :p& !isin %o { 
      set -u0 %ns %ns $gettok($1,%a,32)
    }
    inc %a
  }
  return %ns
}
alias xmltag { var %a = $pos($1,< $+ $2) , %b = $pos($1,</ $+ $2 $+ >) , %c = $pos($1,< $+ $2 $+ />) | if (%c) { return } | else { return $gettok($mid($1,%a,$calc(%b - %a)),2,62) } }
alias nt {
  if $sock(nt) { sockclose nt }
  sockopen nt www.rtve.es 80
}
alias utf8 { return $replace($remove($1-,Â),á,á,ó,ó,ú,ú,í,í,é,é,ñ,ñ,Ó,Ó,ç,ç,Á,Á,ü,ü,Ú,Ú,&aacute;,á,&eacute;,é,&iacute;,í,&oacute;,ó,&uacute;,ú,&quot;,",&ntilde;,ñ,&ordf;,ª,&ccedil;,ç,&ldquo;,«,&rdquo;,»,&iexcl;,¡,ñ,ñ,&ordm;,º,&uuml;,ü,ú,ú,á,á) }
alias unicode { return $replace($1,&lt;,<,&gt;,>,&amp;,&,&quot;,",&aacute;,á,&agrave;,à,&eacute;,é,&egrave;,è,&iacute;,í,&igrave;,ì,&oacute;,ó,&ograve;,ò,&uacute;,ú,&ugrave;,ù,&auml;,ä,&acirc;,â,&euml;,ë,&ecirc;,ê,&iuml;,ï,&icirc;,î,&ouml;,ö,&ocirc;,ô,&uuml;,ü,&ucirc;,û,&aring;,å,&atilde;,ã,&ccedil;,ç,&ntilde;,ñ,&Yacute;,Ý,&otilde;,õ,&yacute;,ý,&Oslash;,Ø,&yuml;,ÿ,&oslash;,ø,&THORN;,Þ,&ETH;,Ð,&thorn;,þ,&eth;,ð,&AElig;,Æ,&szlig;,ß,&aelig;,æ,&frac14;,¼,&nbsp;,$chr(32),&frac12;,½,&iexcl;,¡,&frac34;,¾,&pound;,£,&copy;,©,&yen;,¥,&reg;,®,&sect;,§,&ordf;,ª,&curren;,¤,&sup2;,²,&brvbar;,¦,&macr;,¯,&not;,¬,&laquo;,«,&acute;,´,&uml;,¨,&raquo;,»,&cedil;,¸,&iquest;,¿) }
alias sinhtml {
  var %a =  $+ $1- $+ 
  if (< !isin $gettok(%a,1,62)) { if (> isin %a) %a =  $+ $gettok(%a,2-,62) }
  :L1 | if (*<*>* iswm %a) { %a = $gettok(%a,1,60) $+ $gettok(%a,2-,62) | goto L1 }
  return $replace($remove($gettok(%a,1,60),),&nbsp;,$chr(32))
}
24
Ayuda IRC y otras cosas relacionadas / Re:saltarse g-line
« Último mensaje por mask man en Diciembre 12, 2018, 12:44:59 pm »
como na vpn,si esqu eme g-linean cada 2 x 3 estoy hasta la picha
25
Ayuda IRC y otras cosas relacionadas / Re:saltarse g-line
« Último mensaje por KoRn en Diciembre 12, 2018, 04:36:22 am »
hola bien facil como usar una vpn si usas ircap sepas q deja un registro aunq uses la vpn asi q borralo jajajajaajj
26
Ayuda IRC y otras cosas relacionadas / Re:Perfeccionar addons
« Último mensaje por Cadaver en Diciembre 11, 2018, 06:07:35 pm »
Post viejo pero te voy a responder por si todavía lo necesitas. Solo tienes que ir añadiendo las palabras como abajo se muestran de los nicks que quieres banear y patear, crear un nuevo archivo de texto llamado nicks.txt y agregas en forma de listado los nicks que no quieres banear como ejemplo en ambos casos banearemos todo lo que contenga *ano* pero para no banear a Emiliano, Maximiliano, Cipriano, o cualquier otro nick que tu desees que contenga *ano* lo agregas al archivo nicks.txt en la carpeta de los scripts de mIRC.

### Esta parte es para cuando entran al canal ###
Código: [Seleccionar]
on *:JOIN:*:{
  if (*ano* iswm $nick) || (*palabra1* iswm $nick) || (*palabra2* iswm $nick)  || (*palabra3* iswm $nick)  || (*palabra4* iswm $nick)  || (*palabra5* iswm $nick) {
    if ($read($mircdirscripts\nicks.txt, w,  $+(*,$nick,*)) = $null) { mode $chan +b $address($nick,2) | kick chan $nick Aquí va tu mensaje de patada. }
  }
}

### Esta parte es para el cambio de nicks ###
Código: [Seleccionar]
on *:NICK:{
  if (*ano* iswm $newnick) || (*palabra1* iswm $newnick) || (*palabra2* iswm $newick)  || (*palabra3* iswm $newnick)  || (*palabra4* iswm $newnick)  || (*palabra5* iswm $newnick) {
    if ($read($mircdirscripts\nicks.txt, w,  $+(*,$newnick,*)) = $null) { mode $chan +b $address($newnick,2) | kick $chan $newnick Aquí va tu mensaje de patada. }
  }
}
27
Ayuda scripting IRcap / Re:Ayuda ctcp version
« Último mensaje por Cadaver en Diciembre 11, 2018, 12:56:14 am »
Post viejo pero te voy a responder por si lo necesitas todavía.

;Si quieres que funcione para todos los canales usas "on *:JOIN:*:{" si quieres un canal especifico usas "on *:JOIN:#AquiTuCanal:{"
on *:JOIN:*:{
  ctcp $nick VERSION
}

on *:CTCPREPLY:*:{
  if (lightIRC 1.3.2 Build 135 isin $1-) && ($me isop $chan) {
    ;Si quieres que funcione para todos los canales usas "mode $chan +v $nick" si quieres un canal especifico usas "mode #AquiTuCanal +v $nick"
    mode $chan +v $nick
  }
}

Cabe aclarar que si es un canal con demasiadas entradas y salidas de usuarios te puede ocasionar caída por flood.
28
Ayuda scripting IRcap / Re:Ban IP $address
« Último mensaje por Cadaver en Diciembre 11, 2018, 12:30:43 am »
Te falta definir en que evento quieres hacerlo, pero suponiendo que es en un JOIN el código es el siguiente:

on *:JOIN:*:{
  if (.o8r.e87num.IP isin $address($nick,2)) && ($me isop $chan) {
    mode $chan +b $address($nick,2)
    ;Te falta mencionar si lo quieres patear en dado caso agregas también lo siguiente
    kick $chan $nick Aquí va la razón de la patada
  }
}
29
Ayuda general IRcap / Re:Addon que detecte malos nicks pero que expulse al ip
« Último mensaje por Cadaver en Diciembre 11, 2018, 12:10:47 am »
Ya ha pasado casi un año pero ahí te va y no expulsas a la ip, expulsas al nick y baneas a la ip.

on *:JOIN:#:{
  if (palabra1 isin $nick) || (palabra2 isin $nick)  || (palabra3 isin $nick)  || (palabra4 isin $nick)  || (palabra5 isin $nick) {
    if ($me isop $chan {
      ;Te dejo los diferentes tipos de ban y tu eliges el que quieras usar, el que mencionas a la *!*@IP es el metodo $address($nick,2)
      ;Banea *!ident@host.dominio
      mode $chan +b $address($nick,0)
      ;Banea *!*ident@host.dominio
      mode $chan +b $address($nick,1)
      ;Banea *!*@host.dominio
      mode $chan +b $address($nick,2)
      ;Banea *!*ident@host.dominio
      mode $chan +b $address($nick,3)
      ;Banea *!*@host.dominio
      mode $chan +b $address($nick,4)
      ;Banea nick!ident@host.dominio
      mode $chan +b $address($nick,5)
      ;Banea nick!*ident@host.dominio
      mode $chan +b $address($nick,6)
      ;Banea nick!*@host.dominio
      mode $chan +b $address($nick,7)
      ;Banea nick!*ident@host.dominio
      mode $chan +b $address($nick,8)
      ;Banea nick!*@host.dominio
      mode $chan +b $address($nick,9)
      kick $chan $nick Aquí va tu mensaje.
    }
  }
}
30
Si eres un simple usuario de un servidor irc no puedes, solo puedes usar las notificaciones por nick ALT+N.
Páginas: 1 2 [3] 4 5 ... 10
anything