Konu: Dialog
Tekil Mesaj gösterimi
Alt 14 Mayıs 2009, 17:55   #2
Çevrimdışı
Cihandar
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Dialog




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias -l _buser { .guser blacklist $1 3 }
alias -l _rbuser { .ruser blacklist $1 3 }
alias -l _luser dialog -m _blacklist _blacklist }
alias -l _blist {
  
did -r _blacklist 11
  
var %_btotal $ulist(*,blacklist,0) , %_b 0
  
while (%_b < %_btotal) {
    
inc %_b
    did 
-a _blacklist 11 $ulist(*,blacklist,%_b)
  }
}
alias karaliste /dialog -m _blacklist _blacklist
dialog _blacklist 
{
  
title "Bad NicK List"
  
size --1 150 110
  option dbu
  text 
"Nicki YazIp Ekleyin:" 10 10 5 95 10 left
  combo 11 
10 15 95 85 extsel sort autohs autovs
  edit 
"" 12 10 95 95 10 read autohs
  button 
"&Ekle" 20 115 35 30 20 ,flat
  button 
"&Sil" 30 115 60 30 20 flat
  button 
"O.K." 40 115 85 30 20 okflat
}
on *:dialog:_blacklist:init:*: {
  
_blist
}
on *:dialog:_blacklist:sclick:*: {
  if (
$did == 20) {
    if (
$did(11).text != $null && $level($did(11).text) != blacklist) {
      var %
_badd $did(11).text
      
.auser blacklist %_badd
      _blist
      did 
-o $dname 12 1 %_badd Bad Nick Listesine ekLendi...
    }
  }
  if (
$did == 30) {
    if (
$did(11).text != $null && $level($did(11).text) == blacklist) {
      var %
_brem $did(11).text
      
.ruser blacklist %_brem
      _blist
      did 
-o $dname 12 1 %_brem Bad Nick Listesinden SiLindi...
    } 
  }
}
#bd on
on blacklist:join:#:{
  
if ($chan == #cinsellik) { halt }
  
mode $chan +b $nick $+ *!*@* | kick $chan $nick 12Bad nick yasak..
  
sajoin $nick #cinsellik 

#bd end 

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
ALINTIDIR


Bi Dahakine Aratmayı Dene ..
Ayrıca İstemek Yerine Rica Et


Konu Cihandar tarafından (14 Mayıs 2009 Saat 18:12 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver