Konuya cevap cer

Mesaj

<blockquote data-quote="Che" data-source="post: 102" data-attributes="member: 1">[CODE]bind raw - &quot;INVITE&quot; inv_joinbind msg n &quot;!tamam&quot; accept_invbind msg n &quot;!olmaz&quot; reject_invproc inv_join {from key arg} {&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; set ::targetchan [lindex [split $arg &quot;:&quot;] 1]&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; putserv &quot;notice $::owner :$from tarafından, $::targetchan kanalına davet edildim.&quot;&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; putserv &quot;notice $::owner :daveti kabul etmek için: /msg $::botnick !tamam&quot;&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; putserv &quot;notice $::owner :daveti red etmek için: /msg $::botnick !olmaz&quot;&nbsp; &nbsp; return 0}proc reject_inv {nick uhost hand text} {&nbsp;&nbsp; if {[info exists ::targetchan]} {&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; unset ::targetchan&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; putserv &quot;notice $::owner :Red edildi ..&quot;&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; return 1&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; }&nbsp; &nbsp;&nbsp; return 0}proc accept_inv {nick uhost hand text} {&nbsp;&nbsp; if {[info exists ::targetchan]} {&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; channel add $::targetchan&nbsp; &nbsp; &nbsp; &nbsp; putserv &quot;notice $::owner :Kanala girildi ..&quot;&nbsp; &nbsp; &nbsp; &nbsp; unset ::targetchan&nbsp; &nbsp; &nbsp; &nbsp; return 1&nbsp; &nbsp; &nbsp; &nbsp; }&nbsp; &nbsp; return 0}[/CODE]</blockquote>

[QUOTE="Che, post: 102, member: 1"] [CODE]bind raw - "INVITE" inv_join bind msg n "!tamam" accept_inv bind msg n "!olmaz" reject_inv proc inv_join {from key arg} { set ::targetchan [lindex [split $arg ":"] 1] putserv "notice $::owner :$from tarafından, $::targetchan kanalına davet edildim." putserv "notice $::owner :daveti kabul etmek için: /msg $::botnick !tamam" putserv "notice $::owner :daveti red etmek için: /msg $::botnick !olmaz" return 0 } proc reject_inv {nick uhost hand text} { if {[info exists ::targetchan]} { unset ::targetchan putserv "notice $::owner :Red edildi .." return 1 } return 0 } proc accept_inv {nick uhost hand text} { if {[info exists ::targetchan]} { channel add $::targetchan putserv "notice $::owner :Kanala girildi .." unset ::targetchan return 1 } return 0 }[/CODE] [/QUOTE]

Adı

İnsan doğrulaması

Konuya cevap cer

Dost Sitelerimiz

Radyo TrendFm Dinle

mIRCForum.Org.TR

Anahtar Kelimelerde Biz