File: C:/xampp/htdocs/FograCT1/pbnCT13SDcr.php
<?php
// Start the session
session_start();
$_SESSION["favcolor"] = "green";
//echo "Target:".$_SESSION["TL"].",".$_SESSION["Ta"].",".$_SESSION["Tb"];
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Spot Check</title>
<style type="text/css">
<!--
body {
font: 100% Verdana, Arial, Helvetica, sans-serif;
background: #ffffff;
margin: 0; /* 比較好的做法是將 Body 元素的邊界與欄位間隔調整為零，以處理不同的瀏覽器預設值 */
padding: 0;
text-align: center; /* 這樣會讓容器在 IE 5* 瀏覽器內置中對齊。然後，文字會在 #container 選取器中設定為靠左對齊預設值 */
color: #000000;
}
.oneColElsCtr #container {
width: 46em;
background: #FFFFFF;
margin: 0 auto; /* 自動邊界 (搭配寬度) 會讓頁面置中對齊 */
border: 0px solid #000000;
text-align: left; /* 這樣做會覆寫 Body 元素上的 text-align: center。 */
}
.oneColElsCtr #mainContent {
padding: 0 20px; /* 請記住，欄位間隔就是 Div 方塊內部的空間，而邊界就是 Div 方塊外部的空間 */
}
-->
</style></head>
<body class="oneColElsCtr">
<table>
<tr><td>
<a href="sesDel.php">資料重設</a>
</td></tr>
</table>
<?php
error_reporting(0);
$f123= $_GET['f123'];
$f321= $_GET['f321'];
$aim= $_GET['aim'];
$company= $_GET['company'];
//include 'spXYZ.php';
include 'sp38XYZ.php';
include 'lab2xyz.php';
include 'SCCA06.php';
include 'xyz2lab01.php';
include 'xyz2lab.php';
include 'DensityV38.php';
include 'de00.php';
$f0=0;
$f1=0;
$f2=0;
$f3=0;
$f4=0;
$f5=0;
$f6=0;
$f7=0;
$f8=0;
$f9=0;
$f10=0;
$f11=0;
$f12=0;
$f13=0;
$f14=0;
$f15=0;
$f16=0;
$f17=0;
$f18=0;
$f19=0;
$f20=0;
$f21=0;
$f22=0;
$f23=0;
$f24=0;
$f25=0;
$f26=0;
$f27=0;
$f28=0;
$f29=0;
$f30=0;
$f31=0;
$f32=0;
$f33=0;
$f34=0;
$f35=0;
$f36=0;
$sum=120;
$check=1;
$dtime=time();
$dStr=substr($dtime,7,9)."-";
function get_between ($text, $s1, $s2) {
$mid_url = "";
$pos_s = strrpos($text,$s1);
$pos_e = strrpos($text,$s2);
for ( $i=$pos_s+strlen($s1) ; (( $i<($pos_e)) && $i < strlen($text)) ; $i++ ) {
$mid_url .= $text[$i];
}
return $mid_url;
}
$contentT = file($f321);
//echo substr('abcdef', 1, 3); // bcd
$filedb=substr($f321,7,60);
$dbstr=explode("_", $filedb);
//echo $dbstr[0]."XX".$dbstr[1]."XX".$dbstr[2]."XX".$dbstr[3].$dbstr[4].$dbstr[5];
$filename=$filedb;
$po=$dbstr[1];
$stringC = implode($contentT);
$fMark = strrpos($stringC,'i1Profiler');
//echo "fMark:".$fMark."<br>";
$fMarkC = strrpos($stringC,'ColorPort');
//echo "fMarkC:".$fMarkC."<br>";
$nm380 = strrpos($stringC,'nm380');
//echo "fMarkC:".$nm380."<br>";
$stringT = implode($contentT);
$dotT = explode(" ", $stringT);////Measure upload
$SXm=sp38XYZ("X",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$SYm=sp38XYZ("Y",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$SZm=sp38XYZ("Z",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$SLm=xyz2lab01("l",$SXm,$SYm,$SZm);
$Sam=xyz2lab01("a",$SXm,$SYm,$SZm);
$Sbm=xyz2lab01("b",$SXm,$SYm,$SZm);
$Sdm=DensitySp38("K",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$measureL=$SLm;$measurea=$Sam;$measureb=$Sbm;
$chrome=pow((pow($measurea,2)+pow($measureb,2)),0.5);
$hue=atan2($measureb,$measurea);
$deg = ($hue/M_PI*180) + ($hue > 0 ? 0 : 360);
echo "<br>chrome:".$chrome;
echo "<br>hue:".$deg;
//print_r ($dotT);
$TL=$_SESSION['TL'];
$Ta=$_SESSION['Ta'];
$Tb=$_SESSION['Tb'];
$TartgetL=$TL;
$chromeT=pow((pow($Ta,2)+pow($Tb,2)),0.5);
$hueT=atan2($Tb,$Ta);
$degT = ($hueT/M_PI*180) + ($hueT > 0 ? 0 : 360);
//echo "<br>chromeT:".$chromeT;
//echo "<br>hueT:".$degT;
$chromeCT=$chromeT;
$hueCT=$hueT;
$degCT = $degT;
//echo "<br>chrome:".$chromeCT;
//echo "<br>hue:".$degCT;
/////////////////////////////////////////
/////////////////////////xyz to rgb
//X, Y and Z input refer to a D65/2° standard illuminant.
//sR, sG and sB (standard RGB) output range = 0 ÷ 255
//echo "<br>XYZ:".$SXm.",".$SYm.",".$SZm;
$var_X = $SXm / 1.00;
$var_Y = $SYm / 1.00;
$var_Z = $SZm / 1.00;
$var_R = 3.2404542*$var_X - 1.5371385*$var_Y - 0.4985314*$var_Z;
$var_G = -0.9692660*$var_X + 1.8760108*$var_Y + 0.0415560*$var_Z;
$var_B = 0.0556434*$var_X - 0.2040259*$var_Y + 1.0572252*$var_Z;
/*
$var_R = $var_X * 2.04137 + $var_Y * -0.56495 + $var_Z * -0.34469;
$var_G = $var_X * -0.96927 + $var_Y * 1.87601 + $var_Z * 0.04156;
$var_B = $var_X * 0.01345 + $var_Y * -0.11839 + $var_Z * 1.01541;
$var_R = pow($var_R, ( 1 / 2.19921875 ));
$var_G = pow($var_G, ( 1 / 2.19921875 ));
$var_B = pow($var_B, ( 1 / 2.19921875 ));
if ( $var_R > 0.0031308 ) {$var_R = 1.055 * ( pow($var_R , ( 1 / 2.4 )) ) - 0.055;}
else {$var_R = 12.92 * $var_R;}
if ( $var_G > 0.0031308 ) {$var_G = 1.055 * ( pow($var_G , ( 1 / 2.4 )) ) - 0.055;}
else {$var_G = 12.92 * $var_G;}
if ( $var_B > 0.0031308 ) {$var_B = 1.055 * ( pow($var_B , ( 1 / 2.4 )) ) - 0.055;}
else {$var_B = 12.92 * $var_B;}
*/
function adj($C) {
if (Abs($C) < 0.0031308) {
return 12.92 * $C;
}
return 1.055 * Math.pow($C, 0.41666) - 0.055;
}
$var_R=adj($var_R);
$var_G=adj($var_G);
$var_B=adj($var_B);
if ($var_R<0) {
$var_R=0;
}
if ($var_G<0) {
$var_G=0;
}
if ($var_B<0) {
$var_B=0;
}
$sR = round($var_R * 255,0);
if ($sR>255) {
$sR=255;
}
$sG = round($var_G * 255,0);
if ($sG>255) {
$sG=255;
}
$sB = round($var_B * 255,0);
if ($sB>255) {
$sB=255;
}
//echo "<br>RGB:".$sR.",".$sG.",".$sB."<br>";
function RGBToHex($r, $g, $b) {
//String padding bug found and the solution put forth by Pete Williams (http://snipplr.com/users/PeteW)
$hex = "#";
$hex.= str_pad(dechex($r), 2, "0", STR_PAD_LEFT);
$hex.= str_pad(dechex($g), 2, "0", STR_PAD_LEFT);
$hex.= str_pad(dechex($b), 2, "0", STR_PAD_LEFT);
return $hex;
}
$ch1C2=RGBToHex($sR,$sG,$sB);
//echo "<br>HEX:".$ch1C2;
$ch1C3=RGBToHex($sR,$sG,$sB);
function de76($l1,$a1,$b1,$l2,$a2,$b2) {
$d76=sqrt(pow(($l1-$l2),2)+ pow(($a1-$a2),2)+pow(($b1-$b2),2));
return round($d76,2);
}
$targetL=$TL;$targeta=$Ta;$targetb=$Tb;
$measureL=$SLm;$measurea=$Sam;$measureb=$Sbm;
$dc76=de76($targetL,$targeta,$targetb,$measureL,$measurea,$measureb);
$dc00=de00($_SESSION['TL'],$_SESSION['Ta'],$_SESSION['Tb'],$measureL,$measurea,$measureb);
$cols=45;
$Pdot=1;
// echo "Paper X".$dotT[$idx+$cols*$Pdot+1]."<br>";
$PXm=sp38XYZ("X",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$PYm=sp38XYZ("Y",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$PZm=sp38XYZ("Z",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$PLm=xyz2lab01("l",$PXm,$PYm,$PZm);
$Pam=xyz2lab01("a",$PXm,$PYm,$PZm);
$Pbm=xyz2lab01("b",$PXm,$PYm,$PZm);
$Pdm=DensitySp38("K",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
// echo "xyz x:".$PXm."_y:".$PYm."_z:".$PZm;
// echo "dot-10:".$dotT[$idx+$cols*$Pdot+1]."_dot-40:".$dotT[$idx+$cols*$Pdot+31];
// echo "<BR>Paper: PL:".$PLm."_Pa:".$Pam."_Pb:".$Pbm."__Pdm:".$Pdm."__<br>";
function DensitySp38S($V,$s1,$s2,$s3,$s4,$s5,$s6,$s7,$s8,$s9,$s10,$s11,$s12,$s13,$s14,$s15,$s16,$s17,$s18,$s19,$s20,$s21,$s22,$s23,$s24,$s25,$s26,$s27,$s28,$s29,$s30,$s31,$s32,$s33,$s34,$s35,$s36,$ft0,$ft1, $ft2, $ft3, $ft4, $ft5, $ft6, $ft7, $ft8, $ft9, $ft10, $ft11, $ft12, $ft13, $ft14, $ft15, $ft16, $ft17, $ft18, $ft19, $ft20, $ft21, $ft22, $ft23, $ft24, $ft25, $ft26, $ft27, $ft28, $ft29, $ft30, $ft31, $ft32, $ft33, $ft34, $ft35) {
$values=array("34" => 0.0,"35" => 0.0,"36" => 0.0,"37" => 0.0,"38" => $s1,"39" =>$s2,"40" => $s3,"41" => $s4,"42" => $s5,"43" => $s6,"44" => $s7,"45" => $s8,"46" => $s9,"47" => $s10,"48" => $s11,"49" => $s12,"50" => $s13,"51" => $s14,"52" => $s15,"53" => $s16,"54" => $s17,"55" => $s18,"56" => $s19,"57" => $s20,"58" => $s21,"59" => $s22,"60" => $s23,"61" => $s24,"62" => $s25,"63" => $s26,"64" => $s27,"65" => $s28,"66" => $s29,"67" => $s30,"68" => $s31,"69" => $s32,"70" => $s33, "71" => $s34,"72" => $s35,"73" => $s36,"74" => 0.0,"75" => 0.0,"76" => 0.0,"77" => 0.0,"78" => 0.0,"79" => 0.0,"80" => 0.0,"81" => 0.0,"82" => 0.0,"83" => 0.0);
$SpectraU=array(0,0,0,0,$ft0,$ft1, $ft2, $ft3, $ft4, $ft5, $ft6, $ft7, $ft8, $ft9, $ft10, $ft11, $ft12, $ft13, $ft14, $ft15, $ft16, $ft17, $ft18, $ft19, $ft20, $ft21, $ft22, $ft23, $ft24, $ft25, $ft26, $ft27, $ft28, $ft29, $ft30, $ft31, $ft32, $ft33, $ft34, $ft35);
//-LOG10(SUMPRODUCT(AZ2:AZ51,AV2:AV51)/SUM(AV2:AV51)) =-LOG10(SUMPRODUCT(Sample,TT)/SUM(Den_StatusT_R))
$sPSum=0;
$sProduct=0;
if ($V=="U") {
for ( $i = 34; $i <= 83; $i += 1) {
$sProduct=$values[$i]*$SpectraU[$i-34];
$sPSum=$sProduct+$sPSum;}
$sumV=array_sum($SpectraU);}
//$sumduct=$values[40];
$den=-log10($sPSum/($sumV));
return round($den,4);
}
//////////////////////////////////////////////////////////////////////////////////////////
$avalues=array($dotT[3+3]*0.01,$dotT[3+3]*0.01,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,$dotT[3+33]*0.01,$dotT[3+33]*0.01,$dotT[3+33]*0.01);
//$min_value_key=array_keys($avalues, max($avalues));
//echo "<br>Check:".$min_value_key;
$min = min($avalues);
$index = array_search($min, $avalues);
//echo "<br>min Check 320:".$index;
$max = max($avalues);
$mindex = array_search($max, $avalues);
//echo "<br>max Check3240:".$mindex;
$nm=380+$mindex*10;
if ($index>17) {
$fn=$index;}
else {
$fn=$index;}
${'f'.$fn}=14.0388;
/////////////////////////////////Spot
$Pdot=0;
// echo "C X".$dotT[$idx+$cols*$Pdot+1]."<br>";
$cXm=sp38XYZ("X",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$cYm=sp38XYZ("Y",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$cZm=sp38XYZ("Z",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0);
$cLm=xyz2lab01("l",$cXm,$cYm,$cZm);
$cam=xyz2lab01("a",$cXm,$cYm,$cZm);
$cbm=xyz2lab01("b",$cXm,$cYm,$cZm);
$cdm=DensitySp38S("U",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0,$f0,$f1, $f2, $f3, $f4, $f5, $f6, $f7, $f8, $f9, $f10, $f11, $f12, $f13, $f14, $f15, $f16, $f17, $f18, $f19, $f20, $f21, $f22, $f23, $f24, $f25, $f26, $f27, $f28, $f29, $f30, $f31, $f32, $f33, $f34, $f35);
echo "cdm 367:".$cdm;
//echo "note 2k: CL:".$cLm."_Ca:".$cam."_Cb:".$cbm."__Pdm:".$cdm."__<br>";
$avalues=array($dotT[3+3]*0.01,$dotT[3+3]*0.01,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,$dotT[3+33]*0.01,$dotT[3+33]*0.01,$dotT[3+33]*0.01);
//////////////////////////////////////////////////////
/////////////////spot den
$min = min($avalues);
$index = array_search($min, $avalues);
//echo "<br>min Check:".$index;
$max = max($avalues);
$mindex = array_search($max, $avalues);
//echo "<br>max Check:".$mindex;
$nm=380+$mindex*10;
//$index=$index+1;
if ($index>17) {
$fn=$index;}
else {
$fn=$index;}
$f0=0;$f1=0;$f2=0;$f3=0;$f4=0;$f5=0;$f6=0;$f7=0;$f8=0;$f9=0;$f10=0;$f11=0;$f12=0;$f13=0;$f14=0;$f15=0;$f16=0;$f17=0;$f18=0;$f19=0;$f20=0;$f21=0;$f22=0;$f23=0;$f24=0;$f25=0;$f26=0;$f27=0;$f28=0;$f29=0;$f30=0;$f31=0;$f32=0;$f33=0;$f34=0;$f35=0;$f36=0;
${'f'.$fn}=14.0388;
//echo "index" .$index."_".$nm;
$cdm=DensitySp38S("U",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0,$f0,$f1, $f2, $f3, $f4, $f5, $f6, $f7, $f8, $f9, $f10, $f11, $f12, $f13, $f14, $f15, $f16, $f17, $f18, $f19, $f20, $f21, $f22, $f23, $f24, $f25, $f26, $f27, $f28, $f29, $f30, $f31, $f32, $f33, $f34, $f35)-0.2;
echo "<br>uvd:".$cdm."<br>";
for ($ff=0;$ff<36;$ff++) {
$f0=0;$f1=0;$f2=0;$f3=0;$f4=0;$f5=0;$f6=0;$f7=0;$f8=0;$f9=0;$f10=0;$f11=0;$f12=0;$f13=0;$f14=0;$f15=0;$f16=0;$f17=0;$f18=0;$f19=0;$f20=0;$f21=0;$f22=0;$f23=0;$f24=0;$f25=0;$f26=0;$f27=0;$f28=0;$f29=0;$f30=0;$f31=0;$f32=0;$f33=0;$f34=0;$f35=0;$f36=0;
${'f'.$ff}=14.0388;
//echo "index" .$ff;
$udm=DensitySp38S("U",0,0,$dotT[3+3]*0.01,$dotT[3+4]*0.01,$dotT[3+5]*0.01,$dotT[3+6]*0.01,$dotT[3+7]*0.01,$dotT[3+8]*0.01,$dotT[3+9]*0.01,$dotT[3+10]*0.01,$dotT[3+11]*0.01,$dotT[3+12]*0.01,$dotT[3+13]*0.01,$dotT[3+14]*0.01,$dotT[3+15]*0.01,$dotT[3+16]*0.01,$dotT[3+17]*0.01,$dotT[3+18]*0.01,$dotT[3+19]*0.01,$dotT[3+20]*0.01,$dotT[3+21]*0.01,$dotT[3+22]*0.01,$dotT[3+23]*0.01,$dotT[3+24]*0.01,$dotT[3+25]*0.01,$dotT[3+26]*0.01,$dotT[3+27]*0.01,$dotT[3+28]*0.01,$dotT[3+29]*0.01,$dotT[3+30]*0.01,$dotT[3+31]*0.01,$dotT[3+32]*0.01,$dotT[3+33]*0.01,0,0,0,$f0,$f1, $f2, $f3, $f4, $f5, $f6, $f7, $f8, $f9, $f10, $f11, $f12, $f13, $f14, $f15, $f16, $f17, $f18, $f19, $f20, $f21, $f22, $f23, $f24, $f25, $f26, $f27, $f28, $f29, $f30, $f31, $f32, $f33, $f34, $f35)-0.2;
// echo "<br>uvd:".$udm;
}
///////spodden
$p380=$_SESSION["p380"];
$p390=$_SESSION["p390"];
$p400=$_SESSION["p400"];
$p410=$_SESSION["p410"];
$p420=$_SESSION["p420"];
$p430=$_SESSION["p430"];
$p440=$_SESSION["p440"];
$p450=$_SESSION["p450"];
$p460=$_SESSION["p460"];
$p470=$_SESSION["p470"];
$p480=$_SESSION["p480"];
$p490=$_SESSION["p490"];
$p500=$_SESSION["p500"];
$p510=$_SESSION["p510"];
$p520=$_SESSION["p520"];
$p530=$_SESSION["p530"];
$p540=$_SESSION["p540"];
$p550=$_SESSION["p550"];
$p560=$_SESSION["p560"];
$p570=$_SESSION["p570"];
$p580=$_SESSION["p580"];
$p590=$_SESSION["p590"];
$p600=$_SESSION["p600"];
$p610=$_SESSION["p610"];
$p620=$_SESSION["p620"];
$p630=$_SESSION["p630"];
$p640=$_SESSION["p640"];
$p650=$_SESSION["p650"];
$p660=$_SESSION["p660"];
$p670=$_SESSION["p670"];
$p680=$_SESSION["p680"];
$p690=$_SESSION["p690"];
$p700=$_SESSION["p700"];
$p710=$_SESSION["p710"];
$p720=$_SESSION["p720"];
$p730=$_SESSION["p730"];
//print_r ($dotp);
////////////////////////////////
?>
<table width="300" border="1" align="center">
<tr>
<td bgcolor="<?php echo $ch1C2;?>"><?php echo "目標:</td><td>".$_SESSION['TL']."</td><td>".$_SESSION['Ta']."</td><td>".$_SESSION['Tb'];?></td>
</tr>
<tr>
<td bgcolor="<?php echo $ch1C3;?>"><?php echo "量測:</td><td>".$measureL."</td><td>".$measurea."</td><td>".$measureb;?></td>
</tr>
<tr>
<td bgcolor="<?php echo $ch1C3;?>"><?php echo "delta:</td><td>".round(($measureL-$_SESSION['TL']),2)."</td><td>".round(($measurea-$_SESSION['Ta']),2)."</td><td>".round(($measureb-$_SESSION['Tb']),2);?></td>
</tr>
<tr>
<td bgcolor="<?php echo $ch1C3;?>">色差:</td><td><font color='<?php if ($dc00>3) {echo "red";} else {echo "black";} ?>'><?php echo round($dc00,2);?></td>
<td bgcolor="<?php echo $ch1C3;?>"><?php echo "濃度:</td><td>".$cdm."";?></td>
</tr>
</table>
<?php
$TRGB=substr($ch1C3,1);
echo "TRGB:".$TRGB;
?>
<tr>
<td> 設定目標 ?</td>
</tr>
<form action="setok.php?f123=<?php echo "target.txt".'&f321='.$filename.'&po='.$po.'&TL='.$measureL.'&Ta='.$measurea.'&Tb='.$measureb.'&TRGB='.$TRGB.'&sNo='.$sNo.'&company='.$company;?>" method="post">
<table width="200" border="0" align="center">
<tr><td>
<input size="15" maxlength="50" type="hidden" name="rtarget" value=<?php echo $f321;?> /></td>
</tr>
<td>
<input type="submit" name="submit" value="OK">
</td>
</table>
</form>
<?php
$bgcolor=str_replace("#", "", $ch1C3);
//echo "bgcolor:". $bgcolor;
echo '
<form action="setTVSD.php?f123='.$sFile.'&f321='.$filename.'&po='.$po.'&sNo='.$sNo.'&company='.$company.'&color='.$bgcolor.'" method="post">
<tr><td>
<input size="15" maxlength="50" type="hidden" name="rtarget" value='. $f321.'</td>
</tr>
<td>
<input type="submit" name="submit" value="get SCTV">
</td>
</table>
</form>';
?>
<table><div>
<?php
$dgl=$targetL-$cLm;
$dga=$targeta-$cam;
$dgb=$targetb-$cbm;
$df=sqrt(pow($dga,2)+pow($dgb,2));
/////////////////////////////////////////////////////////////
if ($df>3){$color=6;}else {$color=1;}
$ggc=-$ggc;
$ggm=-$ggm;
$ggy=-$ggy;
include 'graphFix.php';
//GenGraph($ggc,$ggm,$ggy,$color);
?>
<!--<img src="graph.gif">-->
</div>
</table>
<?php
//echo "pix:".$pix;
//////////////////////sec C
$xhcmin=100;
$Huecmin=100;
$Lcmin=100;
$cmin=100;
$xhcmin0='';
$Huecmin0='';
$Lcmin0='';
$xhromeCT=$chromeCT;
$Huemmin0='';
$xhromeMT=$chromeMT;
$Hueymin0='';
$xhromeYT=$chromeYT;
$xhmmin0='';
$xhymin0='';
$p380=$_SESSION["p380"];
$p390=$_SESSION["p390"];
$p400=$_SESSION["p400"];
$p410=$_SESSION["p410"];
$p420=$_SESSION["p420"];
$p430=$_SESSION["p430"];
$p440=$_SESSION["p440"];
$p450=$_SESSION["p450"];
$p460=$_SESSION["p460"];
$p470=$_SESSION["p470"];
$p480=$_SESSION["p480"];
$p490=$_SESSION["p490"];
$p500=$_SESSION["p500"];
$p510=$_SESSION["p510"];
$p520=$_SESSION["p520"];
$p530=$_SESSION["p530"];
$p540=$_SESSION["p540"];
$p550=$_SESSION["p550"];
$p560=$_SESSION["p560"];
$p570=$_SESSION["p570"];
$p580=$_SESSION["p580"];
$p590=$_SESSION["p590"];
$p600=$_SESSION["p600"];
$p610=$_SESSION["p610"];
$p620=$_SESSION["p620"];
$p630=$_SESSION["p630"];
$p640=$_SESSION["p640"];
$p650=$_SESSION["p650"];
$p660=$_SESSION["p660"];
$p670=$_SESSION["p670"];
$p680=$_SESSION["p680"];
$p690=$_SESSION["p690"];
$p700=$_SESSION["p700"];
$p710=$_SESSION["p710"];
$p720=$_SESSION["p720"];
$p730=$_SESSION["p730"];
//echo "<br>p380:".$p380;
//echo "<br>p720:".$p720;
//echo "<br>p730:".$p730;
$ki=0.820;
for ( $i = 1; $i <= 30; $i+= 1) {
$Pdot=0;////C line
$si=0;
for ($s=380; $s<=730; $s+=10) {
//${'p'.$s}= ${'_SESSION["p'.$s.'"]'};
//${'_SESSION["p'.$s.'"]'}
$ppdot="dotp";
//echo "ps:".${'p'.$s};
//abs($dotT[3+$si+1]*0.01);
${'m'.$s}=abs($dotT[3+$si+1]*0.01);
//echo "m".$s.":".${'m'.$s};
${'r'.$s}=pow(10,-((((-log10(${'m'.$s}))-(-log10(${'p'.$s})))*$ki)+(-log10(${'p'.$s}))))*1;
//echo ",r".$s.":".${'r'.$s}."<br>";
$si=$si+1;
}
$ki=$ki+0.015;
//echo "<br>r380:".$r380;
//echo "r720:".$r720;
${'c'.$i.'X'}=sp38XYZ("X",$r380,$r390,$r400,$r410,$r420,$r430,$r440,$r450,$r460,$r470,$r480,$r490,$r500,$r510,$r520,$r530,$r540,$r550,$r560,$r570,$r580,$r590,$r600,$r610,$r620,$r630,$r640,$r650,$r660,$r670,$r680,$r690,$r700,$r710,$r720,$r730);
//${'c'.$i.'X'}=sp38XYZ("X",$r380,$r390,$r400,$r410,$r420,$r430,$r440,$r450,$r460,$r470,$r480,$r490,$r500,$r510,$r520,$dotT[-1+16],$dotT[-1+17],$dotT[-1+18],$dotT[-1+19],$dotT[-1+20],$dotT[-1+21],$dotT[-1+22],$dotT[-1+23],$dotT[-1+24],$dotT[-1+25],$dotT[-1+26],$dotT[-1+27],$dotT[-1+28],$dotT[-1+29],$dotT[-1+30],$dotT[-1+31],$dotT[-1+32],$dotT[-1+33],$dotT[-1+34],$dotT[-1+35],$dotT[-1+36]);
//echo "<br>cx".$i."X=". $c1X;
${'c'.$i.'Y'}=sp38XYZ("Y",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
${'c'.$i.'Z'}=sp38XYZ("Z",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "KX1=".round($k1X,3).",".round($k1Y,3).",".round($c1Z,3)."<br>";
${'c'.$i.'l'}=xyz2lab01("l",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'a'}=xyz2lab01("a",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
${'c'.$i.'b'}=xyz2lab01("b",${'c'.$i.'X'},${'c'.$i.'Y'},${'c'.$i.'Z'});
//echo "K1L=".round($c1l,3).",".round($c1a,3).",".round($c1b,3);
//${'c'.$i.'dd'}=DensitySp38("C",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "K1L=".round(${'c'.$i.'l'},3);
//echo "<br>Kx".$i."D=".round( ${'c'.$i.'dd'},3);
//echo "K1L=".round($c1l,3).",".round($c1a,3).",".round($c1b,3);
//${'c'.$i.'dd'}=DensitySp38("C",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730);
//echo "K1D=".round($k1dd,3);
$f0=0;$f1=0;$f2=0;$f3=0;$f4=0;$f5=0;$f6=0;$f7=0;$f8=0;$f9=0;$f10=0;$f11=0;$f12=0;$f13=0;$f14=0;$f15=0;$f16=0;$f17=0;$f18=0;$f19=0;$f20=0;$f21=0;$f22=0;$f23=0;$f24=0;$f25=0;$f26=0;$f27=0;$f28=0;$f29=0;$f30=0;$f31=0;$f32=0;$f33=0;$f34=0;$f35=0;$f36=0;
${'f'.$index}=14.0388;
${'c'.$i.'dd'}=DensitySp38S("U",$r380, $r390, $r400, $r410, $r420, $r430, $r440, $r450, $r460, $r470, $r480, $r490, $r500, $r510, $r520, $r530, $r540, $r550, $r560, $r570, $r580, $r590, $r600, $r610, $r620, $r630, $r640, $r650, $r660, $r670, $r680, $r690, $r700, $r710, $r720, $r730,$f0,$f1, $f2, $f3, $f4, $f5, $f6, $f7, $f8, $f9, $f10, $f11, $f12, $f13, $f14, $f15, $f16, $f17, $f18, $f19, $f20, $f21, $f22, $f23, $f24, $f25, $f26, $f27, $f28, $f29, $f30, $f31, $f32, $f33, $f34, $f35)-0.2;
//echo "<br>Kx".$i."D=".round( ${'c'.$i.'dd'},3);
${'hue'.$i}=atan2(${'c'.$i.'b'},${'c'.$i.'a'});
${'deg'.$i} = (${'hue'.$i}/M_PI*180) + (${'hue'.$i} > 0 ? 0 : 360);
//if ($i%3==0) {
${'hexCL'.$i}=${'c'.$i.'l'};
${'hexCa'.$i}=${'c'.$i.'a'};
${'hexCb'.$i}=${'c'.$i.'b'};
${'xhromec'.$i}=pow((pow(${'c'.$i.'a'},2)+pow(${'c'.$i.'b'},2)),0.5);
${'hue'.$i}=atan2(${'c'.$i.'b'},${'c'.$i.'a'});
${'degc'.$i} = (${'hue'.$i}/M_PI*180) + (${'hue'.$i} > 0 ? 0 : 360);
//echo "<br>xhromec:".${'xhromec'.$i}."_huec:".${'degc'.$i} ;
//echo "<br>hex Ca Cb=".${'hexCa'.$i}."_".${'hexCb'.$i};
$xhcmin0=abs(${'xhromec'.$i}-$xhromeCT);
$xhcmin=min($xhcmin0,$xhcmin);
//echo "<br>xhcmin0:".$i."__".$xhcmin0."__xhcmin:".$xhcmin;
$Huecmin0=abs(${'degc'.$i}-$degCT);
$Huecmin=min($Huecmin0,$Huecmin);
//echo "<br>Huecmin:".$Huecmin;
$Lcmin0=abs(${'c'.$i.'l'}-$TL);
$Lcmin=min($Lcmin0,$Lcmin);
//}
$dc76b=de76($TL,$Ta,$Tb,${"c".$i."l"},${"c".$i."a"},${"c".$i."b"});
${"dc".$i."76"}=$dc76b;
$cmin=min($dc76b,$cmin);
//echo "<br>cmin:",$cmin;
if ($dc76b==$cmin){
$copt=$i;$coptD=${"c".$i."dd"};$coptL=${"c".$i."l"};$copta=${"c".$i."a"};$coptb=${"c".$i."b"};
//echo "<br>copt:",$copt;
}
if ($Huecmin0==$Huecmin){
$coptH=$i;$coptHD=${"c".$i."dd"};$coptHL=${"c".$i."l"};$coptHa=${"c".$i."a"};$coptHb=${"c".$i."b"};
//echo "<br>coptH:",$coptH."coptHa:",$coptHa;
}
if ($xhcmin0==$xhcmin){
$coptX=$i;$coptXD=${"c".$i."dd"};$coptXL=${"c".$i."l"};$coptXa=${"c".$i."a"};$coptXb=${"c".$i."b"};
//echo "<br>coptXj:",$coptX."--coptXa".$coptXa;
}
if ($Lcmin0==$Lcmin){
$coptLi=$i;$coptLD=${"c".$i."dd"};$coptLL=${"c".$i."l"};$coptLa=${"c".$i."a"};$coptLb=${"c".$i."b"};
//echo "<br>coptXj:",$coptX."--coptXa".$coptXa;
}
//echo "c1D=".round(${'c'.$i.'dd'},3);
}
//echo "<br>Xmin:".$xhcmin."<br>";
///////////////////dL
$targetL=$TL;
$dec00=de76($targetL,$targeta,$targetb,$cLm,$targeta,$targetb);
$dc176L=de76($targetL,$targeta,$targetb,$c1l,$targeta,$targetb);
$dc276L=de76($targetL,$targeta,$targetb,$c2l,$targeta,$targetb);
$dc376L=de76($targetL,$targeta,$targetb,$c3l,$targeta,$targetb);
$dc476L=de76($targetL,$targeta,$targetb,$c4l,$targeta,$targetb);
$dc576L=de76($targetL,$targeta,$targetb,$c5l,$targeta,$targetb);
$dc676L=de76($targetL,$targeta,$targetb,$c6l,$targeta,$targetb);
$dc776L=de76($targetL,$targeta,$targetb,$c7l,$targeta,$targetb);
$dc876L=de76($targetL,$targeta,$targetb,$c8l,$targeta,$targetb);
$dc976L=de76($targetL,$targeta,$targetb,$c9l,$targeta,$targetb);
$dc1076L=de76($targetL,$targeta,$targetb,$c10l,$targeta,$targetb);
$dc1176L=de76($targetL,$targeta,$targetb,$c11l,$targeta,$targetb);
$dc1276L=de76($targetL,$targeta,$targetb,$c12l,$targeta,$targetb);
$dc1376L=de76($targetL,$targeta,$targetb,$c13l,$targeta,$targetb);
$dc1476L=de76($targetL,$targeta,$targetb,$c14l,$targeta,$targetb);
$dc1576L=de76($targetL,$targeta,$targetb,$c15l,$targeta,$targetb);
$dc1676L=de76($targetL,$targeta,$targetb,$c16l,$targeta,$targetb);
$dc1776L=de76($targetL,$targeta,$targetb,$c17l,$targeta,$targetb);
$dc1876L=de76($targetL,$targeta,$targetb,$c18l,$targeta,$targetb);
$dc1976L=de76($targetL,$targeta,$targetb,$c19l,$targeta,$targetb);
$dc2076L=de76($targetL,$targeta,$targetb,$c20l,$targeta,$targetb);
$dc2176L=de76($targetL,$targeta,$targetb,$c21l,$targeta,$targetb);
$dc2276L=de76($targetL,$targeta,$targetb,$c22l,$targeta,$targetb);
$dc2376L=de76($targetL,$targeta,$targetb,$c23l,$targeta,$targetb);
$dc2476L=de76($targetL,$targeta,$targetb,$c24l,$targeta,$targetb);
$dc2576L=de76($targetL,$targeta,$targetb,$c25l,$targeta,$targetb);
$dc2676L=de76($targetL,$targeta,$targetb,$c26l,$targeta,$targetb);
$dc2776L=de76($targetL,$targeta,$targetb,$c27l,$targeta,$targetb);
$dc2876L=de76($targetL,$targeta,$targetb,$c28l,$targeta,$targetb);
$dc2976L=de76($targetL,$targeta,$targetb,$c29l,$targeta,$targetb);
$dc3076L=de76($targetL,$targeta,$targetb,$c30l,$targeta,$targetb);
$cminL=min($dc176L,$dc276L,$dc376L,$dc476L,$dc576L,$dc676L,$dc776L,$dc876L,$dc976L,$dc1076L,$dc1176L,$dc1276L,$dc1376L,$dc1476L,$dc1576L,$dc1676L,$dc1776L,$dc1876L,$dc1976L,$dc2076L,$dc2176L,$dc2276L,$dc2376L,$dc2476L,$dc2576L,$dc2676L,$dc2776L,$dc2876L,$dc2976L,$dc3076L);
//echo "CminL=".$cminL;
/////////////////////////////////dC
//dc
$targetL=$TL;
$targeta=$Ta;
$targetb=$Tb;
$dec00=de76($targetL,$targeta,$targetb,$targetL,$cam,$cbm);
$dc176C=de76($targetL,$targeta,$targetb,$targetL,$c1a,$c1b);
$dc276C=de76($targetL,$targeta,$targetb,$targetL,$c2a,$c2b);
$dc376C=de76($targetL,$targeta,$targetb,$targetL,$c3a,$c3b);
$dc476C=de76($targetL,$targeta,$targetb,$targetL,$c4a,$c4b);
$dc576C=de76($targetL,$targeta,$targetb,$targetL,$c5a,$c5b);
$dc676C=de76($targetL,$targeta,$targetb,$targetL,$c6a,$c6b);
$dc776C=de76($targetL,$targeta,$targetb,$targetL,$c7a,$c7b);
$dc876C=de76($targetL,$targeta,$targetb,$targetL,$c8a,$c8b);
$dc976C=de76($targetL,$targeta,$targetb,$targetL,$c9a,$c9b);
$dc1076C=de76($targetL,$targeta,$targetb,$targetL,$c10a,$c10b);
$dc1176C=de76($targetL,$targeta,$targetb,$targetL,$c11a,$c11b);
$dc1276C=de76($targetL,$targeta,$targetb,$targetL,$c12a,$c12b);
$dc1376C=de76($targetL,$targeta,$targetb,$targetL,$c13a,$c13b);
$dc1476C=de76($targetL,$targeta,$targetb,$targetL,$c14a,$c14b);
$dc1576C=de76($targetL,$targeta,$targetb,$targetL,$c15a,$c15b);
$dc1676C=de76($targetL,$targeta,$targetb,$targetL,$c16a,$c16b);
$dc1776C=de76($targetL,$targeta,$targetb,$targetL,$c17a,$c17b);
$dc1876C=de76($targetL,$targeta,$targetb,$targetL,$c18a,$c18b);
$dc1976C=de76($targetL,$targeta,$targetb,$targetL,$c19a,$c19b);
$dc2076C=de76($targetL,$targeta,$targetb,$targetL,$c20a,$c20b);
$dc2176C=de76($targetL,$targeta,$targetb,$targetL,$c21a,$c21b);
$dc2276C=de76($targetL,$targeta,$targetb,$targetL,$c22a,$c22b);
$dc2376C=de76($targetL,$targeta,$targetb,$targetL,$c23a,$c23b);
$dc2476C=de76($targetL,$targeta,$targetb,$targetL,$c24a,$c24b);
$dc2576C=de76($targetL,$targeta,$targetb,$targetL,$c25a,$c25b);
$dc2676C=de76($targetL,$targeta,$targetb,$targetL,$c26a,$c26b);
$dc2776C=de76($targetL,$targeta,$targetb,$targetL,$c27a,$c27b);
$dc2876C=de76($targetL,$targeta,$targetb,$targetL,$c28a,$c28b);
$dc2976C=de76($targetL,$targeta,$targetb,$targetL,$c29a,$c29b);
$dc3076C=de76($targetL,$targeta,$targetb,$targetL,$c30a,$c30b);
$cminC=min($dc176C,$dc276C,$dc376C,$dc476C,$dc576C,$dc676C,$dc776C,$dc876C,$dc976C,$dc1076C,$dc1176C,$dc1276C,$dc1376C,$dc1476C,$dc1576C,$dc1676C,$dc1776C,$dc1876C,$dc1976C,$dc2076C,$dc2176C,$dc2276C,$dc2376C,$dc2476C,$dc2576C,$dc2676C,$dc2776C,$dc2876C,$dc2976C,$dc3076C);
//echo "CminC=".$cminC;
//////////////////////dH
$dec00=abs($deg-$deg);
$dc176H=abs($deg-$deg1);
$dc276H=abs($deg-$deg2);
$dc376H=abs($deg-$deg3);
$dc476H=abs($deg-$deg4);
$dc576H=abs($deg-$deg5);
$dc676H=abs($deg-$deg6);
$dc776H=abs($deg-$deg7);
$dc876H=abs($deg-$deg8);
$dc976H=abs($deg-$deg9);
$dc1076H=abs($deg-$deg10);
$dc1176H=abs($deg-$deg11);
$dc1276H=abs($deg-$deg12);
$dc1376H=abs($deg-$deg13);
$dc1476H=abs($deg-$deg14);
$dc1576H=abs($deg-$deg15);
$dc1676H=abs($deg-$deg16);
$dc1776H=abs($deg-$deg17);
$dc1876H=abs($deg-$deg18);
$dc1976H=abs($deg-$deg19);
$dc2076H=abs($deg-$deg20);
$dc2176H=abs($deg-$deg21);
$dc2276H=abs($deg-$deg22);
$dc2376H=abs($deg-$deg23);
$dc2476H=abs($deg-$deg24);
$dc2576H=abs($deg-$deg25);
$dc2676H=abs($deg-$deg26);
$dc2776H=abs($deg-$deg27);
$dc2876H=abs($deg-$deg28);
$dc2976H=abs($deg-$deg29);
$dc3076H=abs($deg-$deg30);
$cminH=min($dc176H,$dc276H,$dc376H,$dc476H,$dc576H,$dc676H,$dc776H,$dc876H,$dc976H,$dc1076H,$dc1176H,$dc1276H,$dc1376H,$dc1476H,$dc1576H,$dc1676H,$dc1776H,$dc1876H,$dc1976H,$dc2076H,$dc2176H,$dc2276H,$dc2376H,$dc2476H,$dc2576H,$dc2676H,$dc2776H,$dc2876H,$dc2976H,$dc3076H);
// echo "CminH=".$cminH;
/////
$dec00=de76($targetL,$targeta,$targetb,$cLm,$cam,$cbm);
$dc176=de00($targetL,$targeta,$targetb,$c1l,$c1a,$c1b);
$dc276=de00($targetL,$targeta,$targetb,$c2l,$c2a,$c2b);
$dc376=de00($targetL,$targeta,$targetb,$c3l,$c3a,$c3b);
$dc476=de00($targetL,$targeta,$targetb,$c4l,$c4a,$c4b);
$dc576=de00($targetL,$targeta,$targetb,$c5l,$c5a,$c5b);
$dc676=de00($targetL,$targeta,$targetb,$c6l,$c6a,$c6b);
$dc776=de00($targetL,$targeta,$targetb,$c7l,$c7a,$c7b);
$dc876=de00($targetL,$targeta,$targetb,$c8l,$c8a,$c8b);
$dc976=de00($targetL,$targeta,$targetb,$c9l,$c9a,$c9b);
$dc1076=de00($targetL,$targeta,$targetb,$c10l,$c10a,$c10b);
$dc1176=de00($targetL,$targeta,$targetb,$c11l,$c11a,$c11b);
$dc1276=de00($targetL,$targeta,$targetb,$c12l,$c12a,$c12b);
$dc1376=de00($targetL,$targeta,$targetb,$c13l,$c13a,$c13b);
$dc1476=de00($targetL,$targeta,$targetb,$c14l,$c14a,$c14b);
$dc1576=de00($targetL,$targeta,$targetb,$c15l,$c15a,$c15b);
$dc1676=de00($targetL,$targeta,$targetb,$c16l,$c16a,$c16b);
$dc1776=de00($targetL,$targeta,$targetb,$c17l,$c17a,$c17b);
$dc1876=de00($targetL,$targeta,$targetb,$c18l,$c18a,$c18b);
$dc1976=de00($targetL,$targeta,$targetb,$c19l,$c19a,$c19b);
$dc2076=de00($targetL,$targeta,$targetb,$c20l,$c20a,$c20b);
$dc2176=de00($targetL,$targeta,$targetb,$c21l,$c21a,$c21b);
$dc2276=de00($targetL,$targeta,$targetb,$c22l,$c22a,$c22b);
$dc2376=de00($targetL,$targeta,$targetb,$c23l,$c23a,$c23b);
$dc2476=de00($targetL,$targeta,$targetb,$c24l,$c24a,$c24b);
$dc2576=de00($targetL,$targeta,$targetb,$c25l,$c25a,$c25b);
$dc2676=de00($targetL,$targeta,$targetb,$c26l,$c26a,$c26b);
$dc2776=de00($targetL,$targeta,$targetb,$c27l,$c27a,$c27b);
$dc2876=de00($targetL,$targeta,$targetb,$c28l,$c28a,$c28b);
$dc2976=de00($targetL,$targeta,$targetb,$c29l,$c29a,$c29b);
$dc3076=de00($targetL,$targeta,$targetb,$c30l,$c30a,$c30b);
$cmin=min($dc176,$dc276,$dc376,$dc476,$dc576,$dc676,$dc776,$dc876,$dc976,$dc1076,$dc1176,$dc1276,$dc1376,$dc1476,$dc1576,$dc1676,$dc1776,$dc1876,$dc1976,$dc2076,$dc2176,$dc2276,$dc2376,$dc2476,$dc2576,$dc2676,$dc2776,$dc2876,$dc2976,$dc3076);
if ($dc176==$cmin){ $copt='1';$coptD=$c1dd;$coptL=$c1l;$copta=$c1a;$coptb=$c1b;}
if ($dc276==$cmin){ $copt='2';$coptD=$c2dd;$coptL=$c2l;$copta=$c2a;$coptb=$c2b;}
if ($dc376==$cmin){ $copt='3';$coptD=$c3dd;$coptL=$c3l;$copta=$c3a;$coptb=$c3b;}
if ($dc476==$cmin){ $copt='4';$coptD=$c4dd;$coptL=$c4l;$copta=$c4a;$coptb=$c4b;}
if ($dc576==$cmin){ $copt='5';$coptD=$c5dd;$coptL=$c5l;$copta=$c5a;$coptb=$c5b;}
if ($dc676==$cmin){ $copt='6';$coptD=$c6dd;$coptL=$c6l;$copta=$c6a;$coptb=$c6b;}
if ($dc776==$cmin){ $copt='7';$coptD=$c7dd;$coptL=$c7l;$copta=$c7a;$coptb=$c7b;}
if ($dc876==$cmin){ $copt='8';$coptD=$c8dd;$coptL=$c8l;$copta=$c8a;$coptb=$c8b;}
if ($dc976==$cmin){ $copt='9';$coptD=$c9dd;$coptL=$c9l;$copta=$c9a;$coptb=$c9b;}
if ($dc1076==$cmin){ $copt='10';$coptD=$c10dd;$coptL=$c10l;$copta=$c10a;$coptb=$c10b;}
if ($dc1176==$cmin){ $copt='11';$coptD=$c11dd;$coptL=$c11l;$copta=$c11a;$coptb=$c11b;}
if ($dc1276==$cmin){ $copt='12';$coptD=$c12dd;$coptL=$c12l;$copta=$c12a;$coptb=$c12b;}
if ($dc1376==$cmin){ $copt='13';$coptD=$c13dd;$coptL=$c13l;$copta=$c13a;$coptb=$c13b;}
if ($dc1476==$cmin){ $copt='14';$coptD=$c14dd;$coptL=$c14l;$copta=$c14a;$coptb=$c14b;}
if ($dc1576==$cmin){ $copt='15';$coptD=$c15dd;$coptL=$c15l;$copta=$c15a;$coptb=$c15b;}
if ($dc1676==$cmin){ $copt='16';$coptD=$c16dd;$coptL=$c16l;$copta=$c16a;$coptb=$c16b;}
if ($dc1776==$cmin){ $copt='17';$coptD=$c17dd;$coptL=$c17l;$copta=$c17a;$coptb=$c17b;}
if ($dc1876==$cmin){ $copt='18';$coptD=$c18dd;$coptL=$c18l;$copta=$c18a;$coptb=$c18b;}
if ($dc1976==$cmin){ $copt='19';$coptD=$c19dd;$coptL=$c19l;$copta=$c19a;$coptb=$c19b;}
if ($dc2076==$cmin){ $copt='20';$coptD=$c20dd;$coptL=$c20l;$copta=$c20a;$coptb=$c20b;}
if ($dc2176==$cmin){ $copt='21';$coptD=$c21dd;$coptL=$c21l;$copta=$c21a;$coptb=$c21b;}
if ($dc2276==$cmin){ $copt='22';$coptD=$c22dd;$coptL=$c22l;$copta=$c22a;$coptb=$c22b;}
if ($dc2376==$cmin){ $copt='23';$coptD=$c23dd;$coptL=$c23l;$copta=$c23a;$coptb=$c23b;}
if ($dc2476==$cmin){ $copt='24';$coptD=$c24dd;$coptL=$c24l;$copta=$c24a;$coptb=$c24b;}
if ($dc2576==$cmin){ $copt='25';$coptD=$c25dd;$coptL=$c25l;$copta=$c25a;$coptb=$c25b;}
if ($dc2676==$cmin){ $copt='26';$coptD=$c26dd;$coptL=$c26l;$copta=$c26a;$coptb=$c26b;}
if ($dc2776==$cmin){ $copt='27';$coptD=$c27dd;$coptL=$c27l;$copta=$c27a;$coptb=$c27b;}
if ($dc2876==$cmin){ $copt='28';$coptD=$c28dd;$coptL=$c28l;$copta=$c28a;$coptb=$c28b;}
if ($dc2976==$cmin){ $copt='29';$coptD=$c29dd;$coptL=$c29l;$copta=$c29a;$coptb=$c29b;}
if ($dc3076==$cmin){ $copt='30';$coptD=$c30dd;$coptL=$c30l;$copta=$c30a;$coptb=$c30b;}
$oDL=$coptL-$cLm; $oDa=$copta-$cam; $oDb=$coptb-$cbm;
$dc100=de00($targetL,$targeta,$targetb,$c1l,$c1a,$c1b);
$dc200=de00($targetL,$targeta,$targetb,$c2l,$c2a,$c2b);
$dc300=de00($targetL,$targeta,$targetb,$c3l,$c3a,$c3b);
$dc400=de00($targetL,$targeta,$targetb,$c4l,$c4a,$c4b);
$dc500=de00($targetL,$targeta,$targetb,$c5l,$c5a,$c5b);
$dc600=de00($targetL,$targeta,$targetb,$c6l,$c6a,$c6b);
$dc700=de00($targetL,$targeta,$targetb,$c7l,$c7a,$c7b);
$dc800=de00($targetL,$targeta,$targetb,$c8l,$c8a,$c8b);
$dc900=de00($targetL,$targeta,$targetb,$c9l,$c9a,$c9b);
$dc1000=de00($targetL,$targeta,$targetb,$c10l,$c10a,$c10b);
$dc1100=de00($targetL,$targeta,$targetb,$c11l,$c11a,$c11b);
$dc1200=de00($targetL,$targeta,$targetb,$c12l,$c12a,$c12b);
$dc1300=de00($targetL,$targeta,$targetb,$c13l,$c13a,$c13b);
$dc1400=de00($targetL,$targeta,$targetb,$c14l,$c14a,$c14b);
$dc1500=de00($targetL,$targeta,$targetb,$c15l,$c15a,$c15b);
$dc1600=de00($targetL,$targeta,$targetb,$c16l,$c16a,$c16b);
$dc1700=de00($targetL,$targeta,$targetb,$c17l,$c17a,$c17b);
$dc1800=de00($targetL,$targeta,$targetb,$c18l,$c18a,$c18b);
$dc1900=de00($targetL,$targeta,$targetb,$c19l,$c19a,$c19b);
$dc2000=de00($targetL,$targeta,$targetb,$c20l,$c20a,$c20b);
$dc2100=de00($targetL,$targeta,$targetb,$c21l,$c21a,$c21b);
$dc2200=de00($targetL,$targeta,$targetb,$c22l,$c22a,$c22b);
$dc2300=de00($targetL,$targeta,$targetb,$c23l,$c23a,$c23b);
$dc2400=de00($targetL,$targeta,$targetb,$c24l,$c24a,$c24b);
$dc2500=de00($targetL,$targeta,$targetb,$c25l,$c25a,$c25b);
$dc2600=de00($targetL,$targeta,$targetb,$c26l,$c26a,$c26b);
$dc2700=de00($targetL,$targeta,$targetb,$c27l,$c27a,$c27b);
$dc2800=de00($targetL,$targeta,$targetb,$c28l,$c28a,$c28b);
$dc2900=de00($targetL,$targeta,$targetb,$c29l,$c29a,$c29b);
$dc3000=de00($targetL,$targeta,$targetb,$c30l,$c30a,$c30b);
$cmin00=min($dc100,$dc200,$dc300,$dc400,$dc500,$dc600,$dc700,$dc800,$dc900,$dc1000,$dc1100,$dc1200,$dc1300,$dc1400,$dc1500,$dc1600,$dc1700,$dc1800,$dc1900,$dc2000,$dc2100,$dc2200,$dc2300,$dc2400,$dc2500,$dc2600,$dc2700,$dc2800,$dc2900,$dc3000);
if ($dc100==$cmin){ $copt='1';$coptD=$c1dd;$coptL=$c1l;$copta=$c1a;$coptb=$c1b;}
if ($dc200==$cmin){ $copt='2';$coptD=$c2dd;$coptL=$c2l;$copta=$c2a;$coptb=$c2b;}
if ($dc300==$cmin){ $copt='3';$coptD=$c3dd;$coptL=$c3l;$copta=$c3a;$coptb=$c3b;}
if ($dc400==$cmin){ $copt='4';$coptD=$c4dd;$coptL=$c4l;$copta=$c4a;$coptb=$c4b;}
if ($dc500==$cmin){ $copt='5';$coptD=$c5dd;$coptL=$c5l;$copta=$c5a;$coptb=$c5b;}
if ($dc600==$cmin){ $copt='6';$coptD=$c6dd;$coptL=$c6l;$copta=$c6a;$coptb=$c6b;}
if ($dc700==$cmin){ $copt='7';$coptD=$c7dd;$coptL=$c7l;$copta=$c7a;$coptb=$c7b;}
if ($dc800==$cmin){ $copt='8';$coptD=$c8dd;$coptL=$c8l;$copta=$c8a;$coptb=$c8b;}
if ($dc900==$cmin){ $copt='9';$coptD=$c9dd;$coptL=$c9l;$copta=$c9a;$coptb=$c9b;}
if ($dc1000==$cmin){ $copt='10';$coptD=$c10dd;$coptL=$c10l;$copta=$c10a;$coptb=$c10b;}
if ($dc1100==$cmin){ $copt='11';$coptD=$c11dd;$coptL=$c11l;$copta=$c11a;$coptb=$c11b;}
if ($dc1200==$cmin){ $copt='12';$coptD=$c12dd;$coptL=$c12l;$copta=$c12a;$coptb=$c12b;}
if ($dc1300==$cmin){ $copt='13';$coptD=$c13dd;$coptL=$c13l;$copta=$c13a;$coptb=$c13b;}
if ($dc1400==$cmin){ $copt='14';$coptD=$c14dd;$coptL=$c14l;$copta=$c14a;$coptb=$c14b;}
if ($dc1500==$cmin){ $copt='15';$coptD=$c15dd;$coptL=$c15l;$copta=$c15a;$coptb=$c15b;}
if ($dc1600==$cmin){ $copt='16';$coptD=$c16dd;$coptL=$c16l;$copta=$c16a;$coptb=$c16b;}
if ($dc1700==$cmin){ $copt='17';$coptD=$c17dd;$coptL=$c17l;$copta=$c17a;$coptb=$c17b;}
if ($dc1800==$cmin){ $copt='18';$coptD=$c18dd;$coptL=$c18l;$copta=$c18a;$coptb=$c18b;}
if ($dc1900==$cmin){ $copt='19';$coptD=$c19dd;$coptL=$c19l;$copta=$c19a;$coptb=$c19b;}
if ($dc2000==$cmin){ $copt='20';$coptD=$c20dd;$coptL=$c20l;$copta=$c20a;$coptb=$c20b;}
if ($dc2100==$cmin){ $copt='21';$coptD=$c21dd;$coptL=$c21l;$copta=$c21a;$coptb=$c21b;}
if ($dc2200==$cmin){ $copt='22';$coptD=$c22dd;$coptL=$c22l;$copta=$c22a;$coptb=$c22b;}
if ($dc2300==$cmin){ $copt='23';$coptD=$c23dd;$coptL=$c23l;$copta=$c23a;$coptb=$c23b;}
if ($dc2400==$cmin){ $copt='24';$coptD=$c24dd;$coptL=$c24l;$copta=$c24a;$coptb=$c24b;}
if ($dc2500==$cmin){ $copt='25';$coptD=$c25dd;$coptL=$c25l;$copta=$c25a;$coptb=$c25b;}
if ($dc2600==$cmin){ $copt='26';$coptD=$c26dd;$coptL=$c26l;$copta=$c26a;$coptb=$c26b;}
if ($dc2700==$cmin){ $copt='27';$coptD=$c27dd;$coptL=$c27l;$copta=$c27a;$coptb=$c27b;}
if ($dc2800==$cmin){ $copt='28';$coptD=$c28dd;$coptL=$c28l;$copta=$c28a;$coptb=$c28b;}
if ($dc2900==$cmin){ $copt='29';$coptD=$c29dd;$coptL=$c29l;$copta=$c29a;$coptb=$c29b;}
if ($dc3000==$cmin){ $copt='30';$coptD=$c30dd;$coptL=$c30l;$copta=$c30a;$coptb=$c30b;}
?>
<table width="200" border="1" align="center">
<tr>
<?php // content="text/plain; charset=utf-8"
require_once ('../jpgraph/jpgraph_plotline.php');
?>
<td>
<div align="center">
<?php // content="text/plain; charset=utf-8"
unlink('scatterC.png');
require_once ('../jpgraph/jpgraph.php');
require_once ('../jpgraph/jpgraph_scatter.php');
$datax = array($c1dd,$c2dd,$c3dd,$c4dd,$c5dd,$c6dd,$c7dd,$c8dd,$c9dd,$c10dd,$c11dd,$c12dd,$c13dd,$c14dd,$c15dd,$c16dd,$c17dd,$c18dd,$c19dd,$c20dd,$c21dd,$c22dd,$c23dd,$c24dd,$c25dd,$c26dd,$c27dd,$c28dd,$c29dd,$c30dd);
$datay = array($dc176,$dc276,$dc376,$dc476,$dc576,$dc676,$dc776,$dc876,$dc976,$dc1076,$dc1176,$dc1276,$dc1376,$dc1476,$dc1576,$dc1676,$dc1776,$dc1876,$dc1976,$dc2076,$dc2176,$dc2276,$dc2376,$dc2476,$dc2576,$dc2676,$dc2776,$dc2876,$dc2976,$dc3076);
$dataxT = array($coptD,$cdm);
$datayT = array($cmin,$dec00);
$graph = new Graph(300,200);
$graph->SetScale("linint",0,8,0,0);
$graph->img->SetMargin(40,40,40,40);
$graph->SetShadow();
$graph->title->Set("C scatter plot");
$graph->title->SetFont(FF_FONT1,FS_BOLD);
//$graph->xgrid->Show();
$sp1 = new ScatterPlot($datayT,$dataxT);
$sp1->mark->SetType(MARK_SQUARE);
$sp1->SetImpuls();
$sp2 = new ScatterPlot($datay,$datax);
$sp2->SetLinkPoints(true,$ch1C3,2);
$sp2->mark->SetType(MARK_FILLEDCIRCLE);
$sp2->mark->SetFillColor($ch1C3);
$sp2->mark->SetWidth(3);
$sline = new PlotLine(HORIZONTAL,1.5,'black');
$sline2 = new PlotLine(HORIZONTAL,2.5,'#00ccff');
$sline3 = new PlotLine(HORIZONTAL,4.5,'#ff9900');
$graph->Add($sline);
$graph->Add($sline2);
$graph->Add($sline3);
$graph->Add($sp1);
$graph->Add($sp2);
$graph->Stroke('scatterC.png');
unlink('scatterGuC.png');
//unlink('graphLC.gif');
require_once ('../jpgraph/jpgraph.php');
require_once ('../jpgraph/jpgraph_scatter.php');
require_once ('../jpgraph/jpgraph_mgraph.php');
//${'s'.($minGroupRid-1).'a'
$dataxC = array($Ta);
$datayC = array($Tb);
//$dataCL = array($cl);
$dataxCf = array($Ta+0.5);
$datayCf = array($Tb+0.7);
$datayCdeg = array($degCT);
$dataxCo = array($copta);
$datayCo = array($coptb);
$dataxCOH =array($coptHa);
$datayCOH =array($coptHb);
$dataxCOX =array($coptXa);
$datayCOX =array($coptXb);
$dataxCm = array($cam);
$datayCm = array($cbm);
$datax3 = array($hexCa3,$hexCa6,$hexCa9,$hexCa12,$hexCa15,$hexCa18,$hexCa21,$hexCa24,$hexCa27,$hexCa30);
$datay3 = array($hexCb3,$hexCb6,$hexCb9,$hexCb12,$hexCb15,$hexCb18,$hexCb21,$hexCb24,$hexCb27,$hexCb30);
$dataD3 = array(1.2,1.3,1.4,1.5,1.6,1.7,1.8,1.9,2.0,2.1);
$graph = new Graph(220,220);
//$graph->SetScale("linlin",-58,-46,-38,-30);
$graph->SetScale("linlin");
$graph->SetAxisStyle(AXSTYLE_BOXIN);
$graph->yscale->ticks->Set(1);
$graph->xscale->ticks->Set(1);
$graph->img->SetMargin(30,20,20,20);
//$graph->title->SetFont(FF_FONT1,FS_BOLD);
$graph->SetBackgroundImage("LabG.png",2);
$graph->SetBackgroundImageMix(100);
$graph->xaxis->title->Set("a*");
$graph->yaxis->title->Set("b*");
// Format the legend box
$graph->legend->SetColor('navy');
//$graph->legend->SetFillColor('lightgreen');
$graph->legend->SetLineWeight(1);
//$graph->legend->SetFont(FF_ARIAL,FS_BOLD,8);
//$graph->legend->SetShadow('[email protected]',3);
//$graph->legend->SetAbsPos(15,120,'right','bottom');
$graph->legend->SetPos(0.1,0.1,'right','top');
$sp3 = new ScatterPlot($datay3,$datax3);
$sp3->mark->SetType(MARK_FILLEDCIRCLE);
$sp3->mark->SetFillColor("#55bbdd");
$sp3->mark->SetWidth(3);
$sp3->link->Show();
$sp3->link->SetWeight(2);
$sp3->link->SetColor('[email protected]');
//$sp3->value->Show($dataD3);
$spC = new ScatterPlot($datayC,$dataxC);
$spC->mark->SetWidth(8);
$spC->mark->SetType(MARK_IMG_MBALL,'green');
//$spC->SetLegend('Target');
//$graph->legend->SetShadow('[email protected]',5);
//$spC->value->Show();
//$spC->SetLegend('Target');
//$spC->SetColor("red");
//$spC->mark->SetType(MARK_IMG_MBALL,5,0.6);
$spCm = new ScatterPlot($datayCm,$dataxCm);
$spCm->mark->SetType(MARK_IMG_MBALL,'red');
$spCm->mark->SetWidth(8);
//$spCm->value->Show();
//$spCm->SetLegend('Sample');
$spCo = new ScatterPlot($datayCo,$dataxCo);
$spCo->mark->SetType(MARK_IMG_STAR,'green');
$spCo->mark->SetWidth(8);
//$spCo->SetLegend('Best de');
$spCOH = new ScatterPlot($datayCOH,$dataxCOH);
$spCOH->mark->SetType(MARK_IMG_STAR,'pink');
$spCOH->mark->SetWidth(8);
//$spCOH->SetLegend('Best Hue');
$spCOX = new ScatterPlot($datayCOX,$dataxCOX);
$spCOX->mark->SetType(MARK_IMG_STAR,'purple');
$spCOX->mark->SetWidth(8);
// Setup the field plot
$fp = new FieldPlot($datayCf,$dataxCf,$datayCdeg);
$fp->arrow->SetSize(40,2);
$fp->arrow->SetColor('navy');
$graph->Add($sp3);
$graph->Add($spCOH);
$graph->Add($spCOX);
$graph->Add($spC);
$graph->Add($spCo);
$graph->Add($spCm);
$graph->Add($fp);
$mgraph = new MGraph();
$mgraph->SetImgFormat('jpeg',60);
$mgraph->SetMargin(2,2,2,2);
$mgraph->SetFrame(true,'darkgray',2);
$mgraph->SetBackgroundImage('LabC.jpg');
//$mgraph->AddMix($sp3,0,0,85);
//$mgraph->AddMix($graph2,0,250,85);
//$graph->Add($mgraph);
$graph->Stroke('scatterGuC.png');
// include 'graphFixL.php';
//echo "<br>clm-TL:".$cLm."__".$TL;
//GenGraphLC($cLm-$TL,$coptL-$TL,$coptXL-$TL,$coptHL-$TL);
$cminH=de76($TL,$Ta,$Tb,$coptHL,$coptHa,$coptHb);
$cminX=de76($TL,$Ta,$Tb,$coptXL,$coptXa,$coptXb);
$cminL=de76($TL,$Ta,$Tb,$coptLL,$coptLa,$coptLb);
$chromeO=pow((pow($copta,2)+pow($coptb,2)),0.5);
$hueO=atan2($coptb,$copta);
$degO = ($hueO/M_PI*180) + ($hueO > 0 ? 0 : 360);
$chromeX=pow((pow($coptXa,2)+pow($coptXb,2)),0.5);
$hueX=atan2($coptXb,$coptXa);
$degX = ($hueX/M_PI*180) + ($hueX > 0 ? 0 : 360);
$chromeH=pow((pow($coptHa,2)+pow($coptHb,2)),0.5);
$hueH=atan2($coptHb,$coptHa);
$degH = ($hueH/M_PI*180) + ($hueH > 0 ? 0 : 360);
$chromeL=pow((pow($coptLa,2)+pow($coptLb,2)),0.5);
$hueL=atan2($coptLb,$coptLa);
$degL = ($hueL/M_PI*180) + ($hueL > 0 ? 0 : 360);
?>
<img src="scatterC.png?nocache=<?php echo time(); ?>"></div>
</td>
<td><div><img src="scatterGuC.png?nocache=<?php echo time(); ?>"> </div>
</td>
<td><div><img src="notion.jpg?nocache=<?php echo time(); ?>"> </div>
</td>
</tr>
</table>
<table width="700" border="1" align="center">
<tr>
<td><div align="center"> </div></td>
<td>density</td>
<td>ΔEab</td>
<td>ΔE00</td>
<td>Δch</td>
<td>Δh</td>
<td>ΔL</td>
<td>L</td>
<td>a</td>
<td>b</td>
<td>Chrome</td>
<td>Hue</td>
</tr>
<tr>
<td><div align="center"> 目標值</div></td>
<td></td>
<td></td>
<td>
<td></td>
<td></td>
<td></td>
<td><?php echo $TL;?></td>
<td><?php echo $Ta;?></td>
<td><?php echo $Tb;?></td>
<td><?php echo round($chromeT,2);?></td>
<td><?php echo round($degT,2);?></td>
</tr>
<tr bgcolor="#FFFDA4">
<td><div align="center">量測濃度</div></td>
<td bgcolor="#FFFDA4"><?php echo round($cdm,2);?> </div></td>
<td><?php echo round($dc76,2);?> </div></td>
<td><?php echo round($dc00,2);?> </div></td>
<td><?php echo round($chrome-$chromeT,2);?></a></div></td>
<td><?php echo round($deg-$degT,2);?></a></div></td>
<td><?php echo round($cLm-$TL,2);?></a></div></td>
<td><?php echo $cLm;?></td>
<td><?php echo $cam;?></td>
<td><?php echo $cbm;?></td>
<td><?php echo round($chrome,2);?></td>
<td><?php echo round($deg,2);?></td>
</tr>
<tr bgcolor="#ffffff">
<td><div align="center">最佳色差濃度</div></td>
<td bgcolor="#CCCCCC"><?php echo round($coptD,2);?> </div></td>
<td bgcolor="#9bf9a6"><?php echo round($cmin,2);?> </div></td>
<td bgcolor="#9bf9a6"><?php echo round($cmin00,2);?> </div></td>
<td><?php echo round($chromeO-$chromeT,2);?></a></div></td>
<td><?php echo round($degO-$degT,2);?></a></div></td>
<td><?php echo round($coptL-$TL,2);?></a></div></td>
<td><?php echo $coptL;?></td>
<td><?php echo $copta;?></td>
<td><?php echo $coptb;?></td>
<td><?php echo round($chromeO,2);?></td>
<td><?php echo round($degO,2);?></td>
</tr>
<tr bgcolor="#ffffff">
<td><div align="center">最佳飽和度濃度</div></td>
<td bgcolor="#CCCCCC"><?php echo round($coptXD,2);?> </div></td>
<td><?php echo round($cminX,2);?> </div></td>
<td>
<td bgcolor="#9bf9a6"><?php echo round($chromeX-$chromeT,2);?></a></div></td>
<td><?php echo round($degX-$degT,2);?></a></div></td>
<td><?php echo round($coptXL-$TL,2);?></a></div></td>
<td><?php echo $coptXL;?></td>
<td><?php echo $coptXa;?></td>
<td><?php echo $coptXb;?></td>
<td><?php echo round($chromeX,2);?></td>
<td><?php echo round($degX,2);?></td>
</tr>
<tr bgcolor="#ffffff">
<td><div align="center">最佳色相差濃度</div></td>
<td bgcolor="#CCCCCC"><?php echo round($coptHD,2);?> </div></td>
<td><?php echo round($cminH,2);?> </div></td>
<td>
<td><?php echo round($chromeH-$chromeT,2);?></a></div></td>
<td bgcolor="#9bf9a6"><?php echo round($degH-$degT,2);?></a></div></td>
<td><?php echo round($coptHL-$TL,2);?></a></div></td>
<td><?php echo $coptHL;?></td>
<td><?php echo $coptHa;?></td>
<td><?php echo $coptHb;?></td>
<td><?php echo round($chromeH,2);?></td>
<td><?php echo round($degH,2);?></td>
</tr>
<tr bgcolor="#ffffff">
<td><div align="center">最佳亮度差濃度</div></td>
<td bgcolor="#CCCCCC"><?php echo round($coptLD,2);?> </div></td>
<td><?php echo round($cminH,2);?> </div></td>
<td>
<td><?php echo round($chromeL-$chromeT,2);?></a></div></td>
<td><?php echo round($degL-$degT,2);?></a></div></td>
<td bgcolor="#9bf9a6"><?php echo round($coptLL-$TL,2);?></a></div></td>
<td><?php echo $coptLL;?></td>
<td><?php echo $coptLa;?></td>
<td><?php echo $coptLb;?></td>
<td><?php echo round($chromeL,2);?></td>
<td><?php echo round($degL,2);?></td>
</tr>
<table width="200" border="1" align="center">
<tr>
<td><div align="center"> id<?php echo $sNo;?></div></td>
<td><font color="#666666">P</td>
<td><font color='<?php if ($dc76>3){echo "red";}else {echo "black";}?>'>S</td>
<td></td>
<td><font color='<?php if ((abs($dgl)>2)){echo "red";}else {echo "black";}?>'>GL</td>
<td><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'>Ga</td>
<td><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'>Gb</td>
</tr>
<tr bgcolor="#aaaaaa">
<td><div align="center">色差</div></td>
<td bgcolor="#CCCCCC"><font color='<?php if ($dp76>3){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($PLm,0).",".round($Pam,0).",".round($Pbm,0);?>"><?php echo round($dp76,2);?></a> </div></td>
<td font color='<?php if ($dc00>3.5){echo "red";}else {echo "black";}?>'><div align="right"><a href=" " title="<?php echo round($cLm,0).",".round($cam,0).",".round($cbm,0);?>"><?php if ($dc00>3.5) {$sum=$sum-$dc00;} else {$sum=$sum-0;} echo round($dc00,2);?></a> </div></td>
<td bgcolor="#ffffff">d</td>
<td><div align="right"><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'><a href=" " title="<?php echo round($df,2);?>"><?php $sum=$sum-$df*6; $sum=$sum-abs($oDL)*2; echo round($oDL,2);?></a></div></td>
<td><div align="right"><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'><?php echo round($oDa,2);?></div></td>
<td><div align="right"><font color='<?php if ($df>3){echo "red";}else {echo "black";}?>'><?php echo round($oDb,2);?></div></td>
</tr>
<tr>
<td><div align="center">量測濃度</div></td>
<td bgcolor="#CCCCCC"></td>
<td><div align="right"><font color='<?php if ($dc76>3){echo "red";}else {echo "black";}?>'><?php echo round($cdm,2);?></div></td>
<td>量測</td>
<td bgcolor="#00FFFF"><div align="right"><font color='<?php if (abs($dgl)>2){echo "red";}else {echo "black";}?>'><?php $sum=$sum-$dgl*2;echo round($cLm,2);?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo round($cam,2);?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo round($cbm,2);?></div></td>
</tr>
<tr>
<td><div align="center">預測濃度</div></td>
<td bgcolor="#CCCCCC"></td>
<td><div align="right"><?php echo round($coptD,2);?></div></td>
<td>預測</td>
<td bgcolor="#00FFFF"><div align="right"><?php echo $coptL;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo $copta;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo $coptb;?></div></td>
</tr>
<tr>
<td><div align="center">最佳色差</div></td>
<td bgcolor="#CCCCCC"></td>
<td bgcolor="#9bf9a6"><div align="right"><?php if ($cmin00>3.5) {?><font color="red"><?php } echo round($cmin00,2);?></div></td>
<td>目標</td>
<td bgcolor="#00FFFF"><div align="right"><?php echo $targetL;?></div></td>
<td bgcolor="#FF99FF"><div align="right"><?php echo $targeta;?></div></td>
<td bgcolor="#FFFF99"><div align="right"><?php echo $targetb;?></div></td>
</tr>
<?php
$chromeO=pow((pow($copta,2)+pow($coptb,2)),0.5);
$hueO=atan2($coptb,$copta);
$degO = ($hueO/M_PI*180) + ($hueO > 0 ? 0 : 360);
$chromede=$chromeO-$chromeT;
$huede=$degO-$degT;
//echo "<br>chromeO:".$chromeO;
//echo "<br>hueO:".$degO;
//echo "<br>opt DLab:".$coptD."_".$coptL."_".$copta."_".$coptb;
?>
<tr>
<td>dL</td>
<td>
<td>dC</td>
<td>dh</td>
<td><div align="right"><?php echo round($targetL-$coptL,2);?></div></td>
<td><div align="right"><?php echo round($chromede,2);?></div></td>
<td><div align="right"><?php echo round($huede,2);?></div></td>
</tr>
</table>
<br><br>
<tr>
<td align="center"><font size="-2"> © <a href="mailto:[email protected]">Fred Kuo</a>, 2015. All rights reserved.<br><a href="http://www.fredkuo.idv.tw/wordpress/?p=1025">Read more.</a><br>
</td>
</tr>
</body>
</html>