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

>
+
Etiketlenen Kullanıcılar

1Beğeni(ler)

 
 
LinkBack Seçenekler Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 15 Aralık 2015, 08:57   #15
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: istek tcl soru ?




birde bu şekil dene bakalım..

#Dj kanalında !istek on yazarsan istekleri açar , !istek off yazarsan kapatır.

Her ikisindede dj ve radyo kanalına mesaj gonderir..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
bind pub - !istek istek bind pub - !var var bind pub - !yok yok set onoff "0" proc istek {n u h c a} { global gnick gchan set gchan $c set gnick $n set kanal [lindex $a ] if { [string match -nocase "#dj" $gchan] & $a eq "on" | $a eq "off" } { if {$a eq "on"} { set ::onoff 1; putquick "privmsg $gchan :İstekler kullanıma açıldı."; putquick "privmsg #radyo :İstek alımları kullanıcılarımıza açılmıştır."; return } else { set ::onoff 0; putquick "privmsg $gchan :İstekler kullanıma kapatıldı."; putquick "privmsg #radyo :İstek alımları şuan itibarı ile kapatıldı."; return } } if { ![string match -nocase "#radyo" $gchan] } { putquick "notice $gnick :istekler sadece #radyo kanalından yapılmaktadır."; return 0 } if { $a ne "on" & $a ne "off" } { if { $::onoff eq 1 } { putserv "PRIVMSG #DJ :\[Radyo İstek Paneli\] 2 İstekte Bulunan Kullanıcı: 4 $gnick $gchan 2 Kanalında İsteği: $kanal" putserv "privmsg $gchan :2 İsteğiniz DJ'lerimize İletilmiştir 4 $gnick." } else { putquick "privmsg $gchan :İstek alımı yapılmamaktadır.." } } } proc var {n u h c a} { set kanal [lindex $a 0] if {![string match -nocase "#DJ" $c]} {return 0} putserv "privmsg $kanal : 2 İsteğiniz Arşivimizde Mevcut. Kısa Süre İçinde İsteginiz yayınlanacaktır." } proc yok {n u h c a} { set kanal [lindex $a 0] if {![string match -nocase "#DJ" $c]} {return 0} putserv "privmsg $kanal : 2 Üzgünüm, İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz." }


 
Alıntı ile Cevapla

 


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
Oyun botu soru dosyasindaki soru|cevap duzenini tersine çevirme (Çözüm) Weise Eggdrop, NeoStats, BNC 1 29 Aralık 2024 15:38
LGS soru ve cevapları heyecanı! LGS’ye giren adaylar merakla LGS soru ve cevaplarını bekliyor… Sanem Eğitim Haberleri 0 02 Haziran 2018 14:42
(ISTEK) Help soru cevap - Help eğitim botları Aeris Eggdrop, NeoStats, BNC 3 10 Mart 2010 10:42
!radyo , !istek istek parçasi Yunus mIRC Scripting Sorunları 2 21 Temmuz 2008 21:11