Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 Dynamic Level Mod v1.0
 New Topic  Topic Locked
 Printer Friendly
Next Page
Author Previous Topic Topic Next Topic
Page: of 2

fishsticks
New Member

USA
77 Posts

Posted - 11 April 2004 :  02:08:38  Show Profile  Visit fishsticks's Homepage  Send fishsticks an AOL message
This is Dynamic Level Mod v1.0
by Kyle Smith

This is a very simple mod (simple effects, simple installation) that makes the Star levels dynamic. It makes the Level 5 requirement of posts equal to the number of posts by the highest-posting member. Thus, only one member at a time may have five stars. Here is how it works:

Level 0: 0 Posts
Level 1: Whatever you set it to (default is 10)
Level 2: 1/4th of the highest poster's post count
Level 3: 1/2 of the highest poster's post count
Level 4: 3/4ths of the highest poster's post count
Level 5: Highest Poster Only.

This is a fun mod because it makes for some FUNNY competition within your forum

Anyway, here's the code.

http://www.sharredprism.com/forums/dynamiclevel.zip - Extract these two files into your forum directory.

Add this code to topic.asp:

Find this line (around 65)
<!--#INCLUDE FILE="inc_moderation.asp" -->

And below it put:
<!--#INCLUDE FILE="inc_func_highpost.asp" -->


In config.asp:

Find this line (around 110)
Dim intRankLevel0, intRankLevel1, intRankLevel2, intRankLevel3, intRankLevel4, intRankLevel5

And replace with...
Dim intRankLevel0, intRankLevel1


Find these lines (around 348)
intRankLevel2 = Application(strCookieURL & "INTRANKLEVEL2")
intRankLevel3 = Application(strCookieURL & "INTRANKLEVEL3")
intRankLevel4 = Application(strCookieURL & "INTRANKLEVEL4")
intRankLevel5 = Application(strCookieURL & "INTRANKLEVEL5")

Comment these four lines (put an apostrophe(') in front of them). Delete them if you want, but this way is safer.

In members.asp:
Find this line (around 39)
<!--#INCLUDE FILE="inc_func_member.asp" -->

Add this below:
<!--#INCLUDE FILE="inc_func_highpost.asp" -->


And, that's it! You can change the Level 1 posts through the Admin settings, but the rest you should leave alone.

Also, if you create a web link on your "All Forums" Page to showposts.asp on your server, it will show the breakdown of required #'s of posts to reach the desired level.

Enjoy!

EDIT - I should also probably mention that my first work with ASP ever was no more than 5 days ago, and I couldn't have gotten anywhere if it wasn't for the helpful people on this site - laser and dibley in particular. Thanks, guys!

Edited by - fishsticks on 05 May 2004 17:52:18

dibley
New Member

United Kingdom
91 Posts

Posted - 11 April 2004 :  04:47:51  Show Profile  Visit dibley's Homepage
Well, done, Kyle! I'm glad you managed to get it all working so quick. I guess you pick this stuff up a lot faster than me! I've downloaded the files, and if my other admin agrees, we might impliment your mod in our forum. Thanks. Dib.

.:dib:.

www.nightsouls.co.uk - Uk clubber & music forum.
www.animatronica.co.uk - Creators of themepark animatronics.
Go to Top of Page

Etymon
Advanced Member

United States
2385 Posts

Posted - 13 April 2004 :  12:34:39  Show Profile  Visit Etymon's Homepage
Hi fishsticks!

Thank you for the MOD. It looks quite interesting!

Is there a way to modify your mod so that for the ones who want to participate in a stars contest can have a set of special starts and for those who don't want to participate they can have the standard stars.

People who are not into the internet just yet might find the change in their status of their stars a bit confusing or even a bit offensive (perhaps).

I like the MOD though!

Thank you,

Etymon

Edited by - Etymon on 13 April 2004 12:37:09
Go to Top of Page

fishsticks
New Member

USA
77 Posts

Posted - 13 April 2004 :  17:26:02  Show Profile  Visit fishsticks's Homepage  Send fishsticks an AOL message
quote:
Originally posted by Etymon

Is there a way to modify your mod so that for the ones who want to participate in a stars contest can have a set of special starts and for those who don't want to participate they can have the standard stars.



I haven't thought about that. I'll get to work on it, though.

Thanks for stopping by

Kyle

http://www.sharredprism.com

My website!
Go to Top of Page

fishsticks
New Member

USA
77 Posts

Posted - 13 April 2004 :  17:36:21  Show Profile  Visit fishsticks's Homepage  Send fishsticks an AOL message
Now that I think of it, that would be a really complicated MOD to the MOD. It would require making a whole new database field, and messing with the database makes for very tricky mods.

I'd gladly make it for you if you want it, but if you aren't going to use it I won't bother.

http://www.sharredprism.com

My website!
Go to Top of Page

Etymon
Advanced Member

United States
2385 Posts

Posted - 14 April 2004 :  00:15:16  Show Profile  Visit Etymon's Homepage
Hi Kyle,

You don't have to ge through the trouble of recreating your MOD. Maybe I can run both at the same time. I'll try to take a look at it tonight though and see what I come up with.

If I have trouble I might give you a holler.
Go to Top of Page

wizard
Junior Member

208 Posts

Posted - 14 April 2004 :  04:33:52  Show Profile  Visit wizard's Homepage
Is it possible for the following?

Level 0: 0 Posts
Level 1: Whatever you set it to (default is 10)
Level 2: 1/4th of the highest poster's post count
Level 3: 1/2 of the highest poster's post count
Level 4: 3/4ths of the highest poster's post count
Level 5: The top XX posters (lets say I want top 10)
Go to Top of Page

dibley
New Member

United Kingdom
91 Posts

Posted - 14 April 2004 :  07:45:02  Show Profile  Visit dibley's Homepage
I think you could do that by altering

	strSQL = "SELECT TOP 1 " & strMemberTablePrefix & "MEMBERS.M_POSTS "


to

	strSQL = "SELECT TOP 10 " & strMemberTablePrefix & "MEMBERS.M_POSTS "


and then scroll through the record set with a loop until you reach the fith one and take that value for intRankLevel5 = rs("M_POSTS") from that one. There may be an easier way than that, but that's all I can come up with at the moment.

.:dib:.

www.nightsouls.co.uk - Uk clubber & music forum.
www.animatronica.co.uk - Creators of themepark animatronics.

Edited by - dibley on 14 April 2004 07:46:02
Go to Top of Page

MYLE
Starting Member

New Zealand
21 Posts

Posted - 14 April 2004 :  08:23:38  Show Profile  Visit MYLE's Homepage  Send MYLE a Yahoo! Message
Like it
thanks fishsticks

I'm running the 10 ranking System

So made these changes

rem out all the

intRankLevel2 = Application(strCookieURL & "INTRANKLEVEL2")
intRankLevel3 = Application(strCookieURL & "INTRANKLEVEL3")
intRankLevel4 = Application(strCookieURL & "INTRANKLEVEL4")
intRankLevel5 = Application(strCookieURL & "INTRANKLEVEL5")
and
'intRankLevel6 = Application(strCookieURL & "INTRANKLEVEL6")
'intRankLevel7 = Application(strCookieURL & "INTRANKLEVEL7")
'intRankLevel8 = Application(strCookieURL & "INTRANKLEVEL8")
'intRankLevel9 = Application(strCookieURL & "INTRANKLEVEL9")
'intRankLevelA = Application(strCookieURL & "INTRANKLEVELA")

also do the same for the DIM intRankLevel??



in the inc_func_highpost.asp file

some user mite have to rem out the
'Dim intRankLevel5, intRankLevel4, intRankLevel3, intRankLevel2


so change the
intRankLevel5 = rs("M_POSTS")
to
intRankLevelA = rs("M_POSTS")

also
intRankLevel2 = int(intranklevel5 * .25)
intRankLevel3 = int(intranklevel5 * .5)
intRankLevel4 = int(intranklevel5 * .75)
to

intRankLevel2 = int(intranklevelA * .2)
intRankLevel3 = int(intranklevelA * .3)
intRankLevel4 = int(intranklevelA * .4)
added
intRankLevel5 = int(intranklevelA * .5)
intRankLevel6 = int(intranklevelA * .6)
intRankLevel7 = int(intranklevelA * .7)
intRankLevel8 = int(intranklevelA * .8)
intRankLevel9 = int(intranklevelA * .9)

in the showpost.asp well just add the Stars to the display
need to add
<!--#INCLUDE FILE="inc_func_member.asp" -->

also change

Response.write " <br /><div align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 0: 0 Posts</b></font></div>"
Response.write " <br /><div align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 1: " & intRankLevel1 & " Posts</b></font></div>"
Response.write " <br /><div align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 2: " & intRankLevel2 & " Posts</b></font></div>"
Response.write " <br /><div align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 3: " & intRankLevel3 & " Posts</b></font></div>"
Response.write " <br /><div align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 4: " & intRankLevel4 & " Posts</b></font></div>"
Response.write " <br /><div align=""center""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 5: " & intRankLevel5 & " Posts</b></font></div>"

to
note the Bold LEFT not CENTER
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 0: 0 Posts</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 1: " & intRankLevel1 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel1) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 2: " & intRankLevel2 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel2) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 3: " & intRankLevel3 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel3) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 4: " & intRankLevel4 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel4) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 5: " & intRankLevel5 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel5) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 6: " & intRankLevel6 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel6) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 7: " & intRankLevel7 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel7) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 8: " & intRankLevel8 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel8) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level 9: " & intRankLevel9 & " Posts <BR />" & getStar_Level(0, 1, intRankLevel9) & "</b></font></div>"
Response.write " <br /><div align=""LEFT""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strBaseFontColor & """><b>Level A: " & intRankLevelA & " Posts <BR />" & getStar_Level(0, 1, intRankLevelA) & "</b></font></div>"

if you are running the inc_top_posters.asp showing the stars
will have to add

<!--#INCLUDE FILE="inc_func_highpost.asp" -->

to the top of that file.



WHAT I THINK THE PRIVACY ACT SHOULD BE
If it's bad tell me
If it's good tell everybody


MYLE

Edited by - MYLE on 14 April 2004 16:31:13
Go to Top of Page

MRWebmaster
New Member

76 Posts

Posted - 14 April 2004 :  23:19:13  Show Profile  Visit MRWebmaster's Homepage
This is a great MOD.

Matt Brown, MCP
MetalReview.com Discussion Board

Edited by - MRWebmaster on 16 April 2004 00:44:50
Go to Top of Page

muzishun
Senior Member

United States
1079 Posts

Posted - 15 April 2004 :  02:20:18  Show Profile  Visit muzishun's Homepage
Just out of curiosity, how about a way to exclude people from the count? I run a pretty small forum, mostly for members of my A Cappella group at school. We do a lot of posting on a hidden forum which is strictly for us. If I implemented this, I would make it applicable only to those people who weren't group members. The few fans we have on the site are mostly under 10 posts, while a couple of group members are over 100, so the whole system would be thrown out of whack.

Other than that little question, I really like this MOD. It makes the whole ranking system a *lot* more interesting. In a forum such as mine, where we want to get a lot of fans in and posting often (because it means they're coming to our site on a regular basis), we could use that natural desire for competition to drive them to post more.... I think I'm going to stop now. I'm starting to sound manipulative. *muahahaha*

Great MOD, though. If you find a way to exclude certain members from the calculations, I'll be all over implementing this.

Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
Go to Top of Page

MRWebmaster
New Member

76 Posts

Posted - 16 April 2004 :  00:55:01  Show Profile  Visit MRWebmaster's Homepage
I must have something wrong somewhere. My Level1 50 Posts should only have one star.
Does anyone know where I would fix that?

http://metalreview.com/forum/showposts.asp

Matt Brown, MCP
MetalReview.com Discussion Board
Go to Top of Page

fishsticks
New Member

USA
77 Posts

Posted - 16 April 2004 :  01:59:05  Show Profile  Visit fishsticks's Homepage  Send fishsticks an AOL message
quote:
Originally posted by MRWebmaster

I must have something wrong somewhere. My Level1 50 Posts should only have one star.
Does anyone know where I would fix that?

http://metalreview.com/forum/showposts.asp



I would need to look at your source code. Can you give me a link to download it? Your link only allows me to see the HTML.

And musishun00, I'm working on a MOD to help you out.

Thanks for your comments, everyone.

http://www.sharredprism.com

My website!

Edited by - fishsticks on 16 April 2004 02:10:31
Go to Top of Page

muzishun
Senior Member

United States
1079 Posts

Posted - 16 April 2004 :  02:20:48  Show Profile  Visit muzishun's Homepage
quote:
Originally posted by fishsticks

And musishun00, I'm working on a MOD to help you out.




Awesome! I can't wait.

Bill Parrott
Senior Web Programmer, University of Kansas
Co-Owner and Code Monkey, Eternal Second Designs (www.eternalsecond.com)
Personal Website (www.chimericdream.com)
Go to Top of Page

MYLE
Starting Member

New Zealand
21 Posts

Posted - 16 April 2004 :  07:10:36  Show Profile  Visit MYLE's Homepage  Send MYLE a Yahoo! Message
quote:
Originally posted by MRWebmaster

I must have something wrong somewhere. My Level1 50 Posts should only have one star.
Does anyone know where I would fix that?

http://metalreview.com/forum/showposts.asp



Have just Look its still wrong :(

the intRankLevel1 is still reading the from the old System values

to fix it edit the
inc_func_highpost.asp

intRankLevel1 = int(intranklevel5 * .1) <= add this line or .
intRankLevel2 = int(intranklevel5 * .25)
intRankLevel3 = int(intranklevel5 * .5)
intRankLevel4 = int(intranklevel5 * .75)

If you get a error
mite need to rem out the
intRankLevel1 = Application(strCookieURL & "INTRANKLEVEL1")
in the config.asp

hope this helps



WHAT I THINK THE PRIVACY ACT SHOULD BE
If it's bad tell me
If it's good tell everybody


MYLE

Edited by - MYLE on 16 April 2004 07:13:39
Go to Top of Page

MYLE
Starting Member

New Zealand
21 Posts

Posted - 16 April 2004 :  07:24:10  Show Profile  Visit MYLE's Homepage  Send MYLE a Yahoo! Message
did you know if you
<!--#INCLUDE FILE="inc_func_highpost.asp" -->
in the admin_config_ranks.asp file

it will show the current rating in the Ranking Configuration screen


WHAT I THINK THE PRIVACY ACT SHOULD BE
If it's bad tell me
If it's good tell everybody


MYLE
Go to Top of Page
Page: of 2 Previous Topic Topic Next Topic  
Next Page
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.27 seconds. Powered By: Snitz Forums 2000 Version 3.4.07