prtg_cas01.txt

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

//===================================================================
//Ragnarok Online EP2.5 GVG Script	prtg_cas01         by kalen
// 汉化和修正 : FPE
// Jathena++ 论坛：http://www.foxofice.net/bbs
//===================================================================
-	script	gfproA	722,{
callfunc "flagsc","prtg_cas01.gat",2,0,0,0;
OnRecvCastleP01:
	flagemblem getcastledata("prtg_cas01.gat",1);
	end;
}
prt_gld.gat,131,60,6	duplicate(gfproA)	克林希特#p1-1	722
prt_gld.gat,138,68,6	duplicate(gfproA)	克林希特#p1-2	722
prt_gld.gat,138,60,6	duplicate(gfproA)	克林希特#p1-3	722
prt_gld.gat,135,60,6	duplicate(gfproA)	克林希特#p1-4	722
prtg_cas01.gat,58,56,4	duplicate(gfproA)	克林希特#p1-5	722
prtg_cas01.gat,64,56,4	duplicate(gfproA)	克林希特#p1-6	722
prtg_cas01.gat,76,32,4	duplicate(gfproA)	克林希特#p1-7	722
prtg_cas01.gat,84,32,4	duplicate(gfproA)	克林希特#p1-8	722
prtg_cas01.gat,94,39,4	duplicate(gfproA)	克林希特#p1-9	722
prtg_cas01.gat,94,24,4	duplicate(gfproA)	克林希特#p1-10	722
prtg_cas01.gat,73,14,4	duplicate(gfproA)	克林希特#p1-11	722
prtg_cas01.gat,73,6,4	duplicate(gfproA)	克林希特#p1-12	722
prtg_cas01.gat,55,46,4	duplicate(gfproA)	克林希特#p1-13	722
prtg_cas01.gat,45,46,4	duplicate(gfproA)	克林希特#p1-14	722
//------------------------------卡普拉--------------------------------
prtg_cas01.gat,96,173,0	script	卡普拉 职员::kapra_prtg01	117,{
	callfunc "gkfmenu","prtg_cas01.gat";
	menu	"使用仓库服务",L2,
		"使用空间移动服务",L3,
		"使用手推车服务",L4,
		"结束",L7;
L2:
	callfunc "kfstorage",40;
L3:
	callfunc "gkfwarp","普隆德拉","prontera.gat",278,211;
L4:
	callfunc "kfcart",800;
L7:
	callfunc "kfend";
}
//-------------------------------管理人--------------------------------
prtg_cas01.gat,112,181,0	script	阿傅莱依	55,{
	callfunc "Steward_menu0","prtg_cas01.gat","阿傅莱依";
	menu	"查看秘密基地状况",L1,
		"投资商业发展度",L2,
		"投资防御度",L3,
		"设置监护人",L4,
		"雇用 / 解雇 卡普拉职员",L5,
		"进入主人房间",L6,
		"让出秘密基地",L7;
L1:
	callfunc "Steward_menu1","prtg_cas01.gat","阿傅莱依";
L2:
	callfunc "Steward_menu2","prtg_cas01.gat","阿傅莱依";
L3:
	callfunc "Steward_menu3","prtg_cas01.gat","阿傅莱依";
L4:
	callfunc "Steward_menu4","prtg_cas01.gat","阿傅莱依";
	if (@GDnum == 10) monster "prtg_cas01.gat",182,68,"士兵 监护人",1287,1,"Agit_D01::On_GDp11";
	if (@GDnum == 11) monster "prtg_cas01.gat",182,116,"士兵 监护人",1287,1,"Agit_D01::On_GDp12";
	if (@GDnum == 12) monster "prtg_cas01.gat",153,86,"士兵 监护人",1287,1,"Agit_D01::On_GDp13";
	if (@GDnum == 13) monster "prtg_cas01.gat",59,28,"弓箭手 监护人",1285,1,"Agit_D01::On_GDp14";
	if (@GDnum == 14) monster "prtg_cas01.gat",50,36,"弓箭手 监护人",1285,1,"Agit_D01::On_GDp15";
	if (@GDnum == 15) monster "prtg_cas01.gat",184,183,"骑士 监护人",1286,1,"Agit_D01::On_GDp16";
	if (@GDnum == 16) monster "prtg_cas01.gat",196,189,"骑士 监护人",1286,1,"Agit_D01::On_GDp17";
	if (@GDnum == 17) monster "prtg_cas01.gat",107,179,"骑士 监护人",1286,1,"Agit_D01::On_GDp18";
	mes "[管理人阿傅莱依]";
	mes "完成设置监护人了。";
	mes "监护人能保护我们的秘密基地";
	mes "防止敌人的进攻。";
	close;
L5:
	callfunc "Steward_menu5","prtg_cas01.gat","阿傅莱依","kapra_prtg01";
L6:
	callfunc "Steward_menu6","prtg_cas01.gat","阿傅莱依",7,205;
L7:
	callfunc "Steward_menu7","prtg_cas01.gat","阿傅莱依";
	callfunc "resetcastledata","prtg_cas01.gat","::OnRecvCastleP01","kapra_prtg01",@GID,"::OnGDEMPSetP01";
}
//-----------------------------开关-------------------------------
prtg_cas01.gat,15,209,0	script	　	111,{
callfunc "gdswitch","prtg_cas01.gat",111,181;
}
//-----------------------------开关2------------------------------
prtg_cas01.gat,94,200,0	script	　	111,{
callfunc "gdswitch2","prtg_cas01.gat","gld_dun03.gat",28,251;
}