| Author |
 Topic  |
|
fishsticks
New Member
USA
77 Posts |
 Posted - 11 April 2004 : 02:08:38
|
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
|
| 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. |
 |
|
|
Etymon
Advanced Member
United States
2385 Posts |
Posted - 13 April 2004 : 12:34:39
|
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 |
|
|
|
fishsticks
New Member
USA
77 Posts |
Posted - 13 April 2004 : 17:26:02
|
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! |
|
|
|
fishsticks
New Member
USA
77 Posts |
Posted - 13 April 2004 : 17:36:21
|
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! |
|
|
|
Etymon
Advanced Member
United States
2385 Posts |
Posted - 14 April 2004 : 00:15:16
|
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.
|
|
|
|
wizard
Junior Member
208 Posts |
Posted - 14 April 2004 : 04:33:52
|
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)
|
|
|
|
dibley
New Member
United Kingdom
91 Posts |
Posted - 14 April 2004 : 07:45:02
|
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 |
|
|
|
MYLE
Starting Member
New Zealand
21 Posts |
Posted - 14 April 2004 : 08:23:38
|
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
|
Edited by - MYLE on 14 April 2004 16:31:13 |
|
|
|
MRWebmaster
New Member
76 Posts |
|
|
muzishun
Senior Member
United States
1079 Posts |
Posted - 15 April 2004 : 02:20:18
|
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) |
|
|
|
MRWebmaster
New Member
76 Posts |
|
|
fishsticks
New Member
USA
77 Posts |
Posted - 16 April 2004 : 01:59:05
|
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 |
|
|
|
muzishun
Senior Member
United States
1079 Posts |
Posted - 16 April 2004 : 02:20:48
|
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) |
|
|
|
MYLE
Starting Member
New Zealand
21 Posts |
Posted - 16 April 2004 : 07:10:36
|
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
|
Edited by - MYLE on 16 April 2004 07:13:39 |
|
|
|
MYLE
Starting Member
New Zealand
21 Posts |
Posted - 16 April 2004 : 07:24:10
|
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
|
|
|
|
Topic |
|
Topic Locked
