display users

Print Thread

display users #35928 12/07/03 01:30 PM
Joined: Jun 2003 Posts: 130 NSW, Australia O obsessed OP Vogon poet
OP obsessed Vogon poet O Joined: Jun 2003 Posts: 130 NSW, Australia	I would like to see the amount of users displayed when someone joins, parts, quits or is kicked and maybe the number of ops on op and deop ect. for Expamle: [23:22:10] *** Watcher (Watcher@vw9830.iprimus.net.au) has joined #mIRC [Users: 24] [23:22:11] * ChanOP sets mode: +o Watcher [Ops: 3] I know it is scriptable infact that is copied from a script I made. And an option to turn it on or off would be handy. And before you say it is easy to script think about the options, like 'sort joins', 'no address' my script supports this and it is pretty complex. If only women came with popup menus and online help.

Re: display users #35929 12/07/03 04:54 PM
Joined: Dec 2002 Posts: 2,809 C codemastr Hoopy frood
codemastr Hoopy frood C Joined: Dec 2002 Posts: 2,809	Well the current number of users in the channel is already displayed in the titlebar, so I don't know why you'd need it displayed in the channel window as well. As for ops/voice/etc. That much is easily scripted. All the problems you pointed out (short joins, no address, etc) are only related to join/part and mIRC already displays the info you want displayed in a join/part.

Re: display users

#35930 13/07/03 01:41 AM

Joined: Jun 2003

Posts: 130

NSW, Australia

obsessed

Vogon poet

obsessed

Vogon poet

Joined: Jun 2003

Posts: 130

NSW, Australia

Well here the code for it if anyone cares:

Code:

on ^!*:join:#:if ($gettok($readini($mircini,events,default),1,44) != 2) echo $colour(join) $iif(!$gettok($readini($mircini,events,default),1,44),-t $chan ***,-ts *) $iif($gettok($readini($mircini,options,n2),19,44),Joins $iif($gettok($readini($mircini,events,default),1,44),$chan) $+ :) $nick $iif($gettok($readini($mircini,options,n0),2,44),$+($chr(40),$address,$chr(41))) $iif(!$gettok($readini($mircini,options,n2),19,44),has joined $chan) [Users: $nick($chan,0) $+ ] | haltdef
on ^!*:part:#:if ($gettok($readini($mircini,events,default),2,44) != 2) echo $colour(part) $iif(!$gettok($readini($mircini,events,default),2,44),-t $chan ***,-ts *) $iif($gettok($readini($mircini,options,n2),19,44),Parts $iif($gettok($readini($mircini,events,default),2,44),$chan) $+ :) $nick $iif($gettok($readini($mircini,options,n0),2,44),$+($chr(40),$address,$chr(41))) $iif(!$gettok($readini($mircini,options,n2),19,44),has left $chan) $iif($1,$+($chr(40),$1-,,$chr(41))) [Users: $calc($nick($chan,0) - 1) $+ ] | haltdef
on ^*:kick:#:if (($gettok($readini($mircini,events,default),8,44) != 2) &amp;&amp; ($knick != $me)) { echo $colour(kick) $iif(!$gettok($readini($mircini,events,default),8,44), -t $chan ***,-ts *) $knick was kicked by $nick $+($chr(40),$1-,,$chr(41)) $iif(!$gettok($readini($mircini,events,default),8,44),[Users: $calc($nick($chan,0) - 1) $+ ]) | haltdef }
on ^*:quit:{
  if ($gettok($readini($mircini,events,default),3,44) != 3) {
    if (($gettok($readini($mircini,events,default),3,44)) || ($gettok($readini($mircini,events,default),3,44) == 2)) { echo $colour(quit) -ts * $iif($gettok($readini($mircini,options,n2),19,44),Quits:) $nick $iif($gettok($readini($mircini,options,n0),2,44),$+($chr(40),$address,$chr(41))) $iif(!$gettok($readini($mircini,options,n2),19,44),has quit IRC) $+($chr(40),$1-,,$chr(41)) | linesep -s }
    if ((!$gettok($readini($mircini,events,default),3,44)) || ($gettok($readini($mircini,events,default),3,44) == 2)) {
      var %x = 1
      while (%x &lt;= $comchan($nick,0)) {
        echo $colour(quit) -t $comchan($nick,%x) *** $iif($gettok($readini($mircini,options,n2),19,44),Quits:) $nick $iif($gettok($readini($mircini,options,n0),2,44),$+($chr(40),$address,$chr(41))) $iif(!$gettok($readini($mircini,options,n2),19,44),has quit IRC) $+($chr(40),$1-,,$chr(41)) [Users: $calc($nick($comchan($nick,%x),0) - 1) $+ ]
        inc %x 1
      }
    }
  }
  haltdef
}
on ^*:rawmode:#:echo $colour(mode) -t $chan *** $nick sets mode: $1- $iif(o isin $1, [Ops: $nick($chan,0,o) $+ ]) $iif(h isin $1, [Halfops: $nick($chan,0,h) $+ ]) $iif(v isin $1, [Voices: $nick($chan,0,v) $+ ]) | haltdef

If only women came with popup menus and online help.

Link Copied to Clipboard

Forums Feature Suggestions display users