ev_agit_prtg.txt

传奇3源程序, 用vc开发的

prtg_cas01.gat,197,197,0	script	Agit_D01	-1,{
OnInterIfInit:
	GetCastleData "prtg_cas01.gat",0,"::OnRecvCastleP01";
	End;
OnRecvCastleP01:
	RequestGuildInfo GetCastleData("prtg_cas01.gat",1);
	End;
OnAgitStart:
	MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),2;
	Monster "prtg_cas01.gat",197,197,"僄儞儁儕僂儉",1288,1,"Agit_D01::OnAgitBreak";
	GvgOn "prtg_cas01.gat";
	End;
OnAgitBreak:
	set @GIDp1,getcharid(2);
	if (@GIDp1 <= 0) end;
	SetCastleData "prtg_cas01.gat",1,@GIDp1;
	Announce "嵲 [" + GetCastleName("prtg_cas01.gat") + "]傪 [" + GetGuildName(@GIDp1) + "]僊儖僪偑愯椞偟傑偟偨",0;
	MapAnnounce "prtg_cas01.gat","僄儞儁儕僂儉偑攋夡偝傟傑偟偨",17;
	GetCastleData "prtg_cas01.gat",0,"::OnRecvCastleP01";
	End;
OnAgitEliminate:
	MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),6;
	Monster "prtg_cas01.gat",197,197,"僄儞儁儕僂儉",1288,1,"Agit_D01::OnAgitBreak";
	End;
OnAgitEnd:
	MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),4;
	KillMonster "prtg_cas01.gat","Agit_D01::OnAgitBreak";
	GvgOff "prtg_cas01.gat";
	End;
}
//--------------------------------------------------------------------------------------------------------------------------
prtg_cas02.gat,158,174,0	script	Agit_D02	-1,{
OnInterIfInit:
	GetCastleData "prtg_cas02.gat",0,"::OnRecvCastleP02";
	End;
OnRecvCastleP02:
	RequestGuildInfo GetCastleData("prtg_cas02.gat",1);
	End;
OnAgitStart:
	MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),2;
	Monster "prtg_cas02.gat",158,174,"僄儞儁儕僂儉",1288,1,"Agit_D02::OnAgitBreak";
	GvgOn "prtg_cas02.gat";
	End;
OnAgitBreak:
	set @GIDp2,getcharid(2);
	if (@GIDp2 <= 0) end;
	SetCastleData "prtg_cas02.gat",1,@GIDp2;
	Announce "嵲 [" + GetCastleName("prtg_cas02.gat") + "]傪 [" + GetGuildName(@GIDp2) + "]僊儖僪偑愯椞偟傑偟偨",0;
	MapAnnounce "prtg_cas02.gat","僄儞儁儕僂儉偑攋夡偝傟傑偟偨",17;
	GetCastleData "prtg_cas02.gat",0,"::OnRecvCastleP02";
	End;
OnAgitEliminate:
	MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),6;
	Monster "prtg_cas02.gat",158,174,"僄儞儁儕僂儉",1288,1,"Agit_D02::OnAgitBreak";
	End;
OnAgitEnd:
	MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),4;
	KillMonster "prtg_cas02.gat","Agit_D02::OnAgitBreak";
	GvgOff "prtg_cas02.gat";
	End;
}
//--------------------------------------------------------------------------------------------------------------------------
prtg_cas03.gat,17,221,0	script	Agit_D03	-1,{
OnInterIfInit:
	GetCastleData "prtg_cas03.gat",0,"::OnRecvCastleP03";
	End;
OnRecvCastleP03:
	RequestGuildInfo GetCastleData("prtg_cas03.gat",1);
	End;
OnAgitStart:
	MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),2;
	Monster "prtg_cas03.gat",17,221,"僄儞儁儕僂儉",1288,1,"Agit_D03::OnAgitBreak";
	GvgOn "prtg_cas03.gat";
	End;
OnAgitBreak:
	set @GIDp3,getcharid(2);
	if (@GIDp3 <= 0) end;
	SetCastleData "prtg_cas03.gat",1,@GIDp3;
	Announce "嵲 [" + GetCastleName("prtg_cas03.gat") + "]傪 [" + GetGuildName(@GIDp3) + "]僊儖僪偑愯椞偟傑偟偨",0;
	MapAnnounce "prtg_cas03.gat","僄儞儁儕僂儉偑攋夡偝傟傑偟偨",17;
	GetCastleData "prtg_cas03.gat",0,"::OnRecvCastleP03";
	End;
OnAgitEliminate:
	MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),6;
	Monster "prtg_cas03.gat",17,221,"僄儞儁儕僂儉",1288,1,"Agit_D03::OnAgitBreak";
	End;
OnAgitEnd:
	MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),4;
	KillMonster "prtg_cas03.gat","Agit_D03::OnAgitBreak";
	GvgOff "prtg_cas03.gat";
	End;
}
//--------------------------------------------------------------------------------------------------------------------------
prtg_cas04.gat,292,14,0	script	Agit_D04	-1,{
OnInterIfInit:
	GetCastleData "prtg_cas04.gat",0,"::OnRecvCastleP04";
	End;
OnRecvCastleP04:
	RequestGuildInfo GetCastleData("prtg_cas04.gat",1);
	End;
OnAgitStart:
	MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),2;
	Monster "prtg_cas04.gat",292,14,"僄儞儁儕僂儉",1288,1,"Agit_D04::OnAgitBreak";
	GvgOn "prtg_cas04.gat";
	End;
OnAgitBreak:
	set @GIDp4,getcharid(2);
	if (@GIDp4 <= 0) end;
	SetCastleData "prtg_cas04.gat",1,@GIDp4;
	Announce "嵲 [" + GetCastleName("prtg_cas04.gat") + "]傪 [" + GetGuildName(@GIDp4) + "]僊儖僪偑愯椞偟傑偟偨",0;
	MapAnnounce "prtg_cas04.gat","僄儞儁儕僂儉偑攋夡偝傟傑偟偨",17;
	GetCastleData "prtg_cas04.gat",0,"::OnRecvCastleP04";
	End;
OnAgitEliminate:
	MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),6;
	Monster "prtg_cas04.gat",292,14,"僄儞儁儕僂儉",1288,1,"Agit_D04::OnAgitBreak";
	End;
OnAgitEnd:
	MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),4;
	KillMonster "prtg_cas04.gat","Agit_D04::OnAgitBreak";
	GvgOff "prtg_cas04.gat";
	End;
}
//--------------------------------------------------------------------------------------------------------------------------
prtg_cas05.gat,266,266,0	script	Agit_D05	-1,{
OnInterIfInit:
	GetCastleData "prtg_cas05.gat",0,"::OnRecvCastleP05";
	End;
OnRecvCastleP05:
	RequestGuildInfo GetCastleData("prtg_cas05.gat",1);
	End;
OnAgitStart:
	MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),2;
	Monster "prtg_cas05.gat",266,266,"僄儞儁儕僂儉",1288,1,"Agit_D05::OnAgitBreak";
	GvgOn "prtg_cas05.gat";
	End;
OnAgitBreak:
	set @GIDp5,getcharid(2);
	if (@GIDp5 <= 0) end;
	SetCastleData "prtg_cas05.gat",1,@GIDp5;
	Announce "嵲 [" + GetCastleName("prtg_cas05.gat") + "]傪 [" + GetGuildName(@GIDp5) + "]僊儖僪偑愯椞偟傑偟偨",0;
	MapAnnounce "prtg_cas05.gat","僄儞儁儕僂儉偑攋夡偝傟傑偟偨",17;
	GetCastleData "prtg_cas05.gat",0,"::OnRecvCastleP05";
	End;
OnAgitEliminate:
	MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),6;
	Monster "prtg_cas05.gat",266,266,"僄儞儁儕僂儉",1288,1,"Agit_D05::OnAgitBreak";
	End;
OnAgitEnd:
	MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),4;
	KillMonster "prtg_cas05.gat","Agit_D05::OnAgitBreak";
	GvgOff "prtg_cas05.gat";
	End;
}
//--------------------------------------------------------------------------------------------------------------------------