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

Qazek

Members
  • Posts

    133
  • Joined

  • Last visited

    Never

Everything posted by Qazek

  1. For me slide tile doesn't work XD
  2. For quests use this: [[EO] Noob Quest System](http://www.touchofdeathforums.com/smf/index.php/topic,62859.0.html) And stop ask for the quest editor!
  3. Qazek

    Origins Spells

    Open server, open client, press F1, open Spell Editor, search Range scroll bar, set to 1 or other but no to Self Cast
  4. Qazek

    Origins Spells

    I think it's range bug. Set range to 1 or other but no to "Self-Cast"
  5. Tested, working 100% CLIENT SIDE Open Spell Editor and add: label: name - lblSprite caption - Transformation sprite: scroll bar: name - scrlSprite Add to your scrollbar: ``` lblSprite.Caption = "Transformation sprite: " & scrlSprite.Value Spell(EditorIndex).Sprite = scrlSprite.Value ``` Go to modGameEditors, find sub: SpellEditorInit In this sub find: ``` .scrlStun.Value = Spell(EditorIndex).StunDuration ``` Add: ``` .scrlSprite.Value = Spell(EditorIndex).Sprite ``` Go to modTypes, find: ``` Private Type SpellRec ``` Add to this type: ``` Sprite As Long ``` SERVER SIDE Go to modTypes, find: ``` Private Type SpellRec ``` Add to this type: ``` Sprite As Long ``` In modPlayer in Sub CastSpell find: ``` Case 0 ' self-cast target Select Case Spell(spellnum).Type Case SPELL_TYPE_HEALHP SpellPlayer_Effect Vitals.HP, True, Index, Vital, spellnum DidCast = True Case SPELL_TYPE_HEALMP SpellPlayer_Effect Vitals.MP, True, Index, Vital, spellnum DidCast = True Case SPELL_TYPE_WARP SendAnimation MapNum, Spell(spellnum).SpellAnim, 0, 0, TARGET_TYPE_PLAYER, Index PlayerWarp Index, Spell(spellnum).Map, Spell(spellnum).x, Spell(spellnum).y SendAnimation GetPlayerMap(Index), Spell(spellnum).SpellAnim, 0, 0, TARGET_TYPE_PLAYER, Index DidCast = True End Select ``` Change for this: ``` Case 0 ' self-cast target Select Case Spell(spellnum).Type Case SPELL_TYPE_HEALHP SpellPlayer_Effect Vitals.HP, True, Index, Vital, spellnum If Spell(spellnum).Sprite > 0 Then SendAnimation MapNum, Spell(spellnum).SpellAnim, 0, 0, TARGET_TYPE_PLAYER, Index SetPlayerSprite Index, Spell(spellnum).Sprite Call SendPlayerData(Index) End If DidCast = True Case SPELL_TYPE_HEALMP SpellPlayer_Effect Vitals.MP, True, Index, Vital, spellnum If Spell(spellnum).Sprite > 0 Then SendAnimation MapNum, Spell(spellnum).SpellAnim, 0, 0, TARGET_TYPE_PLAYER, Index SetPlayerSprite Index, Spell(spellnum).Sprite Call SendPlayerData(Index) End If DidCast = True Case SPELL_TYPE_WARP SendAnimation MapNum, Spell(spellnum).SpellAnim, 0, 0, TARGET_TYPE_PLAYER, Index PlayerWarp Index, Spell(spellnum).Map, Spell(spellnum).x, Spell(spellnum).y SendAnimation GetPlayerMap(Index), Spell(spellnum).SpellAnim, 0, 0, TARGET_TYPE_PLAYER, Index DidCast = True End Select ``` It is all! Now when you use addhp and addmp spell and if you set sprite in spell editor > than 0 your sprite change to this what is in spell editor ;)
  6. WTF? In my EO (1.1.0) there's TakeItem and GiveItem.
  7. NEW WORKING VERSION!!! I think that XD It's my quest system. If you don't have choice you can use it but it's very very bad quest system XD CLIENT SIDE Download attachments and replace in source client folder It's a new NPC Editor if you don't have npc spell casting system you can delete this frame with scrollbars and labels XD I think you know what I said but I'm not good in english xD Search this: ``` Private Type NpcRec ``` Add to this type: ``` QuestNum As Long QuestLevel As Long QuestReqItem As Long QuestReqItemHowMany As Long QuestRewItem As Long QuestRewItemHowMany As Long QuestMsg1 As String * 250 QuestMsg2 As String * 250 QuestMsg3 As String * 250 QuestMsg4 As String * 250 ``` Search: ``` Public Const NPC_BEHAVIOUR_GUARD As Byte = 4 ``` Add: ``` Public Const NPC_BEHAVIOUR_QUEST As Byte = 6 ``` Search in NPCEditorInit in modGameEditors: ``` .txtEXP.text = Npc(EditorIndex).EXP ``` Add: ``` .txtQuestNum.text = Npc(EditorIndex).QuestNum .txtQuestLevel.text = Npc(EditorIndex).QuestLevel .txtQuestReqItem.text = Npc(EditorIndex).QuestReqItem .txtQuestReqMany.text = Npc(EditorIndex).QuestReqItemHowMany .txtQuestRewItem.text = Npc(EditorIndex).QuestRewItem .txtQuestRewMany.text = Npc(EditorIndex).QuestRewItemHowMany .txtMsg1.text = Trim$(Npc(EditorIndex).QuestMsg1) .txtMsg2.text = Trim$(Npc(EditorIndex).QuestMsg2) .txtMsg3.text = Trim$(Npc(EditorIndex).QuestMsg3) .txtMsg4.text = Trim$(Npc(EditorIndex).QuestMsg4) ``` Ok now SERVER SIDE Search: ``` Private Type NpcRec ``` Add to this type: ``` QuestNum As Long QuestLevel As Long QuestReqItem As Long QuestReqItemHowMany As Long QuestRewItem As Long QuestRewItemHowMany As Long QuestMsg1 As String * 250 QuestMsg2 As String * 250 QuestMsg3 As String * 250 QuestMsg4 As String * 250 ``` Search: ``` Public Const NPC_BEHAVIOUR_GUARD As Byte = 4 ``` Add: ``` Public Const NPC_BEHAVIOUR_QUEST As Byte = 6 ``` Find in CanAttackNPC: ``` If Npc(NpcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER Then ``` Change to this: ``` If Npc(NpcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_QUEST Then ``` You will find below: ``` CanAttackNpc = True Else ``` under this paste: ``` If Npc(NpcNum).Behaviour = NPC_BEHAVIOUR_QUEST Then If Npc(NpcNum).QuestLevel
  8. @Tyr: > [http://lmgtfy.com/?q=blank+yu+gi-oh+card](http://lmgtfy.com/?q=blank+yu+gi-oh+card) > _Try Google, it's free!_ I've got Google ban :P
  9. Hey all! I'm looking for cards Yugioh or similar. Thanks ;)
  10. Naruto sprites for Eclipe Origins ;) http://www.mediafire.com/?g72i5eh5r19b8yl
  11. Qazek

    Tilesets

    I need tiles looks like breeze tilesets but others XD Please!! :)
  12. More advanced animation editor with animation X,Y and editable separate frames More spell effects. For example: spell warp player to target x+1 and y and sub target hp with animation
  13. Ok I know! I forget paste to text boxes in frmEditor_NPC this: ``` NPC(editorindex).QN = txtQN.text ``` Topic to lock
  14. I add more variables for NPC's. NPC struct in my client and server: ``` Private Type NpcRec Name As String * NAME_LENGTH AttackSay As String * 100 Sprite As Integer SpawnSecs As Long Behaviour As Byte Range As Byte DropChance As Integer DropItem As Byte DropItemValue As Integer Stat(1 To Stats.stat_count - 1) As Byte faction As Byte HP As Long EXP As Long Animation As Long QN As Long QRL As Long QRI As Long QRHM As Long QRE As Long QRI As Long QRHM As Long QM1 As Long QM2 As Long QM3 As Long Q4 As Long End Type ``` I added to frmEditor_NPC for all text boxes. In modGameEditors in NPCEditorInit I added this: ``` .txtQN.text = Npc(EditorIndex).QN ... ``` I compiled client and server. I removed NPC's from server client. But when I save NPC and open again the same npc the variables don't saveā€¦
  15. Anyone knows what games Naruto on Eclipse engine or other but similar engine?
  16. Qazek

    Naruto graphics

    Does anyone have any naruto tilesets from DS games ?
  17. How many players online I can have got in EO ?
  18. Qazek

    [EO] Scripted NPC

    Sory but I click post instead preview XD
  19. Qazek

    [EO] Scripted NPC

    Scripted NPC for Eclipse Origins Game Client Open modConstants find: ``` Public Const NPC_BEHAVIOUR_GUARD As Byte = 4 ``` Add after: ``` Public Const NPC_BEHAVIOUR_SCRIPT As Byte = 5 ``` In frmEditor_NPC click on cmbBehaviour and add to list "Script" Server In modConstants find: ``` Public Const NPC_BEHAVIOUR_GUARD As Byte = 4 ``` Add after: ``` Public Const NPC_BEHAVIOUR_SCRIPT As Byte = 5 ``` Find in modGameLogic: ``` If Npc(NpcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER Then ``` Replace with: ``` If Npc(NpcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SCRIPT Then ``` Find this in CanAttackNPC sub: ``` If NpcX = GetPlayerX(Attacker) Then If NpcY = GetPlayerY(Attacker) Then If Npc(NpcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER Then CanAttackNpc = True Else If Len(Trim$(Npc(NpcNum).AttackSay)) > 0 Then PlayerMsg Attacker, Trim$(Npc(NpcNum).Name) & ": " & Trim$(Npc(NpcNum).AttackSay), White End If End If End If End If ``` And replace with: ``` If NpcX = GetPlayerX(Attacker) Then If NpcY = GetPlayerY(Attacker) Then If Npc(NpcNum).Behaviour NPC_BEHAVIOUR_FRIENDLY And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SHOPKEEPER And Npc(NpcNum).Behaviour NPC_BEHAVIOUR_SCRIPT Then CanAttackNpc = True Else If Npc(NpcNum).Behaviour = NPC_BEHAVIOUR_SCRIPT Then Select Case Npc(NpcNum).range Case 0 'Nothing Case 1 Call PlayerMsg(Attacker, "Hello World!!!", Red) Exit Function End Select Exit Function End If If Len(Trim$(Npc(NpcNum).AttackSay)) > 0 Then PlayerMsg Attacker, Trim$(Npc(NpcNum).Name) & ": " & Trim$(Npc(NpcNum).AttackSay), White End If End If End If End If ``` There you can add script for npc's: ``` Case 0 'Nothing Case 1 Call PlayerMsg(Attacker, "Hello World!!!", Red) Exit Function ``` NPC range is script number XD
  20. I've got problem with targeting players and npcs. When I have got a sprites sizes more than 32x64 (I have 40x70 sprites size) then i must click ~32 pixels to left of npc or player to target.
  21. How to change spell icons from 32x32 to 64x64 pixels in frmMainGame?
  22. XD How to change frmMainGame width? Ok I known. It's there: Private Sub Form_Load() picAdmin.Left = 10 picDrop.Left = txtMyChat.Left picDrop.Top = txtMyChat.Top Me.width = 10545 End Sub
  23. Qazek

    Breeze Revamp

    WOW Great! I use it in my project where I use normal breeze tiles (no andaria XD) Thanks ;)
  24. I think in EE lags problem is in sending movement packet. I think it's only to do that: When player movement > 5 steps then send movement packet and move player 5 steps in X or Y axis with player(index).Xoffset . If player movement < 5 steps then send movement packet and move player less than 5 steps in X or Y axis with player(index).Xoffset. It's my suggestion XD I don't known how to do that and I will be grateful for the creation of this tutorial XD
  25. Ok ok but I don't known - create game on 1.0.2 or wait for 1.0.3 XD
×
×
  • Create New...