zoukankan      html  css  js  c++  java
  • 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>
    ";
         }
         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
    
    $name $email
    
    $add_time";
                    mail($admin_email, "有新的留言: ".$name, $message, "From: ".$email."
    Reply-To: ".$email."
    X-Mailer: PHP/" . phpversion());
                }
                echo "<p align="center">您的留言发送成功,谢谢!<a href="guestbook.php">查看留言请返回</a></p>
    ";
            }
            else {
                echo "<p align="center">姓名和内容必须填写!<a href="JavaScript:history.back()">返回</a></p>
    ";
            }
        }
        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>
                      <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>
    ";
            }
            else{
                echo "<a href='$PATH_INFO?page=$page_count'>最后一页</a> |</p>
    ";
            }
        }
    
        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>
    "; 
    $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
    "; 
    // 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" alt=""></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 ("
    "," ", $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 ("
    "," ", $message);
    $msg = str_replace ("
    "," ", $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, "
    <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 ("
    "," ", $message);
    
    $msg = str_replace ("
    "," ", $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, "
    <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]
    ";
            print "$line";
            $i++;
        }
        if($table!=1)
        {
    ?>
    </table>
    <?
        }
    ?>
    </body>
    </html>
    <?require "config.php";?>
    <?
        if($password !=$adminpsd)
        {
            print "管理密码错!<br>";exit;
        }
        $title=ereg_replace("
    ",'<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
    ");    #写进去,要加 
    
        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."
    ")
            {
                $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 value=@>
                    <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("
    ","<br>",$text);
            $text=ereg_replace("
    ","<br>",$text);
            $text=$text."
    ";
            $t = date(Y年m月d日H时i分);
            $line1=$name."||".$email."||".$url."||".$sex."||".$mind."||".$title."||".$t."
    ";
            if(str_replace("
    ","",$file[2])!=trim($text))
            {
                fputs($f,$tx."
    ");
                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>选择A:</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>选择B:</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>选择C:</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>选择D:</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>选择E:</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")."
    ";
      $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>
    ";
        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>
    ";
       for ($s=0;$s<=6;$s++){
             if ($k<>0 or $day>$dd){
                  echo "<td width="14%" align="center"> </td>
    ";
                  $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>
    ";
                   $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>
    ";
       $line++;
    }
    ?>
      </table>
      </center>
    </div>
    <?php
    #补足空行
    for ($l=1;$l<=(6-$line);$l++){
          echo "<table border="0" width="100%">
    ";
          echo "<tr>
    ";
          echo "<td width="100%"><font color="#CCFFFF">a</font></td>
    ";
          echo "</tr>
    ";
          echo "</table>
    ";
        }
    #打印上一月,下一月
    $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;
    ";
    else
    echo "<p align="center">";
    if ($ny<=2020)
    echo "<a href="".$file."?year=".$ny."&month=".$next."">下一个月&gt;&gt;</a></p>
    ";
    ?>
     <?php
    echo "<form method="POST" action="".$file."">
    ";
    ?>
      <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>
  • 相关阅读:
    《控制系统设计指南》第三章控制系统的调试读书笔记(二)
    机电传动控制第三周学习笔记
    PLECS软件学习使用(三)第三周仿真与计算作业
    PLECS软件学习使用(二)直流电机基本系统模型
    《控制系统设计指南》第一章和第二章读书笔记(一)
    《自动化技术中的进给电气传动》第一章的1.3节读书笔记(二)
    机电传动控制第二周学习笔记
    《实时控制软件设计》第一周作业 欧梓峰 U201317662 (更新)
    K3 查询收集
    K3 12.3应付收集
  • 原文地址:https://www.cnblogs.com/yxhblogs/p/4758806.html
Copyright © 2011-2022 走看看