$sponsor_header
※標準広告プランの募集を再開致しました。お気軽にメールにてお問合わせ下さい。 ";
#-----------------------------------------------------------スペシャル
if (length($sponsor_big_1)) {
$htmlbuf .= "$sponsor_big_1";
$htmlbuf .= "
";
}
$htmlbuf .= "
$specialthanks
";
# if ($maincount == 50000000) {
#
# open(MAIL,"|$mailsystem_location -t") || &error("unable to use mailsystem $mailsystem_location");
# print MAIL "To: $system_email\n";
# print MAIL "From: $system_email\n";
# print MAIL "Subject: [MDZ] Congraturation! 10,000,000 access reached.\n\n";
# print MAIL "$system_nameに更新情報の登録がありました。\n\n";
#
# ($sec, $min, $hour, $mday, $mon, $year,$wday, $yday1, $isdst) = localtime($current_time);
# $current_time_p = sprintf("%02d/%02d/%02d %02d:%02d:%02d", $year-100, $mon+1, $mday, $hour, $min, $sec);
#
# print MAIL "無料動画Ｚが50,000,000アクセスを達成しました。\n";
# print MAIL "達成時刻：$current_time_p\n";
# print MAIL "達成時閲覧者IPアドレス：$remote_host\n";
# print MAIL "\n";
# print MAIL "------------------------------------------------------------\n";
# print MAIL "\n\n";
#
# close (MAIL);
#
# }
#
# if ($maincount >= 50000000) {
#
#$htmlbuf .= "
#
#
#
#50,000,000アクセス ありがとうございました。
#
#お蔭様で大台達成致しました。諸先輩方、スポンサー様、相互リンクサイト様、
#
#
#
#
#
#
#
#";
#
# }
#-----------------------------------------------------------相互リンク・ランキング
open (THANKS, "$referer1_txt") || &error("unable to open $whatsnew_db");
@thanks = ;
close (THANKS);
foreach $line (@thanks) {
$htmlbuf .= "$line";
}
$htmlbuf .= "
";
$htmlbuf .= "
$sponsor_center
";
if (0) {
#-----------------------------------------------------------スペシャル
open (SPECIAL, "$ranking_file[2]");
@special = ;
close (SPECIAL);
foreach $line (@special) {
$htmlbuf .= "$line";
}
#
$htmlbuf .= "
";
}
if (0) {
$htmlbuf .= "
$discribe
";
}
#だめならs001180
if ($sponsor_big_2) {
$htmlbuf .= "
$sponsor_big_2
";
}
if (1) {
#-----------------------------------------------------------ＢＢＳ
open (BBSPAGE, "./$mdzbbs_txt") || &error("unable to open $mdzbbs_txt");
@bbspage = ;
close (BBSPAGE);
foreach $line (@bbspage) {
$htmlbuf .= "$line";
}
$htmlbuf .= "
";
}
if (-r "./todaymovie.dat") {
open(FILE, "./todaymovie.dat") || die "2 Can't open ./todaymovie.dat \n";
flock(FILE, 1);
$todaymovie = ;
($datapos,$todaymovie,$dummy) = split (/\t/,$todaymovie);
close (FILE);
}
if (-r "./mdzmovie.db") {
open(FILE2, "./mdzmovie.db") || die "2 Can't open ./mdzmovie.db \n";
flock(FILE2, 1);
@db = ;
close (FILE2);
$work = $#db/20;
$movienumber = $db[0];
$movienumber =~ s/\n//g;
$point=0;
if ($todaymovie) {
$point=$datapos;
# for($i=0;$i<=$#db;$i++) {
# if ($db[$i] == $todaymovie) {
# $point= $i-1;
# }
# }
}
$id = $db[$point+1];
$id =~ s/\n//g;
$title = $db[$point+3];
$title =~ s/\n//g;
# $actress = $db[$point+4];
# $actress =~ s/\n//g;
$maker = $db[$point+5];
$maker =~ s/\n//g;
$makerurl = $db[$point+6];
$makerurl =~ s/\n//g;
# $work_keyword = $db[$point+7];
# $work_keyword =~ s/\n//g;
# @work = split(/\|/, $work_keyword);
# for($j=0;$j<=$#work;$j++) {
# $keyword[$work[$j]]= 1;
# }
# $thumbnail = $db[$point+9];
# $thumbnail =~ s/\n//g;
$flash = $db[$point+10];
$flash =~ s/\n//g;
# $movie = $db[$point+11];
# $movie =~ s/\n//g;
# $filesize = $db[$point+12];
# $filesize =~ s/\n//g;
# $time = $db[$point+13];
# $time =~ s/\n//g;
# $rate = $db[$point+14];
# $rate =~ s/\n//g;
$registereddate = $db[$point+18];
$registereddate =~ s/\n//g;
($work_sec, $work_min, $work_hour, $work_mday, $work_mon, $work_year, $work_wday, $work_yday) = localtime($registereddate);
$work_year = $work_year + 1900;
$work_mon++;
$work_yday++;
$work_registereddate = sprintf("%02d/%02d", $work_mon, $work_mday);
# $work_registeredtime = sprintf("%02d:%02d:%02d", $work_hour, $work_min, $work_sec);
$movieid = $db[$point+1];
$movieid =~ s/\n//;
$movieid = sprintf("%04d", $movieid);
}
if (1) {
if (-f "$system_path/fc2movie.dat") {
open(FC2DB, "$system_path/fc2movie.dat") || die "Can't open $system_path/fc2movie.dat\n";
flock(FC2DB, 1);
@fc2data = ;
close (FC2DB);
}
$htmlbuf .= "
■FC2動画ピックアップ 最近噂\のFC動画から公開許可されている長時間動画をご紹介
$work_thumbnail_link
ウィンドウで再生
（時間帯や条件によって再生できない場合があります。）
$work_text_link
";
}
}
}
if (1) {
$htmlbuf .= "
[ バックナンバーはこちら
";
}
if(0) {
$htmlbuf .= "
■風俗動画サイト紹介 新企画！。安心安全で楽しめる優良サイト様を一挙ご紹介
風俗動画サイト紹介 全国 100人以上 顔出し wmv 最長60分弱
総合 過激度:◎ 画質:◎ 保存:◎ 楽しめます
";
}
$htmlbuf .= "
■無料動画ページ
2007年2月リニューアルしました。さらに高画質化＆高音質化。是非お楽しみ下さい！
各メーカー様と実力派レビューサイト VideoLife様のご協力の元
";
if(1) {
$htmlbuf .= "
■AV D:E:L:I スマホ対応 スマホなら高画質無料動画。あの毛の一本一本まで見えます。
";
}
if (1) {
$htmlbuf .= "
";
}
$htmlbuf .= "
$sponsor_center2
";
#-----------------------------------------------------------パーソナルリンク
$htmlbuf .= "
■パー\ソ\ナルリンク （ あなたのお気に入りのサイトをカスタマイズ表\示できます。 ）
現在、登録されているサイトはありません。 ";
$htmlbuf .= "\n";
if (($members_array[21] == 0) && ($members_array[2] != 9)) {
$htmlbuf .= "$rk \n";
} else {
$htmlbuf .= "$rk ";
$htmlbuf .= "";
$htmlbuf .= "$sn \n";
$htmlbuf .= "$members_array[8] $item_data_number[$members_array[9]] $item_data_time[$members_array[10]] $keyword_p $a/$b \n";
$htmlbuf .= "機能\ \n";
$htmlbuf .= "\n";
if (length($members_array[14]) > 3) {
$htmlbuf .= "\n";
$htmlbuf .= "サンプル \n";
} else {
$htmlbuf .= "\n";
$htmlbuf .= "サンプル \n";
}
$htmlbuf .= "\n";
$htmlbuf .= "$sup $item_site_kind[$members_array[7]] $members_array[12] \n";
}
}
}
if ($plink_cnt < 2) {
$htmlbuf .= "
";
#----------------------------------------------------------
$htmlbuf .= "![\"アダルト無料動画だけのリンク集。業界最高水準の高画質アダルトビデオサンプル動画も1000本以上無料配信中\"](\"http://$banner_serverip/mdz_images/header.gif\")
![](\"http://www.kk.iij4u.or.jp/~iij4u001/avdeli_images/avdeli_smaho.jpg\")
![](\"http://www.kk.iij4u.or.jp/~iij4u001/mdz_images/eeb220x100.gif\")