Gönderen Konu: !Greet mesaj greetekle mesaj  (Okunma sayısı 6 defa)

RotaSız

  • Yönetici
  • Acemi Üye
  • *****
  • İleti: 89
    • Profili Görüntüle
!Greet mesaj greetekle mesaj
« : 14 Mart 2019, 16:51:27 »
Bildiğimiz üzre ''NoMerCy'' Dediğimiz Sunucu Botunda Kullanılan Sistemle Birebir Aynı
NoMerCy Botunun Özeline .Greet ekle Mesaj Şeklinde Kullandıgımız Komut Artık Sizlerle


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 Greet Mesaj'i listesinde yok. | halt } | else { write $+(-dl,$readn) greet.txt | .msg $chan - $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,") /ns register sifre email 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)
}
}

Kullanım : .greet ekle Mesaj
GidenLerin ArkaSından YakmıŞım 1 Cigara GeLenLeri İzLiyoruM...