prtg_cas05.txt

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

//===================================================================
//prtg_cas05         by kalen
//===================================================================
prt_gld.gat,199,243,2	script	僊儖僪僼儔僢僌#p5-1	722,{
	getcastledata "prtg_cas05.gat",1,@GIDp5;
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp5) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp5) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp5) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
OnRecvCastleP05:
	FlagEmblem getcastledata("prtg_cas05.gat",1);
	end;
}
prt_gld.gat,199,236,2	script	僊儖僪僼儔僢僌#p5-2	722,{
	getcastledata "prtg_cas05.gat",1,@GIDp5;
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp5) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp5) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp5) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
OnRecvCastleP05:
	FlagEmblem getcastledata("prtg_cas05.gat",1);
	end;
}
prt_gld.gat,197,243,2	script	僊儖僪僼儔僢僌#p5-3	722,{
	getcastledata "prtg_cas05.gat",1,@GIDp5;
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp5) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp5) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp5) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
OnRecvCastleP05:
	FlagEmblem getcastledata("prtg_cas05.gat",1);
	end;
}
prt_gld.gat,197,236,2	script	僊儖僪僼儔僢僌#p5-4	722,{
	getcastledata "prtg_cas05.gat",1,@GIDp5;
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp5) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp5) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp5) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
OnRecvCastleP05:
	FlagEmblem getcastledata("prtg_cas05.gat",1);
	end;
}
prtg_cas05.gat,19,247,4	script	僊儖僪僼儔僢僌#p5-5	722,{
	getcastledata "prtg_cas05.gat",1,@GIDp5;
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp5) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp5) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp5) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
OnRecvCastleP05:
	FlagEmblem getcastledata("prtg_cas05.gat",1);
	end;
}
prtg_cas05.gat,19,243,4	script	僊儖僪僼儔僢僌#p5-6	722,{
	getcastledata "prtg_cas05.gat",1,@GIDp5;
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp5) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp5) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp5) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
OnRecvCastleP05:
	FlagEmblem getcastledata("prtg_cas05.gat",1);
	end;
}
prtg_cas05.gat,26,247,4	script	僊儖僪僼儔僢僌#p5-7	722,{
	getcastledata "prtg_cas05.gat",1,@GIDp5;
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp5) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";