Tekil Mesaj gösterimi
Alt 19 Mart 2016, 23:58   #8
Çevrimdışı
rascoLn
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: eski nicke geçme tcl




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
bind pub - !istek istekoff
proc istekoff 
{nick uhost hand chan text} {
  
setudef flag radyocmd
  
if {[string match -nocase "#DJ" $chan]} {
    
set komut [lindex $text 0]
    if {
$komut == ""} { putquick "PRIVMSG #DJ :Kullanımı !istek aç/kapat şeklindedir."; return }
    if {[
string match -nocase "ac" $komut]} { channel set $chan  +radyocmdputquick "PRIVMSG #DJ Radyo İstekleri Kabul Edilecek.";  return }
    if {[
string match -nocase "kapat" $komut]} { channel set $chan  -radyocmdputquick "PRIVMSG #DJ Radyo İstekleri Reddedilecek."; return 0  }
    }
    if {[
string match -nocase "#Radyo" $chan]} {
    if {[
lsearch -exact [channel info #DJ] +radyocmd] != -1} {
        
set nickdosyasi [open "nickler.txt" r
        
set nicks [split [read -nonewline $nickdosyasi] \n
        
close $nickdosyasi 
        set uyari 
"Nickiniz istek gönderimi için engellenmiştir.." 
    
if {[lsearch -exact $nicks $nickne -1]} { putquick "notice $nick : $uyari"; return }  
      
putquick "PRIVMSG #Radyo :2İsteğiniz DJ'lerimize İletilmiştir 4$nick ,2teşekkürler."
    
putquick "PRIVMSG #DJ 6G E L E N  İ S T E K"
    
putquick "PRIVMSG #DJ 4----------------------------------------------------"
    
putquick "PRIVMSG #DJ 2İstek:1 $text "
    
putquick "PRIVMSG #DJ 4----------------------------------------------------"
    
putquick "PRIVMSG #DJ 2İstekte Bulunan Kullanıcı: 1 $nick"
    
putquick "PRIVMSG #DJ 4----------------------------------------------------"
    
}
    if {[
lsearch -exact [channel info #DJ] +radyocmd] == -1} { 
    
putquick "PRIVMSG #Radyo Üzgünüz Dj'imiz İstekleri Kabul Etmemektedir $nick."  
 
    
}
  }



 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver