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

>
+
Etiketlenen Kullanıcılar

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 16 Nisan 2006, 03:22   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: txt ile ban listesi olsuturma




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias bansay 
  if (!%
bansirasi ) {
    
set %bansirasi 1
  

  .
msg $chan %bansirasi %banlist1
  inc 
%bansirasi
}
on *:rawmode:#: { 
  
if ($= +b) && (!$read(ban.txt,w,$2)) { 
    
write ban.txt $gettok($2,1,33
    
halt 
  
}
if ($
== -b) { write -dl $+ $2ban.txt } }
on *:kick:#: { 
  
if ($read(ban.txt,w,$knick)) {
    
write -dl $+ $knick ban.txt
write ban
.txt $knick $1- } }
on @*:text:!ban*:#: {
  
var %% = $+(%,#,$nick) 
  
inc -eu5 $(%%,1
  if $(%%,
2) >= {
    .
msg $chan bir sonraki komutu kullanmak için 5 saniye beklemeniz gerekmektedir
    unset $(%%,
1)
  
halt }
  if (
$nick !isop $chan) {
    .
msg $chan Komutları kullanabilmeniz için Op olmanız gerekir.
  
halt }
  :
bosh
  
if (!$lines(ban.txt)) {
    .
msg $chan ban listesi boş.
    
halt
  
}
  if ($
== !banlist) { 
    .
msg $chan nick atılma nedeni
    
unset %bansirasi
    
var %banlist 1 
    
while %banlist <= $lines(ban.txt) { 
      
set %banlist1$read(ban.txt,%banlist)
      
bansay
      inc 
%banlist 
    
}
    
halt 
  
}
  if ($
== !banall) { 
    
write -c ban.txt 
    
.msg $chan Bütün banlar silindi.
    
halt
  
}
  if $
== !bansil {
    if !$
{
      .
msg $chan Numara girmeyi düşünüyormusunuz:)?
      
halt 
    
}
    if (!
$read(ban.txt,p,$2)) { 
      .
msg $chan Girmiş olduğunuz  $+ $$+  numarası listede bulunamadi:(.
      
halt 
    
}
    if 
$regex($2-,[a-z]) {
      .
msg $chan Sadece silinecek rakamı girmeniz yeterlidir.
    
halt }
    .
write -dl $+ $2 ban.txt
    
.msg $chan  $+ $$+  listeden silindi
    
halt 
  

}
else {
  goto 
bosh


bir takım eksiklikleri var ama işini görür yinede
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
TurkSohbet.NET | #XPass

Konu diEfoRyoU tarafından (16 Nisan 2006 Saat 03:49 ) değiştirilmiştir.
 
Alıntı ile Cevapla

 

Etiketler
ban, ile, listesi, mirc, mirc download, mirc indir, olsuturma, txt


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
Çeyiz listesi hazırlarken eklenmesi gerekenler nelerdir? Kapsamlı çeyiz listesi Bal Evlilik Hazırlıkları 14 15 Eylül 2020 09:50
LIS dosya uzantısı VAX Program listesi - sql listesi Kaf_Dağı Bilgisayar Donanımı 0 09 Şubat 2016 10:45
Yerel Seçim Listesi Adınız Var mı Yok Mu? Seçmen Listesi Sorgulama yaSmin Haber Arşivi 0 10 Ocak 2014 21:16
D&P Parfüm Listesi - D&P Parfüm Kodları Listesi Liaaa Güzellik, Sağlık ve Bakım Önerileri 0 21 Mayıs 2012 18:07

×