function RandomWanpakuTop(x) {
f = 15;

var Num = new Array(f - 1);
var Chk = new Array(f - 1);
var Mess = new Array(f - 1);

//***ここに広告表示HTMLの配列作成
Mess[0] = '<span class="name">ビンゴ</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-bingo.jpg" alt="ビンゴ" /></a>';

Mess[1] = '<span class="name">ター</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-ta.jpg" alt="ター" /></a>';

Mess[2] = '<span class="name">まろん</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-maron.jpg" alt="まろん" /></a>';

Mess[3] = '<span class="name">那智</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/chec-nachi.jpg" alt="那智" /></a>';

Mess[4] = '<span class="name">武蔵</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-2.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-takezou.jpg" alt="武蔵" /></a>';

Mess[5] = '<span class="name">ナイトリー</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-3.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-naitori.jpg" alt="ナイトリー" /></a>';

Mess[6] = '<span class="name">ファルコン</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-3.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-faucon.jpg" alt="ファルコン" /></a>';

Mess[7] = '<span class="name">ダフ＆マーナ</span><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-4.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-dafu-mana.jpg" alt="ダフ＆マーナ" /></a>';

Mess[8] = '<span class="name">陽</span><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/06/post-53.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan07.jpg" alt="陽" /></a>';

Mess[9] = '<span class="name">インディ</span><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-49.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan11.jpg" alt="インディ" /></a>';

Mess[10] = '<span class="name">こもも</span><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-48.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan12.jpg" alt="こもも" /></a>';

Mess[11] = '<span class="name">ちまき</span><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-47.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan13.jpg" alt="ちまき" /></a>';

Mess[12] = '<span class="name">ピース</span><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-46.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan14.jpg" alt="ピース" /></a>';

Mess[13] = '<span class="name">ユウ</span><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-42.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan15.jpg" alt="ユウ" /></a>';

Mess[14] = '<span class="name">アダム</span><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-51.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan09.jpg" alt="アダム" /></a>';


//***
for (i=0;i<f;i++) //
{
	Num[i] = Math.floor(Math.random()*f);
	if (Chk[Num[i]]  == 1){
		while(Chk[Num[i]] == 1){
			Num[i] = Math.floor(Math.random()*f);
		}
		Chk[Num[i]] = 1;
	} else {
		Chk[Num[i]] = 1;
	}
}

document.write('<ul class="wanpakupet-lt">');
for (i=0;i<x;i++)
{
	document.write('<li>');
	document.write(Mess[Num[i]]);
	document.write('</li>');
}
document.write('</ul>');
}

function RandomWanpakuBtm(x) {
f = 15;

var Num = new Array(f - 1);
var Chk = new Array(f - 1);
var Mess = new Array(f - 1);

//***ここに広告表示HTMLの配列作成
Mess[0] = '<span class="name">ビンゴ</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-bingo.jpg" alt="ビンゴ" /></a></p><p class="pet-profile">とっても美人さんなので、モデル犬として活躍しています。</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post.html">&gt;&gt;詳しく見る</a></span>';

Mess[1] = '<span class="name">ター</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-ta.jpg" alt="ター" /></a></p><p class="pet-profile">お尻の毛を「桃尻カット」にして、ぷりぷり度が増して可愛いです♪</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html">&gt;&gt;詳しく見る</a></span>';

Mess[2] = '<span class="name">まろん</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-maron.jpg" alt="まろん" /></a></p><p class="pet-profile">ＭＩＸ具合が絶妙で、むちゃくちゃ可愛い子です！</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html">&gt;&gt;詳しく見る</a></span>';

Mess[3] = '<span class="name">那智</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/chec-nachi.jpg" alt="那智" /></a></p><p class="pet-profile">なんと１５歳です！すごく元気で、頭のいいワンコです。</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-1.html">&gt;&gt;詳しく見る</a></span>';

Mess[4] = '<span class="name">武蔵</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-2.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-takezou.jpg" alt="武蔵" /></a></p><p class="pet-profile">とっても優しいわんこなんです平和主義でケンカが大嫌い。</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-2.html">&gt;&gt;詳しく見る</a></span>';

Mess[5] = '<span class="name">ナイトリー</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-3.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-naitori.jpg" alt="ナイトリー" /></a></p><p class="pet-profile">とてもおりこうで、おとなしいワンちゃんです。</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-3.html">&gt;&gt;詳しく見る</a></span>';

Mess[6] = '<span class="name">ファルコン</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-3.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-faucon.jpg" alt="ファルコン" /></a></p><p class="pet-profile">とってものんびりしていて可愛いんです！</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-3.html">&gt;&gt;詳しく見る</a></span>';

Mess[7] = '<span class="name">ダフ＆マーナ</span><p class="pet-face"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-4.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/check-dafu-mana.jpg" alt="ダフ＆マーナ" /></a></p><p class="pet-profile">むりむりと動くスコッチのおしりはなんとも可愛いものです！</p><span class="detailed"><a href="http://blog.wanpaku-pet.tv/check-check/2008/10/post-4.html">&gt;&gt;詳しく見る</a></span>';

Mess[8] = '<span class="name">陽</span><p class="pet-face"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/06/post-53.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan07.jpg" alt="陽" /></a></p><p class="pet-profile">ヨークシャーテリアの男の子です。</p><span class="detailed"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/06/post-53.html">&gt;&gt;詳しく見る</a></span>';

Mess[9] = '<span class="name">雫</span><p class="pet-face"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-50.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan10.jpg" alt="雫" /></a></p><p class="pet-profile">キャバリアではちょっと珍しいトライカラーの女の子です。</p><span class="detailed"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-50.html">&gt;&gt;詳しく見る</a></span>';

Mess[10] = '<span class="name">インディ</span><p class="pet-face"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-49.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan11.jpg" alt="インディ" /></a></p><p class="pet-profile">抱っこ大好きなんです。抱っこしてくれてれば私イイコにしてます♪♪</p><span class="detailed"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-49.html">&gt;&gt;詳しく見る</a></span>';

Mess[11] = '<span class="name">こもも</span><p class="pet-face"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-48.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan12.jpg" alt="こもも" /></a></p><p class="pet-profile">臆病だけど、食い意地はすごいんです!!(^▽^；)　</p><span class="detailed"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-48.html">&gt;&gt;詳しく見る</a></span>';

Mess[12] = '<span class="name">ちまき</span><p class="pet-face"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-47.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan13.jpg" alt="ちまき" /></a></p><p class="pet-profile">ちまきは人見知りでビビりだけど、興味を持ったらすごい！</p><span class="detailed"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-47.html">&gt;&gt;詳しく見る</a></span>';

Mess[13] = '<span class="name">ピース</span><p class="pet-face"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-46.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan14.jpg" alt="ピース" /></a></p><p class="pet-profile">ゴールデンレトリバーのピース、あだ名はガチャピンです☆</p><span class="detailed"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-46.html">&gt;&gt;詳しく見る</a></span>';

Mess[14] = '<span class="name">ユウ</span><p class="pet-face"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-42.html"><img src="http://blog.wanpaku-pet.tv/wanpakupet/img/wan15.jpg" alt="ユウ" /></a></p><p class="pet-profile">ルーク君の奥さんです。のんびり過ごしています♪</p><span class="detailed"><a href="http://www.wanpaku-pet.tv/pet-jiman/2008/05/post-42.html">&gt;&gt;詳しく見る</a></span>';



//***
for (i=0;i<f;i++) //
{
	Num[i] = Math.floor(Math.random()*f);
	if (Chk[Num[i]]  == 1){
		while(Chk[Num[i]] == 1){
			Num[i] = Math.floor(Math.random()*f);
		}
		Chk[Num[i]] = 1;
	} else {
		Chk[Num[i]] = 1;
	}
}

for (i=0;i<x;i++)
{
	document.write('<div class="four-box">');
	document.write(Mess[Num[i]]);
	document.write('</div>');
}
}