Draco.exe

yeap the bubble appears only when you send a map message

**UPDATE!!!** **I Fixed the warp crash problem!! :D** (it was some buggy codes from pet system and quest system with sub player warp…it was my error to just copy and paste the code) After this edits the warps from attribute, map border warp and event warp worked for me in maps with events. _Added the fix to the first message_ **Server Side:** Replace **Sub PlayerWarp** with this one: ``` Sub PlayerWarp(ByVal index As Long, ByVal MapNum As Long, ByVal x As Long, ByVal y As Long) Dim shopNum As Long Dim OldMap As Long Dim I As Long Dim Buffer As clsBuffer ' Check for subscript out of range If IsPlaying(index) = False Or MapNum MAX_MAPS Then Exit Sub End If ' Check if you are out of bounds If x > Map(MapNum).MaxX Then x = Map(MapNum).MaxX If y > Map(MapNum).MaxY Then y = Map(MapNum).MaxY If x < 0 Then x = 0 If y < 0 Then y = 0 ' if same map then just send their co-ordinates If MapNum = GetPlayerMap(index) Then SendPlayerXYToMap index Call CheckTasks(index, QUEST_TYPE_GOREACH, MapNum) End If TempPlayer(index).EventProcessingCount = 0 TempPlayer(index).EventMap.CurrentEvents = 0 ' clear target TempPlayer(index).target = 0 TempPlayer(index).targetType = TARGET_TYPE_NONE SendTarget index ' Save old map to send erase player data to OldMap = GetPlayerMap(index) If OldMap MapNum Then Call SendLeaveMap(index, OldMap) End If UpdateMapBlock OldMap, GetPlayerX(index), GetPlayerY(index), False Call SetPlayerMap(index, MapNum) Call SetPlayerX(index, x) Call SetPlayerY(index, y) UpdateMapBlock MapNum, x, y, True 'If 'refreshing' map If (OldMap MapNum) And TempPlayer(index).TempPetSlot > 0 Then 'switch maps PetDisband index, OldMap SpawnPet index, MapNum, Trim$(Player(index).Pet.SpriteNum) PetFollowOwner index If PetMapCache(OldMap).UpperBound > 0 Then For I = 1 To PetMapCache(OldMap).UpperBound If PetMapCache(OldMap).Pet(I) = TempPlayer(index).TempPetSlot Then PetMapCache(OldMap).Pet(I) = 0 End If Next Else PetMapCache(OldMap).Pet(1) = 0 End If End If 'View Current Pets on Map If PetMapCache(Player(index).Map).UpperBound > 0 Then For I = 1 To PetMapCache(Player(index).Map).UpperBound Call NPCCache_Create(index, Player(index).Map, PetMapCache(Player(index).Map).Pet(I)) Next End If ' send player's equipment to new map SendMapEquipment index ' send equipment of all people on new map If GetTotalMapPlayers(MapNum) > 0 Then For I = 1 To Player_HighIndex If IsPlaying(I) Then If GetPlayerMap(I) = MapNum Then SendMapEquipmentTo I, index End If End If Next End If ' Now we check if there were any players left on the map the player just left, and if not stop processing npcs If GetTotalMapPlayers(OldMap) = 0 Then PlayersOnMap(OldMap) = NO ' Regenerate all NPCs' health For I = 1 To MAX_MAP_NPCS If MapNpc(OldMap).NPC(I).Num > 0 Then MapNpc(OldMap).NPC(I).Vital(Vitals.HP) = GetNpcMaxVital(MapNpc(OldMap).NPC(I).Num, Vitals.HP) End If Next End If ' Sets it so we know to process npcs on the map PlayersOnMap(MapNum) = YES TempPlayer(index).GettingMap = YES Call CheckTasks(index, QUEST_TYPE_GOREACH, MapNum) Set Buffer = New clsBuffer Buffer.WriteLong SCheckForMap Buffer.WriteLong MapNum Buffer.WriteLong Map(MapNum).Revision SendDataTo index, Buffer.ToArray() Set Buffer = Nothing End Sub ``` and replace **Sub SpawnNpc** with this one (idk if this is affecting the problem, but i fixed some lines of code that may affect others events) ``` Public Sub SpawnNpc(ByVal mapNpcNum As Long, ByVal MapNum As Long, Optional ForcedSpawn As Boolean = False, 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 MAX_MAP_NPCS Or MapNum MAX_MAPS Then Exit Sub npcNum = Map(MapNum).NPC(mapNpcNum) If ForcedSpawn = False And Map(MapNum).NpcSpawnType(mapNpcNum) = 1 Then npcNum = 0 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 x = Random(0, Map(MapNum).MaxX) y = Random(0, Map(MapNum).MaxY) 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 ```

well…if i have time i'll add some other thing to the engine...now i'll test each one of the tutorials that i used to see which one is causing the error with the warps and events.

you need to edit the code to make it work with directx8

@Ganjika: > How would make it so that the npc's names always show even if there isn't a mouse pointer over them and/or where folks cant walk through npcs? btw, thanks again for putting out a great engine - this works wonderfully. client side replace this: ``` ' draw npc names For I = 1 To Npc_HighIndex If MapNpc(I).num > 0 Then If CurX = MapNpc(I).X And CurY = MapNpc(I).y Then Call DrawNpcName(I) End If End If Next ``` with the original one: ``` ' draw npc names For i = 1 To Npc_HighIndex If MapNpc(i).num > 0 Then Call DrawNpcName(i) End If Next ``` The walk through is only for players (players can walkthrough players) and only in safe zones. check the source tutorial index for most of the tutorials added to this engine, so you can edit it as you want: http://www.touchofdeathforums.com/smf2/index.php/topic,75901.0.html

ok, i tested the warp with attributes, admin warp, and "map border" warp, (without any event on the map) and i'm not having any problems…you should delete all the maps files and the event files from the server folder (delete all the files inside the map folder) then launch the server and test the warps...it should work. About the event walkthrough, this should be fixed deleting the events of the map folder in server. Anyways, when you create an event in the same map you are warping, it's lool like the server crash without any reason...i'll check that. (PS: after the server crash i started it again, i deleted the events for te map and the warp started to work again without problems) ---------------------------------------------------- About the description of the Currency, it's just an edit of the new item description window...you shoudl check the tutorial and look how you add the description for the currency again. And the projectiles...idk really xD maybe you can post that in the projectile tutorial and see if someone have the answer. ---------------------------------------- about the admin panel, i know that's happening...but it's easy to fix, just open the frm_main in VB and right click on the admin panel, then click on "bring to Front". ---------------------------------------- about the last post of DarkBeast, i think you didn't read this: @Eragon2589: > **PLEASE don't ask me (or send MPs) if i can add more things like pets, quests, guilds, two handed weapons, etc…i'm doing this because i want to help new guys for free, and i want to finish my own game too. So if you want to add new stuff, install VB and follow the tutorials, i'ts just practice ;)** i'm going to add new features ONLY if i have time in the future…now i'm at University again and i need to finish my game too, so i don't have too much time now.

@Eragon2589: > if you don't know how to convert the bmp to png…download this and follow the simple instructions: > [jcsnider's EO 2.0 to EO with DX8 converter](http://jcsnider.freemmorpgmaker.com/jcsniders%20EO%202.0%20to%20EO%20with%20DX8%20converter.zip)

hmm, don't know then…maybe is your graphic card or PC

you tested the nightly eclipse without any update?

you installed the runtimes for Nightly Eclipse? that's an error with DirectX8

1) i didn't touched the event system 2) i have no errors when wharping to other area…i had a bug about that when i didn't finished an event. If you can post the highlighted line when you have this error in vb maybe i can help and check the error.

@Jumpahead: > Another 2 bugs to report. > > 1.I can walk through events even although I have not selected Walk through. > 2.When I enter a new area it says Subscript out of Range. which version are you using? (if you're using v1.1 i won't help you because that's an old version…sorry)

an easy way to check which version are you using: the dx7 uses .bmp images (for characters, items, etc.) and the dx8 uses .png images…if you're using the dx7 version, i'm sorry but i said that version is unsupported and i won't create new updates or fixes to that version because i created a new version based on Nightly Eclipse. If you liked the older version, you can download the Original Event System of jcsnider, and then start adding all the stuff you want. It's not very difficult to add the source tutorials in VB ;)

@Jumpahead: > Another bug which will stop me making an MORPG. > Picture explains the problem. well, that's because you're using an old image of Item Description. You need to use this one: >  –------------- @DarkBeast: > I don't want to complain cause I would have never done something like this for the community but this is way to buggy.1) When I make a event it says runtime or also when I make a shop it won't take money when the players purchase items please fix this. which engine are you using? v1.1 (Dx7) or 2.0 (Dx8)? **PS: the 1.1 version won't have new updates or fixes because now i'm working on version 2.0 wich is based on nightly eclipse.**

@marlongb: > But if you type "/ help" error appears. In modConstants (server and client must be the same) find: ' text color constants and replace all the "capri" with any other color like cyan, white, blue, green, red, etc. (you can change for any other color excepting goldenyellow and capri i think) i tried to add that color to the help command, but when i changed the help color to other worked again. **UPDATE: I uploaded the second relase of Dragon Eclipse 2.0\. This one have a few more features like Pets. This is probably the last relase of the engine, so you need to add the others features by yourself. I think this version is more stable than the others, and with the features you can create a good MMORPG. The download link and new features are in the first message of the thread**

NPCs: http://www.touchofdeathforums.com/smf2/index.php/topic,75158.0.html Players: http://www.touchofdeathforums.com/smf2/index.php/topic,67213.0.html http://www.touchofdeathforums.com/smf2/index.php/topic,73619.0.html (note all of this tutorials are for EO 2.0)

ok! i never used the house system before (that's why i asked that :P) thx!

@marlongb: > Dragon Eclipse 2.0 in Speel System have Bug which bug?

a little question…how you leave your house? xD you need to use a command or something?

i found that checking all the pages of this thread xD…maybe jc should put that link in the first message (?) :P

works fine for me. Anyways, this engine needs 521x521 px tiles right? (if this is true…any1 have a program which do this automatically? i don't want to resize all my tiles in photoshop :P)

if you don't know how to convert the bmp to png…download this and follow the simple instructions: [jcsnider's EO 2.0 to EO with DX8 converter](http://jcsnider.freemmorpgmaker.com/jcsniders%20EO%202.0%20to%20EO%20with%20DX8%20converter.zip)

@Jumpahead: > New Bug regarding Npc names in 2.0\. They don't seem to appear for me. This is the only thing that is stopping me from making a game in this engine. hmmm, you tried to hover your mouse over the NPC? (i think i added that tutorial, so the names of the NPCs only appear when you put your mouse over the NPC)

well, svchost.exe isn't a virus, but **Jeefo.A** it is, and that virus infect svchost and all the .exe files . maybe this links can help you: http://go.eset.com/us/threat-center/encyclopedia/threats/jeefoa/ http://www.bitdefender.com/VIRUS-680-en–Win32-Jeefo-A.html i had that virus in my pc some years before...i just made a backup of all non .exe files and then format the hard drive...then installed an antivirus and re-installed all the other things. good luck!

@Lazlike: > Are this EO V.3.0 or EO V.2.0?? it's EO v2.0 (event system and Directx7) –------------- Which line is highlighted when the error appears? ------------- **I added a first simple relase for Dragon Eclipse 2.0 (based on EO 3.0…so this works with Dx8) if you want to start editing and adding by yourself more things, check the first message**