Hi Ive been trying to get a simple time bind to work, it looks ok to me, but it never actually triggers. Am i missing something obvious?: bind time - "0 23 * * *" coolscriptsshow proc coolscriptsshow {minute hour day month year} { puthelp "PRIVMSG #coolscripts :Channel statistics avai...
Sorry, ive removed the script above as the person i was writing it for changed his mind about what he wanted. I would just like to know for knowledges sake how i would actually add a \ infront of a character in a string which is } Would it be via the string map command? or would i use something else...
When i try to use $temp-path as a global string i receive the error: <llamalist> [00:20] Tcl error [test]: can't read "temp": no such variable which was just taken from the script proc test {nick uhost hand chan text} { global temp-path putlog "$temp-path" } what am i missing? It...
The script which adds information to the database is this: putlog "NickHost: Join check on $nick: Adding new host $host" set filewrite [open $nickdb a] puts $filewrite "$nick $host" close $filewrite $nick being the nick of the person who just joined the channel, etc Then, a user ...
Ive written a script which effecitvely safes user nicks and some information about them to a file. Ive encountered a problem that when nicks contain { and [ the script gets confused. How would i go about checking each time a nick is to be added to the database and adding a \ infront of each characte...
Ive tried the standard notc bind but it doesnt seem to register anything. I also looked through the irc rfc and i couldnt see any numerics relating to op notices.
hm, actually that means that people can use ANY command prefix they like in the channel, ie, @authaddop and !authaddop both work no-matter what the setting in the file is.
I want to give the option to choose there own prefix in a separate settings file, using set cmdprefix "!" for example then matching it to pub binds as such bind pub - $cmdprefixauthaddop pub_authaddop the problem is that the bot appears to think that "$cmdprefixauthaddop is one single...
hm, i think i need to expand on this a little as im not sure if it will be possible at all the /who request comes from a separate command to give basic information on a nickname on a server. The nickname does not have to be in any specific channels. On receiving various raw binds the information is ...
I have sorted the problem now: proc msg_listpassreqs {nick uhost hand args} { global botnick requestpassfile set fileread [open $requestpassfile r] set all [read $fileread] close $fileread if { $all == "" } { putnotc $nick "Error: No password requests pending" return 0 } set numb...
hm actually, i just put a putlog "test" underneath 'foreach line [gets $fs] {' and it resulted in repeating 'test' 16 times. I have looked at the file manually and it only has 1 line in it...
I am trying to count the number of lines in a file. The script i have so far is: set number 0 set fs [open $requestpassfile r] while {![eof $fs]} { foreach line [gets $fs] { set count [expr $number+1] } } close $fs putnotc $nick "There are $count password requests pending" this script does...
Hi I am writing a script to detect the number of clones there are from a certain host on an irc network (not in a channel). To do this i am getting the bot to do a /who +h host on the host of the user i wish to check for clones. Then using a raw bind i want to catch the information and count the num...