egghelp/eggheads community

script request

2006-05-24T14:36:58-04:00

i am using this time stamp format btw

et time1 [clock format [clock seconds] -format "%Y %m %d %H %M"]

Statistics: Posted by whittinghamj — Wed May 24, 2006 2:36 pm

script request

2006-05-24T14:29:00-04:00

here is what i have wil the userfile set - see if i have done something stupid like normal

Code:

bind pub -|- !age pub:age bind pub -|- !adduser pub:add:age set userjoindata "users.txt" proc pub:add:age {nick uhost hand chan text} {    if {[llength $text] > 1} {       puthelp "PRIVMSG $chan :You were supposed to add a nick.. not more"    } elseif {![lsearch $::userjoindata $text]} {       lappend userjoindata {$nick clock format [clock scan now] -format "%D %T"}    } } proc pub:age {nick uhost hand chan text} {    if {[llength $text] > 1} {       puthelp "PRIVMSG $chan :You were supposed to look for a nick.. not more"    } elseif {![lsearch $::userjoindata $text]} {       puthelp "PRIVMSG $chan :I don't remember seing $text    } else {       puthelp "PRIVMSG $chan :$text has been in $chan since [lindex $::userjoindata [lsearch $::userjoindata $nick] 2]    } }

and the age works now i have added the missing " s at the end of the puthelp lines near the end but it just says this

Quest has been in #chan since - no time - i manually added the nick / date to test !age - i might have the wrong date format tho for that part :-s

Statistics: Posted by whittinghamj — Wed May 24, 2006 2:29 pm

script request

2006-05-24T14:27:00-04:00

hi mate

thanks - it does not crash the bot now. but it does nothing

not tcl errors nor does it give the error messages in the irc channel eg you need to specify a nick or anyt other error - but it does not add the info the text file - any suggestions buddy?

Thanks for the recode.

god bless you my son

Statistics: Posted by whittinghamj — Wed May 24, 2006 2:27 pm

script request

2006-05-24T14:03:35-04:00

i missed some closing brackets. here's the corrected code + !adduser:

Code:

bind pub -|- !age pub:agebind pub -|- !adduser pub:add:ageset userjoindata ""proc pub:add:age {nick uhost hand chan text} {   if {[llength $text] > 1} {      puthelp "PRIVMSG $chan :You were supposed to add a nick.. not more"   } elseif {![lsearch $::userjoindata $text]} {      lappend userjoindata {$nick clock format [clock scan now] -format "%D %T"}}}proc pub:age {nick uhost hand chan text} {   if {[llength $text] > 1} {      puthelp "PRIVMSG $chan :You were supposed to look for a nick.. not more"   } elseif {![lsearch $::userjoindata $text]} {      puthelp "PRIVMSG $chan :I don't remember seing $text   } else {      puthelp "PRIVMSG $chan :$text has been in $chan since [lindex $::userjoindata [lsearch $::userjoindata $nick] 2]   }}

Statistics: Posted by krimson — Wed May 24, 2006 2:03 pm

script request

2006-05-24T05:21:51-04:00

i get this error buddy :-s

Code:

[03:23] missing close-brace    while executing"proc add:age {nick uhost hand chan} {   if {![lsearch $::userjoindata $nick]} {      lappend userjoindata {$nick clock format [clock scan now] -fo..."    (file "scripts/lobby/users.tcl" line 132)    invoked from within"source scripts/lobby/users.tcl"    (file "zeus.conf" line 83)[03:23] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)[f4w@lobby-poseidon eggdrop]$

Statistics: Posted by whittinghamj — Wed May 24, 2006 5:21 am

script request

2006-05-24T05:17:44-04:00

instead of onjoin - how would i add the user using !adduser

I would like to manually add the user if its not too much work.

AND THANK YOU SO MCUH - I WILL BUY YOU A BEER

Statistics: Posted by whittinghamj — Wed May 24, 2006 5:17 am

script request

2006-05-24T04:26:36-04:00

i think this should work. if something's wrong, leave a reply and i'll try to fix it this evening. now i got to go to school

Code:

bind pub -|- !age pub:agebind join -|- "#chan *" add:ageset userjoindata ""proc add:age {nick uhost hand chan} {if {![lsearch $::userjoindata $nick]} {lappend userjoindata {$nick clock format [clock scan now] -format "%D %T"}}proc pub:age {nick uhost hand chan text} {if {[llength $text] > 1} { puthelp "PRIVMSG $chan :You were supposed to look for a nick.. not more" } elseif {![lsearch $::userjoindata $text]} {puthelp "PRIVMSG $chan :I don't remember seing $text} else {puthelp "PRIVMSG $chan :$text has been in $chan since [lindex $::userjoindata [lsearch $::userjoindata $nick] 2] }

Statistics: Posted by krimson — Wed May 24, 2006 4:26 am

script request

2006-05-24T03:59:39-04:00

yes offline counts as well
i just need to know when the bot first saw the person until today / now

eg the text would say nick 200601010515

numbers are thus
2006 year 01 month 01 day 05 hour 15 minute

Then i do

!age nick
bot says nick has been on #lobby for x months x days x hours x minutes

is answer = zero then say nothing eg if yeah was 0 then ignore the year part

and to add to the text file

i would like a !adduser bind

any ideas buddy?

god bless

Statistics: Posted by whittinghamj — Wed May 24, 2006 3:59 am

script request

2006-05-24T01:48:29-04:00

does offline time count or not?

Statistics: Posted by krimson — Wed May 24, 2006 1:48 am

script request

2006-05-23T23:49:24-04:00

just a thort, i guess kinda like a seen script but just from the first time the bot saw the user would be frigging great.

Statistics: Posted by whittinghamj — Tue May 23, 2006 11:49 pm

script request

2006-05-23T23:17:42-04:00

hi guys, i have a question request. If its on the download section sorry if i missed it.

I am looking for a tcl which would do the following.

Everytime the bot sees a new nice it adds the name to a txt file and date / time stamps that entry.

Then when ever a channel +o does !age the bot looks at the file and finds the record and says ok has been in channel for 7 weeks 2 days.

not idle time but from the first time the nick was seen on the channel. does that make sence?

any help would be great. thank you

god bless u all.

Statistics: Posted by whittinghamj — Tue May 23, 2006 11:17 pm