PHP实用小程序（七） / 憋错料

<?
    //用COOKIE保存投票人的投票记录
    if($vote && !$already_voted) SetCookie("already_voted","1");
?>
<html>
<head>
<title>简易投票系统</title>
</head>
<body alink="#FF0000" link="#000099" vlink="#CC6600" topmargin="8" leftmargin="0" bgColor="#FFFFFF">
<br><center><font color=green>简易投票系统-学习PHP 4.0容易吗？</font></center><br>
<table cellspacing=0 bordercolordark=#FFFFFF width="60%" bordercolorlight=#000000 border=1 align="center" cellpadding="2">
  <tr>
    <td align="center">
<form action="<?echo $PHP_SELF?>" method="post" name="frmVote">
<br>添加一个投票类别: <input type="text" name="newvoteitem" size="20" maxlength="30"><input type=submit value="添 加"><br><br>
<?
    //连接数据库
    mysql_connect("localhost","root","");
    $mysqldb="test";
    if($newvoteitem)
    {
        //添加新的投票项
        if(!mysql_db_query($mysqldb,"insert into vote values (‘$newvoteitem‘,0)"))
        {
            echo "添加出错！<br>";
        }
    }
    //用COOKIE保存投票人的投票记录
    if($vote && $already_voted) {
         echo "<font color=red>请您不要重复投票，谢谢！</font><br><br>\n";
     }
     else if($vote)
     {
         if(!mysql_db_query($mysqldb,"update vote set votes=votes+1 where name=‘$vote‘"))
         {
             echo "投票出错！<br>";
         }
     }
     //计算总投票数
     $result=mysql_db_query($mysqldb,"select sum(votes) as sum from vote");
     if($result)
     {
         $sum=(int) mysql_result($result,0,"sum");
         mysql_free_result($result);
     }
     //读出投票项数据
     $result=mysql_db_query($mysqldb,"select * from vote order by votes DESC");
?>
<table cellspacing=0 bordercolordark=#FFFFFF width="90%" bordercolorlight=#000000 border=1 align="center" cellpadding="2">
  <tr>
    <td align="center" width="15%">投票</td>
    <td align="center" width="60%">选项</td>
    <td align="center" width="25%">票数/比例</td>
  </tr>
<?
    //循环读出投票项
    while($row=mysql_fetch_row($result))
    {
        //计算百分比
        $per=(int)(100*$row[1]/$sum);
?>
  <tr>
    <td align="center"><input type=radio name=vote value="<?echo $row[0]?>"></td>
    <td><?echo $row[0]?></td>
    <td align="right"><?echo $row[1]?><img src="blue.gif" height=10 width="<?echo $per?>"><?echo $per?></td>
  </tr>
<?
    }
    //释放结果集
     mysql_free_result($result);
 ?>
</table>
<br><input type=submit value="投 票">
</form>
    </td>
  </tr>
</table>
</BODY>
</HTML>

<?
    require("config.php");
    $sqldo="select count(*) as title from $mytable where sub_id<1";
    $result=mysql_query($sqldo);
    $message_count=mysql_result($result,0,"title");
?>
<table border="0" width="75%" cellspacing="0" cellpadding="0" align="center">
  <tr bgcolor="FFEAA2">
    <td width="100%" height="18" valign="bottom" align="right">留言总数：<font color=red><?echo $message_count?></font> | <a href="guestbook.php">看留言</a>&nbsp;&nbsp;&nbsp;&nbsp;</td>
  </tr>
</table>
<?
    if ($doadd)
    {
        $name=htmlspecialchars($name);
        $email=htmlspecialchars($email);
        $comefrom=htmlspecialchars($comefrom);
        $homepage=htmlspecialchars($homepage);
        $icq=htmlspecialchars($icq);
        $oicq=htmlspecialchars($oicq);
        $image=htmlspecialchars($image);
        $comment=htmlspecialchars($comment);
        if ($name&&$comment) {
            $add_time=date("Y")."-".date("m")."-".date("d")." ".date("H").":".date("i").":".date("s");
            $result=mysql_query("insert into $mytable (sub_id,name,email,comefrom,homepage,icq,oicq,image,comment,password,add_time) values (‘$sub_id‘,‘$name‘,‘$email‘,‘$comefrom‘,‘$homepage‘,‘$icq‘,‘$oicq‘,‘$image‘,‘$comment‘,‘$password‘,‘$add_time‘)");
            if ($notify) {
                $message="$comment\n\n$name $email\n\n$add_time";
                mail($admin_email, "有新的留言: ".$name, $message, "From: ".$email."\nReply-To: ".$email."\nX-Mailer: PHP/" . phpversion());
            }
            echo "<p align=\"center\">您的留言发送成功，谢谢！<a href=\"guestbook.php\">查看留言请返回</a></p>\n";
        }
        else {
            echo "<p align=\"center\">姓名和内容必须填写！<a href=\"JavaScript:history.back()\">返回</a></p>\n";
        }
    }
    else {
        if ($reply&&$recid) {
            echo "<p align=\"center\">回复留言</p>";
            $sub_id="<input type=\"hidden\" name=\"sub_id\" value=\"$recid\">";
        }
        else {
            echo "<p align=\"center\">填写留言</p>";
        }
            echo "<form method=\"POST\" action=\"add.php\">
    <table border=\"0\" width=\"75%\" align=\"center\">
      <tr>
        <td>
          <div align=\"center\">
            <table border=\"0\" width=\"80%\" cellpadding=\"20\" cellspacing=\"0\">
              <tr>
                <td width=\"100%\" bgcolor=\"FFFBEC\">姓名: <input type=\"text\" name=\"name\" size=\"25\">$sub_id
                  电子邮件: <input type=\"text\" name=\"email\" size=\"25\"><br>
                  来自: <input type=\"text\" name=\"comefrom\" size=\"25\"> 主页地址: <input type=\"text\" name=\"homepage\" size=\"25\"><br>
                  OICQ: <input type=\"text\" name=\"oicq\" size=\"25\">
                  <p>表情: ";
        $con=1;
        while ( list( $key, $val ) = each( $images ) ) {
            $checked="";
            if ($con==1) {
                $checked=" checked";
                $con=0;
            }
            echo "<input type=\"radio\" value=\"$key\" name=\"image\"$checked><img border=\"0\" src=\"$imgdir/$key\" alt=\"$val\"> ";
        }
        echo "</p>\n                  <p><b>留言:</b><br>
                  <textarea rows=\"4\" name=\"comment\" cols=\"72\"></textarea></p>
                  <p><input type=\"submit\" value=\"发送留言\" name=\"doadd\"> <input type=\"reset\" value=\"擦掉重写\" name=\"B2\"></td>
              </tr>
            </table>
          </div>
        </td>
      </tr>
    </table>
    </center>
  </div>
</form>
";
    }
?>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>PHP4.0 +MYSQL 留言本</title>
<style type="text/css">
<!--
input { font-size:9pt; }
A:link {text-decoration: underline; font-size:9pt;color:000059}
A:visited {text-decoration: underline; font-size:9pt;color:000059}
A:active {text-decoration: underline; font-size:9pt}
A:hover {text-decoration:underline;color:red}
body,table {font-size: 9pt}
tr,td{font-size:9pt}
-->
</style>
</head>
<body alink="#FF0000" link="#000099" vlink="#CC6600" topmargin="8" leftmargin="0" bgColor="#FFFFFF">
<center><font color=red size=6>PHP4.0+MYSQL 留言本</font></center><br>
<?
    $dbuser=mysql_connect(‘localhost‘,‘root‘,‘‘);
    $mydb=mysql_select_db(‘test‘,$dbuser);
    $mytable="guestbook";   // 表名
    $page_size=8;
    $notify=1;
    $imgdir="images";

    $images=array( "say.gif" => "随便说说",
                "happy.gif" => "高兴",
                "sad.gif" => "悲伤",
                "toohappy.gif" => "大笑",
                "wilk.gif" => "眨眼",
                "warning.gif" => "警告",
                "question.gif" => "问题",
                "reply.gif" => "回答",
                "attention.gif" => "注意",
                "agree.gif" => "同意",
                "other.gif" => "号外" );
?>

<?
    require("config.php");
    if (!$page)
    {
        $page=1;
    }
    $sqldo="select count(*) as title from $mytable where sub_id<1";
    $result=mysql_query($sqldo);
    $message_count=mysql_result($result,0,"title");
    $page_count=ceil($message_count/$page_size);
    $offset=($page-1)*$page_size;
    $sqldo="select * from $mytable where sub_id<1 order by id desc limit $offset, $page_size";
    $result=mysql_query($sqldo);
?>
<table border="0" width="70%" cellspacing="0" cellpadding="0" align="center">
  <tr bgcolor="FFEAA2">
    <td width="100%" height="18" valign="bottom" align="right">留言总数：<font color=red><?echo $message_count?></font> | <a href="add.php">写留言</a>&nbsp;&nbsp;&nbsp;&nbsp;</td>
  </tr>
</table>
<br>
<table border="0" width="70%" cellspacing="0" cellpadding="0" align="center">
<?
    if($result)
    {
        while($myrow=mysql_fetch_array($result))
        {
            listtopic($myrow,"70%",1);
            $sqldo2="select * from $mytable where sub_id=$myrow[id] order by add_time";
            $result2=mysql_query($sqldo2);
            if($result2)
            {
                $rows2=mysql_num_rows($result2);
                if($rows2)
                {
?>

  <tr>
    <td width="100%">
      <table border="0" width="100%" cellspacing="0" cellpadding="0" align="center">
        <tr>
          <td width="5%" bgcolor="FFFECC" align="center">回<br>复</td>
          <td width="95%">
<?
                    while($myrow2=mysql_fetch_array($result2))
                    {
                        listtopic($myrow2,"100%",0);
                        echo "  </table>";
                    }
?>
          </td>
        </tr>
      </table>
    </td>
  </tr>
<?
                }
            }

            echo "  </table>
<br>
";
        }
        $prev_page=$page-1;
        $next_page=$page+1;
        echo "             <p align=\"center\">| ";
        if ($page<=1){
            echo "第一页 | ";
        }
        else{
            echo "<a href=‘$PATH_INFO?page=1‘>第一页</a> | ";
        }
        if ($prev_page<1){
            echo "上一页 | ";
        }
        else{
            echo "<a href=‘$PATH_INFO?page=$prev_page‘>上一页</a> | ";
        }
        if ($next_page>$page_count){
            echo "下一页 | ";
        }
        else{
            echo "<a href=‘$PATH_INFO?page=$next_page‘>下一页</a> | ";
        }
        if ($page>=$page_count){
            echo "最后一页 |</p>\n";
        }
        else{
            echo "<a href=‘$PATH_INFO?page=$page_count‘>最后一页</a> |</p>\n";
        }
    }

    function listtopic($myrow,$this_table_width,$is_reply)
    {
            global $imgdir;
            $comment=nl2br($myrow[comment]);
            if ($myrow[email]) {
                $line1_left="<img border=\"0\" src=\"$imgdir\\$myrow[image]\"> <a href=\"mailto:$myrow[email]\">$myrow[name]</a>";
            }
            else {
                $line1_left="<img border=\"0\" src=\"$imgdir\\$myrow[image]\"> $myrow[name]";
            }
            if ($myrow[comefrom]) {
                $line1_left .= "&nbsp;&nbsp;来自: $myrow[comefrom]";
            }
            else {
                $line1_right="";
            }
            if ($myrow[oicq]) {
                $line1_right .= " <img border=\"0\" src=\"$imgdir\\oicq.gif\" alt=\"OICQ:$myrow[oicq]\">";
            }
            if ($myrow[homepage]) {
                $line1_right .= " <a href=\"$myrow[homepage]\" target=\"_blank\"><img border=\"0\" src=\"$imgdir\\homepage.gif\" alt=\"主页:$myrow[homepage]\"></a>";
            }
            if ($is_reply) {
                $toolsbar="<a href=\"add.php?reply=1&recid=$myrow[id]\" $table_head_bodystyle>回复</a>&nbsp;";
            }
            $toolsbar .= "修改&nbsp;删除&nbsp;";
?>
  <table border="0" width="<?echo $this_table_width?>" align="center">
    <tr>
      <td width="100%" bgcolor="fff8d9">
        <table border="0" width="100%" cellspacing="0" cellpadding="0">
          <tr>
            <td width="50%"><?echo $line1_left?></td>
            <td width="50%" align="right"><?echo $line1_right?>&nbsp;</td>
          </tr>
        </table>
      </td>
    </tr>
    <tr>
      <td width="100%" bgcolor="FFFBEC"><?echo $comment?></td>
    </tr>
    <tr>
      <td width="100%" bgcolor="FFFBEC">
        <table border="0" width="100%" cellspacing="0" cellpadding="0">
          <tr>
            <td width="50%">留言时间：<?echo $myrow[add_time]?></td>
            <td width="50%" align="right"><?echo $toolsbar?></td>
          </tr>
        </table>
      </td>
    </tr>
<?
}
?>

<?
// 本例来自与ZEND网站，由HUNTE整理 

if($action1){
//如果文件上传，进行处理
?>
<html>
<head>
<title>多文件上传</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head> 

<body bgcolor="#FFFFFF" text="#000000">
<p><font face="Arial, Helvetica, sans-serif"><font size="+1">文件上传处理</font><br><br> 

<?
set_time_limit(60);
// 以确保较大文件上传
$path1 = dirname($PATH_TRANSLATED)."/upload/";
//输出上传路径;
//print $path1."<br>";
// assign our path in a form PHP for Windows understands 

for($i=1;$i<3;$i++)
{
$temp1="file".$i;
$temp2="file".$i."_name";
$source=$$temp1;
$source_name=$$temp2;
// print $temp."=".$$temp."<br>"; 

//print $file1_name;
//print $file2_name;
//exit; 

//*****************
//$source = $file1;
//$source_name = $file1_name;
//print $source."<br>";
//print $source_name;
//exit;
if(($source <> "none")&&($source <> ""))
{
// see if the file exists; non-existing file has name of "none"
if($error1 <> 1)
{
// no need to copy a file if directory not write-enabled
$dest = $path1.$source_name;
// append file name to our path 

if(copy($source,$dest)){
// copy the file from the temp directory to the upload directory, and test for success
echo "$source has been uploaded<br>\n";
$imagesize = getimagesize($dest);
switch($imagesize[2])
{
case 0:
echo "<br> Image is a unknown <br>";
//unlink($dest);
exit;
case 1:
echo "<br> Image is a GIF <br>";
echo "$dest has a width of $imagesize[0]<br>";
echo "$dest has a height of $imagesize[1]<br>";
$newname = $path1;
$newname .=$i.time() . ".gif";
if(copy($dest,$newname))
{
//echo "<br> GIF Rename Successful from $dest to $newname";
}else {
//echo "<br> GIF Rename Unsuccessful";
}
//unlink ($dest);
break;
case 2:
echo "<br> Image is a JPG <br>";
echo "$dest has a width of $imagesize[0]<br>";
echo "$dest has a height of $imagesize[1]<br>";
$newname = $path1;
$newname .=$i.time() . ".jpg";
if(copy($dest,$newname))
{
//echo "<br> JPG Rename Successful from $dest to $newname";
}else {
//echo "<br> JPG Rename Unsuccessful";
}
//unlink ($dest);
break;
case 3:
echo "<br> Image is a PNG <br>";
echo "$dest has a width of $imagesize[0]<br>";
echo "$dest has a height of $imagesize[1]<br>";
$newname = $path1;
$newname .=time() . ".png";
if(copy($dest,$newname))
{
//echo "<br> PNG Rename Successful from $dest to $newname";
}else {
//echo "<br> PNG Rename Unsuccessful";
}
//unlink ($dest);
break;
}
}else {
echo "Upload directory not write-enabled\n";
// you need to write-enable the upload directory
$error1 = 1; // set flag
}
}
//unlink($source);
// delete the file from the temp directory
} 

?>
<image src="upload/<? print basename($newname)?>">
<?
} //end for
?>
<br><a href="90.php">Back</a>
</font></p>
</body>
</html> 

<?
}
else { 

?> 

<html>
<head>
<title>多文件上传</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head> 

<body bgcolor="#FFFFFF" text="#000000">
<p><font face="Arial, Helvetica, sans-serif"><font size="+1">File
Upload</font><br><br>
If your browser is upload-enabled, you will see &quot;Browse&quot;
(Netscape, Internet Explorer) or &quot;. . .&quot; (Opera) buttons below.
Use them to select file(s) to upload, then click the &quot;Upload&quot;
button. After the files have been uploaded, you will see a results screen.<br>
<form method="post" enctype="multipart/form-data" action="90.php">
<input type="hidden" name="MAX_FILE_SIZE" value="800000">
<input type="hidden" name="action1" value="1">
File 1: <input type="file" name="file1" size="30"><br>
File 2: <input type="file" name="file2" size="30"><br>
<br>
<input type="submit" value="Upload">
</form>
</font></p>
</body>
</html> 

<? 

} 

?>

<?php
//计数器
//本计数器无需数据库支持。
//说明：
// $five,$four等标量表示零的个数，放在数字前构成6位
//的来访者数目。当然，如果你的网站
//浏览量十分巨大，你可以添加$six,$seven等等构成更大的数字显
//示来访者的数目。
function Counter() {
$five="00000";
$four="0000";
$three="000";
$two="00";
$one="0";
$counter="counternumber.dat"; //存放访客数目的文件.dat格式
if (!file_exists($counter)) //判断文件是否存在,如果不存在以写方式建立一个文件
{
$counter=fopen($counter,"w");
fputs($counter,"0");
fclose($counter);
}
else
{
$num=file($counter,"r"); //如果文件存在则读出文件，并加1
$num[0]+=1;
if($num[0]<10){ //判断数字的大小，如果小于100000根据不同情况在前面
print "$five"."$num[0]"; //加上不同个数的0，为了凑够6位。
}elseif($num[0]<100){
print "$four"."$num[0]";
}elseif($num[0]<1000){
print "$three"."$num[0]";
}elseif($num[0]<10000){
print "$two"."$num[0]";
}elseif($num[0]<100000){
print "$one"."$num[0]";
}else{
print "$num[0]";
} }
$fp=fopen($counter,"w"); //以写入文件方式打开文件
fputs($fp,"$num[0]"); //将加过1的数字放入文件中
fclose($fp); //关闭文件
} 

?> 

<!-- 可以用<?php Counter()?>形式调用函数，并用html标记或
CSS样式单来修饰显示出的数字,如下所示 -->
<html>
<body>
<U>
<B>
<FONT SIZE="9" face="verdana" COLOR="#ffcc00">
<?php Counter()?>
</FONT>
</B>
</U>
</body>
</html>

<?
highlight_file($filename); //高亮显示文件代码
?>

<body bgcolor="#fafad2">
<?
require ("phplist.inc");
if ($rootpath=="") {$rootpath=$htmlroot;}
function filelist($pathname){ //遍历所有的文件和目录，$pathnam为起始目录，$searchs为搜索关键字
global $htmlroot;
if (eregi("[/][.][.]$",$pathname)) {
$temp=split("[/]",$pathname);
$pathname="";
for ($tt=1;$tt<(count($temp)-2);$tt++)
$pathname=$pathname."/".$temp[$tt];
}
echo $pathname."<br>";
$handle=opendir($pathname); //打开目录
if (@chdir($pathname)) { //cd 进入目录，若无权限则不进入
$file = readdir($handle); //读出所有当前目录下的元素名，第一次读出为‘。’，指上层目录
while ($file = readdir($handle)) { //若有元素就进行以下处理
$fname=$pathname."/".$file; //将元素名与当前目录名结合组成完整的文件名，并赋值给$fname
if ((is_file($file)) and (ereg("\.php[3]{0,1}$",$file) or ereg("\.htm[l]{0,1}$",$file))) //判断是否为文件并且是否以.php和.php3结尾
{
$temppp=split($htmlroot,$fname);
echo "<a href=$temppp[1]>".$file."</a>&nbsp;&nbsp;&nbsp;".filesize($file)."bytes&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href=codeshow.php?filename=$fname><font size=-1>源文件</font></a><br>";
//findinfile($fname,$searchs); //调用findinfile函数
}
elseif (is_dir($fname)) { //判断是否为目录
linkres($fname);
//filelist($fname,$searchs);} //递归调用filelist函数
}
}
chdir(".."); //结束当前递归，返回上层
}
closedir($handle); //关闭当前目录读取
}
//
function linkres($filename){
$tpath=split("/web/html",$filename);
$turepath=$tpath[1];
ereg("[^\\\/\~]{0,}$",$filename,$res);
//$ft=filetitle($filename);
//if ($ft=="") $ft="无标题";
echo "<a href=phplist.php?rootpath=$filename>".$res[0]."</a>&nbsp;&nbsp;&nbsp;&lt;dir&gt;<br>";
}
//
filelist($rootpath);
?> 

</body>

<html>
<head>
<Title>简易聊天室</title>
</head>
<body TOPMARGIN=0 LEFTMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0>
<TABLE width="100%" border="0" cellspacing="0" cellpadding="0">
<tr align="left" bgcolor="#666666">
<td height="20">
<?
/*If you have ICQ List you vin here.*/
$uin = "20559508";
/*Dat file name. Make sure it is in the same folder*/
$talk_back_ok = "msg.txt";
/*Webmasters Image Location(put url not path)*/
$webmaster_image = "kmoo.gif";
/*Webmasters Name*/
$webmaster_name = "root";
/*Webmasters Password*/
$pass = "";
/*messages displayed*/
$help_lenght = 20;
/*Home Long can the lake each message*/
$max_single_msg_lenght = 100000;
$max_file_size = $help_lenght * $max_single_msg_lenght;
?></b></i>
</td></tr>
<tr bgcolor="#FFCC66">
<td><img src="pix.gif" width="1" height="4" ></td>
</tr></TABLE>
<TABLE width="100%" border=0 cellspacing=0 cellpadding=0 bgcolor="#EFEFEF">
<tr bgcolor="#666666"><td align="left">
<TABLE width="100%" height="500" border=0 cellspacing=0 cellpadding=0 bgcolor="#EFEFEF">
<tr align="left"><td valign="top"><font size="-1" color="#666666">
<?
$person = str_replace ("\n"," ", $person);
$person = str_replace ("<", " ", $person);
$person = str_replace (">", " ", $person);
$person = stripslashes ($person);
?>
<table width="100%" border="0">
<TR><form action="gorilla.php" method="post"><TD align="left">
<FONT SIZE="-1">妮称：</FONT><input type="text" name="person" size="12" maxlength="80" value="<? echo $person; ?>">
<FONT SIZE="-1"></FONT>       <input type="text" name="message" size=60>
<input type="submit" value="发言">
</TD></form></TR>
<?
/* check if file size is over maximum*/
$file_size= filesize($talk_back);
if ($file_size > $max_file_size) {
$lines = file($talk_back_ok);
$a = count($lines);
$u = $a - $help_lenght;
for($i = $a; $i >= $u ;$i--){
        $msg_old =  $lines[$i] . $msg_old;
    }
$deleted = unlink($talk_back_ok);
$fp = fopen($talk_back_ok, "a+");
$fw = fwrite($fp, $msg_old);
fclose($fp);
}
$msg = str_replace ("\n"," ", $message);
$msg = str_replace ("\n"," ", $message);
$msg = str_replace ("<", " ", $msg);
$msg = str_replace (">", " ", $msg);
$msg = stripslashes ($msg);
if($person == $pass)
   {
   $sign = ("<img src= ‘$webmaster_image‘>&nbsp;$webmaster_name");
   }
   else
   {
   $sign = ($person);
   }
if ($msg != "" && $person != ""){
$time = gmDate("h:i");
$fp = fopen($talk_back_ok, "a+");
$fw = fwrite($fp, "\n<tr><td><FONT SIZE=\"+1\"><b> $sign :</b></FONT><FONT SIZE=\"-2\" color=\"red\"><I>$time</I></FONT>&nbsp;:<FONT SIZE=\"-1\"> $msg<br></FONT></td></tr>");
fclose($fp);
}
?>
</table>
</CENTER>
</font></td></tr></TABLE></td></tr></TABLE>
</body></html>

<html>
<head>
<Title>
聊天室
</title>
</head>
<META HTTP-EQUIV=Refresh CONTENT="5; URL=gorilla2.php">
<body  bgcolor="#EFEFEF">
<?
/*Dat file name. Make sure it is in the same folder*/
$talk_back_ok = "msg.txt";
/*Webmasters Name*/
/*Webmasters Password*/
/*messages displayed*/
$help_lenght = 15;
/*Home Long can the lake each message*/
$max_single_msg_lenght = 100000;
$max_file_size = $help_lenght * $max_single_msg_lenght;
?>
<?

/* check if file size is over maximum*/

$file_size= filesize($talk_back);

if ($file_size > $max_file_size) {

$lines = file($talk_back_ok);

$a = count($lines);

$u = $a - $help_lenght;
for($i = $a; $i >= $u ;$i--){
        $msg_old =  $lines[$i] . $msg_old;
    }
$deleted = unlink($talk_back_ok);
$fp = fopen($talk_back_ok, "a+");
$fw = fwrite($fp, $msg_old);
fclose($fp);
}

$msg = str_replace ("\n"," ", $message);

$msg = str_replace ("\n"," ", $message);
$msg = str_replace ("<", " ", $msg);
$msg = str_replace (">", " ", $msg);
$msg = stripslashes ($msg);

if($person == $pass)
   {
   $sign = ("<img src= ‘$webmaster_image‘>&nbsp;$webmaster_name");
   }
   else
   {
   $sign = ($person);
   }

if ($msg != "" && $person != ""){
$time = gmDate("h:i");
$fp = fopen($talk_back_ok, "a+");
$fw = fwrite($fp, "\n<tr><td><FONT SIZE=\"+1\"><b> $sign :</b></FONT><FONT SIZE=\"-2\" color=\"red\"><I>$time</I></FONT>&nbsp;:<FONT SIZE=\"-1\"> $msg<br></FONT></td></tr>");
fclose($fp);
}

$lines = file($talk_back_ok);
$a = count($lines);

$u = $a - $help_lenght;

for($i = $a; $i >= $u ;$i--){

        echo $lines[$i];
    }

?><BR>
</body></html>

<html>
<head><Title>
在线聊天
</title></head>
<!-- frames -->
<frameset  rows="82%,*" BORDER="0">
    <frame name="top" src="gorilla2.php" marginwidth="0" marginheight="0" scrolling="no" FRAMEBORDER="NO" noresize>
    <frame name="bottom" src="gorilla.php" marginwidth="0" marginheight="0" scrolling="yes" frameborder="no" noresize>
</frameset>

<body>

</body>
</html>

<?
    $adminpsd   = "xlj";            //管理密码
    $newsbook   = "./data/newsbook.txt";    //新闻存放的文件
    $refreshbook    = "./data/refreshbook.txt"; //防刷新的文件
    $line_max   = 5;                //显示的最大纪录数
    $dot_pic    = "dot2.gif";           //图片
?>

<? require "config.php"; ?>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<style type="text/css">
<!--
input { font-size:9pt;}
A:link {text-decoration: underline; font-size:9pt;color:000059}
A:visited {text-decoration: underline; font-size:9pt;color:000059}
A:active {text-decoration: none; font-size:9pt}
A:hover {text-decoration:underline;color:red}
body,table {font-size: 9pt}
tr,td{font-size:9pt}
-->
</style>
<title>简单的新闻公告栏</title>
</HEAD>
<body alink="#FF0000" link="#000099" vlink="#CC6600" topmargin="8" leftmargin="0" bgColor="#FFFFFF">
<br>
<?
    $line_array=file($newsbook);
    $linenum=count($line_array);
    if($table!=1)
    {
?>
<table width=70% bgcolor="FFFBEC" align="center">
  <tr>
    <td width=5%></td><td width=95%></td>
  </tr>
<?
    }
    $i=0;
    while($i<$linenum && $i<$line_max)
    {
        $line="$line_array[$i]\n";
        print "$line";
        $i++;
    }
    if($table!=1)
    {
?>
</table>
<?
    }
?>
</body>
</html>

<?require "config.php";?>
<?
    if($password !=$adminpsd)
    {
        print "管理密码错!<br>";exit;
    }
    $title=ereg_replace("\r\n",‘<br>‘,$title);
    $addline="<tr><td valign=top><img border=0 src=$dot_pic></td><td>$title</td></tr></td>";
    //查数据文件是否存在
    if(!file_exists($refreshbook))
    {
        $f = fopen("$refreshbook","w");
        fclose($f);
    }
    if(!file_exists($newsbook))
    {
        $f = fopen("$newsbook","w");
        fclose($f);
    }
    $f = fopen("$refreshbook","r");
    $line_has1 = fread($f,filesize("$refreshbook"));
    fclose($f);
    if($addline==$line_has1)
    {
        print "数据已经登录,请勿刷新!<br>";
        exit;
    }
    else
    {
        $f = fopen("$refreshbook","w");
        fwrite($f,"$addline");
        fclose($f);
    }
    //先读出原有数据
    $f = fopen("$newsbook","r");
    $line_has = fread($f,filesize("$newsbook"));
    fclose($f);
    //用覆盖方式(w)将原数据及新数据写回去
    $f = fopen("$newsbook","w");
    fwrite($f,"$addline\n");    #写进去,要加 \n
    fwrite($f,"$line_has");
    fclose($f);
    print "录入完成,谢谢!<br>";exit;
?>

<html>
<head>
<title>PHP目录树演示</title>
<style>
  BODY { font-family : Verdana,Arial; }
  TD   { font-family : Verdana,Arial; font-size : 8pt; }
  A    { text-decoration : none; background-color : #EEFFEE; }
</style>
</head>
<body bgcolor=#eeffee link=#339933>
<h4>PHP目录树演示</h4>
<?php
  /*********************************************/
  /*  PHP目录树演示                      */
  /*********************************************/

  /*********************************************/
  /*  文件结构            */
  /*********************************************/

  $treefile = "demomenu.txt";

  /*********************************************/
  /*  包函树节点                        */
  /*********************************************/

  require "treemenu.inc";

?>

</body>
</html>

<?
    $file=file("record.txt");
    $intt=sizeof($file);
    $file2=array();
    $cont=$intt/3;

    $conttj=1;
    for($i=0;$i<$intt;$i=$i+3)
    {
        if($file[$i] == $id."\n")
        {
            $k=$i;
            for($j=$conttj;$j<=$cont;$j++)
            {
                $file[$k]=$file[$k+3];
                $file[$k+1]=$file[$k+4];
                $file[$k+2]=$file[$k+5];
                $k=$k+3;
            }
            $conttj=$conttj+1;
        }
    }
    $intt2=sizeof($file);
    $f2=fopen("record.txt","w+");
    for($i=0;$i<$intt2;$i++)
    {
        fputs($f2,$file[$i]);
    }
?>

<HTML>
<HEAD>
<TITLE>访客留言本</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
</HEAD>
<FRAMESET border=false cols=300,* frameBorder=0 frameSpacing=0>
<FRAME name=contents src="leftnew.php" target="right">
<FRAME name=right src="listnew.php"><NOFRAMES>
<body>
</body>
</NOFRAMES>
</FRAMESET>
</HTML>

View Raw Code?
<HTML>
<HEAD>
<TITLE>访客留言本</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<link rel="stylesheet" href="css.css">
</HEAD>
<script language="JavaScript">
<!--

function Juge(theForm)
{
  if (theForm.name.value == "")
  {
    alert("请输入您的姓名!");
    theForm.name.focus();
    return (false);
  }
    if (theForm.txt.value == "")
  {
    alert("请输入留言内容!");
    theForm.txt.focus();
    return (false);
  }
}

//-->
</script>

<body alink="#FF0000" link="#000099" vlink="#CC6600" bgColor="#CCCCCC">
<TABLE align=center border=0 cellPadding=0 cellSpacing=1 width=264>
  <TBODY>
  <TR>
    <TD>
      <TABLE border=0 cellPadding=5 cellSpacing=1 width="60%" align="center">
        <TR vAlign=top>
          <TD bgColor=#ffffff><IMG src="images/doodle_title.gif"></TD>
        </TR>
        <TBODY>
        <TR vAlign=top>
          <FORM action=listnew.php?type=add method=post target=right onSubmit="return Juge(this)">
            <TD bgColor=#ffffff>
              <div align="center"><BR>
                姓名 <INPUT class=stedit name=name size=24>
                <BR>
                信箱 <INPUT class=stedit name=email size=24 [email protected]>
                <BR>
                主页 <INPUT class=stedit name=url size=24 value=http://>
                <BR>
                主题 <INPUT class=stedit name=title size=24>
                <BR>
                选项 <INPUT CHECKED id=radio1 name=sex type=radio value=1>
                男 <INPUT id=radio2 name=sex type=radio value=0>
                女 <SELECT class=stbtm name=mind size=1 style="BACKGROUND-COLOR: #f5f5f5; FONT-SIZE: 9pt">
                  <OPTION selected value=01>大家讨论</OPTION>
                  <OPTION value=02>真高兴</OPTION>
                  <OPTION value=03>不高兴</OPTION>
                  <OPTION value=04>很满意</OPTION>
                  <OPTION value=05>我赞同</OPTION>
                  <OPTION value=06>说得好</OPTION>
                  <OPTION value=07>你真傻</OPTION>
                  <OPTION value=08>交个朋友</OPTION>
                  <OPTION value=09>请注意</OPTION>
                  <OPTION value=10>为什么</OPTION>
                  <OPTION value=11>真奇怪</OPTION>
                  <OPTION value=12>还不错</OPTION>
                  <OPTION value=13>我愤怒</OPTION>
                  <OPTION value=14>我伤心</OPTION>
                </SELECT>
                <BR>
                内 容 <BR>
                <textarea class="stedit" cols="25" name="txt" rows="7"></textarea>
                <BR>
                <IMG
            border=0 height=5 src="" width=1><BR>
                <input class=stedit name=Submit type=submit value=" 提 交 ">
                <input class=stedit name=Submit2 type=reset value=" 清 除 ">
              </div>
            </TD>
          </FORM>
        </TR>
        </TBODY>
      </TABLE>
    </TD></TR>
  </TABLE>
<br>
</BODY>
</HTML>

<?
    if($type=="add")
    {
        $file=file("record.txt");
        $intt=sizeof($file);
        $tx=$file[0]+1;

        $f = fopen("record.txt","r+");
        $msg = fread($f,filesize("record.txt")) ;
        fclose($f);

        $f = fopen("record.txt","r+");
        $text=$txt;
        $text=htmlspecialchars($text);
        $text=ereg_replace("\r\n","<br>",$text);
        $text=ereg_replace("\r","<br>",$text);
        $text=$text."\n";
        $t = date(Y年m月d日H时i分);
        $line1=$name."||".$email."||".$url."||".$sex."||".$mind."||".$title."||".$t."\n";
        if(str_replace("\n","",$file[2])!=trim($text))
        {
            fputs($f,$tx."\n");
            fputs($f,$line1);
            fputs($f,$text);
            fputs($f,$msg);
            fclose($f);}
        }
?>

<?
    $filename="record.txt";
    $file=file($filename);
    $intt=sizeof($file);
    $pagesize=3;
    $pagecount=round(($intt/3)/$pagesize) ;

    if($pagesize*$pagecount<$intt/3)
    {
        $pagecount++;
    }

    if($pagepage2)
    {
        $page=$pagepage2-1;
        if($pagepage2>$pagecount)
        {
            $page=$pagecount-1;}
            if($pagepage2<1)
            {
                $page=0;}
            }

            $pagecount2=$pagecount-1;
            $page2=$page+1;
            $pp=$page*$pagesize*3;
            $pp2=$pp+$pagesize*3;
            $nextpage=$page+1;
            $prevpage=$page-1;
?>
<HTML>
<HEAD>
<meta http-equiv="cache-control" content="private"></meta>
<meta http-equiv="Pragma" content="no-cache"></meta>
<link rel="stylesheet" href="css.css">
</HEAD>
<BODY aLink=#000000 bgColor=#f5f5f5 link=#000000 text=#000000 vLink=#999999>
<FORM action=listnew.php method=post name=form1>
  <table border=0 cellpadding=0 cellspacing=0 width=380 align="center">
    <tbody>
    <tr>
      <td><img height=12 src="images/newtop.gif" width=380></td>
    </tr>
    <tr bgcolor=#ffffff>
      <td background=images/newbg.gif>
        <table align=center border=0 cellpadding=0 cellspacing=0 width=363>
          <tbody>
          <tr>
            <td style="FONT-SIZE: 9pt" width="257">
              <div align=center>目前共有<font face=Tahoma><?echo $intt/3;?></font>条留言
                <?if ($page != 0){ ?> <a href=listnew.php?page=<?echo $prevpage?>><img alt=后页 border=0 src="images/menu_left_a.gif"></a>
                <?}?> <?      if ($page != $pagecount2) {?> <a href=listnew.php?page=<?echo $nextpage?>><img alt=后页 border=0 src="images/menu_right_a.gif"></a>
                <?} ?> 　第<b><font
            face=Tahoma><?echo $page2."/".$pagecount; ?></font></b> </div>
            </td>
            <td style="FONT-SIZE: 9pt" width="106"> 第
              <input class=stbtm name=pagepage2 size=2>
              页
              <input alt=跳转 border=0
            name=Submit2 src="images/go2.gif" type=image value=跳转>
            </td>
          </tr>
          </tbody>
        </table>
      </td>
    </tr>
    <tr>
      <td><img height=8 src="images/newdo.gif" width=380></td>
    </tr>
    </tbody>
  </table>
  </FORM>
<?

    for($i=$pp;$i<$pp2;$i=$i+3)
    {
        if($i<$intt)
        {
            $tp=explode("||",$file[$i+1]);
?>
<br>
<table width="50" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr background="images/newbg.gif" valign="top">
    <td height="101" background="images/newbg.gif"><img src="images/newtop.gif" width="380" height="12"><br>
      <table cellspacing=1 cellpadding=3 width="95%" border=0 align="center">
        <tr>
          <td bgcolor="#FFFFFF" width="40" align="center"><a href="mailto:<?echo $tp[1];?>"><img alt=给我来信! border=0 src="images/<?echo $tp[3].$tp[4]?>.gif" ></a></td>
          <td bgcolor="#FFFFFF" width="320"><a href="mailto:<?echo $tp[1];?>"><font
            size=2><b><?echo $tp[0];?></b></font></a>　<a href="<?echo $tp[2];?>"
            target=_blank><font face="Verdana, Arial, Helvetica, sans-serif"
            size=1><?echo $tp[2];?></font></a><br>
            <a href="<?echo $tp[2];?>"
            target=_blank></a><font face=Tahoma><br>
            <?echo $tp[6];?></font></td>
        </tr>
        <tbody>
        <tr bgcolor="#ffffff">
          <td colspan="2" style="font-size: 12px" background="images/dotbg.gif">
            <div align="center"> <b>留言主题：<?echo $tp[5];?></b></div>
          </td>
        </tr>
        <tr>
          <td bgcolor=#f5f5f5 colspan="2">
            <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
              <tr>
                <td style="font-size: 9pt"><?echo $file[$i+2];?></td>
              </tr>
            </table>
      </table>
    </td>
  </tr>
</table>
<div align="center"><img src="images/newdo.gif" width="380" height="8" align="top">
</div>
<p>
<?
        }
    }
?>
<FORM action=listnew.php method=post name=form1>
  <table border=0 cellpadding=0 cellspacing=0 width=380 align="center">
    <tbody>
    <tr>
      <td><img height=12 src="images/newtop.gif" width=380></td>
    </tr>
    <tr bgcolor=#ffffff>
      <td background=images/newbg.gif>
        <table align=center border=0 cellpadding=0 cellspacing=0 width=363>
          <tbody>
          <tr>
            <td style="FONT-SIZE: 9pt" width="257">
              <div align=center>目前共有<font face=Tahoma><?echo $intt/3;?></font>条留言
                <?if ($page != 0){ ?> <a href=listnew.php?page=<?echo $prevpage?>><img alt=后页 border=0 src="images/menu_left_a.gif"></a>
                <?}?> <?      if ($page != $pagecount2) {?> <a href=listnew.php?page=<?echo $nextpage?>><img alt=后页 border=0 src="images/menu_right_a.gif"></a>
                <?} ?> 　第<b><font
            face=Tahoma><?echo $page2."/".$pagecount; ?></font></b> </div>
            </td>
            <td style="FONT-SIZE: 9pt" width="106"> 第
              <input class=stbtm name=pagepage2 size=2>
              页
              <input alt=跳转 border=0
            name=Submit22 src="images/go2.gif" type=image value=跳转>
            </td>
          </tr>
          </tbody>
        </table>
      </td>
    </tr>
    <tr>
      <td><img height=8 src="images/newdo.gif" width=380></td>
    </tr>
    </tbody>
  </table>
</FORM>
</BODY>
</HTML>

<?
//-----------------------------------------------------------------
// 安装说明：
// 1，把97-1.php（就是本文件）加到一个PHP页中。
// 2，设置好选票数据文件和选票IP记录文件的路径及文件名，并设置属性为666（保证可读写）。
// 安装完成了（太简单拉^_^）
//-----------------------------------------------------------------
// 选票数据文件的格式说明：
// 该文件只有1行，共分成11段，每段都用“|”分隔，内容如下（“[]”内为说明如该段不需要有内容，则需将其空出来。）
// [选票标题]|[选择A]|[选择A的得票数]|[选择B]|[选择B的得票数]|[选择C]|[选择C的得票数]|[选择D]|[选择D的得票数]|[选择E]|[选择E的得票数]
//-----------------------------------------------------------------
// 选票IP记录文件的格式说明：
// 这个文件不需要编辑，只是为了防止某些人重复投票而做的IP判断过滤。
// 文件的格式就是每个IP值占一行，有多少人投票就有多少行。
// 该文件的初始状态就是为空（0字节）。
//-----------------------------------------------------------------
  $file="97_data.txt"; /*选票数据文件*/
  $fd=fopen("$file","r");
  $fd_data=fread($fd,filesize($file));
  fclose($fd);
  list($votez_name,$vote1_name,$vote1_counter,$vote2_name,$vote2_counter,$vote3_name,$vote3_counter,$vote4_name,$vote4_counter,$vote5_name,$vote5_counter)=split("\|",$fd_data);
  $votez_counter=$vote1_counter+$vote2_counter+$vote3_counter+$vote4_counter+$vote5_counter;
  if($vote1_counter>0){$vote1_countera=substr($vote1_counter/$votez_counter*100,0,4)."%";}else{$vote1_countera="0.00%";}
  if($vote2_counter>0){$vote2_countera=substr($vote2_counter/$votez_counter*100,0,4)."%";}else{$vote2_countera="0.00%";}
  if($vote3_counter>0){$vote3_countera=substr($vote3_counter/$votez_counter*100,0,4)."%";}else{$vote3_countera="0.00%";}
  if($vote4_counter>0){$vote4_countera=substr($vote4_counter/$votez_counter*100,0,4)."%";}else{$vote4_countera="0.00%";}
  if($vote5_counter>0){$vote5_countera=substr($vote5_counter/$votez_counter*100,0,4)."%";}else{$vote5_countera="0.00%";}
  echo "<hr size=0 color=#FFC864><img src=97_img.php?vote1=$vote1_counter&vote2=$vote2_counter&vote3=$vote3_counter&vote4=$vote4_counter&vote5=$vote5_counter><br>
        $votez_name<br>
        总票数：<font color=#FF0000><b>$votez_counter</b></font>票<br>
        <a href=97-2.php?vote=1><font color=#FF0000>选择Ａ：</font><b>$vote1_name</b></a><br>（<font color=#FF0000><b>$vote1_counter</b></font>票|<font color=#0F0F0F>$vote1_countera</font>）<br>
        <a href=97-2.php?vote=2><font color=#FF8040>选择Ｂ：</font><b>$vote2_name</b></a><br>（<font color=#FF0000><b>$vote2_counter</b></font>票|<font color=#0F0F0F>$vote2_countera</font>）<br>
        <a href=97-2.php?vote=3><font color=#DFDF00>选择Ｃ：</font><b>$vote3_name</b></a><br>（<font color=#FF0000><b>$vote3_counter</b></font>票|<font color=#0F0F0F>$vote3_countera</font>）<br>
        <a href=97-2.php?vote=4><font color=#00C800>选择Ｄ：</font><b>$vote4_name</b></a><br>（<font color=#FF0000><b>$vote4_counter</b></font>票|<font color=#0F0F0F>$vote4_countera</font>）<br>
        <a href=97-2.php?vote=5><font color=#0000FF>选择Ｅ：</font><b>$vote5_name</b></a><br>（<font color=#FF0000><b>$vote5_counter</b></font>票|<font color=#0F0F0F>$vote5_countera</font>）<br>
       <hr size=0 color=#FFC864>";
//-----------------------------------------------------------------
?>

<?
  $file1="97_data.txt"; /*选票数据文件*/
  $file2="97_ip.txt"; /*选票IP记录文件*/

//---------------------------------------------------
  $this_ip=getenv("REMOTE_ADDR")."\n";
  $fd2=fopen("$file2","r");
  $fd_data2=fread($fd2,filesize($file2));
  fclose($fd2);
  if(!ereg($this_ip,$fd_data2)){
    $fd2=fopen("$file2","a");
    $fd_write2=fwrite($fd2,$this_ip,strlen($this_ip));
    fclose($fd2);
  //---------------------------------------------------
    $fd1=fopen("$file1","r");
    $fd_data1=fread($fd1,filesize($file1));
    fclose($fd1);
    list($votez_name,$vote1_name,$vote1_counter,$vote2_name,$vote2_counter,$vote3_name,$vote3_counter,$vote4_name,$vote4_counter,$vote5_name,$vote5_counter)=split("\|",$fd_data1);
  //---------------------------------------------------

    if(!empty($vote)){
           if($vote==1 && !empty($vote1_name)){$vote1_counter++;
      }elseif($vote==2 && !empty($vote2_name)){$vote2_counter++;
      }elseif($vote==3 && !empty($vote3_name)){$vote3_counter++;
      }elseif($vote==4 && !empty($vote4_name)){$vote4_counter++;
      }elseif($vote==5 && !empty($vote5_name)){$vote5_counter++;
      }
      $fd_data1="$votez_name|$vote1_name|$vote1_counter|$vote2_name|$vote2_counter|$vote3_name|$vote3_counter|$vote4_name|$vote4_counter|$vote5_name|$vote5_counter";
      $fd1=fopen("$file1","w");
      $fd_write1=fwrite($fd1,$fd_data1,strlen($fd_data1));
      fclose($fd1);
    }
  }
//---------------------------------------------------
?>
<html><head><meta http-equiv=‘Refresh‘ content=‘0; URL=97-1.php‘></head>
<body><p>谢谢您对本站的支持，三秒后将自动返回……</p></body></html>

<?
  Header("Content-type: image/gif");
  /**************************************/
  /** 程序：选票统计                   **/
  /** 文件：emi_vote.php               **/
  /** 日期：2000/01/25                 **/
  /** 版本：v1.0                       **/
  /** 作者：emildy                     **/
  /** 主页：http://www.e-mi.net        **/
  /** 请勿删除此段版权信息  谢谢合作   **/
  /**************************************/
  $votez=$vote1+$vote2+$vote3+$vote4+$vote5;
  if($vote1>0){$vote1a=$vote1/$votez*360;}else{$vote1a=0;}
  if($vote2>0){$vote2a=$vote2/$votez*360;}else{$vote2a=0;}
  if($vote3>0){$vote3a=$vote3/$votez*360;}else{$vote3a=0;}
  if($vote4>0){$vote4a=$vote4/$votez*360;}else{$vote4a=0;}
  if($vote5>0){$vote5a=$vote5/$votez*360;}else{$vote5a=0;}
  $img_output=ImageCreate(88,70);
  $color0a=imagecolorallocate($img_output,255,255,255); /*白*/
  $color0b=imagecolorallocate($img_output,  0,  0,  0); /*黑*/
  $color1a=imagecolorallocate($img_output,255,  0,  0); /*红a*/
  $color1b=imagecolorallocate($img_output,200,  0,  0); /*红b*/
  $color2a=imagecolorallocate($img_output,255,128, 64); /*橙a*/
  $color2b=imagecolorallocate($img_output,198, 64,  0); /*橙b*/
  $color3a=imagecolorallocate($img_output,255,255,  0); /*黄a*/
  $color3b=imagecolorallocate($img_output,200,200,  0); /*黄b*/
  $color4a=imagecolorallocate($img_output,133,248, 18); /*绿a*/
  $color4b=imagecolorallocate($img_output,  0,200,  0); /*绿b*/
  $color5a=imagecolorallocate($img_output,  0,  0,255); /*蓝a*/
  $color5b=imagecolorallocate($img_output,  0,  0,200); /*蓝b*/
  imagecolortransparent($img_output,$color0a); /*白色为透明色*/

  $picture_x=43; /*饼图的中心点-X*/
  $picture_y=30; /*饼图的中心点-Y*/
  $picture_w=80; /*饼图的中心点-w*/
  $picture_h=40; /*饼图的中心点-h*/

  for($temp_a=$picture_y+11;$temp_a>$picture_y;$temp_a--){
    if($vote5>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$temp_a,$temp_b,$temp_b*5/8,0                              ,$vote5a                        ,$color5b);}}
    if($vote4>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$temp_a,$temp_b,$temp_b*5/8,$vote5a                        ,$vote5a+$vote4a                ,$color4b);}}
    if($vote3>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$temp_a,$temp_b,$temp_b*5/8,$vote5a+$vote4a                ,$vote5a+$vote4a+$vote3a        ,$color3b);}}
    if($vote2>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$temp_a,$temp_b,$temp_b*5/8,$vote5a+$vote4a+$vote3a        ,$vote5a+$vote4a+$vote3a+$vote2a,$color2b);}}
    if($vote1>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$temp_a,$temp_b,$temp_b*5/8,$vote5a+$vote4a+$vote3a+$vote2a,360                            ,$color1b);}}
  }
  if($vote5>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$picture_y,$temp_b,$temp_b*5/8,0                              ,$vote5a                        ,$color5a);}}
  if($vote4>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$picture_y,$temp_b,$temp_b*5/8,$vote5a                        ,$vote5a+$vote4a                ,$color4a);}}
  if($vote3>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$picture_y,$temp_b,$temp_b*5/8,$vote5a+$vote4a                ,$vote5a+$vote4a+$vote3a        ,$color3a);}}
  if($vote2>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$picture_y,$temp_b,$temp_b*5/8,$vote5a+$vote4a+$vote3a        ,$vote5a+$vote4a+$vote3a+$vote2a,$color2a);}}
  if($vote1>0){for($temp_b=$picture_w;$temp_b>0;$temp_b--){imagearc($img_output,$picture_x,$picture_y,$temp_b,$temp_b*5/8,$vote5a+$vote4a+$vote3a+$vote2a,360                            ,$color1a);}}

  ImageGif($img_output);
  ImageDestory($img_output);
?>

View Raw Code?
<?
//世纪万年历
#这是唯一的设置-请输入php文件的位置
$file="http://192.168.1.168/php/rl/s2m.php";
//#农历每月的天数
$everymonth=array(
0=>array(8,0,0,0,0,0,0,0,0,0,0,0,29,30,7,1),
1=>array(0,29,30,29,29,30,29,30,29,30,30,30,29,0,8,2),
2=>array(0,30,29,30,29,29,30,29,30,29,30,30,30,0,9,3),
3=>array(5,29,30,29,30,29,29,30,29,29,30,30,29,30,10,4),
4=>array(0,30,30,29,30,29,29,30,29,29,30,30,29,0,1,5),
5=>array(0,30,30,29,30,30,29,29,30,29,30,29,30,0,2,6),
6=>array(4,29,30,30,29,30,29,30,29,30,29,30,29,30,3,7),
7=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,4,8),
8=>array(0,30,29,29,30,30,29,30,29,30,30,29,30,0,5,9),
9=>array(2,29,30,29,29,30,29,30,29,30,30,30,29,30,6,10),
10=>array(0,29,30,29,29,30,29,30,29,30,30,30,29,0,7,11),
11=>array(6,30,29,30,29,29,30,29,29,30,30,29,30,30,8,12),
12=>array(0,30,29,30,29,29,30,29,29,30,30,29,30,0,9,1),
13=>array(0,30,30,29,30,29,29,30,29,29,30,29,30,0,10,2),
14=>array(5,30,30,29,30,29,30,29,30,29,30,29,29,30,1,3),
15=>array(0,30,29,30,30,29,30,29,30,29,30,29,30,0,2,4),
16=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,3,5),
17=>array(2,30,29,29,30,29,30,30,29,30,30,29,30,29,4,6),
18=>array(0,30,29,29,30,29,30,29,30,30,29,30,30,0,5,7),
19=>array(7,29,30,29,29,30,29,29,30,30,29,30,30,30,6,8),
20=>array(0,29,30,29,29,30,29,29,30,30,29,30,30,0,7,9),
21=>array(0,30,29,30,29,29,30,29,29,30,29,30,30,0,8,10),
22=>array(5,30,29,30,30,29,29,30,29,29,30,29,30,30,9,11),
23=>array(0,29,30,30,29,30,29,30,29,29,30,29,30,0,10,12),
24=>array(0,29,30,30,29,30,30,29,30,29,30,29,29,0,1,1),
25=>array(4,30,29,30,29,30,30,29,30,30,29,30,29,30,2,2),
26=>array(0,29,29,30,29,30,29,30,30,29,30,30,29,0,3,3),
27=>array(0,30,29,29,30,29,30,29,30,29,30,30,30,0,4,4),
28=>array(2,29,30,29,29,30,29,29,30,29,30,30,30,30,5,5),
29=>array(0,29,30,29,29,30,29,29,30,29,30,30,30,0,6,6),
30=>array(6,29,30,30,29,29,30,29,29,30,29,30,30,29,7,7),
31=>array(0,30,30,29,30,29,30,29,29,30,29,30,29,0,8,8),
32=>array(0,30,30,30,29,30,29,30,29,29,30,29,30,0,9,9),
33=>array(5,29,30,30,29,30,30,29,30,29,30,29,29,30,10,10),
34=>array(0,29,30,29,30,30,29,30,29,30,30,29,30,0,1,11),
35=>array(0,29,29,30,29,30,29,30,30,29,30,30,29,0,2,12),
36=>array(3,30,29,29,30,29,29,30,30,29,30,30,30,29,3,1),
37=>array(0,30,29,29,30,29,29,30,29,30,30,30,29,0,4,2),
38=>array(7,30,30,29,29,30,29,29,30,29,30,30,29,30,5,3),
39=>array(0,30,30,29,29,30,29,29,30,29,30,29,30,0,6,4),
40=>array(0,30,30,29,30,29,30,29,29,30,29,30,29,0,7,5),
41=>array(6,30,30,29,30,30,29,30,29,29,30,29,30,29,8,6),
42=>array(0,30,29,30,30,29,30,29,30,29,30,29,30,0,9,7),
43=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,10,8),
44=>array(4,30,29,30,29,30,29,30,29,30,30,29,30,30,1,9),
45=>array(0,29,29,30,29,29,30,29,30,30,30,29,30,0,2,10),
46=>array(0,30,29,29,30,29,29,30,29,30,30,29,30,0,3,11),
47=>array(2,30,30,29,29,30,29,29,30,29,30,29,30,30,4,12),
48=>array(0,30,29,30,29,30,29,29,30,29,30,29,30,0,5,1),
49=>array(7,30,29,30,30,29,30,29,29,30,29,30,29,30,6,2),
50=>array(0,29,30,30,29,30,30,29,29,30,29,30,29,0,7,3),
51=>array(0,30,29,30,30,29,30,29,30,29,30,29,30,0,8,4),
52=>array(5,29,30,29,30,29,30,29,30,30,29,30,29,30,9,5),
53=>array(0,29,30,29,29,30,30,29,30,30,29,30,29,0,10,6),
54=>array(0,30,29,30,29,29,30,29,30,30,29,30,30,0,1,7),
55=>array(3,29,30,29,30,29,29,30,29,30,29,30,30,30,2,8),
56=>array(0,29,30,29,30,29,29,30,29,30,29,30,30,0,3,9),
57=>array(8,30,29,30,29,30,29,29,30,29,30,29,30,29,4,10),
58=>array(0,30,30,30,29,30,29,29,30,29,30,29,30,0,5,11),
59=>array(0,29,30,30,29,30,29,30,29,30,29,30,29,0,6,12),
60=>array(6,30,29,30,29,30,30,29,30,29,30,29,30,29,7,1),
61=>array(0,30,29,30,29,30,29,30,30,29,30,29,30,0,8,2),
62=>array(0,29,30,29,29,30,29,30,30,29,30,30,29,0,9,3),
63=>array(4,30,29,30,29,29,30,29,30,29,30,30,30,29,10,4),
64=>array(0,30,29,30,29,29,30,29,30,29,30,30,30,0,1,5),
65=>array(0,29,30,29,30,29,29,30,29,29,30,30,29,0,2,6),
66=>array(3,30,30,30,29,30,29,29,30,29,29,30,30,29,3,7),
67=>array(0,30,30,29,30,30,29,29,30,29,30,29,30,0,4,8),
68=>array(7,29,30,29,30,30,29,30,29,30,29,30,29,30,5,9),
69=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,6,10),
70=>array(0,30,29,29,30,29,30,30,29,30,30,29,30,0,7,11),
71=>array(5,29,30,29,29,30,29,30,29,30,30,30,29,30,8,12),
72=>array(0,29,30,29,29,30,29,30,29,30,30,29,30,0,9,1),
73=>array(0,30,29,30,29,29,30,29,29,30,30,29,30,0,10,2),
74=>array(4,30,30,29,30,29,29,30,29,29,30,30,29,30,1,3),
75=>array(0,30,30,29,30,29,29,30,29,29,30,29,30,0,2,4),
76=>array(8,30,30,29,30,29,30,29,30,29,29,30,29,30,3,5),
77=>array(0,30,29,30,30,29,30,29,30,29,30,29,29,0,4,6),
78=>array(0,30,29,30,30,29,30,30,29,30,29,30,29,0,5,7),
79=>array(6,30,29,29,30,29,30,30,29,30,30,29,30,29,6,8),
80=>array(0,30,29,29,30,29,30,29,30,30,29,30,30,0,7,9),
81=>array(0,29,30,29,29,30,29,29,30,30,29,30,30,0,8,10),
82=>array(4,30,29,30,29,29,30,29,29,30,29,30,30,30,9,11),
83=>array(0,30,29,30,29,29,30,29,29,30,29,30,30,0,10,12),
84=>array(10,30,29,30,30,29,29,30,29,29,30,29,30,30,1,1),
85=>array(0,29,30,30,29,30,29,30,29,29,30,29,30,0,2,2),
86=>array(0,29,30,30,29,30,30,29,30,29,30,29,29,0,3,3),
87=>array(6,30,29,30,29,30,30,29,30,30,29,30,29,29,4,4),
88=>array(0,30,29,30,29,30,29,30,30,29,30,30,29,0,5,5),
89=>array(0,30,29,29,30,29,29,30,30,29,30,30,30,0,6,6),
90=>array(5,29,30,29,29,30,29,29,30,29,30,30,30,30,7,7),
91=>array(0,29,30,29,29,30,29,29,30,29,30,30,30,0,8,8),
92=>array(0,29,30,30,29,29,30,29,29,30,29,30,30,0,9,9),
93=>array(3,29,30,30,29,30,29,30,29,29,30,29,30,29,10,10),
94=>array(0,30,30,30,29,30,29,30,29,29,30,29,30,0,1,11),
95=>array(8,29,30,30,29,30,29,30,30,29,29,30,29,30,2,12),
96=>array(0,29,30,29,30,30,29,30,29,30,30,29,29,0,3,1),
97=>array(0,30,29,30,29,30,29,30,30,29,30,30,29,0,4,2),
98=>array(5,30,29,29,30,29,29,30,30,29,30,30,29,30,5,3),
99=>array(0,30,29,29,30,29,29,30,29,30,30,30,29,0,6,4),
100=>array(0,30,30,29,29,30,29,29,30,29,30,30,29,0,7,5),
101=>array(4,30,30,29,30,29,30,29,29,30,29,30,29,30,8,6),
102=>array(0,30,30,29,30,29,30,29,29,30,29,30,29,0,9,7),
103=>array(0,30,30,29,30,30,29,30,29,29,30,29,30,0,10,8),
104=>array(2,29,30,29,30,30,29,30,29,30,29,30,29,30,1,9),
105=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,2,10),
106=>array(7,30,29,30,29,30,29,30,29,30,30,29,30,30,3,11),
107=>array(0,29,29,30,29,29,30,29,30,30,30,29,30,0,4,12),
108=>array(0,30,29,29,30,29,29,30,29,30,30,29,30,0,5,1),
109=>array(5,30,30,29,29,30,29,29,30,29,30,29,30,30,6,2),
110=>array(0,30,29,30,29,30,29,29,30,29,30,29,30,0,7,3),
111=>array(0,30,29,30,30,29,30,29,29,30,29,30,29,0,8,4),
112=>array(4,30,29,30,30,29,30,29,30,29,30,29,30,29,9,5),
113=>array(0,30,29,30,29,30,30,29,30,29,30,29,30,0,10,6),
114=>array(9,29,30,29,30,29,30,29,30,30,29,30,29,30,1,7),
115=>array(0,29,30,29,29,30,29,30,30,30,29,30,29,0,2,8),
116=>array(0,30,29,30,29,29,30,29,30,30,29,30,30,0,3,9),
117=>array(6,29,30,29,30,29,29,30,29,30,29,30,30,30,4,10),
118=>array(0,29,30,29,30,29,29,30,29,30,29,30,30,0,5,11),
119=>array(0,30,29,30,29,30,29,29,30,29,29,30,30,0,6,12),
120=>array(4,29,30,30,30,29,30,29,29,30,29,30,29,30,7,1)
);
##############################
#农历天干
$mten=array("null","甲","乙","丙","丁","戊","己","庚","辛","壬","癸");
#农历地支
$mtwelve=array("null","子（鼠）","丑（牛）","寅（虎）","卯（兔）","辰（龙）",
               "巳（蛇）","午（马）","未（羊）","申（猴）","酉（鸡）","戌（狗）","亥（猪）");
#农历月份
$mmonth=array("闰","正","二","三","四","五","六",
              "七","八","九","十","十一","十二","月");
#农历日
$mday=array("null","初一","初二","初三","初四","初五","初六","初七","初八","初九","初十",
            "十一","十二","十三","十四","十五","十六","十七","十八","十九","二十",
            "廿一","廿二","廿三","廿四","廿五","廿六","廿七","廿八","廿九","三十");
##############################
#赋给初值
#天干地支
$ten=0;
$twelve=0;
#星期
$week=5;
#农历日
$md=0;
#农历月
$mm=0;
#阳历总天数 至1900年12月21日
$total=11;
#阴历总天数
$mtotal=0;
##############################
#获得当日日期
$today=getdate();
#如果没有输入，设为当日日期
if ($year=="" or $month=="" or ($year<1901 or $year>2020)
    or ($month<1 or $month>12)){
     $year=$today[year];
     $month=$today[mon];
   }
##############################
#计算到所求日期阳历的总天数-自1900年12月21日始
#先算年的和
for ($y=1901;$y<$year;$y++){
      $total+=365;
      if ($y%4==0) $total ++;
    }
#再加当年的几个月
switch ($month){
         case 12:
              $total+=30;
         case 11:
              $total+=31;
         case 10:
              $total+=30;
         case 9:
              $total+=31;
         case 8:
              $total+=31;
         case 7:
              $total+=30;
         case 6:
              $total+=31;
         case 5:
              $total+=30;
         case 4:
              $total+=31;
         case 3:
              $total+=28;
         case 2:
              $total+=31;
       }
#如果当年是闰年还要加一天
if ($year%4==0 and $month>2){
     $total++;
    }
#顺便算出当月1日星期几
$week=($total+$week)%7;
##############################
#用农历的天数累加来判断是否超过阳历的天数
$flag1=0;#判断跳出循环的条件
$j=0;
while ($j<=120){
      $i=1;
      while ($i<=13){
            $mtotal+=$everymonth[$j][$i];
            if ($mtotal>=$total){
                 $flag1=1;
                 break;
               }
            $i++;
          }
      if ($flag1==1) break;
      $j++;
    }
##############################
#计算所求月份1号的农历日期
$md=$everymonth[$j][$i]-($mtotal-$total);
#月头空开的天数
$k=$week;
#是否跨越一年
switch ($month){
         case 1:
         case 3:
         case 5:
         case 7:
         case 8:
         case 10:
         case 12:
              $dd=31;
              break;
         case 4:
         case 6:
         case 9:
         case 11:
              $dd=30;
              break;
         case 2:
              if ($year%4==0){
                  $dd=29;
                 }else{
                  $dd=28;
                 }
              break;
       }
#是否跨越一年
$ty=0;
if ((($everymonth[$j][0]<>0 and $i==13) or ($everymonth[$j][0]==0 and $i==12))
       and $mtotal-$total<$dd) $ty=1;
?>
<html>
<head>
<title>世纪万年历</title>
<style type="text/css">
<!--
input { font-size:9pt;}
A:link {text-decoration: underline; font-size:9pt;color:000059}
A:visited {text-decoration: underline; font-size:9pt;color:000059}
A:active {text-decoration: none; font-size:9pt}
A:hover {text-decoration:underline;color:red}
body,table {font-size: 9pt}
tr,td{font-size:9pt}
-->
</style>
</head>
<body alink="#FF0000" link="#000099" vlink="#CC6600" topmargin="8" leftmargin="0" bgColor="#FFFFFF">
<?
    //打印年月抬头
    echo "<p align=\"center\"><font size=\"6\"><b>".$year."年".$month."月</b></font></p>\n";
    if($ty==0)
    {
        echo "<p align=\"center\"><b><font size=\"4\">".$mten[$everymonth[$j][14]].$mtwelve[$everymonth[$j][15]]."年</font></b></p>";
    }
    else
    {
        echo "<p align=\"center\"><b><font size=\"4\">".$mten[$everymonth[$j][14]].$mtwelve[$everymonth[$j][15]]."/".$mten[$everymonth[$j+1][14]].$mtwelve[$everymonth[$j+1][15]]."年</font></b></p>";
    }
?>
<div align="center">
  <center>
  <table border="1" width="85%">
    <tr>
      <td align="center" bgcolor="#CCCCCC"><font color="#FF0000"><b>星期日</b></font></td>
      <td width="14%" align="center" bgcolor="#CCCCCC"><b>星期一</b></td>
      <td width="14%" align="center" bgcolor="#CCCCCC"><b>星期二</b></td>
      <td width="14%" align="center" bgcolor="#CCCCCC"><b>星期三</b></td>
      <td width="14%" align="center" bgcolor="#CCCCCC"><b>星期四</b></td>
      <td width="14%" align="center" bgcolor="#CCCCCC"><b>星期五</b></td>
      <td width="14%" align="center" bgcolor="#CCCCCC"><b>星期六</b></td>
    </tr>
<?
$day=1;
$line=0;
while ($day<=$dd){
   echo "<tr>\n";
   for ($s=0;$s<=6;$s++){
         if ($k<>0 or $day>$dd){
              echo "<td width=\"14%\" align=\"center\">　</td>\n";
              $k--;
         }else{
    //设置字符颜色
               switch ($s){
                        case 1:
                        case 2:
                        case 3:
                        case 4:
                        case 5:
                             $color="#000000";
                             break;
                        case 0:
                             $color="#FF0000";
                             break;
                        case 6:
                             $color="#008000";
                             break;
                      }
#生成中文农历
               if ($md==1){#1日打印月份
                    if ($everymonth[$j][0]<>0 and $everymonth[$j][0]<$i){
                        $mm=$i-1;
                    }else{
                        $mm=$i;
                    }
                    if ($i==$everymonth[$j][0]+1 and $everymonth[$j][0]<>0) $chi=$mmonth[0].$mmonth[$mm];#闰月
                    else $chi=$mmonth[$mm].$mmonth[13];
               }else{
                    $chi=$mday[$md];
               }
               echo "<td width=\"14%\" align=\"center\"><font color=\"$color\"><b>$day </b> <b><font size=\"2\">$chi</font></b></font></td>\n";
               $day++;
               $md++;
               if ($md>$everymonth[$j][$i]){
                    $md=1;
                    $i++;
                  }
               if (($i>12 and $everymonth[$j][0]==0) or ($i>13 and $everymonth[$j][0]<>0)){
                     $i=1;
                     $j++;
                  }
           }
       }
   echo "</tr>\n";
   $line++;
}
?>
  </table>
  </center>
</div>
<?php
#补足空行
for ($l=1;$l<=(6-$line);$l++){
      echo "<table border=\"0\" width=\"100%\">\n";
      echo "<tr>\n";
      echo "<td width=\"100%\"><font color=\"#CCFFFF\">a</font></td>\n";
      echo "</tr>\n";
      echo "</table>\n";
    }
#打印上一月，下一月
$ly=$ny=$year;
$last=$month-1;
if ($last==0){
     $last=12;
     $ly--;
   }
$next=$month+1;
if ($next==13){
     $next=1;
     $ny++;
   }
if ($ly>=1901)
echo "<p align=\"center\"><a href=\"".$file."?year=".$ly."&month=".$last."\">&lt;&lt;上一个月</a>&nbsp;&nbsp;&nbsp;\n";
else
echo "<p align=\"center\">";
if ($ny<=2020)
echo "<a href=\"".$file."?year=".$ny."&month=".$next."\">下一个月&gt;&gt;</a></p>\n";
?>
 <?php
echo "<form method=\"POST\" action=\"".$file."\">\n";
?>
  <p align="center"><font color="#000000">年份：</font><select size="1" name="year">
  <option>2020</option>
  <option>2019</option>
  <option>2018</option>
  <option>2017</option>
  <option>2016</option>
  <option>2015</option>
  <option>2014</option>
  <option>2013</option>
  <option>2012</option>
  <option>2011</option>
  <option>2010</option>
  <option>2009</option>
  <option>2008</option>
  <option>2007</option>
  <option>2006</option>
  <option>2005</option>
  <option>2004</option>
  <option>2003</option>
  <option>2002</option>
  <option>2001</option>
  <option selected>2000</option>
  <option>1999</option>
  <option>1998</option>
  <option>1997</option>
  <option>1996</option>
  <option>1995</option>
  <option>1994</option>
  <option>1993</option>
  <option>1992</option>
  <option>1991</option>
  <option>1990</option>
  <option>1989</option>
  <option>1988</option>
  <option>1987</option>
  <option>1986</option>
  <option>1985</option>
  <option>1984</option>
  <option>1983</option>
  <option>1982</option>
  <option>1981</option>
  <option>1980</option>
  <option>1979</option>
  <option>1978</option>
  <option>1977</option>
  <option>1976</option>
  <option>1975</option>
  <option>1974</option>
  <option>1973</option>
  <option>1972</option>
  <option>1971</option>
  <option>1970</option>
  <option>1969</option>
  <option>1968</option>
  <option>1967</option>
  <option>1966</option>
  <option>1965</option>
  <option>1964</option>
  <option>1963</option>
  <option>1962</option>
  <option>1961</option>
  <option>1960</option>
  <option>1959</option>
  <option>1958</option>
  <option>1957</option>
  <option>1956</option>
  <option>1955</option>
  <option>1954</option>
  <option>1953</option>
  <option>1952</option>
  <option>1951</option>
  <option>1950</option>
  <option>1949</option>
  <option>1948</option>
  <option>1947</option>
  <option>1946</option>
  <option>1945</option>
  <option>1944</option>
  <option>1943</option>
  <option>1942</option>
  <option>1941</option>
  <option>1940</option>
  <option>1939</option>
  <option>1938</option>
  <option>1937</option>
  <option>1936</option>
  <option>1935</option>
  <option>1934</option>
  <option>1933</option>
  <option>1932</option>
  <option>1931</option>
  <option>1930</option>
  <option>1929</option>
  <option>1928</option>
  <option>1927</option>
  <option>1926</option>
  <option>1925</option>
  <option>1924</option>
  <option>1923</option>
  <option>1922</option>
  <option>1921</option>
  <option>1920</option>
  <option>1919</option>
  <option>1918</option>
  <option>1917</option>
  <option>1916</option>
  <option>1915</option>
  <option>1914</option>
  <option>1913</option>
  <option>1912</option>
  <option>1911</option>
  <option>1910</option>
  <option>1909</option>
  <option>1908</option>
  <option>1907</option>
  <option>1906</option>
  <option>1905</option>
  <option>1904</option>
  <option>1903</option>
  <option>1902</option>
  <option>1901</option>
  &nbsp;
  </select><font color="#000000">年</font><font color="#000000">&nbsp;&nbsp;&nbsp;&nbsp;
  月份：<select size="1" name="month">
  <option selected>1</option>
  <option>2</option>
  <option>3</option>
  <option>4</option>
  <option>5</option>
  <option>6</option>
  <option>7</option>
  <option>8</option>
  <option>9</option>
  <option>10</option>
  <option>11</option>
  <option>12</option>
  &nbsp;
  </select>月&nbsp;&nbsp;&nbsp;&nbsp; </font><input type="submit" value="查询" name="B1"></p>
</form>
</body>
</html>

<?
    // PHPMINE v1.0
    //来源http://www.phpvault.com
    //是根据microsoft的挖地雷游戏编写
    print "<html>";
    print "<head>";
    print "<title>PHP挖地雷</title>";
    print "</head>";
    print "<body bgcolor=#FFFFCC><center>";
    print "<font size=3 face=Verdana><b>PHP挖地雷</b>";
    if ($submit=="")
    {
        $NumMine=4;
        $RowSize=5;
        $ColSize=5;
        $generer=1;
    }
    if($generer==1)
    {
        srand((double)microtime()*100000000);
        $time_start=time();
        //判断输入的数值是否正确
        if(($RowSize<=1) || ($ColSize<=1) || ($NumMine==0))
        {
            print "<p><br><font size=-1 color=red>行数，列数或地雷数输入错误!!</font>";
            exit;
        }
        if($NumMine > $RowSize*$ColSize)
        {
            print "<p><br><font size=-1 color=red>地雷数太多!</font>";
            exit;
        }
        //初始化
        for($Row=1;$Row<=$RowSize;$Row++)
        {
            for($Col=1;$Col<=$ColSize;$Col++)
            {
                $Mine[$Row][$Col]="0";
                $Decouv[$Row][$Col]="0";
            }
        }
        $index=0;
        while($index<$NumMine)
        {
            $Row=rand(1,$RowSize);
            $Col=rand(1,$ColSize);
            if($Mine[$Row][$Col]=="0")
            {
                $Mine[$Row][$Col]="1";
                $index++;
            }
        }
    }
    else
    {
        $perdu=0;
        $reste=$RowSize*$ColSize;
        for($Row=1;$Row<=$RowSize;$Row++)
        {
            for($Col=1;$Col<=$ColSize;$Col++)
            {
                $temp="Mine".($Row*($ColSize+1)+$Col);
                $Mine[$Row][$Col]=$$temp;
                $temp="Decouv".($Row*($ColSize+1)+$Col);
                $Decouv[$Row][$Col]=$$temp;
                if($Decouv[$Row][$Col]=="1") {$reste=$reste-1;}
                $temp="submit".($Row*($ColSize+1)+$Col);
                if($$temp=="ok")
                {
                    $reste=$reste-1;
                    if($Mine[$Row][$Col]=="0")
                    {
                        $Decouv[$Row][$Col]="1";
                    }
                    else
                    {
                        $perdu=1;
                    }
                }
            }
        }
        if($perdu==1)
        {
            print "<h2><font color=red>您输啦!</font></h2>";
            for($i=1;$i<=$RowSize;$i++)
            {
                for($j=1;$j<=$ColSize;$j++)
                {
                    $Decouv[$i][$j]="1";
                }
            }
        }
        if(($reste==$NumMine)&&($perdu!=1))
        {
            print "<h2>你赢啦!</h2>";
            $time_stop=time();
            $time=$time_stop-$time_start;
            print "<p><font size=-1><i>您的分数: $time</i></font>";
            for ($i=1;$i<=$RowSize;$i++)
            {
                for($j=1;$j<=$ColSize;$j++)
                {
                    $Decouv[$i][$j]="1";
                }
            }
        }
    }
    print "<form method=get action=‘$PHP_SELF‘>";
    print "<input type=hidden name=time_start value=$time_start>";
    print "<input type=hidden name=NumMine value=$NumMine>";
    print "<input type=hidden name=RowSize value=$RowSize>";
    print "<input type=hidden name=ColSize value=$ColSize>";
    print "<input type=hidden name=generer value=0>";
    print "<p><table border=1 cellpadding=8>";
    for($Row=1; $Row<=$RowSize; $Row++)
    {
        print "<tr>";
        for($Col=1; $Col<=$ColSize; $Col++)
        {
            $nb=0;
            for($i=-1; $i<=1; $i++)
            {
                for($j=-1; $j<=1; $j++)
                {
                    if($Mine[$Row+$i][$Col+$j] == "1")
                    {
                        $nb++;
                    }
                }
            }
            print "<td width=15 height=15 align=center valign=middle>";
            if($Decouv[$Row][$Col]=="1")
            {
                if($nb==0)
                {
                    print "&nbsp;";
                }
                else
                {
                    if($Mine[$Row][$Col]=="1")
                    {
                        print "<font color=red>*</font>";
                    }
                    else
                    {
                        print "$nb";
                    }
                }
            }
            else
            {
                print "<input type=hidden name=submit value=ok>";
                print "<input type=submit name=submit".($Row*($ColSize+1)+$Col)." value=ok>";
            }
            print "<input type=hidden name=Mine".($Row*($ColSize+1)+$Col)." value=".$Mine[$Row][$Col].">";
            print "<input type=hidden name=Decouv".($Row*($ColSize+1)+$Col)." value=".$Decouv[$Row][$Col].">";
            print "</td>";
        }
        print "</tr>";
    }
    print "</table>";
    print "</form>";
?>
<hr>
<form method=post>
行数 : &nbsp;
<input type=text name=RowSize value=5 size=2>
<br>
列数 : &nbsp;
<input type=text name=ColSize value=5 size=2>
<br>
地雷数 : &nbsp;
<input type=text name=NumMine value=4 size=2>
<p>
<input type=submit name=submit value=开始>
<input type=hidden name=generer value=1>
</form>
</body>
</html>

时间： 2024-10-11 14:48:06

PHP实用小程序（七）

PHP实用小程序（七）的相关文章

PHP实用小程序（四）

PHP实用小程序（五）

PHP实用小程序（六）

PHP实用小程序（一）

PHP实用小程序（二）

PHP实用小程序（三）

小程序七：组件之表单组件

如何让微信小程序快速接入七牛云

微信小程序UI组件、开发框架、实用库