|
Joined: May 2005
Posts: 106
Vogon poet
|
OP
Vogon poet
Joined: May 2005
Posts: 106 |
this script would be pritty easy to make i would think but i want a code to say on *:PART:#English:{
/msg #English and then there was (remaining number of people in #English) left
}
and
on *:QUIT:#English: {
/msg #English and then there was (reaminging number of people in #English) left
and thats the way the scout leader burns
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
Untested..
On !*:Part:#English: {
msg $chan and then there was $nick($chan,0) left
}
On !*:Quit: {
var %x = $comchan($nick,0)
while (%x) {
if ($comchan($nick,%x) == #English) msg $v2 and then there was $calc($nick($v2,0) - 1)
dec %x
}
}
-Andy
|
|
|
|
Joined: May 2005
Posts: 106
Vogon poet
|
OP
Vogon poet
Joined: May 2005
Posts: 106 |
for the on !:part:#English { msg $chan and then there was $nick ($chan,0) left would that say the nickname thats first in the channel i.e. AAAA
and thats the way the scout leader burns
|
|
|
|
Joined: Aug 2004
Posts: 7,252
Hoopy frood
|
Hoopy frood
Joined: Aug 2004
Posts: 7,252 |
No, what that would do is send to the channel the number of people still in the channel...if you want the nick of the first person in the channel list, use $nick($chan,1)
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
I didn't realise you wanted their names, sorry.
On !*:Part:#Englishs: {
var %x = $nick($chan,0), %nicks
while (%x) {
%nicks = $addtok(%nicks,$nick($chan,%x),44)
dec %x
}
msg $chan and then there was $remtok(%nicks,$nick,44) left
}
-Andy
|
|
|
|
Joined: Apr 2003
Posts: 701
Hoopy frood
|
Hoopy frood
Joined: Apr 2003
Posts: 701 |
on !:PART:#English { msg $chan and then there was $calc($nick($chan,0) - 1) left }
on !:QUIT: { if ($nick ison #English) msg #English and then there was $calc($nick(#English,0) - 1) left }
Make sure there is no space between $nick and ($chan,0) in the above code to get the number of people in that channel (including the one who just left), so we subtract one.
Do realize that a netsplit will flood you off and/or generate a few pages of those messages.
|
|
|
|
Joined: Sep 2003
Posts: 4,230
Hoopy frood
|
Hoopy frood
Joined: Sep 2003
Posts: 4,230 |
quick netsplit fix on !:PART:#English { .timer.and.then.there.was 1 1 msg $chan and then there was $calc($nick($chan,0) - 1) left } on !:QUIT: { if ($nick ison #English) .timer.and.then.there.was 1 1 msg #English and then there was $calc($nick(#English,0) - 1) left } netsplits well all occur and keep replacing the timer, then the last one goes off (not sure about the correct remaining count tho during a split, well it reduce per quit?) but better than flooding out i guess. oh wait if the remaining count is wrong then this) on !:PART:#English { .timer.and.then.there.was 1 1 and.then.there.was $chan } on !:QUIT: { if ($nick ison #English) .timer.and.then.there.was 1 1 and.then.there.was #English } alias -l and.then.there.was { msg $1 and then there was $calc($nick($1,0) - 1) left }
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
I wouldn't mind seeing mIRC have "on netsplit." It can identify the difference between a quit and a netsplit... should be able to have on netsplit, I would think.
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Sep 2003
Posts: 4,230
Hoopy frood
|
Hoopy frood
Joined: Sep 2003
Posts: 4,230 |
How can you identify the difference?
I wouldnt like to see the ON QUIT not go off, but rather goes off, but you can control what ya do with it based on your trapping the ON NETSPLIT
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
I really don't know how it identifies the difference, but I've seen many scripts list out "nick quit <netsplit>" (not really sure if "vanilla" mIRC does it since I've not used mIRC without a script in years). And I have seen them do it with only a single quit, so it isn't just assuming it is a netsplit because many left. I do agree that the ON QUIT should still go off... but I'd like to have some way to control with something like ON NETSPLIT. Or, is this already possible and I don't know about it?
Invision Support #Invision on irc.irchighway.net
|
|
|
|
Joined: Sep 2003
Posts: 4,230
Hoopy frood
|
Hoopy frood
Joined: Sep 2003
Posts: 4,230 |
Just looked at invisions detector
on ^*:quit:{
...
if (($3 == $null) && ($chr(46) isin $1) && ($chr(46) isin $2) && (%netsplit [ $+ [ $iNetwork ] ] != on)) {
aecho 4Netsplit Detected. $c(1) $+ « $+ $c(2) $+ $1- $+ $c(1) $+ » $c(2) $+ $ts | if ($r.set(Invision,SndOpt25) == On) { SoundQ $shortfn($mircdir) $+ $r.glob(Themes,Sound27) }
set %netsplit [ $+ [ $iNetwork ] ] on
...
Looks like if $1 has a . in it, and $2 has a . in it, and there is no $3 its considered a netsplit event , oddly i havent been able to test this to well since i cant get mirc 616 do do a /QUIT message here
|
|
|
|
Joined: Apr 2003
Posts: 701
Hoopy frood
|
Hoopy frood
Joined: Apr 2003
Posts: 701 |
Yep, I've seen too many lame scripts that yell 'hey, there's a netsplit between servers *.net and *.split!' (But with a lot more extended ASCII table characters, numbers and color codes) Right, I already knew that when the quit message appeared...
btw, was it a clean mIRC or that invision stuff not accepting a quit message?
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
It was a hypothethical, Keldar. Was just saying that we should have a ON NETSPLIT ability and that ON QUIT should still function on a netsplit after adding the ability. I didn't end up looking into Invision's script about this and am at work now, so not sure what exactly it is doing. Maybe I'll look later on.
Invision Support #Invision on irc.irchighway.net
|
|
|
|
|