IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Bu Kodu TCL YazabiLcek Coder ArakaDas ariyorum

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 Kodu TCL YazabiLcek Coder ArakaDas ariyorum (https://www.ircforumlari.net/eggdrop-neostats-bnc/420001-bu-kodu-tcl-yazabilcek-coder-arakadas-ariyorum.html)

izmirlitutku35

18 Ekim 2011 19:34

Bu Kodu TCL YazabiLcek Coder ArakaDas ariyorum

on *:notice:*:?: {
if ($nick == ChanServ) {
if *Normal User* iswm $1- {
_privmsg $2 14 $2 2Kanalında4 $1 14Op 2Konumuna Gecti.
}
if *Super Op* iswm $1- {
_privmsg $2 14 $2 2Kanalında4 $1 14Sop 2Seviyesinde 14Op 2Konumuna Gecti.
}
if *Auto Op* iswm $1- {
_privmsg $2 14 $2 2Kanalında4 $1 14Aop 2Seviyesinde 14Op 2Konumuna Gecti.
}
if *founder* iswm $1- {
_privmsg $2 14 $2 2Kanalında4 $1 14Founder 2Seviyesinde 14Op 2Konumuna Gecti.
}
}
}

CLubber

18 Ekim 2011 23:48

Cevap: Bu Kodu TCL YazabiLcek Coder ArakaDas ariyorum

Kod:

bind mode - * mode:msg 

proc mode:msg {nick uhost hand chan mode desc} { 

  global botnick 

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

    if {$desc == $botnick} { return 0 } 

    putquick "PRIVMSG $chan $desc su anda kanal yetkilisi konumuna gecti."

  }

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

    if {$desc == $botnick} { return 0 } 

    putquick "PRIVMSG $chan $desc su anda kanal yardımcı operatoru konumuna gecti."

  }

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

    if {$desc == $botnick} { return 0 } 

    putquick "PRIVMSG $chan $desc su anda kanal karizması konumuna gecti."

  }

}

putlog "Kanal Mode/Mesaj TCL v1.0 - Written By CLubber"

qeweSe

03 Kasım 2011 21:26

Cevap: Bu Kodu TCL YazabiLcek Coder ArakaDas ariyorum

PHP- Kodu:

   if {$mode == "+*a*"}

daha mantıklı olmaz mi

CLubber

03 Kasım 2011 23:00

Cevap: Bu Kodu TCL YazabiLcek Coder ArakaDas ariyorum

Eggdrop botlar +a ve +q modunu bir arada görmez.

qeweSe

03 Kasım 2011 23:27

Cevap: Bu Kodu TCL YazabiLcek Coder ArakaDas ariyorum

ben yaptim ve takir takir calişiyor.

PHP- Kodu:

       if {[string match -nocase "+*o*" $mode]} {

        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."

        putquick "PRIVMSG $bot(logchan) :\002***\002 $victim; $chan kanalında \002op( @ )\002 oldu."

    }

PHP- Kodu:

   [23:28:01] <ControL_Bot> *** qeweSe; #mynet_sohbet kanalında op( @ ) oldu.

CLubber

04 Kasım 2011 12:33

Cevap: Bu Kodu TCL YazabiLcek Coder ArakaDas ariyorum

+o modlu TCL zaten yazıp verdim.

+a yazıyorsun, verdiğin kodda +o var alakasız kod.

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