function Display()
{
global $picturefilelist;
global $slidesfilelist;
global $htmlfilelist;
print '<div id="pan' . $this->numpanel . 'div">';
$prefix = 'panel' . $this->numpanel;
//print "<h4>$prefix</h4>"; //TODO to be replaced with tab higlighting
print "<table>\n";
// mode
print "<tr>\n";
print "<td><input type='checkbox' name='chkall[]' value='" . $prefix . "mode'></input></td>\n";
print "<td>" . MyGetText(30) . "</td>\n";
print "<td><select name='" . $prefix . "mode' size=1>\n";
switch ($this->mode) {
case 1:
print "<option value='1' selected>" . MyGetText(101) . "</option>\n";
// indiv
print "<option value='2'>" . MyGetText(102) . "</option>\n";
// relay
print "<option value='3'>" . MyGetText(103) . "</option>\n";
// multistages
print "<option value='4'>" . MyGetText(105) . "</option>\n";
// showO
break;
case 2:
print "<option value='1'>" . MyGetText(101) . "</option>\n";
// indiv
print "<option value='2' selected>" . MyGetText(102) . "</option>\n";
// relay
print "<option value='3'>" . MyGetText(103) . "</option>\n";
// multistages
print "<option value='4'>" . MyGetText(105) . "</option>\n";
// showO
break;
case 3:
print "<option value='1'>" . MyGetText(101) . "</option>\n";
// indiv
print "<option value='2'>" . MyGetText(102) . "</option>\n";
// relay
print "<option value='3' selected>" . MyGetText(103) . "</option>\n";
// multistages
print "<option value='4'>" . MyGetText(105) . "</option>\n";
// showO
break;
case 4:
print "<option value='1'>" . MyGetText(101) . "</option>\n";
// indiv
print "<option value='2'>" . MyGetText(102) . "</option>\n";
// relay
print "<option value='3'>" . MyGetText(103) . "</option>\n";
// multistages
print "<option value='4' selected>" . MyGetText(105) . "</option>\n";
// showO
break;
}
print "</select></td>\n";
print "</tr>\n";
// relay team member count
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'tm_count"></input></td>';
print "<td>" . MyGetText(81) . "</td>\n";
$str = NumericIntList($prefix . "tm_count", 1, 10, $this->tm_count);
print "<td>{$str}</td>\n";
print "</tr>\n";
// alternate
print "<tr>\n";
print "<td><input type='checkbox' name='chkall[]' value='" . $prefix . "alternate'></input></td>\n";
print "<td>" . MyGetText(97) . "</td>\n";
print "<td><select name='" . $prefix . "alternate' size=1>\n";
switch ($this->alternate) {
case 0:
print "<option value='0' selected>" . MyGetText(104) . "</option>\n";
// Classical
print "<option value='1'>" . MyGetText(106) . "</option>\n";
// Alternate
break;
case 1:
print "<option value='0'>" . MyGetText(104) . "</option>\n";
// Classical
print "<option value='1' selected>" . MyGetText(106) . "</option>\n";
// Alternate
break;
default:
print "<option value='0' selected>" . MyGetText(104) . "</option>\n";
// Classical
print "<option value='1'>" . MyGetText(106) . "</option>\n";
// Alternate
break;
}
print "</select></td>\n";
print "</tr>\n";
// Empty line
print "<tr>\n";
print "<td> </td>\n";
print "<td> </td>\n";
print "</tr>\n";
// content
print "<tr>\n";
print "<td> </td>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'content"></input></td>';
print "</tr>\n";
// Picture
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'pict"></input></td>';
print '<td><input type="radio" name="' . $prefix . 'content" value="1" id="' . $prefix . 'id1">' . MyGetText(38) . '</input></td>';
InsertFileList($picturefilelist, $prefix . 'pict', $this->pict, $prefix . 'content1txt');
print "</tr>\n";
// Slides
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'slides"></input></td>';
print '<td><input type="radio" name="' . $prefix . 'content" value="8" id="' . $prefix . 'id8">' . MyGetText(99) . '</input></td>';
InsertFileList($slidesfilelist, $prefix . 'slides', $this->slides, $prefix . 'content8');
print "</tr>\n";
// Text
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'txt"></input></td>';
print '<td><input type="radio" name="' . $prefix . 'content" value="2" id="' . $prefix . 'id2">' . MyGetText(39) . '</input></td>';
print '<td><textarea name="' . $prefix . 'txt" cols=64 rows=4 maxlength=500 id="' . $prefix . 'content2">' . $this->txt . '</textarea></td>';
$str = NumericIntList($prefix . 'txtsize', 1, 72, $this->txtsize);
print "<td>{$str}</td>\n";
print '<td>' . MyGetText(66) . ' : <input type="text" name="' . $prefix . 'txtcolor" id="' . $prefix . 'txtcolor" class="color" size=6 value="' . $this->txtcolor . '"></td>';
print "</tr>\n";
// Blog
print "<tr>\n";
print "<td> </td>\n";
print '<td><input type="radio" name="' . $prefix . 'content" value="7" id="' . $prefix . 'id7">' . MyGetText(93) . '</input></td>';
print "</tr>\n";
// HTML
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'html"></input></td>';
print '<td><input type="radio" name="' . $prefix . 'content" value="3" id="' . $prefix . 'id3">' . MyGetText(40) . '</input></td>';
InsertFileList($htmlfilelist, $prefix . 'html', $this->html, $prefix . 'content3txt');
print "</tr>\n";
// Start list
print "<tr>\n";
print "<td> </td>\n";
print '<td><input type="radio" name="' . $prefix . 'content" value="4" id="' . $prefix . 'id4">' . MyGetText(42) . '</input></td>';
print '<td><input type="text" name="' . $prefix . 'startlist" size=64 id="' . $prefix . 'content4" readonly value="' . $this->classes . '"></td>';
print "</tr>\n";
// Results
print "<tr>\n";
print "<td> </td>\n";
print '<td><input type="radio" name="' . $prefix . 'content" value="5" id="' . $prefix . 'id5">' . MyGetText(43) . '</input></td>';
print '<td><input type="text" name="' . $prefix . 'results" size=64 id="' . $prefix . 'content5" readonly value="' . $this->classes . '"></td>';
print "</tr>\n";
// Summary
print "<tr>\n";
print "<td> </td>\n";
print '<td><input type="radio" name="' . $prefix . 'content" value="6" id="' . $prefix . 'id6">' . MyGetText(92) . '</input></td>';
print '<td><input type="text" name="' . $prefix . 'summary" size=64 id="' . $prefix . 'content6" readonly value="' . $this->classes . '"></td>';
print "</tr>\n";
// Radio
print "<tr>\n";
print "<td> </td>\n";
print '<td><input type="radio" name="' . $prefix . 'content" value="9" id="' . $prefix . 'id9">' . MyGetText(107) . '</input></td>';
print '<td><input type="text" name="' . $prefix . 'radio" size=64 id="' . $prefix . 'content9" readonly value="' . $this->classes . '"></td>';
$str = NumericIntList($prefix . 'radioctrl', 31, 255, $this->radioctrl);
print "<td>{$str}</td>\n";
print "</tr>\n";
// First line
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'firstline"></input></td>';
$str = NumericIntList($prefix . "firstline", 1, 999, $this->firstline);
print "<td>" . MyGetText(58) . "</td>\n";
print "<td>{$str}</td>\n";
print "</tr>\n";
// Fixed line
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'fixedlines"></input></td>';
$str = NumericIntList($prefix . "fixedlines", 0, 30, $this->fixedlines);
print "<td>" . MyGetText(59) . "</td>\n";
print "<td>{$str}</td>\n";
print "</tr>\n";
// Scrolling lines
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'scrolledlines"></input></td>';
$str = NumericIntList($prefix . "scrolledlines", 0, 30, $this->scrolledlines);
print "<td>" . MyGetText(60) . "</td>\n";
print "<td>{$str}</td>\n";
print "</tr>\n";
// Before scroll wait time
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'scrollbeforetime"></input></td>';
$str = NumericIntList($prefix . "scrollbeforetime", 1, 200, $this->scrollbeforetime);
print "<td>" . MyGetText(62) . "</td>\n";
print "<td>{$str} 1/10°s</td> \n";
print "</tr>\n";
// Scroll speed
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'scrolltime"></input></td>';
$str = NumericIntList($prefix . "scrolltime", 1, 200, $this->scrolltime);
print "<td>" . MyGetText(61) . "</td>\n";
print "<td>{$str} 1/10°s</td> \n";
print "</tr>\n";
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'scrollaftertime"></input></td>';
$str = NumericIntList($prefix . "scrollaftertime", 1, 200, $this->scrollaftertime);
print "<td>" . MyGetText(63) . "</td>\n";
// After scroll wait time
print "<td>{$str} 1/10°s</td> \n";
print "</tr>\n";
print "<tr>\n";
print '<td><input type="checkbox" name="chkall[]" value="' . $prefix . 'updateduration"></input></td>';
$str = NumericIntList($prefix . "updateduration", 1, 200, $this->updateduration);
print "<td>" . MyGetText(64) . "</td>\n";
// recent higlight
print "<td>{$str} min</td> \n";
print "</tr>\n";
print "</table>\n";
print '</div>';
}
while ($r = mysql_fetch_array($res)) {
$arr_radio[] = [$r['radioid'], $r['radiox'], $r['radioy']];
}
}
//---------- picture list creation ----
$picturefilelist = array();
$picturefilelist[" "] = " ";
$tmp_picturefilelist = array_diff(scandir("./pictures"), array('..', '.', 'index.php', 'index.html', 'serverip.txt', 'radiolog.txt'));
foreach ($tmp_picturefilelist as $name) {
$picturefilelist[$name] = $name;
}
print "<h4>" . $srcname . "</h4>\n";
//-- map selection ---------------
print MyGetText(88) . "\n";
// map
InsertFileList($picturefilelist, 'map', $srcmap, 'maplistid', 'MapChange(' . $srcid . ')');
print "<br/>\n";
//-- map and radio controls ----
$srcmap = './pictures/' . htmlspecialchars($srcmap);
if (file_exists(dirname(__FILE__) . '/' . $srcmap)) {
$size = getimagesize($srcmap);
if ($size) {
$sizeX = $size[0];
$sizeY = $size[1];
}
}
if ($sizeY > 0) {
$echelle = 500.0 / $sizeY;
} else {
$echelle = 1.0;
}
