status.cgi

三国网页游戏原码 增加了亡命也就是判国 还修进了管理工具

					($zzname,$zzcon,$zznum,$zznou,$zzsyo,$zzshiro,$zznou_max,$zzsyo_max,$zzshiro_max,$zzpri,$zzx,$zzy)=split(/<>/);
					if("$zzx" eq "$j" && "$zzy" eq "$i"){$m_hit=1;last;}
					$zx++;
				}
				$col="";
				if($m_hit){
					if($zx eq $kpos){
						$col = $ELE_C[$cou_ele[$zzcon]];
					}else{
						$col = $ELE_BG[$cou_ele[$zzcon]];
					}
					if($zzname eq "洛阳" || $zzname eq "建业" || $zzname eq "成都" || $zzname eq "业" ){
						print "<TH bgcolor=$col><img src=$IMG/m_1.gif alt=$zzname【$cou_name[$zzcon]】></TH>";
					}else{
						print "<TH bgcolor=$col><img src=$IMG/m_4.gif alt=$zzname【$cou_name[$zzcon]】></TH>";
					}
				}else{
					print "<TH> </TH>";
				}
		}
		print "</TR>";
	}
print <<"EOM";
        </TBODY>
      </TABLE>
</TD></TR>
<TR><TD>
<TABLE width=100% bgcolor=$ELE_BG[$cou_ele[$zcon]]><TBODY bgcolor=$ELE_C[$cou_ele[$zcon]]>
<TR><TH colspan=8>$zname</TH></TR>
<TR><TD>支配国家 </TD><TH bgcolor$TD_C1>$cou_name[$zcon]国家</Th><TD>农民</TD><TD>$znum</TD><TD>国民忠诚度</TD><TD>$zpri</TD></TR>
<TR><TD>农业</TD><TD>$znou/$znou_max</TD><TD>商业</TD><TD>$zsyo/$zsyo_max</TD><TD>城墙</TD><TD>$zshiro/$zshiro_max</TD></TR>
<TR><TD>本国在线武将</TD><TD colspan=5>$m_list</TD></TR>

</TBODY></TABLE>
</TD></TR><TR><TD>
<TABLE width=100% bgcolor=$ELE_BG[$xele]><TBODY bgcolor=$ELE_C[$xele]>
<TR><TH colspan=8>$xname国家</TH></TR>
<TR><TD>君主</TD><TH colspan=2>$king_name</TH><TD>军师</TD><TH colspan=2>$sub_name</TH></TR>
<TD>支配国家数</TD><TD align=right>$town_get[$kcon]</TD><TD>收获</TD><TD align=right>$znou_sal</TD>
<TD>税捐</TD><TD align=right>$zsyo_sal</TD></TR>

<form action="./mydata.cgi" method="post"><TR><TH colspan=8>
<input type=hidden name=id value=$kid>
<input type=hidden name=pass value=$kpass>
<input type=hidden name=mode value=COUNTRY_TALK>
<input type=submit value="会议室">
</TH></TR></form>
$king_com
</TBODY></TABLE>
</TD></TR>
<TR><TD>

<form action="./command.cgi" method="POST"><input type=hidden name=id value=$kid><input type=hidden name=pass value=$kpass>
<TABLE bgcolor=$ELE_BG[$xele]><TBODY bgcolor=$ELE_C[$xele]>
<TR><TH>游戏指令</TH></TR><br><TR><TH>在1的上面有ALL</TH></TR><br><TR><TH>也就是20个指令全做一样事情</TH></TR>
<TR><TD>
No:<select name=no>
<option value="all">ALL
EOM
	for($i=0;$i<$MAX_COM;$i++){
		$no = $i+1;
		if($i eq "0"){
		print "<option value=\"$i\" SELECTED>$no";
		}else{
		print "<option value=\"$i\">$no";
		}
	}
print <<"EOM";
</select>
<select name=mode>
<option value="0">什么都不做
<option value="">== 内政 ==
<option value="1">农业开发(50G)
<option value="2">商业开发(50G)
<option value="3">强化城墙(50G)
<option value="8">施舍米(50R)
<option value="">== 军事 ==
<option value="9">微兵
<option value="11">训练士兵
<option value="12">都市防御
<option value="13">战争
<option value="">== 谋略 ==
<option value="24">任用(100G)
<option value="">== 锻炼 ==
<option value="26">\强化\能力(50G)
<option value="">== 商人 ==
<option value="14">买米卖米
<option value="15">武器店
<option value="16">书店
<option value="">== 移动 ==
<option value="17">移动
<option value="21">判国

</select><input type=submit value=\"实行\"></TD></form></TR>
<TR><TH>指令运行剩余时间$next_time分</TH></TR>
<TR><TH>剩下被删除次数<font color=red>$DEL_TURN</font>次</TH></TR>
<TR><TH>关于运行时间的问题大家的建议各有不同<br>请大家想一个更合适的时间<br>请进论坛一谈</TH></TR>
</TBODY></TABLE><CENTER>
<form action="$FILE_STATUS" method="post">
<input type=hidden name=id value=$kid>
<input type=hidden name=pass value=$kpass>
<input type=hidden name=mode value=STATUS>
<input type=submit value="更新"></form>

</TD></TR>
</TABLE>

</TD><TD>

<TABLE><TR><TD>
<TABLE width=100% bgcolor=$TABLE_C cellspacing=1><TBODY BGCOLOR=$TD_C2>
<TR><TH bgcolor=#000000 colspan=2><font color=#FFFFFF>指令结果</font></TH></TR>
$com_list
</TABLE>

</TD></TR>
<TR><TD>

<TABLE width=100% bgcolor=$ELE_BG[$xele]><TBODY bgcolor=$ELE_C[$xele]>
<TR><TH colspan=7 bgcolor=$ELE_BG[$xele]><font color=$ELE_C[$xele]>$kname($cou_name[$kcon]国家)</font></TH></TR>

<TR><TD rowspan=4 width=5><img src=$IMG/$kchara.gif></TD><TD>武力</TD><TH>$kstr</TH><TD>智力</TD><TH>$kint</TH><TD>统率力</TD><TH>$klea</TH></TR>
<TR><TD>武EX</TD><TH>$kstr_ex</TH><TD>智EX</TD><TH>$kint_ex</TH><TD>统EX</TD><TH>$klea_ex</TH></TR>
<TR><TD>金钱</TD><TH>$kgold</TH><TD>米</TD><TH>$krice</TH><TD>声望</TD><TH>$kcha</TH></TR>
<TR><TD>职业</TD><TH>$LANK[$klank]</TH><TD>贡献</TD><TH>$kcex</TH><TD>经验值</TD><TH>$kclass</TH></TR>
<TR><TD>兵种</TD><TH colspan=2>$SOL_TYPE[$ksub1_ex]</TH><TD>士兵</TD><TH>$ksol</TH><TD>训练</TD><TH>$kgat</TH></TR>
<TR><TD>武器</TD><TH colspan=5>$karmname</TH><TH>$karmdmg</TH></TR>
<TR><TD>书</TD><TH colspan=5>$kproname</TH><TH>$kprodmg</TH></TR>
<form action="./mydata.cgi" method="post"><TR><TD>忠城度</TD><TH>$kbank</TH><TH colspan=5>
<input type=hidden name=id value=$kid>
<input type=hidden name=pass value=$kpass>
<input type=hidden name=mode value=CYUUSEI>
<input type=text name=cyuu size=5>
<input type=submit value="忠城">
</TH></TR></form>
<form action="./mydata.cgi" method="post"><TR><TH colspan=7>
<input type=hidden name=id value=$kid>
<input type=hidden name=pass value=$kpass>
<input type=hidden name=mode value=LETTER>
<input type=submit value="个人信件">

</TH></TR></form>
</TBODY></TABLE>

</TD></TR>
</TABLE>
</TD></TR>


<TR><TD colspan=2>
<TABLE width=100%><TR><TD bgcolor=$ELE_C[$cou_ele[$zcon]]><font color=$ELE_BG[$cou_ele[$zcon]]>$zname的防御:$def_list</TD></TR></TABLE>
</TD></TR>
<TR><TD colspan=2>
<TABLE width=100% bgcolor=$TABLE_C><TR><TD bgcolor=$TD_C1>$S_MES</TD></TR></TABLE>
<form action="$FILE_MYDATA" method="post">
信:<input type="text" name=message size=60>
  <select name=mes_id><option value="$xcid">$xname国家<option value="111">$zname的人$dilect_mes</select>
  <input type=hidden name=id value=$kid>
  <input type=hidden name=name value=$kname>
  <input type=hidden name=pass value=$kpass>
  <input type=hidden name=mode value=MES_SEND>
  <input type=submit value="送信"></form>
<TABLE width=100%><TBODY>
<TR><TD width=50%>
给$zname的人民的信:($MES_ALL件)
	<TABLE width=100% bgcolor=880000><TBODY>
	$all_mes
	</TBODY></TABLE>$kname的讯息:($MES_MAN件)
	<TABLE width=100% bgcolor=008800><TBODY>
	$man_mes2
	</TBODY></TABLE>
</TD><TD>
给$xname国家的武将的信:($MES_COU件)
	<TABLE width=100% bgcolor=000088><TBODY>
	$cou_mes
	</TBODY></TABLE>$kname无所属部队的讯息:($MES_MAN件)
	<TABLE width=100% bgcolor=008800><TBODY>
	$man_mes
	</TBODY></TABLE>
</TD></TR>
</TBODY></TABLE>
</TD></TR>
<TR><TD colspan=2>
<TABLE width=100% bgcolor=$ELE_BG[$cou_ele[$kcon]]><TR><TD bgcolor=$ELE_C[$cou_ele[$kcon]]>$log_list</TD></TR><form action="./mylog.cgi" method="post">
</TABLE>
<input type=hidden name=id value=$kid>
<input type=hidden name=pass value=$kpass>
<input type=submit value="本国运行资料">
</form>
<form action="./mycou.cgi" method="post">
<input type=hidden name=id value=$kid>
<input type=hidden name=pass value=$kpass>
<input type=submit value="国家资料">

</TD></TR></form>
→→→→→→→→→→→→→→→→→→→→→→→→→→→[<a href=http://chu.kl90.com>主页</a>]●[<a href=http://www.blackflasher.net/china-c/index.asp>$BBS1</a>]←←←←←←←←←←←←←←←←←←←←←←←←←←←←←←
</TABLE>
</TD></TR></TABLE>
EOM
	&FOOTER;
	exit;
}