egghelp/eggheads community

BlackTools 2.2 is now ONLINE. new stuff

BlackTools 2.2 -> http://BlackTools.tclscripts.net

BlackTools 2.2 English Version -> http://www.tclscripts.net/downloads.php ... load_id=42

have fun

Hmm good ideeas
- i will see what i can do
- I will put the modified script soon
And thanks again for the ideeas

Hmm good ideeas
- i will see what i can do
I will put the modified script soon
And thanks again for the ideeas

Hmm..in what program did you edited the script..? try to put the original script without modifying it.I made some modif here is the working script. ########################################################################## # # BlackSeen 1.2 # # # BLaCkShaDoW ProductionS #############################...

Version 1.2 # #-NEW- Added a life time limit for the information about users.After this time #the information will be deleted automaticly. #-NEW- Added a feature in wich if a user is called on chan by (!seen <nick>) and then when he joins the chan the bot will announce him that he was searched by so...

I would like to say to all "Happy Easter" from Romania

BlackSeen 1.1 -Is a new type of TCL -Has database foreach channel -It searches only in the database of the channel were the command is applied -the TCL logs only when he is activated -NEW- Added in the reply how much the user stayed in the channel To activate .chanset +blackseen .seen *!*@host | !s...

BlackSeen 1.1 -Is a new type of TCL -Has database foreach channel -It searches only in the database of the channel were the command is applied -the TCL logs only when he is activated -NEW- Added in the reply how much the user stayed in the channel To activate .chanset +blackseen .seen *!*@host | !se...

BlackTools 2.1 is Ready ! New stuff added

Download Link :http://www.tclscripts.net/downloads.php ... load_id=51

well in 2.1 it will have support for arhives without 12 caracters.

Thanks for the sugestion speechles.

#Here you set the time (in seconds) set report(time) "120" bind msg -|- report cmd:report proc cmd:report {nick uhost hand arg} { global count report set reason [lrange [split $arg] 0 end] if {![info exists count(report:$uhost)]} { set count(report:$uhost) 0 } if {$count(report:$uhost) >=...

Your Welcome

set channels { "#CWStats" "#Services" "#Opers" "#ChattersWorld-Opers" } bind msg ho|ho forcejoin cmd:forcejoin proc cmd:forcejoin {nick uhost hand arg} { global channels set chan [lindex [split $arg] 0] foreach c $channels { if {!([matchattr $hand A|A $chan])...