0 LIKES
Snippet
SMILE REPLY TCL by Errr
In Category General IRC Posted by Snippets On 12/04/23
Smile TCL
just put this fine in you eggdrop script directory add the path in you eggdrop .conf file.
You got to set channel name this script to work on the channel
just put this fine in you eggdrop script directory add the path in you eggdrop .conf file.
You got to set channel name this script to work on the channel
set rplytimer 3
set chname "#error"
set autorply {
"=;)"
"@;)"
"q;)"
":-)"
":-))"
":-D"
"&:-)"
":-p"
";-)"
";-))"
":-O"
":-1"
}
bind pub - {:)} pub:smile
bind pub - {=:)} pub:smile
bind pub - {=;)} pub:smile
bind pub - {=)} pub:smile
bind pub - {:p} pub:smile
proc pub:smile {nick host handle channel text} {
global autorply rplytimer chname
utimer $rplytimer [list puthelp "PRIVMSG $chname :[lindex $autorply [rand [llength $autorply]]]"]
}
putlog "smile.tcl 0.1 by Error loaded"
Comments 0
You must be logged in to comment.
