回复脱衣服代码提供下载(PHP实现)

<?php
/*
+---------------------------------------------------------+
| By Bleakwind http://www.weaverdream.com
+---------------------------------------------------------+
*/
$dir      = "images/";//图片目录,注意是按照名字排序显示的...
$imgwidth = 0;//图片宽度,为0则为原始大小
$iforder  = 1;//顺序显示还是随机显示,1为顺序显示,0为随机显示
$ifcircle = 0;//顺序显示的时候是否循环播放,1为循环播放,0为不循环

session_start();
if($imgwidth==0){$imgwidth=="";}else{$imgwidth=="width='".$imgwidth."'";}
$handle=opendir($dir);
while ($file_name=readdir($handle)){
    if(($file_name!==".")&&($file_name!=="..")){$file_list[]=$file_name; }
}
closedir($handle);

if($iforder==1){
    if(isset($_SESSION['sess_order'])){
        if($_SESSION['sess_order']<count($file_list)-1){
            $_SESSION['sess_order']++;
        }else{
            if($ifcircle == 1){
                $_SESSION['sess_order']=0;
            }
        }
    }else{
        $_SESSION['sess_order']=0;
    }
    $i=$_SESSION['sess_order'];
}else{
    $num=count($file_list)-1;
    $i=rand(0,$num);
}

readfile($dir.$file_list[$i]);
?>

<img src="randimage.php" border="0">