作者laechan (小太保)
看板mud_sanc
标题[技能] 魔法阵
时间Thu Mar 25 10:32:23 2010
// 旧技能已备份为 /d/spell/magic-cycle.20100325
// Laechan@Sanc written in 2010/03/25
inherit __DIR__+"spell_d.c";
// 非 return 1 可截断 start_effect 呼叫
// (例如 return 2)
int start_skill(object tar,int lv)
{
object ppl=this_player();
int skill;
// wiz 可略过底下判断
if(!wizardp(ppl))
{
if((string)ppl->query("pri_guild")!="mage")
{
write("只有主职魔法师才能施展魔法阵喔.\n");
return 0;
}
// 这里可加上 runes 限制
if(!ppl->query_temp("magic heart"))
{
write("施展魔法阵之前必须先施展 magic heart 喔.\n");
return 0;
}
if(ppl->query_temp("flying"))
{
write("施展魔法阵之前必须先 land 喔(漂浮在半空中无法使用).\n");
return 0;
}
}
// 保险起见增设的限制
if(ppl->query_temp("casting"))
{
write("你正在施法当中, 没空施展其它法术喔.\n");
return 0;
}
skill=ppl->query("skill/magic-cycle");
switch(lv)
{
// 全属性增幅魔法阵, 可跟其它魔法阵共存
case 1:
skill=skill/200;
ppl->add_temp("casting",6-skill); // Lv10 时剩 1 秒
call_out("add_all_stat",5,ppl,environment(ppl),skill);
return 2; // = return 0; 但有 call_out 不能有 return 0;
break;
default:
write("这个级数的魔法阵功能未实装喔.\n");
return 0;
break;
}
}
int add_all_stat(object ppl,object env,lv)
{
mixed obs;
object ob;
int sp;
if(!ppl) return 1;
if(!env)
{
ppl->delete_temp("casting");
return 1;
}
// 玩家已离开施展地点时取消施展
if(env!=environment(ppl))
{
ppl->delete_temp("casting");
return 1;
}
sp=ppl->query("sp_src");
ppl->add("sp",-(sp/10)); // 消耗 1/10 的 sp
if(ppl->query("sp")<1)
ppl->set("sp",1);
obs=all_inventory(env);
obs-=({ppl}); // 施展者自己不加
foreach(ppl in obs)
{
if(!ppl) continue;
if(!userp(ppl)) continue;
// 不加 con 其它都加
ppl->temp_several_same_mod(({"stat/air","stat/str","stat/fel",
"stat/mag","stat/dex","stat/int"}),
lv*lv,"magic-cycle",lv);
}
return 1;
}
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.225.161.19
1F：→ laechan :待会有事, 先 coding 到这 03/25 10:32
2F：→ laechan :_cast.c 已针对 return 2 的部份做相对应修改 03/25 10:32
3F：→ laechan :修改位置在第 315~353 行 03/25 10:53