Autor Tema: Ventana Whois&Info  (Leído 5830 veces)

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

Red_Erik

  • Visitante
Ventana Whois&Info
« en: Septiembre 27, 2008, 07:10:53 pm »
Reconozco que soy muy curioso. Me gusta hacer whoises e infos a todo quisqui y ver quién fundó tal canal o qué topic hay en aquel otro... ¿Qué mejor para todo esto que disponer de alguna herramienta?

Este es el código. Ya sabes, copy, notepad, paste, etc... (y si no sabes, pregunta que para eso estamos).

Código: [Seleccionar]
on *:START: W-I
menu menubar {
  . Ventana.w-i: W-I
}
alias W-I {
  set %W-I.text $gettok($cb,1,32)
  guiwin @W-I 655 385 150 120 Info
  %W-I.tx = 10 30 125 W-I.text
  %W-I.bt = 10 50 45 W-I.chan CHaN |75 50 45 W-I.nick NiCK |10 80 45 W-I.cb ClipBoard |75 80 45 W-I.cl Clear
  guidib @W-I | window -awh @W-I
}
alias W-I.chan {
  if ( $left(%W-I.text,1) == $chr(35) ) {  mcs info %W-I.text | return }
  set %xnwt $chr(35) $+ %W-I.text |  mcs info %xnwt |  unset %xnwt
}
alias W-I.nick w %W-I.text | mns info %W-I.text | mns status %W-I.text
alias W-I.cb set %W-I.text $gettok($cb,1,32) | guidib @W-I
alias W-I.cl unset %W-I.text | guidib @W-I

Sólo son 4 botones, así que enreda y descubre que hace cada uno de ellos, so fisgón/fisgona...

Ah, si cierras la nueva ventana puedes volver a abrirla desde el menú [IRcap] -> ventana. w-i.

SSakura

  • Visitante
Re: Ventana Whois&Info
« Respuesta #1 en: Septiembre 28, 2008, 02:49:11 am »
Hola

Muy bueno Red_Erik , ya lo he probado y funciona!!!!. Ya sabes que soy una fan de tus addons

:))***

Jon

  • Visitante
Re: Ventana Whois&Info
« Respuesta #2 en: Septiembre 29, 2008, 09:44:07 pm »
Aupa portugalujo!!!
A tu pregunta de quién soy, no se si te servirá pero te diré que soy  lasartearra!!!
Tu código funciona  perfectamente. Yo te haría una petición: ¿no podrías hacer que la ventana pudiera formar parte o ser un elemento más del panel lateral? De esa forma podríamos tenerla, de quererlo, siempre visible lo cual haría más rápido su uso.
Yo también tengo casi todos tus addons, su funcionamiento está garantizado :)
Goraintziak

Red_Erik

  • Visitante
Re: Ventana Whois&Info
« Respuesta #3 en: Septiembre 29, 2008, 10:47:18 pm »
Jope, ahora ya se quien eres, no te había reconocido con "medio nombre" nada mas... un saludo giputxi :P

Intento lo que me sugieres, me parece una buena idea. Un abrazo. :)


Red_Erik

  • Visitante
Re: Ventana Whois&Info
« Respuesta #4 en: Septiembre 30, 2008, 10:40:56 pm »
Bueno, aquí está el código adaptado a la ventana lateral, como pedía el amigo Jon. Solo tres cosas a tener en cuenta:

  • El fichero se debe llamar OBLIGATORIAMENTE sba.whoisinfo.mrc
  • Hay que guardarlo OBLIGATORIAMENTE en la carpeta ..\s\sbar
  • Hay que cargarlo como un elemento de la barra lateral, es decir desde Setup (F3) -> interfaz -> panel y elegir whoisinfo.
Luego podéis tratarlo como un elemento mas de la barra (subirlo, bajarlo, escalarlo, etc...).

Código: [Seleccionar]
alias SBA.whoisinfo {
  sbatit $calc($1 - 12) Whois&Info
  if ($2 < 85) { return }
  set %pos.w.i $1
  w-i
}
alias w-i {
  set %W-I.text $gettok($cb,1,32)
  var %x = %pos.w.i - 1 , %y = %pos.w.i + 25 , %z = $calc($gettok(%sbarra,1,32) -17 )
  var %u = %y + 25 , %v = $chr(124) $+ $calc($gettok(%sbarra,1,32) - 64 )
  %sba.tx = %sba.tx $+ |6 %x %z W-I.text
  %sba.bt = %sba.bt $+  |15 %y 30 W-Ib.chan CHaN %v %y 30 W-Ib.nick NiCK |15 %u 30 W-Ib.cb ClpBrd %v %u 30 W-Ib.cl Clear
  unset %pos.w.i
}
alias W-Ib.chan {
  if ( $left(%W-I.text,1) == $chr(35) ) {  mcs info %W-I.text | return }
  set %xnwt $chr(35) $+ %W-I.text |  mcs info %xnwt |  unset %xnwt
}
alias W-Ib.nick w %W-I.text | mns info %W-I.text | mns status %W-I.text
alias W-Ib.cb set %W-I.text $gettok($cb,1,32) | guidib @sba
alias W-Ib.cl unset %W-I.text | guidib @sba

Espero que os guste, un saludo.

Jon

  • Visitante
Re: Ventana Whois&Info
« Respuesta #5 en: Octubre 03, 2008, 08:57:49 pm »
Kaixo Red_Erik!
Ya he probado  la nueva versión , funciona bien. ¡Eres un artista!
Solo queda darte la gracias.
Saludos!!!

naty

  • Visitante
Re: Ventana Whois&Info
« Respuesta #6 en: Octubre 26, 2008, 01:32:53 pm »
muchisimas gracias!! con lo curiosa que soy yo me viene al pelo!!!  ::)
jeje eres un genio me encanta los addons que haces.
saludos  :D  ;)

Red_Erik

  • Visitante
Re: Ventana Whois&Info
« Respuesta #7 en: Octubre 28, 2008, 08:02:49 pm »
No hay por qué, al contrario. Disfruto haciendo cosas de estas. Solamente hace falta que me deís una idea y si es factible me pongo a mirarlo. Eso si, addons que te planchen la camisa o que te bajen la basura al contenedor todavía no se pueden hacer.  :D

Por otra parte, tengo algunos addons que hice hace tiempo, pero serían demasiado largos para hacer un copypaste. En la actualidad no se pueden descargar de ninguna página ya que estaban alojados en una página que cerraron. Tal vez los administradores del foro tengan algún medio para colgarlos y así dejarlos disponbles para su descarga. Es una idea, ya me contareís.

Saludos.

SSakura

  • Visitante
Re: Ventana Whois&Info
« Respuesta #8 en: Octubre 28, 2008, 10:12:46 pm »
Red_Erik sin problemas, sabes que tus addons son bienvenidos.
Hablaré con Lokiyo  que nos cree la  sección Addons y los ponemos  todos allí , cuando tengas un momento me los mandas y nos ponemos manos a la obra.

Un saludo   ;)

Desconectado Lokiyo

  • Administrador
  • Héroe
  • *****
  • Mensajes: 739
  • Karma: +22/-2
  • Sexo: Masculino
    • El revoltijo de Lokiyo
Re: Ventana Whois&Info
« Respuesta #9 en: Octubre 29, 2008, 02:51:47 pm »
Esto lo hablamos en otro lado ;)

 

anything