Mensajes recientes

Páginas: [1] 2 3 ... 10
1
Ayuda general IRcap / Re:Código de script.
« Último mensaje por ZeusCZ en Enero 19, 2019, 09:25:16 pm »
buen dia, tienes que revisar el cogido de esa linea, alt+r, pulsas "Alias" de lado derecho esta un botón, llamado "Gotoline" pulsa hay y pones la linea que tiene error, revisa que este de esta manera 
nick $1-
  if $2 != $null anick $2
  if $gettok(%conn.pñ1,3,32) == 1 { %conn.nick = $gettok($gettok($1-,1,58),1,33) | guidibtx @conn %conn.tx | drawline @conn }
}

 si no esta así, puedes modificar y dejarlo así, espero te sirva
2
Ayuda scripting IRcap / Ayuda con un dialog (panel )
« Último mensaje por [FracTaL] en Enero 13, 2019, 05:36:06 am »
Hola, hice un panel de moderación con diferentes elementos, button`s y un menú , para agregar funciones a los buttons no hubo ningún problema, solo usando la sintaxis : on *:dialog:nombreDelDialog:sclick:ID: { Comandos/funciones } . Pero para agregar funciones/comandos a los items contenidos en el menú no se como hacerlo, ni cual es la sintaxis.

Si alguien puede ayudarme con la sintaxis para agregar funciones a los items (al darle click), se lo agradecería.
3
Ayuda scripting IRcap / Re:bans por canales incompatibles
« Último mensaje por kn1ght en Enero 04, 2019, 04:22:37 pm »
podrian poner el codigo completo.... funcionando por favor... seria lo ideal.
4
Ayuda scripting IRcap / Re:ayuda con codigo de lineas y stats
« Último mensaje por Cadaver en Diciembre 24, 2018, 05:21:03 pm »
El código funciona sin problemas, tal cual lo estas poniendo, no me marca ningún error y si hace los conteos.
5
Ayuda scripting IRcap / Re:Hola Necesito Ayuda con el RadioBoT
« Último mensaje por Hercules en Diciembre 22, 2018, 11:27:41 pm »
segunda parte del codigo

on *:UNOTIFY:{ .msg #canaldjs 2Se Ha 4Desconectado 1El Nick 3 $nick  2( $address ) 1A Las 3 $time  }


6
Ayuda scripting IRcap / Re:Hola Necesito Ayuda con el RadioBoT
« Último mensaje por Hercules en Diciembre 22, 2018, 11:26:49 pm »
Hola joikervg  aca te dejo un codigo para lo que estas pidiendo

on *:notify:{ /msg #canaldjs 2Se Ha 3Conectado 2El Nick 3 $nick  1( $address ) 2A Las 2 $time  | /invite  $nick  #canal  | /invite  $nick  #canaldjs |  halt }

7
Ayuda scripting IRcap / Re:ayuda con codigo de lineas y stats
« Último mensaje por Hercules en Diciembre 22, 2018, 09:32:26 pm »
este es el arror ke meda y deme de contar numeros de lineas lo pone como %  * /set: line too long (line 84, lineas.mrc)
8
Ayuda scripting IRcap / Re:ayuda con codigo de lineas y stats
« Último mensaje por Hercules en Diciembre 22, 2018, 09:30:46 pm »
on 1:TEXT:*:#:{
  tokenize 32 $strip($1-)
  write logs/ $+ $chan $+ .mbt $nick $chr(91) $+ 6 $asctime(hh:nn) $asctime(dd/mm/yy) $+ ]: $1-
  if ( $1 == !actualiza ) {
    var %x = 1
    while (%x <= $ini(logs/top.ini,$chan,0)) {
      var %y = $iif(%y,%y $+ $chr(44)) $+ $readini(logs/top.ini,$chan,$ini(logs/top.ini,$chan,%x))
      inc %x
    }
    var %z = $sorttok(%y,44,nr)
    var %numeros = $gettok(%z,1-10,44)
    var %a = 1
    while (%a <= $numtok(%numeros,44)) {
      var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44))
      if ($istok(%c,$readn,32)) { var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44), $calc(%d +1)) }
      var %c = %c $readn, %d = $readn
      if ($gettok(%b,1,61) !isin %nicks) {
        if ($chr(126) isin $gettok(%b,1,61)) {
          if (%top10. [ $+ [ $gettok(%b,1,61) ] ]) { var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ %top10. [ $+ [  $gettok (%b,1,61) ] ] }
          else { var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $gettok(%b,1,61) }
        }
        else { var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $gettok(%b,1,61) }
      }
      inc %a
    }
    if (%nicks) {
      if ($gettok(%nicks,1,44)) { var %1nick = 1 1º .12 $+($gettok(%nicks,1,44),$chr(40),$gettok(%numeros,1,44),$chr (41)) }
      if ($gettok(%nicks,2,44)) { var %2nick = 1 2º .12 $+($gettok(%nicks,2,44),$chr(40),$gettok(%numeros,2,44),$chr (41)) }
      if ($gettok(%nicks,3,44)) { var %3nick =  1 3º .12 $+($gettok(%nicks,3,44),$chr(40),$gettok(%numeros,3,44),$chr (41)) }
      if ($gettok(%nicks,4,44)) { var %4nick = 1 4º .12 $+($gettok(%nicks,4,44),$chr(40),$gettok(%numeros,4,44),$chr (41)) }
      if ($gettok(%nicks,5,44)) { var %5nick = 1 5º .12 $+($gettok(%nicks,5,44),$chr(40),$gettok(%numeros,5,44),$chr (41)) }
      if ($gettok(%nicks,6,44)) { var %6nick = 1 6º .12 $+($gettok(%nicks,6,44),$chr(40),$gettok(%numeros,6,44),$chr (41)) }
      if ($gettok(%nicks,7,44)) { var %7nick = 1 7º .12 $+($gettok(%nicks,7,44),$chr(40),$gettok(%numeros,7,44),$chr (41)) }
      if ($gettok(%nicks,8,44)) { var %8nick = 1 8º .12 $+($gettok(%nicks,8,44),$chr(40),$gettok(%numeros,8,44),$chr (41)) }
      if ($gettok(%nicks,9,44)) { var %9nick = 1 9º .12 $+($gettok(%nicks,9,44),$chr(40),$gettok(%numeros,9,44),$chr (41)) }
      if ($gettok(%nicks,10,44)) { var %10nick = 1 10º . 12 $+($gettok(%nicks,10,44),$chr(40),$gettok(%numeros,10,44), $chr(41)) }
    }
    else { var %1nick = 1no hay nicks en los 4stats. }
    msg $chan   12[Estadisticas] 1del canal  6 $+ $chan $+   12Lineas: 1escritas por los usuarios  5 %1nick   3 %2nick  5  %3nick  6 %4nick  4 %5nick  2 %6nick  3 %7nick  4 %8nick  6 %9nick  5 %10nick
  }
  if ( $1 == !lineas ) {
    if ($2) {
      var %lineas = $readini(logs/top.ini,$chan,$2)
      var %frase = $r(1,%lineas)
      var %frase2 = $read(logs/ $+ $chan $+ .mbt, w,* $+ $2 $+ *,%frase)
      var %total = $readini(Logs/totallines.ini,$chan,Total)
      var %Por = $round($calc($calc(%lineas * 100) / %total),2)
      var %x = 1
      while (%x <= $ini(Logs/top.ini,$chan,0)) {
        var %y = $iif(%y,%y $+ $chr(44)) $+ $readini(Logs/top.ini,$chan,$ini(logs/top.ini,$chan,%x))
        inc %x
      }
      var %numeros = $sorttok(%y,44,nr)
      var %a = 1
      while (%a <= $numtok(%numeros,44)) {
        var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44))
        if ($istok(%c,$readn,32)) { var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44), $calc(%d +1)) }
        var %c = %c $readn, %d = $readn
        var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $iif($gettok(%b,1,61) !isin %nicks,$gettok(%b,1,61))
        inc %a
      }

      if ($readini(logs/top.ini,$chan,$2)) { msg $chan 12Lineas 1escritas por los usuarios   1(  $+ $2 $+  1) 4 $readini (logs/top.ini,$chan,$2) 12 $iif($readini(logs/top.ini,$chan,$2) > 12 1,Lineas,Lineas) 1escritas en 12 $chan  ,1esta en la 12  $findtok(%nicks,$2,1,44)3 $+ º 1,posicion con un 12 %Por $+  %  1de Las Lineas del Canal 4,Frase  Aleatoria3 %frase2 }
      else { msg $chan 12Disculpa,1pero no tengo las estadisticas de 6 nick $2 1en 12 $chan $+ . }
    }
    else {
      var %lineas = $readini(logs/top.ini,$chan,$nick)
      var %frase = $r(1,%lines)
      var %frase2 = $read(logs/ $+ $chan $+ .mbt, w,* $+ $nick $+ *,%frase)
      var %total = $readini(Logs/totallineas.ini,$chan,Total)
      var %Por = $round($calc($calc(%lineas * 100) / %total),2)
      var %x = 1
      while (%x <= $ini(Logs/top.ini,$chan,0)) {
        var %y = $iif(%y,%y $+ $chr(44)) $+ $readini(Logs/top.ini,$chan,$ini(logs/top.ini,$chan,%x))
        inc %x
        var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $iif($gettok(%b,1,61) !isin %nicks,$gettok(%b,1,61))}
      }
      var %numeros = $sorttok(%y,44,nr)
      var %a = 1
      while (%a <= $numtok(%numeros,44)) {
        var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44))
        if ($istok(%c,$readn,32)) { var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44), $calc(%d +1)) }
        var %c = %c $readn, %d = $readn
        inc %a
      }
      if ($readini(logs/top.ini,$chan,$nick)) { msg $chan  1Hola 1-12 $+ $nick $+ 1-  1tienes un total de 4 $readini (logs/top.ini,$chan,$nick) 12 $iif($readini(logs/top.ini,$chan,$nick) > 12 1,Lineas,Lineas) 1escritas en 12 $chan  ,1estas en  la 4 $findtok(%nicks,$nick,1,44)3 $+ º ,1posicion con un  12 %Por $+  %  1de Las Lineas del Canal, 4Frase  Aleatoria3 %frase2
      }
      else { msg $chan 3Disculpa, 1pero no tengo las 12estadisticas 1de nick 6 $nick 1en 12 $chan $+ . }
    }
  }
  else {
    writeini -n logs/top.ini $chan $nick $calc($readini(logs/top.ini,$chan,$nick) + 1)
    writeini -n logs/totallineas.ini $chan Total $calc($readini(logs/totallines.ini,$chan,Total) + 1)
  }
}
9
Ayuda scripting IRcap / ayuda con codigo de lineas y stats
« Último mensaje por Hercules en Diciembre 22, 2018, 09:28:43 pm »
Hola buenas.a ver si me pueden hechar una mano con este codigo que meda error y no salen las lineas enlos canales y tampoco se puede
mirar las lineas de un usuario.

on 1:TEXT:*:#:{
  tokenize 32 $strip($1-)
  write logs/ $+ $chan $+ .mbt $nick $chr(91) $+ 6 $asctime(hh:nn) $asctime(dd/mm/yy) $+ ]: $1-
  if ( $1 == !actualiza ) {
    var %x = 1
    while (%x <= $ini(logs/top.ini,$chan,0)) {
      var %y = $iif(%y,%y $+ $chr(44)) $+ $readini(logs/top.ini,$chan,$ini(logs/top.ini,$chan,%x))
      inc %x
    }
    var %z = $sorttok(%y,44,nr)
    var %numeros = $gettok(%z,1-10,44)
    var %a = 1
    while (%a <= $numtok(%numeros,44)) {
      var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44))
      if ($istok(%c,$readn,32)) { var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44), $calc(%d +1)) }
      var %c = %c $readn, %d = $readn
      if ($gettok(%b,1,61) !isin %nicks) {
        if ($chr(126) isin $gettok(%b,1,61)) {
          if (%top10. [ $+ [ $gettok(%b,1,61) ] ]) { var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ %top10. [ $+ [  $gettok (%b,1,61) ] ] }
          else { var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $gettok(%b,1,61) }
        }
        else { var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $gettok(%b,1,61) }
      }
      inc %a
    }
    if (%nicks) {
      if ($gettok(%nicks,1,44)) { var %1nick = 1 1º .12 $+($gettok(%nicks,1,44),$chr(40),$gettok(%numeros,1,44),$chr (41)) }
      if ($gettok(%nicks,2,44)) { var %2nick = 1 2º .12 $+($gettok(%nicks,2,44),$chr(40),$gettok(%numeros,2,44),$chr (41)) }
      if ($gettok(%nicks,3,44)) { var %3nick =  1 3º .12 $+($gettok(%nicks,3,44),$chr(40),$gettok(%numeros,3,44),$chr (41)) }
      if ($gettok(%nicks,4,44)) { var %4nick = 1 4º .12 $+($gettok(%nicks,4,44),$chr(40),$gettok(%numeros,4,44),$chr (41)) }
      if ($gettok(%nicks,5,44)) { var %5nick = 1 5º .12 $+($gettok(%nicks,5,44),$chr(40),$gettok(%numeros,5,44),$chr (41)) }
      if ($gettok(%nicks,6,44)) { var %6nick = 1 6º .12 $+($gettok(%nicks,6,44),$chr(40),$gettok(%numeros,6,44),$chr (41)) }
      if ($gettok(%nicks,7,44)) { var %7nick = 1 7º .12 $+($gettok(%nicks,7,44),$chr(40),$gettok(%numeros,7,44),$chr (41)) }
      if ($gettok(%nicks,8,44)) { var %8nick = 1 8º .12 $+($gettok(%nicks,8,44),$chr(40),$gettok(%numeros,8,44),$chr (41)) }
      if ($gettok(%nicks,9,44)) { var %9nick = 1 9º .12 $+($gettok(%nicks,9,44),$chr(40),$gettok(%numeros,9,44),$chr (41)) }
      if ($gettok(%nicks,10,44)) { var %10nick = 1 10º . 12 $+($gettok(%nicks,10,44),$chr(40),$gettok(%numeros,10,44), $chr(41)) }
    }
    else { var %1nick = 1no hay nicks en los 4stats. }
    msg $chan   12[Estadisticas] 1del canal  6 $+ $chan $+   12Lineas: 1escritas por los usuarios  5 %1nick   3 %2nick  5  %3nick  6 %4nick  4 %5nick  2 %6nick  3 %7nick  4 %8nick  6 %9nick  5 %10nick
  }
  if ( $1 == !lineas ) {
    if ($2) {
      var %lineas = $readini(logs/top.ini,$chan,$2)
      var %frase = $r(1,%lineas)
      var %frase2 = $read(logs/ $+ $chan $+ .mbt, w,* $+ $2 $+ *,%frase)
      var %total = $readini(Logs/totallines.ini,$chan,Total)
      var %Por = $round($calc($calc(%lineas * 100) / %total),2)
      var %x = 1
      while (%x <= $ini(Logs/top.ini,$chan,0)) {
        var %y = $iif(%y,%y $+ $chr(44)) $+ $readini(Logs/top.ini,$chan,$ini(logs/top.ini,$chan,%x))
        inc %x
      }
      var %numeros = $sorttok(%y,44,nr)
      var %a = 1
      while (%a <= $numtok(%numeros,44)) {
        var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44))
        if ($istok(%c,$readn,32)) { var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44), $calc(%d +1)) }
        var %c = %c $readn, %d = $readn
        var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $iif($gettok(%b,1,61) !isin %nicks,$gettok(%b,1,61))
        inc %a
      }

      if ($readini(logs/top.ini,$chan,$2)) { msg $chan 12Lineas 1escritas por los usuarios   1(  $+ $2 $+  1) 4 $readini (logs/top.ini,$chan,$2) 12 $iif($readini(logs/top.ini,$chan,$2) > 12 1,Lineas,Lineas) 1escritas en 12 $chan  ,1esta en la 12  $findtok(%nicks,$2,1,44)3 $+ º 1,posicion con un 12 %Por $+  %  1de Las Lineas del Canal 4,Frase  Aleatoria3 %frase2 }
      else { msg $chan 12Disculpa,1pero no tengo las estadisticas de 6 nick $2 1en 12 $chan $+ . }
    }
    else {
      var %lineas = $readini(logs/top.ini,$chan,$nick)
      var %frase = $r(1,%lines)
      var %frase2 = $read(logs/ $+ $chan $+ .mbt, w,* $+ $nick $+ *,%frase)
      var %total = $readini(Logs/totallineas.ini,$chan,Total)
      var %Por = $round($calc($calc(%lineas * 100) / %total),2)
      var %x = 1
      while (%x <= $ini(Logs/top.ini,$chan,0)) {
        var %y = $iif(%y,%y $+ $chr(44)) $+ $readini(Logs/top.ini,$chan,$ini(logs/top.ini,$chan,%x))
        inc %x
        var %nicks = $iif(%nicks,%nicks $+ $chr(44)) $+ $iif($gettok(%b,1,61) !isin %nicks,$gettok(%b,1,61))}
      }
      var %numeros = $sorttok(%y,44,nr)
      var %a = 1
      while (%a <= $numtok(%numeros,44)) {
        var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44))
        if ($istok(%c,$readn,32)) { var %b = $read(logs/top.ini,w,*= $+ $gettok(%numeros,%a,44), $calc(%d +1)) }
        var %c = %c $readn, %d = $readn
        inc %a
      }
      if ($readini(logs/top.ini,$chan,$nick)) { msg $chan  1Hola 1-12 $+ $nick $+ 1-  1tienes un total de 4 $readini (logs/top.ini,$chan,$nick) 12 $iif($readini(logs/top.ini,$chan,$nick) > 12 1,Lineas,Lineas) 1escritas en 12 $chan  ,1estas en  la 4 $findtok(%nicks,$nick,1,44)3 $+ º ,1posicion con un  12 %Por $+  %  1de Las Lineas del Canal, 4Frase  Aleatoria3 %frase2
      }
      else { msg $chan 3Disculpa, 1pero no tengo las 12estadisticas 1de nick 6 $nick 1en 12 $chan $+ . }
    }
  }
  else {
    writeini -n logs/top.ini $chan $nick $calc($readini(logs/top.ini,$chan,$nick) + 1)
    writeini -n logs/totallineas.ini $chan Total $calc($readini(logs/totallines.ini,$chan,Total) + 1)
  }
}
10
Ayuda scripting IRcap / Re:Nick Completion en el privado
« Último mensaje por _M3xiC4n0_ en Diciembre 18, 2018, 09:03:56 pm »
esa si me la se
Páginas: [1] 2 3 ... 10