⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 guild_flag.txt

📁 传奇3源程序, 用vc开发的
💻 TXT
📖 第 1 页 / 共 3 页
字号:
🔍
123 
//===================================================================
//guild_flag         by kalen
//===================================================================
prt_gld.gat,160,210,4	script	僊儖僪僼儔僢僌#prtm1	722,{
	set @GIDp1,getcastledata("prtg_cas01.gat",1);
	if (@GIDp1 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		if (getcharid(2) == @GIDp1) goto LStartg2;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp1) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp1) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp1) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
LStartg2:
		mes "[ 惡 ]";
		mes "桬幰傛乧";
		mes "孨偺抧偵婣傞偐丠";
		next;
		menu "嵲偵婣傞",-,"傗傔傞",Lclose;
			warp "prtg_cas01.gat",97,174;end;
Lclose:
		close;
OnRecvCastleP01:
	FlagEmblem getcastledata("prtg_cas01.gat",1);
	end;
}
prt_gld.gat,153,213,3	script	僊儖僪僼儔僢僌#prtm2	722,{
	set @GIDp2,getcastledata("prtg_cas02.gat",1);
	if (@GIDp2 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		if (getcharid(2) == @GIDp2) goto LStartg2;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp2) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp2) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp2) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
LStartg2:
		mes "[ 惡 ]";
		mes "桬幰傛乧";
		mes "孨偺抧偵婣傞偐丠";
		next;
		menu "嵲偵婣傞",-,"傗傔傞",Lclose;
			warp "prtg_cas02.gat",71,36;end;
Lclose:
		close;
OnRecvCastleP02:
	FlagEmblem getcastledata("prtg_cas02.gat",1);
	end;
}
prt_gld.gat,150,220,2	script	僊儖僪僼儔僢僌#prtm3	722,{
	set @GIDp3,getcastledata("prtg_cas03.gat",1);
	if (@GIDp3 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		if (getcharid(2) == @GIDp3) goto LStartg2;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp3) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp3) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp3) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
LStartg2:
		mes "[ 惡 ]";
		mes "桬幰傛乧";
		mes "孨偺抧偵婣傞偐丠";
		next;
		menu "嵲偵婣傞",-,"傗傔傞",Lclose;
			warp "prtg_cas03.gat",181,215;end;
Lclose:
		close;
OnRecvCastleP03:
	FlagEmblem getcastledata("prtg_cas03.gat",1);
	end;
}
prt_gld.gat,169,220,6	script	僊儖僪僼儔僢僌#prtm4	722,{
	set @GIDp4,getcastledata("prtg_cas04.gat",1);
	if (@GIDp4 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		if (getcharid(2) == @GIDp4) goto LStartg2;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDp4) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDp4) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDp4) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
LStartg2:
		mes "[ 惡 ]";
		mes "桬幰傛乧";
		mes "孨偺抧偵婣傞偐丠";
		next;
		menu "嵲偵婣傞",-,"傗傔傞",Lclose;
			warp "prtg_cas04.gat",258,247;end;
Lclose:
		close;
OnRecvCastleP04:
	FlagEmblem getcastledata("prtg_cas04.gat",1);
	end;
}
prt_gld.gat,167,213,5	script	僊儖僪僼儔僢僌#prtm5	722,{
	set @GIDp5,getcastledata("prtg_cas05.gat",1);
	if (@GIDp5 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		if (getcharid(2) == @GIDp5) goto LStartg2;
		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;
LStartg2:
		mes "[ 惡 ]";
		mes "桬幰傛乧";
		mes "孨偺抧偵婣傞偐丠";
		next;
		menu "嵲偵婣傞",-,"傗傔傞",Lclose;
			warp "prtg_cas05.gat",52,41;end;
Lclose:
		close;
OnRecvCastleP05:
	FlagEmblem getcastledata("prtg_cas05.gat",1);
	end;
}
pay_gld.gat,347,125,2	script	僊儖僪僼儔僢僌#paym1	722,{
	set @GIDf1,getcastledata("payg_cas01.gat",1);
	if (@GIDf1 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		if (getcharid(2) == @GIDf1) goto LStartg2;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDf1) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDf1) + " ^000000 偺儅僗僞乕偼";
		mes "^ff0000 " + getguildmaster(@GIDf1) + " ^000000偱偁傞丅";
		mes "偙傟偵堎媍偺偁傞幰偼丄寱傪庢傝";
		mes "椡傪埲偭偰柤梍傪彑偪庢傝側偝偄丅";
		close;
LStartg2:
		mes "[ 惡 ]";
		mes "桬幰傛乧";
		mes "孨偺抧偵婣傞偐丠";
		next;
		menu "嵲偵婣傞",-,"傗傔傞",Lclose;
			warp "payg_cas01.gat",212,108;end;
Lclose:
		close;
OnRecvCastleF01:
	FlagEmblem getcastledata("payg_cas01.gat",1);
	end;
}
pay_gld.gat,347,116,2	script	僊儖僪僼儔僢僌#paym2	722,{
	set @GIDf2,getcastledata("payg_cas02.gat",1);
	if (@GIDf2 != 0) goto LStartg;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "惓幃強桳幰偑側偄傾僕僩偱偁傞偙偲傪";
		mes "岞昞偡傞丅";
		next;
		mes " ";
		mes "2.";
		mes "偙偪傜傪庣偭偰偄傞惁偠偄";
		mes "帋楙偵彑偭偰丄僄儞儁儕僂儉傪";
		mes "攋夡偡傞桬幰偵偼崙墹偑";
		mes "擣掕偡傞傾僕僩強桳尃偑晬梌偝傟傞";
		close;
LStartg:
		if (getcharid(2) == @GIDf2) goto LStartg2;
		mes "[ 儖乕儞儈僢僪僈僢僣墹崙椞 ]";
		mes " ";
		mes "1.";
		mes "偙偪傜偼儖乕儞儈僢僪僈僢僣墹崙偵";
		mes "傛偭偰";
		mes "僊儖僪 ^ff0000 " + GetGuildName(@GIDf2) + " ^000000偺";
		mes "強桳偱偁傞偙偲傪擣傔傜傟偰偄傞丅";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GIDf2) + " ^000000 偺儅僗僞乕偼";
123

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -