IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  vaybe sohbet

>
+
Etiketlenen Kullanıcılar

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 16 Kasım 2009, 06:11   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: yardım istiyorum




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:Text:*:#KANAL: { if $1 == !iptal && %rcsil { msg $chan İşlem iptal edildi. | unset %rcsil | return } if $1 == !devam && %rcsil { msg $chan [RCDepo/ $+ %rcsil $+ / $+ $nick $+ ] $2 nickine ait RC girdileri silinmiştir. | .remove RC/ $+ %rcsil $+ .txt | unset %rcsil } if $1 == !bilgi { if !$2 { .msg $chan Kullanım şekli: .msg $chan !bilgi list (RC bilgilerini Listeler) .msg $chan !bilgi ekle Nick mesajınız (Nick'e RC bilgisi ekler) .msg $chan !bilgi oku Nick (Nick'in RC bilgisini okur) .msg $chan !bilgi sil Nick (Nick'e ait RC dosyasını siler) return } if $2 == list { if $findfile($mircdirrc,*.txt,0) == 0 { .msg $chan Hata! RC Deposu boş. } else { .msg $chan [RCDepo/ $+ $nick $+ ] - RC Deposu kontrol ediliyor.. var %a = 1 while $findfile($mircdirrc,*.txt,%a) { msg $chan  $+ $gettok($nopath($v1),1,46) $+  kayıtlı RC dosyası inc %a } } } if $2 == ekle { if !$exists(RC) { mkdir RC } .write RC/ $+ $3 $+ .txt [ $+ $date $+ - $+ $time $+ - $+ $3 $+ ] : $4- [Ekleyen: $nick ] .write RC/ $+ $3 $+ .txt - .msg $chan [RCDepo/ $+ $3 $+ / $+ $nick $+ ] $3 nickine RC geçilmiştir. } if $2 == oku { if !$file(RC/ $+ $3- $+ .txt) { .msg $chan  $+ $3 $+  kayıtlı bilgi girdisi bulunamadı. } else { .msg $chan [RCDepo/ $+ $nick $+ ] - $3- kayıtlı RC dosyası kontrol ediliyor.. saydır $2- } } if $2 == sil { if !$isfile(RC/ $+ $3- $+ .txt) { .msg $chan Hata! $2 kayıtlı RC dosyası bulunamadı. } else { .msg $chan UYARI! Bu komut ile $2 kaydına ait bütün girdileri silersiniz. .msg $chan Uygulamaya devam etmek istiyorsanız ; !Devam , .msg $chan Uygulamayı iptal etmek istiyorsanız ; !iptal yazınız. .set -e %rcsil $3 } } } } alias saydır { .timersaydır.* off var %s 1 var %a 1 while %s <= $lines(RC/ $+ $2- $+ .txt) { .timersaydır. $+ %s 1 %a msg $chan $read(RC/ $+ $2- $+ .txt,%s) inc %s inc %a 2 } }

Sadece belirli kişiler Kullansın diyorsan 1.satırın altına şunu ekliyorsun, çoğaltmak içinde seperatörleri kullanabilirsin.;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if !$regex($nick,/(Csop|Admin|Nickler)/i) { return }

#kanal 'a !bilgi yazılması halinde listeleyecektir.

Kullanım şekli:
!bilgi list (RC bilgilerini Listeler)
!bilgi ekle Nick mesajınız (Nick'e RC bilgisi ekler)
!bilgi oku Nick (Nick'in RC bilgisini okur)
!bilgi sil Nick (Nick'e ait RC dosyasını siler)

+ilave : RC klasörü yoksa,klasör açması sağlandı.
+ilave : RC ekleyen nickde kayda geçirildi.Böylelikle "Kim Eklemiş?" bilinecek.

Kod Difuzyon tarafından daha önceden yapılmıştır. İşine yarayacağına inanıyorum İyi forumlar...

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

 

Etiketler
istiyorum, mirc download, mirc indir, yardim, yardım


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
ScanX v2 yardım istiyorum xsabrix Eggdrop, NeoStats, BNC 7 14 Eylül 2010 14:39
ilginç bir kod istiyorum yardım alfa mIRC Scripting Sorunları 2 18 Ekim 2009 17:26
arkadaşlar yardım istiyorum!!! acill AdiL mIRC Scripting Sorunları 10 30 Kasım 2008 22:38
EsChatle ilgili Yardım istiyorum FeNAdO Unreal IRCd 1 06 Eylül 2007 12:44
eggdrop istiyorum yardım !!!! sereserpe Eggdrop, NeoStats, BNC 3 02 Ağustos 2007 23:32