< Eggdrop
Content added Content deleted
imported>mutante mNo edit summary |
imported>Finn mNo edit summary |
||
| (7 intermediate revisions by 2 users not shown) | |||
| Line 1: | Line 1: | ||
[[Tcl|TCL scripts]] to authenticate with [[Q]] on the [[Quakenet]] [[IRC]] [[network]] |
|||
<+caytchen> |
<+caytchen> |
||
| Line 5: | Line 7: | ||
proc authme {nick uhost hand chan text} |
proc authme {nick uhost hand chan text} |
||
{ putquick "privmsg q@cserve.quakenet.org :AUTH <nick> <pass>";putserv "mode $::botnick +x" } |
{ putquick "privmsg q@cserve.quakenet.org :AUTH <nick> <pass>";putserv "mode $::botnick +x" } |
||
<@BhaaL> so gehts beim connect *g* |
|||
bind evnt - init-server sinit |
|||
proc sinit {type} { |
|||
putserv "MODE $::botnick +x" |
|||
putquick "PRIVMSG q@cserve.quakenet.org :auth <nick> <pass>" |
|||
} |
|||
[[Category:Bots]] |
|||
[[Category:IRC]] |
|||
[[Category:Computer]] |
|||
Latest revision as of 15:33, 13 March 2005
TCL scripts to authenticate with Q on the Quakenet IRC network
<+caytchen>
bind pub n !auth authme
proc authme {nick uhost hand chan text}
{ putquick "privmsg q@cserve.quakenet.org :AUTH <nick> <pass>";putserv "mode $::botnick +x" }
<@BhaaL> so gehts beim connect *g*
bind evnt - init-server sinit
proc sinit {type} {
putserv "MODE $::botnick +x"
putquick "PRIVMSG q@cserve.quakenet.org :auth <nick> <pass>"
}