diff options
author | Jesusaves <cpntb1@ymail.com> | 2021-07-07 20:34:27 -0300 |
---|---|---|
committer | Jesusaves <cpntb1@ymail.com> | 2021-07-07 20:34:27 -0300 |
commit | 9877fd4ad81120af8e63e96d5d429092014dc017 (patch) | |
tree | ec045a0535109a2e0d82e0e8155eb01ed9776452 /world/map/npc/magic/level2-rain.txt | |
parent | aedbeb335a5ec5f55d22eace389076a18241ac9a (diff) | |
download | serverdata-9877fd4ad81120af8e63e96d5d429092014dc017.tar.gz serverdata-9877fd4ad81120af8e63e96d5d429092014dc017.tar.bz2 serverdata-9877fd4ad81120af8e63e96d5d429092014dc017.tar.xz serverdata-9877fd4ad81120af8e63e96d5d429092014dc017.zip |
Remove all Legacy files
Diffstat (limited to 'world/map/npc/magic/level2-rain.txt')
-rw-r--r-- | world/map/npc/magic/level2-rain.txt | 107 |
1 files changed, 0 insertions, 107 deletions
diff --git a/world/map/npc/magic/level2-rain.txt b/world/map/npc/magic/level2-rain.txt deleted file mode 100644 index fac98690..00000000 --- a/world/map/npc/magic/level2-rain.txt +++ /dev/null @@ -1,107 +0,0 @@ --|script|rain|32767 -{ - // 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 < 17) end; - explode .@map_ext[0], getmap(), "-"; - if (.@map_ext[1] != 1 && getmap() != "099-5") end; // XXX this is fugly, in the future let's use MF_OUTSIDE to detect if a map is "outside" or "inside" - if (getmapflag(getmap(), MF_TOWN)) end; - if (getskilllv(.school) < 4 && countitem("BottleOfWater") >= 1) delitem "BottleOfWater", 1; - elif (getskilllv(.school) < 4) end; - set Sp, Sp - 17; - set @_M_BLOCK, 1; // block casting, until the timer clears it - addtimer 3000, "Magic Timer::OnClear"; // set the new debuff - - callfunc "adjust_spellpower"; - set @krad, min(.max_radius,(min(@spellpower,200)/30)+3); // kaflosh radius - - set @nearby, 0; - foreach 1, getmap(), POS_X - .max_radius, POS_Y - .max_radius, POS_X + .max_radius, POS_Y + .max_radius, - strnpcinfo(0) + "::OnNearbyNpc"; - if (@nearby) goto L_Absorb; - - set @new_npc_name$, "#" + strnpcinfo(0) + "#" + getcharid(3); // make a unique puppet name for every player - callfunc "magic_exp"; - misceffect FX_MAGIC_RAIN_CAST, strcharinfo(0); - set @spell_npc, puppet(getmap(), POS_X, POS_Y, @new_npc_name$, 127); // clone npc => get puppet id - if (@spell_npc < 1) end; - set .caster, getcharid(3), @spell_npc; // tell the puppet who controls it - set .radius, @krad, @spell_npc; // this is also used by ingrav, don't rename - set .initial_x, POS_X, @spell_npc; - set .initial_y, POS_Y, @spell_npc; - set .max, @spellpower/3, @spell_npc; - set .max_launch, min(200,@spellpower/2)/100, @spell_npc; - donpcevent @new_npc_name$+"::OnLaunch"; // start - addnpctimer 30000, @new_npc_name$+"::OnDestroy"; // this is just a failsafe in case the npc is not properly destroyed - if(isin("011-1", 85, 31, 103, 45)) goto L_Pumpkins; - end; - -L_Absorb: - message strcharinfo(0), "##3Rain : ##BA nearby raincloud absorbs your magic."; - end; - -OnNearbyNpc: - explode .@nearby$[0], strnpcinfo(0,@target_id), "#"; - if(.@nearby$[1] == "DruidTree0" || .@nearby$[1] == "DruidTree0") goto L_Tree; - if(.@nearby$[0] == "rain" || .@nearby$[1] == "rain") - set @nearby, @nearby + 1; - end; - -L_Pumpkins: - callfunc "HalloweenQuestWaterPumpkins"; - end; - -L_Tree: - set .@x, get(POS_X, @target_id); set .@y, get(POS_Y, @target_id); - if (.@x < POS_X-@krad || .@y < POS_Y-@krad || .@x > POS_X+@krad || .@y > POS_Y+@krad) end; // in max radius but not in puppet area - set @flag, 1; - callfunc "QuestTreeTrigger"; - close; - -OnLaunch: - if (!(isloggedin(.caster))) destroy; - if(get(Hp, .caster) < 1) destroy; // destroy if caster is missing - if(getmap(.caster) != strnpcinfo(3)) destroy; // destroy if caster left the map - set .count, .count + 1; - if(.count > .max) destroy; - set .launch, 0; - callsub S_Launch; - addnpctimer 400 + rand(100), strnpcinfo(0)+"::OnLaunch"; // loop until max - end; - -S_Launch: - npcareawarp .initial_x - .radius, .initial_y - .radius, .initial_x + .radius, .initial_y + .radius, 0, strnpcinfo(0); - misceffect FX_RAIN; - foreach 2, strnpcinfo(3), getnpcx()-1, getnpcy()-1, getnpcx()+1, getnpcy()+1, strnpcinfo(0) + "::OnHit", .caster; - set .launch, .launch + 1; - if(.launch < .max_launch) goto S_Launch; - return; - -OnHit: - if (!(isloggedin(.caster))) destroy; - 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 - if(get(ELTTYPE, @target_id) == ELT_FIRE) - injure .caster, @target_id, ((rand((@spellpower/15)+5)+2) * (100 - get(MDEF1, @target_id))) / 100; - end; - -OnDestroy: - debugmes "kaflosh timeout! [this shouldn't happen]"; // XXX: looks like this CAN happen with higher levels of magic, so we might want to cap max charges - destroy; - -OnInit: - set .school, SKILL_MAGIC_NATURE; - set .invocation$, chr(MAGIC_SYMBOL) + "kaflosh"; // used in npcs that refer to this spell - void call("magic_register", "OnCast"); - set .level, 2; - set .exp_gain, 1; - set .max_radius, 15; - end; -} |