Away Addonu
 

;coded ßy MaeLStrOm.
on *:load: {
echo -a 4;Away addonu coded ßy MaeLStrOm
echo -a 4;Yorumlarınızı duymak isterim.Hatam varsa lütfen düzeltin..
}
alias away_ {
if $?="Away olma nedeniniz?" { set %awayreason $! }
else { echo -a Away olma nedeninizi belirlemediniz.Pc başında olmadığınız söylenecek | .set %awayreason Pc başında yokum. }
set %startime $time
if $?="Awayken Kullanıcağınız Nick(Nick Değişmicekseniz Boş Bırakın)" { set %awaynick $! }
else { set %awaynick $me }
nick %awaynick
away Away : %awayreason .. Awaye Geciş Zamanı : %startime
ame Away : %awayreason ..
.timerping 0 100 /ping %awaynick
}
alias back {
set %totaltime $duration($awaytime))
away
ame %totaltime süre away kaldıktan sonra geri döndüm..
unset %startime
unset %awaynick
.timerping off
}
alias kisasüreli {
away ßiraz Sonra Geri Dönücem
ame Az işim var döncem..
}
on *:text:*:?: { if $away { if !$window(@Away) { .window -lk0z @Away } | aline -p @Away < $+ $time $+ > " $+ $nick $+ " siz pc başında yokken mesaj bıraktı yazdığı mesaj ; | aline -p @Away 4 $+ >>>>> 5 $+ $1- | close -m } } }
on *:text:$(* $+ $me $+ *):#: { if $away { if !$window(@Away) { .window -lk0z @Away } | aline -p @Away < $+ $time $+ > $chan kanalında $nick senden bahsetti.Aynen iletiyorum; | aline -p @Away 4 $+ >>>>> 5 $+ $nick 14 $+ => 7 $+ $1- } } } $1- } } }
}
menu channel {
-
Away Sistem
.$iif($away,Awayden Cık,Awaye Gec):$iif($away,back,away_)
.Kisa Süreli Away:/kisasüreli
-
}
menu @Away {
clear:/clear
}

Güzel oLmuş da küçük bir dialog ve birkaç hazır sebeb eklesen daha hoş olurdu.

aferin yeğen :)

dialog yapmayıda en kısa sürede oorencem inş :)

Ellerine sağlık tufan...