var waterbkgd = "#0000FF";
var intrion = 6;
var intristart = 25;
var outtrion = 6;
var outtristart = 1;
var hexstart = 28;
var mline = 1;
var resInTri = 4;
var resTri = 0;
var resOutTri = 6;
var innerInTri = 6;
var innerOutTri = 6;
var browseHex = 1;
var curDate = new Date;
var minStr = curDate.getMinutes();

HexNames = new Array(65);
HexNames[1]="THE CREATIVE"; HexNames[2]="RECEPTIVENESS"; HexNames[3]="DIFFICULTY";HexNames[4]="UNDERDEVELOPED";
HexNames[5]="WAITING";HexNames[6]="LITIGATION";HexNames[7]="THE ARMY";HexNames[8]="LOYALTY";
HexNames[9]="SMALL SAVING";HexNames[10]="CONDUCT";HexNames[11]="PEACE";HexNames[12]="MISFORTUNE";
HexNames[13]="FELLOWSHIP";HexNames[14]="GREAT PROVIDER";HexNames[15]="MODESTY";HexNames[16]="COMFORT";
HexNames[17]="FOLLOWING";HexNames[18]="DEGENERATION";HexNames[19]="ADVANCING";HexNames[20]="CONTEMPLATION";
HexNames[21]="BITING THROUGH";HexNames[22]="ADORNMENT";HexNames[23]="EROSION";HexNames[24]="RENEWAL";
HexNames[25]="INNOCENCE";HexNames[26]="GREAT SAVING";HexNames[27]="NOURISHMENT";HexNames[28]="GREAT EXCESS";
HexNames[29]="THE ABYSS";HexNames[30]="RADIANCE";HexNames[31]="SENSITIVITY";HexNames[32]="CONSTANCY";
HexNames[33]="WITHDRAWAL";HexNames[34]="GREAT STRENGTH";HexNames[35]="PROGRESS";HexNames[36]="DARKENING";
HexNames[37]="FAMILY";HexNames[38]="DISHARMONY";HexNames[39]="OBSTRUCTION";HexNames[40]="LIBERATION";
HexNames[41]="DECREASE";HexNames[42]="INCREASE";HexNames[43]="RESOLUTION";HexNames[44]="ENCOUNTER";
HexNames[45]="GATHERING";HexNames[46]="ASCENDING";HexNames[47]="EXHAUSTION";HexNames[48]="THE WELL";
HexNames[49]="REVOLUTION";HexNames[50]="THE CAULDRON";HexNames[51]="THE AROUSING";HexNames[52]="KEEPING STILL";
HexNames[53]="GRADUALNESS";HexNames[54]="MARRIAGE";HexNames[55]="OVER-CAPACITY";HexNames[56]="TRAVELING";
HexNames[57]="SUBMISSIVENESS";HexNames[58]="JOYOUSNESS";HexNames[59]="DISPERSION";HexNames[60]="SELF-RESTRAINT";
HexNames[61]="FAITHFULLNESS";HexNames[62]="MINOR EXCESS";HexNames[63]="SETTLED";HexNames[64]="UNSETTLED";

intri = new Array(65);
outtri = new Array(65);
intri[1]=6;outtri[1]=6;intri[2]=2;outtri[2]=2;intri[3]=3;outtri[3]=1;intri[4]=1;outtri[4]=8;
intri[5]=6;outtri[5]=1;intri[6]=1;outtri[6]=6;intri[7]=1;outtri[7]=2;intri[8]=2;outtri[8]=1;
intri[9]=6;outtri[9]=4;intri[10]=7;outtri[10]=7;intri[11]=6;outtri[11]=2;intri[12]=2;outtri[12]=6;
intri[13]=9;outtri[13]=6;intri[14]=6;outtri[14]=9;intri[15]=8;outtri[15]=2;intri[16]=2;outtri[16]=3;
intri[17]=3;outtri[17]=7;intri[18]=4;outtri[18]=8;intri[19]=7;outtri[19]=2;intri[20]=2;outtri[20]=4;
intri[21]=3;outtri[21]=9;intri[22]=9;outtri[22]=8;intri[23]=2;outtri[23]=8;intri[24]=3;outtri[24]=2;
intri[25]=3;outtri[25]=6;intri[26]=6;outtri[26]=8;intri[27]=3;outtri[27]=8;intri[28]=4;outtri[28]=7;
intri[29]=1;outtri[29]=1;intri[30]=9;outtri[30]=9;intri[31]=8;outtri[31]=7;intri[32]=4;outtri[32]=3;
intri[33]=8;outtri[33]=6;intri[34]=6;outtri[34]=3;intri[35]=2;outtri[35]=7;intri[36]=9;outtri[36]=2;
intri[37]=9;outtri[37]=4;intri[38]=7;outtri[38]=9;intri[39]=8;outtri[39]=1;intri[40]=1;outtri[40]=3;
intri[41]=7;outtri[41]=8;intri[42]=3;outtri[42]=4;intri[43]=6;outtri[43]=7;intri[44]=4;outtri[44]=6;
intri[45]=2;outtri[45]=7;intri[46]=4;outtri[46]=2;intri[47]=1;outtri[47]=7;intri[48]=4;outtri[48]=1;
intri[49]=9;outtri[49]=7;intri[50]=4;outtri[50]=9;intri[51]=3;outtri[51]=3;intri[52]=8;outtri[52]=8;
intri[53]=8;outtri[53]=4;intri[54]=7;outtri[54]=3;intri[55]=9;outtri[55]=3;intri[56]=8;outtri[56]=9;
intri[57]=4;outtri[57]=4;intri[58]=7;outtri[58]=6;intri[59]=7;outtri[59]=1;intri[60]=7;outtri[60]=1;
intri[61]=7;outtri[61]=4;intri[62]=8;outtri[62]=3;intri[63]=9;outtri[63]=1;intri[64]=1;outtri[64]=9;

intripos = new Array(9);
outtripos = new Array(9);
intripos[1]=37;outtripos[1]=7;
intripos[2]=43;outtripos[2]=13;
intripos[3]=34;outtripos[3]=4;
intripos[4]=46;outtripos[4]=16;
intripos[6]=25;outtripos[6]=1;
intripos[7]=52;outtripos[7]=22;
intripos[8]=40;outtripos[8]=10;
intripos[9]=49;outtripos[9]=19;


TriHex = new Array(10);
for (i=0;i<10;i++) {TriHex[i] = new Array(10);}
TriHex[1][1]=29;TriHex[1][2]=7; TriHex[1][3]=40;TriHex[1][4]=59;
TriHex[1][6]=6; TriHex[1][7]=47;TriHex[1][8]=4; TriHex[1][9]=64;
TriHex[2][1]=8; TriHex[2][2]=2; TriHex[2][3]=16;TriHex[2][4]=20;
TriHex[2][6]=12;TriHex[2][7]=45;TriHex[2][8]=23;TriHex[2][9]=35;
TriHex[3][1]=3; TriHex[3][2]=24;TriHex[3][3]=51;TriHex[3][4]=42;
TriHex[3][6]=25;TriHex[3][7]=17;TriHex[3][8]=27;TriHex[3][9]=21;
TriHex[4][1]=48;TriHex[4][2]=46;TriHex[4][3]=32;TriHex[4][4]=57;
TriHex[4][6]=44;TriHex[4][7]=28;TriHex[4][8]=18;TriHex[4][9]=50;
TriHex[6][1]=5; TriHex[6][2]=11;TriHex[6][3]=34;TriHex[6][4]=9;
TriHex[6][6]=1; TriHex[6][7]=43;TriHex[6][8]=26;TriHex[6][9]=14;
TriHex[7][1]=60;TriHex[7][2]=19;TriHex[7][3]=54;TriHex[7][4]=61;
TriHex[7][6]=10;TriHex[7][7]=58;TriHex[7][8]=41;TriHex[7][9]=38;
TriHex[8][1]=39;TriHex[8][2]=15;TriHex[8][3]=62;TriHex[8][4]=53;
TriHex[8][6]=33;TriHex[8][7]=31;TriHex[8][8]=52;TriHex[8][9]=56;
TriHex[9][1]=63;TriHex[9][2]=36;TriHex[9][3]=55;TriHex[9][4]=37;
TriHex[9][6]=13;TriHex[9][7]=49;TriHex[9][8]=22;TriHex[9][9]=30;

hexText = new Array(65);
for (i=0;i<65;i++) {hexText[i]=new Array(9);}

startPos = new Array(10);
for (i=0;i<10;i++) {startPos[i] = new Array(2);}
startPos[1][0]=37;startPos[1][1]=7;           //inner tri 1 start pos in Image array  
startPos[2][0]=43;startPos[2][1]=13;
startPos[3][0]=34;startPos[3][1]=4;
startPos[4][0]=46;startPos[4][1]=16;
startPos[6][0]=25;startPos[6][1]=1;
startPos[7][0]=52;startPos[7][1]=22;
startPos[8][0]=40;startPos[8][1]=10;
startPos[9][0]=49;startPos[9][1]=19;


var monthNames = new Array("Jan.","Feb.","Mar.","Apr.","May","June","July","Aug.","Sept.","Oct.","Nov.","Dec"); 
var triNames = new Array("","Kan - Water - Middle Son","Kun - Earth - Mother","Chen - Thunder - Eldest Son","Sun - Wind - Eldest Daughter","5 is empty","Chien - Heaven - Father","Tui - Lake - Youngest Daughter","Ken - Mountain - Youngest Son","Li - Fire - Middle Daughter");

if (document.images) {
  yi_images = new Object();
  yi_images.wood6_out = new Image();
  yi_images.wood6_out.src = "/images/wood6_out_80.gif";
  yi_images.wood7_in = new Image();
  yi_images.wood7_in.src = "/images/wood7_in_80.gif";
  yi_images.wood8_in = new Image();
  yi_images.wood8_in.src = "/images/wood8_in_80.gif";
  yi_images.wood7_out = new Image();
  yi_images.wood7_out.src = "/images/wood7_out_80.gif";
  yi_images.wood8_out = new Image();
  yi_images.wood8_out.src = "/images/wood8_out_80.gif";
  yi_images.wood9_out = new Image();
  yi_images.wood9_out.src = "/images/wood9_out_80.gif";

  yi_images.fire6_out = new Image();
  yi_images.fire6_out.src = "/images/fire6_out_80.gif";
  yi_images.fire7_in = new Image();
  yi_images.fire7_in.src = "/images/fire7_in_80.gif";
  yi_images.fire8_in = new Image();
  yi_images.fire8_in.src = "/images/fire8_in_80.gif";
  yi_images.fire7_out = new Image();
  yi_images.fire7_out.src = "/images/fire7_out_80.gif";
  yi_images.fire8_out = new Image();
  yi_images.fire8_out.src = "/images/fire8_out_80.gif";
  yi_images.fire9_out = new Image();
  yi_images.fire9_out.src = "/images/fire9_out_80.gif";

  yi_images.earth6_out = new Image();
  yi_images.earth6_out.src = "/images/earth6_out_80.gif";
  yi_images.earth7_in = new Image();
  yi_images.earth7_in.src = "/images/earth7_in_80.gif";
  yi_images.earth8_in = new Image();
  yi_images.earth8_in.src = "/images/earth8_in_80.gif";
  yi_images.earth7_out = new Image();
  yi_images.earth7_out.src = "/images/earth7_out_80.gif";
  yi_images.earth8_out = new Image();
  yi_images.earth8_out.src = "/images/earth8_out_80.gif";
  yi_images.earth9_out = new Image();
  yi_images.earth9_out.src = "/images/earth9_out_80.gif";

  yi_images.metal6_out = new Image();
  yi_images.metal6_out.src = "/images/metal6_out_80.gif";
  yi_images.metal7_out = new Image();
  yi_images.metal7_out.src = "/images/metal7_out_80.gif";
  yi_images.metal8_out = new Image();
  yi_images.metal8_out.src = "/images/metal8_out_80.gif";
  yi_images.metal7_in = new Image();
  yi_images.metal7_in.src = "/images/metal7_in_80.gif";
  yi_images.metal8_in = new Image();
  yi_images.metal8_in.src = "/images/metal8_in_80.gif";
  yi_images.metal9_out = new Image();
  yi_images.metal9_out.src = "/images/metal9_out_80.gif";


  yi_images.water6_out = new Image();
  yi_images.water6_out.src = "/images/water6_out_80.gif";
  yi_images.water7_out = new Image();
  yi_images.water7_out.src = "/images/water7_out_80.gif";
  yi_images.water7_in = new Image();
  yi_images.water7_in.src = "/images/water7_in_80.gif";
  yi_images.water8_out = new Image();
  yi_images.water8_out.src = "/images/water8_out_80.gif";
  yi_images.water8_in = new Image();
  yi_images.water8_in.src = "/images/water8_in_80.gif";
  yi_images.water9_out = new Image();
  yi_images.water9_out.src = "/images/water9_out_80.gif";
}


function innerHexTris(innerTri, outerTri) {
  if ((innerTri==6)||(innerTri==4)) {
    if ((outerTri==6)||(outerTri==7)) {innerInTri=6;innerOutTri=6;}
	else if((outerTri==3)||(outerTri==9)) {innerInTri=6;innerOutTri=7;}
	else if((outerTri==1)||(outerTri==4)) {innerInTri=7;innerOutTri=9;}
	else if((outerTri==8)||(outerTri==2)) {innerInTri=7;innerOutTri=3;}
  }
  if ((innerTri==3)||(innerTri==2)) {
    if ((outerTri==6)||(outerTri==7)) {innerInTri=8;innerOutTri=4;}
	else if((outerTri==3)||(outerTri==9)) {innerInTri=8;innerOutTri=1;}
	else if((outerTri==1)||(outerTri==4)) {innerInTri=2;innerOutTri=8;}
	else if((outerTri==8)||(outerTri==2)) {innerInTri=2;innerOutTri=2;}
  }
  if ((innerTri==1)||(innerTri==7)) {
    if ((outerTri==6)||(outerTri==7)) {innerInTri=9;innerOutTri=4;}
	else if((outerTri==3)||(outerTri==9)) {innerInTri=9;innerOutTri=1;}
	else if((outerTri==1)||(outerTri==4)) {innerInTri=3;innerOutTri=8;}
	else if((outerTri==8)||(outerTri==2)) {innerInTri=3;innerOutTri=2;}
  }
  if ((innerTri==8)||(innerTri==9)) {
    if ((outerTri==6)||(outerTri==7)) {innerInTri=4;innerOutTri=6;}
	else if((outerTri==3)||(outerTri==9)) {innerInTri=4;innerOutTri=7;}
	else if((outerTri==1)||(outerTri==4)) {innerInTri=1;innerOutTri=9;}
	else if((outerTri==8)||(outerTri==2)) {innerInTri=1;innerOutTri=3;}
  }
}

function swap_img(id,name) {
    document.images[id].src = eval("yi_images." + name + ".src");
	//document.stemBranchLabel.setCString("Array Index is "+id);
}

function swap_tri(start,tri,dir,pos) {
if (((pos=='inner')&&(tri!=intrion))||((pos=='outer')&&(tri!=outtrion))||(pos=='null')) {
  if(tri==1) {
    if (dir=='in') {
      swap_img(start,'water8_in');
      swap_img(start+1,'water7_in');
      swap_img(start+2,'water8_in');
    }
    if (dir=='out') {
      swap_img(start,'water8_out');
      swap_img(start+1,'water7_out');
      swap_img(start+2,'water8_out');
    }
  }
  else if(tri==3) {
    if (dir=='in') {
      swap_img(start,'wood8_in');
      swap_img(start+1,'wood8_in');
      swap_img(start+2,'wood7_in');
    }
    if (dir=='out') {
      swap_img(start,'wood8_out');
      swap_img(start+1,'wood8_out');
      swap_img(start+2,'wood7_out');
    }
  }
  else if(tri==6) {
    if (dir=='in') {
      swap_img(start,'metal7_in');
      swap_img(start+1,'metal7_in');
      swap_img(start+2,'metal7_in');
    }
    if (dir=='out') {
      swap_img(start,'metal7_out');
      swap_img(start+1,'metal7_out');
      swap_img(start+2,'metal7_out');
    }
  }
  else if(tri==8) {
    if (dir=='in') {
      swap_img(start,'earth7_in');
      swap_img(start+1,'earth8_in');
      swap_img(start+2,'earth8_in');
    }
    if (dir=='out') {
      swap_img(start,'earth7_out');
      swap_img(start+1,'earth8_out');
      swap_img(start+2,'earth8_out');
    }
  }
  else if(tri==2) {
    if (dir=='in') {
      swap_img(start,'earth8_in');
      swap_img(start+1,'earth8_in');
      swap_img(start+2,'earth8_in');
    }
    if (dir=='out') {
      swap_img(start,'earth8_out');
      swap_img(start+1,'earth8_out');
      swap_img(start+2,'earth8_out');
    }
  }
  else if(tri==4) {
    if (dir=='in') {
      swap_img(start,'wood7_in');
      swap_img(start+1,'wood7_in');
      swap_img(start+2,'wood8_in');
    }
    if (dir=='out') {
      swap_img(start,'wood7_out');
      swap_img(start+1,'wood7_out');
      swap_img(start+2,'wood8_out');
    }
  }
  else if(tri==9) {
    if (dir=='in') {
      swap_img(start,'fire7_in');
      swap_img(start+1,'fire8_in');
      swap_img(start+2,'fire7_in');
    }
    if (dir=='out') {
      swap_img(start,'fire7_out');
      swap_img(start+1,'fire8_out');
      swap_img(start+2,'fire7_out');
    }
  }
  else if(tri==7) {
    if (dir=='in') {
      swap_img(start,'metal8_in');
      swap_img(start+1,'metal7_in');
      swap_img(start+2,'metal7_in');
    }
    if (dir=='out') {
      swap_img(start,'metal8_out');
      swap_img(start+1,'metal7_out');
      swap_img(start+2,'metal7_out');
    }
  }

 }
  //setTimeout("swap_tri",1250);
}


function turn_on_off(start,pos,tri) {
  if ((pos=='inner')&&(tri!=intrion)) {    
    swap_tri(hexstart+3,tri,'out','null');
	document.triLabel.setCString("Characteristics of "+triNames[tri]);
	document.triText.showTriText(tri);
    if (mline<4) {showmline(tri,mline);}
    var swaptri=intrion;
	intrion=tri;
    swap_tri(intristart,swaptri,'in',pos);
    intristart=start;
  }
  else if ((pos=='outer')&&(tri!=outtrion)) {
    swap_tri(hexstart,tri,'out','null');
	document.triLabel.setCString("Characteristics of "+triNames[tri]);
	document.triText.showTriText(tri);
	if (mline>3) {showmline(tri,mline);}  //correct to include moving line
    var swaptri=outtrion;
	outtrion=tri;
    swap_tri(outtristart,swaptri,'in',pos);
    outtristart=start;
  }
  transTri(mline,tri,pos);
  document.resHexLabel.setCString(TriHex[resInTri][resOutTri]);
  innerHexTris(intrion,outtrion);
  document.innerHexLabel.setCString(TriHex[innerInTri][innerOutTri]);
  //document.stemBranchLabel.setCString("Tri is "+tri+" Hexstart is "+hexstart);
  document.HexNumLabel.setCString(TriHex[intrion][outtrion]);
  document.HexLabel.setCString(HexNames[TriHex[intrion][outtrion]]);
  document.readDisplay.resetFont("SansSerif","PLAIN",12); 
  //document.readDisplay.showPicture('blank.gif')
  document.readDisplay.showText(TriHex[intrion][outtrion],mline);
}


function showmline(mltri,showml) {
  //document.stemBranchLabel.setCString("MLTri is "+mltri+" Hexstart is "+hexstart);
  var savemline=mline;  
  mline=showml;              //mline is now the new moving line
  if (mline>3) {             //clicked on the outer trigram
    swap_tri(hexstart,mltri,'out','null');
	transTri(mline,mltri,"outer");
	document.resHexLabel.setCString(TriHex[resInTri][resOutTri]);
	if (savemline<4) {swap_tri(hexstart+3,intrion,'out','null');}  //fix if moving line was in other trigram
  }
  else if (mline<4) {
    swap_tri(hexstart+3,mltri,'out','null');
	transTri(mline,mltri,"inner");
	document.resHexLabel.setCString(TriHex[resInTri][resOutTri]);
	if (savemline>3) {swap_tri(hexstart,outtrion,'out','null');} 
  }
  if (mltri==1) {
    if (mline==6) {
	  swap_img(hexstart,'water6_out');	  
	}
	else if (mline==5) {
	  swap_img(hexstart+1,'water9_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2,'water6_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3,'water6_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4,'water9_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5,'water6_out');
	}
  }
  else if (mltri==2) {
    if (mline==6) {
	  swap_img(hexstart, 'earth6_out');
	}
	else if (mline==5) {
	  swap_img(hexstart+1, 'earth6_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2, 'earth6_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3, 'earth6_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4, 'earth6_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5, 'earth6_out');
	}
  }
  else if (mltri==3) {
    if (mline==6) {
	  swap_img(hexstart, 'wood6_out');
	}
	else if (mline==5) {
	  swap_img(hexstart+1, 'wood6_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2, 'wood9_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3, 'wood6_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4, 'wood6_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5, 'wood9_out');
	}
  }
  else if (mltri==4) {
    if (mline==6) {
	  swap_img(hexstart, 'wood9_out');
	}
	else if (mline==5) {
	  swap_img(hexstart+1, 'wood9_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2, 'wood6_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3, 'wood9_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4, 'wood9_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5, 'wood6_out');
	}
  }
  else if (mltri==6) {
    if (mline==6) {
	  swap_img(hexstart, 'metal9_out');
	}
	else if (mline==5) {
	  swap_img(hexstart+1, 'metal9_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2, 'metal9_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3, 'metal9_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4, 'metal9_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5, 'metal9_out');
	}
  }
  else if (mltri==7) {
    if (mline==6) {
	  swap_img(hexstart, 'metal6_out');
	}
	else if (mline==5) {
	  swap_img(hexstart+1, 'metal9_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2, 'metal9_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3, 'metal6_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4, 'metal9_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5, 'metal9_out');
	}
  }
  else if (mltri==8) {
    if (mline==6) {
	  swap_img(hexstart, 'earth9_out');
	}
	else if (mline==5) {
	  swap_img(hexstart+1, 'earth6_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2, 'earth6_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3, 'earth9_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4, 'earth6_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5, 'earth6_out');
	}
  }
  else if (mltri==9) {
    if (mline==6) {
	  swap_img(hexstart, 'fire9_out');
	}
	else if (mline==5) {
	  swap_img(hexstart+1, 'fire6_out');
	}
	else if (mline==4) {
	  swap_img(hexstart+2, 'fire9_out');
	}
	else if (mline==3) {
	  swap_img(hexstart+3, 'fire9_out');
	}
	else if (mline==2) {
	  swap_img(hexstart+4, 'fire6_out');
	}
	else if (mline==1) {
	  swap_img(hexstart+5, 'fire9_out');
	}
  }
  document.readDisplay.resetFont("SansSerif","PLAIN",12); 
  document.readDisplay.showText(TriHex[intrion][outtrion],mline);
}

function startUp() {
  if (minStr<10) {
    minStr="0"+minStr;
  }
  document.HexNumLabel.setCString(TriHex[intrion][outtrion]);
  document.HexLabel.setCString(HexNames[TriHex[intrion][outtrion]]);
  document.readDisplay.resetFont("SansSerif","PLAIN",12);
  document.stemBranchLabel.setCString(monthNames[curDate.getMonth()]+" "+curDate.getDate()+" "+(curDate.getYear()+1900)+" - "+curDate.getHours()+":"+minStr);
  window.status = "Executed Startup";
  document.triLabel.setCString("Energy Master I Ching Browser");
  document.resHexLabel.setCString(TriHex[resInTri][resOutTri]);
  document.innerHexLabel.setCString(TriHex[innerInTri][innerOutTri]);
  var curl = document.URL;
  urlarray = new Array(3);
  paramarray = new Array(3);
  mlarray = new Array(3);
  hexarray = new Array(3);
  urlarray = curl.split("?");
  if (urlarray[1])	{  
	  paramarray=urlarray[1].split("&");
	  if (paramarray[1])	{	  
		  hexarray=paramarray[0].split("=");
		  mlarray=paramarray[1].split("=");
	  }
	  else {
		  hexarray=urlarray[1].split("=");
		  mlarray[1]=0;
	  }
	  if (hexarray[1] && mlarray[1]) {
		alert("Hexagram "+hexarray[1]+" called with moving line "+mlarray[1]);
		mline=mlarray[1];
		showHex(hexarray[1],mlarray[1]);
	  }
	  //else if (hexarray[1])	  {
	//	alert("Hexagram "+hexarray[1]+" called with no moving line");
	//	showHex(hexarray[1],1);
	 // }
  }
  else {
	alert("No Hexagram called");
  }
}

function showHex(curhex,curml) {
//	alert("Showing hexagram "+curhex+" with moving line "+curml);
	turn_on_off(intripos[intri[curhex]],'inner',intri[curhex]);
	turn_on_off(outtripos[outtri[curhex]],'outer',outtri[curhex]);
	document.readDisplay.resetFont("SansSerif","PLAIN",12); 
	document.readDisplay.showText(TriHex[intri[curhex]][outtri[curhex]],curml);
//  Add functionality to show correct reading text
//	Add functionality to show correct moving line
//	Add functionality to turn appropriate trigrams on and off
}

function transTri(trimline,transtri,transpos) {  
  if ((trimline==1) || (trimline==4)) {
    if (transtri==1) {resTri=7;}
	else if (transtri==2) {resTri=3;}
	else if (transtri==3) {resTri=2;}
	else if (transtri==4) {resTri=6;}
	else if (transtri==6) {resTri=4;}
	else if (transtri==7) {resTri=1;}
	else if (transtri==8) {resTri=9;}
	else if (transtri==9) {resTri=8;}
  }
  else if ((trimline==2) || (trimline==5)) {
    if (transtri==1) {resTri=2;}
	else if (transtri==2) {resTri=1;}
	else if (transtri==3) {resTri=7;}
	else if (transtri==4) {resTri=8;}
	else if (transtri==6) {resTri=9;}
	else if (transtri==7) {resTri=3;}
	else if (transtri==8) {resTri=4;}
	else if (transtri==9) {resTri=6;}
  }
  else if ((trimline==3) || (trimline==6)) {
    if (transtri==1) {resTri=4;}
	else if (transtri==2) {resTri=8;}
	else if (transtri==3) {resTri=9;}
	else if (transtri==4) {resTri=1;}
	else if (transtri==6) {resTri=7;}
	else if (transtri==7) {resTri=6;}
	else if (transtri==8) {resTri=2;}
	else if (transtri==9) {resTri=3;}
  }
  if (trimline<4) {
    if (transpos=="inner") { 
      resInTri=resTri;
	  resOutTri=outtrion;
	}
	else {
	  resOutTri=transtri
	}
  }
  else if (trimline>3) {
    if (transpos=="outer") {
		resOutTri=resTri;
		resInTri=intrion;
	}
	else {
	  resInTri=transtri;
	}
  }
}

function showResult() {
  if (mline<4) {  //change inner tri
    //showmline(resInTri,mline)
    swap_tri(startPos[resInTri][0],resInTri,'out','inner') 
	turn_on_off(startPos[resInTri][0],'inner',resInTri);
  }
  else {  //change outer tri
	//showmline(resOutTri,mline)
	swap_tri(startPos[resOutTri][1],resOutTri,'out','outer') 
	turn_on_off(startPos[resOutTri][1],'outer',resOutTri);
  }
}

function showImage() {
	var imageName=TriHex[intrion][outtrion];
	if (TriHex[intrion][outtrion]<10) {
		imageName="0"+imageName;
	}
	var imageUrl="http://www.visionarynet.com/iching/gallery/images/scene"+imageName+".jpg";
	window.open(imageUrl,'imageWin','toolbar=no,Location=yes,scrollbars=no,width=660,height=500');
}

function showInner() {
  var saveouter=outtrion;
  var saveinnerOutTri=innerOutTri
  var saveouttristart=outtristart;
  //start with inner 
  swap_tri(startPos[innerInTri][0],innerInTri,'out','inner') 
  turn_on_off(startPos[innerInTri][0],'inner',innerInTri);
  outtristart=saveouttristart;
  swap_tri(startPos[saveinnerOutTri][1],saveinnerOutTri,'out','outer')
  turn_on_off(startPos[saveinnerOutTri][1],'outer',saveinnerOutTri);
}

function showFiveElements() {
  document.readDisplay.showPicture("fiv_elem.jpg");
}