¦ ¦ MCMLXII ¦ ¦ ¦ ¦ ¦ 1962 - 2000 ¦ ================================================================== */ version = "0.01" date = "26/06/2000" var this_year=new Date(); var this_year=this_year.getFullYear(); //-------------------------------------------------- function roman_number(number,flag){ number=number+"" if (number.toUpperCase().substring(0,7)=="VERSION"){ output="
JavaScript code by Mark A. Agius (c) "; versionYear=date.substring(date.lastIndexOf("/")+1) if (versionYear!=this_year){output=output+roman_number(versionYear,"*")+" - "} output=output+roman_number("THISYEAR","*")+"
Version "+version+" ("+date+")";number="#" } if (number.toUpperCase().substring(0,4)=="HELP"){ output="
Help syntax;
" output=output+" roman_number(\"Help\") = displays this help message.
" output=output+" roman_number(\"Version\") = displays version number of code.
" output=output+" roman_number() = displays current year in Roman numerals with 'ad' at the end.
" output=output+" roman_number(\"*\") = displays current year in Roman numerals with 'ad' at the end.
" output=output+" roman_number(\"ThisYear\") = displays current year in Roman numerals with 'ad' at the end.
" output=output+" roman_number(\"ThisYear\",\"*\") = displays current year in Roman numerals only.
" output=output+" roman_number(\"*\",\"*\") = displays current year in Roman numerals only.
" output=output+" roman_number(<number>) = displays <number> in Roman numerals with 'ad' or 'bc' at the end.
" output=output+" roman_number(<number>,\"*\") = displays <number> in Roman numerals only.
" output=output+" var this_year = the current year. (Eg. "+this_year+")
" output=output+"" number="#" } // If number is not set then set number to 'ThisYear' if (isNaN(number)){if (number!="#"){number="ThisYear"}} // If number = "*" then set number to 'ThisYear' if (number=="*"){number="ThisYear"} // - If string 'flag' = '*' then don't display 'bc' or 'ad' - display_ad_bc=true if (flag>""){ if(flag=="*"){display_ad_bc=false} } if (number!="#"){ // - If number is 'Undefined', null, NaN or number="ThisYear" then set number to current year - if (number.toUpperCase()=="THISYEAR"){ // - Get current date (and time) - date_now=new Date() // - Get year from string - // Doesn't work on Netscape // number=date_now.getFullYear() number=date_now.getYear() // - Ugh years from 1900 to 1999 only display the last two digits - // -- Netscape returns '100' and not '0' for the year 2000 with ..getYear(), so next few lines modulate number by 100 first. if (number<=999){number=number%100;} if (number<=80){number=number+2000;} // -- End of added code for Netscape. if (number<100){number=1900+number} } // - Set the 'bc' or 'ad' flag, 'bc' = Before Christ and 'ad' = Anno Domini (After Christ) - if (number>=0){bc_ad="ad"} else {bc_ad="bc"} if (number==0){bc_ad=""} // - If string 'flag' = '*' then don't display 'bc' or 'ad' - if (!display_ad_bc) {bc_ad=""} else {bc_ad=""+bc_ad+""} // - Turn negative numbers into positive numbers - number=Math.abs(number) // - Convert the number into Roman numerals - // - ====================================== - // - Can't handel numbers bigger than 999999 - if (number>999999) return number+bc_ad+" is out of range! {-999999(bc) to +999999(ad) only}" number=number % 1000000 roman="" Num=1000000;A=13 repeat=true while(repeat){ S=number/Num ; S=S-(S%1) if (S==9){roman=roman+get_Roman_Numeral(A,1)+get_Roman_Numeral(A+2,1)} else {if (S>4){roman=roman+get_Roman_Numeral(A+1,1)+get_Roman_Numeral(A,S-5)} else {if (S==4){roman=roman+get_Roman_Numeral(A,1)+get_Roman_Numeral(A+1,1)} else {roman=roman+get_Roman_Numeral(A,S)} } } number=number % Num Num=Num/10 A=A-2 if (roman.length>100){roman=roman.substring(0,100)+"...";A=-1} if (A<0){repeat=false} } if (roman==""){roman="-"} output=roman+bc_ad } return output } //-------------------------------------------------- function get_Roman_Numeral(Num,Len){ R_Numerals="?IVXLCDMvxlcdm¤*#~" Char=R_Numerals.substring(Num,Num+1) Roman_char="" while (Len>0){ Roman_char=Roman_char+Char Len=Len-1 } return Roman_char } //-------------------------------------------------- // -- End of JavaScript hidden code. -->