📄 champ.cgi
字号:
print "<SPAN><TD class=num noWrap align=middle colSpan=2>$PL_VALUES[8]</TD>";
print "</tr></TBODY></TABLE></TD></TR></TBODY></TABLE></DIV></center></td>";
print "<td width=34% rowspan=3>";
print "<table border=3 cellpadding=0 cellspacing=0 style=\"border-collapse: collapse\" width=95% bgcolor=#000000 bordercolor=#008080>";
print "<tr><td width=100% align=center><img src=$IMG_FOLDER2/$PL_VALUES[27].gif><br>";
print "<font size=3> <b>$PL_VALUES[3]</b></font></td></tr></table>";
print "<b>$STATUS_NAME[9]</b><br><font color=#ffffff size=2>";
($DatHp,$Result,$DatHp2,$Result2,$DatHp3,$Result3,$DatHp4,$Result4,$DatHp5,$Result5) = split(/!/,$PL_VALUES[1]);
print "<font color=#FFFF00><span style=\"background-color: #FF0000\">";
print &DATE_DECORD("$DatHp")." <br>$Result</span></font><br>";
print &DATE_DECORD("$DatHp2")." <br>$Result2<br>";
print &DATE_DECORD("$DatHp3")." <br>$Result3</font></td>";
print "<td width=33%>";
print "<center><DIV style=\"FILTER: dropshadow(offx=8,offy=8,color=#000000); POSITION: relative; HEIGHT: 140px\">";
print "<TABLE cellSpacing=0 cellPadding=0><TBODY><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; BORDER-TOP: #89a078 2px solid; FONT-SIZE: 15px; BORDER-LEFT: #89a078 2px solid; COLOR: #efef80; BORDER-BOTTOM: medium none\" noWrap align=middle width=50 bgColor=#000000>ARMS</TD>";
print "<TD style=\"PADDING-RIGHT: 1px; PADDING-LEFT: 0px; PADDING-BOTTOM: 1px; PADDING-TOP: 1px; BORDER-BOTTOM: #89a078 2px solid\" width=150>";
print "<SPAN style=\"BORDER-RIGHT: #23a012 1px solid; BORDER-TOP: #23a012 1px solid; FONT-SIZE: 16px; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none; BACKGROUND-COLOR: #000000\">";
print "<B>武器与技能检定</B></SPAN></TD></TR><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; BORDER-TOP: medium none; BORDER-LEFT: #89a078 2px solid; BORDER-BOTTOM: medium none; BACKGROUND-REPEAT: no-repeat\" vAlign=top bgColor=#000000 colSpan=3 height=70>";
print "<TABLE style=\"FONT-SIZE: 14px; LINE-HEIGHT: 16px\" cellSpacing=0 cellPadding=0 $right><TBODY><TR>";
print "<TD rowSpan=4>";
print "<center><table cellpadding=0 cellspacing=0 border=0>";
print "<tr><td width=30 height=30 $right valign=bottom background=\"$IMG_FOLDER1/btl.gif\">";
print "<img src='$IMG_FOLDER1/tl.gif' width=$AT height=$DE $fil></td>";
print "<td width=30 height=30 align=left valign=bottom background=\"$IMG_FOLDER1/btr.gif\">";
print "<img src='$IMG_FOLDER1/tr.gif' width=$SP height=$DE $fil></td></tr>";
print "<tr><td width=30 height=30 $right valign=top background=\"$IMG_FOLDER1/bbl.gif\">";
print "<img src='$IMG_FOLDER1/bl.gif' width=$AT height=$MT $fil></td>";
print "<td width=30 height=30 align=left valign=top background=\"$IMG_FOLDER1/bbr.gif\">";
print "<img src='$IMG_FOLDER1/br.gif' width=$SP height=$MT $fil></td></tr></table></center></TD>";
print "<TD $right width=27><IMG src=http://www.cngl.net/playuo/images/fight.gif></TD>";
print "<TD class=num noWrap width=25><B>".&STATUS_CONVERT("$PL_VALUES[19]",'s')."</B></TD>";
$fil='style="position:relative;filter:alpha(opacity=70,finishopacitiy=70);"';
print "<TD $right width=20><IMG src=http://www.cngl.net/playuo/images/gu.gif></TD>";
print "<TD class=num noWrap><B>".&STATUS_CONVERT("$PL_VALUES[20]",'s')."</B></TD><TD noWrap $right>攻||防</TD></TR><TR>";
print "<TD $right><IMG src=http://www.cngl.net/playuo/images/short.gif></TD><TD class=num noWrap><B>".&STATUS_CONVERT("$PL_VALUES[22]",'s')."</B></TD>";
print "<TD $right height=16><IMG src=http://www.cngl.net/playuo/images/speed.gif></TD>";
print "<TD class=num noWrap><B>".&STATUS_CONVERT("$PL_VALUES[21]",'s')."</B></TD>";
print "<TD noWrap $right>命||速</TD></TR><TR>";
print "<TD align=middle><IMG src=http://www.cngl.net/playuo/images/long.gif></TD>";
print "<TD class=num noWrap $right><B id=j_am_long>--</B></TD>";
print "<TD align=middle><IMG src=http://www.cngl.net/playuo/images/cpu.gif></TD>";
print "<TD class=num noWrap $right><B>Piii 500*2</B></TD><TD></TD></TR><TR>";
print "<TD class=num noWrap $right colSpan=5>";
print "<B>-----</B></TD></TR></TBODY></TABLE></TD></TR><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; BORDER-TOP: medium none; FONT-SIZE: 12px; BORDER-LEFT: #89a078 2px solid; BORDER-BOTTOM: #89a078 2px solid; BACKGROUND-REPEAT: no-repeat\" bgColor=#000000 colSpan=2>";
print "<DIV><TABLE $tb_kill bgColor=#000000><font color=#99fffff> <b>$STATUS_NAME[10]</b></a></font> <font color=ffffff>$PL_VALUES[39]</font></TABLE>";
print "<TABLE $tb_kill bgColor=#000000><font color=#990000> <b>$STATUS_NAME[11]</b></a></font> <font color=ffffff>$PL_VALUES[32]</font></TABLE>";
print "敌机损毁" if $WN_sA[7]=~ m/A/;
print "一击必杀" if $WN_sA[7]=~ m/B/;
print "速度" if $WN_sA[7]=~ m/C/;
print "防御" if $WN_sA[7]=~ m/D/;
print "命中" if $WN_sA[7]=~ m/E/;
print "乱射" if $WN_sA[7]=~ m/F/;
print "幸运" if $WN_sA[7]=~ m/G/;
@WN_sB=split(/\,/,$WEAPON_LIST{"$WN_B"});print' 備用武器 <b>'.$WN_sB[0].'</b>';
print " 等级.$WLV_B/经验.$WEP_B" if $WN_sB[0];print "<br>";
@WN_sC=split(/\,/,$WEAPON_LIST{"$WN_C"});print' 備用武器 <b>'.$WN_sC[0]."</b>";
print " 等级.$WLV_C/经验.$WEP_C" if $WN_sC[0];print "<br>";
@WN_sD=split(/\,/,$WEAPON_LIST{"$WN_D"});print' 備用武器 <b>'.$WN_sD[0]."</b>";
print " 等级.$WLV_D/经验.$WEP_D" if $WN_sD[0];print "<br>";
@WN_sE=split(/\,/,$WEAPON_LIST{"$WN_E"});print' 備用武器 <b>'.$WN_sE[0]."</b>";
print " 等级.$WLV_E/经验.$WEP_E" if $WN_sE[0];print "</div>";
print "</TD></TR></TBODY></TABLE></DIV></center></td>";
print "</tr><tr><td width=33%></td><td width=4%></td>";
if($CL_VALUES[7] > time){
print "<br> <b>战 略</b> <b style=\"color:$CL_VALUES[0];\">$CL_VALUES[5]</b> Limit:";
print &DATE_DECORD("$CL_VALUES[7]")."<br> <b>任务</b> ";
print " <b>$CL_VALUES[6] 本国的攻略及要塞的破坏</b>";
}
print "</tr><tr>";
print "<td width=33%>";
print "<DIV style=\"FILTER: dropshadow(offx=8,offy=8,color=#000000); POSITION: relative; HEIGHT: 50px\">";
print "<TABLE cellSpacing=0 cellPadding=0><TBODY><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; BORDER-TOP: #89a078 2px solid; FONT-SIZE: 15px; BORDER-LEFT: #89a078 2px solid; COLOR: #efef80; BORDER-BOTTOM: medium none\" noWrap align=middle width=50 bgColor=#000000 onclick=SK(3);>HP</TD>";
print "<TD style=\"PADDING-RIGHT: 1px; PADDING-LEFT: 0px; PADDING-BOTTOM: 1px; PADDING-TOP: 1px; BORDER-BOTTOM: #89a078 2px solid\" width=140><SPAN style=\"BORDER-RIGHT: #23a012 1px solid; BORDER-TOP: #23a012 1px solid; FONT-SIZE: 16px; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none; BACKGROUND-COLOR: #000000\">";
print "<b id=j_hp>$PL_VALUES[15]</b>/<B>$PL_VALUES[16]</B>[<span id=cond>$CONDITIONAL</span>]</span></TD></TR><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; PADDING-RIGHT: 4px; BORDER-TOP: medium none; PADDING-LEFT: 4px; PADDING-BOTTOM: 4px; BORDER-LEFT: #89a078 2px solid; PADDING-TOP: 4px; BORDER-BOTTOM: #89a078 2px solid\" width=208 bgColor=#000000 colSpan=2><IMG height=10 width=208 src=http://www.cngl.net/playuo/images/mater.gif></TD>";
print "</TR></TBODY></TABLE></DIV>";
print "<DIV style=\"FILTER: dropshadow(offx=8,offy=8,color=#000000); POSITION: relative; HEIGHT: 50px\">";
print "<TABLE cellSpacing=0 cellPadding=0><TBODY><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; PADDING-RIGHT: 4px; BORDER-TOP: #89a078 2px solid; PADDING-LEFT: 4px; PADDING-BOTTOM: 4px; BORDER-LEFT: #89a078 2px solid; PADDING-TOP: 4px; BORDER-BOTTOM: medium none\" width=208 bgColor=#000000 colSpan=2><IMG height=10 width=208 src=http://www.cngl.net/playuo/images/mater.gif></TD></TR><TR>";
print "<TD style=\"PADDING-RIGHT: 1px; BORDER-TOP: #89a078 2px solid; PADDING-LEFT: 0px; PADDING-BOTTOM: 1px; PADDING-TOP: 1px\" $right width=150>";
print "<SPAN style=\"BORDER-RIGHT: medium none; BORDER-TOP: medium none; FONT-SIZE: 16px; BORDER-LEFT: #23a012 1px solid; BORDER-BOTTOM: #23a012 1px solid; BACKGROUND-COLOR: #000000\">";
print "<b id=j_en>$PL_VALUES[17]</b>/<B>$PL_VALUES[18]</B></SPAN></TD>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; BORDER-TOP: medium none; FONT-SIZE: 15px; BORDER-LEFT: #89a078 2px solid; COLOR: #efef80; BORDER-BOTTOM: #89a078 2px solid\" noWrap align=middle width=50 bgColor=#000000>EN</TD></TR></TBODY></TABLE></DIV></center></td>";
print "<td width=34%>";
print "<center><DIV style=\"FILTER: dropshadow(offx=8,offy=8,color=#000000); POSITION: relative; HEIGHT: 65px\">";
print "<TABLE cellSpacing=0 cellPadding=0><TBODY><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; PADDING-RIGHT: 0px; BORDER-TOP: #89a078 2px solid; PADDING-LEFT: 0px; FONT-SIZE: 15px; PADDING-BOTTOM: 0px; BORDER-LEFT: #89a078 2px solid; COLOR: #efef80; PADDING-TOP: 0px; BORDER-BOTTOM: medium none\" noWrap align=middle width=160 bgColor=#000000>目前裝備武器</TD>";
print "<TD style=\"BORDER-RIGHT: #23a012 1px solid; BORDER-TOP: #23a012 1px solid; FONT-SIZE: 15px; BORDER-LEFT: medium none; BORDER-BOTTOM: #89a078 2px solid; BACKGROUND-COLOR: #000000\" width=100 align=middle>";
print "<B class=num>消耗EN: $WN_sA[4]</B></TD></TR><TR>";
print "<TD style=\"BORDER-RIGHT: #89a078 2px solid; PADDING-RIGHT: 4px; BORDER-TOP: medium none; PADDING-LEFT: 4px; FONT-SIZE: 15px; PADDING-BOTTOM: 4px; BORDER-LEFT: #89a078 2px solid; COLOR: #e0e0e0; PADDING-TOP: 4px; BORDER-BOTTOM: #89a078 2px solid\" width=208 bgColor=#000000 colSpan=2>";
print "<B>".$WN_sA[0]."</B> 等级.$WLV_A/经验.$WEP_A<BR>";
print "<span style=\"$STYL1\"> 性\能\ 攻：".&STATUS_CONVERT($WN_sA[1]*$WN_sA[3]/500,'s');print " 命：".&STATUS_CONVERT($WN_sA[2]/4,'s');print " 回：$WN_sA[3]<BR>";
print "<B></B></TD></TR></TBODY></TABLE></DIV></center></td></tr></table>";
print "</td></tr>";
print << "-----END-----";
<tr><form action=$SCRIPTNM name="FM" method="POST" target=Sub><td colspan=7>
<script language="JavaScript">
function Move(){parent.Sub.location.replace("$SCRIPTNM?LOGO");}
</script>
<input type=hidden name=cmd>
<input type=hidden name=pname value=$FORM{'pname'}>
<input type=hidden name=pass value=$FORM{'pass'}>
<div id="master">
<div id="menu">
<table border=0 width=100% cellspacing=0 cellpadding=0>
<tr><td width=100%><a href="javascript:expand()" onfocus="this.blur()"><img name="menutop" border=0 src="http://www.cngl.net/playuo/images/menu.gif" width="18" height="70"></a></td></tr>
</table>
</div>
<div id="top">
<table border=0 width=100% cellspacing=0 cellpadding=0>
<tr><td width=100%><img border=0 src="http://www.cngl.net/playuo/images/menutop.gif" width="145" height="6"></td></tr>
</table>
</div>
<div id="screen">
<table border=0 width=100% cellspacing=0 cellpadding="5">
<tr><td width=100% bgcolor="#808080">
<table border=0 width=100% bgcolor="#808080" cellspacing=0 cellpadding=0>
<tr><td width=100%>
<table border=0 width=100% cellspacing="1" cellpadding="5">
<tr><td width=100% bgcolor="#FFFFFF">
<font><br></font><font><br></font><font><br></font>
</td></tr></table></td></tr></table></td></tr></table></div>
<div id="screenlinks">
<table border=0 width=100% cellspacing=0 cellpadding="5">
<tr><td width=100%>
<table border=0 width=100% bgcolor="#808080" cellspacing=0 cellpadding=0>
<tr><td width=100%>
<table border=0 width=100% cellspacing="1" cellpadding="5">
<tr><td width=100% bgcolor="#FFFFFF">
<center>
<font color=#787986><b>擂台指令</b></font><br>
<input type=submit name="b_mode" value="挑战擂主" $STYLE_B1 onClick="document.FM.cmd.value='BATTLE_2';Move();"><br>
<input type=button value="争霸" $STYLE_B1 onClick="parent.top.location.replace('wars.cgi')">
<input type=button value="集训" $STYLE_B1 onClick="parent.top.location.replace('mission.cgi')">
<input type=button value="退出" $STYLE_B1 onClick="parent.top.location.replace('$YOUR_HOME')"></form>
<form action=$SCRIPTNM method=POST target=_self>
<input type=hidden name=cmd value=MAIN_FRAME>
<input type=hidden name=pname value=$FORM{'pname'}>
<input type=hidden name=pass value=$FORM{'pass'}>
<input type=submit value="刷新" $STYLE_B1 onClick=\"parent.Sub.location.replace(\'$MAIN_SCRIPT?LOGO\');\">
</form>
</center></td></tr></table></div></td></tr></table></td></tr></table>
-----END-----
print "<script language=\"JavaScript\">location.href='#top';\n</script>\n" if $BANNER_DISPLAY;
print << " -----END-----"if $ENV{'HTTP_USER_AGENT'} =~ m/MSIE/i;
<script language="JavaScript">
var h=$PL_VALUES[15];var e=$PL_VALUES[17];var timerID;
myDate1 = new Date();
var m_time=myDate1.getTime();
HERepair();
function HERepair(){
myDate2 = new Date();
n_time=myDate2.getTime();
sasi = (m_time - n_time)/-1000;
if (h < $PL_VALUES[16]){h = $PL_VALUES[15] + sasi*$HP_REPAIR;}else{h = $PL_VALUES[16];}
if (e < $PL_VALUES[18]){e = $PL_VALUES[17] + sasi*$EN_REPAIR;}else{e = $PL_VALUES[18];}
if (h >= $PL_VALUES[16] && cond.innerText=='机体修理中'){
cond.innerText='可以战斗';cond.style.color='#143dc1';
}
j_hp.innerText=Math.round (h);
j_en.innerText=Math.round (e);
clearTimeout(timerID);
timerID = setTimeout(\"HERepair()\",500);
}
</script>
-----END-----
exit;
}
sub BATTLE2{
SET_COOKIE:{
my @gmt = gmtime(time + $COOKIE_KEEP*24*60*60);
$gmt[0] = sprintf("%02d", $gmt[0]);$gmt[1] = sprintf("%02d", $gmt[1]);$gmt[2] = sprintf("%02d", $gmt[2]);
$gmt[3] = sprintf("%02d", $gmt[3]);$gmt[5] += 1900;
$gmt[4] = ('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec')[$gmt[4]];
$gmt[6] = ('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday')[$gmt[6]];
my $date_gmt = "$gmt[6], $gmt[3]\-$gmt[4]\-$gmt[5] $gmt[2]:$gmt[1]:$gmt[0] GMT";
print "Set-Cookie:EBMISSON=$FORM{'mode'}; expires=$date_gmt\n";
}
&LOCK;
&DBM_CONVERT('P',"$FORM{pname}",'VS',"$FORM{vsname}") if !$FORM{'yousai'};
&DBM_CONVERT('C',"$PL_VALUES[5]",'VC',"$VS_VALUES[5]") if !$FORM{'yousai'};
&DBM_CONVERT('C',"$PL_VALUES[5]",'VC',"$FORM{'vsname'}") if $FORM{'yousai'};
open(IN,"$winfile");
$cdat = <IN>;
close(IN);
($cname,$c_0,$c_1,$c_2,$c_3,$c_4,$c_5,$c_6,$c_7,$c_8,$c_9,$c_10,$c_11,$c_12,$c_13,$c_14,$c_15,$c_16,$c_17,$c_18,$c_19,$c_20,$c_21,$c_22,$c_23,$c_24,$c_25,$c_26,$c_27,$c_28,$c_29,$c_30,$wcount,$wrecord,$recnum,$prize) = split(/<>/,$cdat);
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -