Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

Dragon Eclipse 2.0


Draco.exe
 Share

Recommended Posts

  • Replies 498
  • Created
  • Last Reply

Top Posters In This Topic

Help teach me.

When one player open switch#1.

All players will open the switch#1.

Both players are online. And not online.
Link to comment
Share on other sites

> Help teach me.
>
> When one player open switch#1.
>
> All players will open the switch#1.
>
> Both players are online. And not online.

make a topicor wait till eragons next update and ask im to add the fix
Link to comment
Share on other sites

> why i cant use in dragon eclipse my ambardia tilesets?
>
> im just paste the tilesets and i dont see it on map editor..
>
> what to do?

hmmm, i don't know which are the Ambardia tilesets…perhaps the resolutions of the tiles are too big. Try to adjust the resolutions and see if that works (try with 1024x1024 px tiles)

> As you change the respawn point of the player?
>
> (the point where you start)

you can change the start point in visual basic…i don't remember exactly in which part of the code. And if you want to add another respawn points use the checkpoints (in the map attributes)
Link to comment
Share on other sites

Hello guys, first I would like to thank the engine!

I found a mistake in it and would like to solve, if I put the map in size 30x30 and put any NPC him give the server error and closes.

How to solve this?

RTE 9

> Public Sub UpdateMapBlock(mapnum, x, y, blocked As Boolean)
>
> If blocked Then
>
> MapBlocks(mapnum).Blocks(x, y) = 9
>
> Else
>
> MapBlocks(mapnum).Blocks(x, y) = 0
>
> End If
>
> End Sub
Link to comment
Share on other sites

  • 1 month later...
Im relatively new to eclipse ^-^ and i was wondering if somebody could help me.

Im having a problem with paperdolls at the moment, i have 91 paper dolls and they are in correct format. But when i turn the client on and scroll through all my paper dolls, i can only see 61 for some reason.

Help please!
Link to comment
Share on other sites

  • 11 months later...
bug fix for pet show up next to player 

just replace  whole Public Sup SpawnNpc**(Server side)** with this : 

tested worked for me :D have a nice day :D

```
Public Sub SpawnNpc(ByVal mapNpcNum As Long, ByVal mapNum As Long, Optional ByVal SetX As Long, Optional ByVal SetY As Long)
Dim Buffer As clsBuffer
Dim npcNum As Long
Dim i As Long
Dim x As Long
Dim y As Long
Dim Spawned As Boolean

' Check for subscript out of range
If mapNpcNum <= 0 Or mapNpcNum > MAX_MAP_NPCS Or mapNum <= 0 Or mapNum > MAX_MAPS Then Exit Sub
npcNum = Map(mapNum).NPC(mapNpcNum)

If npcNum > 0 Then

MapNpc(mapNum).NPC(mapNpcNum).Num = npcNum
MapNpc(mapNum).NPC(mapNpcNum).target = 0
MapNpc(mapNum).NPC(mapNpcNum).targetType = 0 ' clear

MapNpc(mapNum).NPC(mapNpcNum).Vital(Vitals.HP) = GetNpcMaxVital(npcNum, Vitals.HP)
MapNpc(mapNum).NPC(mapNpcNum).Vital(Vitals.MP) = GetNpcMaxVital(npcNum, Vitals.MP)

MapNpc(mapNum).NPC(mapNpcNum).Dir = Int(Rnd * 4)

'Check if theres a spawn tile for the specific npc
For x = 0 To Map(mapNum).MaxX
For y = 0 To Map(mapNum).MaxY
If Map(mapNum).Tile(x, y).Type = TILE_TYPE_NPCSPAWN Then
If Map(mapNum).Tile(x, y).Data1 = mapNpcNum Then
MapNpc(mapNum).NPC(mapNpcNum).x = x
MapNpc(mapNum).NPC(mapNpcNum).y = y
MapNpc(mapNum).NPC(mapNpcNum).Dir = Map(mapNum).Tile(x, y).Data2
Spawned = True
Exit For
End If
End If
Next y
Next x

If Not Spawned Then

' Well try 100 times to randomly place the sprite
For i = 1 To 100

If SetX = 0 And SetY = 0 Then
x = Random(0, Map(mapNum).MaxX)
y = Random(0, Map(mapNum).MaxY)
Else
x = SetX
y = SetY
End If

If x > Map(mapNum).MaxX Then x = Map(mapNum).MaxX
If y > Map(mapNum).MaxY Then y = Map(mapNum).MaxY

' Check if the tile is walkable
If NpcTileIsOpen(mapNum, x, y) Then
MapNpc(mapNum).NPC(mapNpcNum).x = x
MapNpc(mapNum).NPC(mapNpcNum).y = y
Spawned = True
Exit For
End If

Next

End If

' Didn't spawn, so now we'll just try to find a free tile
If Not Spawned Then

For x = 0 To Map(mapNum).MaxX
For y = 0 To Map(mapNum).MaxY

If NpcTileIsOpen(mapNum, x, y) Then
MapNpc(mapNum).NPC(mapNpcNum).x = x
MapNpc(mapNum).NPC(mapNpcNum).y = y
Spawned = True
End If

Next
Next

End If

' If we suceeded in spawning then send it to everyone
If Spawned Then
Set Buffer = New clsBuffer
Buffer.WriteLong SSpawnNpc
Buffer.WriteLong mapNpcNum
Buffer.WriteLong MapNpc(mapNum).NPC(mapNpcNum).Num
Buffer.WriteLong MapNpc(mapNum).NPC(mapNpcNum).x
Buffer.WriteLong MapNpc(mapNum).NPC(mapNpcNum).y
Buffer.WriteLong MapNpc(mapNum).NPC(mapNpcNum).Dir
Buffer.WriteByte MapNpc(mapNum).NPC(mapNpcNum).IsPet
Buffer.WriteString MapNpc(mapNum).NPC(mapNpcNum).PetData.Name
Buffer.WriteLong MapNpc(mapNum).NPC(mapNpcNum).PetData.Owner
SendDataToMap mapNum, Buffer.ToArray()
Set Buffer = Nothing
UpdateMapBlock mapnum, MapNpc(mapnum).NPC(mapNpcNum).x, MapNpc(mapnum).NPC(mapNpcNum).y, True
End If

SendMapNpcVitals mapnum, mapNpcNum
Else
MapNpc(mapnum).NPC(mapNpcNum).Num = 0
MapNpc(mapnum).NPC(mapNpcNum).target = 0
MapNpc(mapnum).NPC(mapNpcNum).targetType = 0 ' clear
' send death to the map
Set Buffer = New clsBuffer
Buffer.WriteLong SNpcDead
Buffer.WriteLong mapNpcNum
SendDataToMap mapnum, Buffer.ToArray()
Set Buffer = Nothing
End If

End Sub

```
And

For Map Block Bug 

go to  server side : Sub HandleMapData and find

```
ReDim Map(mapNum).Tile(0 To Map(mapNum).MaxX, 0 To Map(mapNum).MaxY)

```
below that add 

```
ReDim MapBlocks(mapNum).Blocks(0 To Map(mapNum).MaxX, 0 To Map(mapNum).MaxY)

```
thats all :D

also sry for bumping this from 2013  but maybe someone will use this engine  so i gived some bug fixs
Link to comment
Share on other sites

  • 3 weeks later...
woah, thanks for that bugfix zopto! (i'll add it to the first page with credits for you :) )

First of all, you need admin rights for editing pets and quests. (check the server exe file for adding admin rights to characters)

For pets you need to edit them in both NPC and items menu. (in the chat menu write **/admin** for opening the adm menu…and write it again for closing it whe you're done)

1) In the NPC menu create the pet and make it Friendly, then take note of the **number** of the pet in the npc list.

2) In the Item menu, create the item in the same slot of the npc (eg: if the pet was created in the 5th slot in the npc list, create the item in the 5th slot of the item list)

For the quests, just write in the chat **/editquest** and the quest editor window will appear.
Link to comment
Share on other sites

This version don't have a guild system, you need to add it (so you need visual basic 6 and know the basic things)

Perhaps this link might help you: [http://www.eclipseorigins.com/community/index.php?/topic/124848-eo-2030-guilds/](http://www.eclipseorigins.com/community/index.php?/topic/124848-eo-2030-guilds/)

(if you add this, don't forget to credit Scott!)
Link to comment
Share on other sites

> woah, thanks for that bugfix zopto! (i'll add it to the first page with credits for you :) )
>
>  
>
> First of all, you need admin rights for editing pets and quests. (check the server exe file for adding admin rights to characters)
>
>  
>
> For pets you need to edit them in both NPC and items menu. (in the chat menu write **/admin** for opening the adm menu…and write it again for closing it whe you're done)
>
> 1) In the NPC menu create the pet and make it Friendly, then take note of the **number** of the pet in the npc list.
>
> 2) In the Item menu, create the item in the same slot of the npc (eg: if the pet was created in the 5th slot in the npc list, create the item in the 5th slot of the item list)
>
>  
>
> For the quests, just write in the chat **/editquest** and the quest editor window will appear.

anytime!
Link to comment
Share on other sites

  • 2 weeks later...
Tested the bugfix by @Zopto, and worked, but now when you spawn your pet and attack, allways appear the message "You can not attack your own pet"! :P

An "easy way to fix it" is to erase that dialog (Server side - modCombat ->CanPlayerAttackNPC), i'll look for the code again and try to fix it
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share


×
×
  • Create New...