/*----▼▼▼削?禁止（?作?及びバージ??管??分）▼▼▼----------------------
【 ソフト名称 】  ?下の神託タ?ット
【 ファイ?名 】  tarot.js
【  ?作?者  】  nekomata
【 バージ?? 】  1.09
【  作 成 日  】  2003年10?6日
【 動作可能OS 】  Windows 98+IE5.5 Windows XP+IE6.0（その他未確認）
【  取り扱い  】  フ?ーウェア（??クウェア）
【  作成言語  】  JavaScript
【  連?方法  】  ?ー?、掲示板
【ホー?ページ】  http://www.aa.alpha-net.ne.jp/nekomata/
【 転載  条? 】  配布・転載の条?を厳守して下さい
----▲▲▲削?禁止（?作?及びバージ??管??分）▲▲▲----------------------*/
var sp_cros_w=700;
var sp_cros_h=500;
var sp_card_cnt=78;
var sp_card_dsp=10;
var sp_card_w=50;
var sp_card_h=100;
var sp_card_w_offset=0;
var sp_card_h_offset=0;
var card_p_path="card_p";
var card_l_path="card_l";
var card_pr_path="card_pr";
var card_lr_path="card_lr";
var card_src_sel=0;
var image_path="image";
var pict_t=".jpg";
var sp_label_sema=new Array(157);
var sp_doc="";
var open_msg_txt="";
var open_msg_txt_x=0;
var open_msg_txt_y=0;
var open_disp_sp=0;
var pop_en=0;
var ht_offset=0;
var syaf_card_cnt=78;
var syaf_spd=1;
var txt_color="#fff8dc";
var txt_face="ｷsｲﾓｩ�ﾅ�";
var txt_size="2";
var sp_pn_en=0;
var move_center_en=0;
var cut_skip1=0;
var cut_sel=0;
var sa_sel=0;
var card_rev_en=0;
var pic_card_sel=0;
var pic_card_skip=1;
var pic_card_no=new Array(79);
var rep_auto_on=0;
var rep_back_path="image/rep_back.jpg";
var rep_height=300;
var rep_width=600;
var rep_txt_color="ghostwhite";
var rep_txt_face="ｷsｲﾓｩ�ﾅ�";
var rep_txt_size="3";
var ans_ptn=1;
var bpx=0;
var bpy=0;
var xofs = 0;
var yofs = 0;
var ext_back=new Array("","","","","","","");
var ext_back_x=new Array(7);
var ext_back_y=new Array(7);
var ext_back_alp=new Array(7);
var sp_card_pn=new Array(79);
var sp_card_an=new Array(79);
var sp_card_x=new Array(79);
var sp_card_y=new Array(79);
var sp_label_x=new Array(157);
var sp_label_y=new Array(157);
var sp_label_nm=new Array(157);
var sp_label_vis=new Array(157);
var syaf_upr=150;
var syaf_lwr=30;
var card_rt=new Array(79);
var card_rp=new Array(79);
var card_rt_temp=new Array(79);
var card_rp_temp=new Array(79);
var temp_card_rt=0;
var temp_card_rp=0;
var card_pn_f=new Array(79);
var card_pn=new Array(79);
var card_nm=new Array(79);
var card_imi=new Array(79);
var card_fno=new Array(79);
var card_name="";
var card_semantic="";
var card_pos="";
var card_s=new Array(79);
var card_sp=0;
var card_sl=0;
var card_open_f=new Array(79);
var winw=0;
var winh=0;
var pos_x_c=0;
var pos_y_c=0;
var ostx=0;
var osty=0;
var card_sx=new Array(79);
var card_sy=new Array(79);
var card_sx_temp=new Array(79);
var card_sy_temp=new Array(79);
var card_clk_p=0;
var card_spc=9;
var card_ch=new Array(79);
var rnd_r_inc=new Array(79);
var crc_inc=new Array(79);
var crc_data=new Array(79);
var rnd_r_dir=new Array(79);
var rnd_r=new Array(79);
var syaf_gra=Math.PI/180;
var syaf_en=0;
var card_rev=0;
var card_pic=new Array(79);
var move_frm=12;
var ImgFlag=false;
var timerID=0;
var rate=100;
var timer_en=0;
var code_p=0;
var lpc_all=0;
var lpc_inc=0;
var lpc_dec=0;
var lpc_ret=0;
var lpc_fin=0;
var lpc_tm=0;
var lpc_tm_stk=0;
var regA=0;
var regB=0;
var regC=0;
var regD=0;
var msg_txt="";
var step_sx=0;
var step_sy=0;
var to_x=0;
var to_y=0;
var tcut_A=0;
var tcut_B=0;
var tcut_p1=0;
var tcut_p2=0;
var tcut_mc=0;
var tcut_pc=0;
var mov_card_point=0;
var mov_card_count=0;
var tcut_pt1=0;
var tcut_pt2=0;
var tcut_pt3=0;
var link_nm=new Array(79);
var link_lnk=new Array(79);
var link_x=new Array(79);
var link_y=new Array(79);
var link_p=new Array(79);
var link_vis=new Array(79);
var link_pos=new Array(79);
var link_sema=new Array(79);
var rep_nm="";
var rep_x=0;
var rep_y=0;
var rep_vis=1;
var rep_card_en=0;
var rep_card_path="pict";
var rep_card_t=".jpg";
var line_alp=50;
var line_en=new Array(79);
var line_xs=new Array(79);
var line_ys=new Array(79);
var line_xd=new Array(79);
var line_yd=new Array(79);
var line_co=new Array(79);
var line_wh=new Array(79);
var line_card_e=new Array(79);
var line_card_s=new Array(79);
var line_card_d=new Array(79);
var line_card_co=new Array(79);
var line_card_wh=new Array(79);
var line_cr_en=new Array(79);
var line_cr_xc=new Array(79);
var line_cr_yc=new Array(79);
var line_cr_cr=new Array(79);
var line_cr_sr=new Array(79);
var line_cr_co=new Array(79);
var line_cr_wh=new Array(79);
var crc_en=new Array(79);
var crc_xc=new Array(79);
var crc_yc=new Array(79);
var crc_cr=new Array(79);
var crc_sr=new Array(79);
var crc_er=new Array(79);
var crc_co=new Array(79);
var crc_wh=new Array(79);
var crc_st=new Array(79);
var tm_pop=0;
var pop_timer=90;
var pop_txt=new Array(79);
var pop_txt_face="ｷsｲﾓｩ�ﾅ�";
var pop_txt_col="gold";
var pop_txt_size=2;
var pop_alp=70;
var pop_bgcol="#333333";
var pop_bgpict="image/rep_back.jpg";

function PopGene(){var tmp="";tmp+="<div id=\"pop\" onclick=\"pop_clear()\" style=\"position:absolute;visibility:hidden;background-Color:"+pop_bgcol+";background:url("+pop_bgpict+")\"></div>";document.write(tmp);ImgAlpha("pop",pop_alp);}
function pop_disp(i_tx){if(pop_en == 0){return;}clearTimeout(tm_pop);var scrx=document.body.scrollLeft;var scry=document.body.scrollTop;var posX=window.event.clientX+scrx;var posY=window.event.clientY+scry;ImgMove("pop",posX+10,posY+10,null);ImgZindex("pop",156,0);document.all["pop"].innerHTML="<table border=0><tr><td><font face=\""+pop_txt_face+"\" Color=\""+pop_txt_col+"\" size="+pop_txt_size+">"+i_tx+"</font></td></tr></table>";ImgVisible("pop",true);tm_pop=setTimeout("pop_clear()",1000*pop_timer);}
function pop_clear(){clearTimeout(tm_pop);ImgVisible("pop",false);}
function line_card_init(no,s,d,co,wh){line_card_e[no]=1;line_card_s[no]=s;line_card_d[no]=d;line_card_co[no]=co;line_card_wh[no]=wh;}
function line_init(no,xs,ys,xd,yd,co,wh){line_en[no]=1;line_xs[no]=xs;line_ys[no]=ys;line_xd[no]=xd;line_yd[no]=yd;line_co[no]=co;line_wh[no]=wh;}
function line_cr_init(no,cx,cy,cr,sr,co,wh){line_cr_en[no]=1;line_cr_xc[no]=cx;line_cr_yc[no]=cy;line_cr_cr[no]=cr;line_cr_sr[no]=sr;line_cr_co[no]=co;line_cr_wh[no]=wh;}
function crc_init(no,cx,cy,cr,sr,er,co,wh,st){crc_en[no]=1;crc_xc[no]=cx;crc_yc[no]=cy;crc_cr[no]=cr;crc_sr[no]=sr;crc_er[no]=er;crc_co[no]=co;crc_wh[no]=wh;crc_st[no]=st;}
function set_line(){var i=0;var t_card_sx=0;var t_card_sy=0;var t_card_dx=0;var t_card_dy=0;document.write("<div id=\"line_base\" style=\"position:absolute;Left:0;Top:0;visibility:hidden;width:"+sp_cros_w+";height:"+sp_cros_h+"\">");for(i=1;i<79;i++){if(line_en[i]==1){drawLine(line_xs[i],line_ys[i],line_xd[i],line_yd[i],line_co[i],line_wh[i]);}}for(i=1;i<79;i++){if(line_cr_en[i]==1){drawLineCR(line_cr_xc[i],line_cr_yc[i],line_cr_cr[i],line_cr_sr[i],line_cr_co[i],line_cr_wh[i]);}}for(i=1;i<79;i++){if(crc_en[i]==1){drawCrc(crc_xc[i],crc_yc[i],crc_cr[i],crc_sr[i],crc_er[i],crc_co[i],crc_wh[i],crc_st[i]);}}for(i=1;i<79;i++){if(line_card_e[i]==1){if(sp_card_an[line_card_s[i]]==0){t_card_sx=sp_card_x[line_card_s[i]]+(sp_card_w/2);t_card_sy=sp_card_y[line_card_s[i]]+(sp_card_h/2);}else if(sp_card_an[line_card_s[i]]==1){t_card_sx=sp_card_x[line_card_s[i]]+(sp_card_h/2);t_card_sy=sp_card_y[line_card_s[i]]+(sp_card_w/2);}if(sp_card_an[line_card_d[i]]==0){t_card_dx=sp_card_x[line_card_d[i]]+(sp_card_w/2);t_card_dy=sp_card_y[line_card_d[i]]+(sp_card_h/2);}else if(sp_card_an[line_card_d[i]]==1){t_card_dx=sp_card_x[line_card_d[i]]+(sp_card_h/2);t_card_dy=sp_card_y[line_card_d[i]]+(sp_card_w/2);}drawLine(t_card_sx,t_card_sy,t_card_dx,t_card_dy,line_card_co[i],line_card_wh[i]);}}document.write("</div>");}
function drawLine(x1,y1,x2,y2,cor,wh){var i=0;var tc_Color=cor;var tc_W=1;var tc_H=1;tc_W=wh;tc_H=wh;var lpX=0;var lpY=0;fx1=x1-Math.round(tc_W/2);fy1=y1-Math.round(tc_H/2);fx2=x2-Math.round(tc_W/2);fy2=y2-Math.round(tc_H/2);var A=new Array(fx1,fy1);var B=new Array(fx2,fy2);if((fx1==fx2)||(fy1==fy2)){tc_W=Math.abs(fx2-fx1+tc_W);tc_H=Math.abs(fy2-fy1+tc_H);lpY=Math.min(fy1,fy2);lpX=Math.min(fx1,fx2);document.writeln("<span style=\"position:absolute;overflow:hidden;background-color:"+tc_Color+";width:"+tc_W+"px;height:"+tc_H+"px;left:"+lpX+"px;top:"+lpY+"px\"></span>");}else if(Math.abs(fx1-fx2)>Math.abs(fy1-fy2)){P1=(A[0]>B[0])?B:A;P2=(A[0]<=B[0])?B:A;for(lpX=P1[0];lpX<=P2[0];lpX++){lpY=((P2[1]-P1[1])/(P2[0]-P1[0]))*(lpX-P1[0])+P1[1];document.writeln("<span style=\"position:absolute;overflow:hidden;background-color:"+tc_Color+";width:"+tc_W+"px;height:"+tc_H+"px;left:"+lpX+"px;top:"+lpY+"px\"></span>");}}else{P1=(A[1]>B[1])?B:A;P2=(A[1]<=B[1])?B:A;for(lpY=P1[1];lpY<=P2[1];lpY++){lpX=((P2[0]-P1[0])/(P2[1]-P1[1]))*(lpY-P1[1])+P1[0];document.writeln("<span style=\"position:absolute;overflow:hidden;background-color:"+tc_Color+";width:"+tc_W+"px;height:"+tc_H+"px;left:"+lpX+"px;top:"+lpY+"px\"></span>");}}}
function drawLineCR(cx,cy,cr,sr,cor,wh){var tc_Color=cor;var tc_W=wh;var tc_H=wh;var lpX=0;var lpY=0;var fx1=cx-Math.round(tc_W/2);var fy1=cy-Math.round(tc_H/2);var PI_r=Math.PI/180;var rCOS=Math.cos((sr+90)*PI_r);var rSIN=Math.sin((sr+90)*PI_r);var fx2=Math.round(rSIN*cr)+fx1;var fy2=Math.round(rCOS*cr)+fy1;fx2-=Math.round(tc_W/2);fy2-=Math.round(tc_H/2);var A=new Array(fx1,fy1);var B=new Array(fx2,fy2);if((fx1==fx2)||(fy1==fy2)){tc_W=Math.abs(fx2-fx1+tc_W);tc_H=Math.abs(fy2-fy1+tc_H);lpY=Math.min(fy1,fy2);lpX=Math.min(fx1,fx2);document.writeln("<span style=\"position:absolute; overflow:hidden; background-color:"+tc_Color+"; width:"+tc_W+"px; height:"+tc_H+"px; left:"+lpX+"px; top:"+lpY+"px\"></span>");}else if(Math.abs(fx1-fx2)>Math.abs(fy1-fy2)){P1=(A[0]>B[0])?B:A;P2=(A[0]<=B[0])?B:A;for(lpX=P1[0];lpX<=P2[0];lpX++){lpY=((P2[1]-P1[1])/(P2[0]-P1[0]))*(lpX-P1[0])+P1[1];document.writeln("<span style=\"position:absolute; overflow:hidden; background-color:"+tc_Color+"; width:"+tc_W+"px; height:"+tc_H+"px; left:"+lpX+"px; top:"+lpY+"px\"></span>");}}else{P1=(A[1]>B[1])?B:A;P2=(A[1]<=B[1])?B:A;for(lpY=P1[1];lpY<=P2[1];lpY++){lpX=((P2[0]-P1[0])/(P2[1]-P1[1]))*(lpY-P1[1])+P1[0];document.writeln("<span style=\"position:absolute; overflow:hidden; background-color:"+tc_Color+"; width:"+tc_W+"px; height:"+tc_H+"px; left:"+lpX+"px; top:"+lpY+"px\"></span>");}}}
function drawCrc(cx,cy,cr,sr,er,cor,wh,st){var i=0;var tc_Color=cor;var tc_W=wh;var tc_H=wh;var lpX=0;var lpY=0;var cfx=cx-Math.round(tc_W/2);var cfy=cy-Math.round(tc_H/2);var rCOS=0;var rSIN=0;var PI_r=Math.PI/180;stp=0.5+st;tc_Color=cor;for(i=sr;i<er+1;i+=stp){rCOS=Math.cos((i+90)*PI_r);rSIN=Math.sin((i+90)*PI_r);lpX=(rSIN*cr)+cfx;lpY=(rCOS*cr)+cfy;document.writeln("<span style=\"position:absolute; overflow:hidden; background-color:"+tc_Color+"; width:"+tc_W+"px; height:"+tc_H+"px; left:"+lpX+"px; top:"+lpY+"px\"></span>");}}
function rep(){var i=0,temp="";nwin=window.open("","Tarotwindow","resizable=yes,scrollbars=yes,height="+rep_height+",width="+rep_width+"");nwin.document.open();temp+="<HTML><HEAD><META HTTP-EQUIV=\"Content-Type\" CONTENT=\"text/html;charset=big5\"><TITLE>ｵｲｪG､@ﾄ�ｪ�</TITLE></HEAD>";temp+="<BODY text="+rep_txt_color+" vLink=#800080 aLink=#ff0000 link=#0000ff bgColor=#000000 background="+rep_back_path+" BGPROPERTIES=\"fixed\"><br>";temp+="<FONT face=\""+rep_txt_face+"\" size="+rep_txt_size+">";if(sp_doc!=""){temp+=sp_doc+"<br><hr align=left width=\"100%\" SIZE=3><br>";}nwin.document.write(temp);temp="";if(ans_ptn==0){for(i=1;i<(sp_card_dsp+1);i++){temp+="<b>｛ "+i+" ｱiｵP</b>"+"｡@｡@"+card_nm[i];if(sp_pn_en==0){temp+=" ? "+card_pn[i];}temp+="<br>";if(sp_label_nm[i]!=null){temp+=sp_label_nm[i]+"<br>";}if(sp_label_sema[i]!=null){temp+=sp_label_sema[i]+"<br>";}temp+=card_imi[i]+"<br><br>";}nwin.document.write(temp);temp="";}else if(ans_ptn==1){for(i=1;i<(sp_card_dsp+1);i++){temp="";temp+="<table width=\"100%\" border=0><tr><td width=\""+(sp_card_h+20)+"\"><p align=center>";if(document.all&&rep_card_en==1){temp+="<a target=_blank href=\""+rep_card_path+"/"+card_ch[i]+rep_card_t+"\">";}temp+="<img alt="+card_nm[i]+" id=\""+"rpic"+i+"\""+"src="+card_s[i].src + " border=0>";if(document.all&&rep_card_en==1){temp+="</a>";}nwin.document.write(temp);temp="";if(sp_pn_en==0&&document.all){if(card_pn_f[i]=="1"&&card_src_sel==0){nwin.document.all["rpic"+i].style.filter="flipH flipV";}}temp+="</p></td><td><p align=left>";if(sp_label_nm[i]!=null){temp+="ｲﾄ"+i+"ｱiｵP･Nｪ�ｪｺｷNｸqｬO"+sp_label_nm[i]+"｢w"+card_nm[i];if(sp_pn_en==0){temp+="｡@"+card_pn[i];}temp+="｡@｡@｡@｡@｡@<br>";}else{temp+=i+"ｱiｵP"+card_nm[i];if(sp_pn_en==0){temp+="の"+card_pn[i];}temp+="が出ました。<br>";}if(sp_label_sema[i]!=null){temp+="ｵPｰ}ｪｺｷNｸqｬO｡G"+sp_label_sema[i]+"｡C<br>";}temp+="<br>ｦｹｵPｪｺｷNｸqｬO｡G"+card_imi[i]+"｡C";temp+="</p></td></tr></table><br><br>";nwin.document.write(temp);temp="";}}var p_cnt=0,n_cnt=0,m_cnt=0,s_cnt=0,w_cnt=0,c_cnt=0,d_cnt=0;for(i=1;i<(sp_card_dsp+1);i++){if(card_pn_f[i]==0){p_cnt++;}else if(card_pn_f[i]==1){n_cnt++;}if(0<card_ch[i]&&card_ch[i]<=22){m_cnt++;}else if(22<card_ch[i]&&card_ch[i]<=36){s_cnt++;}else if(36<card_ch[i]&&card_ch[i]<=50){w_cnt++;}else if(50<card_ch[i]&&card_ch[i]<=64){c_cnt++;}else if(64<card_ch[i]&&card_ch[i]<=78){d_cnt++;}}if(sp_pn_en==0){temp+="<hr align=left width=\"100%\" SIZE=1>";temp+="ｵPｰ}ｨﾏ･ﾎｱiｼﾆ｡Aｦ@"+sp_card_dsp+"ｱi";temp+="｡@｡@･ｿｦ�ｸm "+p_cnt+"ｱi";temp+="｡@｡@ｰfｦ�ｸm "+n_cnt+"ｱi";if(22 < sp_card_cnt){temp+="<br>､jｯｦｻ�"+m_cnt+"ｱi";temp+="｡@｡@ﾄ_ｼC"+s_cnt+"ｱi";temp+="｡@｡@ﾅvｧ�"+w_cnt+"ｱi";temp+="｡@｡@ｸtｪM "+c_cnt+"ｱi";temp+="｡@｡@ｪ�ｹ� "+d_cnt+"ｱi";}}temp+="</FONT>";temp+="<hr align=left width=\"100%\" SIZE=3><CENTER><FORM><INPUT TYPE=\"button\" VALUE=\"ﾃ�ｳｬ､@ﾄ�ｪ�\" onClick=\"window.close()\"></FORM></CENTER>";temp+="</BODY></HTML>";nwin.document.write(temp);nwin.document.close();if(document.all){nwin.document.focus();}}
function item_make(){var i=0;document.open();for(i=1;i<7;i++){if(ext_back[i]!=""){CardGene("30"+i,ext_back[i],"bk30"+i,ext_back_x[i],ext_back_y[i]);}}card_sp=new Image();card_sp.src=card_p_path+"/79"+pict_t;card_sl=new Image();card_sl.src=card_l_path+"/79"+pict_t;set_line();ImgAlpha("line_base",line_alp);for(i=1;i<79;i++){CardGene(i,card_sp.src,"pic"+i,0,0);cursor_sw("pic"+i,true);}CardGene(0,card_sl.src,"sel_LR",0,0);CardGene(1,image_path+"/arw_rt.gif","sel_L",0,0);CardGene(2,image_path+"/arw_lt.gif","sel_R",0,0);cursor_sw("sel_L",true);cursor_sw("sel_R",true);for(i=1;i<157;i++){if(sp_label_vis[i]==0&&sp_label_sema[i]==null){LabelGene(null,sp_label_nm[i],"label"+i,0,0,0);}else if(sp_label_vis[i]==0&&sp_label_sema[i]!=null){LabelGene(i,sp_label_nm[i],"label"+i,0,0,1);cursor_sw("label"+i,true);}}for(i=1;i<79;i++){if(link_vis[i]==0){LinkGene(i,link_nm[i],link_lnk[i],"lnk"+i,link_x[i],link_y[i],link_p[i],null);cursor_sw("lnk"+i,true);}}if(rep_vis==0){LinkGene(0,rep_nm,null,"rep",rep_x,rep_y,null,1);cursor_sw("rep",true);}if(open_msg_txt!=""){LabelGene(null,open_msg_txt,"msg0",0,0,0);}var msg="ｽﾐ･ﾎｷﾆｹｫ･ｪﾁ萃I､@､UｵPｭｱ｡AｴNｷ|ｶ}ｩlｬ~ｵP｡A<br>ｽﾐｬ~ｵPｬ~､[､@ﾂI｡AｵMｫ皋Aｫ�､@､Uｷﾆｹｫ･ｪﾁ茖Aｵｲｧ�ｬ~ｵP";LabelGene(null,msg,"msg1",0,0,0);msg="ｷﾇｳﾆ､ﾁｵP｡AｱNｵP､ﾀｦｨｨ簀|｡A<br>ｽﾐ･ﾎｷﾆｹｫ･ｪﾁ萃Iｿ�､@ｳBｱzｳﾟﾅwｪｺｦa､陦C";LabelGene(null,msg,"msg2",0,0,0);if(pic_card_sel==0){msg="ｬDｿ�ｵPｰ}ｩﾒｻﾝｭnｪｺｵP｡Aｽﾐｦbｳﾟﾅwｪｺｦa､隘ﾎｷﾆｹｫ･ｪﾁ萃I､@､U";}else if(pic_card_sel==1){msg="ク?ックした位置から"+pic_card_skip+"??にカードを引きます、好みの位置のカードをク?ックしてください。";}else if(pic_card_sel==2){msg="スプ?ッドで?められている?番でカードを引きます、どれかカードをク?ックしてください。";for(i=1;i<sp_card_dsp+1;i++){msg_txt+=pic_card_no[i]+" ,";}}LabelGene(null,msg,"msg3",0,0,0);msg="ｷﾇｳﾆ､ﾁｵP｡AｱNｵP､ﾀｦｨ､Tﾅ|｡A<br>ｽﾐ･ﾎｷﾆｹｫ･ｪﾁ萃Iｿ�ｨ箋Bｱzｳﾟﾅwｪｺｦa､陦C";LabelGene(null,msg,"msg4",0,0,0);msg="ｱNｵPﾅ|ｦ^｡Aｽﾐ･ﾎｷﾆｹｫ･ｪﾁ茯ﾌｧﾇﾂIｿ�ｱzｷQｭnｵPｰ�｡AｱN､Tｰ�ﾅ|ｦｨ､@ｰ�";LabelGene(null,msg,"msg5",0,0,0);msg="ｨMｩwｵPｪｺ･ｿｰfｦ�ｸm｡AｽﾐﾂIｿ�､@ｭﾓｽbﾀY｡AｦﾓｦｹｽbﾀYｩﾒｫ�ｪｺｦa､霍|ｴﾂ､W";LabelGene(null,msg,"msg6",0,0,0);PopGene();document.close();}
function sel_top1(){ImgMove("sel_LR",pos_x_c-(sp_card_h/2),pos_y_c-(sp_card_w/2),1);ImgVisible("sel_LR",true);ImgMove("sel_L",(pos_x_c-(sp_card_h/2))-(20+16),pos_y_c-16,1);ImgVisible("sel_L",true);ImgMove("sel_R",(pos_x_c+(sp_card_h/2))+(20-16),pos_y_c-16,1);ImgVisible("sel_R",true);}
function sel_top2(no){if(no==0){return;}else if(no==1){}else if(no==2){for(i=1;i<sp_card_cnt+1;i++){if(card_rp[i]==0){card_rp[i]=1;}else if(card_rp[i]==1){card_rp[i]=0;}}}ImgVisible("sel_LR",false);ImgVisible("sel_L",false);ImgVisible("sel_R",false);ImgVisible("msg6",false);code_p=400;}
function pre_disp_card(){var i=0;var tmp_x=0;var tmp_y=0;for(i=1;i<sp_card_dsp+1;i++){if(sp_card_an[i]==0){card_rev_load("pic"+i,null,0);tmp_x=(sp_card_x[i]+sp_card_w_offset)+ostx;tmp_y=(sp_card_y[i]+sp_card_h_offset)+osty;}else if(sp_card_an[i]==1){card_rev_load("pic"+i,null,1);tmp_x=(sp_card_x[i]+sp_card_h_offset)+ostx;tmp_y=(sp_card_y[i]+sp_card_w_offset)+osty;}ImgMove("pic"+i,tmp_x,tmp_y,i);ImgVisible("pic"+i,true);}for(i=1;i<157;i++){if(sp_label_vis[i]==0){ImgMove("label"+i,sp_label_x[i]+ostx,sp_label_y[i]+osty,null);ImgVisible("label"+i,true);}}ImgMove("line_base",ostx,osty,0);ImgVisible("line_base",true);}
function disp_card(nm,rp,tm){var i=0;var tmp="";var tmp_x;var tmp_y;if(lpc_fin==0){fio(0,nm,rp,0,tm);regA=0;}if(lpc_all>0){if(regA==0){lpc_inc++;ImgVisible("pic"+lpc_inc,true);if(sp_card_an[lpc_inc]==0){card_rev_load("pic"+lpc_inc,null,0);tmp_x=(sp_card_x[lpc_inc]+sp_card_w_offset)+ostx;tmp_y=(sp_card_y[lpc_inc]+sp_card_h_offset)+osty;}else if(sp_card_an[lpc_inc]==1){card_rev_load("pic"+lpc_inc,null,1);tmp_x=(sp_card_x[lpc_inc]+sp_card_h_offset)+ostx;tmp_y=(sp_card_y[lpc_inc]+sp_card_w_offset)+osty;}regA=1;regB=12;step_sx=(tmp_x-(pos_x_c-(sp_card_w/2)))/12;step_sy=(tmp_y-(pos_y_c-(sp_card_h/2)))/12;}if(regB>0){card_sx[lpc_inc]=card_sx[lpc_inc]+step_sx;card_sy[lpc_inc]=card_sy[lpc_inc]+step_sy;ImgMove("pic"+lpc_inc,card_sx[lpc_inc],card_sy[lpc_inc],200-lpc_all);regB--;}else if(regB==0){if(sp_pn_en==0){if(card_pn_f[lpc_inc]=="1") {ImgFlipHV("pic"+lpc_inc,2);}}regA=0;regB=12;lpc_all--;}}else if(lpc_all==0){regA=0;regB=0;for(i=1;i<sp_card_cnt+1;i++){if(pop_en==1){if(sp_pn_en==0){tmp=card_pn[i]+"</b><br>"+card_imi[i];}else if(sp_pn_en==1){tmp=card_imi[i];}}else if(pop_en==2){if(sp_pn_en==0){tmp=card_pn[i]+"<br>";}else if(sp_pn_en==1){tmp="";}}pop_txt[i]="<b>"+card_nm[i]+" ： "+tmp;}fio(1,null,null,null,null);}}
function card_set(){var i=0;for(i=1;i<(sp_card_cnt+1);i++){card_rt_temp[i]=i;card_rp_temp[i]=0;card_rt[i]=i;card_rp[i]=0;}}
function link_onmouseover(no,id){if(code_p==580){window.self.status=link_sema[no];return true;}}
function link_onmouseout(no,id){if(code_p==580){window.self.status="";return true;}}
function label_onmouseover(no,id){if(code_p==580){window.status=sp_label_sema[no];}}
function label_onmouseout(no,id){if(code_p==580){window.status="";}}
function card_onmousedown(no,id,btn){if(no<79){}else{return;}if(code_p==580&&card_rev_en==1){if(btn==2&&card_open_f[no]==1){card_rev=1;if(card_open_f[no]==1){card_clk_p=no;card_open_f[no]=0;window.status="";code_p=600;}}}}
function card_onmousemove(no,id){if(no<79){}else{return;}if(code_p==580){if(card_open_f[no]==1){if(document.all){pop_disp(pop_txt[no]);}}}}
function card_onmouseout(no,id){if(no<79){}else{return;}if(code_p==580){window.status="";ImgMove("pic"+no,card_sx[no],card_sy[no],null);pop_clear();}if(code_p==322||code_p==326||code_p==330||code_p==622){window.status="";}}
function card_onmouseover(no,id){if(no<79){}else{return;}if(code_p==230){if(no==1){window.status="､｣､ﾁｵP｡Aﾄ~ﾄ�ｨ茹Lｰﾊｧ@";}else if(no>1){window.status="1〜"+(no-1)+"ｱiｻP"+no+"〜"+sp_card_cnt+"ｱiｪｺ･d､�･讀ｬｩ�ｸm";}}else if(code_p==306){if(tcut_A==0&&no==1){window.status="､｣､ﾁｵP｡Aﾄ~ﾄ�ｨ茹Lｰﾊｧ@";}else if(tcut_A!=no&&tcut_A!=no+1&&tcut_A!=no-1&&no!=1){window.status=(no-1)+"ｱiｻP"+no+"ｱi､ｧｶ｡､ﾁｵP";}else if(tcut_A!=0||tcut_A==no||tcut_A==no+1||tcut_A==no-1||no==1){window.status="";}}else if(code_p==322||code_p==326||code_p==330){if(to_y==card_sy[no]){window.status="";return;}if(tcut_A==0&&no==1){window.status="､｣､ﾁｵP｡Aﾄ~ﾄ�ｨ茹Lｰﾊｧ@";return;}var umd="";if(tcut_mc==0){umd="ｩ�ｦbｵPｰ�ｪｺｳﾌ､Uｭｱ";}else if(tcut_mc==1){umd="ｩ�ｦbｵPｰ�ｪｺ､､ｶ｡";}else if(tcut_mc==2){umd="ｩ�ｦbｵPｰ�ｪｺｳﾌ､Wｭｱ";}if(0<no&&no<tcut_p1){window.status="ｲﾄ1ｨ�"+(tcut_p1-1)+"ｱi"+umd;}else if(tcut_p1<=no&&no<tcut_p2){window.status="ｲﾄ"+tcut_p1+"ｨ�"+(tcut_p2-1)+"ｱi"+umd;}else if(tcut_p2<=no&&no<=sp_card_cnt){window.status="ｲﾄ"+tcut_p2+"ｨ�"+sp_card_cnt+"ｱi"+umd;}}else if(code_p==420){if(pic_card_sel==0){window.status="ｿ�ｨ�ｲﾄ"+no+"ｱi･d､�";}else if(pic_card_sel==1){window.status=no+" ?目から"+pic_card_skip+" ??にカードを引きます。";}else if(pic_card_sel==2){window.status=msg_txt+"の?番でカードを引きます。";}}else if(code_p==580){ImgMove("pic"+no,card_sx[no]+bpx,card_sy[no]+bpy,null);var temp="";if(card_open_f[no]==1){if(sp_pn_en==0){temp="ｲﾄ"+no+"ｱi　[ "+sp_label_nm[no]+" ]　← "+card_nm[no]+" ： "+card_pn[no];}else if(sp_pn_en==1){temp="ｲﾄ"+no+"ｱi　[ "+sp_label_nm[no]+" ]　← "+card_nm[no];}if(document.all){pop_disp(pop_txt[no]);}}else if(card_open_f[no]==0){temp="ｲﾄ"+no+"ｱi";}window.status=temp;}else if(code_p==622){if(no==1){window.status="･ｪｰｼｦb､W｡A･kｰｼｦb､U｡Aｶｶｮﾉｰwｱﾛﾂ�";}else if(no==2){window.status="･kｰｼｦb､W｡A･ｪｰｼｦb､U｡Aｰfｮﾉｰwｱﾛﾂ�";}}}
function card_onclick(no,id){if(no<79){}else{return;}if(code_p==100){window.status="ﾅｪｨ�､､｡Aｽﾐｵyｫ�...";code_p=110;}else if(code_p==120){syaf_en=0;}else if(code_p==230){if(no==1){window.status="､｣､ﾁｵP｡Aﾄ~ﾄ�ｨ茹Lｰﾊｧ@";}else if(no>1){window.status="1〜"+(no-1)+"ｱiｻP"+no+"〜"+sp_card_cnt+"ｱiｪｺ･d､�･讀ｬｩ�ｸm";}card_clk_p=no;ImgVisible("msg2",false);code_p=240;}else if(code_p==306){tcut1(no);}else if(code_p==322||code_p==326||code_p==330){if(to_y==card_sy[no]){window.status="";return;}var umd="";if(tcut_mc==0){umd="ｩ�ｦbｵPｰ�ｪｺｳﾌ､Uｭｱ";tcut_mc=1;tcut_pt1=tcut_pc;code_p=324;}else if(tcut_mc==1){umd="ｩ�ｦbｵPｰ�ｪｺ､､ｶ｡";tcut_mc=2;tcut_pt2=tcut_pc;code_p=328;}else if(tcut_mc==2){umd="ｩ�ｦbｵPｰ�ｪｺｳﾌ､Wｭｱ";tcut_mc=3;tcut_pt3=tcut_pc;code_p=332;}if(0<no&&no<tcut_p1){tcut_pc=0;window.status="ｲﾄ1ｨ�"+(tcut_p1-1)+"ｱi"+umd;}else if(tcut_p1<=no&&no<tcut_p2){tcut_pc=1;window.status="ｲﾄ"+tcut_p1+"ｨ�"+(tcut_p2-1)+"ｱi"+umd;}else if(tcut_p2<=no&&no<=sp_card_cnt){tcut_pc=2;window.status="ｲﾄ"+tcut_p2+"ｨ�"+sp_card_cnt+"ｱi"+umd;}}else if(code_p==420){ImgVisible("msg3",false);if(pic_card_sel==0){window.status="ｿ�ｨ�ｲﾄ"+no+"ｱi･d､�";}else if(pic_card_sel==1){window.status="ｿ�ｨ�ｲﾄ"+no+"ｱi"+pic_card_skip+"･d､�";}else if(pic_card_sel==2){window.status="スプ?ッドで?められている?番でカードを引いています。";}card_clk_p=no;code_p=430;}else if(code_p==580){var temp="";if(document.all){ImgZindex("pic"+no,78,0);}if(card_open_f[no]!=1){card_clk_p=no;card_open_f[no]=1;if(sp_pn_en==0){temp="ｲﾄ"+no+"ｱi　[ "+sp_label_nm[no]+" ]　← "+card_nm[no]+" ： "+card_pn[no];}else if(sp_pn_en==1){temp="ｲﾄ"+no+"ｱi　[ "+sp_label_nm[no]+" ]　← "+card_nm[no];}window.status=temp;code_p=600;}}else if(code_p==622){sel_top2(no);}}
function tcut1(no){if(tcut_A==0&&no==1){ImgVisible("msg4",false);card_disp_sw(sp_card_cnt,1);if(sa_sel==0){code_p=400;}else if(sa_sel==1){code_p=620;}}else if(tcut_A==0&&no!=1){tcut_A=no;ImgMove("pic"+no,null,card_sy[no]-10,null);}else if(tcut_A==no){tcut_A=0;ImgMove("pic"+no,null,card_sy[no],null);}else if(tcut_A!=0&&tcut_A!=no&&tcut_A!=no+1&&tcut_A!=no-1&&no!=1){tcut_B=no;ImgMove("pic"+no,null,card_sy[no]-10,null);code_p=308;}}
function tcut2(sw){var str=0;var stp=0;if(sw==0){str=1;stp=tcut_p1;}else if(sw==1){str=tcut_p1;stp=tcut_p2;}else if(sw==2){str=tcut_p2;stp=sp_card_cnt;}for(i=str;i<stp;i++){card_rt[i]=card_rt_temp[i];card_rp[i]=card_rp_temp[i];}}
function tcut3(rtp){if(tcut_pc==0){ani_card_move(0,tcut_p1-1,rtp,null);}else if(tcut_pc==1){ani_card_move(tcut_p1-1,tcut_p2-1,rtp,null);}else if(tcut_pc==2){ani_card_move(tcut_p2-1,sp_card_cnt,rtp,null);}ImgMove("pic"+mov_card_point,null,null,mov_card_count);}
function ani_pict_open1(no,nm,rp,tm){var i=0;if(lpc_fin==0){fio(0,nm,rp,0,tm);regA=sp_card_w;regB=Math.floor(sp_card_w/nm);if(sp_card_an[no]==0){card_sx_temp[no]=card_sx[no];}else if(sp_card_an[no]==1){card_sy_temp[no]=card_sy[no];}}if(lpc_all>0){lpc_inc++;regA-=regB;if(sp_card_an[no]==0){ImgReSize("pic"+no,regA,sp_card_h);card_sx_temp[no]+=regB/2;ImgMove("pic"+ no,card_sx_temp[no],null,null);}else if(sp_card_an[no]==1){ImgReSize("pic"+no,sp_card_h,regA);card_sy_temp[no]+=regB/2;ImgMove("pic"+ no,null,card_sy_temp[no],null);}lpc_all--;}else if(lpc_all==0){fio(1,null,null,null,null);}}
function ani_pict_open2(no,nm,rp,tm){var i=0;if(lpc_fin==0){fio(0,nm,rp,0,tm);regA=1;if(card_rev==0){regB=Math.floor(sp_card_w/nm);card_rev_load("pic"+no,no,null);}else if(card_rev==1){regB=Math.floor(sp_card_w/nm);if(sp_card_an[no]==0){card_rev_load("pic"+no,null,0);}else if(sp_card_an[no]==1){card_rev_load("pic"+no,null,1);}card_rev=0;}}if(lpc_all>0){lpc_inc++;regA+=regB;if(sp_card_an[no]==0){ImgReSize("pic"+no,regA,sp_card_h);card_sx_temp[no]-=regB/2;ImgMove("pic"+ no,card_sx_temp[no],null,null);}else if(sp_card_an[no]==1){ImgReSize("pic"+no,sp_card_h,regA);card_sy_temp[no]-=regB/2;ImgMove("pic"+ no,null,card_sy_temp[no],null);}lpc_all--;}else if(lpc_all==0){if(sp_card_an[no]==0){ImgReSize("pic"+no,sp_card_w,sp_card_h);}else if(sp_card_an[no]==1){ImgReSize("pic"+no,sp_card_h,sp_card_w);}ImgMove("pic"+ no,card_sx[no],card_sy[no],null);pop_clear();fio(1,null,null,null,null);}}
function card_syaf(){var i=0;var j=0;var t=0;for(i=sp_card_cnt;i>0;i--){j=RangeRandom(1,i);t=card_rt[i];card_rt[i]=card_rt[j];card_rt[j]=t;card_rp[i]=RangeRandom(1,2)-1;}}
function card_pic_set(){var i=0;var temp=new Array(79);for(i=1;i<(sp_card_cnt+1);i++){temp[i]=i;card_rt_temp[i]=card_rt[i];}var i=0;var stp=card_clk_p;var sed=1;var c_sep=card_clk_p;if(pic_card_sel==0||pic_card_sel==1){while(sed==1){if(stp>sp_card_cnt){stp=stp-sp_card_cnt;}if(stp==0){stp=1;}if (card_rt_temp[stp]==0){if (stp==sp_card_cnt){stp=1;}else if(stp<sp_card_cnt){stp=stp+1;}}if(stp<(sp_card_cnt+1)&&card_ch[stp]!=0){i=i+1;card_ch[i]=card_rt_temp[stp];card_pic[i]=temp[stp];card_rt_temp[stp]=0;if(pic_card_sel==0){stp=stp+c_sep;}else if(pic_card_sel==1){stp=stp+pic_card_skip;}}if(i==sp_card_cnt){sed=0;}}}else if(pic_card_sel==2){for(i=1;i<sp_card_cnt+1;i++){card_pic[i]=pic_card_no[i];card_ch[i]=card_rt[pic_card_no[i]];}}for(i=1;i<(sp_card_dsp+1);i++){ImgMove("pic"+card_pic[i],null,card_sy[card_pic[i]]-10,null);}}
function card_picup(){var i=0;var k=0;var p="";for(i=1;i<(sp_card_dsp+1);i++){k=card_ch[i];temp_card_rt=k;if(sp_card_pn[i]==0){p=""+card_rp[k];}else if(sp_card_pn[i]==1){p="0";}else if(sp_card_pn[i]==2){p="1";}if(sp_pn_en==1){p="0";}Oracle(k,p);card_pn_f[i]=p;card_pn[i]=card_pos;card_imi[i]=card_semantic;card_nm[i]=card_name;card_fno[i]=temp_card_rt;if(card_src_sel==0){if(sp_card_an[i]==0){card_s[i]=new Image();card_s[i].src=card_p_path+"/"+card_fno[i]+pict_t;}else if(sp_card_an[i]==1){card_s[i]=new Image();card_s[i].src=card_l_path+"/"+card_fno[i]+pict_t;}}else if(card_src_sel==1){if(sp_card_an[i]==0&&p=="0"){card_s[i]=new Image();card_s[i].src=card_p_path+"/"+card_fno[i]+pict_t;}else if(sp_card_an[i]==1&&p=="0"){card_s[i]=new Image();card_s[i].src=card_l_path+"/"+card_fno[i]+pict_t;}else if(sp_card_an[i]==0&&p=="1"){card_s[i]=new Image();card_s[i].src=card_pr_path+"/"+card_fno[i]+pict_t;}else if(sp_card_an[i]==1&&p=="1"){card_s[i]=new Image();card_s[i].src=card_lr_path+"/"+card_fno[i]+pict_t;}}}}
function RangeRandom(num1,num2){if((num1-num2)>0){var nn1=num1;var nn2=num2;}else{var nn1=num2;var nn2=num1;}var rn=nn1-nn2+1;var number=Math.floor(Math.random()*rn)+nn2;return number}
function syaful_loop(nm,rp){var i=0;if(lpc_fin==0){regA=pos_x_c-(sp_card_w/2);regB=pos_y_c-(sp_card_h/2);regC=0;for(i=1;i<(nm+1);i++){crc_data[i]=0;rnd_r_dir[i]=0;rnd_r[i]=0;}lpc_all=nm;lpc_ret=rp;lpc_fin=1;}var G=0;regC++;if(regC>lpc_all){regC=1;}i=regC;if(syaf_en==1){G=RangeRandom(1,2);rnd_r_inc[i]=RangeRandom(syaf_lwr,syaf_upr);crc_inc[i]=RangeRandom(syaf_lwr,syaf_upr);crc_data[i]=crc_data[i]+crc_inc[i];if(rnd_r_dir[i]==0){rnd_r[i]=rnd_r[i]+rnd_r_inc[i];}else if(rnd_r_dir[i]==1){rnd_r[i]=rnd_r[i]-rnd_r_inc[i];}if(rnd_r[i]>200&&rnd_r_dir[i]==0){rnd_r_dir[i]=1;}else if(rnd_r[i]<0&&rnd_r_dir[i]==1){rnd_r_dir[i]=0;}card_sx[i]=Math.floor(((Math.cos(crc_data[i]*syaf_gra))*rnd_r[i])+regA);card_sy[i]=Math.floor(((Math.sin(crc_data[i]*syaf_gra))*rnd_r[i])+regB);ImgMove("pic"+i,card_sx[i],card_sy[i],79);if (G==1){card_rev_load("pic"+i,null,0);}else if (G==2){card_rev_load("pic"+i,null,1);}}if(syaf_en==0){lpc_fin=0;code_p=lpc_ret;}}
function ani_card_disp_sw(nm,rp,tm,sw){var i=0;if(lpc_fin==0){fio(0,nm,rp,0,tm);}if(lpc_all>0){if(sw==0){ImgVisible("pic"+lpc_all,true);}else if(sw==1){lpc_inc++;ImgVisible("pic"+lpc_inc,false);}lpc_all--;}else if(lpc_all==0){fio(1,null,null,null,null);}}
function ani_pos_line(nm,rp,tm){var i=0;if(lpc_fin==0){fio(0,nm,rp,0,tm);pos_center();if(sp_card_cnt>22){card_spc=Math.floor((winw-20-sp_card_w)/sp_card_cnt);if(card_spc<1){card_spc=1;}}else{if(winw>300){card_spc=2;}if(winw>400){card_spc=3;}if(winw>500){card_spc=5;}if(winw>600){card_spc=7;}if(winw>700){card_spc=9;}}}regA=pos_x_c+((card_spc*(sp_card_cnt)-(sp_card_w/2))/2);regB=pos_y_c-(sp_card_h/2);if(lpc_all>0){lpc_inc++;card_rev_load("pic"+lpc_all,null,0);card_sx[lpc_all]=regA-(card_spc*lpc_inc);card_sy[lpc_all]=regB;ImgMove("pic"+lpc_all,card_sx[lpc_all],card_sy[lpc_all],lpc_inc);ImgVisible("pic"+lpc_all,true);lpc_all--;}else if(lpc_all==0){fio(1,null,null,null,null);}}
function ani_cut_A(nm,rp,tm){var i=0;if(lpc_fin==0){fio(0,nm,rp,0,tm);regA=card_clk_p-1;regB=card_sy[1]-sp_card_h-10;regC=0;regD=0;}if(lpc_all>0){if(regC==0){if(regA==nm){regA=0;}lpc_inc++;regA++;regC=1;regD=12;for(i=0;i<sp_card_cnt+1;i++){card_sx_temp[i]=card_sx[i];card_sx_temp[i]=card_sx[i];}step_sx=(card_sx[lpc_inc]-card_sx[regA])/12;step_sy=(regB-card_sy[lpc_inc])/12;}if(regD>0){card_sx_temp[regA]=card_sx_temp[regA]+step_sx;card_sy[lpc_inc]=card_sy[lpc_inc]+step_sy;ImgMove("pic"+regA,card_sx_temp[regA],card_sy[lpc_inc],200-lpc_all);regD--;}else if(regD==0){ImgMove("pic"+regA,card_sx[lpc_inc],regB,lpc_all);regC=0;regD=12;lpc_all--;}card_rt_temp[lpc_inc]=card_rt[regA];card_rp_temp[lpc_inc]=card_rp[regA];}else if(lpc_all==0){regC=0;regD=0;fio(1,null,null,null,null);}}
function ani_cut_B(nm,rp,tm){var i=0;if(lpc_fin==0){fio(0,nm,rp,0,tm);regA=card_clk_p-1;}if(lpc_all>0){if(regA==nm){regA=0;}lpc_inc++;regA++;ImgVisible("pic"+regA,false);card_rt[lpc_all]=card_rt_temp[lpc_all];card_rp[lpc_all]=card_rp_temp[lpc_all];lpc_all--;}else if(lpc_all==0){fio(1,null,null,null,null);}}
function CardGene(no,src,id,x,y){var i=0;var tmp;tmp="<img ";tmp+="onmouseover=\"card_onmouseover("+no+","+id+");&#13;&#10;\" ";tmp+="onclick=\"card_onclick("+no+","+id+",event.button);&#13;&#10;\" ";tmp+="onmousedown=\"card_onmousedown("+no+","+id+",event.button);&#13;&#10;\" ";tmp+="onmouseout=\"card_onmouseout("+no+","+id+");&#13;&#10;\" ";tmp+="onmousemove=\"card_onmousemove("+no+","+id+");&#13;&#10;\" ";tmp+="id=\""+id+"\" src=\""+src+"\" ";tmp+="style=\"position:absolute;Left:"+x+";Top:"+y+";visibility:hidden;\">";document.write(tmp);}
function LabelGene(no,src,id,x,y,sw){var i=0;var tmp;tmp="<font face=\""+txt_face+"\" color="+txt_color+" size="+txt_size+" ";if(document.all){if(sw==1){tmp+="onmouseover=\"label_onmouseover("+no+","+id+");&#13;&#10;\" ";tmp+="onmouseout=\"label_onmouseout("+no+","+id+");&#13;&#10;\" ";}}tmp+="id=\""+id+"\"";tmp+="style=\"position:absolute;Left:"+x+";Top:"+y+";visibility:hidden;\"><nobr>";tmp+=src;tmp+="</nobr></font>";document.write(tmp);}
function LinkGene(no,src,lnk,id,x,y,p,sw){var i=0;var tmp="";if(sw==null){tmp="<string><a target="+p+" href=\""+lnk+"\">";}tmp+="<font face=\""+txt_face+"\" color="+txt_color+" size="+txt_size+" ";if(document.all){tmp+="onmouseover=\"return link_onmouseover("+no+","+id+");&#13;&#10;\" ";tmp+="onmouseout=\"return link_onmouseout("+no+","+id+");&#13;&#10;\" ";}if(sw==1){tmp+=" onclick=\"rep();&#13;&#10;\" ";}tmp+="id=\""+id+"\"";tmp+="style=\"position:absolute;Left:"+x+";Top:"+(y+ht_offset)+";visibility:hidden;\">";tmp+=src;tmp+="</font>";if(sw==null){tmp+="</a></string>";}document.write(tmp);}
function pos_center(){winw=document.all?document.body.clientWidth:window.innerWidth;winh=document.all?document.body.clientHeight:window.innerHeight;var pos_x=document.all?document.body.scrollLeft:window.pageXOffset;var pos_y=document.all?document.body.scrollTop:window.pageYOffset;pos_x_c=winw/2+pos_x;pos_y_c=winh/2+pos_y+ht_offset;ostx=(winw-sp_cros_w)/2;osty=(winh-sp_cros_h)/2+ht_offset;if(ostx<0){ostx=0;}if(osty<0){osty=0;}}
function ani_card_move(st,nm,rp,z,tm){var i=0;if(lpc_fin==0){fio(0,nm,rp,0,tm);regA=0;regC=st;}if(lpc_all>regC){if(regA==0){regA=1;regB=move_frm;card_rev_load("pic"+lpc_all,null,0);step_sx=(to_x-card_sx[lpc_all])/move_frm;step_sy=(to_y-card_sy[lpc_all])/move_frm;}if(regB>0){card_sx[lpc_all]=card_sx[lpc_all]+step_sx;card_sy[lpc_all]=card_sy[lpc_all]+step_sy;ImgMove("pic"+lpc_all,card_sx[lpc_all],card_sy[lpc_all],200-lpc_all);regB--;}else if(regB==0){mov_card_count++;mov_card_point=lpc_all;regA=0;regB=move_frm;lpc_all--;}}else if(lpc_all==regC){regA=0;regB=0;fio(1,null,null,null,null);}}
function card_disp_sw(n,sw){if(sw==0){var i=0;for(i=1;i<(n+1);i++){ImgVisible("pic"+i,true);}}else if(sw==1){for(i=1;i<(n+1);i++){ImgVisible("pic"+i,false);}}}
function card_move_center(n){var i=0;for(i=1;i<(n+1);i++){card_rev_load("pic"+i,null,0);card_sx[i]=pos_x_c-(sp_card_w/2);card_sy[i]=pos_y_c-(sp_card_h/2);ImgMove("pic"+i,card_sx[i],card_sy[i],i);}}
function ImgCheck(){var i=0;ImgFlag=true;if(document.all){for(i=0;i<document.images.length;i++){if(document.images[i].complete==false){ImgFlag=false;}}}if(ImgFlag==true){code_p=30;}}
function card_rev_load(id,srp,sw){var i=0;if(srp==null){if(sw==0){document.images[id].src=card_sp.src;}else if(sw==1){document.images[id].src=card_sl.src;}}else if(srp!=null){document.images[id].src=card_s[srp].src;}}
function ImgMove(id,x,y,z){if(document.all){if(x!=null){document.all[id].style.left=x;}if(y!=null){document.all[id].style.top=y;}if(z!=null){document.all[id].style.zIndex=z;}}else{if(x!=null){document.getElementById(id).style.left =x;}if(y!=null){document.getElementById(id).style.top=y;}if(z!=null){document.getElementById(id).style.zIndex=z;}}}
function ImgZindex(id,z,pn){if(document.all){if(pn==0){document.all[id].style.zIndex+=z;}else if(pn==1){document.all[id].style.zIndex-=z;}}else{if(pn==0){document.getElementById(id).style.zIndex+=z;}else if(pn==1){document.getElementById(id).style.zIndex-=z;}}}
function ImgAlt(id,src){if(document.all){document.all[id].alt=src;}else{}}
function ImgVisible(id,bis){if(document.all){document.all[id].style.visibility=bis?"visible":"hidden";}else{document.getElementById(id).style.visibility=bis?"visible":"hidden";}}
function ImgFlipHV(id,hv){if(card_src_sel==1){return;}if(document.all){if(hv==0||hv==1){document.all[id].style.filter=hv?"FlipH()":"FlipV()";}else if(hv==2){document.all[id].style.filter="flipH flipV";}}else{}}
function ImgReSize(id,w,h){if(document.all){if(w!=null){document.all[id].style.width=w;}if(h!=null){document.all[id].style.height=h;}}else{if(w!=null){document.getElementById(id).style.width=w;}if(h!=null){document.getElementById(id).style.height=h;}}}
function cursor_sw(id,on){if(document.all){document.all[id].style.cursor=on?"hand":"";}else{document.getElementById(id).style.cursor=on?"default":"";}}
function ext_back_sw(no,sw){if(ext_back[no]!=""){if(sw==0){ImgMove("bk30"+no,ext_back_x[no]+ostx,ext_back_y[no]+osty,null);ImgVisible("bk30"+no,true);ImgAlpha("bk30"+no,ext_back_alp[no]);}else if(sw==1){ImgVisible("bk30"+no,false);}}}
function bk_mousedown(){if(code_p==120){syaf_en=0;}else if(code_p==3){code_p=4;}}
function fio(io,nm,rp,linc,tm){if(io==0){lpc_tm_stk=rate;lpc_inc=linc;lpc_all=nm;lpc_ret=rp;rate=tm;lpc_fin=1;}else if(io==1){rate=lpc_tm_stk;code_p=lpc_ret;lpc_fin=0;}}
function ImgAlpha(id,alp){if(document.all){document.all[id].style.filter="Alpha(Opacity="+alp+",FinishOpacity="+alp+")";}}
function init(){var i=0;for(i=1;i<79;i++){sp_card_pn[i]=0;sp_card_an[i]=0;card_open_f[i]=0;link_sema[i]="";link_pos[i]=0;}for(i=1;i<157;i++){sp_label_nm[i]="";sp_label_sema[i]="";}link_sema[0]="";}
function card_init(no,x,y,an,pn){sp_card_x[no]=x+xofs;sp_card_y[no]=y+yofs;sp_card_an[no]=an;sp_card_pn[no]=pn;}
function label_init(no,nam,x,y,vis){sp_label_nm[no]=nam;sp_label_x[no]=x+xofs;sp_label_y[no]=y+yofs;sp_label_vis[no]=vis;}
function link_init(no,nam,lnk,x,y,p,vis){link_nm[no]=nam;link_lnk[no]=lnk;link_x[no]=x;link_y[no]=y;link_p[no]=p;link_vis[no]=vis;}
function rep_init(nam,x,y,vis){rep_nm=nam;rep_x=x;rep_y=y;rep_vis=vis;}
function ext_back_init(no,nm,x,y,alp){ext_back[no]=nm;ext_back_x[no]=x+xofs;ext_back_y[no]=y+yofs;ext_back_alp[no]=alp;}
function open_msg(nam,x,y){open_msg_txt=nam;open_msg_txt_x=x+xofs;open_msg_txt_y=y+yofs;}
function main_loop_p(){var i=0;if(0<code_p&&code_p<100){if(code_p==0){}else if(code_p==1){window.status="ﾅｪｨ�､､｡Aｽﾐｵyｫ�....";pos_center();item_make();ext_back_sw(1,0);code_p=2;}else if(code_p==2){if(open_msg_txt!=""){cursor_sw("msg0",true);ImgMove("msg0",pos_x_c+open_msg_txt_x,pos_y_c+open_msg_txt_y,null);ImgVisible("msg0",true);window.status="画面をク?ックしてください。";document.onmousedown=bk_mousedown;code_p=3;}else{code_p=10;}}else if(code_p==3){}else if(code_p==4){cursor_sw("msg0",false);ImgVisible("msg0",false);document.onmousedown="";code_p=10;}else if(code_p==10){code_p=20;}else if(code_p==20){ImgCheck();}else if(code_p==30){if(open_disp_sp==0){card_move_center(sp_card_cnt);card_disp_sw(syaf_card_cnt,0);ImgMove("msg1",pos_x_c-130,pos_y_c-sp_card_h,null);ImgVisible("msg1",true);}else if(open_disp_sp==1){pre_disp_card();}code_p=40;}else if(code_p==40){window.status="ｽﾐ･ﾎｷﾆｹｫ･ｪﾁ萃IｵPｭｱ､@､U｡AｴNｷ|ｶ}ｩlｬ~ｵP";code_p=100;}}else if(99<code_p&&code_p<200){if(code_p==100){}else if(code_p==110){pos_center();ext_back_sw(1,1);ext_back_sw(2,0);ImgVisible("msg1",false);for(i=1;i<157;i++){if(sp_label_nm[i] != ""){ImgVisible("label"+i,false);}}card_disp_sw(sp_card_cnt,1);card_move_center(sp_card_cnt);card_disp_sw(syaf_card_cnt,0);rate=syaf_spd;card_set();syaf_en=1;document.onmousedown=bk_mousedown;ImgVisible("line_base",false);window.status="ｽﾐｬ~ｵP､[､@ﾂI｡AｵMｫ皈ﾎｷﾆｹｫ･ｪﾁ萃IｵPｭｱ､@､U｡AｴNｷ|ｰｱ､�ｬ~ｵP";code_p=120;}else if(code_p==120){syaful_loop(syaf_card_cnt,130);card_syaf();}else if(code_p==130){document.onmousedown="";pos_center();window.status="ｱNｵPｶｰ､､｡Aﾅ|ｵP";to_x=pos_x_c-(sp_card_w/2);to_y=pos_y_c-(sp_card_h/2);rate=1;if(move_center_en==0){code_p=140;}else if(move_center_en==1){code_p=142;}}else if(code_p==140){ani_card_move(0,syaf_card_cnt,150,null);}else if(code_p==142){ani_card_disp_sw(syaf_card_cnt,150,100,1)}else if(code_p==150){rate=50;ext_back_sw(2,1);ext_back_sw(3,0);for(i=1;i<(sp_card_cnt);i++){card_rev_load("pic"+i,null,0);}card_disp_sw(sp_card_cnt,1);code_p=160;}else if(code_p==160){rate=100;if(cut_skip1==0){if(cut_sel==0){code_p=200;}else if(cut_sel==1){code_p=300;}}else if(cut_skip1==1){if(sa_sel==0){code_p=400;}else if(sa_sel==1){code_p=620;}}}}else if(199<code_p&&code_p<300){if(code_p==200){pos_center();window.status="､ﾁｵP｡AｱNｵP､ﾀｦｨｨ簀|｡Aｽﾐ･ﾎｷﾆｹｫ･ｪﾁ萃Iｿ�､@ｳBｳﾟﾅwｪｺｦa､閨B";ImgMove("msg2",pos_x_c-160,pos_y_c-sp_card_h,1);ImgVisible("msg2",true);code_p=210;}else if(code_p==210){ani_pos_line(sp_card_cnt,220,50);}else if(code_p==220){code_p=230;}else if(code_p==230){}else if(code_p==240){if(card_clk_p==1){card_disp_sw(sp_card_cnt,1);if(sa_sel==0){code_p=400;}else if(sa_sel==1){code_p=620;}}else{ani_cut_A(sp_card_cnt,250,15);}}else if(code_p==250){ani_cut_B(sp_card_cnt,252,50);}else if(code_p==252){if(sa_sel==0){code_p=400;}else if(sa_sel==1){code_p=620;}}}else if(299<code_p&&code_p<400){if(code_p==300){pos_center();ImgMove("msg4",pos_x_c-200,pos_y_c-sp_card_h,1);ImgVisible("msg4",true);window.status="､ﾁｵP｡AｱNｵP､ﾀｦｨ､Tﾅ|｡Aｽﾐ･ﾎｷﾆｹｫ･ｪﾁ萃Iｿ�ｨ箋Bｳﾟﾅwｪｺｦa､�";code_p=302;}else if(code_p==302){ani_pos_line(sp_card_cnt,304,50);}else if(code_p==304){window.status="､ﾁｵP｡AｱNｵP､ﾀｦｨ､Tﾅ|｡Aｽﾐ･ﾎｷﾆｹｫ･ｪﾁ萃Iｿ�ｨ箋Bｳﾟﾅwｪｺｦa､�";code_p=306;}else if(code_p==306){}else if(code_p==308){window.status="";if(tcut_A<tcut_B){tcut_p1=tcut_A;tcut_p2=tcut_B;}else{tcut_p1=tcut_B;tcut_p2=tcut_A;}to_x=to_x=(winw/4*3);to_y=pos_y_c+sp_card_h;rate=5;code_p=310;}else if(code_p==310){ani_card_move(tcut_p2-1,sp_card_cnt,312,null);}else if(code_p==312){to_x=pos_x_c-(sp_card_w/2);to_y=pos_y_c+sp_card_h;code_p=314;}else if(code_p==314){ani_card_move(tcut_p1-1,tcut_p2-1,316,null);}else if(code_p==316){to_x=(winw/4)-sp_card_w;to_y=pos_y_c+sp_card_h;code_p=318;}else if(code_p==318){ani_card_move(0,tcut_p1-1,320,null);}else if(code_p==320){pos_center();ImgVisible("msg4",false);ImgMove("msg5",pos_x_c-170,pos_y_c-sp_card_h,1);ImgVisible("msg5",true);window.status="ｱNｵPﾅ|ｦ^｡Aｽﾐ･ﾎｷﾆｹｫ･ｪﾁ茯ﾌｧﾇﾂIｿ�ｱzｷQｭnｵPｰ�｡AｱN､Tｰ�ﾅ|ｦｨ､@ｰ�ｨMｩwｵPｪｺ･ｿｰfｦ�ｸm｡AｽﾐﾂIｿ�､@ｭﾓｽbﾀY｡AｦﾓｦｹｽbﾀYｩﾒｫ�ｪｺｦa､霍|ｴﾂ､W";to_x=pos_x_c-(sp_card_w/2);to_y=pos_y_c-(sp_card_h/2);mov_card_count=0;code_p=322;}else if(code_p==322){}else if(code_p==324){tcut3(325);}else if(code_p==325){window.status="";code_p=326;}else if(code_p==326){}else if(code_p==328){tcut3(329);}else if(code_p==329){window.status="";code_p=330;}else if(code_p==330){}else if(code_p==332){tcut3(333);}else if(code_p==333){window.status="";ImgVisible("msg5",false);card_disp_sw(sp_card_cnt,1);for(i=1;i<(sp_card_cnt+1);i++){card_rt_temp[i]=card_rt[i];card_rp_temp[i]=card_rp[i];}tcut2(tcut_pt1);tcut2(tcut_pt2);tcut2(tcut_pt3);code_p=334;}else if(code_p==334){if(sa_sel==0){code_p=400;}else if(sa_sel==1){code_p=620;}}}else if(399<code_p&&code_p<500){if(code_p==400){pos_center();ext_back_sw(3,1);ext_back_sw(4,0);window.status="ｶ�ﾃｹｵPｮiｶ}､､";if(pic_card_sel==0){ImgMove("msg3",pos_x_c-250,pos_y_c-sp_card_h,1);}else if(pic_card_sel==1){ImgMove("msg3",pos_x_c-230,pos_y_c-sp_card_h,1);}else if(pic_card_sel==2){ImgMove("msg3",pos_x_c-230,pos_y_c-sp_card_h,1);}ImgVisible("msg3",true);code_p=410;}else if(code_p==410){ani_pos_line(sp_card_cnt,420,50);}else if(code_p==420){}else if(code_p==430){code_p=440;}else if(code_p==440){card_pic_set();card_picup();ext_back_sw(4,1);ext_back_sw(5,0);code_p=450;}else if(code_p==450){ani_card_disp_sw(sp_card_cnt,510,50,1);}}else if(499<code_p&&code_p<600){if(code_p==500){}else if(code_p==510){pos_center();code_p=520;}else if(code_p==520){window.status="ｵPｰ}ｮiｶ}､､";card_move_center(sp_card_cnt);code_p=530;}else if(code_p==530){disp_card(sp_card_dsp,540,30);}else if(code_p==540){window.status="ﾅｪｨ�､､｡Aｽﾐｵyｫ�...";for(i=1;i<157;i++){if(sp_label_vis[i]==0){ImgMove("label"+i,sp_label_x[i]+ostx,sp_label_y[i]+osty,null);ImgVisible("label"+i,true);}}for(i=1;i<79;i++){if(link_pos[i]==0&&link_vis[i]==0){ImgVisible("lnk"+i,true);}else if(link_pos[i]==1&&link_vis[i]==0){ImgMove("lnk"+i,link_x[i]+ostx,link_y[i]+osty,null);ImgVisible("lnk"+i,true);}}if(rep_vis==0){ImgVisible("rep",true);}if(rep_auto_on==1){rep();}ext_back_sw(5,1);ext_back_sw(6,0);rate=20;code_p=550;}else if(code_p==550){ImgMove("line_base",ostx,osty,0);ImgVisible("line_base",true);window.status="ﾂIｿ�･d､�｡AｱN･d､�･ｴｶ}｡AｴN･i･Hｬﾝｨ�･d､�ｪｺｷNｸq｡A･�ｳ｡･ｴｶ}ｫ癸Aｽﾐｫ�･ｪ､Wｨ､ｪｺ｡yｵｲｪG､@ﾄ�ｪ�｡z｡Aﾆ[ｬﾝｲﾎｭpｪｺｵｲｪG";code_p=580;}else if(code_p==560){}else if(code_p==570){}else if(code_p==580){}}else if(599<code_p&&code_p<700){if(code_p==600){ani_pict_open1(card_clk_p,8,610,20);}else if(code_p==610){ani_pict_open2(card_clk_p,8,580,20);}else if(code_p==620){ImgMove("msg6",pos_x_c-180,pos_y_c-sp_card_h,1);ImgVisible("msg6",true);window.status="";pos_center();sel_top1();code_p=622;}else if(code_p==622){}}}
init();
function main_loop(){if(timer_en==0){clearTimeout(timerID);main_loop_p();timerID=setTimeout("main_loop()",rate);}}