Tekil Mesaj gösterimi
Alt 07 Ekim 2022, 13:48   #20
Çevrimdışı
Yasakkk
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: oto zline ekleme - oto nick değiştirme




Subzero Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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.

Kodu remote ye eklememiz yeterlimi birde sadece help kanalındamı çalışıyor

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 13:48 -->-> Daha önceki mesaj 13:27 --

Subzero Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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.

Remote kısmına ekledim çalıştıramadım

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver