egghelp/eggheads community

Best idea(s) of the millenium!

2001-12-09T14:41:00-04:00

Code:

array set nickarray {}#set this to the special flag the user must haveset nickflag "S"bind join ${nickflag} "*" chk:joinproc chk:join {nick uh hand chan} {  global nickarray  lappend nickarray([string tolower $nick]) $chan  hi_check $nick cb:voice}proc cb:voice {nick x} {  global nickarray  foreach chan $nickarray($nick) {    if {(![isop $nick $chan]) && (![isvoice $nick $chan]) && ([onchan $nick $chan])} {      pushmode $chan +v $nick    }    set nickarray($nick) [lrepleace $nickarray($nick) [set idx [lsearch -exact $nickarray($nick) "$chan"]] $idx]]  }}bind time - "*" chk:timeproc chk:time {min hour day month year} {  global nickarray nickflag  set min [string trimleft $min 0]  if {![expr $min % 5]} {    foreach chan [channels] {      foreach nick [chanlist $chan $nickflag] {        if {(![isop $nick $chan]) && (![isvoice $nick $chan])} {          hi_check $nick cb:voice          lappend nickarray([string tolower $nick] $chan        }      }    }  }}

Statistics: Posted by ppslim — Sun Dec 09, 2001 2:41 pm

Best idea(s) of the millenium!

2001-12-08T12:13:00-04:00

Code:

array set nickarray {}bind join - "*" chk:joinproc chk:join {nick uh hand chan} {  global nickarray  lappend nickarray([string tolower $nick]) $chan  hi_check $nick cb:voice}proc cb:voice {nick x} {  global nickarray  foreach chan $nickarray($nick) {    if {(![isop $nick $chan]) && (![isvoice $nick $chan]) && ([onchan $nick $chan])} {      pushmode $chan +v $nick    }    set nickarray($nick) [lrepleace $nickarray($nick) [set idx [lsearch -exact $nickarray($nick) "$chan"]] $idx]]  }}bind time - "*" chk:timeproc chk:time {min hour day month year} {  global nickarray  set min [string trimleft $min 0]  if {![expr $min % 5]} {    foreach chan [channels] {      foreach nick [chanlist $chan] {        if {(![isop $nick $chan]) && (![isvoice $nick $chan])} {          hi_check $nick cb:voice          lappend nickarray([string tolower $nick] $chan        }      }    }  }}

This isn't tested, nor fine tuned. It acts for all channels, and check all channels for no-voices every 5 mins.

You should load the script by stdarg first, then this.

Statistics: Posted by ppslim — Sat Dec 08, 2001 12:13 pm

Best idea(s) of the millenium!

2001-12-08T08:21:00-04:00

I hope there is someone following this...

Statistics: Posted by Yourname — Sat Dec 08, 2001 8:21 am

Best idea(s) of the millenium!

2001-12-04T14:54:00-04:00

I saw that script, but i didnt get much of a head & tail of it But i take it that it'll need 2 more scripts to work properly from your site.

Anyways, the foundation is set, thanks to stdarg, now its for the contruction and the finishing ceremony!

All the best

Statistics: Posted by Yourname — Tue Dec 04, 2001 2:54 pm

Best idea(s) of the millenium!

2001-12-03T22:47:00-04:00

I already wrote a script like that

http://home.dal.net/stdragon/eggdrop/hasidentified.tcl

It works like this..

Code:

proc mycallback {nick ident} {  if {$ident == 1} {    # has identified  } else {    # hasn't identified  }}hi_check stdragon mycallback

Statistics: Posted by stdragon — Mon Dec 03, 2001 10:47 pm

Best idea(s) of the millenium!

2001-12-03T16:23:00-04:00

DAMN! yeah man!! Exactly!

LOL... i almost forgot that services can be of help too!
Well, there ya go guys.. that brings a very good turn now.

Statistics: Posted by Yourname — Mon Dec 03, 2001 4:23 pm

Best idea(s) of the millenium!

2001-12-03T16:03:00-04:00

While my knowledge of dalnet is severly limited, I recall that you could ask nickserv if a user was registered with the /nickserv ACC $nick command, to which it would reply with a notice what access level the user was at (something like 0 for unregistered nick, 1 for not real owner, 2 for hostmask matching for the nick, and 3 for password identified. - check with nickserv help if I'm right about that). It would be better to use nickserv for this application because #1 thats what it this command was designed for, and #2 it always returns an answer, unlike the whois method which has the numeric missing if it aint identified.

Statistics: Posted by Petersen — Mon Dec 03, 2001 4:03 pm

Best idea(s) of the millenium!

2001-12-03T14:28:00-04:00

Well, Why do we need to keep waiting for a numeric?

Why cant we do something like output the result of /whois $nick to a temp file. And then make eggdrop search for the particular string, in this case 'identified' and do what we want it to do. (which i already told what shud be done in my main post)

Regards lag, we can think of it later. Right now the main concept can be done. Lags, splits can come up later

Statistics: Posted by Yourname — Mon Dec 03, 2001 2:28 pm

Best idea(s) of the millenium!

2001-12-03T06:27:00-04:00

The problem with the 1st idea is that the server doesn't send a numeric when a nick isn't identified. In fact, it doesn't always send one if a nick IS identified. And, due to server lag, etc, you can't really base something on the condition that something diddn't happen, you need 2 conditions. That may have not made sence, but oh well, I'm tired

Statistics: Posted by Wcc — Mon Dec 03, 2001 6:27 am

Best idea(s) of the millenium!

2001-12-03T03:25:00-04:00

seems like the second idea aint possible. well, isnt there a way to code it into eggdrop and ADD this functionality?

Statistics: Posted by Yourname — Mon Dec 03, 2001 3:25 am

Best idea(s) of the millenium!

2001-12-03T03:23:00-04:00

Well, the 'identified' will be missing

Statistics: Posted by Yourname — Mon Dec 03, 2001 3:23 am

Best idea(s) of the millenium!

2001-12-03T00:09:00-04:00

Somthing else I should have asked, but what does the server send if the person is not identified.

Statistics: Posted by ppslim — Mon Dec 03, 2001 12:09 am

Best idea(s) of the millenium!

2001-12-02T23:30:00-04:00

307

Statistics: Posted by Wcc — Sun Dec 02, 2001 11:30 pm

Best idea(s) of the millenium!

2001-12-02T22:14:00-04:00

As Petersen said, once the "source" command is used to load the script, the memory that it is stored in, acts like one large script.

As for the first idea. We would need to know the RAW numeric used by the server, to send the data back.

Statistics: Posted by ppslim — Sun Dec 02, 2001 10:14 pm

Best idea(s) of the millenium!

2001-12-02T18:28:00-04:00

re your second query. no, it can't output the filename. once a script is loaded, it doesn't have any identifiers with the filename it was from, it just exists as procs, namespaces, binds, timers and varables, and nothing else.

Statistics: Posted by Petersen — Sun Dec 02, 2001 6:28 pm