egghelp/eggheads community

Or, for a simplistic method bind pub - .call call:proc proc call:proc {nick uhost hand chan arg} { global botnick # check if user has access to bot or not if {![matchattr [nick2hand $nick] o|o $chan]} {return} set nicklist [chanlist $chan] # removing botnick from list set notbot [lsearch $nicklist $...

I didn't bother with need-op because that wasn't what the user asked for. Also, it tends to flood services, most people add a "chanserv op" command to their bot, so anytime anyone deops the bot it will autoop again. This can cause issues, in a desync, with flooding, etc. My code triggers a...

A friend wrote a script similar to this, in html. I did the TCL counter, which counted the number of users (every join/part/quit/split) and wrote to a txt file. He wrote the html part that checked the txt file and updated the number to his site. I don't have the TCL, nor the html, but it shouldn't b...

Why don't you use isbotnick (in all places) and botisop built-in functions?

I was going to, and did use it (isbotnick) within the join procedure, but I got lazy. I'm self taught, mostly by reading other peoples code. I just do things the way I know works.

I didn't test this, but it sounds like something you want. # Auto TCL - istok @ IRCSpeed.org # $Id: auto.tcl,v1 20/01/2012 04:37:42am GMT +12 (NZST) istok Exp $ bind join - * join:op proc join:op {nick uhost hand chan} { if {![isbotnick $nick]} {return} utimer 5 check:status } proc check:status {} {...

People may want to host this script themselves, rather than on your hosting, to protect their code until payment is received. I know I would.

Very cool, thanks arfer