lepom0102

compatible with EO2.0 / 2.3 we already have skill warp map, and now I will guide you to make 1 new skills warp to the location installed **open Server** **find modConstants** **find code this:** ``` Public Const SPELL_TYPE_WARP As Byte = 4 ``` **and under it added this code** ``` Public Const SPELL_TYPE_WARP_TO As Byte = 5 ``` **find modCombat** **find sub "CastSpell" and find code this** ``` 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 ``` **and under it added this code** ``` Case SPELL_TYPE_WARP_TO 'warp to Select Case Player(Index).Dir Case DIR_UP '*** x = Player(Index).x y = Player(Index).y - Spell(Spellnum).AoE PlayerWarp Index, GetPlayerMap(Index), x, y DidCast = True Case DIR_DOWN '*** x = Player(Index).x y = Player(Index).y + Spell(Spellnum).AoE PlayerWarp Index, GetPlayerMap(Index), x, y DidCast = True Case DIR_LEFT '*** x = Player(Index).x - Spell(Spellnum).AoE y = Player(Index).y PlayerWarp Index, GetPlayerMap(Index), x, y DidCast = True Case DIR_RIGHT '*** x = Player(Index).x + Spell(Spellnum).AoE y = Player(Index).y PlayerWarp Index, GetPlayerMap(Index), x, y DidCast = True End Select ``` **ok, now open Client** **find modConstants and find code this:** ``` Public Const SPELL_TYPE_WARP As Byte = 4 ``` **and under it added this code** ``` Public Const SPELL_TYPE_WARP_TO As Byte = 5 ``` **open "frmEditor_Spell" and find object "cmbType"** **in "list" at the bottom add the word "Warp To" similar image below** https://www.dropbox.com/s/zpd4ctcovt622yf/Untitled-2.jpg?dl=0 **END** ok, now you set 1 new skill, choose "Warp To" and set the sphere of influence "AoE" greater than 0, as image below https://www.dropbox.com/s/tlid5g4j073fhgv/Untitled-3.jpg?dl=0 players can now jump to the location have been set if using this skill,good luck

for those with npc spell system 2.0 open Server find ModCombat find NpcSpellPlayer and replace ``` Sub NpcSpellPlayer(ByVal mapNpcNum As Long, ByVal Victim As Long, SpellSlotNum As Long) Dim Mapnum As Long Dim i As Long, j As Long Dim n As Long Dim spellnum As Long Dim Buffer As clsBuffer Dim InitDamage As Long Dim Damage As Long Dim MaxHeals As Long ' Check for subscript out of range If mapNpcNum MAX_MAP_NPCS Or IsPlaying(Victim) = False Then Exit Sub End If ' Check for subscript out of range If MapNpc(GetPlayerMap(Victim)).NPC(mapNpcNum).Num 0, type hp and mp is heal for npc, damage hp and mp is for players, you can also adjust the time to stun players. good luck ```