mIRC Home    About    Download    Register    News    Help

Print Thread
#272897 28/08/24 10:25 PM
Joined: Apr 2005
Posts: 122
X
Vogon poet
OP Offline
Vogon poet
X
Joined: Apr 2005
Posts: 122
on !*:OPEN:?:{
if (!$window(@privados)) { window -lke @privados 516 200 1582 253 font arial 15 }
whois $nick
aline @privados 00,04ATENCION $nick 68 |P| $date $active
set %nickq $nick
texto %nickq
}

raw 319:*: { set %canalescom $3- | haltdef }

alias -l texto {
var %mes $replace($asctime(mmmm),January,Enero,February,Febrero,March,Marzo,April,Abril,May,Mayo,June,Junio,July,Julio,August,Agosto,September,Septiembre,October,Octubre,November,Noviembre,December,Diciembre)
var %dia $replace($asctime(dddd),Sunday,Domingo,Monday,Lunes,Tuesday,Martes,Wednesday,MiƩrcoles,Thursday,Jueves,Friday,Viernes,Saturday,Sabado)
echo -q (E)nSesion: %dia $date(dd) de %mes de $date(yyyy)
echo -q 00,02Hora: $time - 00,02Mascara: $address($1,5)
echo -q 00,04Canales: %canalescom
unset %canalescom
}


the var %canalescom doesnt unset well ,any help?

when a nick calls me on private i wawnt to show the active channel of he,any help

Joined: Jul 2014
Posts: 332
Pan-dimensional mouse
Offline
Pan-dimensional mouse
Joined: Jul 2014
Posts: 332
Try it like this:
Code
alias -l texto {
  var %mes $replace($asctime(mmmm),January,Enero,February,Febrero,March,Marzo,April,Abril,May,Mayo,June,Junio,July,Julio,August,Agosto,September,Septiembre,October,Octubre,November,Noviembre,December,Diciembre)
  var %dia $replace($asctime(dddd),Sunday,Domingo,Monday,Lunes,Tuesday,Martes,Wednesday,MiƩrcoles,Thursday,Jueves,Friday,Viernes,Saturday,Sabado)
  echo -q (E)nSesion: %dia $date(dd) de %mes de $date(yyyy)
  echo -q 00,02Hora: $time - 00,02Mascara: $address($1,5)
  if ($comchan($1,0)) && ($1 != $me) {
    var %i = $comchan($1,0),%r
    while (%i) {
      if ($1 !isreg $comchan($1,%i)) { var %p = $left($nick($comchan($1,%i),$1).pnick,1) }
      else { unset %p }
      var %r = %r %p $+ $comchan($1,%i)
      dec %i
    }
    echo -q 00,04Canales comunes: $replace(%r,$chr(32),$chr(44) $chr(32))
  }
}


TECO
irc.PTirc.org (Co-Admin)

Link Copied to Clipboard