aldeg_cas01.txt

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

//===================================================================
//Ragnarok Online EP2.5 GVG Script	aldeg_cas01         by kalen
// 汉化和修正 : FPE
// Jathena++ 论坛：http://www.foxofice.net/bbs
//===================================================================
-	script	gfaldeA	722,{
	callfunc "flagsc","aldeg_cas01.gat",1,0,0,0;
OnRecvCastleA01:
	flagemblem getcastledata("aldeg_cas01.gat",1);
	end;
}
alde_gld.gat,61,87,6	duplicate(gfaldeA)	娜易修番斯塔引#a1-1	722
alde_gld.gat,61,79,6	duplicate(gfaldeA)	娜易修番斯塔引#a1-2	722
alde_gld.gat,45,87,8	duplicate(gfaldeA)	娜易修番斯塔引#a1-3	722
alde_gld.gat,51,87,8	duplicate(gfaldeA)	娜易修番斯塔引#a1-4	722
aldeg_cas01.gat,30,248,4	duplicate(gfaldeA)	娜易修番斯塔引#a1-5	722
aldeg_cas01.gat,30,246,4	duplicate(gfaldeA)	娜易修番斯塔引#a1-6	722
aldeg_cas01.gat,37,248,4	duplicate(gfaldeA)	娜易修番斯塔引#a1-7	722
aldeg_cas01.gat,37,246,4	duplicate(gfaldeA)	娜易修番斯塔引#a1-8	722
aldeg_cas01.gat,95,80,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-9	722
aldeg_cas01.gat,95,59,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-10	722
aldeg_cas01.gat,62,75,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-11	722
aldeg_cas01.gat,70,75,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-12	722
aldeg_cas01.gat,74,75,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-13	722
aldeg_cas01.gat,62,64,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-14	722
aldeg_cas01.gat,66,64,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-15	722
aldeg_cas01.gat,70,64,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-16	722
aldeg_cas01.gat,74,64,2	duplicate(gfaldeA)	娜易修番斯塔引#a1-17	722
aldeg_cas01.gat,203,150,4	duplicate(gfaldeA)	娜易修番斯塔引#a1-18	722
aldeg_cas01.gat,210,150,4	duplicate(gfaldeA)	娜易修番斯塔引#a1-19	722
//------------------------------卡普拉--------------------------------
aldeg_cas01.gat,218,170,0	script	卡普拉 职员::kapra_aldeg01	117,{
	callfunc "gkfmenu","aldeg_cas01.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_cas01.gat,218,175,0	script	尔普磊嘟	55,{
	callfunc "Steward_menu0","aldeg_cas01.gat","尔普磊嘟";
	menu	"查看秘密基地状况",L1,
		"投资商业发展度",L2,
		"投资防御度",L3,
		"设置监护人",L4,
		"雇用 / 解雇 卡普拉职员",L5,
		"进入主人房间",L6,
		"让出秘密基地",L7;
L1:
	callfunc "Steward_menu1","aldeg_cas01.gat","尔普磊嘟";
L2:
	callfunc "Steward_menu2","aldeg_cas01.gat","尔普磊嘟";
L3:
	callfunc "Steward_menu3","aldeg_cas01.gat","尔普磊嘟";
L4:
	callfunc "Steward_menu4","aldeg_cas01.gat","尔普磊嘟";
	if (@GDnum == 10) monster "aldeg_cas01.gat",17,218,"士兵 监护人",1287,1,"Agit_A01::On_GDa11";
	if (@GDnum == 11) monster "aldeg_cas01.gat",39,205,"弓箭手 监护人",1285,1,"Agit_A01::On_GDa12";
	if (@GDnum == 12) monster "aldeg_cas01.gat",38,196,"弓箭手 监护人",1285,1,"Agit_A01::On_GDa13";
	if (@GDnum == 13) monster "aldeg_cas01.gat",21,194,"骑士 监护人",1286,1,"Agit_A01::On_GDa14";
	if (@GDnum == 14) monster "aldeg_cas01.gat",218,24,"骑士 监护人",1286,1,"Agit_A01::On_GDa15";
	if (@GDnum == 15) monster "aldeg_cas01.gat",213,24,"骑士 监护人",1286,1,"Agit_A01::On_GDa16";
	if (@GDnum == 16) monster "aldeg_cas01.gat",73,70,"骑士 监护人",1286,1,"Agit_A01::On_GDa17";
	if (@GDnum == 17) monster "aldeg_cas01.gat",45,228,"弓箭手 监护人",1285,1,"Agit_A01::On_GDa18";
	mes "[管理人尔普磊嘟]";
	mes "完成设置监护人了。";
	mes "监护人能保护我们的秘密基地";
	mes "防止敌人的进攻。";
	close;
L5:
	callfunc "Steward_menu5","aldeg_cas01.gat","尔普磊嘟","kapra_aldeg01";
L6:
	callfunc "Steward_menu6","aldeg_cas01.gat","尔普磊嘟",113,223;
L7:
	callfunc "Steward_menu7","aldeg_cas01.gat","尔普磊嘟";
	callfunc "resetcastledata","aldeg_cas01.gat","::OnRecvCastleA01","kapra_aldeg01",@GID,"::OnGDEMPSetA01";
}
//-----------------------------开关-------------------------------
aldeg_cas01.gat,123,223,0	script	　	111,{
callfunc "gdswitch","aldeg_cas01.gat",218,176;
}
//-----------------------------开关2------------------------------
aldeg_cas01.gat,211,179,0	script	　	111,{
callfunc "gdswitch2","aldeg_cas01.gat","gld_dun02.gat",32,122;
}