<html>
<meta http-equiv="Content-Type"
content="text/html; charset=iso-8859-7">
<title>Μετατροπέας αραβικών αριθμών σε Αρχαίους Ελληνικούς. |/| Arabic to Ancient Greek number converter.</title>
<meta name="Author"
content="Νίκος Α. Πανουσόπουλος ΠΕ19 / ΥΠ.Ε.Π.Θ.">




<script>
<!-- 

function ant(numb2)
{

switch(numb2) {
case 1:
ar="αʹ"
break
case 2:
ar="βʹ"
break
case 3:
ar="γʹ"
break
case 4:
ar="δʹ"
break
case 5:
ar="εʹ"
break
case 6:
ar="ϛʹ"
break
case 7:
ar="ζʹ"
break
case 8:
ar="ηʹ"
break
case 9:
ar="θʹ"
break
case 10:
ar="ιʹ"
break
case 20:
ar="κʹ"
break
case 30:
ar="λʹ"
break
case 40:
ar="μʹ"
break
case 50:
ar="νʹ"
break
case 60:
ar="ξʹ"
break
case 70:
ar="οʹ"
break
case 80:
ar="πʹ"
break
case 90:
ar="ϟʹ"
break
case 100:
ar="ρʹ"
break
case 200:
ar="σʹ"
break
case 300:
ar="τʹ"
break
case 400:
ar="υʹ"
break
case 500:
ar="φʹ"
break
case 600:
ar="χʹ"
break
case 700:
ar="ψʹ"
break
case 800:
ar="ωʹ"
break
case 900:
ar="ϡʹ"
break
case 1000:
ar="͵α"
break
case 2000:
ar="͵β"
break
case 3000:
ar="͵γ"
break
case 4000:
ar="͵δ"
break
case 5000:
ar="͵ε"
break
case 6000:
ar="͵ϛ"
break
case 7000:
ar="͵ζ"
break
case 8000:
ar="͵η"
break
case 9000:
ar="͵θ"
break
case 10000:
ar="͵ι"
break
case 20000:
ar="͵κ"
break
case 30000:
ar="͵λ"
break
case 40000:
ar="͵μ"
break
case 50000:
ar="͵ν"
break
case 60000:
ar="͵ξ"
break
case 70000:
ar="͵ο"
break
case 80000:
ar="͵π"
break
case 90000:
ar="͵ϟ"
break
case 100000:
ar="͵ρ"
break
case 200000:
ar="͵σ"
break
case 300000:
ar="͵τ"
break
case 400000:
ar="͵υ"
break
case 500000:
ar="͵φ"
break
case 600000:
ar="͵χ"
break
case 700000:
ar="͵ψ"
break
case 800000:
ar="͵ω"
break
case 900000:
ar="͵ϡ"
break
default:
ar=""
break
}
return(ar)



}


function calc(numb) // υπολογισμοί 

{
str5=""
str3=" "
ar3=""

str6=" "
str7=" "

str=""+numb
len=str.length

i=0
error=0
while ((i<=len-1)&&(error!=1)) {
str5=str.substring(i,i+1)
i=i+1
error=0
if ((str5!="0")&&(str5!="1")&&(str5!="2")&&(str5!="3")&&(str5!="4")&&(str5!="5")&&(str5!="6")&&(str5!="7")&&(str5!="8")&&(str5!="9")) {
error=1
}

}

if (len>6) {
error=1
}

if (error==0) {

l=0
while (l<len) {
str2=str.substring(l,l+1)

for (i=1;i<=len-l-1;i++) {
str2=str2+"0"
}

ar3=ant(eval(str2))


l=l+1


str3=str3+" "+ar3

}

chs=""

strl=str3.length
oi=0
while (oi<=strl) {
chs=str3.substring(oi-1,oi) 
if (chs=="ϛ") {
str6=str6+"στ"
str7=str7+"ϝ"
}
if (chs!="ϛ") {
str6=str6+chs
str7=str7+chs
}
oi=oi+1
}


document.form1.apot.value=str3
if ((str6==str7)&&(str6!=" ")&&(str3!="  ")) {
document.form1.apot2.value="...δεν υπάρχει."
document.form1.apot3.value="...does not exist."
}
if (str3=="  ") {
document.form1.apot2.value="...δεν υπάρχει."
document.form1.apot3.value="...does not exist."
}
if (str6!=str7) {
document.form1.apot2.value=str6
document.form1.apot3.value=str7
}

} // if 

if (error==1) {

document.form1.apot.value=" < λάθος | error > "

}

}


// --></script>

<script>
<!-- 


function subst(n)
{
switch (n) {

case 0:
k=0
break
case 1:
k=1
break
case 2:
k=2
break
case 3:
k=3
break
case 4:
k=4
break
case 5:
k=5
break
case 6:
k=6
break
case 7:
k=7
break
case 8:
k=8
break
case 9:
k=9
break
case 10:
z=document.form1.numb.value
e=z.length
if (e==0) {
k=""
}
if (e==1) {
document.form1.numb.value=""
k=""
}
if (e>=2) {
document.form1.numb.value=""
k=z.substring(0,e-1)

}
break
}

document.form1.numb.value=document.form1.numb.value + k








}
// --></script>


<body>
<center>
<h1><font color="brown" size=+2>Μετατροπέας αραβικών αριθμών σε αρχαιοΕλληνικούς.</h1>
<h2><font color="brown" size=+1>Arabic to Ancient Greek number converter (AGC).</h2>

</center>
<table>
<td width=80%>
<form name="form1">

<table>
<td>



<table border=2>
<td>
<font color="blue" size=+2>Αραβικός αριθμός / Arabic number:</br>
<input type="text" name="numb" value="" style=" font:bold; color:olive; font-size:40;" size=4 maxlength=6>
<i><b><font color="red" size=+2>(1-999999)</font></b></i></td>
</table>

<table>
<td width=100% align="center">
<table border=2 bgcolor="brown">
<td>
<center>
<input type="button" value=" 1 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(1)">
<input type="button" value=" 2 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(2)">
<input type="button" value=" 3 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(3)"></br>
<input type="button" value=" 4 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(4)">
<input type="button" value=" 5 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(5)">
<input type="button" value=" 6 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(6)"></br>
<input type="button" value=" 7 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(7)">
<input type="button" value=" 8 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(8)">
<input type="button" value=" 9 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(9)"></br>
<input type="button" value=" AC" style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="reset()">
<input type="button" value=" 0 " style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(0)">
<input type="button" value=" C-" style=" font:bold; color:olive; font-size:20; text-align:center; " onclick="subst(10)">

</center>

</table>


<input type="button" value="Μετατροπή |/| Convertion" style=" font:bold; color:olive; font-size:20;" onclick="calc(form1.numb.value)"></td>


</td>


</table>
<hr color="olive">
<table border=3>
<td>
<font color="blue" size=+2>Αρχαιοελληνικός αριθμός / Ancient Greek number:</br>
<input type="text" name="apot" style=" font:bold; color:olive; font-size:40; " size=14 maxlength=14></br>
<font color="brown" size=+1><b>Εναλλακτικές φόρμες / Altenative forms:</b></br>
<center><input type="text" name="apot2" style=" font:bold; color:gray; font-size:20; background-color:peachpuff; text-align:center;" size=18 maxlength=18>
<input type="text" name="apot3" style=" font:bold; color:gray; font-size:20; background-color:peachpuff; text-align:center;" size=18 maxlength=18></center>
</td>
</table>
<font color="gray">Η γραμματοσειρά είναι Unicode. / Fonts are Unicode.</font>
</form>
</td>
<td width=20% bgcolor="white">
<center>

</center>
</td>
</font>
</table>

</body>
</html>