function Roman() {
	
var Num=document.NumF.Num.value;
var Num2=document.NumF.Num.value;
var Num3=document.NumF.Num.value;
var MvC=0
var MvC2=0
var MvX=0
var MvX2=0
var MvI=0
var MvI2=0
var Mvalue=""
var MV1=1000
var MV2=1000000
var MV3=1000000000
var DV1=500
var MoreMs=0
var MoreMs2=0
var MoreMs3=0
var MoreV=""
var MoreValor=""
var MoreValor3=""
//Start Big Loop!!

if(Num > 3999999999999) {
	document.getElementById("MoreV3").innerHTML=''
	document.getElementById("MoreV0").innerHTML=''
	document.getElementById("MoreV1").innerHTML=''
	document.getElementById("MoreV2").innerHTML='Demasiado grande'
} else {

while(Num3 >= MV3) {
Num3=Num3 - MV3
MoreMs3++
}
if (Num > 3999999999)
Num2 = Num2 - ( MoreMs3 * MV3)

while(Num2 >= MV2) {
Num2=Num2 - MV2
MoreMs2++
}
if (Num > 3999999)
Num = Num - ( MoreMs2 * MV2)  - ( MoreMs3 * MV3)

while(Num >= MV1) {

Num=Num - MV1
MoreMs++
}


if(MoreMs3 >= 4) {
while(MoreMs3 >= 1000) {
MoreMs3=MoreMs3 - 1000
MoreValor3+="M" 
}
if(MoreMs3 >= 900 && MoreMs3 < 1000) {
MoreMs3=MoreMs3 - 900
MoreValor3+="CM"
}
while(MoreMs3 >= 500 && MoreMs3 < 1000) {
MoreMs3=MoreMs3 - 500
MoreValor3+="D"
}
if(MoreMs3 >= 400 && MoreMs3 < 500) {
MoreMs3=MoreMs3 - 400
MoreValor3+="CD"
}
while(MoreMs3 >= 100 && MoreMs3 < 500) {
MoreMs3=MoreMs3 - 100
MoreValor3+="C"
}
if(MoreMs3 >= 90 && MoreMs3 < 100) {
MoreMs3=MoreMs3 - 90
MoreValor3+="XC"
}
if(MoreMs3 >= 40 && MoreMs3 < 50) {
MoreMs3=MoreMs3 - 40
MoreValor3+="XL"
}
while(MoreMs3 >= 50 && MoreMs3 < 100) {
MoreMs3=MoreMs3 - 50
MoreValor3+="L"
}
if(MoreMs3 >= 9 && MoreMs3 < 10) {
MoreMs3=MoreMs3 - 9
MoreValor3+="IX"
}
while(MoreMs3 >= 10 && MoreMs3 < 50) {
MoreMs3=MoreMs3 - 10
MoreValor3+="X"
}
if(MoreMs3 == 9) {
MoreMs3=MoreMs3 - 9
MoreValor3+="IX"
}
while(MoreMs3 >= 5 && MoreMs3 < 10) {
MoreMs3=MoreMs3 - 5
MoreValor3+="V"
}
if(MoreMs3 == 4) {
MoreMs3=MoreMs3 - 4
MoreValor3+="IV"
}
if(MoreMs3 == 3) {
MoreValor3+="I"
MoreMs3--
}
if(MoreMs3 == 2) {
MoreValor3+="I"
MoreMs3--
}
if(MoreMs3 == 1) {
MoreValor3+="I"
MoreMs3--
}
}
// ---------------------------------------

if(MoreMs2 >= 4) {
while(MoreMs2 >= 1000) {
MoreMs2=MoreMs2 - 1000
MoreValor+="M" 
}
if(MoreMs2 >= 900 && MoreMs2 < 1000) {
MoreMs2=MoreMs2 - 900
MoreValor+="CM"
}
while(MoreMs2 >= 500 && MoreMs2 < 1000) {
MoreMs2=MoreMs2 - 500
MoreValor+="D"
}
if(MoreMs2 >= 400 && MoreMs2 < 500) {
MoreMs2=MoreMs2 - 400
MoreValor+="CD"
}
while(MoreMs2 >= 100 && MoreMs2 < 500) {
MoreMs2=MoreMs2 - 100
MoreValor+="C"
}
if(MoreMs2 >= 90 && MoreMs2 < 100) {
MoreMs2=MoreMs2 - 90
MoreValor+="XC"
}
if(MoreMs2 >= 40 && MoreMs2 < 50) {
MoreMs2=MoreMs2 - 40
MoreValor+="XL"
}
while(MoreMs2 >= 50 && MoreMs2 < 100) {
MoreMs2=MoreMs2 - 50
MoreValor+="L"
}
if(MoreMs2 >= 9 && MoreMs2 < 10) {
MoreMs2=MoreMs2 - 9
MoreValor+="IX"
}
while(MoreMs2 >= 10 && MoreMs2 < 50) {
MoreMs2=MoreMs2 - 10
MoreValor+="X"
}
if(MoreMs2 == 9) {
MoreMs2=MoreMs2 - 9
MoreValor+="IX"
}
while(MoreMs2 >= 5 && MoreMs2 < 10) {
MoreMs2=MoreMs2 - 5
MoreValor+="V"
}
if(MoreMs2 == 4) {
MoreMs2=MoreMs2 - 4
MoreValor+="IV"
}
if(MoreMs2 == 3) {
MoreValor+="I"
MoreMs2--
}
if(MoreMs2 == 2) {
MoreValor+="I"
MoreMs2--
}
if(MoreMs2 == 1) {
MoreValor+="I"
MoreMs2--
}
}

//-----------------------------------------------


if(MoreMs >= 4) {

while(MoreMs >= 1000) {
	
MoreMs=MoreMs - 1000
MoreV+="M" 
}

if(MoreMs >= 900 && MoreMs < 1000) {
MoreMs=MoreMs - 900
MoreV+="CM"
}

while(MoreMs >= 500 && MoreMs < 1000) {
MoreMs=MoreMs - 500
MoreV+="D"
}

if(MoreMs >= 400 && MoreMs < 500) {
MoreMs=MoreMs - 400
MoreV+="CD"
}
while(MoreMs >= 100 && MoreMs < 500) {
MoreMs=MoreMs - 100
MoreV+="C"
}
if(MoreMs >= 90 && MoreMs < 100) {
MoreMs=MoreMs - 90
MoreV+="XC"
}
if(MoreMs >= 40 && MoreMs < 50) {
MoreMs=MoreMs - 40
MoreV+="XL"
}
while(MoreMs >= 50 && MoreMs < 100) {
MoreMs=MoreMs - 50
MoreV+="L"
}
if(MoreMs >= 9 && MoreMs < 10) {
MoreMs=MoreMs - 9
MoreV+="IX"
}
while(MoreMs >= 10 && MoreMs < 50) {
MoreMs=MoreMs - 10
MoreV+="X"
}
if(MoreMs == 9) {
MoreMs=MoreMs - 9
MoreV+="IX"
}
while(MoreMs >= 5 && MoreMs < 10) {
MoreMs=MoreMs - 5
MoreV+="V"
}
if(MoreMs == 4) {
MoreMs=MoreMs - 4
MoreV+="IV"
}
if(MoreMs == 3) {
MoreV+="I"
MoreMs--
}
if(MoreMs == 2) {
MoreV+="I"
MoreMs--
}
if(MoreMs == 1) {
MoreV+="I"
MoreMs--
}
}
if(MoreMs == 3) {
Mvalue+="M"
MoreMs--
}
if(MoreMs == 2) {
Mvalue+="M"
MoreMs--
}
if(MoreMs == 1) {
Mvalue+="M"
MoreMs--
}
 
while(Num < MV1 &&  Num >= DV1) {
if(Num >= 900) {
Mvalue+="CM"
Num=Num - 900
}
else if(Num < 900 && Num >= DV1) {
Num=Num - DV1
Mvalue+="D"
}
}
while(Num < 500 && Num >= 100) {
Num=Num - 100
MvC2++
}
 
if(MvC2 == 4) {
Mvalue+="CD"
}
if(MvC2 == 3) {
Mvalue+="C"
MvC2--
}
if(MvC2 == 2) {
Mvalue+="C"
MvC2--
}
if(MvC2 == 1) {
Mvalue+="C"
MvC2--
}
 
 
while(Num < 100 && Num >= 50) {
if(Num >= 90) {
Mvalue+="XC"
Num=Num - 90
}
else if(Num < 90 && Num >= 50) {
Num=Num - 50
Mvalue+="L"
}
}
while(Num < 50 && Num >= 10) {
Num=Num - 10
MvX2++
}
if(MvX2 == 4) {
Mvalue+="XL"
}
if(MvX2 == 3) {
Mvalue+="X"
MvX2--
}
if(MvX2 == 2) {
Mvalue+="X"
MvX2--
}
if(MvX2 == 1) {
Mvalue+="X"
MvX2--
}
if(Num == 9) {
Mvalue+="IX"
Num=Num - 9
}
while(Num < 10 && Num >= 5) {
if(Num <= 8 && Num >= 5) {
Num=Num - 5
Mvalue+="V"
}
}
while(Num < 5 && Num >= 1) {
Num=Num - 1
MvI2++
if(MvI2 == 4) {
Mvalue+="IV"
}
}
if(MvI2 == 3) {
Mvalue+="I"
MvI2--
}
if(MvI2 == 2) {
Mvalue+="I"
MvI2--
}
if(MvI2 == 1) {
MvI2--
Mvalue+="I"
}
 
//End Big Loop!
//Begin Smaller Loops!
while(Num >= 500 && Num < 1000 || Num == 500) {
 
if(Num >= 900) {
Mvalue+="CM"
Num=Num - 900
}
else if(Num < 900 && Num >= DV1) {
Num=Num - DV1
Mvalue+="D"
}}
while(Num >= 100 && Num < 500 || Num == 100) {
Num=Num - 100
MvC++
}
if(MvC == 4) {
Mvalue+="CD"
}
if(MvC == 3) {
Mvalue+="C"
MvC--
}
if(MvC == 2) {
Mvalue+="C"
MvC--
}
if(MvC == 1) {
Mvalue+="C"
MvC--
}
 
while(Num >= 50 && Num < 100 || Num == 50) {
if(Num >= 90) {
Mvalue+="XC"
Num=Num - 90
}
else if(Num < 90 && Num >= 50) {
Num=Num - 50
Mvalue+="L"
}
}
while(Num >= 10 && Num < 50 || Num == 10) {
Num=Num - 10
MvX++
 
}
if(MvX ==4) {
Mvalue+="XL"
}
if(MvX == 3) {
Mvalue+="X"
MvX--
}
if(MvX == 2) {
Mvalue+="X"
MvX--
}
if(MvX == 1) {
Mvalue+="X"
MvX--
}
if(Num == 9) {
Mvalue+="IX"
Num=Num - 9
}
while(Num >= 5 && Num < 10 || Num == 5) {
if(Num <= 8 && Num >= 5) {
Num=Num - 5
Mvalue+="V"
}
}
while(Num >= 1 && Num < 5 || Num == 1) {
Num=Num - 1
MvI++
if(MvI == 4) {
Mvalue+="IV"
}
}
if(MvI == 3) {
Mvalue+="I"
MvI--
}
if(MvI == 2) {
Mvalue+="I"
MvI--
}
if(MvI == 1) {
MvI--
Mvalue+="I"
}

document.getElementById("MoreV3").innerHTML=MoreValor3
document.getElementById("MoreV0").innerHTML=MoreValor
document.getElementById("MoreV1").innerHTML=MoreV
document.getElementById("MoreV2").innerHTML=Mvalue
}
}