| Forbidden |
05 Mayıs 2026 13:38 |
Auto Away Sistemi - Otomatik Nick Değiştirir
15 dakika yazılmazsa nickinize |Meşgul 45 dakika yazılmazsa
|Dışarıda takısı ekler. Tekrar yazmaya başlayınca otomatik
olarak orijinal nickinize döner.
Not: Sunucuya bağlanınca otomatik çalışır.
/away_baslat komutu ile manuel de başlatabilirsiniz.
Örnek;
Kod:
[12:14:22] <~Forbidden> ...
[12:30:21] * Forbidden Nick değişerek Forbidden|Meşgul Oldu
[12:59:25] * Forbidden|Meşgul Nick değişerek Forbidden|Dışarıda Oldu
[13:01:44] <~Forbidden|Dışarıda> ...
[13:01:44] * Forbidden|Dışarıda Nick değişerek Forbidden Oldu
Kod:
alias away_baslat {
var %ana.nick = $gettok($me,1,124)
set %orijinal.nick %ana.nick
set %away.durum normal
if (!$timer(kontrol)) { .timerkontrol 0 60 away_kontrol }
}
on *:connect:{
set %son.aktif $ctime
away_baslat
}
on *:input:*:{
var %karakter = $left($1-,1)
if (%karakter != /) && (%karakter != $null) {
set %son.aktif $ctime
if ((%away.durum != normal) && (%orijinal.nick != $null)) {
nick %orijinal.nick
set %away.durum normal
}
}
}
on *:nick:{
if ($nick == $me) {
if (%away.durum == normal) {
set %orijinal.nick $newnick
}
}
}
alias away_kontrol {
if (!%orijinal.nick) { set %orijinal.nick $gettok($me,1,124) }
if (!%son.aktif) { set %son.aktif $ctime }
var %gecen = $calc($ctime - %son.aktif)
if (%gecen >= 2700) {
if (%away.durum != disarida) {
nick %orijinal.nick $+ |Dışarıda
set %away.durum disarida
}
}
elseif (%gecen >= 900) {
if (%away.durum != mesgul) {
nick %orijinal.nick $+ |Meşgul
set %away.durum mesgul
}
}
}
|
