payg_cas02.txt

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

//===================================================================
//Ragnarok Online EP2.5 GVG Script	payg_cas02         by kalen
// 汉化和修正 : FPE
// Jathena++ 论坛：http://www.foxofice.net/bbs
//===================================================================
-	script	gfpayB	722,{
callfunc "flagsc","payg_cas02.gat",2,0,0,0;
OnRecvCastleF02:
	flagemblem getcastledata("payg_cas02.gat",1);
	end;
}
pay_gld.gat,292,112,6	duplicate(gfpayB)	红楼#f2-1	722
pay_gld.gat,292,120,6	duplicate(gfpayB)	红楼#f2-2	722
pay_gld.gat,291,135,6	duplicate(gfpayB)	红楼#f2-3	722
pay_gld.gat,271,163,0	duplicate(gfpayB)	红楼#f2-4	722
payg_cas02.gat,254,40,6	duplicate(gfpayB)	红楼#f2-5	722
payg_cas02.gat,254,48,6	duplicate(gfpayB)	红楼#f2-6	722
payg_cas02.gat,202,49,0	duplicate(gfpayB)	红楼#f2-7	722
payg_cas02.gat,209,49,0	duplicate(gfpayB)	红楼#f2-8	722
payg_cas02.gat,59,282,4	duplicate(gfpayB)	红楼#f2-9	722
payg_cas02.gat,70,282,4	duplicate(gfpayB)	红楼#f2-10	722
//------------------------------卡普拉--------------------------------
payg_cas02.gat,22,275,5	script	卡普拉 职员::kapra_payg02	117,{
	callfunc "gkfmenu","payg_cas02.gat";
	menu	"使用仓库服务",L2,
		"使用空间移动服务",L3,
		"使用手推车服务",L4,
		"结束",L7;
L2:
	callfunc "kfstorage",40;
L3:
	callfunc "gkfwarp","裴扬","payon.gat",158,88;
L4:
	callfunc "kfcart",800;
L7:
	callfunc "kfend";
}
//-------------------------------管理人---------------------------------
payg_cas02.gat,22,260,7	script	蔡丽欧丝	55,{
	callfunc "Steward_menu0","payg_cas02.gat","蔡丽欧丝";
	menu	"查看秘密基地状况",L1,
		"投资商业发展度",L2,
		"投资防御度",L3,
		"设置监护人",L4,
		"雇用 / 解雇 卡普拉职员",L5,
		"进入主人房间",L6,
		"让出秘密基地",L7;
L1:
	callfunc "Steward_menu1","payg_cas02.gat","蔡丽欧丝";
L2:
	callfunc "Steward_menu2","payg_cas02.gat","蔡丽欧丝";
L3:
	callfunc "Steward_menu3","payg_cas02.gat","蔡丽欧丝";
L4:
	callfunc "Steward_menu4","payg_cas02.gat","蔡丽欧丝";
	if (@GDnum == 10) monster "payg_cas02.gat",237,54,"弓箭手 监护人",1285,1,"Agit_C02::On_GDf21";
	if (@GDnum == 11) monster "payg_cas02.gat",228,72,"弓箭手 监护人",1285,1,"Agit_C02::On_GDf22";
	if (@GDnum == 12) monster "payg_cas02.gat",210,41,"弓箭手 监护人",1285,1,"Agit_C02::On_GDf23";
	if (@GDnum == 13) monster "payg_cas02.gat",57,241,"弓箭手 监护人",1285,1,"Agit_C02::On_GDf24";
	if (@GDnum == 14) monster "payg_cas02.gat",42,241,"弓箭手 监护人",1285,1,"Agit_C02::On_GDf25";
	if (@GDnum == 15) monster "payg_cas02.gat",287,257,"弓箭手 监护人",1285,1,"Agit_C02::On_GDf26";
	if (@GDnum == 16) monster "payg_cas02.gat",264,272,"弓箭手 监护人",1285,1,"Agit_C02::On_GDf27";
	if (@GDnum == 17) monster "payg_cas02.gat",27,20,"骑士 监护人",1286,1,"Agit_C02::On_GDf28";
	mes "[管理人蔡丽欧丝]";
	mes "完成设置监护人了。";
	mes "监护人能保护我们的秘密基地";
	mes "防止敌人的进攻。";
	close;
L5:
	callfunc "Steward_menu5","payg_cas02.gat","蔡丽欧丝","kapra_payg02";
L6:
	callfunc "Steward_menu6","payg_cas02.gat","蔡丽欧丝",141,141;
L7:
	callfunc "Steward_menu7","payg_cas02.gat","蔡丽欧丝";
	callfunc "resetcastledata","payg_cas02.gat","::OnRecvCastleF02","kapra_payg02",@GID,"::OnGDEMPSetF02";
}
//-----------------------------开关-------------------------------
payg_cas02.gat,149,149,0	script	　	111,{
callfunc "gdswitch","payg_cas02.gat",22,261;
}
//-----------------------------开关2------------------------------
payg_cas02.gat,278,247,0	script	　	111,{
callfunc "gdswitch2","payg_cas02.gat","gld_dun01.gat",54,165;
}