x-chat theme w/ extras
Posted by kobif
Tuesday, May 25, 2004
Description: theme based on xchat
; ##########################################
; # Theme #
; # X-Chat #
; # #
;#########################################
;;basic stuff
on *:DNS:{
var %n = $dns(0)
echo -a «« DNS on $nick »»
echo -a [ found %n addresses
while (%n > 0) {
echo -a [ [^U]d[^U]ns[^B]:[^B] $dns(%n) [^U]a[^U]ddr[^B]:[^B] $dns(%n).addr [^U]i[^U]p[^B]:[^B] $dns(%n).ip
echo -a «« end of DNS »»
dec %n
halt
}
}
on ^*:join:#: {
if ($nick == $me) {
echo $chan $enterprefix $+ [^K]0 $+ You $+ [^B][^K]15 are now talking on [^K]11 $+ $chan
haltdef
}
else {
echo $chan $enterprefix $+ $nick $+ [^B] [^K]14([^K]10 $+ $remove($address($nick,0),*!) $+ [^K]14)[^K]15 has joined [^K]11 $+ $chan[^K]
haltdef
}
}
on ^*:part:#: {
if ($nick == $me) {
echo $chan $dashprefix [^B][^K]0 $+ You $+ [^B][^K]15 have left channel [^K]11 $+ $chan
haltdef
}
else {
if ($1) {
echo $chan $exitprefix $+ $nick $+ [^K]14([^K]15 $+ $remove($address($nick,0),*!) $+ [^K]14)[^K]15 has left $chan [^K]14([^K]15 $+ $1- $+ [^K]14)
haltdef
}
else {
echo $chan $exitprefix $+ $nick $+ [^K]14([^K]15 $+ $remove($address($nick,0),*!) $+ [^K]14)[^K]15 has left $chan
haltdef
}
}
}
on ^*:op:#: {
echo $chan $dashprefix $+ $nick gives Channel Operator status to $opnick
haltdef
}
on ^*:deop:#: {
echo $chan $dashprefix $+ $nick removes Channel Operator status from $opnick
haltdef
}
on ^*:kick:#: {
echo $chan $exitprefix $+ $nick has kicked $knick from $chan [^K]14([^K]15 $+ $1- $+ [^K]14)[^K]
haltdef
}
on ^*:ban:#: {
echo $chan $dashprefix $+ $nick sets ban on $2-
haltdef
}
on ^*:unban:#: {
echo $chan $dashprefix $+ $nick removes ban on $2
haltdef
}
on ^*:topic:#: {
echo $chan $dashprefix $+ $nick has changed the topic to: $1-
haltdef
}
on ^*:voice:#: {
echo $chan $dashprefix $+ $nick gives voice to $vnick
haltdef
}
on ^*:devoice:#: {
echo $chan $dashprefix $+ $nick removes voice from $vnick
haltdef
}
on ^*:mode:#: {
echo $chan $dashprefix $+ $nick sets mode $1- $chan
haltdef
}
on ^*:quit: {
if ($comchan($nick,0) == 1) {
echo $comchan($nick,1) $exitprefix $+ $nick has quit [^K]14([^K]15 $+ $1- $+ [^K]14)
haltdef
}
else {
set %channum 1
while (%channum <= $comchan($nick,0)) {
set %channels $comchan($nick,%channum)
echo %channels $exitprefix $+ $nick has quit [^K]14([^K]15 $+ $2- $+ [^K]14)
haltdef
inc %channum
}
}
}
;;channel input altering
on *:input:#: {
if ($left($1-,1) == /) {
if ($left($1-,3) == /me) {
.describe $chan $remove($1-,/me)
echo $chan [^K]15 $+ $timestamp [^K]13* $me $remove($1-,/me)
haltdef
}
elseif ($left($1-,5) == /amsg) {
set %chanamsg 1
while (%chanamsg <= $chan(0)) {
set %channumamsg $chan(%chanamsg)
set %channelamsg $remove($1-,$left($1-,5))
echo %channumamsg [^K]15 $+ $timestamp [^B][^K]6<[^B][^K]15 $+ $me $+ [^B][^K]6>[^B][^K]15 %channelamsg
haltdef
inc %chanamsg
}
.amsg %channelamsg
}
elseif ($left($1-,4) == /ame) {
set %chaname 1
while (%chaname <= $chan(0)) {
set %channumame $chan(%chaname)
set %channelame $remove($1-,$left($1-,4))
echo %channumame [^K]15 $+ $timestamp [^K]13* $nick %channelame
haltdef
inc %chaname
}
.ame %channelame
}
elseif ($left($1-,7) == /notice) {
.notice $remove($1-,/notice)
set %notice1 $remove($1-,$1-2)
//echo -a [^K]15 $+ $timestamp [^K]9>[^K]15 $+ $2 $+ [^K]9<[^K]15 $+ %notice1
haltdef
}
elseif ($left($1-,4) == /msg) {
.msg $remove($1-,/msg)
set %msg $remove($1-,$1-2)
//echo -a [^K]15 $+ $timestamp [^K]9>[^K]15 $+ $2 $+ [^K]9<[^K]15 $+ %msg
haltdef
}
}
else {
.msg $chan $1-
echo $chan [^K]15 $+ $timestamp [^B][^K]6<[^B][^K]15 $+ $nick $+ [^B][^K]6>[^B][^K]15 $1-
haltdef
}
}
;;query input altering
on *:input:?: {
if ($left($1-,1) == /) {
if ($left($1-,3) == /me) {
.describe $active $remove($1-,/me)
echo $active [^K]15 $+ $timestamp [^K]13* $me $remove($1-,/me)
haltdef
}
elseif ($left($1-,5) == /amsg) {
set %chanamsg 1
while (%chanamsg <= $chan(0)) {
set %channumamsg $chan(%chanamsg)
set %channelamsg $remove($1-,$left($1-,5))
echo %channumamsg [^K]15 $+ $timestamp [^B][^K]6<[^B][^K]15 $+ $me $+ [^B][^K]6>[^B][^K]15 %channelamsg
haltdef
inc %chanamsg
}
.amsg %channelamsg
}
elseif ($left($1-,4) == /ame) {
set %chaname 1
while (%chaname <= $chan(0)) {
set %channumame $chan(%chaname)
set %channelame $remove($1-,$left($1-,4))
echo %channumame [^K]15 $+ $timestamp [^K]13* $nick %channelame
haltdef
inc %chaname
}
.ame %channelame
}
elseif ($left($1-,7) == /notice) {
.notice $remove($1-,/notice)
set %notice1 $remove($1-,$1-2)
//echo -a [^K]15 $+ $timestamp [^K]9>[^K]15 $+ $2 $+ [^K]9<[^K]15 $+ %notice1
haltdef
}
elseif ($left($1-,4) == /msg) {
.msg $remove($1-,/msg)
set %msg $remove($1-,$1-2)
//echo -a [^K]15 $+ $timestamp [^K]9>[^K]15 $+ $2 $+ [^K]9<[^K]15 $+ %msg
haltdef
}
}
else {
.msg $active $1-
echo $active [^K]15 $+ $timestamp [^B][^K]6<[^B][^K]15 $+ $me $+ [^B][^K]6>[^B][^K]15 $1-
haltdef
}
}
;;dcc chat input altering
on *:input:=: {
if ($left($1-,1) == /) {
if ($left($1-,3) == /me) {
.describe $active $remove($1-,/me)
echo $active [^K]15 $+ $timestamp [^K]13* $me $remove($1-,/me)
haltdef
}
elseif ($left($1-,5) == /amsg) {
set %chanamsg 1
while (%chanamsg <= $chan(0)) {
set %channumamsg $chan(%chanamsg)
set %channelamsg $remove($1-,$left($1-,5))
echo %channumamsg [^K]15 $+ $timestamp [^B][^K]6<[^B][^K]15 $+ $me $+ [^B][^K]6>[^B][^K]15 %channelamsg
haltdef
inc %chanamsg
}
.amsg %channelamsg
}
elseif ($left($1-,4) == /ame) {
set %chaname 1
while (%chaname <= $chan(0)) {
set %channumame $chan(%chaname)
set %channelame $remove($1-,$left($1-,4))
echo %channumame [^K]15 $+ $timestamp [^K]13* $nick %channelame
haltdef
inc %chaname
}
.ame %channelame
}
elseif ($left($1-,7) == /notice) {
.notice $remove($1-,/notice)
set %notice1 $remove($1-,$1-2)
//echo -a [^K]15 $+ $timestamp [^K]9>[^K]15 $+ $2 $+ [^K]9<[^K]15 $+ %notice1
haltdef
}
elseif ($left($1-,4) == /msg) {
.msg $remove($1-,/msg)
set %msg $remove($1-,$1-2)
//echo -a [^K]15 $+ $timestamp [^K]9>[^K]15 $+ $2 $+ [^K]9<[^K]15 $+ %msg
haltdef
}
}
else {
.msg $active $1-
echo $active [^K]15 $+ $timestamp [^B][^K]6<[^B][^K]15 $+ $me $+ [^B][^K]6>[^B][^K]15 $1-
haltdef
}
}
on *:input:*: {
if ($active == status window) {
if ($left($1-,1) == /) {
if ($left($1-,5) == /amsg) {
set %chanamsg 1
while (%chanamsg <= $chan(0)) {
set %channumamsg $chan(%chanamsg)
set %channelamsg $remove($1-,$left($1-,5))
echo %channumamsg [^K]15 $+ $timestamp [^B][^K]6<[^B][^K]15 $+ $me $+ [^B][^K]6>[^B][^K]15 %channelamsg
haltdef
inc %chanamsg
}
.amsg %channelamsg
}
elseif ($left($1-,4) == /ame) {
set %chaname 1
while (%chaname <= $chan(0)) {
set %channumame $chan(%chaname)
set %channelame $remove($1-,$left($1-,4))
echo %channumame [^K]15 $+ $timestamp [^K]13* $nick %channelame
haltdef
inc %chaname
}
.ame %channelame
}
}
}
}
on ^*:text:*:#: {
echo $chan [^K]15 $+ $timestamp [^B][^K]12<[^B][^K]15 $+ $nick $+ [^B][^K]12>[^B][^K]15 $1-
haltdef
}
on ^*:text:*:?: {
echo $query($nick) [^K]15 $+ $timestamp [^B][^K]12<[^B][^K]15 $+ $nick $+ [^B][^K]12>[^B][^K]15 $1-
haltdef
}
;;dcc chat incoming text altering
on ^*:chat:*: {
if ($left($1-,7) == ACTION) {
set %dccaction $remove($1-,ACTION)
set %dccaction2 $remove(%dccaction,)
echo =$nick [^K]15 $+ $timestamp [^K]13* [^K]6 $+ $nick %dccaction2
haltdef
}
else {
echo =$nick [^K]15 $+ $timestamp [^B][^K]12<[^B][^K]15 $+ $nick $+ [^B][^K]12>[^B][^K]15 $1-
haltdef
}
}
on ^*:action:*:#: {
if ($nick == $me) {
echo $chan [^K]15 $+ $timestamp [^K]6* $+ $nick $1-
haltdef
}
else {
echo $chan [^K]15 $+ $timestamp [^K]13* [^K]6 $+ $nick $1-
haltdef
}
}
on ^*:action:*:?: {
echo $query($nick) [^K]15 $+ $timestamp [^K]13* [^K]6 $+ $nick $1-
haltdef
}
on ^*:NICK: {
if ($nick == $me) {
set %channick 1
while (%channick <= $comchan($newnick,0)) {
set %channumnick $comchan($newnick,%channick)
echo %channumnick $dashprefix $+ [^B]You[^B] are now known as $newnick
haltdef
inc %channick
}
echo -s $dashprefix $+ [^B]You[^B] are now known as $newnick
haltdef
}
else {
set %channick 1
while (%channick <= $comchan($newnick,0)) {
set %channumnick $comchan($newnick,%channick)
echo %channumnick $dashprefix $+ $nick is now known as $newnick
haltdef
inc %channick
}
}
}
;########### - <Newzbin Posts from #stu> - ;###########
on ^*:notice:*:*: {
if ($nick == Stu) {
haltdef
if ($window(@Posts) == $null) {
/window -k0lmg2s @Posts
}
iline @Posts 1 $timestamp $1-
titlebar @Posts ] [ -= $line(@Posts,0) Lines =-
}
if (%editorurl == $null) { set %editorurl editors }
if ($comchan($nick,0) == 1) {
echo $chan [^K]15 $+ $timestamp [^B][^K]12-[^B][^K]13 $+ $nick $+ [^B][^K]12-[^B][^K]15 $1-
haltdef
}
if ($nick == NickServ) || ($nick == ChanServ) || ($nick == MemoServ) || ($nick == HelpServ) || ($nick == OperServ) {
echo -s [^K]15 $+ $timestamp [^B][^K]12-[^B][^K]13 $+ $nick $+ [^B][^K]12-[^B][^K]15 $1-
haltdef
}
else {
set %noticenick 1
while (%noticenick <= $comchan($nick,0)) {
set %noticenumnumnick $comchan($nick,%noticenick)
echo %noticenumnumnick [^K]15 $+ $timestamp [^B][^K]12-[^B][^K]13 $+ $nick $+ [^B][^K]12-[^B][^K]15 $1-
haltdef
inc %noticenick
}
}
}
;########### - </Newzbin Posts from #stu> - ;###########
on ^*:snotice:*: {
echo -s [^K]15 $+ $timestamp [^B][^K]12- $+ [^B][^K]13 $+ $server $+ [^B][^K]12- [^B][^K]15 $+ $1-
haltdef
}
on *:disconnect: {
echo -s $dashprefix $+ Disconnected().
haltdef
}
;;raws
raw 331:*: {
echo -a $2 $dashprefix $+ $3 $4 $5 $remove($6,.) for $2 $+ .
halt
}
raw 332:*: {
echo -a $2 $dashprefix $+ Topic for [^K]11 $+ $2 [^K]15is [^K]11 $+ $3-
halt
}
raw 333:*: {
echo -a $2 $dashprefix $+ Topic set by [^K]11 $+ $3 [^K]15on [^K]11 $+ $asctime($4-)
halt
}
raw 311:*: {
echo -a $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 [^K]14([^K]15 $+ $3 $+ @ $+ $4 $+ [^K]14)[^K]15 : $6-
halt
}
raw 319:*: {
echo -a $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3-
halt
}
raw 312:*: {
echo -a $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3 : $+ $4-
halt
}
raw 307:*: {
echo -a $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3-
halt
}
raw 317:*: {
echo -a $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 idle [^K]11 $+ $duration($3) $+ [^K]15, signon: [^K]11 $+ $asctime($4)
halt
}
raw 432:*: {
echo -s [^K]15 $+ $timestamp $+ [^K]15-[^K]11-- [^K]15 $+ $2 : $+ $3-
halt
}
raw 318:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3-
halt
}
raw 314:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 [^K]14([^K]15 $+ $3 $+ @ $+ $4 $+ [^K]14)[^K]15 : $6
halt
}
raw 369:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3-
halt
}
raw 406:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3-
halt
}
raw 301:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 is away: $3-
halt
}
raw 313:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3-
halt
}
raw 306:*: {
echo $dashprefix $+ [^K]15 $2-
halt
}
raw 305:*: {
echo $dashprefix $+ [^K]15 $2-
halt
}
raw 353:*: {
if ($chan($3)) {
echo $3 $dashprefix $+ [^K]11Users on $3 $+ : [^K]15 $+ $4-
haltdef
}
else {
echo -s $dashprefix $+ [^K]11Users on $3 $+ : [^K]15 $+ $4-
haltdef
}
}
raw 366:*: {
haltdef
}
raw 352:*: {
if ($chan($2)) {
echo $2 $dashprefix $+ $3-
haltdef
}
else {
echo -s $dashprefix $+ $3-
haltdef
}
}
raw 315:*: {
if ($chan($2)) {
echo $2 $dashprefix $+ $2 : $+ $3-
haltdef
}
else {
echo -s $dashprefix $+ $2 : $+ $3-
haltdef
}
}
raw 001:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 002:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 003:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 004:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 005:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 006:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 007:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 251:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 252:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 253:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 254:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 255:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 265:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 266:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 422:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 375:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 372:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 376:*: {
echo $dashprefix $+ $2-
haltdef
}
raw 431:*: {
echo $dashprefix $+ $2- for whois.
haltdef
}
raw 310:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 $3-
halt
}
raw 256:*: {
echo $dashprefix $+ $2-
halt
}
raw 257:*: {
echo $dashprefix $+ $2-
halt
}
raw 258:*: {
echo $dashprefix $+ $2-
halt
}
raw 259:*: {
echo $dashprefix $+ $2-
halt
}
raw 423:*: {
echo $dashprefix $+ $2-
halt
}
raw 441:*: {
echo $3 $dashprefix $+ can't kick $2 $+ . (isn't on $3 $+ .)
halt
}
raw 280:*: {
echo $dashprefix $+ $2-
halt
}
raw 281:*: {
echo $dashprefix $+ $2-
halt
}
raw 512:*: {
echo $dashprefix $+ $2-
halt
}
raw 371:*: {
echo $dashprefix $+ $2-
halt
}
raw 374:*: {
echo $dashprefix $+ $2-
halt
}
raw 341:*: {
echo $3 $dashprefix $+ You're inviting $2 to [^K]11 $+ $3 $+ [^K]15.
echo -s $dashprefix $+ You're inviting $2 to [^K]11 $+ $3 $+ [^K]15.
halt
}
raw 443:*: {
echo $3 $dashprefix $+ $2 is already on [^K]11 $+ $3 $+ [^K]15.
echo -s $dashprefix $+ You're inviting $2 to [^K]11 $+ $3 $+ [^K]15.
halt
}
raw 482:*: {
echo $2 $dashprefix $+ You're not a channel operator.
halt
}
raw 405:*: {
echo $dashprefix $+ You're on too many channels to join [^K]11 $+ $2 $+ [^K]15.
halt
}
;########### - <Target Change too Fast fix> - ;###########
raw 439:*: {
.timer.autojoin. $+ $2 1 $calc($9 + 30) join -n $2
if ($chan($2)) echo $dashprefix $+ $2-
halt
}
;########### - </Target Change too Fast fix> - ;###########
raw 471:*: {
echo $dashprefix $+ Can't join [^K]11 $+ $2 $+ [^K]15. (full)
halt
}
raw 473:*: {
echo $dashprefix $+ Can't join [^K]11 $+ $2 $+ [^K]15. (invite-only)
halt
}
raw 474:*: {
echo $dashprefix $+ Can't join [^K]11 $+ $2 $+ [^K]15. (banned)
halt
}
raw 475:*: {
echo $dashprefix $+ Can't join [^K]11 $+ $2 $+ [^K]15. (password-protected)
jpw
halt
}
raw 477:*: {
echo $dashprefix $+ Can't join [^K]11 $+ $2 $+ [^K]15. (need registered nick)
halt
}
raw 485:*: {
echo $dashprefix $+ Can't join [^K]11 $+ $2 $+ [^K]15. Channel is Q-lined. (reason: $3 $+ )
halt
}
raw 403:*: {
echo $dashprefix $+ No such channel. [^K]11 $+ $2 $+ [^K]15.
halt
}
raw 461:*: {
echo $dashprefix $+ Not enough parameters for $2 $+ .
halt
}
raw 263:*: {
echo $dashprefix $+ Server load is too heavy at the moment. try again later.
halt
}
raw 401:*: {
echo $dashprefix $+ [^B][^K]12[[^B][^K]15 $+ $2 $+ [^B][^K]12][^B][^K]15 is not on irc.
halt
}
raw 402:*: {
echo $dashprefix $+ $2 $+ : $3-
halt
}
raw 404:*: {
if ($chan($2)) {
echo $2 $dashprefix $+ Cannot send to [^K]11 $+ $2 $+ [^K]15.
halt
}
else {
echo $dashprefix $+ Cannot send to [^K]11 $+ $2 $+ [^K]15.
halt
}
}
raw 407:*: {
echo $dashprefix $+ $2 $+ : $3-
halt
}
raw 409:*: {
echo $dashprefix $+ $2-
halt
}
raw 411:*: {
echo $dashprefix $+ $2-
halt
}
raw 413:*: {
echo $dashprefix $+ $2-
halt
}
raw 414:*: {
echo $dashprefix $+ $2-
halt
}
raw 416:*: {
echo $dashprefix $+ $2-
halt
}
raw 421:*: {
echo $dashprefix $+ $2-
halt
}
raw 433:*: {
echo $dashprefix $+ $2-
halt
}
raw 436:*: {
echo $dashprefix $+ $2-
halt
}
raw 437:*: {
echo $dashprefix $+ $2-
halt
}
raw 438:*: {
echo $dashprefix $+ $2-
halt
}
raw 445:*: {
echo $dashprefix $+ $2-
halt
}
raw 446:*: {
echo $dashprefix $+ $2-
halt
}
raw 451:*: {
echo $dashprefix $+ $2-
halt
}
raw 455:*: {
echo $dashprefix $+ $2-
halt
}
raw 462:*: {
echo $dashprefix $+ $2-
halt
}
raw 467:*: {
if ($chan($2)) {
echo $2 $dashprefix $+ $3-
halt
}
else {
echo $dashprefix $+ $2-
halt
}
}
raw 468:*: {
if ($chan($2) {
echo $2 $dashprefix $+ $3-
halt
}
else {
echo $dashprefix $+ $2-
halt
}
}
raw 472:*: {
echo $dashprefix $+ $2 is an unknown mode to the IRC server.
halt
}
raw 478:*: {
if ($chan($2)) {
echo $2 $dashprefix $+ Can't set ban on $3 $+ . [^K]11 $+ $2 $+ [^K]15's banlist is full.
halt
}
else {
echo $dashprefix $+ Can't set ban on $3 $+ . [^K]11 $+ $2 $+ [^K]15's banlist is full.
halt
}
}
raw 481:*: {
echo $dashprefix $+ $2-
halt
}
raw 483:*: {
echo $dashprefix $+ $2-
halt
}
raw 491:*: {
echo $dashprefix $+ Can't oper. $2- $+ .
halt
}
raw 501:*: {
echo $dashprefix $+ $2-
halt
}
raw 502:*: {
echo $dashprefix $+ $2-
halt
}
raw 510:*: {
echo $dashprefix $+ $2-
halt
}
raw 511:*: {
echo $dashprefix $+ $2-
halt
}
raw 303:*: {
echo $dashprefix $+ $2-
halt
}
raw 604:*: {
if ($5) {
echo $dashprefix $+ Notify: $2 [^B][^K]14([^B][^K]15 $+ $3 $+ @ $+ $4 $+ [^B][^K]14)[^B][^K]15 is online. [^B][^K]14([^B][^K]15 $+ signon: $asctime($5,mmm dd $+ $chr(44) hh:nn:sstt) $+ [^B][^K]14)[^B][^K]15
halt
}
else {
echo $dashprefix $+ Notify: $2 [^B][^K]14([^B][^K]15 $+ $3 $+ @ $+ $4 $+ [^B][^K]14)[^B][^K]15 is online.
halt
}
}
raw 601:*: {
if ($5) {
echo $dashprefix $+ Notify: $2 [^B][^K]14([^B][^K]15 $+ $3 $+ @ $+ $4 $+ [^B][^K]14)[^B][^K]15 is offline.
halt
}
else {
echo $dashprefix $+ Notify: $2 [^B][^K]14([^B][^K]15 $+ $3 $+ @ $+ $4 $+ [^B][^K]14)[^B][^K]15 is offline.
halt
}
}
raw 600:*: {
if ($5) {
echo $dashprefix $+ Notify: $2 [^B][^K]14([^B][^K]15 $+ $3 $+ @ $+ $4 $+ [^B][^K]14)[^B][^K]15 is online. [^B][^K]14([^B][^K]15 $+ signon: $asctime($5,mmm dd $+ $chr(44) hh:nn:sstt) $+ [^B][^K]14)[^B][^K]15
halt
}
else {
echo $dashprefix $+ Notify: $2 [^B][^K]14([^B][^K]15 $+ $3 $+ @ $+ $4 $+ [^B][^K]14)[^B][^K]15 is online.
halt
}
}
;;aliases
alias dashprefix {
return [^K]15 $+ $timestamp [^K]15-[^K]11-- [^K]15
}
alias enterprefix {
return [^K]15 $+ $timestamp [^K]15-[^K]11-> [^B][^K]15
}
alias exitprefix {
return [^K]15 $+ $timestamp [^K]15<[^K]11-- [^K]15
}
#xchataway on
alias away {
if ($1) {
.quote away : $+ $1-
if ($chan(0) != 0) {
ame is away: $1-
}
set %awaytime $ctime
}
else {
if ($away == $true) {
.quote away
if ($chan(0) != 0) {
ame is back (gone $duration($calc($ctime - %awaytime)) $+ )
}
}
else {
}
}
}
#xchataway end
alias xchatawayen {
if ($group(#xchataway).status == on) {
echo -s $dashprefix $+ Xchat style away is already [^K]11on[^K]15.
}
else {
.enable #xchataway
echo -s $dashprefix $+ Xchat style away is now turned [^K]11on[^K]15.
}
}
alias xchatawaydis {
if ($group(#xchataway).status == off) {
echo -s $dashprefix $+ Xchat style away is already [^K]11off[^K]15.
}
else {
.disable #xchataway
echo -s $dashprefix $+ Xchat style away is now turned [^K]11off[^K]15.
}
}
menu status,menubar,channel,query {
Xchat style away
.On:/xchatawayen
.Off:/xchatawaydis
}