📄 ev_agit_common.txt

📁 JA++的最新...很多ROSF都用这个 ] 是个不错的东西-3-
💻 TXT
📖 第 1 页 / 共 2 页
字号:
上一页 12
	next;
	menu "对商业发展度投资",L2_1_1,"取消",L2_1_0;
	L2_1_0:
		mes "[管理人"+getarg(1)+"]";
		mes "我明白了。";
		mes "不需要太着急的。";
		mes "有什么要求可以随时告诉我。";
		close;
	L2_1_1:
		if(Zeny < @InvestE) goto L2_error;
		set Zeny,Zeny-@InvestE;
		setcastledata getarg(0),4,@TriggerE+1;
		mes "[管理人"+getarg(1)+"]";
		mes "顺利地完成投资了！";
		mes "今后的日子将会越来越快乐。";
		mes "从明天开始发展度会上升的。";
		close;
L2_error:/*金钱不足*/
	mes "[管理人"+getarg(1)+"]";
	mes "主人！";
	mes "没有足够的金额进行投资。";
	mes "投资被迫取消了。";
	close;
L2_error2:/*投资度已满*/
	mes "[管理人"+getarg(1)+"]";
	mes "^ff0000现在的发展度已经是最大值了。";
	mes "^000000所以不需要再投资了。";
 	close;
	return;
}

//-------------------------------------------------------
//管理人菜单ー３「投资防御度」(完全) 台词2004/08/25jRO
//callfunc "Steward_menu3","MAP","NAME";
function	script	Steward_menu3	{
	mes "[管理人"+getarg(1)+"]";
	mes "提高防御力的话";
	mes "监护人和华丽金属的耐久度会增加。";
	mes "考虑到以后的战争";
	mes "加强防御度才是上策。";
	next;
	mes "[管理人"+getarg(1)+"]";
	mes "照原先的方式，一天只能投资一次";
	mes "假如多付一点金钱的话";
	mes "一天可以投资两次。";
	next;
	set @TriggerD,getcastledata(getarg(0),5);
	set @Deffence,getcastledata(getarg(0),3);
	if(@Deffence == 100) goto L3_error2;
	set @tmp,(@Deffence-@TriggerD)/5;
	set @InvestD,10000*(1+(1+@tmp)*@tmp/2)*(1+3*@TriggerD);
	if (@TriggerD == 0) goto L3_1;
	if (@TriggerD == 1) goto L3_2;
		mes "[管理人"+getarg(1)+"]";
		mes "^ff0000可是你已经在今天之内投资了两次";
		mes "再不能投资了。";
		mes "^000000期待防御度的加强。";
		close;
L3_1:
	mes "[管理人"+getarg(1)+"]";
	mes "现在需要的投资金额是^ff0000"+ @InvestD +"^000000 Zeny";
	mes "请问您要投资吗？";
	next;
	menu "对防御度投资",L3_1_1,"取消",L3_1_0;
L3_2:
	mes "[管理人"+getarg(1)+"]";
	mes "现在您已经投资了一次";
	mes "还要再投资吗？";
	mes "需要花费 ^ff0000"+ @InvestD +"^000000 Zeny";
	next;
	menu "对防御度投资",L3_1_1,"取消",L3_1_0;
	L3_1_0:
		mes "[管理人"+getarg(1)+"]";
		mes "我明白了。";
		mes "不需要太着急的。";
		mes "有什么要求可以随时告诉我。";
		close;
	L3_1_1:
		if(Zeny < @InvestD) goto L3_error;
		set Zeny,Zeny-@InvestD;
		setcastledata getarg(0),5,@TriggerD+1;
		mes "[管理人"+getarg(1)+"]";
		mes "顺利地完成投资了！";
		mes "今后的日子将会越来越快乐。";
		mes "从明天开始防御度会上升的。";
		close;
L3_error:/*金钱不足*/
	mes "[管理人"+getarg(1)+"]";
	mes "主人！";
	mes "没有足够的金额进行投资。";
	mes "投资被迫取消了。";
	close;
L3_error2:/*投资度已满*/
	mes "[管理人"+getarg(1)+"]";
	mes "^ff0000现在防御度已经是100%了。";
	mes "^000000所以不需要再投资了。";
	close;
	return;
}
//-------------------------------------------------------
//管理人菜单ー４「设置监护人」(补助)
//callfunc "Steward_menu4","MAP","NAME";
function	script	Steward_menu4	{
	mes "[管理人"+getarg(1)+"]";
	mes "请问要设置监护人吗？";
	mes "监护人即将成为";
	mes "我们秘密基地的忠诚守护者。";
	mes "请选择要设置的监护人。";
	next;
	menu	"监护人 1",L4_1,
		"监护人 2",L4_2,
		"监护人 3",L4_3,
		"监护人 4",L4_4,
		"监护人 5",L4_5,
		"监护人 6",L4_6,
		"监护人 7",L4_7,
		"监护人 8",L4_8;

//实际的Menu(参考B5)
//menu "弓箭手 监护人 - 未设置",L_MENU_1,"弓箭手 监护人 - 未设置",L_MENU_2,"士兵 监护人 - 未设置",L_MENU_3,"士兵 监护人 - 未设置",L_MENU_4,"骑士 监护人 - 未设置",L_MENU_5,"士兵 监护人 - 未设置",L_MENU_6,"骑士 监护人 - 未设置",L_MENU_7,"首领 监护人 - 未设置 (31214 / 31214)",L_MENU_8;
//
//設置できるか出来ないかの表示と、居た場合HPが表示される。
//また、居た場合でも設置動作可能であり、その場合HPを回復させることが出来る。
		L4_1:
			if (getcastledata(getarg(0),10) == 1) goto L4Error2;
			set @GDnum,10;goto L4_9;
		L4_2:
			if (getcastledata(getarg(0),11) == 1) goto L4Error2;
			set @GDnum,11;goto L4_9;
		L4_3:
			if (getcastledata(getarg(0),12) == 1) goto L4Error2;
			set @GDnum,12;goto L4_9;
		L4_4:
			if (getcastledata(getarg(0),13) == 1) goto L4Error2;
			set @GDnum,13;goto L4_9;
		L4_5:
			if (getcastledata(getarg(0),14) == 1) goto L4Error2;
			set @GDnum,14;goto L4_9;
		L4_6:
			if (getcastledata(getarg(0),15) == 1) goto L4Error2;
			set @GDnum,15;goto L4_9;
		L4_7:
			if (getcastledata(getarg(0),16) == 1) goto L4Error2;
			set @GDnum,16;goto L4_9;
		L4_8:
			if (getcastledata(getarg(0),17) == 1) goto L4Error2;
			set @GDnum,17;goto L4_9;
L4Error:
	mes "[管理人"+getarg(1)+"]";
	mes "主人…有关设置监护人的研究知识";
	mes "我们全然不知唷。";
	mes "想要累积设置监护人知识的话";
	mes "必须要学习工会技能中的。";
	mes "^ff0000监护人制作研究";
	close;
L4Error2:/*已经设置了监护人*/
	mes "[管理人"+getarg(1)+"]";
	mes "主人！";
	mes "那里已经设置监护人了。";
	mes " ";
	mes "设置监护人被迫取消了。";
	close;
L4Error3:/*金钱不足*/
	mes "[管理人"+getarg(1)+"]";
	mes "主人！";
	mes "没有足够的金额进行投资。";
	mes "投资被迫取消了。";
	close;
	L4_9:
		mes "[管理人"+getarg(1)+"]";
		mes "确定要设置已选择的监护人吗？";
		mes "设置时需要^ff0000 10000 ^000000Zeny";
		next;
		menu "设置",L4_9_1,"取消",-;
			mes "[管理人"+getarg(1)+"]";
			mes "明白了。";
			mes "假如有点资金上宽裕的话";
			mes "设置监护人才是上策。";
			close;
		L4_9_1:
		if (getgdskilllv(@GID,GD_GUARDIANRESEARCH) == 0) goto L4Error;
		if (Zeny < 10000) goto L4Error3;
		set Zeny,Zeny-10000;
		setcastledata getarg(0),@GDnum,1;
	return;
}
//-------------------------------------------------------
//管理人菜单ー５「和卡普拉订契约」(完全)
//callfunc "Steward_menu5","MAP","NAME","Kapra_xxx";
function	script	Steward_menu5	{
	if (getcastledata(getarg(0),9) == 1) goto Lkafra_dimi;
//(When Karfa off) Employment
	mes "[管理人"+getarg(1)+"]";
	mes "和卡普拉总公司订契约后，";
	mes "要在秘密基地里面，雇用卡普拉职员吗？";
	mes "雇用时需要^ff0000 10000 ^000000Zeny…";
	next;
	menu "雇用",-,"取消",L_k_e;
		if (getgdskilllv(@GID,GD_KAFRACONTACT) != 0) goto L_k_0;
		mes "[管理人"+getarg(1)+"]";
		mes "主人…不能和卡普拉总公司订立契约。";
		mes "如果不订立契约的话，";
		mes "是不能雇用卡普拉职员的。";
		next;
		mes "[管理人"+getarg(1)+"]";
		mes "要跟卡普拉总公司签订契约的话";
		mes "需要学习工会技能中的";
		mes "^ff0000和卡普拉订契约^000000。";
		close;
	L_k_0:/*金钱不足*/
		if (Zeny > 10000) goto L_k_1;
		mes "[管理人"+getarg(1)+"]";
		mes "主人！金额不足啊！";
		close;
	L_k_1:/*成功订立契约*/
		set Zeny,Zeny-10000;
		enablenpc getarg(2);
		setcastledata getarg(0),9,1;
		mes "[管理人"+getarg(1)+"]";
		mes "成功的和卡普拉总公司订契约了";
		next;
		cutin "kafra_01",2;
		mes "[卡普拉 职员]";
		mes "您好";
		mes "我是总公司派来的卡普拉职员。";
		mes "我不会让工会的名誉沾上污点，所以我会努力的工作！";
		next;
		cutin "kafra_01",255;
		mes "[管理人"+getarg(1)+"]";
		mes "为了维持工会和卡普拉公司订立的契约";
		mes "必须每个月交付一定的Zeny。";
		mes "(未实装)";
		close;
L_k_e:
		mes "[管理人"+getarg(1)+"]";
		mes "明白了。";
		mes "但是，为了给会员们提供方便，";
		mes "早日雇用卡普拉职员才是上策。";
		close;
//(When karfa ON) Dismissal
Lkafra_dimi:
	mes "[管理人"+getarg(1)+"]";
	mes "要解雇卡普拉职员吗？";
	next;
	menu "解雇",-,"取消",L_D_1;
		cutin "kafra_01",2;
		mes "[卡普拉 职员]";
		mes "过去我有什么地方弄错了吗？";
		mes "今后我会加倍小心的…";
		mes "请原谅我的过错吧…";
		next;
		menu "解雇",-,"取消",L_D_2;
				mes "[卡普拉 职员]";
				mes "呜哇啊！被解雇了！怎么可以这样啊 ~";
				next;
				disablenpc getarg(2);
				setcastledata getarg(0),9,0;
				cutin "kafra_01",255;
				mes "[管理人"+getarg(1)+"]";
				mes "…";
				mes "已经取消和卡普拉订立的契约了。";
				close;
			L_D_2:
				mes "[卡普拉 职员]";
				mes "谢谢。";
				mes "我会竭尽全力为你们服务的！";
				close2;
				cutin "kafra_01",255;
				end;
		L_D_1:
			mes "[管理人"+getarg(1)+"]";
			mes "明白了。";
			close;
	return;
}
//-------------------------------------------------------
//管理人菜单ー6「进入主人房间」(完全) 台词2004/08/25jRO
//callfunc "Steward_menu6","MAP","Name",x,y;
function	script	Steward_menu6	{
	mes "[管理人"+getarg(1)+"]";
	mes "要到我们生产的珍贵物品的房间吗？";
	mes "那里是只允许主人进入的房间。";
	next;
	menu "进入主人房间",-,"取消",L6_1;
		mes "[管理人"+getarg(1)+"]";
		mes "我将为您服务到秘密通道那里，请跟我来。";
		mes "回来的时候，按下秘密开关即可。";
		close2;
		warp getarg(0),getarg(2),getarg(3);
		end;
	L6_1:
		mes "[管理人"+getarg(1)+"]";
		mes "生产品一天只生产一次";
		mes "生产品储存到上限时就不会继续增加了。";
		mes "为了工会的发展，";
		mes "应该尽量花点时间去收取啊。";
		close;
		return;
}
//-------------------------------------------------------
//管理人菜单ー7「让出秘密基地」(补助)
//callfunc "Steward_menu7","MAP","NAME";
function	script	Steward_menu7	{

	mes "[管理人"+getarg(1)+"]";
	mes "主人！";
	mes "真的要让出秘密基地吗！？";
	mes " ";
	mes "请重新考虑吧，主人！";
	next;

	menu "让出秘密基地",L7_1,"取消",L7_2;

L7_1:
	mes "[管理人"+getarg(1)+"]";
	mes "主人！";
	mes "请重新考虑一遍吧…";
	mes "请三思而后行啊!!!!!!!!";
	next;

	menu "取消",L7_2,"让出秘密基地",-;

	mes "[管理人"+getarg(1)+"]";
	mes "主人!!…";
	mes "…不……要……啊……";
	next;
	return;

L7_2:
	mes "[管理人"+getarg(1)+"]";
	mes "主人^^!";
	mes "拜托了，即使是开玩笑，请下一次不要再讲这种笑话^^.";
	close;
}
//-------------------------------------------------------
//工会开关
//callfunc "gdswitch","MAP",x,y;
function	script	gdswitch	{
	mes "有小控制杆。";
	mes "要拉下吗？";
	next;
	menu "拉",-,"不拉",L2;
	warp getarg(0),getarg(1),getarg(2);
	end;
L2:
	close;
	return;
}
//-------------------------------------------------------
//工会开关
//callfunc "gdswitch2","MAP1","MAP2",x,y;
function	script	gdswitch2	{
	mes "[声音]";
	mes "通过考验成为勇气的主人…再去寻找其它考验的路";
	next;
	mes " ";
	mes "有小控制杆。";
	mes "要拉下吗？";
	next;
	menu "拉",-,"不拉",L2;
	set @GID,getcastledata(getarg(0),1);
	if (getcharid(2) != @GID) goto L1n;
	if (0 == @GID) goto L1n;
	warp getarg(1),getarg(2),getarg(3);
	end;
L1n:
	mes " ";
	mes "没有发生任何事情。";
L2:
	close;
	return;
}
//==============================================================================
//-------------------------------------------------------
//卡普拉「菜单」
//callfunc "gkfmenu","MAP";
function	script	gkfmenu	{
	cutin "kafra_01",2;
	set @GID,getcastledata(getarg(0),1);
	if (getcharid(2) == @GID) goto LStartg;
	mes "[卡普拉 职员]";
	mes "我已签订契约专为";
	mes "^ff0000" + getguildname(@GID) + "^000000工会的会员服务。";
	mes "请使用我们其它地方的卡普拉职员，";
	mes "如有不便之处敬请见谅。";
	close2;
	cutin "kafra_01",255;
	end;
LStartg:
	mes "[卡普拉 职员]";
	mes "欢迎光临^ff0000" + getguildname(@GID) + "^000000工会的会员";
	mes "卡普拉服务(有限公司)，永远在各位身边为您服务。";
	next;
	return;
}
//-------------------------------------------------------
//卡普拉「空间移动服务」
//callfunc "gkfwarp","JMAPNAME","MAP",x,y;
function	script	gkfwarp	{
	mes "[卡普拉 职员]";
	mes "请选择目的地吧。";
	next;
	menu ""+getarg(0)+" -> 200 z",L3_1,"取消",L3_2;
		L3_1:
			if (Zeny < 200) goto Lerror3;
			set Zeny,Zeny-200;set KF_PIT,KF_PIT+20;
			warp getarg(1),getarg(2),getarg(3);
			end;
		L3_2:
				mes "[卡普拉 职员]";
				mes "谢谢。";
				mes "欢迎再次使用。";
				close2;
				cutin "kafra_01",255;
				end;
		Lerror3:
				mes "[卡普拉 职员]";
				mes "会员先生/小姐";
				mes "您所持金额不足，请重新确认。";
				cutin "kafra_01",255;
				close2;
				cutin "kafra_01",255;
				end;
	return;
}
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -