Tekil Mesaj gösterimi
Alt 01 Temmuz 2009, 01:48   #7
Çevrimdışı
uFuK
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Texten Hızlı Okutmak




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start: { 
hmake zimbirti 1000 
.hload -s zimbirti $shortfn(ufuk.hash)
}
on *:text:*:#: { 
var %ufuk $strip(1-)
if (
$hmatch(zimbirti,%ufuk)) { mode $chan +b $wildsite kick $chan $nick Sebep }
}

alias ekle 
if $
== $null { echo -a eklenicek birşey yok canımyazda ekleyelim /ekle eklenicek kelime 
if $
!= $null hadd zimbirti $hsave -s zimbirti ufuk.hash hload zimbirti ufuk.hash 
}
}

alias sil 
if $
== $null { echo -a Silinecek birşey yok tatlım kelime yazda silelim /sil silinecekkelime
if $!= $null hdel zimbirti $hsave -s zimbirti ufuk.hash hload zimbirti ufuk.hash 
}
}
alias liste 
  var %
i 1 
  
while (%<= $hmatch(zimbirti,*,0)) {
    echo -
a $hmatch(kufur,*,%i)
    
inc %
}


/ekle küfürlükelime [ kelime ekler ]
/sil küfürlükelime [ kelime siler ]
/liste [listeyi echo'lar ]


kodu ALT R remoteye kopyala.
kopyaladıktan sonra /ekle küfürlükelime şeklinde kelimeleri eklet.
Scripti açıp kapatmana falan gerek yok devam et direkt.

Not; kodu denemedim bir hayli zamandırda kod yazmıyorum ama çalışıcaktır. Sorun olursa yaz burdan


Not2: Benim kodlamış oldugum Full Hash Mynet Koruma Menüsünü'de kullanabilirsin. Koruma istiyorsan.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan