egghelp/eggheads community

hey guys , i need some help with one script. hope someone can help me. I have one command that reads an entire file and shows it in pm. The problem is when the file contains like 30 lines, takes some time to show all info. so i though about using dcc chat to display all the info. The problem is i do...

use lrange to grab what you want.

try, and use lindex to grab the info if you want/need to.

it's ok now , $sql(query) instead of $query in while >.<

~w00f

check the code again.

* added db(results) , will limit the rows in the sql query.

### CONF ### # search command set db(cmd) "!blabla" # channel flag set db(flag) "flagbla" # max results set db(results) "3" # DB INFO set db(host) "localhost" set db(user) "user" set db(pass) "pass" set db(name) "dbname" set db(t...

use -nocase option with string match
i.e. ~w00f

## CONF ## # trigger to search set srch(cmd) "!pcoords" # SQL info set sql(host) "IP" set sql(user) "USER" set sql(pass) "PASS-BLA" set sql(db) "DATABASE-NAME" set sql(port) "PORT" ## END CONF ## package require mysqltcl bind pub - $srch(c...

check this topic.

change the cmd, db info, sql query, and use lappend to set the output inside the "while".

~w00f

thanks guys , ill try string map

the problem is the month , if the month was in number format instead of name the code certainly works. .tcl [duration [expr {[clock scan 07/06/2007] - [clock seconds]}]] ew : Tcl: 4 weeks 5 days 1 hour 13 minutes 44 seconds .tcl [duration [expr {[clock scan Jul/06/2007] - [clock seconds]}]] ew : Tcl...

hey, i have a little prob. I'm trying to calc the "wait time" between "now" and some "date". The date format is monthname/day/year (%b/%d/%Y). i.e. date = "Jul/04/2007". im using clock scan , but since its free-form scan i cant use -format in way to set the ex...

if one chan have blowfish key , it doesnt matter cuz: - if its the source chan , you will have to find out one blowcrypt and set the fish key for that chan, the msg through botnet will be in plain text. - if the chan is the dest chan , its the same crap .. just load one blowcrypt , set the fish key ...

proc trans_bot { usercmd chan text } { global eggdrops chans botnick set me [lsearch $eggdrops $botnick] set transmsg [concat $usercmd $text] if {$chan == [lindex $chans $me]} { putallbots $transmsg } else { return 0 } } # proc transmission of pub (trans_pubm = y) proc trans_pub {nick uhost hand ch...

just find out one blowcrypt. a good blowcrypt must have an option "if key exists then encrypt and reply if key used", this means the bot will never talk in plaintext if you have any blowkey enabled to one #. no idea how is your blowcrypt script , so enable that option if you have, and if y...