
nav=navigator.appName.substring(0,1);
gaku_dt=gaku.split(",")
roll_pic=1;if(gaku_dt[4]!=""){roll_pic=gaku_dt[4]*1;}
add_dt=0;
phase_dt=0;

//イメージ先読み
img_dt=new Array();
for(i=1;i<=n;i++){
dd=dt[i].split(",");
img_dt[i]=new Image();img_dt[i].src=lake_url+dd[0];
}
//割込み
function setPhase(){
phase_dt=(phase_dt+ud_dt)%100;
lake_win.mytr.filters["wave"].phase =phase_dt;
setTimeout("setPhase()",100);
}


//窓修正
function img_wh(q){
img_h=img_dt[q].height;
img_w=img_dt[q].width;
document.getElementById("lake_win").style.width=img_w*0.9;
if(nav=="M"){hh=1.5;}else{hh=1;}
document.getElementById("lake_win").style.height=img_h*hh;
}

//
document.write('<table border=0><tr><td align=right>');
//サムネール
document.write('<table border=0 cellpadding=20 bgcolor='+gaku_dt[0]+' background="'+gaku_dt[1]+'"><tr><td valign=top><table cellpadding=2>');
for(i=1;i<=n;i++){
dd=dt[i].split(",");
document.write('<tr><td><button style="width:110;" onClick="win_write('+i+')"><img src="'+lake_url+dd[0]+'" width=100 border=1></button></td></tr>');
}

document.write('</table></td><form name="myform"><td align=center valign=top>');
//スクロール窓
document.write('<table cellpadding=4><tr><td>');

document.write('<iframe name="lake_win" id="lake_win" scrolling=no style="position:relative;width:100;height:100;"></iframe>');

document.write('</td></tr></table>');
document.write('<input type=text name="com_box" value="" id="com_box" name="com_box" style="border-width:0;background-color:transparent;text-align:center;overflow:visible;font-size:'+gaku_dt[2]+';color:'+gaku_dt[3]+'">');
document.write('</td><form></tr></table><a href="http://www2a.biglobe.ne.jp/~qpon/js/index.htm?http://www2a.biglobe.ne.jp/~qpon/lake/lakeroll03_b.htm" target="_qpon"><font size=1>システム提供：ＱＰＯＮ　</font></a></td></tr></table>\n');

//ｈｔｍｌ
function win_write(p){
img_no=p*1;
dd=(dt[img_no]+",,,,,,").split(",");
lake_img=lake_url+dd[0];
ud_dt=10;if(dd[2]!=""){ud_dt=dd[2]*1;}//流速・方向
freq_dt=20;if(dd[3]!=""){freq_dt=dd[3]*10;}//波数
strength_dt=3;if(dd[4]!=""){strength_dt=dd[4]*1;}//波長
light_dt=5;if(dd[5]!=""){light_dt=dd[5]*1;}//輝度
ww='<html>\n<head>\n';
ww+='<script language="javascript">\n';

//割込み
ww+='roll_pic='+roll_pic+';\n';
ww+='img_w='+img_dt[img_no].width+';\n';
ww+='img_h='+img_dt[img_no].height+';\n';
ww+='phase_dt='+phase_dt+';\n';
ww+='ud_dt='+ud_dt+';\n';
ww+='x=5;\n';
ww+='function setPhase(){\n';
ww+='phase_dt=(phase_dt+ud_dt)%100;\n';
ww+='mytr.filters["wave"].phase =phase_dt;\n';
ww+='setTimeout("setPhase()",100);\n';
ww+='}\n';
ww+='function roll(){\n';
ww+='scroll(x,0);\n';
ww+='x-=roll_pic;\n';
ww+='if(x<5){x=img_w*2+5;}\n';
ww+='if(x>img_w*2+5){x=5;}\n';
ww+='tm=setTimeout("roll()",100);\n';
ww+='}\n';
ww+='function start(){\n';
ww+='scroll(x,0);\n';
ww+='setPhase();\n';
ww+='setTimeout("roll()",2000);\n';
ww+='}\n';
ww+='</sc';
ww+='ript>\n';
ww+='</head>\n<body style="margin:0" onLoad="parent.img_wh('+img_no+');start()">\n';//
ww+=('<table cellpadding=0 cellspacing=0>\n<tr>');
ww+=('<td>');
ww+=('<img src="'+lake_img+'" name="myimg01" galleryimg="no" border=0 style="filter:flipH(enabled=0) flipV(enabled=0);">');

ww+=('<img src="'+lake_img+'" name="myimg02" galleryimg="no" border=0 style="filter:flipH(enabled=1) flipV(enabled=0);">');
ww+=('<img src="'+lake_img+'" name="myimg03" galleryimg="no" border=0 style="filter:flipH(enabled=0) flipV(enabled=0);">');

ww+=('</td>');
ww+=('</tr>\n<tr>');
ww+=('<td id="mytr" style="filter:wave(add='+add_dt+',freq='+freq_dt+',lightstrength='+light_dt+',phase='+phase_dt+',strength='+strength_dt+')">');

ww+=('<img src="'+lake_img+'" name="myimg11" galleryimg="no" border=0 style="filter:flipH(enabled=0) flipV(enabled=1);">');

ww+=('<img src="'+lake_img+'" name="myimg12" galleryimg="no" border=0 style="filter:flipH(enabled=1) flipV(enabled=1);">');
ww+=('<img src="'+lake_img+'" name="myimg13" galleryimg="no" border=0 style="filter:flipH(enabled=0) flipV(enabled=1);">');

ww+=('</td>');
ww+=('</tr>\n</table>\n');
ww+=('</body>\n</html>');
lake_win.document.open();
lake_win.document.write(ww);
lake_win.document.close();
document.myform.com_box.value=dd[1];
}
win_write(1);

if(nav!="M"){document.write('<font size=2 color=#ff0000>インターネット　エクスプローラ以外では水面の揺らやスクロールができません。</font><br><br>');}
