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

📄 mission.cgi

📁 WEBGAME 机器人大战EBS(无尽的战争) 架設方法 WIN2K系列主機
💻 CGI
📖 第 1 页 / 共 3 页
字号:
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'&nbsp;&nbsp;備用武器&nbsp;&nbsp;<b>'.$WN_sB[0].'</b>';
	print "&nbsp;等级.$WLV_B/经验.$WEP_B" if $WN_sB[0];print "<br>";
	@WN_sC=split(/\,/,$WEAPON_LIST{"$WN_C"});print'&nbsp;&nbsp;備用武器&nbsp;&nbsp;<b>'.$WN_sC[0]."</b>";
	print "&nbsp;等级.$WLV_C/经验.$WEP_C" if $WN_sC[0];print "<br>";
	@WN_sD=split(/\,/,$WEAPON_LIST{"$WN_D"});print'&nbsp;&nbsp;備用武器&nbsp;&nbsp;<b>'.$WN_sD[0]."</b>";
	print "&nbsp;等级.$WLV_D/经验.$WEP_D" if $WN_sD[0];print "<br>";
	@WN_sE=split(/\,/,$WEAPON_LIST{"$WN_E"});print'&nbsp;&nbsp;備用武器&nbsp;&nbsp;<b>'.$WN_sE[0]."</b>";
	print "&nbsp;等级.$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>&nbsp;&nbsp;<b>战 略</b>&nbsp;&nbsp;&nbsp;&nbsp;<b style=\"color:$CL_VALUES[0];\">$CL_VALUES[5]</b> Limit:";
	print &DATE_DECORD("$CL_VALUES[7]")."<br>&nbsp;&nbsp;<b>任务</b>&nbsp;&nbsp;";
	print "&nbsp;&nbsp;<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>&nbsp;等级.$WLV_A/经验.$WEP_A<BR>";
print "<span style=\"$STYL1\">&nbsp;&nbsp;性\能\&nbsp;&nbsp;攻:".&STATUS_CONVERT($WN_sA[1]*$WN_sA[3]/500,'s');print "&nbsp;&nbsp;命:".&STATUS_CONVERT($WN_sA[2]/4,'s');print "&nbsp;&nbsp;回:$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=submit name="b_mode" value="实战演习" $STYLE_B1 onClick="document.FM.cmd.value='BATTLE_2';Move();"><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('champ.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()\",5000);
		}
		</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'};
	&UNLOCK;
###要塞能力设定
if ($FORM{'b_mode'} eq '袭击要塞训练'){
        $RAND=int(rand(10)+1);
        $HITPOINT=$PL_VALUES[16]*$RAND;$MAXPOINT=$PL_VALUES[16]*$RAND;
        @VS_VALUES=("300","$PL_VALUES[1]","0","要塞","AL","$PL_VALUES[5]","99","","0","zzzz","zzzz","zzzz","6","$PL_VALUES[0]","0","$HITPOINT","$MAXPOINT","9999","9999","$PL_VALUES[19]","$PL_VALUES[20]","$PL_VALUES[21]","$PL_VALUES[22]","99","999","0","$DATE","1000","0","99","0");
}
if ($FORM{'b_mode'} eq '实战演习'){
        $YOUSAINM = $MABOROSI;

        @VS_VALUES=("$PL_VALUES[0]","$PL_VALUES[1]","$PL_VALUES[2]","$PL_VALUES[3]","AL","$PL_VALUES[5]","$PL_VALUES[6]","$PL_VALUES[7]","$PL_VALUES[8]","$PL_VALUES[9]","$PL_VALUES[10]","$PL_VALUES[11]","$PL_VALUES[12]","$PL_VALUES[13]","$PL_VALUES[14]","$PL_VALUES[15]","$PL_VALUES[16]","$PL_VALUES[17]","$PL_VALUES[18]","$PL_VALUES[19]","$PL_VALUES[20]","$PL_VALUES[21]","$PL_VALUES[22]","$PL_VALUES[23]","$PL_VALUES[24]","$PL_VALUES[25]","$DATE","$PL_VALUES[27]","$PL_VALUES[28]","$PL_VALUES[29]","$PL_VALUES[30]");
}
if ($FORM{'b_mode'} eq '攻击训练'){
        $YOUSAINM = $ZAKO;
        $RAND=int(rand(10)+1);
        $HITPOINT=int($PL_VALUES[16]/$RAND);$MAXPOINT=int($PL_VALUES[16]/$RAND);
        @VS_VALUES=("0","$PL_VALUES[1]","","$ZAKO","AL","$PL_VALUES[5]","$PL_VALUES[6]","$PL_VALUES[7]","0","a","$PL_VALUES[10]","$PL_VALUES[11]","6","$PL_VALUES[13]","$PL_VALUES[14]","$HITPOINT","$MAXPOINT","100","100","$PL_VALUES[19]","$PL_VALUES[20]","$PL_VALUES[21]","$PL_VALUES[22]","$PL_VALUES[23]","$PL_VALUES[24]","$PL_VALUES[25]","$DATE","$ZAKOGIF","$PL_VALUES[28]","$PL_VALUES[29]","$PL_VALUES[30]");
}
	&REPAIR(PL);&REPAIR(VS);
        if (@CL_VALUES){$PL_Country="$PL_VALUES[5]";}else{$PL_Country=$NONE_NATIONALITY;$CL_VALUES[0]='#808080';}
        if (@VC_VALUES){$VS_Country="$VS_VALUES[5]";}else{$VS_Country=$NONE_NATIONALITY;$VC_VALUES[0]='#808080';}

if ( $PL_VALUES[26] >= time-$timer){&ERROR('每次训练时间不得小於10秒')}

        &ERROR('机体修理中') if $PL_VALUES[25]==1;
	local($PL_WN,$PL_WLV) = split(/!/,$PL_VALUES[9]);
	local($VS_WN,$VS_WLV) = split(/!/,$VS_VALUES[9]);
	require "$LOG_FOLDER/$HASH_DATA";
	@Pl_W=split(/\,/,$WEAPON_LIST{"$PL_WN"});
	@Vs_W=split(/\,/,$WEAPON_LIST{"$VS_WN"});
	$plbs=int ($PL_VALUES[20]+7) if $Pl_W[7] =~ m/4/;
	$vsbs=int ($VS_VALUES[20]+7) if $Vs_W[7] =~ m/4/;
	$Pl_AttPoint=int($Pl_W[1]*(($PL_WLV*0.0001)+1));
	$Pl_SpPoint=$PL_VALUES[21];$Pl_DefPoint=($PL_VALUES[20]+$plbs)*2-int($VS_VALUES[19]/3);$Pl_MisPoint=$PL_VALUES[22];
	$Pl_Kaikyu=&RANK($PL_VALUES[0],$PL_VALUES[5],$PL_VALUES[6]);
	$pwl=int $PL_WLV/$WEAPON_LVUP;$Pl_WeaponNameA="$Pl_W[0](Level.$pwl)";
	&ERROR('noEnergy','EN不足') if $PL_VALUES[17] < $Pl_W[4];
	$Vs_AttPoint=int($Vs_W[1]*(($VS_WLV*0.0001)+1));
	$Vs_SpPoint=$VS_VALUES[21];$Vs_DefPoint=($VS_VALUES[20]+$vsbs)*2-int($PL_VALUES[19]/3);$Vs_MisPoint=$VS_VALUES[22];
	$Vs_Kaikyu=&RANK($VS_VALUES[0],$VS_VALUES[5],$VS_VALUES[6]);
	$vwl=int $VS_WLV/$WEAPON_LVUP;$Vs_WeaponNameA="$Vs_W[0](Level.$vwl)";
	$Pl_SpPoint=int ($Pl_SpPoint*1.5) if $Pl_W[7] =~ m/3/;
	$Vs_SpPoint=int ($Vs_SpPoint*1.5) if $Vs_W[7] =~ m/3/;
	if ($PL_VALUES[16] > 50000){$Pl_SpPoint-=int(($PL_VALUES[16]-50000)/5000);}
	if ($VS_VALUES[16] > 50000){$Vs_SpPoint-=int(($VS_VALUES[16]-50000)/5000);}
	&SYUSEI('m',"$FORM{'mode'}",'Pl');
	$VsMsnNo=int(rand(8)+1);
	&SYUSEI('m',"$VsMsnNo",'Vs');
	&SYUSEI('s',"$PL_VALUES[12]",'Pl');
	&SYUSEI('s',"$VS_VALUES[12]",'Vs');
	$Pl_Times=$Vs_Times=0;	$Pl_Check=$Vs_Check=1;
	$hImg="<img src=\"$IMG_FOLDER1/hit.gif\">";
	$mImg="<img src=\"$IMG_FOLDER1/miss.gif\">";

	for ($Plt=1;$Plt < 100; $Plt++ ){
		$Pl_Initiative=$Pl_SpPoint+int(rand(30));$Vs_Initiative=$Vs_SpPoint+int(rand(30));
		if($Pl_Initiative >= $Vs_Initiative){$Initiative=1;}else{$Initiative=0;}
		if($VS_W >= $Vs_W[3] && $PL_W >= $Pl_W[3]){last;}
		if ($Vs_AtPoint < $PL_VALUES[15] && $PL_W < $Pl_W[3] && ($Initiative || $VS_W >= $Vs_W[3])){
			$Pl_Check=int(rand(100)+$Vs_SpPoint/2-$Pl_MisPoint/2);$PL_W++;
			if ($Pl_Check < $Pl_W[2]){$PlResult.="$hImg";$Pl_Times++;
				$Pl_AtPoint=$Pl_AtPoint+int($Pl_AttPoint-int($Vs_DefPoint*(int(rand(50)+90))/$Pl_W[3]));
			}elsif ($Pl_Check >= $Pl_W[2]) {$PlResult.="$mImg";}
		unless($PL_W % 10){$PlResult.="<br>\n";}
		next;
		}
		if ($Pl_AtPoint < $VS_VALUES[15] && $VS_W < $Vs_W[3] && (!$Initiative || $PL_W >= $Pl_W[3])){
			$Vs_Check=int(rand(100)+$Pl_SpPoint/2-$Vs_MisPoint/2);$VS_W++;
			if ($Vs_Check < $Vs_W[2]){$VsResult.="$hImg";$Vs_Times++;
				$Vs_AtPoint=$Vs_AtPoint+int($Vs_AttPoint-int($Pl_DefPoint*(int(rand(50)+90))/$Vs_W[3]));
			}elsif ($Vs_Check >= $Vs_W[2]){$VsResult.="$mImg";}
		unless($VS_W % 10){$VsResult.="<br>\n";}
		next;
		}
	}
	$Pl_AtPoint=0 if $Pl_AtPoint < 0;
	$Vs_AtPoint=0 if $Vs_AtPoint < 0;
	$dmgStyl="style=\"font-size:21px;color:#9acd32;\"";
	$chaStyl="style=\"font-size:12px;color:#dc143c;\"";
	$PlsumDmg="<b $dmgStyl>$Pl_W[3]</b> <b $chaStyl>次出击</b> <b $dmgStyl>$Pl_Times</b> <b $chaStyl>次击中</b>
		<b $dmgStyl>对方$Pl_AtPoint</b><b $chaStyl> 点损伤</b>" if $Pl_Times > 0;
	$PlsumDmg='<font color=#6a5acd>失败</font>' if $Pl_Times == 0;
	$VssumDmg="<b $dmgStyl>$Vs_W[3]</b> <b $chaStyl>次出击</b> <b $dmgStyl>$Vs_Times</b> <b $chaStyl>次击中</b>
		<b $dmgStyl>对方$Vs_AtPoint</b><b $chaStyl> 点损伤</b>" if $Vs_Times > 0;
	$VssumDmg='<font color=#6a5acd>失败</font>' if $Vs_Times == 0;
	$Pl_BfrHP=$PL_VALUES[15];
	$Vs_AtPoint=$PL_VALUES[15] if $PL_VALUES[15] < $Vs_AtPoint;
	$PL_VALUES[15]=$PL_VALUES[15]-$Vs_AtPoint;
	$Pl_width_per=$PL_VALUES[16]/150;
	$Pl_width_hp=int($PL_VALUES[15]/$Pl_width_per);
	$Pl_width_zen=int(($PL_VALUES[16]-$Pl_BfrHP)/$Pl_width_per);
	$Pl_width_dmg=int($Vs_AtPoint/$Pl_width_per);
	$PL_HPTAG="<img src=\"$IMG_FOLDER1/hp.gif\" hspace=0 height=7 width=$Pl_width_hp>" if $Pl_width_hp;
	$PL_HPTAG.="<img src=\"$IMG_FOLDER1/dmg.gif\" hspace=0 height=7 width=$Pl_width_dmg>" if $Pl_width_dmg;
	$PL_HPTAG.="<img src=\"$IMG_FOLDER1/zen.gif\" hspace=0 height=7 width=$Pl_width_zen>" if $Pl_width_zen;
	$Vs_BfrHP=$VS_VALUES[15];
	$Pl_AtPoint=$VS_VALUES[15] if $VS_VALUES[15] < $Pl_AtPoint;
	$VS_VALUES[15]=$VS_VALUES[15]-$Pl_AtPoint;
	$Vs_width_per=$VS_VALUES[16]/150;
	$Vs_width_hp=int($VS_VALUES[15]/$Vs_width_per);
	$Vs_width_zen=int(($VS_VALUES[16]-$Vs_BfrHP)/$Vs_width_per);
	$Vs_width_dmg=int($Pl_AtPoint/$Vs_width_per);
	$VS_HPTAG="<img src=\"$IMG_FOLDER1/hp.gif\" hspace=0 height=7 width=$Vs_width_hp>" if $Vs_width_hp;
	$VS_HPTAG.="<img src=\"$IMG_FOLDER1/dmg.gif\" hspace=0 height=7 width=$Vs_width_dmg>" if $Vs_width_dmg;
	$VS_HPTAG.="<img src=\"$IMG_FOLDER1/zen.gif\" hspace=0 height=7 width=$Vs_width_zen>" if $Vs_width_zen;
WORL:{
	$VS_VALUES[15] == 0 && $PL_VALUES[15] > 0 && do{
		$ResultBattle=0;
		$PL_In[0]=int (rand(5)+8);$VS_In[0]=int (rand(2)+2);
		$PL_In[1]=3;$VS_In[1]=-2;
		$PL_In[2]=int(rand(200)+400)+((250-$PL_VALUES[29])*$GET_MONEY);
		$VS_In[2]=int(rand(200)+400)+((250-$VS_VALUES[29])*int($GET_MONEY/3));
		$PL_VALUES[24]++;$VS_VALUES[25]=1;
		($PL_VALUES[0]=0,$PL_VALUES[5]="$FORM{'boumeiC'}",$B_Com='完成',$PL_VALUES[6]=0)if $FORM{'b_mode'} eq '亡命';

⌨️ 快捷键说明

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