SDS/SDS_status_main.php

<?php

    // display network localization
    if ($onsite) placeBox(-135, 1190, "Inside KIT CN network", 250, 2, "#DDDDDD");
    if (substr($ip, 0, 7) == "134.107") placeBox(25, 10, "MPP Munich network", 250, 2, "#FFFFFF");
    if (substr($ip, 0, 7) == "128.176") placeBox(25, 10, "WWU Muenster network", 250, 2, "#FFFFFF");

    // #####  global variable for PS and MS operation mode
    $PSmode = $adeiValue[32][0];
    $MSmode = $adeiValue[33][0];

    $tol = 0.5;

    $local = false;
    if (substr($ip, 0, 13) == "141.52.12.52")
    {
        placeBox(-60, 1190, "local dev computer", 250, 2, "#FFFFFF");
        $local = true;
        $MSmode = 5;
    }

    // ########## PS PCS7 operation mode ##########
    $OpModeText = "PS mode: ";
    $color = "#FFFFFF";
    if ($PSmode == 0)
    {
        $OpModeText = $OpModeText . " commissioning";
        $color = "#FFA0A0";
    }
    else if ($PSmode == 1) $OpModeText = $OpModeText . $PSmode . " pump down";
    else if ($PSmode == 2) $OpModeText = $OpModeText . $PSmode . " venting";
    else if ($PSmode == 3) $OpModeText = $OpModeText . $PSmode . " pumping";
    else if ($PSmode == 4) $OpModeText = $OpModeText . $PSmode . " baking";
    else if ($PSmode == 5)
    {
        $OpModeText = $OpModeText . $PSmode . " high voltage";
        $color = "#B0FFB0";
    }
    placeBox(-110, 1190, $OpModeText, 250, 2, $color);

    // ########## PS PCS7 operation mode ##########
    $OpModeText = "MS mode: ";
    $color = "#FFFFFF";
    if ($MSmode == 0)
    {
        $OpModeText = $OpModeText . " commissioning";
        $color = "#FFA0A0";
    }
    else if ($MSmode == 1) $OpModeText = $OpModeText . $PSmode . " pump down";
    else if ($MSmode == 2) $OpModeText = $OpModeText . $PSmode . " venting";
    else if ($MSmode == 3) $OpModeText = $OpModeText . $PSmode . " pumping";
    else if ($MSmode == 4) $OpModeText = $OpModeText . $PSmode . " baking";
    else if ($MSmode == 5)
    {
        $OpModeText = $OpModeText . $PSmode . " high voltage";
        $color = "#B0FFB0";
    }
    placeBox(-85, 1190, $OpModeText, 250, 2, $color);

    // ########## VALVES ##########
    // V4
    $value = $adeiValue[36][1];
    $clearance = $adeiValue[36][0];
    $pic = "valve";
    $V4_open = false;
    if (($value == 1) && ($clearance == 1))
    {
        $pic = $pic . "On";
        $V4_open = true;
    }
    else if (($value == 0) && ($clearance == 0)) $pic = $pic . "Off";
    else if (($value == 0) && ($clearance == 1)) $pic = $pic . "FREE";
    else if (($value == 1) && ($clearance == 0)) $pic = $pic . "Error";
    placePicWithLink(303, 60, $pic . ".png", 30, "status CPS-PS gate vlave V4 &#10;purple: clearance to open, red: no clearance, grey: undefined", $adeiChannel[36][0] . "," . $adeiChannel[36][1]);

    // PS-MS flapper valve VMO 4110
    $value_open = $adeiValue[9][8];
    $value_closed = $adeiValue[9][9];
    $pic = "valve";
    if (($value_open == 1) && ($value_closed == 0)) $pic = $pic . "On";
    else if (($value_open == 0) && ($value_closed == 1)) $pic = $pic . "Off";
    placePicWithLink(303, 283, $pic . ".png", 30, "status PS-MS beam-line gate valve VMO-4110 &#10;green: open, red: closed, grey: undefined", $adeiChannel[9][8] . "," . $adeiChannel[9][9]);

    // FPD gate valve
    $value = $adeiValue[36][2];
    $clearance = $adeiValue[31][0];
    $pic = "valve";
    if (($value == 1) && ($clearance == 1)) $pic = $pic . "On";
    else if (($value == 0) && ($clearance == 0)) $pic = $pic . "Off";
    else if (($value == 0) && ($clearance == 1)) $pic = $pic . "FREE";
    else if (($value == 1) && ($clearance == 0)) $pic = $pic . "Error";
    placePicWithLink(303, 1466, $pic . ".png", 30, "status FPD beam-line gate valve&#10;green: open, red: closed, grey: undefined", $adeiChannel[36][2] . "," . $adeiChannel[31][0]);

    // ########## MAGNETS ##########
    // CPS
    $NlCPS = 20550 / 0.9133;
    $BfieldCPS = 1.26e-6 * $adeiValue[24][0] * $NlCPS; // mu0 * I * N/l
    if ($BfieldCPS < 0.1)
    {
        $value = "OFF";
        $color = "#FF0000";
    }
    else
    {
        $value = sprintf('%.1F T', $BfieldCPS);
        $color = "#000000";
    }
    placeTextWithLink(240, 2, $value, 60, 5, $color, "field of CPS behind separation wall derived from current", $adeiChannel[24][0]);
    placeText(265, 2, "CPS", 60, 2, "#000000");

    // PS1
    if ($adeiValue[3][3] == 0)
    {
        $value = "LEM";
        $color = "#FF0000";
    }
    else
    {
        $value = sprintf('%.1F T', $adeiValue[3][1] / 157.0 * 4.5);
        $color = "#000000";
    }
    placeTextWithLink(240, 66, $value, 70, 5, $color, "stand-alone center field PS1 magnet", $adeiChannel[3][1]);
    placeText(265, 66, "PS1", 70, 2, "#000000");

    // PS2
    if ($adeiValue[3][2] == 0)
    {
        $value = "LEM";
        $color = "#FF0000";
    }
    else
    {
        $value = sprintf('%.1F T', $adeiValue[3][0] / 157.0 * 4.5);
        $color = "#000000";
    }
    placeTextWithLink(240, 274, $value, 70, 5, $color, "stand-alone center field PS2 magnet", $adeiChannel[3][0]);
    placeText(265, 274, "PS2", 70, 2, "#000000");

    // Pinch
    placeTextWithLink(240, 1420, sprintf('%.1F', $adeiValue[4][0] / 86.98 * 6.0) . " T", 70, 5, "#000000", "stand-alone center field PCH magnet", $adeiChannel[4][0]);
    placeText(265, 1420, "PCH", 70, 2, "#000000");

    // Detector
    placeTextWithLink(240, 1495, sprintf('%.1F', $adeiValue[4][1] / 93.59 * 6.0) . " T", 70, 5, "#000000", "stand-alone center field DET magnet", $adeiChannel[4][1]);
    placeText(265, 1495, "DET", 70, 2, "#000000");

    // ########## PAE ##########
    placeTextWithLink(303, 1553, sprintf('%.1F', $adeiValue[6][2]) . " kV", 90, 5, "#000000", "PAE potential", $adeiChannel[6][2]);
    placeText(328, 1553, "PAE", 90, 2, "#000000");

    // ########## PUMP PORTS ##########
    placeText(416, 1623, "PP2", 50, 2, "#000000");
    placeText(466, 1623, "PP1", 50, 2, "#000000");
    placeText(516, 1623, "PP3", 50, 2, "#000000");

    // ########## BAFFLE ##########
    $max = array(
        90,
        94,
        88
    );

    $time_conversion_factor = 621355968000000000; // conversion for PCS7 .NET value;
    $timestamp = ($adeiValue[15][8] - $time_conversion_factor) / 10000000;
    echo '<br><font size="4" color="#000000">&nbsp;Baffle timestamp: ' . date("r", $timestamp) . ' </font><br>';

    //placeText(560, 1395, "LN<sub>2</sub> Tank", 130, 5, "#000000");
    $link = $adeiChannel[15][6] . "," . $adeiChannel[15][7];
    //placePicWithLink(563,1367, "LN2tank.png", 45, "LN2 tank", $link);
    $value = $adeiValue[15][6] * 0.77 + 0.83;
    $link = $adeiChannel[15][6];
    $text = sprintf('%.0F', $value) . " %";
    //placeTextWithLink(590, 1395, $text, 70, 4, "#000000", "LN2 tank level", $link);
    $value = $adeiValue[15][7] - 1.86;
    $link = $adeiChannel[15][7];
    $text = sprintf('%.1F', $value) . " bar";
    //placeTextWithLink(590, 1450, $text, 70, 4, "#000000", "LN2 tank pressure", $link);
    for ($id = 0;$id < 3;$id++)
    {
        $value = $adeiValue[15][$id];
        $pic = "ice.png";
        $text = "---";

        if ($value < 800)
        {
            $text = sprintf('%.0F', $value) . " K";
            if ($value > $max[$id]) $pic = "iceOff.png";
            else
            {
                $value = $adeiValue[15][$id + 3];
                if ($value > 0.1 && $value < 100.0) $pic = "iceOn.png";
                else $pic = "iceBlink.gif";
            }
        }

        $pos = $id;
        if ($id == 0) $pos = 1;
        else if ($id == 1) $pos = 0;

        $link = $adeiChannel[15][$id] . "," . $adeiChannel[15][$id + 3];
        placePicWithLink(410 + $pos * 50, 1375, $pic, 30, "status baffle PP" . ($id + 1) . "&#10;blue: cooled, red: warmed, blinking: warming, grey: undefined", $link);
        placeTextWithLink(437 + $pos * 50, 1355, $text, 70, 4, "#000000", "temperature baffle PP" . ($id + 1) , $link);
    }

    // ########## PRESSURES ##########
    // CC2320
    $value = $adeiValue[7][0];
    $pic = "cc";
    $text = "---";
    if ($value > 1E+2)
    {
        $pic = $pic;
        $text = "OFF";
    }
    else if ($value > 2E-5)
    {
        $pic = $pic . "Off";
        $text = "high";
    }
    else if ($value <= 1E-4 && $value >= 1.334E-11)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    else if ($value < 1.334E-11)
    {
        $text = "LOW";
    }
    placePicWithLink(410, 1435, $pic . ".png", 30, "status cold cathode gauge CC2320&#10;green: on, red: off, grey: undefined", $adeiChannel[7][0]);
    placeTextWithLink(439, 1415, $text, 70, 4, "#000000", "pressure [mbar] cold cathode gauge CC2320", $adeiChannel[7][0]);

    $time_conversion_factor = 621355968000000000; // conversion for PCS7 .NET value;
    $timestamp = ($adeiValue[7][8] - $time_conversion_factor) / 10000000;
    echo '<font size="4" color="#000000">&nbsp;Vacuum timestamp: ' . date("r", $timestamp) . ' </font><br>';

    // CC2345
    $value = $adeiValue[7][7];
    $pic = "cc";
    $text = "---";
    if ($value > 1E-4)
    {
        $pic = $pic . "Off";
        $text = "OFF";
    }
    else if ($value <= 1E-4 && $value >= 1.334E-11)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    else if ($value < 1.334E-11)
    {
        $text = "LOW";
    }
    placePicWithLink(427, 1482, $pic . ".png", 30, "status cold cathode gauge CC2345&#10;green: on, red: off, grey: undefined", $adeiChannel[7][7]);
    placeTextWithLink(406, 1462, $text, 70, 4, "#000000", "pressure [mbar] cold cathode gauge CC2345", $adeiChannel[7][7]);

    // Ex3110
    $value = $adeiValue[8][0];
    $pic = "ex";
    $text = "---";
    if ($value > 2E-5)
    {
        $text = "OFF";
        {
            if ($MSmode < 5) $pic = $pic . "Off";
            else $pic = $pic;
        }
    }
    else if ($value <= 2E-5 && $value > 1E-12)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    placePicWithLink(510, 1435, $pic . ".png", 30, "status extractor ion gauge Ex3110&#10;green: on, red: off, grey: undefined", $adeiChannel[8][0]);
    placeTextWithLink(539, 1415, $text, 70, 4, "#000000", "pressure [mbar] extractor ion gauge Ex3110", $adeiChannel[8][0]);

    // Ex1110
    $value = $adeiValue[28][0];
    $link = $adeiChannel[28][0];
    $pic = "ex";
    $text = "---";
    if ($value > 2E-5)
    {
        $text = "OFF";
        {
            if ($MSmode < 5) $pic = $pic . "Off";
            else $pic = $pic;
        }
    }
    else if ($value <= 2E-5 && $value > 1E-12)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    placePicWithLink(460, 1435, $pic . ".png", 30, "status extractor ion gauge Ex1110&#10;green: off, blinking: on, grey: undefined", $link);
    placeTextWithLink(489, 1415, $text, 70, 4, "#000000", "pressure [mbar] extractor ion gauge Ex1110", $link);

    // Ex0096
    $value = $adeiValue[9][2];
    $link = $adeiChannel[9][2];
    $pic = "ex";
    $text = "---";
    if ($value > 1E+2)
    {
        $text = "OFF";
        {
            if ($MSmode < 5) $pic = $pic . "Off";
            else $pic = $pic;
        }
    }
    else if ($value > 2E-5)
    {
        $pic = $pic . "Off";
        $text = "OFF";
    }
    else if ($value <= 2E-5 && $value > 1E-12)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    placePicWithLink(230, 1220, $pic . ".png", 30, "status extractor ion gauge 0096&#10;green: off, blinking: on, grey: undefined", $link);
    placeTextWithLink(259, 1200, $text, 70, 4, "#000000", "pressure [mbar] extractor ion gauge 0096", $link);

    // CC FPD
    $value = $adeiValue[6][1];
    $pic = "cc";
    $text = "---";
    if ($value > 1E-4)
    {
        $pic = $pic . "Off";
        $text = "OFF";
    }
    if ($value < 1E-11)
    {
        $pic = $pic . "Off";
        $text = "OFF";
    }
    else if ($value <= 1E-4 && $value > 1E-12)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    placePicWithLink(188, 1475, $pic . ".png", 30, "status FPD cold cathode gauge&#10;green: on, red: off, grey: undefined", $adeiChannel[6][1]);
    placeTextWithLink(217, 1455, $text, 70, 4, "#000000", "pressure [mbar] FPD cold cathode gauge", $adeiChannel[6][1]);

    // Gauge Baffle
    $value = $adeiValue[5][0];
    $link = $adeiChannel[5][0];
    $color = "#000000";
    $pic = "gauge";
    $text = "---";
    if ($value > 1E-4)
    {
        $pic = $pic . "Off";
        $text = "OFF";
    }
    // standard cold blue "#0026FF"  ,  ice cold blue "#107BC7"
    if ($value < 2E-6 && $value > 1E-9)
    {
        $pic = "gaugeOn";
        $color = "#107BC7";
        $text = sprintf('%.1E', $value);
    }
    else if ($value >= 1E-6 && $value < 1e-1)
    {
        $pic = "gaugeOff";
        $color = "FF0000";
        $text = sprintf('%.1E', $value);
    }

    placePicWithLink(460, 1315, $pic . ".png", 30, "status baffle insulation vacuum gauge&#10;gray: off, green: on, red: too high&#10Should be < 5e-6 mbar for HV operation!!!", $link);
    placeTextWithLink(460 + 29, 1295, $text, 70, 4, $color, "pressure [mbar] baffle insulation vacuum gauge", $link);

    // PS CC1232
    $value = $adeiValue[27][0];
    $link = $adeiChannel[27][0];
    $pic = "cc";
    $text = "---";
    if ($value >= 9.9E-5)
    {
        $pic = $pic . "Off";
        $text = "OFF";
    }
    else if ($value < 1E-4 && $value > 1.2E-11)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    placePicWithLink(370, 240, $pic . ".png", 30, "status cold cathode gauge CC1232&#10;green: on, red: off, grey: undefined", $link);
    placeTextWithLink(399, 220, $text, 70, 4, "#000000", "pressure [mbar] cold cathode gauge CC1232", $link);

    // PS Ex1221
    $value = $adeiValue[27][5];
    $link = $adeiChannel[27][5];
    $pic = "ex";
    $text = "---";
    if ($value >= 9.9E-5)
    {
        $text = "OFF";
        {
            if ($PSmode < 5) $pic = $pic . "Off";
            else $pic = $pic;
        }
    }
    else if ($value < 1E-4 && $value > 7E-13)
    {
        $pic = $pic . "On";
        $text = sprintf('%.1E', $value);
    }
    placePicWithLink(188, 141, $pic . ".png", 30, "status extractor ion gauge Ex1221&#10;green: on, red: off, grey: undefined", $link);
    placeTextWithLink(217, 121, $text, 70, 4, "#000000", "pressure [mbar] extractor ion gauge Ex1221", $link);

    // ########## VACUUM PUMPS ##########
    // MS TMP Temperatures
    //T<sub>max</sub>
    $value = max($adeiValue[25][0], $adeiValue[25][1], $adeiValue[25][2]);
    $link = $adeiChannel[25][0] . "," . $adeiChannel[25][1] . "," . $adeiChannel[25][2];
    $color = "#000000";
    if ($value < 10) $color = "#0026FF";
    else if ($value > 50) $color = "#FF0000";
    placeTextWithLink(435, 1625, sprintf('%.1F &#176;C', $value) , 70, 3, $color, "TMP max temperature PP2", $link);

    $value = max($adeiValue[26][0], $adeiValue[26][1], $adeiValue[26][2]);
    $link = $adeiChannel[26][0] . "," . $adeiChannel[26][1] . "," . $adeiChannel[26][2];
    $color = "#000000";
    if ($value < 10) $color = "#0026FF";
    else if ($value > 50) $color = "#FF0000";
    placeTextWithLink(535, 1625, sprintf('%.1F &#176;C', $value) , 70, 3, $color, "TMP max temperature PP3", $link);

    // TMPs (PP2 + PP3)
    for ($pp = 0;$pp < 2;$pp++)
    {
        for ($id = 0;$id < 3;$id++)
        {
            $value = $adeiValue[$pp + 7][$id + 1];
            $pic = "tmp";
            $text = "---";

            if ($value < 50)
            {
                if ($MSmode < 5) $pic = $pic . "Off";
            }
            else if ($value >= 50 && $value < 500)
            {
                $text = sprintf('%.0F', $value);
                if ($value > 450)
                {
                    $value = $adeiValue[$pp + 7][$id + 4];
                    //$pic = $pic . "On";
                    if ($value == 1) $pic = $pic . "On";
                    else if ($value == 0) $pic = $pic . "Closed";
                }
                else if ($value > 240)
                {
                    $value = $adeiValue[$pp + 7][$id + 4];
                    //$pic = $pic . "On";
                    if ($value == 1) $pic = $pic . "Standby";
                    else if ($value == 0) $pic = $pic . "Standby";
                }
            }

            placePicWithLink(410 + $pp * 100, 1528 + $id * 35, $pic . ".png", 30, "status turbo-molecular pump TMP" . ($pp + 2) . ($id + 4) . "20&#10;green: on, yellow: on but isolated, red: off, grey: undefined", $adeiChannel[$pp + 7][$id + 1]);
            placeTextWithLink(439 + $pp * 100, 1518 + $id * 35, $text, 50, 4, "#000000", "rotational speed [Hz] turbo-molecular pump TMP" . ($pp + 2) . ($id + 4) . "20", $adeiChannel[$pp + 7][$id + 1]);
        }
    }

    // PS TMPs
    for ($id = 0;$id < 2;$id++)
    {
        $value = $adeiValue[27][$id + 1];
        $link = $adeiChannel[27][$id + 1];
        $pic = "tmp";
        $text = "---";

        if ($value < 50)
        {
            if ($PSmode < 5) $pic = $pic . "Off";
        }
        else if ($value >= 50 && $value < 700)
        {
            $text = sprintf('%.0F', $value);
            if ($value > 570)
            {
                $value = $adeiValue[27][$id + 3];
                //$pic = $pic . "On";
                if ($value == 1) $pic = $pic . "On";
                else if ($value == 0) $pic = $pic . "Standby";
            }
        }

        placePicWithLink(370, 157 + $id * 35, $pic . ".png", 30, "status turbo-molecular pump TMP" . (1123 - $id) . "&#10;green: on, yellow: on but isolated, red: off, grey: undefined", $link);
        placeTextWithLink(399, 148 + $id * 35, $text, 50, 4, "#000000", "rotational speed [Hz] turbo-molecular pump TMP" . (1123 - $id) , $link);
    }

    // FPD CP
    $value = $adeiValue[6][3];
    $pic = "cp";
    $text = "---";

    if ($value > 20)
    {
        $pic = $pic . "Off";
    }
    else if ($value <= 20 && $value > 5)
    {
        $text = sprintf('%.0F K', $value);
        $value = $adeiValue[6][12];
        if ($value == 1)
        {
            $pic = $pic . "On";
        }
        else if ($value == 0)
        {
            $pic = $pic . "Standby";
        }
    }

    placePicWithLink(368 - 30, 1475, $pic . ".png", 30, "status FPD UHV cryo pump&#10;green: on, yellow: on but isolated, red: off, grey: undefined", $adeiChannel[6][3]);
    placeTextWithLink(368, 1455, $text, 70, 3, "#000000", "temperature FPD UHV cryo pump", $adeiChannel[6][3]);

    // ########## FPD SOURCES ##########
    $pic = "source";
    $text = "---";
    if ($adeiValue[6][9] == 1 && $adeiValue[6][10] == 1)
    {
        $pic = $pic . "On";
        $text = "OUT";
    }
    else if ($adeiValue[6][9] == 1 && $adeiValue[6][10] == 0)
    {
        $pic = $pic . "EIn";
        $text = "IN";
    }
    else if ($adeiValue[6][9] == 0 && $adeiValue[6][10] == 1)
    {
        $pic = $pic . "GIn";
        $text = "IN";
    }
    else if ($adeiValue[6][9] == 0 && $adeiValue[6][10] == 0)
    {
        $pic = $pic . "Off";
        $text = "IN";
    }
    $link = $adeiChannel[6][9] . "," . $adeiChannel[6][10];
    placePicWithLink(368 - 30, 1510, $pic . ".png", 30, "status FPD sources (electron and gamma source)&#10;green: retracted (out), red: inserted (in), grey: undefined", $link);
    placeTextWithLink(368, 1490, $text, 70, 3, "#000000", "status FPD sources (electron and gamma source)", $link);

    // ########## AIR COILS ##########


    // LFCS
    $tol = 0.3;
    $text = "Unkn";
    $color = "#FFD800";
    $lfcs_array_offset = 2;

    $lfcs_config = - 1; // store config for emcs later in loop
    for ($pp = 0;$pp < sizeof($aircoil_settings);$pp++)
    {
        for ($id = 0;$id < 22;$id++) // still old air coil number

        {
            $tol = abs($tol);
            if ($id == 20)
            {
                $lfcs_array_offset = - 19;
            }
            if ($id == 21)
            {
                $lfcs_array_offset = - 21;
            }
            if (abs($adeiValue[0][$id + $lfcs_array_offset] - $aircoil_settings[$pp][$id + 1]) < $tol)
            {
                if ($id == 19)
                {
                    $text = $aircoil_settings[$pp][0];
                    $lfcs_config = $pp;
                    $color = "#FF9300";
                }
                if ($id == 21)
                {
                    $color = "#4CFF00";
                }
            }
            else break;
        }
        if ($lfcs_config > - 1) break;
    }
    if ($text == "All Off")
    {
        $text = "OFF";
        $color = "#FF0000";
    }

    $mace_setting["LFCS"] = $text;
    placeText(-15, 232, "LFCS", 85, 5, "#000000");
    placeBox(10, 230, $text, 85, 3, $color);

    // EMCS
    $tol = 0.2;
    $text = "???";
    $color = "#FFD800";
    $EMCShor = $aircoil_settings[$lfcs_config][21];
    $EMCSver = $aircoil_settings[$lfcs_config][22];

    if ($adeiValue[0][0] > $EMCSver - $tol && $adeiValue[0][0] < $EMCSver + $tol && $adeiValue[0][1] > $EMCShor - $tol && $adeiValue[0][1] < $EMCShor + $tol)
    {
        $text = "On OK";
        $color = "#4CFF00";
    }
    else if ($adeiValue[0][0] > $tol || $adeiValue[0][1] > $tol)
    {
        $text = "Unkn";
        $color = "#FFD800";
    }
    else
    {
        $text = "ERR " . $lfcs[$lfcs_config][16];
        $color = "#FF0000";
    }
    if ($adeiValue[0][0] < $tol && $adeiValue[0][1] < $tol && $adeiValue[0][0] > - $tol && $adeiValue[0][1] > - $tol)
    {
        $text = "OFF";
        $color = "#FF0000";
    }

    $mace_setting["EMCS"] = $text;
    placeText(50, 232, "EMCS", 85, 5, "#000000");
    placeBox(75, 230, $text, 85, 3, $color);

    // print current values
    $tol = 0.5;
    for ($coil = 0;$coil < 22;$coil++)
    {
        $current = $adeiValue[0][$coil];
        $voltage = $adeiValue[1][$coil];

        $voltage = sprintf('%.1F', $voltage);

        $color = "#000000";
        if (abs($current) < $adeiValue[21][$coil] - $tol || abs($current) > $adeiValue[21][$coil] + $tol) $color = "#FF0000";
        if ($current < - $tol && $adeiValue[22][$coil] != 1) $color = "#FF0000";
        if ($current > $tol && $adeiValue[22][$coil] != 0) $color = "#FF0000";

        $current = sprintf('%.1F', $current);
        if ($current <= - 100 || $current >= 100) $current = sprintf('%.0F', $current);
        if ($current >= - 0.1 && $current <= 0.1) $current = sprintf('%.1F', 0.0);

        $vpos = - 26;
        $pos = 609 + ($coil - 4) * 42.9;
        if ($coil == 0)
        {
            $pos = 320;
            $vpos = 56;
        } // pos for EMCS VER
        else if ($coil == 1)
        {
            $pos = 378;
            $vpos = 56;
        } // pos for EMCS HOR
        else if ($coil == 21)
        {
            $pos = $pos + 4;
        } // for coil 21
        $lem = $adeiValue[2][$coil];
        $color = "#006400";
        if ($lem == 1) $current = "LEM";

        $label = ($coil - 1);
        if ($coil == 0) $label = "VER";
        else if ($coil == 1) $label = "HOR";

        // add value label
        //if ($coil == 2) {
        //  placeText($vpos+2, $pos-30, "I [A] =", 50, 2, "#888888");
        //  placeText($vpos+17, $pos-30, "U [V]  =", 47, 1, "#888888");
        //}
        // add air coil numbers here
        placeText($vpos + 32, $pos, $label, 70, 2, "#000000");

        // print voltage value of air coil
        placeTextWithLink($vpos + 18, $pos, $voltage, 70, 1, $color, "air-coil voltage [V]", $adeiChannel[1][$coil]);

        // print current value of air coil
        placeTextWithLink($vpos, $pos, $current, 70, 4, $color, "air-coil current [A]&#10;LEM: DCCT offline", $adeiChannel[0][$coil]);
    }

    // ######### HV Divider Temp Monitoring
    if ($MSmode == 5)
    { // only display in MS operation mode High-Voltage
        $K35_temp = $adeiValue[10][26];
        $K35_link = $adeiChannel[10][26];
        $K65_temp = $adeiValue[10][27];
        $K65_link = $adeiChannel[10][27];
        $divider_temp_spec = 25.0;
        $tol_div = 0.2;

        $color = "#FFFFFF";
        if (abs($K35_temp - $divider_temp_spec) > $tol_div) $color = "#FF0000";
        placeBox(586, 322, sprintf('%.1F &#176;C', $K35_temp) , 50, 2, $color);

        placePicWithLink(536, 324, "K35_drawing.png", 50, "K35 temperature status", $K35_link);

        $color = "#FFFFFF";
        if (abs($K65_temp - $divider_temp_spec) > $tol_div) $color = "#FF0000";
        placeBox(586, 378, sprintf('%.1F &#176;C', $K65_temp) , 50, 2, $color);

        placePicWithLink(536, 379, "K65_drawing.png", 50, "K65 temperature status", $K65_link);
    }

    // ########## HIGH VOLTAGE ##########
    if (($MSmode == 5) or ($MSmode == 4))
    { // only display in MS operation mode High-Voltage or baking
        // #####  path to patch panel configuration file
        if (file_exists("patchpanel/data/activeIEconfig.txt"))
        {
            $path_to_patchpanel = "patchpanel/data/activeIEconfig.txt";
        } // only for KAAS server
        else
        {
            $path_to_patchpanel = "patchpanel/ringstoadei.txt";
        } // for IKP dev server
        // load patch-panel configuration
        $handle = fopen($path_to_patchpanel, "r");

        $ringsToAdei = array();
        if ($handle)
        {
            while (($buffer = fgets($handle, 4096)) !== false)
            {
                $buffer = trim($buffer);
                $ringsToAdei[count($ringsToAdei) ] = $buffer;
            }
            fclose($handle);
        }

        // labels
        $posY = 8; // offset between labels and voltages (13)
        $posX = 10; // down/bottom (7)
        if ($MSmode == 5)
        { // only display in MS operation mode High-Voltage
            $K35_value = $adeiValue[30][0];
            $K35_link = $adeiChannel[30][0];
            $K35_TS = $adeiValue[30][1];
            $K35_RunFlag = $adeiValue[30][2];
            $K35_text = "not connected";

            $K65_value = $adeiValue[30][3];
            $K65_link = $adeiChannel[30][3];
            $K65_TS = $adeiValue[30][4];
            $K65_RunFlag = $adeiValue[30][5];

            // Kal1 = JRL at PS vessel voltage
            // Kal1 = DVM at IE Common voltage for SuperKrypton 2021
            $Kal1_value = $adeiValue[30][6];
            $Kal1_link = $adeiChannel[30][6];
            $Kal1_TS = $adeiValue[30][7];
            $Kal1_RunFlag = $adeiValue[30][8];
            $Kal1_text = "DVM @ IE Common";

            $time_conversion_factor = 2082844800;
            $most_recent_TS = max($K35_TS, $K65_TS, $Kal1_TS);
            if (max($K35_RunFlag, $K65_RunFlag, $Kal1_RunFlag) > 0)
            {
                $timestamp = ($most_recent_TS - $time_conversion_factor);
                echo '<font size="4" color="#000000">&nbsp;HV meas. timestamp: ' . date("r", $timestamp) . ' </font><br>';
            }
            else echo '<font size="4" color="#000000">&nbsp;HV meas. OFFLINE </font><br>';

            // HV switch for K35
            $hv_switch1103_k35 = $adeiValue[35][2];
            if ($hv_switch1103_k35 == 1) $K35_text = "K35 @ MoS Voltage";
            else if ($hv_switch1103_k35 == 0) $K35_text = "K35 @ MS  Voltage";
            $K35_text = "K65 @ MS Tank + IE";

            // voltage monitoring readout K35
            $color = "#000000";
            $factor_m = 1818.108;
            $factor_m_rel_error = 1.0e-6;
            $offset = 3.67e-6;
            $offset_error = 1.6e-7;
            $gain = 0.99999956;
            $gain_error = 6.5e-8;
            $value = ($K35_value - $offset) * $gain * $factor_m;
            $voltage_error = abs($value * $factor_m_rel_error * 1e3); // in mV
            if ($voltage_error * 100 < 1)
            {
                $voltage_error = 0.2;
            }

            // voltage display K35
            $link = $K35_link;
            $text = "K35 divider readout 436-REU-0-0201-0001, but connected to K65 in KNM6 at 436-REU-0-0101-0001, precision voltage value";

            if ($K35_RunFlag > 0)
            {
                placeText(342, 811, $K35_text, 140, 2, $color); // K35 voltage reading
                placeTextWithLink(320, 746, "U<sub>0</sub> = " . sprintf('%.3F', $value) . "(" . sprintf('%.0F', $voltage_error) . ") V", 270, 5, $color, $text, $link);
                if (($value < - 19724.6) & ($value > - 19724.7)) placeText(280, 796, "calibration in progress", 170, 2, "green"); // calibration ongoing

            }

            // HV switch for K65
            $hv_switch1102_k65 = $adeiValue[35][1];
            //$K65_text = "K65 @ MS Tank + IE";
            $K65_text = "K35 @ MS Tank + IE";
            //if ($hv_switch1102_k65 == 1) $K65_text = "K65 @ MoS Voltage";
            //if ($hv_switch1102_k65 == 0) $K65_text = "K65 @ MS  Voltage";
            // voltage monitoring readout K65
            $color = "#000000";
            //$factor_m = 1818.108;
            //$factor_m_rel_error = 0.02/$factor_m;
            //$offset = -4.1e-6;
            //$gain = 1.00000136;
            $factor_m = 1972.462;
            $factor_m_rel_error = 1.0e-6; // including calibration, gain and offset error
            $offset = 3.67e-6;
            $offset_error = 3.5e-7;
            $gain = 0.999999277;
            $gain_error = 9.9e-8;
            $value = ($K65_value - $offset) * $gain * $factor_m;
            $voltage_error = abs($value * $factor_m_rel_error * 1e3); // in mV
            if ($voltage_error < 1)
            {
                $voltage_error = 1;
            }

            // voltage display K65
            $link = $K65_link;
            $text = "K65 divider channel 436-REU-0-0301-0001, precision voltage value, KNM5 calibration, in 2021 connected to K35 at 436-REU-0-0201-0001";
            //$text = "K65 divider channel 436-REU-0-0301-0001, precision voltage value, KNM5 calibration, in 2021 used for 436-REU-0-0201-0001 as long as K35 is down.";
            if ($K65_RunFlag > 0)
            {
                if (($value < - 19724.6) & ($value > - 19724.7)) placeText(340, 796, "calibration in progress", 170, 2, "green"); // calibration ongoing
                placeTextWithLink(358, 746, "U<sub>0</sub> = " . sprintf('%.3F', $value) . "(" . sprintf('%.0F', $voltage_error) . ") V", 270, 5, $color, $text, $link);

                //display stability indicators
                //if ($local)

                {
                    if (sizeof($flukeE) > 2)
                    {
                        placeText(381, 811, $K65_text, 140, 2, $color); // K65 voltage reading
                        if ($flukeE[0]['ppmdev'] <= 2e-6) $color1 = "lightgreen";
                        if ($flukeE[1]['ppmdev'] <= 2e-6) $color2 = "lightgreen";
                        if ($flukeE[2]['ppmdev'] <= 2e-6) $color3 = "lightgreen";
                        if ($flukeE[3]['ppmdev'] <= 2e-6) $color4 = "lightgreen";

                        if ($flukeE[0]['ppmdev'] > 2e-6) $color1 = "orange";
                        if ($flukeE[1]['ppmdev'] > 2e-6) $color2 = "orange";
                        if ($flukeE[2]['ppmdev'] > 2e-6) $color3 = "orange";
                        if ($flukeE[3]['ppmdev'] > 2e-6) $color4 = "orange";

                        if ($flukeE[0]['ppmdev'] > 5e-6) $color1 = "#FFA0A0";
                        if ($flukeE[1]['ppmdev'] > 5e-6) $color2 = "#FFA0A0";
                        if ($flukeE[2]['ppmdev'] > 5e-6) $color3 = "#FFA0A0";
                        if ($flukeE[3]['ppmdev'] > 5e-6) $color4 = "#FFA0A0";

                        placeBox(396, 915, "10s", 35, 1, $color1);
                        placeBox(396, 880, "20s", 35, 1, $color2);
                        placeBox(396, 845, "1m", 35, 1, $color3);
                        placeBox(396, 810, "5m", 35, 1, $color4);

                        echo '<font size="4" color="#000000">&nbsp;HV status timestamp: ' . $extraction_time_HV . ' </font><br>';
                    }
                    else placeText(381, 811, $K65_text, 140, 2, $color); // K65 voltage reading

                }
            }

            // voltage monitoring readout Kal1 e.g. JRL at PS
            // in 2021 used for IE Common monitoring
            $color = "#000000";
            //$factor_m = 5000.1021;
            //$offset = 4.529e-6;
            //$gain = 0.999997525656185;
            $factor_m = 1.0;
            $offset = 0.0;
            $gain = 1.0;
            $value = ($Kal1_value - $offset) * $gain * $factor_m;
            //        $voltage_error = abs($value * 2e-3);
            $voltage_error = abs($value * 20 * 10e-6);
            //if ($voltage_error*100 < 1) { $voltage_error = 0.2; }
            if ($voltage_error * 100 < 0.002)
            {
                $voltage_error = 0.002;
            }

            // voltage display K35
            $link = $Kal1_link;
            //	$text = "JRL divider at Kal1 monitoring input 436-REU-0-0501-0001, precision voltage value";
            $text = "DVM at IE Common, 436-REU-0-0301-001, precision voltage value";

            if ($Kal1_RunFlag > 0)
            {
                placeText(304, 815, $Kal1_text, 130, 2, $color); // Kal1 voltage reading
                if (abs($value) > 36000) placeText(490, 116, "calibration in progress", 170, 2, "green"); // calibration ongoing
                placeTextWithLink(284, 765, "U<sub>IE</sub> = " . sprintf('%.3F', $value) . "(" . sprintf('%.0F', $voltage_error * 100) . ") V", 230, 4, $color, $text, $link);
            }

            // Post Regulation Current Monitor
            $U_ist = abs($adeiValue[10][0]);
            $I_ist = abs($adeiValue[10][28]);
            $PID_setpoint = abs($adeiValue[10][30]);
            $PR_hw_current = abs($adeiValue[10][31]);
            $hv_switch1102_k65 = $adeiValue[35][1];
            $hv_switch1103_k35 = $adeiValue[35][2];
            $R_K65 = 54.5e6;
            $R_K35 = 58.65e6;
            if ($hv_switch1103_k35 + $hv_switch1102_k65 = 2) $R_ges = 33.057e6; // manual entry of R_ges with K65 and K35 connected
            else $R_ges = (1 - $hv_switch1103_k35) * $R_K35 + (1 - $hv_switch1102_k65) * $R_K65; // choose just one divider


            $I_noPR = $U_ist / $R_ges * 1000.0;
            $I_PR = $I_ist - $I_noPR;
            $APR_on = abs($adeiValue[10][29]);

            $verbose = false; // switch for status outputs, dev mode
            // 28W limit, 33 kV mit 0,7 mA ist Maximum für stabilen Betrieb
            $P_PR = 0.0;
            if ($I_PR > 0.01)
            {
                $P_PR = $U_ist * $I_PR / 1000;
            }
            else $I_PR = 0.0;

            $pic = "postreg";

            if ($verbose) echo '<br><br><br>';
            if ($I_PR < 0.1)
            {
                if ($verbose) echo 'PR off<br>';
                $pic = $pic . "Off";
            }
            else
            {
                if ($I_PR < 0.46)
                {
                    if ($verbose) echo 'PR_current low';
                    $pic = $pic . "Warn";
                }
                else if (($I_PR >= 0.46) && ($I_PR <= 0.8))
                {
                    if ($verbose) echo 'PR_current OK';
                    $pic = $pic . "On";
                }
                else if ($I_PR > 0.8)
                {
                    if ($verbose) echo 'PR_current overload';
                    $pic = $pic . "Alarm";
                }

                if ($verbose)
                {
                    echo '<br>';
                    if ($P_PR < 23) echo "    PR_wattage in range";
                    else if ($P_PR < 28) echo "    PR_wattage high";
                    else if ($P_PR > 28) echo "    PR_wattage CRITICAL";
                    echo '<br>';
                }
            }

            if ($verbose)
            {
                echo '<br>';

                echo 'R_Divider = ' . $U_ist / ($I_ist * 1000) . ' MOhm, ';
                echo 'I_ist = ' . $I_ist . ' mA,  ';
                echo 'I_noPR = ' . $I_noPR . ' mA, ';
                echo 'I_PR = ' . $I_PR . ' mA, ';
                echo 'P_PR = ' . $P_PR . ' W<br>';
            }

            $color = "#000000";
            placePic(435, 339, $pic . ".png", 30, "Estimated status of HV post regulation &#010green  = normal operation &#010gray    = off &#010red      = current too high &#010orange = current too low");

            if ($I_PR < 0.1)
            {
                placeText(466, 324, "OFF", 60, 2, $color, "HV post regulation offline.");
            }
            else
            {
                placeTextWithLink(466, 325, sprintf('%.2F mA', $I_PR) , 60, 2, $color, "Estimated current through post regulation triode shunt. 0.46-0.8 mA for optimal performance.", $adeiChannel[10][28]);
                placeTextWithLink(480, 325, sprintf('%2.0F W', $P_PR) , 60, 2, $color, "Estimated power consumption of post regulation triode shunt. Must be < 28 W.", $adeiChannel[10][28]);

                if ($APR_on) placeTextWithLink(492, 335, "APR ON", 40, 0, "#40AA40", "Advanced Post Regulation (APR) status.", $adeiChannel[10][29]);

                if ($PID_setpoint > 9.0) placeTextWithLink(501, 285, "APR setpoint limit", 140, 0, "#FF0000", "APR setpoint at 90% of limit.", $adeiChannel[10][30]);

                if (abs($I_PR - $PR_hw_current) > 0.1) placeTextWithLink(510, 285, "PR current mismatch", 140, 0, "#FF0000", "Estimated and actual current of post regulation don't match.", $adeiChannel[10][31]);
            }
        } // end of PCS7 mode switch


        //placeText(180, 845, "MS WEST IE", 70, 2,"#808080"); // west IE being displayed in loop below
        //placeText(450, 845, "MS EAST IE", 70, 2,"#808080"); // east IE
        placeText(265, 815, "MS IE COMMON", 130, 2, "#000000"); // mainspec IE Common
        // MS Tank from Precision HCP Supply or Standard HCN
        $text = "MS TANK";
        $ms_hcp_soll = $adeiValue[10][1]; //flipped 2021-02-16 for new HCP device
        $ms_hcn_soll = $adeiValue[10][25];

        $HCP = true;
        if ($ms_hcn_soll == 0)
        {
            if ($ms_hcp_soll == 0)
            {
                $text = $text . " OFF";
            }
            else
            {
                $text = $text . " HCP";
                $HCP = true;
            }
        }
        else
        {
            $text = $text . " HCN";
            $HCP = false;
        }
        placeText(70, 830, $text, 100, 2, "#000000"); // mainspec tank
        // switch values here between HCN and HCP in Value and Channel Array !!!
        //if ($HCP) { $adeiValue[10][0] = -$adeiValue[10][24]; $adeiValue[10][1] = $adeiValue[10][25]; $adeiChannel[10][0] = $adeiChannel[10][24]; $adeiChannel[10][1] = $adeiChannel[10][25]; }
        if ($HCP)
        {
            $adeiValue[10][0] = - $adeiValue[10][0];
        }

        placeText(110 - $posY, 845, "W7-11", 70, 2, "#000000"); // w7-11
        placeText(503 + $posY + $posX, 845, "E7-11", 70, 2, "#000000"); // e7-11
        placeText(126 - $posY, 600, "W6", 70, 2, "#000000"); // w6
        placeText(487 + $posY + $posX, 600, "E6", 70, 2, "#000000"); // e6
        placeText(126 - $posY, 1090, "W12", 70, 2, "#000000"); // w12
        placeText(487 + $posY + $posX, 1090, "E12", 70, 2, "#000000"); // e12
        placeText(161 - $posY, 516, "W5", 70, 2, "#000000"); // w5
        placeText(452 + $posY + $posX, 516, "E5", 70, 2, "#000000"); // e5
        placeText(161 - $posY, 1174, "W13", 70, 2, "#000000"); // w13
        placeText(452 + $posY + $posX, 1174, "E13", 70, 2, "#000000"); // e13
        placeText(194 - $posY, 434, "W4", 70, 2, "#000000"); // w4
        placeText(419 + $posY + $posX, 434, "E4", 70, 2, "#000000"); // e4
        placeText(194 - $posY, 1256, "W14", 70, 2, "#000000"); // w14
        placeText(419 + $posY + $posX, 1256, "E14", 70, 2, "#000000"); // e14
        placeText(225 - $posY, 385, "W3", 70, 2, "#000000"); // w3
        placeText(388 + $posY + $posX, 385, "E3", 70, 2, "#000000"); // e3
        placeText(225 - $posY, 1305, "W15", 70, 2, "#000000"); // w15
        placeText(388 + $posY + $posX, 1305, "E15", 70, 2, "#000000"); // e15
        placeText(273 - $posY, 352, "W2", 70, 2, "#000000"); // w2
        placeText(340 + $posY + $posX, 352, "E2", 70, 2, "#000000"); // e2
        placeText(273 - $posY, 1338, "W16", 70, 2, "#000000"); // w16
        placeText(340 + $posY + $posX, 1338, "E16", 70, 2, "#000000"); // e16
        if ($adeiValue[10][8] > 10.0) placeText(309, 359, "APE", 70, 2, "#000000"); // ape south
        if ($adeiValue[10][10] > 10.0) placeText(309, 1331, "APE", 70, 2, "#000000"); // ape north
        // offset voltages
        $posY = 16; // offset between outer and inner voltages
        $ringsPosY = array(
            275,
            275 + $posY,
            227,
            227 + $posY,
            196,
            196 + $posY,
            163,
            163 + $posY,
            128,
            128 + $posY,
            112,
            112 + $posY,
            128,
            128 + $posY,
            163,
            163 + $posY,
            196,
            196 + $posY,
            227,
            227 + $posY,
            275,
            275 + $posY,
            342,
            342 - $posY,
            390,
            390 - $posY,
            421,
            421 - $posY,
            454,
            454 - $posY,
            489,
            489 - $posY,
            505,
            505 - $posY,
            489,
            489 - $posY,
            454,
            454 - $posY,
            421,
            421 - $posY,
            390,
            390 - $posY,
            342,
            342 - $posY
        );
        $ringsPosX = array(
            352,
            352,
            385,
            385,
            434,
            434,
            516,
            516,
            600,
            600,
            845,
            845,
            1090,
            1090,
            1174,
            1174,
            1256,
            1256,
            1305,
            1305,
            1338,
            1338,
            352,
            352,
            385,
            385,
            434,
            434,
            516,
            516,
            600,
            600,
            845,
            845,
            1090,
            1090,
            1174,
            1174,
            1256,
            1256,
            1305,
            1305,
            1338,
            1338
        );
        $tol = 0.2;

        $ringNames = array(
            "W2",
            "W2i",
            "W3",
            "W3i",
            "W4",
            "W4i",
            "W5",
            "W5i",
            "W6",
            "W6i",
            "W7-11",
            "W7-11i",
            "W12",
            "W12i",
            "W13",
            "W13i",
            "W14",
            "W14i",
            "W15",
            "W15i",
            "W16",
            "W16i",
            "E2",
            "E2i",
            "E3",
            "E3i",
            "E4",
            "E4i",
            "E5",
            "E5i",
            "E6",
            "E6i",
            "E7-11",
            "E7-11i",
            "E12",
            "E12i",
            "E13",
            "E13i",
            "E14",
            "E14i",
            "E15",
            "E15i",
            "E16",
            "E16i"
        );

        for ($pp = 0;$pp < 2;$pp++) // west (0), east (1)

        {
            for ($id = 0;$id < 22;$id++) // rings: o, i, o, i, ...

            {
                // show voltage if not shorted to IE
                if ($ringsToAdei[$id + 22 * $pp] != "IE" && $ringsToAdei[$id + 22 * $pp] != "")
                {
                    // color
                    if (($adeiValue[11 + 2 * $pp][$ringsToAdei[$id + 22 * $pp]] > $adeiValue[12 + 2 * $pp][$ringsToAdei[$id + 22 * $pp]] - $tol) && ($adeiValue[11 + 2 * $pp][$ringsToAdei[$id + 22 * $pp]] < $adeiValue[12 + 2 * $pp][$ringsToAdei[$id + 22 * $pp]] + $tol)) $color = "#000000";
                    else $color = "#FF0000";

                    // show voltage
                    if (($id % 2 == 0) || ($id % 2 == 1 && $ringsToAdei[$id + 22 * $pp] != $ringsToAdei[$id + 22 * $pp - 1]))
                    {
                        $value = $adeiValue[11 + 2 * $pp][$ringsToAdei[$id + 22 * $pp]];
                        $mace_setting[$ringNames[$id + 22 * $pp]] = $value;
                        placeTextWithLink($ringsPosY[$id + 22 * $pp], $ringsPosX[$id + 22 * $pp], "+" . sprintf('%.1F', $value) , 70, 4, $color, "relative voltage offset", $adeiChannel[11 + 2 * $pp][$ringsToAdei[$id + 22 * $pp]]);
                    }
                }
            }
        }

        // tank, ie, dipole, ape
        $ringsPosY = array(
            52,
            247,
            155,
            425,
            306,
            306,
            0,
            240,
            300,
            285,
            300,
            315
        );
        $ringsPosX = array(
            805,
            805,
            805,
            805,
            319,
            1371,
            0,
            150,
            160,
            190,
            220,
            190
        );
        $tolA = array(
            15,
            2,
            1,
            1,
            1,
            1,
            0,
            250,
            2,
            2,
            2,
            2
        );

        // MS voltages
        for ($pp = 0;$pp < 6;$pp++) // tank (0), ie (1), ie west (2), ie east (3), ape south (4), ape north (5)

        {
            // color
            if (($adeiValue[10][2 * $pp] > $adeiValue[10][2 * $pp + 1] - $tolA[$pp]) && ($adeiValue[10][2 * $pp] < $adeiValue[10][2 * $pp + 1] + $tolA[$pp])) $color = "#000000";
            else $color = "#FF0000";

            // show voltage
            $value = $adeiValue[10][2 * $pp];
            $link = $adeiChannel[10][2 * $pp];

            $dipolestatus = $adeiValue[2][16];
            $dipolelink = $adeiChannel[2][16];

            if ($pp == 0)
            {
                $text = "absolute tank potential HCN:436-EHV-0-1001-0002 HCP:436-EHV-0-1002-0002";
            }
            else if ($pp == 1)
            {
                $text = "IE common offset potential, 436-EHV-0-1003-0002";
            }
            else if ($pp == 2)
            {
                $text = "relative voltage potential west IE";
            }
            else if ($pp == 3)
            {
                $text = "relative voltage potential east IE";
            }
            else if ($pp == 4)
            {
                $text = "relative voltage potential south APE";
            }
            else if ($pp == 5)
            {
                $text = "relative voltage potential north APE";
            }

            if ($pp == 2 || $pp == 3)
            {
                if ($dipolestatus == 1) // dipole enabled

                {
                    $color = "#990000";
                    $value = $adeiValue[10][2 * $pp];
                    if ($pp == 2)
                    {
                        placeText($ringsPosY[$pp] + 40, $ringsPosX[$pp], "DIPOLE", 150, 4, "#CC0000");

                    }
                    else if ($pp == 3)
                    {
                        placeText($ringsPosY[$pp] + 40, $ringsPosX[$pp], "DIPOLE", 150, 4, "#CC0000");

                    }
                }
                else
                {
                    $value = $adeiValue[10][2 * $pp]; // dipole disabled
                    $color = "#909090";
                }

                if ($pp == 2) placeText(180, 825, "MS WEST IE", 110, 2, $color); // west IE
                else if ($pp == 3) placeText(450, 825, "MS EAST IE", 110, 2, $color); // east IE
                $link = $adeiChannel[10][2 * $pp + 1] . "," . $adeiChannel[10][2 * $pp] . "," . $dipolelink;
            }

            // tank potential
            if ($pp == 0) placeTextWithLink($ringsPosY[$pp], $ringsPosX[$pp], sprintf('%.1F V', -$value) , 150, 4, $color, $text, $link);

            // IE common
            else if ($pp == 1)
            {
                if ($Kal1_RunFlag == 0) $digits = '%.2F V';
                else $digits = '%.1F V';
                placeTextWithLink($ringsPosY[$pp], $ringsPosX[$pp], sprintf($digits, -$value) , 150, 4, $color, $text, $link);
                $mace_setting["IECommon"] = - $value;
                $digits = '';
            }

            // IE dipoles
            else if ($pp == 2 || $pp == 3) placeTextWithLink($ringsPosY[$pp], $ringsPosX[$pp], sprintf('%.2F V', $value) , 150, 5, $color, $text, $link);

            // APE
            else if ($pp == 4 || $pp == 5)
            {
                if ($adeiValue[10][2 * $pp] > 10.0)
                {
                    placeTextWithLink($ringsPosY[$pp], $ringsPosX[$pp], sprintf('%.1F', $value) , 70, 4, $color, $text, $link);
                }
            }
        }
    }

    // PS voltages (add $pp < 10 for PS IE )
    if ($PSmode == 5)
    { // only display in PS operation mode High-Voltage


        placeText(265, 190, "PS TANK", 70, 2, "#000000"); // prespec tank
        placeText(330, 160, "PS IE", 120, 2, "#505050"); // prespec IE


        for ($pp = 7;$pp < 12;$pp++) // PS tank (channel 7 = array entry 14 + 15), IE west (8), IE east (9)

        {
            // color and text
            if ($pp == 7)
            {
                $text = "Primary PS tank potential of 416EHV1001";
                $color = "#000000";
            }
            else if ($pp == 8)
            {
                $text = "relative voltage potential PS IE1 Ch1A of 416EHV1002";
                $color = "#505050";
            }
            else if ($pp == 9)
            {
                $text = "relative voltage potential PS IE2 Ch1B of 416EHV1002";
                $color = "#505050";
            }
            else if ($pp == 10)
            {
                $text = "relative voltage potential PS IE3 Ch2A of 416EHV1003";
                $color = "#505050";
            }
            else if ($pp == 11)
            {
                $text = "relative voltage potential PS IE4 Ch2B of 416EHV1003";
                $color = "#A0A0A0";
            }

            // setpoint mismatch color
            if (($adeiValue[10][2 * $pp] > $adeiValue[10][2 * $pp + 1] - $tolA[$pp]) && ($adeiValue[10][2 * $pp] < $adeiValue[10][2 * $pp + 1] + $tolA[$pp])) $color = $color;
            else $color = "#FF0000";

            // show voltage
            $value = $adeiValue[10][2 * $pp];
            $link = $adeiChannel[10][2 * $pp];

            if ($pp == 7) placeTextWithLink($ringsPosY[$pp], $ringsPosX[$pp], sprintf('%.1F V', -$value) , 150, 5, $color, $text, $link);
            else placeTextWithLink($ringsPosY[$pp], $ringsPosX[$pp], sprintf('%.1F V', -$value) , 60, 2, $color, $text, $link);
        }
    }

    // ########## Split Ring Electrodes ##########
    $srPosX = array(
        59,
        284,
        1420
    );
    $srPosY = array(
        402,
        402,
        370
    );
    $srKATRINNumber = array(
        "418-EEL-3-2150",
        "418-EEL-3-4150",
        "438-EEL-3-5150"
    );

    // CPS-PS electrode 418-EEL-2150
    // $sr: 0 = cps-ps ; 1 = PS-MS ; 2 = MS-FPD
    for ($sr = 0;$sr < 3;$sr++)
    {
        $splitringON = $adeiValue[36][4 * $sr + 3];
        $pic = "splitring";
        if ($splitringON = 1)
        {
            $color = "#000000";
            $splitringVal = $adeiValue[36][4 * $sr + 4];
            $splitringPOL = $adeiValue[36][4 * $sr + 5];
            $splitringSet = $adeiValue[36][4 * $sr + 6];
            $link = $adeiChannel[36][$sr * 4 + 4];

            if (abs($splitringVal) < 25)
            {
                $color = "#FF0000";
                $pic = $pic . "Alarm";
                $sign = "";
            }
            else
            {
                if ($splitringPOL == 0)
                {
                    $sign = "+";
                    $pic = $pic . "On";
                }
                if ($splitringPOL == 1)
                {
                    $sign = "";
                    $pic = $pic . "Warn";
                }
            }

            placePicWithLink($srPosY[$sr] - 32, $srPosX[$sr] + 16, $pic . ".png", 30, "status of split ring electrode (green = polarity pos and OK, gray = off, red = low voltage alarm, orange = polarity neg warning", $link);
            placeTextWithLink($srPosY[$sr], $srPosX[$sr], $sign . sprintf('%.0F V', $splitringVal) , 60, 2, $color, "Voltage on split ring electrode " . $srKATRINNumber[$sr], $link);
        }
        else placePicWithLink($srPosY[$sr] - 32, $srPosX[$sr] + 16, $pic . "Off.png", 30, "status of split ring electrode", $link);
    }

    // ########## DETECTOR ##########
    // detector powered
    $lowVoltage = array(
        12,
        8,
        6,
        6,
        120
    );
    $link = "";
    $pic = "fpdOn";
    $text = "ON";
    for ($id = 0;$id < 5;$id++)
    {
        $value = $adeiValue[6][4 + $id];
        if (!($value < $lowVoltage[$id] + 0.2 && $value > $lowVoltage[$id] - 0.2))
        {
            $pic = "fpdOff";
            $text = "OFF";
        }
        $link = $link . $adeiChannel[6][4 + $id] . ",";
    }
    $link = substr($link, 0, strlen($link) - 1);
    placePicWithLink(200, 1600, $pic . ".png", 30, "status FPD power&#10;green: on, red: off, grey: undefined", $link);
    placeTextWithLink(227, 1580, $text, 70, 4, "#000000", "status FPD power", $link);

    // carousel
    $value = $adeiValue[6][11];
    $color = "#000000";

    if ($value < - 95) $value = "---";
    else $value = sprintf('%.0F', $adeiValue[6][11]) . " &#176;C";

    placeTextWithLink(255, 1565, $value, 100, 4, $color, "temperature FPD carousel/electronics", $adeiChannel[6][11]);
    placeText(275, 1565, "carousel", 100, 2, "#000000");

    // ########## MAGNETOMETERS ##########
    $mag = array(
        4,
        6,
        3
    ); // removed 4th entry of south ring, due to disconnection
    for ($pp = 0;$pp < 3;$pp++)
    {
        $bx = 0;
        $by = 0;
        $bz = 0;
        $link = "";

        for ($id = 0;$id < $mag[$pp];$id++)
        {
            $bx = $bx + $adeiValue[16 + $pp][3 * $id];
            $by = $by + $adeiValue[16 + $pp][3 * $id + 1];
            $bz = $bz + $adeiValue[16 + $pp][3 * $id + 2];
            $link = $link . $adeiChannel[16 + $pp][3 * $id + 2] . ",";
            //echo $bx . "  " . $by . "  " . $bz . "<br>";

        }

        $bx = $bx / $mag[$pp];
        $by = $by / $mag[$pp];
        $bz = $bz / $mag[$pp];
        $link = substr($link, 0, strlen($link) - 1);

        $value = sqrt($bx * $bx + $by * $by + $bz * $bz);

        $text = "averaged field precise magnetometers ";
        if ($pp == 0) $text = $text . "north ";
        else if ($pp == 1) $text = $text . "middle ";
        else if ($pp == 2) $text = $text . "south ";
        $text = $text . "ring";

        placeTextWithLink(553, 1015 - 170 * $pp, sprintf('%.1F G', $value) , 80, 5, "#000000", $text, $link);
    }

    // ########## SAP MAGNETOMETERS ##########
    $mag = array(
        5,
        4,
    ); // 5 SAP North Ring, 4 SAP South Ring magnetometers
    for ($pp = 0;$pp < 2;$pp++)
    {
        $bx = 0;
        $by = 0;
        $bz = 0;
        $link = "";

        for ($id = 0;$id < $mag[$pp];$id++)
        {
            $bx = $bx + $adeiValue[37 + $pp][3 * $id];
            $by = $by + $adeiValue[37 + $pp][3 * $id + 1];
            $bz = $bz + $adeiValue[37 + $pp][3 * $id + 2];
            $link = $link . $adeiChannel[37 + $pp][37 * $id + 2] . ",";
            //echo $bx . "  " . $by . "  " . $bz . "<br>";

        }

        $bx = $bx / $mag[$pp];
        $by = $by / $mag[$pp];
        $bz = $bz / $mag[$pp];
        $link = substr($link, 0, strlen($link) - 1);

        // radings in muT, therfore factor 100 for Gauss display
        $value = 0.01 * sqrt($bx * $bx + $by * $by + $bz * $bz);

        $text = "averaged field precise magnetometers SAP ";
        if ($pp == 0) $text = $text . "north ";
        else if ($pp == 1) $text = $text . "south ";
        $text = $text . "ring";

        placeTextWithLink(553, 1240 - 110 * $pp, sprintf('%.1F G', $value) , 80, 5, "#000000", $text, $link);
    }

    // dipole
    //	$pic = "status";
    //	if ($pulserId[0] == "dipole" && $daqElapsed[0] > 30)
    //	{
    //		if ($pulserCounts[0] > 0) $pic = $pic . "On";
    //		else if ($pulserCounts[0] == 0) $pic = $pic . "Off";
    //	}
    //placePic($posY + 34 + 25, $posX + 80, $pic . ".png", 17, "status dipole sync pulser&#10;green: on, red: off, grey: undefined");
    // egun
    //	$pic = "status";
    //	if ($pulserId[1] == "egun" && $daqElapsed[0] > 30)
    //	{
    //		if ($pulserCounts[1] > 0) $pic = $pic . "On";
    //		else if ($pulserCounts[1] == 0) $pic = $pic . "Off";
    //	}
    //placePic($posY + 34 + 50, $posX + 80, $pic . ".png", 17, "status egun sync pulser&#10;green: on, red: off, grey: undefined");
    // muon
    //	$pic = "status";
    //	if ($pulserId[3] == "muon" && $daqElapsed[0] > 30)
    //	{
    //		if ($pulserCounts[3] > 0) $pic = $pic . "On";
    //		else if ($pulserCounts[3] == 0) $pic = $pic . "Off";
    //	}
    //	placePic($posY + 34 + 75, $posX + 80, $pic . ".png", 17, "status muon sync pulser&#10;green: on, red: off, grey: undefined");


    // ########## HIGH PRESSURE MS ##########
    $value = $adeiValue[9][3];
    if ($value > 1.0)
    {
        if ($value < 20.0) $pic = "bottleBlinking.gif";
        else $pic = "bottleOn.png";
        $text = "ON";
        $color = "#000000";
        if ($adeiValue[9][4] != 64) $color = "#FF0000";
        placeTextWithLink(135, 1387, sprintf('%.1F &#037;', $adeiValue[9][3]) , 70, 4, $color, "gas flow leak valve", $adeiChannel[9][5]);
        placeTextWithLink(160, 1387, sprintf('%.1E', $adeiValue[9][0]) , 70, 4, $color, "pressure [mbar] MKS Baratron", $adeiChannel[9][3]);
    }
    else
    {
        $pic = "bottle.png";
        $text = "OFF";
    }

    $link = $adeiChannel[9][3] . "," . $adeiChannel[9][0];
    placePicWithLink(135, 1358, $pic, 48, "status gas injection system&#10;gray: off, blinking: low, green: on&#10Should be off for nominal pressure measurements!!!", $link);
    placeTextWithLink(180, 1347, $text, 70, 4, "#000000", "status gas injection system", $link);

    // ########## HIGH PRESSURE PS ##########
    $value = $adeiValue[27][7];
    $posOK = $adeiValue[27][6];
    $link = $adeiChannel[27][6] . "," . $adeiChannel[27][7];
    if ($value < 1)
    {
        $pic = "bottle.png";
        $text = "OFF";
        $color = "#909090";
    }
    else if (($value >= 1) && ($value < 15))
    {
        $pic = "bottleBlinking.gif";
        $text = "ON";
        $color = "#000000";
    }
    else if ($value >= 15)
    {
        $pic = "bottleOn.png";
        $text = sprintf('%.1F', $value) . " %";
        $color = "#000000";
        if ($posOK == 1) placeBox(418, 107, "Pos OK", 40, 2, "#00FF00");
        else placeBox(418, 107, "PosErr", 40, 2, "#FF0000");
    }
    placePicWithLink(370, 113, $pic, 30, "status PS gas injection system&#10;gray: off, blinking: low, green: on&#10Should be off for nominal pressure measurements!!!", $link);
    placeTextWithLink(402, 99, $text, 60, 2, $color, "status gas injection system", $link);

    // ########## TLK Wall and LAUDA TEMPERATURE ##########


    if ($PSmode == 5)
    { // only display if PS operation mode is HV
        // mean of 4023, 4033, 4043
        $link = $adeiChannel[29][0] . "," . $adeiChannel[29][1] . "," . $adeiChannel[29][2];
        $value = ($adeiValue[29][0] + $adeiValue[29][1] + $adeiValue[29][2]) / 3.0;
        $color = "#000000";
        if ($value < 4000) placeTextWithLink(440, 145, "T<sub>PS</sub> = " . sprintf('%.1F &#176;C', $value) , 120, 4, $color, "PS mean temperature of 4023..33..43", $link);
    }

    if ($PSmode != 5)
    { // only display if PS operation mode is Baking
        $min = 18;
        $max = 30;

        // sensor 4100 ID [29][3]
        $link = $adeiChannel[29][3];
        $value = $adeiValue[29][3];
        $color = "#000000";
        if ($value < $min) $color = "#0026FF";
        else if ($value > $max) $color = "#FF0000";
        if ($value < 400) placeTextLeftWithLink(445, 5, "T<sub>wall</sub> = " . sprintf('%.1F &#176;C', $value) , 180, 4, $color, "TLK separation wall temperature of RTP4100", $link);

        $min = 15;
        // LAUDA System 5401 [34][0..1]
        $link = $adeiChannel[34][0] . "," . $adeiChannel[34][1];
        $value = $adeiValue[34][0];
        $max = $adeiValue[34][1] + 1;
        $color = "#000000";
        if ($value < $min) $color = "#0026FF";
        else if ($value > $max) $color = "#FF0000";
        if ($value < 400) placeTextLeftWithLink(475, 5, "T<sub>LAUDA</sub> = " . sprintf('%.1F &#176;C', $value) , 180, 4, $color, "LAUDA System actual temperature value", $link);

        // ########## PS VESSEL TEMPERATURES ##########
        $min = 18;
        $max = 65;

        // mean of 4023, 4033, 4043
        $link = $adeiChannel[29][0] . "," . $adeiChannel[29][1] . "," . $adeiChannel[29][2];
        $value = ($adeiValue[29][0] + $adeiValue[29][1] + $adeiValue[29][2]) / 3.0;
        $color = "#000000";
        if ($value < $min) $color = "#0026FF";
        else if ($value > $max) $color = "#FF0000";
        if ($value < 4000) placeTextWithLink(305, 185, sprintf('%.1F &#176;C', $value) , 90, 4, $color, "PS mean temperature of 4023..33..43", $link);

        // mean of 3901, 3902, 3903, 3904
        $link = $adeiChannel[29][4] . "," . $adeiChannel[29][5] . "," . $adeiChannel[29][6] . "," . $adeiChannel[29][7];
        $value = ($adeiValue[29][4] + $adeiValue[29][5] + $adeiValue[29][6] + $adeiValue[29][7]) / 4.0;
        $color = "#000000";
        if ($value < $min) $color = "#0026FF";
        else if ($value > $max) $color = "#FF0000";
        if ($value < 4000) placeTextWithLink(295, 110, sprintf('%.1F &#176;C', $value) , 90, 4, $color, "PS mean temperature of 3902..03..04 upper NEG port", $link);

        // mean of 3912, 3913, (3914 failed)
        $link = $adeiChannel[29][8] . "," . $adeiChannel[29][9] . "," . $adeiChannel[29][10] . "," . $adeiChannel[29][11];
        //	$value = ($adeiValue[29][8] + $adeiValue[29][9] + $adeiValue[29][10] + $adeiValue[29][11])/4.0;
        $value = ($adeiValue[29][8] + $adeiValue[29][9] + $adeiValue[29][10]) / 3.0;
        $color = "#000000";
        if ($value < $min) $color = "#0026FF";
        else if ($value > $max) $color = "#FF0000";
        if ($value < 4000) placeTextWithLink(315, 110, sprintf('%.1F &#176;C', $value) , 90, 4, $color, "PS mean temperature of 3912..13..14 side NEG port", $link);

    }

    // ########## MS VESSEL TEMPERATURES ##########
    $min = 14;
    $max = 24;

    // 0066
    $value = $adeiValue[20][0];
    $color = "#000000";
    if ($value < $min) $color = "#0026FF";
    else if ($value > $max) $color = "#FF0000";
    if (($value < 400) & ($value > 0)) placeTextWithLink(110, 933, "T<sub>IE0066</sub> = " . sprintf('%.1F &#176;C', $value) , 170, 4, $color, "IE temperature 0066", $adeiChannel[20][0]);

    // 0076
    $value = $adeiValue[20][1];
    $color = "#000000";
    if ($value < $min) $color = "#0026FF";
    else if ($value > $max) $color = "#FF0000";
    if (($value < 400) & ($value > 0)) placeTextWithLink(110 + 20, 933, "T<sub>IE0076</sub> = " . sprintf('%.1F &#176;C', $value) , 170, 4, $color, "IE temperature 0076", $adeiChannel[20][1]);

    // 0270
    $value = $adeiValue[20][2];
    $color = "#000000";
    if ($value < $min) $color = "#0026FF";
    else if ($value > $max) $color = "#FF0000";
    if (($MSmode != 5) & ($value < 400) & ($value > 0)) placeTextWithLink(307, 805, "T<sub>0270</sub> = " . sprintf('%.1F &#176;C', $value) , 160, 4, $color, "tank temperature 0270", $adeiChannel[20][2]);
    if (($MSmode == 5) & ($value < 400) & ($value > 0)) placeTextWithLink(110, 677, "T<sub>0270</sub> = " . sprintf('%.1F &#176;C', $value) , 160, 4, $color, "tank temperature 0270", $adeiChannel[20][2]);

    // define global tank temperature
    $global_MS_temperature = $adeiValue[20][2];

    // 0283
    $value = $adeiValue[20][3];
    $color = "#000000";
    if ($value < $min) $color = "#0026FF";
    else if ($value > $max) $color = "#FF0000";
    if (($MSmode != 5) & ($value < 400) & ($value > 0)) placeTextWithLink(307, 963, "T<sub>0283</sub> = " . sprintf('%.1F &#176;C', $value) , 160, 4, $color, "tank temperature 0283", $adeiChannel[20][3]);
    if (($MSmode == 5) & ($value < 400) & ($value > 0)) placeTextWithLink(130, 677, "T<sub>0283</sub> = " . sprintf('%.1F &#176;C', $value) , 160, 4, $color, "tank temperature 0283", $adeiChannel[20][3]);

    // port 0100 saphire window
    $value = $adeiValue[19][3];
    $color = "#000000";
    if ($value > 30) placeTextLeftWithLink(105, 1275, "T<sub>saphire</sub> = " . sprintf('%.1F &#176;C', $value) , 160, 4, $color, "port 0100 saphire window temperature", $adeiChannel[19][3]);

    $color = "#000000";
    // ########## STS ##########
    placeTextLeftWithWebsiteLink(370, 1, "&larr;STS", 60, 5, $color, "Link to STS Status Overview", "https://katrin.kit.edu/status-sts/");

    // ########## WebTrium Link ##########
    placeTextLeftWithWebsiteLink(20, 1450, "&rarr; WebTrium", 155, 4, $color, "Link to WebTrium Overview", "https://webtrium.mpp.mpg.de");

    // ########## FPD Status ##########
    placeTextLeftWithWebsiteLink(50, 1450, "&rarr; FPD Status", 155, 4, $color, "Link to FPD Status Overview", "https://ikp-katrin-fpd.ikp.kit.edu/fpdstatus/");

    // ########## Sanshiro Katana Page ##########
    placeTextLeftWithWebsiteLink(80, 1450, "&rarr; Brew Kaffee Beans and Idle", 275, 4, $color, "Link to Brew Kaffee Beans and Idle page at UW/Seattle", "http://katana.npl.washington.edu/~sanshiro/");

    // ########## MoS und HV Status ##########
    placeTextLeftWithWebsiteLink(110, 1450, "&rarr; MoS and HV Status", 240, 4, $color, "Link to Monitor Spectrometer and High Voltage Status Overview", "https://katrin.kit.edu/bora-mos");

    // ########## Magnet Overview ##########
    placeTextLeftWithWebsiteLink(140, 1450, "&rarr; Magnet Control System", 270, 4, $color, "Link to Magnet Control System Status Page", "https://katrin.kit.edu/bora-mcs");
    // ########## PS ##########
    //	placeText(100, 170, "PS", 60, 30, $color);


    // ########## MAC-E filter configuration display ##########
    $tol = 0.2;
    $tol = abs($tol);
    $color = "#FFD800"; //base color: US school bus yellow
    for ($pp = 0;$pp < sizeof($mace_configurations);$pp++) // loop over all predefined configurations

    {
        for ($id = 1;$id < sizeof($mace_configurations[$pp]);$id++) // loop thru all parameters, but not name in $id=0

        {
            if (($id < 3) & (array_values($mace_configurations[$pp]) [$id] != array_values($mace_setting) [$id])) break;
            if (abs(array_values($mace_configurations[$pp]) [$id] - array_values($mace_setting) [$id]) < $tol)
            {
                if ($id == 25)
                {
                    $mace_setting["Config"] = $mace_configurations[$pp]["Config"];
                    $color = "#4CFF00"; // success color: harlequin green

                }
                else
                {
                    $color = "#FF9300"; // failure color: dark orange

                }
            }
            else break;
        }
        if ($color == "#4CFF00") break;
    }
    if (($mace_setting["Config"] == "unkn") or ($mace_setting["Config"] == "other"))
    {
        $color = "#FFD800"; //unknown config color: US school bus yellow

    }

    placeText(115, 232, "MAC-E", 85, 5, "#000000");
    placeBox(140, 230, $mace_setting["Config"], 85, 3, $color);

    if ($V4_open)
    {

        // ########## PS Ion Monitor status display ##########
        if ($adeiValue[39][1] < 0.5)
        {
            $ion_mon_stat = "active";
            $color = "#4CFF00";
        }
        else
        {
            $ion_mon_stat = "bypassed";
            $color = "#FF0000";
            placePicWithLink(130, 33, "alarm_flash.gif", 50, "Ion alarm not armed!", $adeiChannel[39][1]);
        }

        placeText(115 + 65, 4, "Ion Mon", 105, 5, "#000000");
        placeBox(140 + 65, 2, $ion_mon_stat, 105, 3, $color);

    }

    // ########## HIGH VOLTAGE SWITCH ##########
    $value = $adeiValue[31][1];
    $pic = "switch";
    if ($value == 1) $pic = $pic . "Open";
    else if ($value == 0) $pic = $pic . "Closed";
    placePicWithLink(474, 440, $pic . ".png", 80, "status high-voltage grounding switch", $adeiChannel[31][1]);

    // ########## MONITOR SPECTROMETR COUPLING STATUS ##########
    $hv_switch1101_mos = $adeiValue[35][0];
    $mos = "beamline_mos.png";
    placePicXY(525, 120, $mos, 190, 60, "status monitor spectrometer connection");
    if ($hv_switch1101_mos == 1)
    {
        $color = "#4CFF00"; // green
        placeBox(586, 120, "MoS coupled", 190, 2, $color);
    }
    else
    {
        $color = "#CFCFCF"; // light gray
        placeBox(586, 120, "MoS separated", 190, 2, $color);
    }

    // ########## define global dewpoint max value ###########
    $global_max_dewpoint = - 273.0;

    // ########## PS Opus weather station ##########
    $data_index = 40;
    $Opus_tempC = $adeiValue[$data_index][0];
    $Opus_tempF = $adeiValue[$data_index][1];
    $Opus_dewpointC = $adeiValue[$data_index][2];
    $Opus_dewpointF = $adeiValue[$data_index][3];
    $Opus_relH_percent = $adeiValue[$data_index][4];
    $Opus_relH_gramm = $adeiValue[$data_index][5];
    $Opus_absPressure_hPa = $adeiValue[$data_index][6];
    $Opus_relPressure_hPa = $adeiValue[$data_index][7];
    $Opus_voltage = $adeiValue[$data_index][8];

    $Opus_tempC_channel = $adeiChannel[$data_index][0];
    $Opus_tempF_channel = $adeiChannel[$data_index][1];
    $Opus_dewpointC_channel = $adeiChannel[$data_index][2];
    $Opus_dewpointF_channel = $adeiChannel[$data_index][3];
    $Opus_relH_percent_channel = $adeiChannel[$data_index][4];
    $Opus_relH_gramm_channel = $adeiChannel[$data_index][5];
    $Opus_absPressure_hPa_channel = $adeiChannel[$data_index][6];
    $Opus_relPressure_hPa_channel = $adeiChannel[$data_index][7];
    $Opus_voltage_channel = $adeiChannel[$data_index][8];

    // update dewpoint max value
    if ($Opus_dewpointC > $global_max_dewpoint) $global_max_dewpoint = $Opus_dewpointC;

    $location_text = "pre spectrometer";
    $draw_x = 0;
    $draw_y = - 15;

    placePicWithLink($draw_y, $draw_x + 5, "newTemperature.png", 23, "temperature at " . $location_text, $Opus_tempC_channel);
    placeTextWithLink($draw_y, $draw_x + 30, sprintf('%.1F &#176;C', $Opus_tempC) , 90, 4, "#000000", "temperature at " . $location_text, $Opus_tempC_channel);

    placePicWithLink($draw_y + 25, $draw_x + 5, "newPressure.png", 23, "atmospheric pressure at " . $location_text, $Opus_absPressure_hPa_channel);
    placeTextWithLink($draw_y + 25, $draw_x + 30, sprintf('%.0F hPa', $Opus_absPressure_hPa) , 90, 4, "#000000", "atmospheric pressure at " . $location_text, $Opus_absPressure_hPa_channel);

    placePicWithLink($draw_y + 50, $draw_x + 5, "newHumidity.png", 23, "relative humidity at " . $location_text, $Opus_relH_percent_channel);
    placeTextWithLink($draw_y + 50, $draw_x + 30, sprintf('%.1F &#037;', $Opus_relH_percent) , 90, 4, "#000000", "relative humidity at " . $location_text, $Opus_relH_percent_channel);

    placePicWithLink($draw_y + 75, $draw_x + 5, "newDewpoint.png", 23, "dewpoint at " . $location_text, $Opus_dewpointC_channel);
    placeTextWithLink($draw_y + 75, $draw_x + 30, sprintf('%.1F &#176;C', $Opus_dewpointC) , 90, 4, "#000000", "dewpoint at " . $location_text, $Opus_dewpointC_channel);

    // ########## DET Opus weather station ##########
    $data_index = 41;
    $Opus_tempC = $adeiValue[$data_index][0];
    $Opus_tempF = $adeiValue[$data_index][1];
    $Opus_dewpointC = $adeiValue[$data_index][2];
    $Opus_dewpointF = $adeiValue[$data_index][3];
    $Opus_relH_percent = $adeiValue[$data_index][4];
    $Opus_relH_gramm = $adeiValue[$data_index][5];
    $Opus_absPressure_hPa = $adeiValue[$data_index][6];
    $Opus_relPressure_hPa = $adeiValue[$data_index][7];
    $Opus_voltage = $adeiValue[$data_index][8];

    $Opus_tempC_channel = $adeiChannel[$data_index][0];
    $Opus_tempF_channel = $adeiChannel[$data_index][1];
    $Opus_dewpointC_channel = $adeiChannel[$data_index][2];
    $Opus_dewpointF_channel = $adeiChannel[$data_index][3];
    $Opus_relH_percent_channel = $adeiChannel[$data_index][4];
    $Opus_relH_gramm_channel = $adeiChannel[$data_index][5];
    $Opus_absPressure_hPa_channel = $adeiChannel[$data_index][6];
    $Opus_relPressure_hPa_channel = $adeiChannel[$data_index][7];
    $Opus_voltage_channel = $adeiChannel[$data_index][8];

    // update dewpoint max value
    if ($Opus_dewpointC > $global_max_dewpoint) $global_max_dewpoint = $Opus_dewpointC;

    $location_text = "detector platform";
    $draw_x = 1600;
    $draw_y = - 15;

    placePicWithLink($draw_y, $draw_x + 5, "newTemperature.png", 23, "temperature at " . $location_text, $Opus_tempC_channel);
    placeTextWithLink($draw_y, $draw_x + 30, sprintf('%.1F &#176;C', $Opus_tempC) , 90, 4, "#000000", "temperature at " . $location_text, $Opus_tempC_channel);

    placePicWithLink($draw_y + 25, $draw_x + 5, "newPressure.png", 23, "atmospheric pressure at " . $location_text, $Opus_absPressure_hPa_channel);
    placeTextWithLink($draw_y + 25, $draw_x + 30, sprintf('%.0F hPa', $Opus_absPressure_hPa) , 90, 4, "#000000", "atmospheric pressure at " . $location_text, $Opus_absPressure_hPa_channel);

    placePicWithLink($draw_y + 50, $draw_x + 5, "newHumidity.png", 23, "relative humidity at " . $location_text, $Opus_relH_percent_channel);
    placeTextWithLink($draw_y + 50, $draw_x + 30, sprintf('%.1F &#037;', $Opus_relH_percent) , 90, 4, "#000000", "relative humidity at " . $location_text, $Opus_relH_percent_channel);

    // ########## Detector Platform OLD ##########
    //placePicWithLink(-135, 1605, "newTemperature.png", 23, "temperature in KATRIN hall", $adeiChannel[19][1]);
    //placeTextWithLink(-135, 1630, sprintf('%.1F &#176;C', $adeiValue[19][1]), 90, 4, "#000000", "temperature in KATRIN hall", $adeiChannel[19][1]);
    //placePicWithLink(-110, 1605, "newPressure.png", 23, "atmospheric pressure in KATRIN hall", $adeiChannel[19][0]);
    //placeTextWithLink(-110, 1630, sprintf('%.0F hPa', $adeiValue[19][0] * 0.0689475729 * 1000.0), 90, 4, "#000000", "atmospheric pressure in KATRIN hall", $adeiChannel[19][0]);
    //placePicWithLink(-85, 1605, "newHumidity.png", 23, "relative humidity in KATRIN hall", $adeiChannel[19][2]);
    //placeTextWithLink(-85, 1630, sprintf('%.1F &#037;', $adeiValue[19][2]), 90, 4, "#000000", "relative humidity in KATRIN hall", $adeiChannel[19][2]);


    // ########## HV Opus weather station ##########
    $data_index = 42;
    $Opus_tempC = $adeiValue[$data_index][0];
    $Opus_tempF = $adeiValue[$data_index][1];
    $Opus_dewpointC = $adeiValue[$data_index][2];
    $Opus_dewpointF = $adeiValue[$data_index][3];
    $Opus_relH_percent = $adeiValue[$data_index][4];
    $Opus_relH_gramm = $adeiValue[$data_index][5];
    $Opus_absPressure_hPa = $adeiValue[$data_index][6];
    $Opus_relPressure_hPa = $adeiValue[$data_index][7];
    $Opus_voltage = $adeiValue[$data_index][8];

    $Opus_tempC_channel = $adeiChannel[$data_index][0];
    $Opus_tempF_channel = $adeiChannel[$data_index][1];
    $Opus_dewpointC_channel = $adeiChannel[$data_index][2];
    $Opus_dewpointF_channel = $adeiChannel[$data_index][3];
    $Opus_relH_percent_channel = $adeiChannel[$data_index][4];
    $Opus_relH_gramm_channel = $adeiChannel[$data_index][5];
    $Opus_absPressure_hPa_channel = $adeiChannel[$data_index][6];
    $Opus_relPressure_hPa_channel = $adeiChannel[$data_index][7];
    $Opus_voltage_channel = $adeiChannel[$data_index][8];

    // update dewpoint max value
    if ($Opus_dewpointC > $global_max_dewpoint) $global_max_dewpoint = $Opus_dewpointC;

    $location_text = "high-voltage cage";
    $draw_x = 434;
    $draw_y = 586;

    if (($Opus_tempC > 0) && (($Opus_tempC < 99)) && ($Opus_absPressure_hPa > 0))
    {
        placeBoxRight($draw_y, $draw_x, sprintf('%.1F &#176;C', $Opus_tempC) , 65, 2, $color);
        placePicWithLink($draw_y + 2, $draw_x + 5, "newTemperature.png", 15, "temperature at " . $location_text . ", and &#010rel. humidity is H = " . sprintf('%.1F &#037;', $Opus_relH_percent) . ",&#010dewpoint Td = " . sprintf('%.1F &#176;C', $Opus_dewpointC) . ",&#010atm. pressure is p = " . sprintf('%.0F hPa', $Opus_absPressure_hPa) . ".", $Opus_tempC_channel);
    }

    // ########## MS bottom Opus weather station ##########
    $data_index = 43;
    $Opus_tempC = $adeiValue[$data_index][0];
    $Opus_tempF = $adeiValue[$data_index][1];
    $Opus_dewpointC = $adeiValue[$data_index][2];
    $Opus_dewpointF = $adeiValue[$data_index][3];
    $Opus_relH_percent = $adeiValue[$data_index][4];
    $Opus_relH_gramm = $adeiValue[$data_index][5];
    $Opus_absPressure_hPa = $adeiValue[$data_index][6];
    $Opus_relPressure_hPa = $adeiValue[$data_index][7];
    $Opus_voltage = $adeiValue[$data_index][8];

    $Opus_tempC_channel = $adeiChannel[$data_index][0];
    $Opus_tempF_channel = $adeiChannel[$data_index][1];
    $Opus_dewpointC_channel = $adeiChannel[$data_index][2];
    $Opus_dewpointF_channel = $adeiChannel[$data_index][3];
    $Opus_relH_percent_channel = $adeiChannel[$data_index][4];
    $Opus_relH_gramm_channel = $adeiChannel[$data_index][5];
    $Opus_absPressure_hPa_channel = $adeiChannel[$data_index][6];
    $Opus_relPressure_hPa_channel = $adeiChannel[$data_index][7];
    $Opus_voltage_channel = $adeiChannel[$data_index][8];

    // update dewpoint max value
    if ($Opus_dewpointC > $global_max_dewpoint) $global_max_dewpoint = $Opus_dewpointC;

    $location_text = "main spectrometer basement";
    $draw_x = 845;
    $draw_y = 586;

    $color = "#CCCCCC";

    if (($Opus_tempC > 0) && (($Opus_tempC < 99)) && ($Opus_absPressure_hPa > 0))
    {
        placeBoxRight($draw_y, $draw_x, sprintf('%.1F &#176;C', $Opus_tempC) , 65, 2, $color);
        placePicWithLink($draw_y + 2, $draw_x + 5, "newTemperature.png", 15, "temperature at " . $location_text . ", and &#010rel. humidity is H = " . sprintf('%.1F &#037;', $Opus_relH_percent) . ",&#010dewpoint Td = " . sprintf('%.1F &#176;C', $Opus_dewpointC) . ",&#010atm. pressure is p = " . sprintf('%.0F hPa', $Opus_absPressure_hPa) . ".", $Opus_tempC_channel);

    }

    // ########## MS top Opus weather station ##########
    $data_index = 44;
    $Opus_tempC = $adeiValue[$data_index][0];
    $Opus_tempF = $adeiValue[$data_index][1];
    $Opus_dewpointC = $adeiValue[$data_index][2];
    $Opus_dewpointF = $adeiValue[$data_index][3];
    $Opus_relH_percent = $adeiValue[$data_index][4];
    $Opus_relH_gramm = $adeiValue[$data_index][5];
    $Opus_absPressure_hPa = $adeiValue[$data_index][6];
    $Opus_relPressure_hPa = $adeiValue[$data_index][7];
    $Opus_voltage = $adeiValue[$data_index][8];

    $Opus_tempC_channel = $adeiChannel[$data_index][0];
    $Opus_tempF_channel = $adeiChannel[$data_index][1];
    $Opus_dewpointC_channel = $adeiChannel[$data_index][2];
    $Opus_dewpointF_channel = $adeiChannel[$data_index][3];
    $Opus_relH_percent_channel = $adeiChannel[$data_index][4];
    $Opus_relH_gramm_channel = $adeiChannel[$data_index][5];
    $Opus_absPressure_hPa_channel = $adeiChannel[$data_index][6];
    $Opus_relPressure_hPa_channel = $adeiChannel[$data_index][7];
    $Opus_voltage_channel = $adeiChannel[$data_index][8];

    // update dewpoint max value
    if ($Opus_dewpointC > $global_max_dewpoint) $global_max_dewpoint = $Opus_dewpointC;

    $location_text = "main spectrometer under the roof";
    $draw_x = 845;
    $draw_y = 31;

    if (($Opus_tempC > 0) && (($Opus_tempC < 99)) && ($Opus_absPressure_hPa > 0))
    {
        placeBoxRight($draw_y, $draw_x, sprintf('%.1F &#176;C', $Opus_tempC) , 65, 2, $color);
        placePicWithLink($draw_y + 2, $draw_x + 5, "newTemperature.png", 15, "temperature at " . $location_text . ", and &#010rel. humidity is H = " . sprintf('%.1F &#037;', $Opus_relH_percent) . ",&#010dewpoint Td = " . sprintf('%.1F &#176;C', $Opus_dewpointC) . ",&#010atm. pressure is p = " . sprintf('%.0F hPa', $Opus_absPressure_hPa) . ".", $Opus_tempC_channel);
    }

    // ########## MoS general Opus weather station ##########
    $data_index = 45;
    $Opus_tempC = $adeiValue[$data_index][0];
    $Opus_tempF = $adeiValue[$data_index][1];
    $Opus_dewpointC = $adeiValue[$data_index][2];
    $Opus_dewpointF = $adeiValue[$data_index][3];
    $Opus_relH_percent = $adeiValue[$data_index][4];
    $Opus_relH_gramm = $adeiValue[$data_index][5];
    $Opus_absPressure_hPa = $adeiValue[$data_index][6];
    $Opus_relPressure_hPa = $adeiValue[$data_index][7];
    $Opus_voltage = $adeiValue[$data_index][8];

    $Opus_tempC_channel = $adeiChannel[$data_index][0];
    $Opus_tempF_channel = $adeiChannel[$data_index][1];
    $Opus_dewpointC_channel = $adeiChannel[$data_index][2];
    $Opus_dewpointF_channel = $adeiChannel[$data_index][3];
    $Opus_relH_percent_channel = $adeiChannel[$data_index][4];
    $Opus_relH_gramm_channel = $adeiChannel[$data_index][5];
    $Opus_absPressure_hPa_channel = $adeiChannel[$data_index][6];
    $Opus_relPressure_hPa_channel = $adeiChannel[$data_index][7];
    $Opus_voltage_channel = $adeiChannel[$data_index][8];

    $location_text = "monitor spectrometer building";
    $draw_x = 0;
    $draw_y = 536;

    placePicWithLink($draw_y, $draw_x + 5, "newTemperature.png", 23, "temperature at " . $location_text, $Opus_tempC_channel);
    placeTextWithLink($draw_y, $draw_x + 30, sprintf('%.1F &#176;C', $Opus_tempC) , 90, 4, "#000000", "temperature at " . $location_text, $Opus_tempC_channel);

    placePicWithLink($draw_y + 25, $draw_x + 5, "newPressure.png", 23, "atmospheric pressure at " . $location_text, $Opus_absPressure_hPa_channel);
    placeTextWithLink($draw_y + 25, $draw_x + 30, sprintf('%.0F hPa', $Opus_absPressure_hPa) , 90, 4, "#000000", "atmospheric pressure at " . $location_text, $Opus_absPressure_hPa_channel);

    placePicWithLink($draw_y + 50, $draw_x + 5, "newHumidity.png", 23, "relative humidity at " . $location_text, $Opus_relH_percent_channel);
    placeTextWithLink($draw_y + 50, $draw_x + 30, sprintf('%.1F &#037;', $Opus_relH_percent) , 90, 4, "#000000", "relative humidity at " . $location_text, $Opus_relH_percent_channel);

    // ########## MS condensation alert during HV operation ##########
    if ($MSmode == 5)
    {
        if ($global_max_dewpoint - $global_MS_temperature > - 1) // check dewpoint 1 °C below tank temperature

        {
            placePic(-130 + 12, 857, "alarm_flash.gif", 50, "Condensation alert, don't operate high voltage!");
            $color = "#FFD800"; // yellow
            placeBox(-130 + 60, 805, "CONDENSATION ALERT", 150, 3, $color);
        }
    }

?>