php forum
php mysql forum
php mysql smarty
 
You are not logged in. [Log In] ubbDev » Forums » Vintage Modifications » UBB.Classic 6.4 - 6.7 Mods
      » UBB.Classic V6.0 - 6.3.x Modifications » [6.3.x] [beta] Recent Visitors Stats
Register User    Portal Page     Forum List        Calendar     FAQ
Topic Options
#155516 - 08/28/04 12:10 PM [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
Modification Name: *Recent Visitors Stats

Author: havoq

Description: Displays PNTF stats in summary category

Demo: Demo

Download Link: Download

Note: This works in conjunction with Ians Hidden User Hack located here If this isnt installed then you will not get the hidden users stats. Also this version isn't worditezed. That can be done as well if one so inclined

2nd Note: This hack probably will work on 6.7 if the code is equivalent. In fact I encourage anyone to port it over. I just didn't wanna post it in there and have the code be possibly wrong. However, consider this a 6.7 hack really... tipsy
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155517 - 08/28/04 12:23 PM Re: [6.3.x] [beta] Recent Visitors Stats
AllenAyres Administrator Offline
I type Like navaho

Registered: 03/10/00
Posts: 25365
Loc: Texas
Nice one Jon thumbsup
_________________________
- Allen wavey
- What Drives You?

Top
#155518 - 10/25/04 08:05 PM Re: [6.3.x] [beta] Recent Visitors Stats
eXtremeTim Offline
Member

Registered: 10/13/01
Posts: 544
Installed good job.
_________________________
United Devices Points: [img]http://www.ubbdev.com/ud/?u=extremetim&s=1[/img]

Top
#155519 - 10/30/04 08:56 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
Jon,

you mentioned you need Ian's Mod ( for 6.7x) but
how did you addressed this:

Code:
 In ubb_lib_pntf.cgi

FIND: 

		    && ($main::vars_pntf{AllowHidden} eq "no")
		) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};


ADD AFTER:

		} elsif (
		    ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
		    && (
			($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
			&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
		    )
		    && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
		    && ($main::vars_pntf{AllowHidden} ne "no")
		) {
			$results->{"hidden"}++;
6.3.1 has something like this instead:

Code:
 FOR 6.3.1       # Set the UNIQ's pref data properly
		$self->{DATA}->{uniq}->{logins}->{$uniq} = [$user_number, $nologin, $hidden, $daysprune];
Thank you,

Felix

Top
#155520 - 10/30/04 09:39 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
ops, sorry double post.

LK, please delete.

smile

Top
#155521 - 10/31/04 09:58 AM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
I dont think I ever said to modify that file
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155522 - 10/31/04 12:00 PM Re: [6.3.x] [beta] Recent Visitors Stats
Ian Spence Offline
Master Hacker

Registered: 01/25/03
Posts: 3765
Loc: Saint Johns, PA
He was refering to my mod. I don't have a copy of 6.3, so I won't be able to help. Hopefully someone will be able to though
_________________________
Code monkey like Fritos

Top
#155523 - 10/31/04 02:55 PM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
no, I think you have the wrong line of code there felix. I looked up that code in my file and its unchanged. What you need to find is this.

Find: ubb_lib_pntf.cgi
Code:
	# Okay, figure out guests
	foreach my $uniq (keys %uniqs) {
Replace With:
Code:
	# Okay, figure out guests
	foreach my $uniq (keys %uniqs) {

		if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};

		} elsif (
		    ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
		    && (
			($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
			&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
		    )
		    && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
		    && ($main::vars_pntf{AllowHidden} ne "no")
		) {
			$results->{"hidden"}++;

		} else {
			$results->{"guests"}++;
		}
	}    # end foreach
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155524 - 10/31/04 07:57 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
hm...not quite, you can't replace that, you will end up with the same routine twice, but I got it.
Here, this is the whole Ian's Invisible Mod for 6.3x. Just in case someone else running absolete versions, like us, would need it:

Code:
 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
x  In public_pntf_summary.pl x
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

FIND: 


	if($r->{"overflow"} > 0) {
		if($userstring[0] =~ m/d{8}/) {
			push(@userstring, qq($r->{"overflow"} $vars_wordlets_pntf{pntf_more_logged_in_users}));
		} else {
			push(@userstring, qq($r->{"overflow"} $vars_wordlets_pntf{pntf_logged_in_users}));
		} # end if
	} # end if

ADD AFTER:

	if($r->{"hidden"} > 0) {
		if($r->{"hidden"} == 1) {
			push(@userstring, qq~$r->{'hidden'} $vars_wordlets_pntf{pntf_hidden_one}~);
		} else {
			push(@userstring, qq~$r->{'hidden'} $vars_wordlets_pntf{pntf_hidden_more}~);
		}
	}


xxxxxxxxxxxxxxxxxxxxxxxx
x  In ubb_lib_pntf.cgi x
xxxxxxxxxxxxxxxxxxxxxxxx

FIND:

	$results->{"overflow"}  = 0;
	$results->{"guests"}    = 0;

ADD AFTER:

	$results->{"hidden"}	= 0;

FIND:  


	if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};
		} else {
			$results->{"guests"}++;
		}
	}    # end foreach



REPLACE WITH:

if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};

} elsif (
($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
&& (
($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
)
&& (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
&& ($main::vars_pntf{AllowHidden} ne "no")
) {
$results->{"hidden"}++;

} else {
$results->{"guests"}++;
}
} # end foreach


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
x  In vars_wordlets_pntf.cgi x
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx


FIND:

    q!pntf_guests! => q!guest(s)!,

ADD AFTER:

    q!pntf_hidden_one! => q!hidden user!,
    q!pntf_hidden_more! => q!hidden users!,

#############
# End Hack  #
#############
as far as your Mod is concerned, good job smile

I only had to change, in this line:

Code:
 <font face="$vars_style{FontFace}"  size="1" color="%%SPANTCOLOR%%"><b>
$title $vars_wordlets_pntf{pntf_simple_title} $r->{'raw_total'}
Code:
 size="1"
with
Code:
 size="$vars_style{TextSize}"
and get rid of
Code:
 $title
.

Thanks Jon
smile

Felix

Top
#155525 - 10/31/04 09:18 PM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
Yup n/p, now sure how you'd have the same routine twice. Maybe you misunderstood me. Because the same code you posted, is what I have, so maybe I could have explained it better.

In any case....glad you got it workin wink
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155526 - 10/31/04 10:14 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
Read up and you'll understand, if you replace ONLY
Code:
 # Okay, figure out guests	foreach my $uniq (keys %uniqs) {
with the whole thing you will have what is after the
Code:
 # Okay, figure out guests	foreach my $uniq (keys %uniqs) {
twice and will give major headaches. But dont worry about it.

Now, I have multiple templates which I change with the seasons and I added a few more graphics in the CP style templates. they are on the summary page HERE and I dont have to change them every time I change the template. see here: style Summer and Style Blue


Do you want the 'recipe" ?

smile

Top
#155527 - 11/01/04 12:56 AM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
Felix, I didnt mean add it twice. Why would I use a piece of code twice? I could have said after
Code:
# Okay, figure out guests	foreach my $uniq (keys %uniqs) {
Add this:
Code:
if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};

		} elsif (
		    ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
		    && (
			($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
			&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
		    )
		    && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
		    && ($main::vars_pntf{AllowHidden} ne "no")
		) {
			$results->{"hidden"}++;

		} else {
			$results->{"guests"}++;
		}
	}    # end foreach
Because thats what i meant. But its fine.

What do u have the recipe for now? Changing the graphic for the calendar? Because thats the only screenshot I see circled for. I dont see how the timezone graphic you have in the second/third screenshot, reflect the first screenshot
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155528 - 11/02/04 08:12 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
there is more at the bottom, pass by my site, you'll see
smile

Top


Top Posters Last 30 Days
AllenAyres 83
Gizmo 28
Zarzal 21
sirdude 19
blaaskaak 14
willing 7
swebs 6
Who's Online
0 Registered (), 46 Guests and 9 Spiders online.
Key: Admin, Global Mod, Mod
Shout Box

Latest Posts
[7.3.x] ubb.links
by AllenAyres
Yesterday at 06:15 PM
Changing currency for subscriptions?
by AllenAyres
Yesterday at 01:15 PM
Protect users emails
by AllenAyres
Yesterday at 11:36 AM
VPS and Newbies
by Gizmo
07/02/08 09:08 PM
Team UBBDev Rides Again!
by AllenAyres
07/02/08 11:38 AM
Drupal / UBB integration module for Drupal
by blaaskaak
06/30/08 01:52 PM
[7.3.x] Scheduled board close for backup
by AllenAyres
06/30/08 12:51 PM
New Mods
Protect users emails
by Basil Fawlty
06/29/08 08:44 AM
[7.3.x] Scheduled board close for backup
by blaaskaak
06/26/08 04:01 AM
[7.3+] CustomTag - Audo Embedding
by Gizmo
06/24/08 07:52 PM
[7.3.x] ubb.links
by AllenAyres
06/20/08 11:50 PM
[7.3] Dissallow quotes more then 3 levels deep
by blaaskaak
06/09/08 09:01 AM
Newest Members
ryzilla, M4D, Jer, Kanigo2, Bubba
13302 Registered Users
Mark all read
Contact Us · Home · Top

 

 

  
fusionbb message board php hacks