Zugg Software :: View topic

Novice Joined: 23 May 2003 Posts: 31

What I am trying to do, is search a list of variables (that contain number values) and trying to get the max value, as well as the name of the variable.

I know there must be a simple way to do this, but here is what I have so far:

Magician Joined: 10 Oct 2000 Posts: 356 Location: USA

I don't have a fix, i've been thinking about this the last couple of nights, it would be nice to have a %itemindex("John", @playerlist) function, that would return the item index for John.

I believe the problem is that you are using a string function against a string list.

I used the following in my testing:

#VAR PlayerScoreNames {Zuel|Gorfang|Ezikiel|Danlo|Arianna|Nez|Scarlet|Ardent|Rathan|Kane|Cagney|Bartholomew|Zangief|Vinnie|Aelric|Typhoeus|Gar|Malaclypse|Kimora|Catalina|Grevin|Cumur|Jeff|Karna|Ailegore|Bishop|Mudician|Cailean}

#VAR PlayerScores {12000|12000|12000|12000|13000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000|12000}

I used your commands that you showed:

#SHOW %max(%expandlist(@PlayerScores,", ")) returns: 1300
#SHOW %pos(%max(%expandlist(@PlayerScores,", ")),@PlayerScores) Returns: 25

25 characters into the string list would be: (highlighted in red)
12000|12000|12000|12000|13000

it's giving you character position, not item index.

I've been trying to write a routine to come up with an index alias but i'm still working on it.

Novice Joined: 23 May 2003 Posts: 31

I see, I feared this was the case when I started looking closer at the short help file.

If you, or anyone else, has an alternate idea to solve this problem please post!
If you are really bored or excited, you can try to solve the entire problem: Find the top 3 values of variables in the list

Thanks,
-Darkmere

Novice Joined: 23 May 2003 Posts: 31

A good friend of mine showed me %item, rather then %pos

Magician Joined: 10 Oct 2000 Posts: 356 Location: USA

neat trick. I didn't realize you could use the %ismember function in that manner and I've been using it for years.

Great Call. I can stop my poor attempt and creating my own little function.

And I thought only Lightbulb taught me new tricks. Smile

Posted: Fri Dec 12, 2003 11:27 am

I played with this for a few hours, and came up with the following.
Whenever you add to a player's score, call upon this function, parsing the user's name to it. It will update the name-list from order of Highest score to Lowest score:

#var PlayerScoresTwo {%expandlist( @PlayerScores, "|")}
#var PlayerScoreNamesTwo {@PlayerScoreNames}
#var CurrentPlayerScore {@%1Total}
#var CurrentScorePosition {%ismember( %1, @PlayerScoreNamesTwo)}
#IF (@%1Total>{%item( @PlayerScoresTwo, 1)}) {#delnitem PlayerScoreNames (@CurrentScorePosition)
#var PlayerScoreNames {%insert( %1~|, @PlayerScoreNames, 1)}} {#loop 1,%eval(%ismember( @CurrentPlayerScore, @PlayerScoresTwo)-1) {#IF ({@CurrentPlayerScore}>{%item( @PlayerScoresTwo, %{i})}) {#var NewScorePosition {%eval( %{i})}} {}}
#delnitem PlayerScoreNames (@CurrentScorePosition)
#var PlayerScoreNames {%insert( ~|%1, @PlayerScoreNames, %pos( %concat( ~|, %item( @PlayerScoreNamesTwo, @NewScorePosition)), @playerscorenames))}}
#var PlayerScores {%null}
#FORALL @PlayerScoreNames {#additem PlayerScores {%concat( "@", %i, "Total")}}

Danlo

Novice Joined: 23 May 2003 Posts: 31

Ok, update and new question:

Here is the working version we came up with that does exactly as it should.

The questions is, why this is buggy with variables with values over 10000.
Example: If the top (highest) variable is over 10000 and you do the alias for a 5000 score variable, it bumps it up to first place. If you set the highest to a score of 9950 and try again, it works perfect. I have been told that this code works in an earlier version, though I am on 6.66 beta. Could this be a bug in zMUD, or is there a fix for the code?

MASTER Joined: 28 Nov 2000 Posts: 4817 Location: USA

Use %number() to ensure that you are comparing numbers, not strings.
#IF (%number( @CurrentPlayerScore) < %number( %item( @PlayerScoresTwo, %eval( @CurrentScorePosition-1))))

Novice Joined: 23 May 2003 Posts: 31

Thanks LightBulb,

That was the trick, it must have been comparing string values when it was over 10,000.
%number fixed that problem.

Thanks,
-Darkmere