Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*: {
if $1 == .Hayir && %rcsil { msg $chan Islem iptal edildi. | unset %rcsil | return }
if $1 == .Evet && %rcsil { msg $chan [SicilDepo/ $+ %rcsil $+ ] $2 nickine ait sicil kayitlari silinmistir. | .remove RC/ $+ %rcsil $+ .txt | unset %rcsil }
if $1 == .sicil {
if $2 == bilgi {
.msg $chan 4-
.msg $chan 4- 4--- Nick sicil kaydi sistemi kullanim sekli 4---
.msg $chan 4-
.msg $chan 4- .Sicil list -> (Sistemdeki nickleri listeler)
.msg $chan 4- .Sicil ekle Nick mesajiniz -> (Nick'e Sicil kaydi ekler)
.msg $chan 4- .Sicil oku Nick -> (Nick'in Sicil kaydini okur)
.msg $chan 4- .Sicil sil Nick -> (Nicke ait Sicil kayitlarini siler) Not : Sadece Help Founder kullanabilir.
.msg $chan 4-
.msg $chan 4- 4Not : Eklediginiz Sicil kayitlari örnekteki gibi olmalidir.
.msg $chan 4-
.msg $chan 4- 4Örnek : .Sicil ekle XX Nicki #help kanalında Küfür ettiği için Silindi.
.msg $chan 4-
return
}
if $2 == list {
if $findfile($mircdirrc,*.txt,0) == 0 {
.msg $chan Hata! Sicil kaydi deposu bos.
}
else {
.msg $chan [SicilDepo/ $+ $nick $+ ] - Sicil kaydi deposu kontrol ediliyor...
var %a = 1
while $findfile($mircdirrc,*.txt,%a) {
msg $chan $gettok($nopath($v1),1,46) : nickine ait sicil kaydi vardir. Okumak icin .sicil oku $gettok($nopath($v1),1,46) yapiniz.
inc %a
}
}
}
if $2 == ekle {
if $4 == $null { .msg $chan Lütfen kayit giriniz. }
else { !$exists(RC) { mkdir RC }
.write RC/ $+ $3 $+ .txt * [ $date - $time - $3 ] : $4- [Ekleyen: $nick ]
.write RC/ $+ $3 $+ .txt -
.msg $chan [SicilDepo/ $+ $nick $+ ] $3 nickine sicil kaydi girilmistir..
}
}
if $2 == oku {
if !$file(RC/ $+ $3- $+ .txt) {
.msg $chan $+ $3 $+ kayitli sicil kaydi bulunamadi.
}
else {
.msg $chan [SicilDepo/ $+ $nick $+ ] - $3- nicki sicil dosyasi kontrol ediliyor...
saydir $2-
}
}
if $2 == sil {
if !$read(hfounder.txt,w,$nick) { .msg $chan Bu komutu kullanmaya yetkili degilsiniz. Bir nickin sicil kaydini sadece Help Founder silebilir $nick $+ . }
elseif !$isfile(RC/ $+ $3- $+ .txt) {
.msg $chan Hata! $2 nicki sicil dosyasi bulunamadi.
}
else {
.msg $chan UYARI! Bu komut ile $3 nickine ait bütün sicil kaydini silersiniz.
.msg $chan Uygulamaya devam etmek istiyorsaniz ; .Evet ,
.msg $chan Uygulamayi iptal etmek istiyorsaniz ; .Hayir yaziniz.
.set -e %rcsil $3
}
}
}
}
Dene Bakalım Denemedim.