On *:Close:@: {
if ($chan($remove($target,@))) part $v1
}
On *:Join:#: {
if ($nick == $me) {
window -h $chan
window -k0el12 $+(@,$chan) 1 1 791 496
}
else {
aline -l 2 $+(@,$chan) $nick
renwin $+(@,$chan) $+(@,$chan) $+([,$nick($chan,0),]) $+([,$chan($chan).mode,]:) Custom Chans coded by Andy..
echo 3 $+(@,$chan) $timestamp *** $nick $+($chr(40),$address,$chr(41)) joins.
}
}
On *:Part:#: {
if ($nick == $me) window -c $+(@,$chan)
else {
dline -l $+(@,$chan) $fline($+(@,$chan),$nick,1,1)
renwin $+(@,$chan) $+(@,$chan) $+([,$calc($nick($chan,0) -1),]) $+([,$chan($chan).mode,]:) Custom Chans coded by Andy..
echo 3 $+(@,$chan) $timestamp *** $nick $+($chr(40),$address,$chr(41)) parts.
}
}
On *:Quit: {
var %x = $comchan($nick,0)
while (%x) {
dline -l $+(@,$comchan($nick,%x)) $fline($+(@,$comchan($nick,%x)),$nick,1,1)
echo 2 $+(@,$comchan($nick,%x)) $timestamp *** $nick has quit IRC $+($chr(40),$1-,$chr(41))
renwin $+(@,$comchan($nick,%x)) $+(@,$comchan($nick,%x)) $+([,$calc($nick($comchan($nick,%x),0) - 1),]) $+([,$chan($comchan($nick,%x)).mode,]:) Custom Chans coded by Andy..
dec %x
}
}
On *:Nick: {
var %x = $comchan($newnick,0)
while (%x) {
dline -l $+(@,$comchan($newnick,%x)) $fline($+(@,$comchan($newnick,%x)),$nick,1,1)
aline -l 2 $+(@,$comchan($newnick,%x)) $nick($comchan($newnick,%x),$newnick).pnick
echo 3 $+(@,$comchan($newnick,%x)) $timestamp *** $nick is now known as $newnick
dec %x
}
}
Raw 324:*: { set %ChanMode $3 }
Raw 366:*: {
renwin $+(@,$2) $+(@,$2) $+([,$nick($2,0),]) $+([,%chanmode,]:) Custom Chans coded by Andy..
var %x = 1
while (%x <= $nick($2,0)) {
aline -l 2 $+(@,$2) $nick($2,%x).pnick
inc %x
}
}
On ^*:Text:*:#: {
echo $+(@,$chan) $timestamp $+(<,$nick,>) $1-
haltdef
}
On *:Input:@: {
if ($left($1,1) == /) return $1-
if ($remove($target,@) ischan) {
msg $ifmatch $1-
echo $target $timestamp $+(<,$me,>) $1-
}
halt
}