Player Naming System (updated)

[laserman]

Ok. I've done everything the way you pointed out. In detail, here's what I've done....

The frame called blox has the code:
i=Action.GetMergedTextIndex
Text(i).Caption=Name
under "frame" properties.

The hotspot on that same frame has the following code:
Name=InputBox("Type your name", "Name")

I have set the "Runtime frames merging" to:
"blox Solid01"
Solid01 -no frame"

In the Solid01 frame properties I have the following code:
text(1).caption=Name
I have also placed a textbox with the text: "Name" in it, placed in the position I want.

Under VBS Variables I have "Name" set as a variant.

When I run the project, I see a "0" where the hotspot is (which is not a problem). I click it and it asks for the "name", so I enter it. It still shows the "0" after I click on Ok.

I'm at a loss as to what I am doing wrong since I also checked spelling and punctuation. I understand that I am being a pain and I apologize, but I would really like to solve this. If it works for you, then I can only assume one other thing, and that being that what you have given me is not compatible with my version: 3.4.0.

Would a book on VB perhaps help me understand the VB script better?
I certainly do not want to wear out my welcome here as this is the friendliest forum I have ever belonged to.

[Chromegloss55]

I don't exactly understand but I think I could help. Send a copy of the AM Project Folder to chromegloss@hotmail.com and I'll see if I can fix the problem.

Chromegloss
_________________
wwi recession

[Lyberodoggy]

Yes, I know about that problem. The Engine gets your command but waits untill the form is reloaded to take action.

To solve this there are two ways:
Either typing this command in the hotspot that asks for the player's name:

Code: Select all

Action.GotoFrame "blox"

*Note that the refresh commands of AM don't work usually for this situation
or add another frame that will ask for the player's name before entering the "blox" frame. This one would solve the "0" text problem too...

[laserman]

Thank you so very much. That solved the problem.

[Lyberodoggy]

You are welcome..

[Chromegloss55]

Guess you didn't need me then...

(Dang... I like being needed. )
_________________
how long did the great depression last

[Lyberodoggy]

Hehe I understand you fully Chromegloss

[Ron_Emad2]

this is very good
i want use it in my project
your IQ very good Lyberodoggy

[Lyberodoggy]

Thanks!
Of course you can use the code... That's why it is given open-source.

[Ron_Emad2]

i dont understand your mean dear Lyberodoggy
That's why it is given open-source. ???
you speak with me ?

[Lyberodoggy]

Open-source means that everyone can see the code and use it. It's not an offence.
What I mean is that the code is free to use for everyone.

[Ron_Emad2]

Oh Lyberodoggy
i Know your mean
i love share this becuse i love every one can build
adventure game .it is best for me and ...
with thanks about code
emad

[Ikonz101]

I got the scoreboard tutorial to work out perfectly. One problem is that when you have a highscore of say 800 then you have a highscore of say 100 after that it doesn't place the highscore of 100 under the highscore of 800. It just places the scores in order without reading the number value. Is there a code to fix this?

Thanks
Ikonz101

Example:

This is how it shows the scores:

Ikonz101: 100
Ikonz101: 800
Ikonz101: 1000

Should Show:

Ikonz101: 1000
Ikonz101: 800
Ikonz101: 100

Edit: I also found out that you can just edit the .INI file to put whatever score you want. Is there a way to protect this or fix this problem?

[reneuend]

How are the scores being displayed? is it using text(index).caption for each score? If so, does it automatically line them up vertically for you, or are you coding this?

I haven't seen the code, but since it is using an INI file, I think I can safely guess that it is using a loop to display the scores in text() objects.

If so, then the counter in the loop is probably the index for the text() objects.

And if that is true, then all you need to do is start from the highest index and count down to the last one. This will require knowing either how many scores you have to begin with, or having some way to count them first before you start the loop.

Sorry, I need more info. before I can answer this one. Was this a plugin? if so, what is it called?

As for hiding the scores in the INI file, here is a simple suggestion:

1. rename the INI file to something totally different, like "registry_keys.ini"
2. use an encryption/decryption routine to hide what the values really are.
(I can send you a routine that will do this for you)

[Ikonz101]

The code or tutorial I am using is in this thread. Here is the url of the tutorial:

http://www.adventuremaker.com/phpBB2/viewtopic.php?t=3580&start=0 It is called scoreboards.rar with the description of (Fixed once again! Added Clear scoreboard & Multi-line scoreboard!!!) The 4th one down. I am using that exact code. Yes the scores are being displayed through text(index).caption. Yes it does line them up automatically. Yes it is also using a loop. No it isn't a plugin just a tutorial that shows how to display and save your highscores. Would you please send me the routine that would be greatly appreciated.

Thank You
Ikonz101

[Lyberodoggy]

I can't understand my code, this could take a while...

EDIT: here you go:

Code: Select all

entries=INIKey
Text(1).Caption=Scoreboard
Execute "dim myarray("+cstr(entries)+")"
Execute "dim myarray2("+cstr(entries)+")"
Do
scorearray=split(Action.ReadINI("ScoreBoard.ini",1,entries),":")
Myarray(entries)=converttonumber(scorearray(1))
entries=entries-1
Loop While entries>0
entries=INIKey
Do
highest=0
for counter=0 to Inikey
if myarray(highest)<myarray(counter) then
highest=counter
end if
myarray2(entries)=myarray(highest)
myarray(highest)=-1
next
entries=entries-1
Loop while entries>0


myarray2 now contains the scores descending

This should work. However I 've not tested it. It might contain some minor syntax problems with the Execute commands, which I can easily fix if they appear and it could generate a big loop, which could cause the engine to call the infinite loop message.

[reneuend]

Would you please send me the routine that would be greatly appreciated.

Thank You
Ikonz101

I can't find it.

I'll try to recreate it.

[Ikonz101]

I get a "loop without do" error. Don't know what this means but I will keep the code in there until it can be fixed.

I can't find it. Sad

I'll try to recreate it.

That's fine whenever you can get to it.

Thank You
Ikonz101

[Lyberodoggy]

My bad, one "next" command was missing. Now it should work

[Ikonz101]

I get a new error message:

Type Mismatch: '[string:"dim myarray("]'

Thanks For The Fix on the first one though.

Ikonz101

[Lyberodoggy]

Oh! I 'm too clumsy with my code recently... fixed once again hope it's gonna work now...

[Ikonz101]

Its alright man I thank you for taking the time to help me out. Bad news again I get this error now:

Illegal assignment: 'counter'

I already have a variable called counter for my countdown timer. So I don't know if that is what is causing the error.

Thanks Again
Ikonz101

[reneuend]

illegal assignment generally means you are trying to put the wrong data type in a variable. Like an integer into a variant type or the other way around.

--------------

I can't find my encryption code and the ones on the internet would require building a plugin, which I will do if you don't mind using a plugin for your encryption.

[Ikonz101]

Yeah a plugin would be fine. As long as I can encrypt the .ini file. Thank You
reneuend.

Lyberodoggy is the lastest error "illegal assignment" on my end or your end? How would I fix this?

Thank You
Ikonz101

[Lyberodoggy]

Just change the "counter" variable name in my code. Illegal assignment occurs usually when using same name with different variables

[Ikonz101]

Now the text isn't appearing in the highscore board. It shows up in the .ini file but not on the frame itself.

Ikonz101

[reneuend]

It sounds like you changed the name of the variable that was used for the highscore board. Be very careful when changing variable names, it can have a profound effect where ever it used to be used.

[Ikonz101]

I changed the "counter" variable to the variable name "numbers". But I am not sure that is what I am suppose. For some reason the text isn't appearing now.

Ikonz101

[Ikonz101]

This code works perfectly right here:

entries=INIKey
Text(1).Caption=Scoreboard
Do
Text(1).Caption=Text(1).Caption+Action.ReadINI("ScoreBoard.ini",1,entries)+vblf
entries=entries-1
Loop While entries>0

This is from the scoreboard tutorial. But I notice once the code below was removed the text no longer appeared on the frame (but when I put the code back in shows it perfectly but not in order):

Text(1).Caption=Text(1).Caption+Action.ReadINI("ScoreBoard.ini",1,entries)+vblf

So if anyone could combine both the code above and the code below then it should work perfectly but I am not having any luck.

entries=INIKey
Text(1).Caption=Scoreboard
Execute "dim myarray("+cstr(entries)+")"
Execute "dim myarray2("+cstr(entries)+")"
Do
scorearray=split(Action.ReadINI("ScoreBoard.ini",1,entries),":")
Myarray(entries)=converttonumber(scorearray(1))
entries=entries-1
Loop While entries>0
entries=INIKey
Do
highest=0
for counter=0 to Inikey
if myarray(highest)<myarray(counter) then
highest=counter
end if
myarray2(entries)=myarray(highest)
myarray(highest)=-1
next
entries=entries-1
Loop while entries>0

[Lyberodoggy]

Yeah, the code I gave you puts the scores in order. It doesn't display them. That's because I didn't know how to get the names. (edit: this was fixed)

To display the scores:

if INIKey>0 then
entries=INIKey
Text(1).Caption=Scoreboard
Execute "dim myarray("+cstr(entries)+")"
Execute "dim myarray2("+cstr(entries)+")"
Do
scorearray=split(Action.ReadINI("ScoreBoard.ini",1,entries),":")
Myarray(entries)=converttonumber(scorearray(1))
entries=entries-1
Loop While entries>0
entries=INIKey
Do
highest=0
for counter=0 to Inikey
if myarray(highest)<myarray(counter) then
highest=counter
end if
next
myarray2(entries)=myarray(highest)
Text(1).Caption=Text(1).Caption+Action.ReadINI("ScoreBoard.ini",1,highest)+vblf
myarray(highest)=-1
entries=entries-1
Loop while entries>0
end if

A solution to the problem I mentioned would be to change the whole system to use the Index as the player identifier, the key then being the score and the value being the display name. I wouldn't recommend that though.
Also note that the "next" command was misplaced. It is now fixed and checked. It works perfectly if you just need to display the scores. now I need to find a way to display the names too...


EDIT: Finally the code can display both scores and names.
If two players have the same score, the one who got it first is the first to display.

Thanks for helping to make this tutorial even better