egghelp/eggheads community

Code: Select all

bind pub - howdy do_bind_speech

proc do_bind_speech { nick host hand chan text } {

          putserv "privmsg $chan :Howdy to you, $nick"
}

        

Code: Select all

proc login {nick host hand chan arg}
global url pathqstat cc nopub dj
if {[lsearch -exact $nopub [string tolower $chan]] >= 0} {return 0}
return 0
} 

Code: Select all

proc name { args } { do whatever }

Code: Select all

  if { num1 > num2 } {
                 true
     } else {
                 false
     }

Code: Select all

proc send:help {nick uhost hand chan {args ""}}