Irc üzerinde Mirc karşılama remotesi yetkili giriş mesajı Irc greet addonu olarak kullanılan bu sistem ile sunucu üzerindeki yetkili kişilerin nicklerine mesaj ekleyebilirsiniz.
Sanal sohbet siteleri ortamlarında kullanılan bu remote yardımı sayesinde sizlerde kanal yetkililerine nick mesajları oluşturabilirsiniz. Bu sistem ile Chat odaları daha renkli ve eğlenceli hale gelecektir. Kişiye özel mesajlar sayesinde atasözleri güzel sözler dahil birçok kelime ekleyebilir bu sözleri diğer kullanıcıların sohbet odaları içerisinde görmelerini sağlayabilirsiniz.
kayitlimi off
raw 307:*: {
.set $+(%,yeah,.,$2) on
}
#kayitlimi end
alias kontrolet {
.enable #kayitlimi
.whois $1
}
on *:text:.greet *:%operkanali:{
if $2 == ekle {
if !$read(admin.txt,w,$nick) { .msg # $+(“,$nick,”) Bu Komutu Kullanmaya Yetkili Degilsiniz. }
elseif $2 == $null { .msg # $+(“,$nick,”) .greet ekle Mesaj Seklinde Kodu Kullaniniz. }
elseif $3 == $null { .msg # $+(“,$nick,”) Lütfen Greet Mesajinizi Yaziniz }
else { kontrolet $nick | .msg %operkanali $+(“,$nick,”) Bekleyin Kontrol Ediliyor | .timer 1 2 kontrolet2 $nick $3- }
}
if $2 == sil {
if !$read(admin.txt,w,$nick) { .msg # $+(“,$nick,”) Bu Komutu Kullanmaya Yetkili Degilsiniz. }
elseif $3 == $null { .msg # $+(“,$nick,”) Lütfen Silincek Nick Yaziniz }
else { greetsil $3 }
}
if $2 == list {
if !$read(admin.txt,w,$nick) { .msg # $+(“,$nick,”) Bu Komutu Kullanmaya Yetkili Degilsiniz. }
else { .msg $chan $nick Özelinize Bilgiler Verilmiştir , Lütfen Özelinizi Kontrol Ediniz | .msg $nick Greet Mesajlari Listeleniyor | greetlist | .msg $nick Greet Mesajlari Listesi Sonu }
}
}
alias greetsil { if $1 { if !$read(greet.txt,w,$+($1,*)) { .msg $chan [1] $1 [1] Greet Mesaj’i listesinde yok. | halt } | else { write $+(-dl,$readn) greet.txt | .msg $chan -[1] $1 [1]- Greet Mesaj’i listesinden silindi. } } }
alias greetlist { var %s = 1,%ss = $lines(greet.txt) | while %s <= %ss { .msg $nick $read(greet.txt,%s) | inc %s } }
alias kontrolet2 {
if $($+(%,yeah,.,$1),2) == on {
if $read(greet.txt,w,$1 $+ *) {
.msg %operkanali $+(“,$1,”) zaten seçilmiş bir greet mesajınız vardı
.write -dl $+ $readn greet.txt
.msg %operkanali $+(“,$1,”) Seçilen Greet Mesajı değiştirildi
.write greet.txt $1 $+ $chr(11) $+ $2-
.msg %operkanali $+(“,$1,”) Eklenen Mesaj: 4 $2-
}
else {
.write greet.txt $1 $+ $chr(11) $+ $2-
.msg %operkanali $+(“,$1,”) Greet mesajınız eklendi Mesaj: 4 $2-
}
.unset $+(%,yeah,.,$1)
.disable #kayitlimi
}
else {
.msg %operkanali $+(“,$1,”) Nickiniz kayıtlı olmadığından dolayı malesef bu özelliği kullanamıyorsunuz
.msg %operkanali $+(“,$1,”) [1]/ns register sifre email [1] Sifre Yerine Sifrenizi Email Yerine Msnenizi Yazarak Kayıt Edebilirsiniz Nickinizi
.disable #kayitlimi
}
}
on *:join:#:{
if $read(yönetimkanal.txt,w,$chan) { halt }
if $read(greet.txt,w,$+($nick,$chr(11),*)) {
.msg $chan $+([,$nick,]) $gettok($read(greet.txt,w,$nick $+ *),2,11)
}
}