Old EQ2Service Thread for version 1.1 : EverQuest 2 Premium Discussions

[wyvernx]

But like I said my service isn't updating

The DAOCService DOES update.

You can easily do a for i = 1 to XX loop and dump out the spawns.

Or did I miss something?

[chaple]

oh, I must of missed that lol, I'll just wait until the next release of eqservice

[wyvernx]

Missed what?

[chaple]

Ok,

My eqservice doesn't return the mob id for one, it's always -1.
This is killing me for removing redundant records when an update is sent.

In my code is their a reason why my eq2service is not reloading all the memory locations or why the zone name would be <invalid> or the mob index would be -1.

Also the maxindex is returning -1.

Is it possible for you to add a .Serialize command?

Eq2Service.Serialize

Have it dump everything in the collection to a comma delimited text string with | (pipe) denoting rows

exampe:

Mobname1,x,y,z|mobname2,x,y,z|....

This way I could take this string and send it to my reader.

I just need an easier way to get the mob info to the client.

Chaple

[dragonboy59]

Ok what does this thing do any way

[wyvernx]

chaple, sounds like those maybe bugged. I have not checked the zonefunctino to make sure it works yet, same with the mob ID. It could be off or need updating. This can happen from time to time with each patch of the game client.

[wyvernx]

chaple, get max index works, I just checked it myself:

Code: Select all

XUScriptPlugin.staStatus.Text = "Loading EQ2Service..."
set oServiceObject = XUScriptPlugin.GetService("EQ2Service.Service")
if Err.Number <> 0 then
  XUScriptPlugin.staStatus.Text = "EQ2Service Failed to load!"
  Sleep 5000
else
  XUScriptPlugin.staStatus.Text = "UpdateData"
  oServiceObject.UpdateData

  Sleep 1000

Dim MaxMobs
MaxIndex = getMaxIndex(oServiceObject)
  XUScriptPlugin.staStatus.Text = "MaxIndex = " & MaxIndex


  Sleep 2000
  set File = Nothing
  set FTarget = Nothing
  set oServiceObject = Nothing
end if

[wyvernx]

I think this is yoru problem. You do not have a Dim Counter so when you assign the counter, it goes out of scope.

Try:
Dim MaxMobs
MaxMobs = getMaxIndex(oServiceObject)
for counter = 1 to MaxMobs

[wyvernx]

Actually, remember index 0 is a valid index.


However, I am recoding the functions to only use SpawnID.

So the new functinos will be MobName(SpawnID) instead of MobName(Index)

[wyvernx]

Actually, I may add both. MobNamebyId and MobName (which is by index)

we'll see.

[wyvernx]

The API had to be totally redone. All scripts are gonna have to be reconfigured for the new API. I'm sorry.

It now uses spawn ID's instead of spawn indexes.