izmir escort escort izmir porno porno izle
Sunucu Line Ban Listesi - IRCForumları - IRC ve mIRC Yardım ve Destek Platformu
User Tag List

Standart Sunucu Line Ban Listesi #1
Üyelik Tarihi: 29 Nisan 2019
Nereden: Uşak
IRC Sunucusu: Irc.Kelebek.ORG
Web Adresi: Www.Kelebek.ORG
Mesajlar: 239
Aldığı Beğeni: 127
Beğendikleri: 117
05 Kasım 2019 , 15:15
Alıntı ile Cevapla
Sunucu Line Ban Listesi

Sunucuda atılan zline, gline, shun, kline listeleri addonda listeyeleyip üzerine tıkladığınız ipnin banını açmaya yarar.




PHP- Kodu:
##Sunucu ban listesi Menübar ve Statuse kısayol eklenecektir.

menu menubar,status {
  
Sunucu Line IP Listesi:/sunucuban
}


alias sunucuban { .dialog -m glist glist 

dialog glist {
  
title "Sunucu Genel Ban Listesi"
  
size --1 423 149
  option dbu
  
list 12 10 82 126size
  text 
"Gline Listesi"44 2 45 8
  button 
"« « KAPAT » »"5170 116 82 20flat ok
  
list 286 10 82 126size
  
list 3254 10 82 126size
  text 
"Shun Listesi"686 2 71 8
  text 
"Zline Listesi"7254 2 54 8
  text 
"Kaldırmak istediğiniz banın ip numarasının üzerine Çift tıklayınca ban kalkacak."872 140 266 8
  
list 9170 10 82 103size
  text 
"G-Zline Listesi"10170 2 65 8
  
list 11338 10 82 126size
  text 
"Kline Listesi"12338 2 60 8
}


on *:dialog:glist:*:*:{
  if 
$devent == init {
    
set %gkontrol on | .enable #bangizle | .stats g | .stats s | .stats k | .stats Z 
    
.timer 1 1 .disable #bangizle
  
}
  if 
$devent == dclick {
    if 
$did == {
      
gline $+(-*@, $did(1).seltext)
      
did -d $dname 1 $did(1).sel
    
}
    if 
$did == {
      
shun $+(-*@, $did(2).seltext)
      
did -d $dname 2 $did(2).sel
    
}
    if 
$did == {
      
zline $+(-*@, $did(3).seltext)
      
did -d $dname 3 $did(3).sel
    
}
    if 
$did == {
      
gzline $+(-*@, $did(9).seltext)
      
did -d $dname 9 $did(9).sel
    
}
    if 
$did == 11 {
      
kline $+(-*@, $did(11).seltext)
      
did -d $dname 11 $did(11).sel
    
}
  }
  if 
$devent == close {
    
write -c gline.txt
    write 
-c zline.txt
    write 
-c shun.txt
    write 
-c gzline.txt
    write 
-c kline.txt
  
}
}

raw 223:*: { 
  if ($
2 isincs G) && (%gkontrol == on) && ($dialog(glist)) {
    
did -a glist 1 $gettok($3,2,64) | write gline.txt $gettok($3,2,64
    .
timer 1 3 unset %gkontrol
  
}
  if ($
2 isincs z) && (%gkontrol == on) && ($dialog(glist)) {
    
did -a glist 3 $gettok($3,2,64) | write zline.txt $gettok($3,2,64
  }
  if ($
2 isincs s) && (%gkontrol == on) && ($dialog(glist)) {
    
did -a glist 2 $gettok($3,2,64) | write shun.txt $gettok($3,2,64
  }
  if ($
2 isincs Z) && (%gkontrol == on) && ($dialog(glist)) {
    
did -a glist 9 $gettok($3,2,64) | write gzline.txt $gettok($3,2,64
  }
  if ($
2 isincs K) && (%gkontrol == on) && ($dialog(glist)) {
    
did -a glist 11 $gettok($3,2,64) | write kline.txt $gettok($3,2,64
  }
  /
halt
}
alias glist dialog -m glist glist }

#bangizle off
raw 223:*: { /halt }
raw 249:*: { /halt }
raw 219:*: { /halt }
raw 216:*: { /halt }
#bangizle end 
__________________
Susarak kazandığın değeri, boş konuşarak harcama.


« Önceki Konu Sonraki Konu »

Şu an bu konuyu okuyan kişi sayısı: 1 (0 üye ve 1 misafir)
 
Benzer Konular
Konu
Konuyu Başlatan
Forum
Cevaplar
Son Mesaj
YouMyCure
IRC ve Web Client Uygulamaları
3
21 Eylül 2019 22:36
Cheyenne
IRC Münazara
11
19 Eylül 2019 10:56
IF
Eğitim, Muhazara ve Doküman
1
18 Eylül 2019 15:47
Cheyenne
IRC Münazara
2
28 Ağustos 2019 00:20
BuYuCu
IRC Münazara
11
26 Temmuz 2019 13:23