/open/cmds/war/laechan/test1 -> test1.c
以 war read test1 指令产生。
#define MOB ([\
"dragon":HUMAN_MOB+"dragon",\
"lionorc":HUMAN_MOB+"lionorc",\
"orc_1":HUMAN_MOB+"orc_1",\
"orc_2":HUMAN_MOB+"orc_2",\
"orc_3":HUMAN_MOB+"orc_3",\
"orc_leader1":HUMAN_MOB+"orc_leader1",\
"orc_leader2":HUMAN_MOB+"orc_leader2",\
"orc_leader3":HUMAN_MOB+"orc_leader3",\
"nola":HUMAN_MOB+"nola",\
"mamo":HUMAN_MOB+"mamo",\
"balan":HUMAN_MOB+"balan",\
])
#define STONE "/d/stone/room/la13e4.c"
#define FELID "/u/l/laechan/special/room/felid_war.c"
#include "/d/map/isalon/path.h"
#include "../war.h"
inherit WAR_SAMPLE;
void create()
{
::create();
seteuid(getuid(this_object()));
war_data=([]);
war_data["title"]="罗德斯教廷战争";
war_data["date"]="2017/02/07";
war_data["steps"]=11;
war_data["1"]=([]);
war_data["2"]=([]);
war_data["3"]=([]);
war_data["4"]=([]);
war_data["5"]=([]);
war_data["6"]=([]);
war_data["7"]=([]);
war_data["8"]=([]);
war_data["9"]=([]);
war_data["10"]=([]);
war_data["11"]=([]);
war_data["1"]["times"]=0;
war_data["2"]["times"]=10;
war_data["3"]["times"]=10;
war_data["4"]["times"]=20;
war_data["5"]["times"]=15;
war_data["6"]["times"]=15;
war_data["7"]["times"]=15;
war_data["8"]["times"]=15;
war_data["9"]["times"]=60;
war_data["10"]["times"]=3;
war_data["11"]["times"]=3;
}
int step1_plans()
{
war_msg(HIR"西方的兽人大陆在亚斯德死后突然骚动起来...\n"+
"各路魔兽军团长纷纷赶回兽魔殿....一桩可怕的阴谋正酝酿着！\n"NOR);
return 1;
}
int step2_plans()
{
war_msg(HIR"血魔大帝：那个该死的贤者终于死了！大家报仇的时间到了！\n"+
HIM"军团长-巴蓝：大帝，请允许\属下率兵当先锋！杀他个措手不及！\n"+
"军团长-玛莫：大帝，让我带着精悍的魔龙军团烧光人类的大陆吧！\n"+
"军团长-诺拉：让我来！我的兽战骑军团要踩平人类大陆！\n"+
HIR"哈哈哈～～～该死的人类～～～等著瞧吧！！\n"NOR);
war_mob(({
({"orc_leader3",1,"orc_3",3}),"/d/ppl/map/n5e5",
({"orc_leader3",1,"orc_3",3}),"/d/ppl/map/n5e6",
({"orc_leader3",1,"orc_3",3}),"/d/ppl/map/n5e7",
({"orc_leader3",1,"orc_3",3}),"/d/ppl/map/n5e8",
({"orc_leader3",1,"orc_3",3}),"/d/ppl/map/n5e9",
}));
return 1;
}
int step3_plans()
{
war_msg(HIR"巴蓝，诺拉听令！两人为主力部队，由海路进攻～即刻启程！\n"+
"玛莫听令！你带魔龙军团直攻圣殿教廷！\n"+
HIM"众人：大帝，属下听令！\n"NOR);
war_mob(({
({"orc_leader1",1,"orc_1",3,"lionorc",4}),"/d/ppl/map/n5e7",
({"orc_leader1",1,"orc_1",3,"lionorc",4}),"/d/map/lodoos/room/s-1-1",
({"orc_1",3,"lionorc",4}),"/d/map/lodoos/room/br-2",
({"orc_1",3,"lionorc",4}),"/d/map/lodoos/room/sward1",
}));
return 1;
}
int step4_plans()
{
war_msg(HIY"报～～～～～～～～ [一阵快马急报惊动了教廷上下]\n"+
"兽人军团分海陆两路进兵兰卡大陆了！！！\n"+
HIC"教皇：别慌, 通知各守军紧急备战，叫罗宾来见我！\n"+
HIY"报～～～～～～～～～～\n"+
"魔龙军团飞越海岸朝教廷直进了！\n"+
HIC"教皇：叫所有人准备应战！\n"NOR);
war_mob(({
({"orc_leader2",1,"orc_2",3,"dragon",4}),"/d/map/lodoos/room/ws-1",
({"orc_leader2",1,"orc_2",3,"dragon",4}),"/d/map/lodoos/room/ws-2",
({"orc_leader2",1,"orc_2",3,"dragon",4}),"/d/map/isalon/1-6",
({"balan",1,"orc_3",3}),"/d/ppl/map/n5e6",
}));
return 1;
}
int step5_plans()
{
war_msg(HIC"教皇：罗宾！魔兽军团再度入侵！你看如何？\n"+
HIW"罗宾：教皇，属下必率领剑士团死守教廷！\n"+
HIW"罗宾：属下会招即各方正义之师联手抗敌！\n"NOR);
war_mob(({
({"orc_leader2",1,"orc_2",3,"dragon",4}),HUMAN_ROOM+"1-7",
({"mamo",1,"orc_2",3,"dragon",4}),HUMAN_ROOM+"1-6",
}));
return 1;
}
int step6_plans()
{
war_msg(HIG"嘿嘿嘿嘿嘿～～～～[邪恶笑声笼罩兰卡大陆]\n"+
"来吧！拿起你的武器！对抗邪恶的兽人吧！[ 罗宾急呼著 ]\n"+
"整个世界就靠我们一起扫平邪恶的兽人，为教皇效命吧！！"+
" [ 罗宾急呼著 ]\n"+
"一场大战即将展开！！\n"NOR);
war_mob(({
({"nola",1,"orc_1",3,"lionorc",4}),"/d/map/lodoos/room/field-2",
({"orc_leader1",1,"orc_1",3,"lionorc",4}),
"/d/map/lodoos/room/field-3",
}));
return 1;
}
int step7_plans()
{
war_msg(HIR"石化国－外交大臣法兰说道：陛下！我们报仇的机会来了！\n"+NOR+
HIR"石化国－外交大臣法兰说道：血魔大帝送来了共同攻击的协议书，"+
"要求我国帮忙助战，以彻底毁灭小贱龙的国度！\n"+NOR);
STONE->wellie_groups("/d/map/lodoos/room/s-1-1");
STONE->man_groups("/d/map/lodoos/room/s-1-1");
STONE->fralan_groups("/d/ppl/map/n5e7");
STONE->man_groups("/d/ppl/map/n5e7");
STONE->yami_groups("/d/map/lodoos/room/field-3");
STONE->man_groups("/d/map/lodoos/room/field-3");
return 1;
}
int step8_plans()
{
war_msg(HIG"一向与罗德斯教庭不合的菲里德王国，也南下大举进兵罗德斯！\n"+NOR+
HIG"菲里德国王道：根据协议书的内容，约定三面进兵一举攻下敌人的城池！\n"+NOR+
HIR"菲里德南征军最高指挥官说道：陛下！此事就交给我吧！我必不负所托！\n"+NOR+
HIR"菲里德国王道：如此甚好！快快派我国精锐的坦克部队前往！\n"+NOR);
FELID->felid_help_lodoos_war();
return 1;
}
int step9_check()
{
if(mob_alive("balan") || mob_alive("mamo") || mob_alive("nola"))
{
war_msg(({
HIC"罗宾公爵大呼：同胞们!!拿出你的勇气来，抵抗那邪恶的兽人吧！\n"NOR,
HIY"罗宾公爵率领剑士团，奋勇抵挡兽人的侵袭!!\n"NOR,
HIW"教皇：罗宾，依你看此战是吉是凶！？\n"+
"罗宾公爵：属下不敢轻易断言?I\n"NOR,
HIW"教皇：我唐云剑龙谨代表全体人类向各位英雄致意，"+
"此战关乎人类气数，丝毫大意不得！\n"NOR,
HIR"血魔大帝：我族英勇的战士们，让人类知道我们的厉害吧！哈哈哈～\n"NOR,
HIR"血魔大帝：哈哈哈～尽情的杀戮人类吧!!"+
"让人类的鲜血来洗刷我们的仇恨!!\n"NOR,
HIW"教皇：唉～真是生灵涂炭呀！罗宾你尽力而为吧！\n罗宾公爵：是！\n"NOR,
}));
return 2;
}
return 1;
}
> update test1
/open/cmds/war/laechan/test1: 更新及加载了.
下午会对 war_sample.c 里头的 war_msg 及 war_mob 函数稍微写个
雏形架构，然后做一些测试。那么，因为每个脚本物件档都是独立的
，因此我会预留 wiz 就算不以 times_check 来套用，也能自己写出
战争流控，例如使用 heart_beat 或 call_out 型式，不过这个nobu
不建议，使用这两个形式时，应该是以测试为主要目的，正式开放时
还是应该套用 times_check。
Laechan