aldeg_cas02.txt

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

//===================================================================
//Ragnarok Online EP2.5 GVG Script	aldeg_cas02         by kalen
// 汉化和修正 : FPE
// Jathena++ 论坛：http://www.foxofice.net/bbs
//===================================================================
-	script	gfaldeB	722,{
	callfunc "flagsc","aldeg_cas02.gat",1,0,0,0;
OnRecvCastleA02:
	flagemblem getcastledata("aldeg_cas02.gat",1);
	end;
}
aldeg_cas02.gat,82,71,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-1	722,{
aldeg_cas02.gat,67,30,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-2	722,{
aldeg_cas02.gat,183,140,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-3	722,{
aldeg_cas02.gat,212,152,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-4	722,{
aldeg_cas02.gat,108,39,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-5	722,{
aldeg_cas02.gat,57,213,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-6	722,{
aldeg_cas02.gat,91,181,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-7	722,{
aldeg_cas02.gat,103,53,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-8	722,{
aldeg_cas02.gat,73,53,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-9	722,{
aldeg_cas02.gat,63,41,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-10	722,{
aldeg_cas02.gat,229,6,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-11	722,{
aldeg_cas02.gat,230,40,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-12	722,{
aldeg_cas02.gat,197,40,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-13	722,{
aldeg_cas02.gat,32,213,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-14	722,{
aldeg_cas02.gat,88,180,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-15	722,{
aldeg_cas02.gat,121,29,2	duplicate(gfaldeB)	乎汗修番佳乌#a2-16	722,{
//------------------------------卡普拉--------------------------------
aldeg_cas02.gat,84,74,0	script	卡普拉 职员::kapra_aldeg02	117,{
	callfunc "gkfmenu","aldeg_cas02.gat";
	menu	"使用仓库服务",L2,
		"使用空间移动服务",L3,
		"使用手推车服务",L4,
		"结束",L7;
L2:
	callfunc "kfstorage",40;
L3:
	callfunc "gkfwarp","艾尔帕兰","aldebaran.gat",132,103;
L4:
	callfunc "kfcart",800;
L7:
	callfunc "kfend";
}
//-------------------------------管理人---------------------------------
aldeg_cas02.gat,78,74,0	script	简简丽	55,{
	callfunc "Steward_menu0","aldeg_cas02.gat","简简丽";
	menu	"查看秘密基地状况",L1,
		"投资商业发展度",L2,
		"投资防御度",L3,
		"设置监护人",L4,
		"雇用 / 解雇 卡普拉职员",L5,
		"进入主人房间",L6,
		"让出秘密基地",L7;
L1:
	callfunc "Steward_menu1","aldeg_cas02.gat","简简丽";
L2:
	callfunc "Steward_menu2","aldeg_cas02.gat","简简丽";
L3:
	callfunc "Steward_menu3","aldeg_cas02.gat","简简丽";
L4:
	callfunc "Steward_menu4","aldeg_cas02.gat","简简丽";
	if (@GDnum == 10) monster "aldeg_cas02.gat",51,183,"士兵 监护人",1287,1,"Agit_A02::On_GDa21";
	if (@GDnum == 11) monster "aldeg_cas02.gat",27,184,"骑士 监护人",1286,1,"Agit_A02::On_GDa22";
	if (@GDnum == 12) monster "aldeg_cas02.gat",88,43,"骑士 监护人",1286,1,"Agit_A02::On_GDa23";
	if (@GDnum == 13) monster "aldeg_cas02.gat",210,7,"弓箭手 监护人",1285,1,"Agit_A02::On_GDa24";
	if (@GDnum == 14) monster "aldeg_cas02.gat",60,203,"士兵 监护人",1287,1,"Agit_A02::On_GDa25";
	if (@GDnum == 15) monster "aldeg_cas02.gat",21,177,"弓箭手 监护人",1285,1,"Agit_A02::On_GDa26";
	if (@GDnum == 16) monster "aldeg_cas02.gat",117,46,"骑士 监护人",1286,1,"Agit_A02::On_GDa27";
	if (@GDnum == 17) monster "aldeg_cas02.gat",36,183,"弓箭手 监护人",1285,1,"Agit_A02::On_GDa28";
	mes "[管理人简简丽]";
	mes "完成设置监护人了。";
	mes "监护人能保护我们的秘密基地";
	mes "防止敌人的进攻。";
	close;
L5:
	callfunc "Steward_menu5","aldeg_cas02.gat","简简丽","kapra_aldeg02";
L6:
	callfunc "Steward_menu6","aldeg_cas02.gat","简简丽",134,225;
L7:
	callfunc "Steward_menu7","aldeg_cas02.gat","简简丽";
	callfunc "resetcastledata","aldeg_cas02.gat","::OnRecvCastleA02","kapra_aldeg02",@GID,"::OnGDEMPSetA02";
}
//-----------------------------开关-------------------------------
aldeg_cas02.gat,139,234,0	script	　	111,{
callfunc "gdswitch","aldeg_cas02.gat",78,75;
}
//-----------------------------开关2------------------------------
aldeg_cas02.gat,194,136,0	script	　	111,{
callfunc "gdswitch2","aldeg_cas02.gat","gld_dun02.gat",79,30;
}