This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

login

Old posts that have not been replied to for several years.
Locked
l
lindy
Voice
Posts: 15
Joined: Fri Oct 10, 2003 7:02 am
Location: uk
Contact:

login

Post by lindy »

i dunno if i need a tcl or it is just a setting, when im in a botroom id like to see whe other users from other rooms where the bots are, login to the bots, how do i get this to show in bot channel????
s
spock
Master
Posts: 319
Joined: Thu Dec 12, 2002 8:40 pm

Post by spock »

not sure what this is what you want but it's my best guess

Code: Select all

bind chon - * chon
bind chof - * chof
proc chon { h i } { puthelp "PRIVMSG #botchannel :$h logged in" }
proc chof { h i } { puthelp "PRIVMSG #botchannel :$h logged out" }

photon?
l
lindy
Voice
Posts: 15
Joined: Fri Oct 10, 2003 7:02 am
Location: uk
Contact:

Post by lindy »

thanksill give it a go :)
User avatar
YooHoo
Owner
Posts: 939
Joined: Thu Feb 13, 2003 10:07 pm
Location: Redwood Coast

Re: login

Post by YooHoo »

lindy wrote:i dunno if i need a tcl or it is just a setting, when im in a botroom id like to see whe other users from other rooms where the bots are, login to the bots, how do i get this to show in bot channel????
:roll: since eggdrop has no default "login" function built-in, what script are you currently using to provide this command? Last we spoke, you were running a version of the massive stormbot.tcl, which already has this feature... or at least used to... altering the actual procedure that is providing the "login" feature would be best (try .binds *login* or .binds msg to find the procedure :mrgreen: ), but you could always just create a seperate procedure and add it to this or another tcl...maybe something along these lines...

Code: Select all

set homechan "#bots_kick_ass"
if {![info exists homechan]} {set homechan "[lindex [channels] 0]"}

bind msgm - "*login*" call_home

proc call_home { nick host hand text } {
 global botnick homechan
 if  {[passwdok $hand [lindex $text 0]]} {
  putmsg $homechan "\002$nick\002 ($hand) ($host) logged in successfully..."
}
if {![validuser $hand]} {
  putmsg $homechan "\002ATTENTION!\002 $nick ($host) failed authentication!"
}
But I still feel it is better to alter the original procedure that controls this :mrgreen:
Locked