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

fafioso

Members
  • Posts

    77
  • Joined

  • Last visited

    Never

fafioso's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. Hey guys! Well i was wondering since a long time how and why nobody has incorpored a j-rpg combat system in a custom version yet. I read a few posts but nothing really interesting about that. I personnaly am a big fan of the first fanal fantasy opus and i'd very enjoy create a game with this combat system. I know it demands a lot of work but hey, if you're codder and have no idea xD Let me know! I really think that would be a powerful tool to have the choice between "normal" combat system and turn by turn system :) Well let me know your comments ;) Bye! PS:Sry for my english :)
  2. Ok well i can't find a workeable vb pro so i guess i'll deal with it :)
  3. Ohhh.. So what's the point of leveling?
  4. Hey great work and thx for the new link ;) I just have a little question :s I can't see where and how i increased my character stat's point in the character GUI. Can anybody help me with this? Thanks!
  5. EO 2.0 used to support those animations arrangement and it looked awesome. Would be weird if they removed this kind of graphics :s
  6. Well i use tiles like that : [![](http://img15.hostingpics.net/pics/487930596.png)](http://www.hostingpics.net/viewer.php?id=487930596.png) I use it since the eclipse 2.0\. It that correct for the v4.0?
  7. Hi everyone! Well i have a little problem with my animations :s I read somewhere it's because i'm running on windows 8 (u_u) so if someone had some ideas to fix it, it would be awesome! So i know how to configure animations (i use eclipse since 4 years) but it look like this with any animations i configure : [![](http://img4.hostingpics.net/pics/644394screeneclipse.png)](http://www.hostingpics.net/viewer.php?id=644394screeneclipse.png) I had the same problem with a custom version of eclipse a few months ago so i'm guessing it's windows 8:s Well i can't wait for your answers and thanks for the help! PS:You're doing a great job, Eclipse crew! PS²:Sorry for my english
  8. Link seems broken :s Can you replace it pls? thanks! Up! (Merge reason: Please don't double post, especially when it's something as small as "Up!")
  9. Hi again! I'm asking myself if it would be possible to get Life Cost to cast a spell? Would be great for classes who have high PV! Thx!
  10. THx for your answer Chti'Yonki ;) So i can start developing my project and your futurs updates will not interrupt this? Would be great because i can't wait to start story and developement :) Also like Lel said, fps still are very low on my pc (old machine) and if you can increase that, it would be great :) So you do a great job and good luck for next! Waiting for news ;) Thx again!
  11. Congratulations for your work! I think you are french so i will speak french too! Bravo pour ton boulot c'est vraiment trés abouti et je vais suivre ton projet de trés prêt car c'est le genre d'outil de création qu'on aimerais plus trouver et surtout en francais^^ J'ai dévellopé plusieurs jeux mais j'ai toujours été "bridé" par mes connaissances ou par les capacités des différents moteurs que j'utilisais.Mais j'ai vraiment envie de démarrer un projet solilde avec ton moteur quand il sera selon toi Terminé. Il serait sympa d'ajouter un système de guilde car cela manque vraiment au moteur Eclipse et on le voit trés rarement dans les versions customs (je n'ai d'ailleurs pas compris il n'y est pas de base car dans n'importe quel jeu Online,c'est ce que demande les joueurs en premier lieu) Bref je vais explorer ta derniere mise à jour et j'attend les nouvelles avec impatience! Tu fais vraiment du bon boulot et vraiment merci pour cela! Bon courage!
  12. Still not working :s I'm really bad at coding ![-_-](http://www.touchofdeathforums.com/community/public/style_emoticons//sleep.png)
  13. ``` ' ############ ' ## Spells ## ' ############ Public Sub BufferSpell(ByVal index As Long, ByVal spellslot As Long) Dim spellnum As Long Dim MPCost As Long Dim LevelReq As Long Dim mapNum As Long Dim SpellCastType As Long Dim ClassReq As Long Dim AccessReq As Long Dim Range As Long Dim HasBuffered As Boolean Dim targetType As Byte Dim target As Long ' Prevent subscript out of range If spellslot MAX_PLAYER_SPELLS Then Exit Sub spellnum = GetPlayerSpell(index, spellslot) mapNum = GetPlayerMap(index) If spellnum MAX_SPELLS Then Exit Sub ' Make sure player has the spell If Not HasSpell(index, spellnum) Then Exit Sub ' see if cooldown has finished If TempPlayer(index).SpellCD(spellslot) > GetTickCount Then PlayerMsg index, "Spell hasn't cooled down yet!", BrightRed Exit Sub End If MPCost = Spell(spellnum).MPCost ' Check if they have enough MP If GetPlayerVital(index, Vitals.MP) < MPCost Then Call PlayerMsg(index, "Not enough mana!", BrightRed) Exit Sub End If LevelReq = Spell(spellnum).LevelReq ' Make sure they are the right level If LevelReq > GetPlayerLevel(index) Then Call PlayerMsg(index, "You must be level " & LevelReq & " to cast this spell.", BrightRed) Exit Sub End If AccessReq = Spell(spellnum).AccessReq ' make sure they have the right access If AccessReq > GetPlayerAccess(index) Then Call PlayerMsg(index, "You must be an administrator to cast this spell.", BrightRed) Exit Sub End If ClassReq = Spell(spellnum).ClassReq ' make sure the classreq > 0 If ClassReq > 0 Then ' 0 = no req If ClassReq GetPlayerClass(index) Then Call PlayerMsg(index, "Only " & CheckGrammar(Trim$(Class(ClassReq).Name)) & " can use this spell.", BrightRed) Exit Sub End If End If ' find out what kind of spell it is! self cast, target or AOE If Spell(spellnum).Range > 0 Then ' ranged attack, single target or aoe? If Not Spell(spellnum).IsAoE Then SpellCastType = 2 ' targetted Else SpellCastType = 3 ' targetted aoe End If Else If Not Spell(spellnum).IsAoE Then SpellCastType = 0 ' self-cast Else SpellCastType = 1 ' self-cast AoE End If End If targetType = TempPlayer(index).targetType target = TempPlayer(index).target Range = Spell(spellnum).Range HasBuffered = False Select Case SpellCastType Case 0, 1 ' self-cast & self-cast AOE HasBuffered = True Case 2, 3 ' targeted & targeted AOE ' check if have target If Not target > 0 Then PlayerMsg index, "You do not have a target.", BrightRed End If If targetType = TARGET_TYPE_PLAYER Then ' if have target, check in range If Not isInRange(Range, GetPlayerX(index), GetPlayerY(index), GetPlayerX(target), GetPlayerY(target)) Then PlayerMsg index, "Target not in range.", BrightRed Else ' go through spell types If Spell(spellnum).Type SPELL_TYPE_DAMAGEHP And Spell(spellnum).Type SPELL_TYPE_DAMAGEMP Then HasBuffered = True Else If CanPlayerAttackPlayer(index, target, True) Then HasBuffered = True End If End If End If ElseIf targetType = TARGET_TYPE_NPC Then ' if have target, check in range If Not isInRange(Range, GetPlayerX(index), GetPlayerY(index), MapNpc(mapNum).Npc(target).x, MapNpc(mapNum).Npc(target).y) Then PlayerMsg index, "Target not in range.", BrightRed HasBuffered = False Else ' go through spell types If Spell(spellnum).Type SPELL_TYPE_DAMAGEHP And Spell(spellnum).Type SPELL_TYPE_DAMAGEMP Then HasBuffered = True Else If CanPlayerAttackNpc(index, target, True) Then HasBuffered = True End If End If End If End If End Select If HasBuffered Then SendAnimation mapNum, Spell(spellnum).CastAnim, 0, 0, TARGET_TYPE_PLAYER, index SendActionMsg mapNum, "Casting " & Trim$(Spell(spellnum).Name) & "!", BrightRed, ACTIONMSG_SCROLL, GetPlayerX(index) * 32, GetPlayerY(index) * 32 TempPlayer(index).spellBuffer.Spell = spellslot TempPlayer(index).spellBuffer.Timer = GetTickCount TempPlayer(index).spellBuffer.target = TempPlayer(index).target TempPlayer(index).spellBuffer.tType = TempPlayer(index).targetType Exit Sub Else SendClearSpellBuffer index End If End Sub ``` I found this. Is it the good part of the code? I tried to put CheckAttack player(Index).Party but it makes me an error : Compile error: Data or member not found
×
×
  • Create New...