vb.org Archive

vb.org Archive (https://vborg.vbsupport.ru/index.php)
-   vBulletin 2.x Full Releases (https://vborg.vbsupport.ru/forumdisplay.php?f=4)
-   -   Current IRC chatters on forumhome via mirc (no eggdrop) (https://vborg.vbsupport.ru/showthread.php?t=46949)

ariaforums 01-03-2003 04:03 PM

Thanks for the hack...works a treat :D

Any chance you can make like the coloured on line hack?

eg bots & ops RED , voice GREEN, normal users BLACK.

TheVoidz 01-03-2003 05:49 PM

;==[irc chatter nicklist vb forum upload script begin]=====================
/getnicks { var %x = 1
write -c nicks.php <? $chr(36) $+ ircnicks = "
while (%x <= $nick(#channel,0)) {
if ($nick(#channel,%x) isop #channel) {
write -a nicks.php <font color="#FF0000">@ $+ $nick(#channel,%x) $+ </font> $+ , }
elseif ($nick(#channel,%x) ishop #channel) {
write -a nicks.php <font color="#FF0000"> $+ $chr(37) $+ $nick(#channel,%x) $+ </font> $+ , }
elseif ($nick(#channel,%x) isvoice #channel) {
write -a nicks.php <font color="#00FF00"> $+ $chr(43) $+ $nick(#channel,%x) $+ </font> $+ , }
else { write -a nicks.php $nick(#channel,%x) $+ , }
inc %x
}
set %lastnick $read(nicks.php,$lines(nicks.php))
write -d $+ $lines(nicks.php) nicks.php
set %lastnickchars $calc($len(%lastnick) - 1)
set %nocommanick $left(%lastnick,%lastnickchars)
write -a nicks.php %nocommanick
write -a nicks.php " $+ $chr(59)
set %totalnicks $calc($lines(nicks.php) - 2)
if (%record.users == $null) { set %record.users $nick(#channel,0) }
else {
if ($nick(#channel,0) > %record.users) {
set %record.users $nick(#channel,0)
}
}
write -a nicks.php $chr(36) $+ mostnicks = $chr(34) $+ %record.users $+ $chr(34) $+ $chr(59)
write -a nicks.php $chr(36) $+ totalnicks = $chr(34) $+ %totalnicks $chr(34) $+ $chr(59) ?>
/ftp.upload -dfl ftp.yourserver.com ftplogin ftppassword /path/to/forum/nicks.php c:\path\to\mirc\nicks.php
}
;==[irc chatter nicklist vb forum upload script end]=====================

Replace this with your other mIRC Aliases

Will work assuming your forum default text color is black.

ariaforums 01-03-2003 08:30 PM

I'm getting a parse error on line 3 in nicks.php with that :(

Tried moding it to this but I still get a parse error on line 3 of nicks.php :

;==[irc chatter nicklist vb forum upload script begin]=====================
/getnicks { var %x = 1
write -c nicks.php <? $chr(36) $+ ircnicks = "
while (%x <= $nick(#mychan,0)) {
if ($nick(#mychan,%x) isop #mychan) {
write -a nicks.php <font color="#FF0000">@ $+ $nick(#mychan,%x) $+ </font> $+ _ }
elseif ($nick(#mychan,%x) isvoice #mychan) {
write -a nicks.php <font color="#00FF00"> $+ $chr(43) $+ $nick(#mychan,%x) $+ </font> $+ _ }
else { write -a nicks.php $nick(#mychan,%x) $+ _ }
inc %x
}
write -a nicks.php " $+ $chr(59)
set %totalnicks $calc($lines(nicks.php) - 2)
write -a nicks.php $chr(36) $+ totalnicks = $chr(34) $+ %totalnicks $chr(34) $+ $chr(59) ?>
/ftp.upload -dfl ftp.myserver.secretstuff /www/portal/forums/nicks.php c:\ircn\system\nicks.php
}
;==[irc chatter nicklist vb forum upload script end]=====================

supreemball 01-03-2003 09:22 PM

use ' instead of " on the font color= statements. that should fix it.

ariaforums 01-03-2003 10:02 PM

Could you elaborate :)
Im tired and not thinking straight :)

TheVoidz 01-04-2003 01:50 AM

oh ya that makes sence :p

;==[irc chatter nicklist vb forum upload script begin]=====================
/getnicks { var %x = 1
write -c nicks.php <? $chr(36) $+ ircnicks = "
while (%x <= $nick(#mychan,0)) {
if ($nick(#mychan,%x) isop #mychan) {
write -a nicks.php <font color='#FF0000'>@ $+ $nick(#mychan,%x) $+ </font> $+ _ }
elseif ($nick(#mychan,%x) isvoice #mychan) {
write -a nicks.php <font color='#00FF00'> $+ $chr(43) $+ $nick(#mychan,%x) $+ </font> $+ _ }
else { write -a nicks.php $nick(#mychan,%x) $+ _ }
inc %x
}
write -a nicks.php " $+ $chr(59)
set %totalnicks $calc($lines(nicks.php) - 2)
write -a nicks.php $chr(36) $+ totalnicks = $chr(34) $+ %totalnicks $chr(34) $+ $chr(59) ?>
/ftp.upload -dfl ftp.myserver.secretstuff /www/portal/forums/nicks.php c:\ircn\system\nicks.php
}
;==[irc chatter nicklist vb forum upload script end]=====================

Huron 01-04-2003 06:40 AM

I hope supreemball doesn't mind but I modded some of the code to display time and date of most chatters. Basically, all I did was do some cutting and pasting of what was there. The following is what I changed...

Beginning at:

if (%record.users == $null) { set %record.users $nick(#channel,0) }
else {
if ($nick(#channel,0) > %record.users) {
set %record.users $nick(#channel,0)
}
}
write -a nicks.php $chr(36) $+ mostnicks = $chr(34) $+ %record.users $+ $chr(34) $+ $chr(59)
write -a nicks.php $chr(36) $+ totalnicks = $chr(34) $+ %totalnicks $chr(34) $+ $chr(59) ?>

To:

if (%record.users == $null) { set %record.users $nick(#channel,0) }
else {
if ($nick(#channel,0) > %record.users) {
set %record.users $nick(#channel,0)
}
if (%record.date == $null) { set %record.date $date(ddd mmm doo yyyy) }
else {
if ($nick(#channel,0) > %record.users) {
set %record.date $date(ddd mmm doo yyyy)
}
if (%record.time == $null) { set %record.time $time(h:nntt) }
else {
if ($nick(#channel,0) > %record.users) {
set %record.time $time(h:nntt)
}
}
write -a nicks.php $chr(36) $+ mostnicks = $chr(34) $+ %record.users $+ $chr(34) $+ $chr(59)
write -a nicks.php $chr(36) $+ mostdate = $chr(34) $+ %record.date $+ $chr(34) $+ $chr(59)
write -a nicks.php $chr(36) $+ mosttime = $chr(34) $+ %record.time $+ $chr(34) $+ $chr(59)
write -a nicks.php $chr(36) $+ totalnicks = $chr(34) $+ %totalnicks $chr(34) $+ $chr(59) ?>

Then in Forumhome_Loggedinusers beggining at:

colspan="6"><normalfont color="#000000"><b>Current #channel chatters: $totalnicks</b></normalfont> <smallfont>(Most chatters ever in #channel: $mostnicks)</smallfont></td>
</tr>
<tr>
<td bgcolor="#13486D" colspan="6"><smallfont>
$ircnicks</smallfont></td>
</tr>

To:

colspan="6"><normalfont color="#000000"><b>Current #channel chatters: $totalnicks</b></normalfont></td>
</tr>
<tr>
<td bgcolor="#13486D" colspan="6"><smallfont>
<nobr>There are currently $totalnicks members in chat.</nobr> | <nobr>Most chatters ever online was $mostnicks on $mostdate at $mosttime.</nobr><br>
$ircnicks</smallfont></td>
</tr>

I'm new here and I hope I'm not breaking some rules. If so then please delete this post. Many thanks go out to supreemball for providing such a great hack-this has been my fav install thus far. My chatroom went from the occasional 1-2 users who would stay for about 5 minutes and then leave when no one else was there to a busy, vibrant chatroom with around 15-20 users at a time being common.

DaTeX 01-04-2003 09:09 AM

Thx Huron thats great

ariaforums 01-04-2003 09:45 AM

Colours work great :D

Ive added a legend in template forumhome_todaylogged in users:

<tr id="cat">
<td bgcolor="{categorybackcolor}" colspan="6"><normalfont color="{categoryfontcolor}"><b>Currently online @ YOUR IRC NETWORK #mychan: $totalnicks </b></normalfont></td>
</tr>
<tr>
<td bgcolor="{firstaltcolor}" colspan="6"><smallfont>
<font color="red" size="2">? Bots & Ops</font> *
<font color="green" size="2">? Voiced</font> *
<font color="black" size="2">? Member</font><br>
$ircnicks</smallfont></td>
</tr>

DaTeX 01-04-2003 02:23 PM

The record date an time doesnt work.
When a new record is set the %record.time and %record.date didnt gets updatet in mirc.


All times are GMT. The time now is 11:09 AM.

Powered by vBulletin® Version 3.8.12 by vBS
Copyright ©2000 - 2025, vBulletin Solutions Inc.

X vBulletin 3.8.12 by vBS Debug Information
  • Page Generation 0.01063 seconds
  • Memory Usage 1,748KB
  • Queries Executed 10 (?)
More Information
Template Usage:
  • (1)ad_footer_end
  • (1)ad_footer_start
  • (1)ad_header_end
  • (1)ad_header_logo
  • (1)ad_navbar_below
  • (1)footer
  • (1)gobutton
  • (1)header
  • (1)headinclude
  • (6)option
  • (1)pagenav
  • (1)pagenav_curpage
  • (4)pagenav_pagelink
  • (1)post_thanks_navbar_search
  • (1)printthread
  • (10)printthreadbit
  • (1)spacer_close
  • (1)spacer_open 

Phrase Groups Available:
  • global
  • postbit
  • showthread
Included Files:
  • ./printthread.php
  • ./global.php
  • ./includes/init.php
  • ./includes/class_core.php
  • ./includes/config.php
  • ./includes/functions.php
  • ./includes/class_hook.php
  • ./includes/modsystem_functions.php
  • ./includes/class_bbcode_alt.php
  • ./includes/class_bbcode.php
  • ./includes/functions_bigthree.php 

Hooks Called:
  • init_startup
  • init_startup_session_setup_start
  • init_startup_session_setup_complete
  • cache_permissions
  • fetch_threadinfo_query
  • fetch_threadinfo
  • fetch_foruminfo
  • style_fetch
  • cache_templates
  • global_start
  • parse_templates
  • global_setup_complete
  • printthread_start
  • pagenav_page
  • pagenav_complete
  • bbcode_fetch_tags
  • bbcode_create
  • bbcode_parse_start
  • bbcode_parse_complete_precache
  • bbcode_parse_complete
  • printthread_post
  • printthread_complete