From b376c7433420d59afcc36c94cab1f9cb38192ff2 Mon Sep 17 00:00:00 2001 From: Jesusaves Date: Fri, 9 Apr 2021 22:46:21 -0300 Subject: Remove magic directory (would need a reimplementation anyway) --- npc/magic/level2-arrow-hail.txt | 115 ---------------------------------------- 1 file changed, 115 deletions(-) delete mode 100755 npc/magic/level2-arrow-hail.txt (limited to 'npc/magic/level2-arrow-hail.txt') diff --git a/npc/magic/level2-arrow-hail.txt b/npc/magic/level2-arrow-hail.txt deleted file mode 100755 index 3d7525b1..00000000 --- a/npc/magic/level2-arrow-hail.txt +++ /dev/null @@ -1,115 +0,0 @@ -- script arrow-hail NPC32767,{ - // we can not start here because for the puppets this is OnClick - end; - -OnCast: - if(call("magic_checks")) end; - if (getskilllv(.school) < .level) end; - if (getskilllv(SKILL_MAGIC) < .level) end; - if (Sp < 25) end; - explode .@map_ext[0], getmapname(), "-"; - if (.@map_ext[1] != 1) end; // XXX this is fugly, in the future let's use MF_OUTSIDE to detect if a map is "outside" or "inside" - if (getmapflag(getmapname(), MF_TOWN)) end; - if (countitem("Arrow") >= 20 && countitem("SulphurPowder") >= 1) delitem "Arrow", 20; - elif (countitem("IronArrow") >= 20 && countitem("SulphurPowder") >= 1) delitem "IronArrow", 20; - else end; - delitem "SulphurPowder", 1; - Sp = Sp - 25; - set @_M_BLOCK, 1; // block casting, until the timer clears it - addtimer 5000, "Magic Timer::OnClear"; // set the new debuff - - setarray @away[0], POS_X, POS_Y, getdir(), (.range + 1), 0; - callsub S_AwayFrom; - - @nearby = 0; - foreach 1, getmapname(), @away[0] - 14, @away[1] - 14, @away[0] + 14, @away[1] + 14, - strnpcinfo(0) + "::OnNearbyNpc"; - if (@nearby) goto L_Absorb; - - callfunc "adjust_spellpower"; - set @new_npc_name$, "#" + strnpcinfo(0) + "#" + getcharid(3); // make a unique puppet name for every player - callfunc "magic_exp"; - misceffect FX_MAGIC_BLACK, strcharinfo(0); - set @spell_npc, puppet(getmapname(), POS_X, POS_Y, @new_npc_name$, 127); // clone npc => get puppet id - if (@spell_npc < 1) end; - set .max_hit, (@spellpower / 8), @spell_npc; // set .max_hit in the puppet - set .caster, getcharid(3), @spell_npc; // tell the puppet who controls it - .damage = 125, @spell_npc; - .damage_bonus = (@spellpower / 5), @spell_npc; - set .area_x, @away[0], @spell_npc; set .area_y, @away[1], @spell_npc; - donpcevent @new_npc_name$+"::OnLaunch"; // start the puppet timer and strike - initnpctimer @new_npc_name$; // start the destroy timer - end; - -S_AwayFrom: - if(@away[2] == 6 && !(iscollision(getmapname(), (@away[0] + 1), @away[1]))) // right - @away[0] = @away[0] + 1; - if(@away[2] == 4 && !(iscollision(getmapname(), @away[0], (@away[1] - 1)))) // up - @away[1] = @away[1] - 1; - if(@away[2] == 2 && !(iscollision(getmapname(), (@away[0] - 1), @away[1]))) // left - @away[0] = @away[0] - 1; - if(@away[2] == 0 && !(iscollision(getmapname(), @away[0], (@away[1] + 1)))) // down - @away[1] = @away[1] + 1; - @away[4] = @away[4] + 1; - if(@away[4] < @away[3]) goto S_AwayFrom; - return; - -L_Absorb: - message strcharinfo(0), "##3Arrow Hail : ##BA nearby arrow hail absorbs your magic!"; - end; - -OnNearbyNpc: - explode .@nearby$[0], strnpcinfo(0,@target_id), "#"; - if(.@nearby$[0] == "arrow-hail" || .@nearby$[1] == "arrow-hail") - @nearby = @nearby + 1; - end; - -OnLaunch: - if(get(Hp, .caster) < 1) destroy; // destroy if caster is missing - if(getmap(.caster) != strnpcinfo(3)) destroy; // destroy if caster left the map - .hit = .hit + 1; - if(.hit > .max_hit) destroy; - .launch = 0; - callsub S_Launch; - addnpctimer 250 + rand(50) + rand(50), strnpcinfo(0)+"::OnLaunch"; // loop until max - end; - -S_Launch: - npcareawarp .area_x - 6, .area_y - 6, .area_x + 6, .area_y + 6, 0, strnpcinfo(0); - misceffect FX_ARROW_HAIL; - .done = 0; - foreach 2, strnpcinfo(3), getnpcx(), getnpcy(), getnpcx(), getnpcy(), strnpcinfo(0) + "::OnHit", .caster; - if (get(PVP_CHANNEL, .caster) || getmapflag(getmap(.caster), MF_PVP)) - foreach 0, strnpcinfo(3), getnpcx(), getnpcy(), getnpcx(), getnpcy(), strnpcinfo(0) + "::OnHit", .caster; - if(!.done && get(POS_X, .caster) == getnpcx() && get(POS_Y, .caster) == getnpcy()) - set Hp, get(Hp, .caster) - (.damage + rand(.damage_bonus) + rand(.damage_bonus)), .caster; // injure caster - .launch = .launch + 1; - if(.launch < 3) goto S_Launch; - return; - -OnTimer30000: - debugmes "frillyar timeout! [this shouldn't happen]"; - destroy; - -OnHit: - if(get(Hp, .caster) < 1) destroy; // destroy if caster is missing - if(getmap(.caster) != strnpcinfo(3)) destroy; // destroy if caster left the map - - if(target(.caster, @target_id, 16) != 16 && .caster != @target_id) end; - if((get(BL_TYPE, @target_id) & 1) == 0) end; // either mob or pc - .@damage = .damage + rand(.damage_bonus) + rand(.damage_bonus); - if(.caster != @target_id) - .@damage = (.@damage * (100 - get(MDEF1, @target_id))) / 100; - injure .caster, @target_id, .@damage; - .done = 1; - end; - -OnInit: - .school = SKILL_MAGIC_WAR; - .range = 7; - set .invocation$, chr(MAGIC_SYMBOL) + "frillyar"; // used in npcs that refer to this spell - void call("magic_register", "OnCast"); - .level = 2; - .exp_gain = 2; - end; -} -- cgit v1.2.3-60-g2f50