EO npc rec value

[kibbelz]

Hello there i have declared a variable called rate said as rate As long in the npcrec (server side)
and when a npc dies it runs this code:

Dim randomiser
Dim rate As Long
rate = Npc(MapNpc(MapNum).Npc(MapNpcNum).Num).rate
randomiser = Int((Int(rate) + 1) * Rnd) + 0
If randomiser = 1 Then
#my code#

I get the error 9 (server) subscript out of range when ever i kill a npc now i have added the right textbox on the client side npc editor for supporting this called rate. Any help?

[GammaÃâžÂ]

bump for our game o.o

[Robin]

You can't just add something into the UDT and expect it to work. Add it into the engine properly.

[kibbelz]

LOL I was about to do the same, Gamma you sneaky xD
Properly? I have done it just like in djmaxus tutorial. but edited it just to fit me.

[DJMaxus]

First off, what are you trying to do? Also, what tutorial are you talking about. Have you added the same variables to NpcRec Clientside as well?

[kibbelz]

client side

Here is my npc editor the arrow is showing you my box called rate
when i click on it heres what i added

Private Sub rate_Change()
Npc(EditorIndex).rate = rate.text
End Sub

Then in npc rec
rate As Long
before the end type (both client and server)

then in npceditorint
.recruitrate.text = Npc(EditorIndex).rate after
.txtEXP.text = Npc(EditorIndex).EXP

then in the server side when the npc dies
Dim randomiser
Dim rate As Long
rate = Npc(MapNpc(MapNum).Npc(MapNpcNum).Num).rate
randomiser = Int((Int(rate) + 1) * Rnd) + 0
If randomiser = 1 Then
#my code#

Thats all i have done. What do i have to add?

[DJMaxus]

You still haven't told me what you're trying to do.

[Robin]

Post the line that errors.

[kibbelz]

When i boot up the server via source i get:
Result = Compress(tempBuffer(0), Size, Buffer(0), tempSize) in the compress buffer function, But i have never edited that function. but when i run it via server .exe it gets an error on:
Dim randomiser
Dim rate As Long
rate = Npc(MapNpc(MapNum).Npc(MapNpcNum).Num).rate
randomiser = Int((Int(rate) + 1) * Rnd) + 0
If randomiser = 1 Then

when i kill an npc.

[kibbelz]

*bump*

[Robin]

Don't run server.exe, press CTRL + F5 in the source code to do a full compile + run. Do this _all the time_. It's how you debug.

Delete all your npcs. The way I send packets is screwing up, which means your npc data isn't setup right. Deleting all your npcs means the server re-generates them all in the new UDT structure.

Make sure the UDT is the _exact same_ on both the client and server, as I use direct memory access to copy the data around. If there's a difference, you'll cause memory errors.

[kibbelz]

Done that the same, When I compile it I get this error:


and when I click debug it highlights over this:
Result = Compress(tempBuffer(0), Size, Buffer(0), tempSize) in the compressbuffer sub.

[Robin]

lul. Sort out your zlib.

[GammaÃâžÂ]

Yeah i already told him what to do. :P i had the same.

[kibbelz]

Thanks robin & gamme i can now run the server in vb6 i have been trying to fix that for a while x3, Now i can find the line properly :D the line is:
rate = Npc(MapNpc(MapNum).Npc(MapNpcNum).Num).rate
Any suggestions?

[Robin]

When you get the error it should highlight in yellow.

Hover your mouse over the different parts till you find the bit which is erroring.

[kibbelz]

When i click on rate = it says it = 0 So that is proberly where it is ducking up due to it is not being declared, and when i click on rate it says as the same with the npc after rate =. I don't know how this works due to im calling it and its saying 0

[Robin]

Npcs are bound early, so I don't see why they wouldn't be initialised.

Make sure MapNum is > 0 and MapNpcNum is > 0.

[DJMaxus]

@kibbelz:

> Private Sub rate_Change()
> Npc(EditorIndex).rate = rate.text
> End Sub
>
> then in npceditorint
> .recruitrate.text = Npc(EditorIndex).rate

Those don't match up.

[kibbelz]

@ robin I have done that same error
@djmaxus fixed thank you, but im still getting the error.

[GammaÃâžÂ]

Bumping for our game! :)

[kibbelz]

*Bump*