Draco.exe
-
Posts
260 -
Joined
-
Last visited
Never
Content Type
Profiles
Forums
Calendar
Posts posted by Draco.exe
-
-
@cudauhoan:
> help? :sad:
check you are putting that hole code in Draw**Npc**Name, because _Call DrawText(TexthDC, TextX, TextY, Name, color)_ is in Draw**Player**Name too
(Maybe you forgot to put ModQuest in your client, idk…just giving some ideas)
maybe that should fix it -
a little bugfix for the class required in the spell editor (you can't select "none" so you can't have universal skills)
Client side:
In **Public Sub SpellEditorInit()** change this:
```
' build class combo
.cmbClass.AddItem "None"
.cmbClass.Clear
```
To this (just invert that tho lines):
```
' build class combo
.cmbClass.Clear
.cmbClass.AddItem "None"
``` -
hmmm you should try to compile the client and the server in the vb and test
About the "none" in the class required in the spell editor, here is how to fix it (thx to lel for reporting this!):
Client side:
In **Public Sub SpellEditorInit()** change this:
```
' build class combo
.cmbClass.AddItem "None"
.cmbClass.Clear
```
To this (just invert that tho lines):
```
' build class combo
.cmbClass.Clear
.cmbClass.AddItem "None"
``` -
@lel:
> I see, great job on the ani. tiles. I have not played with them yet, but they look great.
all credits are for Linkmegax :P a pretty easy way to make anim tiles for the map
Looking now for the "None" in the spell editor
(i removed the conv system and i'll test if the event system is crashing or not with the conversations) -
@Cristian624:
> Tengo un error en el cliente. En el nuevo y viejo cliente español yo tengo este error: Run-time error 40020 - Invalid operation at current state. y en el nuevo y viejo cliente ingles tengo el mismo error ¿Ayuda? pero el eclipse origins 2.0 y otros eclipses funcionan perfectamente.
>
> De verdad necesito este eclipse, porfavor ayuda :S tengo las librerias instaladas.
ese run time error a mi tambien me aparece, según la guÃÂa de RTE que hay en la página no tiene solución para evitar que aparezca, pero de todas formas a mi cuando me aparece, vuelvo a abrir el cliente y funciona normal (solo me aparece 1 vez cuando se demora mucho en iniciar…quizás sea un problema del direct7, ya que se queda pegado ahàantes de que aparezca el error)
@lel:
> Trying to delete a convo, crashes the Client
> There is not a "none" button for "class required" in the spells editor.
>
> IDK… maybe I am missing it, but where is the option to add a NPC or pet to a spell or even the item?
>
> Edit: Is there a way to remove in game menus you bring up?
it's loo like the convo have some conflicts with the event system in some lines of the code, i think the best is not using convo system because event system have a convo-like system (and if you know how, remove it)
just place the item in the same number than the NPC you want to summon and you're ready to go (eg: i have a wild wolf NPC in the number 5…so if i want to summon that npc i need to create a summoning item in the number 5 of the item list)
>! @Ryoku:
>! > How to use:
> Make a summon item, set your requirements, and SAVE! Now remember what number that item is.
> Next, make a NPC *ON THE SAME NUMBER* as the summon item
> Now summon, and the rest of the controls are the same.
> you now have an advanced summoning system, and ability to make an entire Tamer Class. -
Added a download link with the Fantasy GUI (You need to place manually the gui files)
Some pics:
>! ![](http://www.freemmorpgmaker.com/files/imagehost/pics/d5435a443a167d6addec4ca7e703e359.jpg)
![](http://www.freemmorpgmaker.com/files/imagehost/pics/1933b531dc3f2cf2f737dde0422d1abd.png)
![](http://www.freemmorpgmaker.com/files/imagehost/pics/517043c2c7e85199ecd46df9315bdd91.png)
![](http://www.freemmorpgmaker.com/files/imagehost/pics/7b2e767326f67fcda065778ea5f6b2d7.png)
![](http://www.freemmorpgmaker.com/files/imagehost/pics/a0c171de328fa757ff665d88ae1e93ac.png) -
@cudauhoan:
> when i try to add Altar Quest System,i have "Can't find project or library" and Easendmailobj.dll was missing :sad:
hmmm, that dll works for the Email system, i don't know why that is causing problems to you…anyways u can "remove" that dll doign this:
go to the client source, and then go to project--->Preferences, now in the window you should see "EASendMailObj ActiveX 1.0 Type Library", just uncheck that and test (that dll works for the tutorials added after the feature list for sending an email to the players with his account name and his password)
that should work
@YummyTomato:
> Hey I really like this, but I can't access mediafire from China. Is it OK if you upload the English file in Rapidshare?
>
> Thanks so much! è¬Âè¬Â!
uploaded! check the download links ;) -
@Domino_:
> Looks like good engine for newbies or theese who cant code in vb6\. also… I'm only one who noticed this....? :D
>
> >! [![](http://www.freemmorpgmaker.com/files/imagehost/pics/c8c94108b997f09303f5efde1695b34d.png)](http://www.freemmorpgmaker.com/files/imagehost/#c8c94108b997f09303f5efde1695b34d.png)
i saw that too :p but idk why happened…that tree is a resource :s
**Update**
I uploaded the English version with the Pet Fix: http://www.mediafire.com/?uvutfcip3j1hr8v
Version en español con el fix de mascotas: http://www.mediafire.com/?3iy3tpy93zw77di -
@daxterxx:
> I have the same error
which one? The subscript out of range or the MAX_NPC_drops highlighted?
for the subscript out of range when your pet dies (**or any NPC with no drop**) check the first message in the Bug list, there is how to fix it, just replace the piece of code with the new one, compile the server and test
for the MAX_NPC_drops highlighted just remove the "s" of drops and test -
Saludos!
Por si a alguno le interesa, en los Custom Projects, mi compilación tiene una versión con la mayorÃÂa de los mensajes in-game traducidos al español. Pueden revisarlo acá: http://www.touchofdeathforums.com/smf2/index.php/topic,81199.0.html
a ver si a alguien le sirve :) -
@cudauhoan:
> MAX_NPC_drops highlighted :-s
remove the "s" from Drops ^^
thx for the bug report! (updated the bug list with the fix) -
@cudauhoan:
> when my pet dead,server have "Subcript out of range",how to fix that?
Server side:
In modCombat go to Sub NpcAttackNpc and find:
```
' Drop the goods if they get it
```
replace for this:
```
For n = 1 To MAX_NPC_drop 'not drops, sorry
If Npc(vNpcNum).DropItem(n) = 0 Then Exit For
If Rnd <= Npc(vNpcNum).DropChance(n) Then
Call SpawnItem(Npc(vNpcNum).DropItem(n), Npc(vNpcNum).DropItemValue(n), mapNum, MapNpc(mapNum).Npc(Victim).x, MapNpc(mapNum).Npc(Victim).y)
End If
Next
```
That should fix it, worked for me (i'll add this fix in the next version) -
@Zetasis:
> I noticed that there was an English and Spanish version for the both the client and server so are the source files in English or Spanish?
in the english download the source files are in english (i made the two server.exe and the two client.exe for testing the translations, and i forgot to delete the spanish exe files :P) -
@farrel24:
> I can't understand, what this Client say? :huh:
> does not anyone speak English?
i uploaded an english version ;) -
no problem!
-
@Stein:
> It's mostly just tutorials and bugfixes made by other people though.. So if it's unstable he didn't follow those properly.
>
> The interface is nice however.
i think i followed the tutorials step by step :P
@Zetasis:
> Alright, now the projectile stuff is appearing on the editor. Now my only issue is all the Spanish lol.
check the downloads, i just uploaded an english version ;) that version have a fantasy theme (except the main.jpg) but it's a temporal fantasy version -
@Zetasis:
> Hmm. It seems there is not a way to make projectile weapons. Either that or I am missing something.
it works fine for me (i think the first projectile image is blank). And if u don't see the projectile editor in the item editor, just click in another item in the list and then click again in your first item ;)
![](http://www.freemmorpgmaker.com/files/imagehost/pics/9d56f1511ab095e13e6939f58b364dcc.png) -
@Zetasis:
> I was just thinking the other day "I wonder how long it will be till an engine like this is made", and now here it is. Nice job man I'm downloading now. If possible, I suggest updating this with Jc's nightly releases once he is finished with it. Even if you don't though this is a very nice addition. Thanks again.
most of the nigthly are for Directx8 engine, and this still use Dx7 (so no fogs, rain, snow, and stuff like that) :(
@farrel24:
> A Stable or no?
i think yes…tested and no errors ;) -
@Alatar:
> Pretty nice :) Looks good, I'm gonna give it a try tomorrow I think ^^
>
> PS: Spanish? You should check the spanish board that i'm thinking on revamp http://www.touchofdeathforums.com/smf2/index.php/board,283.0.html ^^
i'll check that ;)
P.S: i forgot to add you to the credit list for the checkpoint attrib! :P -
thx! i hope this engine can help someone :)
-
![](http://i58.tinypic.com/20glg8w.jpg)
Well, this is my custom version based on the last Eclipse Origins Official Relase (event system) and lots of tutorials founded here and all the bug fixes i found here. I'ts just a compilation of that.
**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**
**Version: 2.0 (Now with Directx8**)
**4th Relase
:Walkthrough fix + Bank Currency fix + Pet attack owner fix**
_Notes for Version 2.0 [4th Relase]:_
**->This engine is in english (maybe a future version will be in spanish)**
**->This engine is based on Nightly Eclipse**
**->I hope this version is stable, if you found a bug, please report that in this thread.**
**->You can edit it if you want to keep upgrading this engine with more features, just don't forget to give credits to all the members in the list!.**
**->This engine doesn't have all the other tutorials in the 1.1 version, but i think with this features you can create a good and stable MMORPG.**
**Next relase info [5th Relase]**
>! -Don't know what to add now, thanks for Zopto for fixing the bugs with the pets and the map block bug!
**Download links:**
> **English version 4th relase:**
> **[Mediafire Link](http://www.mediafire.com/?6yiwb785kvf2s5m)**
> **[SOURCE ONLY Mediafire Link](http://www.mediafire.com/?trzj55neh3zl72t)**
> **[MEGA Link](https://mega.co.nz/#!E14ASBgb!8XyHxgF8Ts4Q7mTYXXTK_tYuTEo_xAF71asUGbv_ckQ)**
> **This is the 4th Relase of Dragon Eclipse 2.0 based on Nightly Eclipse. In this version i fixed the Walk through NPCs (now in safe zones you can't walk through NPCs), the Pet attack owner fix, and the Bank Currency Fix .
>
> The _SOURCE ONLY_ download includes: src folders, vbp files and the .exe files (this one is for replacing the old ones if you don't want to download the whole engine again.
>
> Check the features and credits for all the info of this relase.**
>
> **This version also requires the Nightly Eclipse Libraries to work (credits to JC Denton Denton):**
> _Original download link:_ [Nightly Eclipse Libraries](http://jcsnider.freemmorpgmaker.com/Eclipse%20Runtime%20Files%20Installer.exe)
> _Mirror:_ [http://www.mediafire…186klkgqojhw9qr](http://www.mediafire.com/?186klkgqojhw9qr)
**Screenshots**
>! ![](http://www.freemmorpgmaker.com/files/imagehost/pics/aaed0882e7b10d395f0fa14f301a7e42.png)
>! ![](http://www.freemmorpgmaker.com/files/imagehost/pics/613296c292247060856c155e48445b31.png)
![](http://www.freemmorpgmaker.com/files/imagehost/pics/b433a6ecde618558070e158880375a8f.png)
>! ![](http://www.freemmorpgmaker.com/files/imagehost/pics/9367df2225c81d4df32a3dc77b87a0cc.png)
**Features and Credits:**
> -> Nightly Eclipse Engine (Jscnider. Also map block bugfix by Zopto)
>
> -> Resolution changer (GodWar)
>
> -> Little modifications to the GUI code to work with resolution changer (Eragon2589)
>
> -> Quest System (Alatar/Eragon2589)
>
> -> Checkpoints (Alatar)
>
> -> Pet System (Lighting/Ryoku. Also pet spawn next to player bugfix by Zopto)
>
> -> Projectiles and Ranged Weapons (Whack/Capt. Wabbit)
>
> -> Jukebox (Serenade)
>
> -> Random Tile Placement (Serenade)
>
> -> Player level and Tags (SpiceyWolf)
>
> -> Exp. Rate changer (ShawnyBoy)
>
> -> Better item interface (Xppxdd)
>
> -> Status checker (MeGusta, modified a bit)
>
> -> NPC name with mouse hover (Xlithan)
>
> -> Send Items from the server (GodWar)
>
> -> Attack anim bugfix (GuardianBR)
>
> -> More Agility = Run faster with shift (Keny)
>
> -> Various BugFixed mentioned in the 1.1 version (Eclipse Comunity)
**Engine Bugs/Fixes**
**Non-fixed Bugs:**
>! _-None (i think!)_
**Fixes:**
>! -Fix for the Pets and Map event block bug (for spawning next to the player). Credits to **Zopto** for fixing it! :)
>!
>! > 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
–---------------------------------------------------------------
**[OLD-Buggy/Not Supported]
Version: 1.1 (Still in Directx7)**
>! **Download link:**
**English version:** (i think i retranslated all to english)
[http://www.mediafire…uvutfcip3j1hr8v](http://www.mediafire.com/?uvutfcip3j1hr8v)
>! Optional download link: [https://rapidshare.c…pse](null) English.zip
**This version include the NPC Drop Fix (caused when a NPC with no drops selected is killed)**
>! The source of the english version is in english too.
>! **Spanish version:** Todos los mensajes in-game estan traducidos al español (o casi todos)
[http://www.mediafire…3iy3tpy93zw77di](http://www.mediafire.com/?3iy3tpy93zw77di)
**Esta versio;n incluye el Fix a los "drops" de los NPCs que no tienen ningun drop seleccionado**
>! **Fantasy theme GUI:** Just replace the "Main" and "Menu" Folders with this folders (Client–>Data Files-->Graphics-->GUI)
[http://www.freemmorp…42e13ed733b.zip](http://www.freemmorpgmaker.com/files/imagehost/pics/01c166d09a9920a080e2c42e13ed733b.zip)
>! Features
>! > -Server status checker
>
> -Bigger interface
>
> -Global and map chat options
>
> -Minimap (u can show hide it)
>
> -New button for Pets and jukebox
>
> -More NPCs for each map
>
> -Run faster with Shift (more agi = more faster)
>
> -Projectiles and ranged combat
>
> -Craft
>
> -Jukebox
>
> -Transformation spell (like "costumes")
>
> -NPC conv. system
>
> -Auto target
>
> -Character levels
>
> -GM Tags and custom colours
>
> -Show NPC name with mouse hover
>
> -Pets summoned with items
>
> -Arena map attribute
>
> -Walk through players in safe zones
>
> -Signs
>
> -Chest
>
> -Enchanced item description
>
> -Checkpoints
>
> -NPC Spells
>
> -NPC multi drops
>
> -Buff/De-Buff spells
>
> -Doors and Switches
>
> -Text render
>
> -Random tile
>
> -Send messages from server
>
> -Safe server restarter
>
> -Experience rate changer
>
> -Two-handed weapons
>
> -Better store
>
> -Animation for Traps and heal tiles
>
> -Email for registration
>
> -Moveable Frames
>
> -Hide/Show Helmet
>
> -Map Tile Animations
>
> -Set access from server
>! **Credits:**
>! > ->Eragon2589 - Custom GUI, translations
>
> ->JC Denton Denton Denton Denton - Eclipse Origins Event system 2.7 + bugfixes
>
> ->Captain Wabbit - Projectiles
>
> ->Ryoku Hassu - Buff/Debuff, pet fix, auto-target, doors and switches
>
> ->Me Gusta - status checker
>
> ->Lightning/Niall - Pets, text render
>
> ->DJMaxus - Crafting, NPC Spells
>
> ->Boynaar - Signs and Chests
>
> ->Ballie - NPC Multi-Drop
>
> ->Sekaru - Walk through players
>
> ->Kibblez - Arena map attib
>
> ->ihero - Transformation spells, minimap
>
> ->Terraun - Interface tutorial
>
> ->Serenade - Text rendering, Minimap, Global/map chat buttons, Jukebox, Random tile
>
> ->SpiceyWolf - Player level and Tags (based on Zafi and Chuchoide's tutorials)
>
> ->Xlithan - NPC name with mouse hover
>
> ->Xppxdd - Better item interface
>
> ->Domino - Send messages from server
>
> ->Wing - Safe server restarter
>
> ->Shawny Boy - exp rate changer (normal, x2, x3, etc.)
>
> ->Sigridunset - Two-handed weapons
>
> ->zerohero - Better store
>
> ->PenutReaper - Animation for Traps and heal tiles
>
> ->GoldSide - Email in frmMenu
>
> ->Jaxx - Crafting map tile
>
> ->blkcrow & Whack - Moveable frames
>
> ->Sotvotkong - Hide/show Helmet
>
> ->Linkmegax - Map Tile Animations
>
> ->Alatar - Checkpoints
>
> ->Robin - Security hole and hotbar fix
>
> ->Niall - Index fix
>
> ->Xlithan - messages fix
>
> ->Helladen - reloading image skills fix, NPCs high index, currency fix
>
> ->Ryoku Hasu - trade crash fix
>
> ->Joyce - healing target fix
>
> ->Sotvotkong - save NPC animation fix
>
> ->Riiicardoo - Class fix
>
> ->Scootaloo - NPC stats fix
>
> ->Terabin - Party exp fix, experience bar fix and more bugfixes
>
> ->iHero - Slide fix
>
> ->Soul - cooling time for heal skills fix
>
> ->Noth - starter skills fix and skill class restriction fix
>! i think thats all the credits. -
Thx for the answer Stein! but i think i need to learn more about VB before doing new changes. I'll check that first, look some guides, etc. and then i'll try to make my own Multi-Character system :D
-
ok, thx for the advice Alatar!…i hope my VB skills can help me to do that xD
-
yeap, Eclipse Dawn have multi-characters and i tried to rip from there, but didn't worked :(
Dragon Eclipse 2.0
in Custom Versions
Posted
In modGameLogic replace **Sub SpawnPet** with this
>! ```
Sub SpawnPet(ByVal index As Long, ByVal mapNum As Long, npcNum As Long)
Dim PlayerMap As Long
Dim i As Integer
Dim PetSlot As Byte
'Prevent multiple pets for the same owner
If TempPlayer(index).TempPetSlot > 0 Then Exit Sub
PlayerMap = GetPlayerMap(index)
PetSlot = 0
For i = 1 To MAX_MAP_NPCS
'If Map(PlayerMap).Npc(i) = 0 Then
If MapNpc(PlayerMap).NPC(i).SpawnWait = 0 And MapNpc(PlayerMap).NPC(i).Num = 0 Then
PetSlot = i
Exit For
End If
Next
If PetSlot = 0 Then
Call GiveInvItem(index, npcNum, 0)
Call PlayerMsg(index, "The map is too crowded for you to call on your pet!", Red)
Exit Sub
End If
>! 'create the pet for the map
Map(PlayerMap).NPC(PetSlot) = npcNum
MapNpc(PlayerMap).NPC(PetSlot).Num = npcNum
'set its Pet Data
MapNpc(PlayerMap).NPC(PetSlot).IsPet = YES
MapNpc(PlayerMap).NPC(PetSlot).PetData.Name = GetPlayerName(index) & "'s " & NPC(npcNum).Name
MapNpc(PlayerMap).NPC(PetSlot).PetData.Owner = index
'If Pet doesn't exist with player, link it to the player
If Player(index).Pet.SpriteNum <> npcNum Then
Player(index).Pet.SpriteNum = npcNum
Player(index).Pet.Name = GetPlayerName(index) & "'s " & NPC(npcNum).Name
End If
TempPlayer(index).TempPetSlot = PetSlot
'cache the map for sending
Call MapCache_Create(PlayerMap)
>! 'Cache the Pets for players logging on [Add new Number to array]
PetMapCache(PlayerMap).UpperBound = PetMapCache(PlayerMap).UpperBound + 1
PetMapCache(PlayerMap).Pet(PetMapCache(PlayerMap).UpperBound) = PetSlot
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
>! Select Case GetPlayerDir(index)
Case DIR_UP
Call SpawnNpc(PetSlot, PlayerMap, GetPlayerX(index), GetPlayerY(index) - 1)
Case DIR_DOWN
Call SpawnNpc(PetSlot, PlayerMap, GetPlayerX(index), GetPlayerY(index) + 1)
Case DIR_LEFT
Call SpawnNpc(PetSlot, PlayerMap, GetPlayerX(index) + 1, GetPlayerY(index))
Case DIR_RIGHT
Call SpawnNpc(PetSlot, PlayerMap, GetPlayerX(index), GetPlayerY(index) - 1)
End Select
're-warp the players on the map
For i = 1 To Player_HighIndex
If IsPlaying(i) Then
If GetPlayerMap(i) = GetPlayerMap(index) Then
Call PlayerWarp(i, PlayerMap, GetPlayerX(i), GetPlayerY(i))
End If
End If
Next
End Sub
>! ```
In modPlayer
>! find:
```
Case ITEM_TYPE_SUMMON
```
and add this at the bottom
```
Call TakeInvItem(index, itemnum, 0)
>! ```
–-------------------------------------------------------------------------
For the Projectiles, just create a weapon, then click on any other item in the list, then go back to your first item, you should see now the projectile options
---------------------------------------------------------------------------
@UchiaAxelz:
> Dear Eragon! If i place a door with the teleporting destination/ key requirement, and i walk into the D's spot, the server crashes with subscript out of range '9\. Any idea?
start the server in debug mode in Visual Basic (open the server.vbp and click F5) now do the thing you do for the error and when the error appears, press debug and paste here the highlighted code. I'll try to find the error too
maybe is causing some trouble with the door system of the event system