egghelp/eggheads community

"del" { if {![matchattr $hand nm|]} { putserv "NOTICE $nick :Error: you do not have access to this command, global +n or +m needed." } elseif {($info == "")} { putserv "NOTICE $nick :Error: please enter a badword to remove from the database, use !badword del word....

Hmm, just trying to make a antiproxy/antipjen bot for a mates, just wondered if its something to do with the host, what the client does when it joins the channel, like message these $decode things etc.

Hmm, i dont know if anyone knows this, but how can you detect someone is a trojan user?

Thanks in advance!

Arrh, i see, i was thinking is was a array, oh well ;p
i sometimes get them the wrong way around

Also bind msgm - "!read*" botpost_lese proc botpost_lese {nick host hand text} { global post_messages global post_userfile global post_botnick could be changed to bind msgm - "!read*" botpost_lese proc botpost_lese {nick host hand text} { global post i think ;p

instead of using all that
use
Otherwise when the botnick changes, the $post_botnick var does not change!

arrh, thanks Sir_fz and Demond, i will try and fix them myself, but im going thro a rough time atm. I got exams at school, and a relative died 3 weeks ago, and so im really busy. I dont have much time for my tcl scripting, but im trying to make this script for my channel asap, as they have been wait...

i made this script earlier today and have been testing it, but there is a error, which i cant seem to fix. The code: proc make:prize {nick host handle chan text} { set newprize $text if {![matchattr $handle C|C $chan} && ![matchattr $handle o|o $chan] { putserv "PRIVMSG $chan :Error: Yo...

i read that basic file operations, and what you said about not using the internal "get" command or whatever that is. The script i made worked, but replyed to the channel as: {#channel prize here}
How can i make it so it replies without the brackets and the channel name.
Thanks in advance!!

erm, rather good, got most of it working, just need help on this !prize script, there is a error, and it does find the prize in the cupprize.db, my mate on irc said the script is correct, but he doesnt know the problem. Can anyone help make a script to read a certain line from cupprize.db which a -s...

so bind pub - \$prize get:prize proc get:prize {nick host hand chan args} { set fs [open "cupprize.db" r] set prize "" while (![eof $fs]) { set gets [gets $fs] if {[lindex $fs 0] = "$chan"} { set prize [lrange $fs 1 end] } } if {($prize == "")} { putserv "...

ok, i know how to write to cupprize.db but i dont know how to read from it. i made a custom C flag for cupadmin bind pub oC|oC !setprize cup:prize proc cup:prize {nick host handle chan text} { global lastbind set cupprize [lindex [split $text] end] if {![matchattr $handle o|o $chan] && ![mat...

just please help me with this !!

Thanks in advance!!

well, this is a help forum, where people ask for help, maybe thats the reason !?!

i need to store the cup prize info for each channel, i would like to do this using cupprize.db and cupbot.db I would like cupprize.db to hold the chanel name and the prize info like this: #channel 10 bncs or something like that, and in cupbot.db i want it to hold the on/off info like this #channel o...