menu * {
Away System
.Away: setaway
.Back: setback
.-
.Slient
..Silent Away: quietaway
..Silent Back: quietback
.Pager
..Pager je ( $+ $iif(%options.pager, On, Off) $+ ) : {
if (%options.pager) echo -a *** Pager - DISABLED ***
else echo -a *** Pager - ACTIVE ***
%options.pager = $iif(%options.pager, 0, 1)
}
..Procitaj Paging: run NotePad.exe $scriptdir\page.txt
..Obrisi: {
write -c $scriptdir\page.txt clearing all pages on $fulldate
echo -at *** Paging obrisan ***
}
}
alias setaway {
if ($1 == $null) set %away.reason $$?="Upisi Razlog"
else set %away.reason $1-
away ( $+ %away.reason $+ )
set %away.time $ctime
if (%options.pager) {
ame Away : [ $+ %away.reason $+ ] PAGE: /ctcp $me page < vasa poruka >
.timer(away) 0 $?="Vreme u sec ?" ame still Away : [ $+ %away.reason $+ ] PAGE: /ctcp $me page < vasa poruka >
}
else {
ame Away : [ $+ %away.reason $+ ]
.timer(away) 0 $?="Vreme u sec ?" ame still Away : [ $+ %away.reason $+ ]
}
}
alias setback {
if ($away == $false) { echo -at ** Nisi vise Away! ** | halt }
.timer(away) off
ame Back : [ $+ %away.reason $+ ] Away : [ $duration($calc($ctime - %away.time)) ] Jesam li vam ne dostajao ?
away
unset %away.*
}
alias quietaway {
set %away.reason $$?="Upisi Razlog"
away ( $+ %away.reason $+ )
}
alias quietback {
if ($away == $false) { echo -at *** Nisi vise Away! *** | halt }
away
unset %away.*
}
ctcp *:page:*: {
if (%options.pager) .notice $nick > Hello. Trenutno sam zazet ili sam AFK...Javicu ti se kasnije...
echo -at ** [ PAGED by $nick ] $address on $fulldate
write $scriptdir\page.txt paged by : $nick $address $fulldate MSG : $2-
}
alias rtime return $time(h:nntt)
----------------------------------------------
eto jedan mali zanimljivi Away system
Samo ga kopirate u svoj remote
Prvo Alt+r
File...
New...
I tamo kopirate ovo tu i idete na Ok