web/lingvigilo-montri.php
author viric@llimona
Thu, 18 May 2006 22:59:47 +0200
changeset 0 6371497b4e53
permissions -rw-r--r--
Init from svn. The wxpython is the final one.
viric@0
     1
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
viric@0
     2
<html>
viric@0
     3
<head>
viric@0
     4
	<title>Lingvigilo - Frazomontrilo</title>
viric@0
     5
	<meta http-equiv="Content-Type" content="text/html;charset=utf-8">
viric@0
     6
	<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
viric@0
     7
	<META HTTP-EQUIV="Expires" CONTENT="-1">
viric@0
     8
</head>
viric@0
     9
viric@0
    10
<body>
viric@0
    11
viric@0
    12
<?php
viric@0
    13
include('./getdb.inc');
viric@0
    14
viric@0
    15
?>
viric@0
    16
viric@0
    17
<h1>Montrilo por programo <em>lingvigilo</em></h1>
viric@0
    18
viric@0
    19
<?php
viric@0
    20
if (isset($_POST["nova_korekteco"]))
viric@0
    21
	$korekteco=$_POST["korekteco"];
viric@0
    22
else
viric@0
    23
	// Default
viric@0
    24
	$korekteco=-2
viric@0
    25
?>
viric@0
    26
viric@0
    27
<h2>Agordo</h2>
viric@0
    28
viric@0
    29
<form action="lingvigilo-montri" method="post">
viric@0
    30
<p>Montru frazojn
viric@0
    31
<select name="korekteco">
viric@0
    32
<option value=0 <?php if ($korekteco==0) echo "selected" ?>>Nekorektitajn
viric@0
    33
<option value=1 <?php if ($korekteco==1) echo "selected" ?>>Ĝustajn
viric@0
    34
<option value=2 <?php if ($korekteco==2) echo "selected" ?>>Malĝustajn
viric@0
    35
<option value=3 <?php if ($korekteco==3) echo "selected" ?>>Nekutimajn
viric@0
    36
<option value="-2" <?php if ($korekteco==-2) echo "selected" ?>>Malĝustajn kaj
viric@0
    37
nekutimajn
viric@0
    38
<option value="-1" <?php if ($korekteco==-1) echo "selected" ?>>Ĉiajn
viric@0
    39
</select>
viric@0
    40
viric@0
    41
<input type=submit value="Ŝanĝi" name=nova_korekteco>
viric@0
    42
</p>
viric@0
    43
</form>
viric@0
    44
viric@0
    45
<h2>Frazoj</h2>
viric@0
    46
viric@0
    47
<?php
viric@0
    48
viric@0
    49
if($korekteco >= 0)
viric@0
    50
	$korektecoj = array($korekteco);
viric@0
    51
elseif ($korekteco == -1)
viric@0
    52
	$korektecoj = array(0,1,2,3);
viric@0
    53
elseif ($korekteco == -2)
viric@0
    54
	$korektecoj = array(2,3);
viric@0
    55
viric@0
    56
?>
viric@0
    57
<TABLE BORDER=1>
viric@0
    58
<TR>
viric@0
    59
        <TH>ID
viric@0
    60
        <TH>Vorto
viric@0
    61
        <TH>Frazo
viric@0
    62
	<TH>Korektist(in)o
viric@0
    63
        <TH>Korekto
viric@0
    64
        <TH>Ekspliko
viric@0
    65
viric@0
    66
<?
viric@0
    67
viric@0
    68
$konekto=konekti();
viric@0
    69
viric@0
    70
foreach($korektecoj as $k)
viric@0
    71
{
viric@0
    72
	$frazoj = preni_frazojn($konekto,$k);
viric@0
    73
	if ($frazoj != 0)
viric@0
    74
		foreach($frazoj as $key => $f)
viric@0
    75
		{
viric@0
    76
			echo "<tr>\n";
viric@0
    77
			echo "\t<td>". $key . "\n";
viric@0
    78
			echo "\t<td>". $f["vorto"] . "\n";
viric@0
    79
			echo "\t<td>". $f["frazo"] . "\n";
viric@0
    80
			echo "\t<td>" . $f["korektisto"] . "\n";
viric@0
    81
			echo "\t<td>" . teksto_korekto($f["korekta"]) . "\n";
viric@0
    82
			echo "\t<td>" . $f["klarigo"] . "\n";
viric@0
    83
		}
viric@0
    84
}
viric@0
    85
viric@0
    86
?>
viric@0
    87
</table>
viric@0
    88
viric@0
    89
<p>Iru al <a href="index">ĉefa paĝo</a>.</p>
viric@0
    90
viric@0
    91
</body>