Prospekt Source /setaccess

[Yosephe]

Hi!

I'm using engine Prospekt Source. I try to give access through the server by command "/setaccess The Raven 4". It makes Run-time error 13 Type mismatch. My code looks like this:

Case "/setaccess"

If UBound(Command) < 1 Then

txtChat.Text = vbNullString

Exit Sub

End If

If UBound(Command) < 2 Then

txtChat.Text = vbNullString

Exit Sub

End If

If FindPlayer(Command(1)) > 0 Then

Call SetPlayerAccess(FindPlayer(Command(1)), CLng(Command(2)))

Call SendPlayerData(FindPlayer(Command(1)))

Else

TextAdd "Wrong name."

End If

I have no idea how could I fix this.

[Officer Johnson]

that engine is so outdated i wouldn't even bother.

[SkywardRiver]

> that engine is so outdated i wouldn't even bother.

He's absolutely right. The max amount of players that engine can hold at one time without crashing terribly is like… seven.

Try using a different engine would be my advice.

[Slasheree]

>! answering your problem, it's the space in your name that is causing the error:
"/setaccess The Raven 4"
>!          0            1          2       3
    <- indexes
>! when it splits the command string into a string array this engine's code is meant to have the following order: command(0),name(1),access(2)
>! and the problem is that in this line:
>! ```
>! Call SetPlayerAccess(FindPlayer(Command(1)), CLng(Command(2)))
>! ```
it's using Raven
as the access level, which you can be certain isn't a number  xD
>! My solution is (and this was made out of my head, make a backup before trying)
>! change:
>! ```
>! If FindPlayer(Command(1)) > 0 Then
Call SetPlayerAccess(FindPlayer(Command(1)), CLng(Command(2)))
>! ```
to:
>! ```
>! Dim tmpname as String, l as Long
for l = 1 to UBound(Command) - 1
tmpname = tmpname & " " & Trim$(Command(l))
next
tmpname = Trim$(tmpname)
If FindPlayer(tmpname) > 0 Then
Call SetPlayerAccess(FindPlayer(tmpname), CLng(Command(UBound(Command))))
>! ```

[Yosephe]

Thank you for answers!

Could you give me a advice? Which open-source DX8-rendering engine can hold more than 7 people?

To Slasher: Thanks, your script works.

EDIT: Now I try to make this command on client-side.. My code looks like this:

Case "/setaccess"

If GetPlayerAccess(MyIndex) < ADMIN_CREATOR Then GoTo continue

For l = 1 To UBound(Command) - 1

tmpname = tmpname & " " & Trim$(Command(l))

Next

tmpname = Trim$(tmpname)

If tmpname > 0 Then

SendSetAccess tmpname, CLng(Command(UBound(Command)))

End If

And if I try to give access to one word user or more word user, it writes error: 

The following error occured at "HandleKeyPresses" in 'modInput' at line 0.

Run-time error '13': Type mismatch.

[Mohenjo Daro]

EO 3.0 is DX8… Not sure how great it is but I do now it's buggy but I think it can handle more, may want to look into it.

[Slasheree]

didn't you forget the red part ?

Dim
tmpname as String, l as Long
for l = 1 to UBound(Command) - 1

[Officer Johnson]

> Thank you for answers!
>
>  
>
> Could you give me a advice? Which open-source DX8-rendering engine can hold more than 7 people?
>
>  
>
> To Slasher: Thanks, your script works.
>
>  
>
> EDIT: Now I try to make this command on client-side.. My code looks like this:
>
>  
>
>  
>
> Case "/setaccess"
>
> If GetPlayerAccess(MyIndex) < ADMIN_CREATOR Then GoTo continue
>
> For l = 1 To UBound(Command) - 1
>
> tmpname = tmpname & " " & Trim$(Command(l))
>
> Next
>
> tmpname = Trim$(tmpname)
>
> If tmpname > 0 Then
>
> SendSetAccess tmpname, CLng(Command(UBound(Command)))
>
> End If
>
>  
>
> And if I try to give access to one word user or more word user, it writes error: 
>
> The following error occured at "HandleKeyPresses" in 'modInput' at line 0.
>
> Run-time error '13': Type mismatch.

use eo 3

[Zetasis]

Eclipse Worlds is a good free open source DX8 engine and I would bet it could hold more then 7 players.

[SkywardRiver]

Well, I'm working on Eclipse Skywyre which is Dx8\. I may be releasing it further down the road. But first, I would definitely give EO 3 a look.

Eclipse Worlds is also worth a look, but if you find it less than satisfactory you can always just rip features from it.

[Officer Johnson]

Lets face it most eclipse games at the most wont get over 10 to 20 players so i would personally choose eclipse worlds or eo 3 as for prospekt source it can just go away cause it will never handle that man players

[Zetasis]

> Lets face it most eclipse games at the most wont get over 10 to 20 players so i would personally choose eclipse worlds or eo 3 as for prospekt source it can just go away cause it will never handle that man players

Prospekt could hold more players but it would require an over haul in the code.

[Growlith1223]

I have returned….technically... anywho, Your best bet would be to try any engine really. try the ones you find intriguing then choose one from the assortment of engines you have picked. then go from there, every engine is different so there's really no telling what to pick. choose what's best for you and go from there. If you need any help with some programming don't hesitate to message me or anyone else on here for that matter.

- Growlith1223