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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)
-   -   Bu TCL'yi #Opers Kanalında Kullanmak İçin.. (https://www.ircforumlari.net/eggdrop-neostats-bnc/647342-bu-tclyi-opers-kanalinda-kullanmak-icin.html)

No_FeaR 17 Kasım 2014 19:39

Bu TCL'yi #Opers Kanalında Kullanmak İçin..
 
Herşey Hoş Güzel Ama Kanal Nereye Eklencek Bi Türlü Çözemedim : )

#Opers Kanalında !duyuru Komutunu Uygulamak İçin.

Kod:

# Ayarlar Bu kadar.! DOKUNMAYIN!!!

#gerekli bindler
bind pub - !duyuru op
bind evnt - init-server baglan_yap

proc baglan_yap {type} {
global inick ipass

  putserv "OPER $inick $ipass"
  putserv "WALLOPS :Basari ile Login Oldum :)"
}

proc op {n u h c a} {
  global gnick
    set gnick $n
        set kanal [lindex $a ]
    putserv "notice $*.No_FeaR.Com $kanal"
}


house 17 Kasım 2014 21:05

Cevap: Bu TCL'yi #Opers Kanalında Kullanmak İçin..
 
Bu TCL amacına uygun değil zaten @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] olayı basit şekilde şöyle halledersin;


PHP- Kodu:

set admin_chan "#Opers"
bind pub - !global global:msg
proc 
global:msg {n u h c a} {

    global 
botnick admin_chan
    
if {($c != $admin_chan)} { return }
    
set glob_msg [lindex $a ]
    if {
$glob_msg == ""} { putquick "privmsg $c :Global mesaji yazmadiniz."; return }
    if {[
onchan $n $admin_chan]==1} {

        
putquick "PRIVMSG operserv : global $glob_msg"
        
putquick "PRIVMSG #Opers : Belirttiginiz mesaj tum sunucuya global olarak gonderildi."

    
}

    if {[
onchan $n $admin_chan]==0} {

    
putquick "MODE $c +b $n"

    
putquick "KICK $c $n Bu komutu kullanmaya yetkiniz yok!"

    
}



Komut: !global MESAJ

No_FeaR 17 Kasım 2014 21:42

Cevap: Bu TCL'yi #Opers Kanalında Kullanmak İçin..
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Ellerine Sağlık, Birşey Daha Sorcam Şöyle Bişey Yapmaya Çalıştım Ancak Çalışmadı Nedendir ?

Alıntı:

if {$mode == "+o"} {
if {$desc == $botnick} { return 0 }
putquick "PRIVMSG $chan $desc su anda kanal operatoru konumuna gecti."
putquick "NOTICE $chan $nick Kanalda Kullanabileceğiniz Komutları Görmek İçin Özelime !komutlar Yazın."
}
Kalın Yazıyla Belirttim...

house 17 Kasım 2014 23:08

Cevap: Bu TCL'yi #Opers Kanalında Kullanmak İçin..
 
Kodun öncesi de lazım ki bişey anlayalım :) @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 23:08 -->-> Daha önceki mesaj 23:04 --

Şunu kullanabilirsin bu iş için;

PHP- Kodu:

bind mode - * banlistchech

proc banlistchech 
{nick uhost hand chan mode victim} {

    global 
botnick

    
if {$mode == "+o"} {

        if {
$victim == $botnick} { return }

        
putquick "PRIVMSG $chan $victim kanal yetkilisi konumuna geçti."

        
putquick "NOTICE $victim Kullanabileceğiniz komutları görmek için özelime \002!komutlar\002 yazın."

    
}


        if {
$mode == "+m"} {

        
putquick "PRIVMSG $chan :Kanal konuşmaya kapatıldı."

    
}

        if {
$mode == "-m"} {

        
putquick "PRIVMSG $chan :Kanal konuşmaya açıldı."

    
}





Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:14.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk