npc_gvg_steward.txt

JA++的最新...很多ROSF都用这个 ] 是个不错的东西-3-

				mes "但是，为了给会员们提供方便，";
				mes "早日雇用卡普拉职员才是上策。";
				close;
			}
			if(getgdskilllv(getcharid(2),GD_KAFRACONTACT) == 0) {
				mes "[管理人"+strnpcinfo(0)+"]";
				mes "主人…不能和卡普拉总公司订立契约。";
				mes "如果不订立契约的话，";
				mes "是不能雇用卡普拉职员的。";
				next;
				mes "[管理人"+strnpcinfo(0)+"]";
				mes "要跟卡普拉总公司签订契约的话";
				mes "需要学习工会技能中的";
				mes "^ff0000和卡普拉订契约^000000。";
				close;
			}
			if(Zeny < 10000) {	//未调查
				mes "[管理人"+strnpcinfo(0)+"]";
				mes "主人！金额不足啊！";
				close;
			}
			set Zeny,Zeny-10000;
			enablenpc "AgitKafra_"+getarg(0);	//调用"AgitCode"的NPC名字合成
			setcastledata '@map$,9,1;
			mes "[管理人"+strnpcinfo(0)+"]";
			mes "成功的和卡普拉总公司订契约了";
			next;
			cutin "kafra_01",2;
			mes "[卡普拉 职员]";
			mes "您好";
			mes "我是总公司派来的卡普拉职员。";
			mes "我不会让工会的名誉沾上污点，所以我会努力的工作！";
			next;
			cutin "kafra_01",255;
			mes "[管理人"+strnpcinfo(0)+"]";
			mes "为了维持工会和卡普拉公司订立的契约";
			mes "必须每个月交付一定的Zeny。";
			mes "(未实装)";
		}
		else {
			mes "[管理人"+strnpcinfo(0)+"]";
			mes "要解雇卡普拉职员吗？";
			next;
			if(select("解雇","取消")==2) {
				mes "[管理人"+strnpcinfo(0)+"]";
				mes "明白了。";
				close;
			}
			cutin "kafra_01",2;
			mes "[卡普拉 职员]";
			mes "过去我有什么地方弄错了吗？";
			mes "今后我会加倍小心的…";
			mes "请原谅我的过错吧…";
			next;
			if(select("解雇","取消")==2) {
				mes "[卡普拉 职员]";
				mes "谢谢。";
				mes "我会竭尽全力为你们服务的！";
				close2;
				cutin "kafra_01",255;
				end;
			}
			mes "[卡普拉 职员]";
			mes "呜哇啊！被解雇了！怎么可以这样啊 ~";
			next;
			disablenpc "AgitKafra_"+getarg(0);
			setcastledata '@map$,9,0;
			cutin "kafra_01",255;
			mes "[管理人"+strnpcinfo(0)+"]";
			mes "…";
			mes "已经取消和卡普拉订立的契约了。";
		}
		return;
	}

	//进入主人房间
	function StewardRoom {
		set '@dummy,getmapxy('@map$,'@dummy,'@dummy,1);
		mes "[管理人"+strnpcinfo(0)+"]";
		mes "要到我们生产的珍贵物品的房间吗？";
		mes "那里是只允许主人进入的房间。";
		next;
		if(select("进入主人房间","取消")==1) {
			mes "[管理人"+strnpcinfo(0)+"]";
			mes "我将为您服务到秘密通道那里，请跟我来。";
			mes "回来的时候，按下秘密开关即可。";
			close2;
			warp '@map$,getarg(1),getarg(2);
			end;
		}
		mes "[管理人"+strnpcinfo(0)+"]";
		mes "生产品一天只生产一次";
		mes "生产品储存到上限时就不会继续增加了。";
		mes "为了工会的发展，";
		mes "应该尽量花点时间去收取啊。";
		return;
	}

	//让出秘密基地
	function StewardGiveup {
		set '@dummy,getmapxy('@map$,'@dummy,'@dummy,1);
		mes "[管理人"+strnpcinfo(0)+"]";	//未调查？
		mes "主人！";
		mes "真的要让出秘密基地吗！？";
		mes " ";
		mes "请重新考虑吧，主人！";
		next;
		if(select("让出秘密基地","取消")==1) {
			mes "[管理人"+strnpcinfo(0)+"]";
			mes "主人！";
			mes "请重新考虑一遍吧…";
			mes "请三思而后行啊!!!!!!!!";
			next;
			if(select("取消","让出秘密基地")==2) {
				mes "[管理人"+strnpcinfo(0)+"]";
				mes "主人!!…";
				mes "…不……要……啊……";
				close2;
				announce "秘密基地 [" +getcastlename('@map$)+ "] 被 [" +getguildname(getcharid(2))+ "] 工会让出了。",0;
				callfunc "AgitGiveUp",getarg(0);	//让出秘密基地处理(npc_gvg_exe.txt)
				end;
			}
		}
		mes "[管理人"+strnpcinfo(0)+"]";
		mes "主人^^!";
		mes "拜托了，即使是开玩笑，请下一次不要再讲这种笑话^^.";
		return;
	}

	//主菜单main
	StewardSpeech;
	switch (select("查看秘密基地状况","投资商业发展度","投资防御度","设置监护人","雇用 / 解雇 卡普拉职员","进入主人房间","让出秘密基地")) {
		case 1:
			StewardConf;
			close;
		case 2:
			StewardEco;
			close;
		case 3:
			StewardDef;
			close;
		case 4:
			StewardGuard getarg(0);
			close;
		case 5:
			StewardKafra getarg(0);
			close;
		case 6:
			StewardRoom 0,getarg(1),getarg(2);
			close;
		case 7:
			StewardGiveup getarg(0);
			close;
	}
	return;
}


//==========================================
// 露依纳
//------------------------------------------
aldeg_cas01.gat,218,175,0	script	尔普磊嘟	55,{
	callfunc "StewardMain","L1",113,223;
	end;
}

aldeg_cas02.gat,78,74,0		script	简简丽	55,{
	callfunc "StewardMain","L2",134,225;
	end;
}

aldeg_cas03.gat,110,118,0	script	喃匝扑	55,{
	callfunc "StewardMain","L3",219,268;
	end;
}

aldeg_cas04.gat,67,116,0	script	ウィリオット	55,{
	callfunc "StewardMain","L4",79,14;
	end;
}

aldeg_cas05.gat,51,179,0	script	怖淋亥申	55,{
	callfunc "StewardMain","L5",68,13;
	end;
}

//==========================================
// 咘哩妥利亚
//------------------------------------------
gefg_cas01.gat,40,48,5		script	格讷合哲	55,{
	callfunc "StewardMain","B1",151,109;
	end;
}

gefg_cas02.gat,12,66,0		script	爱斯马乐克	55,{
	callfunc "StewardMain","B2",137,113;
	end;
}

gefg_cas03.gat,106,23,3		script	张	55,{
	callfunc "StewardMain","B3",267,287;
	end;
}

gefg_cas04.gat,73,46,3		script	戈巴尼	55,{
	callfunc "StewardMain","B4",113,115;
	end;
}

gefg_cas05.gat,70,52,3		script	毕欧乐	55,{
	callfunc "StewardMain","B5",141,107;
	end;
}

//==========================================
// 青林湖泊
//------------------------------------------
payg_cas01.gat,120,58,4		script	克卢纳帝	55,{
	callfunc "StewardMain","C1",287,5;
	end;
}

payg_cas02.gat,22,260,7		script	蔡丽欧丝	55,{
	callfunc "StewardMain","C2",141,141;
	end;
}

payg_cas03.gat,50,261,3		script	凯利娥	55,{
	callfunc "StewardMain","C3",155,165;
	end;
}

payg_cas04.gat,38,284,3		script	第洁依	55,{
	callfunc "StewardMain","C4",143,45;
	end;
}

payg_cas05.gat,277,249,3	script	纳加布	55,{
	callfunc "StewardMain","C5",153,129;
	end;
}

//==========================================
// 巴基力雷恩
//------------------------------------------
prtg_cas01.gat,112,181,0	script	阿傅莱依	55,{
	callfunc "StewardMain","V1",7,205;
	end;
}

prtg_cas02.gat,94,61,4		script	蕾	55,{
	callfunc "StewardMain","V2",199,225;
	end;
}

prtg_cas03.gat,51,100,4		script	ステッキ	55,{
	callfunc "StewardMain","V3",185,129;
	end;
}

prtg_cas04.gat,259,265,4	script	斑得磊的	55,{
	callfunc "StewardMain","V4",267,159;
	end;
}

prtg_cas05.gat,36,37,4		script	蕾伊呢	55,{
	callfunc "StewardMain","V5",273,175;
	end;
}