전통문화대전망 - 오늘의 황력 - 웹 사이트 홈페이지에 만년력을 추가하고 싶습니다. 누가 나를 도와 코드를 바꿀 수 있습니까?

웹 사이트 홈페이지에 만년력을 추가하고 싶습니다. 누가 나를 도와 코드를 바꿀 수 있습니까?

//alert (yangy+"+yangm);

//CLD. Sy.selectedindex = yangy//-1900;

//pushtm ('Yu');

//pushtm ('yd'');

CLD. SM.selectedIndex = yangm

푸시 TM ("MD");

Pushtm ("mu");

}

//changeLong end

함수 change CLD(){

Var y, m;

Y=CLD 입니다. Sy.selectedindex+1900;

M=CLD 입니다. SM.selectedIndex

드류 CLD (y, m);

}

함수 push TM(K ){

스위치 (K ){

사례 "위치":

만약 (CLD. SY.selectedIndex & gtCLD 입니다. Sy.selectedindex-;

깨뜨리다

사례' YD':

만약 (CLD. Sy.selectedindex & lt CLD149). Sy.selectedindex++;

깨뜨리다

사례 "MU":

만약 (CLD. SM.selectedIndex & gt0) {

CLD. Sm.selectedindex-;

}

그렇지 않으면 {

CLD. Sm.selectedindex =11;

만약 (CLD. SY.selectedIndex & gtCLD 입니다. Sy.selectedindex-;

}

깨뜨리다

사례' MD':

만약 (CLD. Sm.selectedindex & lt11) {

CLD. Sm.selectedindex++;

}

그렇지 않으면 {

CLD. Sm.selectedindex = 0;

만약 (CLD. Sy.selectedindex & lt CLD149). Sy.selectedindex++;

}

깨뜨리다

기본값:

CLD. Sy.selectedindex = ty-1900;

CLD. SM.selectedIndex = tM

}

Changecld ();

}

Var today = new date ();

Var ty = today.get full year ();

Vartm = today.getmonth ();

Var TD = today.getdate ();

//////////////////////////////////

Var width = "130";

Varoffsetx = 2;

Var offsety =16;

Var x = 0;;

Var y = 0;;

Varsnow = 0;

Var SW = 0;;

Var CNT = 0;;

Var d 스타일

Document.onmousemove = mEvn

//자세한 날짜 정보 표시

함수 mOvr(v ){

Var s, 축제;

Varsobj = eval ('SD''+v);

Var d = sobj.innerhtml-1;

//년, 월, 일, 주,

//년, 월, 일, 월,

//cYear, cMonth, cDay

If(sobj. innerhtml! ='''') {

Sobj.style.cursor = "s-크기 조정";

If (CLD [d]. Solar terms = = """""& & ampcld [d] solarfestival = = """""& & ampcld [d] lunarfestival = =''''')

Festival = \ "\" \ "\";

기타

Festival =““& lt;; 테이블 너비 = 100% BORDER=0 셀 채우기 =4 셀 간격 = 0bgcolor = "# 33333" > & lttr & gt & lttdalign = "right">. '+

' < Font style = "color: # ffffff; Font-size: 9pt ">. +CLD [d]. Solarterms+""""+CLD [d]. Solarfestival+""""+CLD [d]. Lunar festival+““& lt;; /font > & lt/TD & gt;; '+

' < /tr > & lt/TABLE & gt;; ';

S =''' < Table width = "140" border = 0 cellpadding = "0" cellspacing = 0 bgcolor = "# 000099" " & ltTR & gt& ltTD & gt''+

' < 테이블 너비 = 100% BORDER=0 셀 채우기 =4 셀 간격 = 0> & lttr & gt & lttd align = "right" nowrap &; & lt font style = "color: # ffffff; Font-size: 9pt ">. '+

Cld [d] syear+"year"+CLD [d]. S month+'월'+CLD [d]. Sday+'day 주'+CLD [d]. 주+'''br > +

' < Font color =“fuchsia“& gt. 음력 "+"(CLD [d]. Islap? Leap \ "\" \ "\")+CLD [d]. Lmonth+'월''+CLD [d]. Lday+''일 & ltbr & gt''+

' < Font color =“yellow“& gt. +CLD [d]. Cyyyear+"year"+CLD [d]. CMonth+ "월"+CLD [d]. C day+'day'/font > +

' < /font > & lt/TD & gt;; & lt/TR & gt;; & lt/TABLE & gt;; +festival+''< /TD > & lt/TR & gt;; & lt/TABLE & gt;; ';

Document.all ["detail"]. InnerHTML = s;;

If(snow = = 0 ){

Dstyle.left = x+offsetx-(폭/2);

Dstyle.top = y+offsety;

Dstyle.visibility = "visible";

Snow =1;

}

}

}

//상세 날짜 데이터 삭제

함수 mOut(){

If(CNT & gt;; = 1){ SW = 0}

If(SW = = 0)

{snow = 0;;

Dstyle.visibility = "hidden"; }

Else cn t++;

}

//위치 가져오기

함수 mEvn(){

X = event.x

Y = event.y

If(document. body. scroll left)

{x = event.x+document.body.scrollleft; Y = event.y+document.body.scrolltop; }

만약 (눈)

DStyle.left = x+offsetx- (폭 /2)

D style. top = y+offset

}

}

//////////////////////////////////

Tick(){

오늘의 위험 가치

오늘 = 새 날짜 ()

시계. Innerhtml = 오늘. Tolocalstring () 을 사용합니다. 바꾸기 (/(년 | 월) /g, "/"). 대체 (/day/, "");

//clock.innerhtml = timeadd (today.togmtstring (), CLD. (TZ.value)

Window.settimeout ("tick ()",1000);

}

SetCookie 함수 (이름, 값) {

Var today = 새 날짜 ()

Var 만료 = 새 날짜 ()

Expires.settime (today.gettime ()+1000 * 60 * 60 * 24 * 365)

Document.cookie = name+"="+escape (value)+"; Expires = "+expires.togmtstring ()

}

함수 get cookie(Name ){

Var search = name+"="

If (document.cookie.length > 0) {

Offset = document.cookie.indexof (검색)

If(offset! =-1) {

오프셋 += search.length

End = document.cookie.indexof ("; 간격띄우기)

If (end = =-1) end = document.cookie.length

Unescape (document.cookie.substring (offset, end)) 를 반환합니다

}

그렇지 않으면'' 을 (를) 반환합니다

}

}

//////////////////////////////////

함수 initial(){

DStyle = detail.style

CLD. Sy.selectedindex = ty-1900;

CLD. SM.selectedIndex = tM

드류 CLD (ty, TM);

// CLD. Tz.selectedindex = getcookie ("tz");

//changetz ();

틱 ();

}

//-->

& lt/스크립트 >

& ltSTYLE & gt. TodyaColor {

배경 색상: #99ff00

}

& lt/STYLE & gt;;

& lt 메타 컨텐트 = "mshtml 6.00.2800.1106" name = generator & gt. & lt/HEAD & gt;;

& lt body on context menu = self.event.return value = false background = "/root/mnt/52005325/kloc-

Leftmargin = 0 topmargin = 0 onload = initial () >

& lt 테이블 높이 = "100%" 셀 간격 =0 셀 채우기 =0 폭 = "100%" 정렬 = 가운데

Border = 0>

& lt 화면 이름 = CLD>;;

& ltTBODY & gt

& ltTR & gt

& lttd valign = middlealign = center & gt.

& lt 스크립팅 언어 = 자바스크립트 & gt

& lt/스크립트 >

& ltDIV id = 상세 정보

스타일 = "왼쪽: 330px; 폭:140px; 위치: 절대; 맨 위:199px; 높이:16px''; & lt/DIV & gt;;

& lt 테이블 셀 간격 = 1 셀 채우기 =1align = centerbgcolor = # 000000

Border = 0>& ltTBODY & gt

& lttrbgcolor = # fffff & gt.

& ltTD vAlign=top width=220>.

& lt 테이블 높이 = "100%" 셀 간격 =0 셀 채우기 =4 폭 = "100%"

Align = center border = 0>

& ltTBODY & gt

& ltTR height = 28>

& lttdalign = centerbgcolor = # 333333 & gt. & lt 글꼴

Color = white & gt 달력 조회

& ltTR height = *>

& ltTD align=center>. & ltFONT id=tSave

스타일 = "font-size:18pt; 색상: 빨간색; FONT-FAMILY: Wingdings \ "\". & lt/FONT & gt;; 양력:

& lt selectclass = input1onchange = changecld () name = sy >

& lt 스크립팅 언어 = 자바스크립트 & gt

& lt! --

For (I =1900; 나 & lt2050; I++) document.write ('< 옵션>'+I)

//-->

& lt/스크립트 >

& lt/SELECT & gt;; 연도 선택 클래스 = input1onchange = changecld () name = sm >

& lt 스크립팅 언어 = 자바스크립트 & gt

& lt! --

For (I =1; 나< 13; I++) document.write ('< 옵션>'+I)

//-->

& lt/스크립트 >

& lt/SELECT & gt;; 월 "BR>& ltBR & gt 음력:

Onchange = changelong () name = d1>

& lt 스크립팅 언어 = 자바스크립트 & gt

& lt! --

For (I =1900; 나 & lt2050; I++) document.write ('< 옵션>'+I)

//-->

& lt/스크립트 >

& lt/SELECT & gt;; 연도 "select class = input1onchange = changelong () name = D2 >

& lt 스크립팅 언어 = 자바스크립트 & gt

& lt! --

For (I =1; 나< 13; I++) document.write ('< 옵션>'+I)

//-->

& lt/스크립트 >

& lt/SELECT & gt;; 월 "br> & ltbr & gt & ltbr & gt</TD > & lt/TR & gt;;

& ltTR height = 28>

& lttdalign = centerwidth = 240bgcolor = # dddddd

Height = 28> 현재 시간:

Id = Clock & gt& lt/FONT & gt;; & lt! -시간대 * 는 일광 절약 시간제로 자동 조정됨을 의미합니다->

& lt/TD & gt;;

& lttr height = 28>

& lttd & gt< divalign = "center" > & ltimgsrc = "/root/mnt/3615244 _ 7441491.gif" " & lt/div & gt;;

& lt/TD & gt;;

& lt/tr & gt;; & lt/TBODY & gt;; & lt/TABLE & gt;; & lt/TD & gt;;

& lttd align = center width = 420 height = 255 rowspan = 3>.

& lt 테이블 높이 =28 셀 간격 =4 셀 채우기 = 0 폭 = "100%"

Bgcolor = # 33333 border = 0>.

& ltdiv align =“center“& gt; > & ltimgsrc = "/root/mnt/0002.gif" > & lt/div & gt;;

& ltTBODY & gt

& ltTR & gt

& ltTD width=5> 입니다. & ltFONT title= 작년

스타일 = "cursor: hand; Color: # ffffff "onclick =" pushtm ('Yu'') "

페이스 = webdings & gt. & lt/FONT & gt;; & lt/TD & gt;;

& ltTD width=5> 입니다. & ltFONT title= 지난 달

스타일 = "cursor: hand; Color: # ffffff "onclick =" pushtm ('mu'') "

페이스 = webdings & gt. & lt/FONT & gt;; & lt/TD & gt;;

& lttd & gt & ltfontid = ymbgcolor = # ffffff & gt. & lt/FONT & gt;; & lt/TD & gt;;

& ltTD align=right>. & ltgzcolor = # fffff & gt. & lt/FONT & gt;; & lt/TD & gt;;

& ltTD align=right width=5>. & ltFONT title= 다음 달

스타일 = "cursor: hand; Color: # ffffff "onclick =" pushtm ('MD'') "

페이스 = webdings & gt. & lt/FONT & gt;; & lt/TD & gt;;

& ltTD align=right width=5>. & ltFONT title= 내년

스타일 = "cursor: hand; Color: # ffffff "onclick =" pushtm ('yd'') "

페이스 = webdings & gt. & lt/FONT & gt;; & lt/TD & gt;; & lt/TR & gt;; & lt/TBODY & gt;; & lt/TABLE & gt;;

& lt 테이블 셀 간격 = 1 셀 채우기 = 0 폭 = "100%" bgcolor = # fffff

Border = 0>

& ltTBODY & gt

& lttralign = centerbgcolor = # dddddd & gt.

& ltTD width=60 height=24>. 일'/TD >

& ltTD width=60> 입니다. 1"/TD >

& ltTD width=60> 입니다. 두 번째'/TD >

& ltTD width=60> 입니다. 셋;삼;3

& ltTD width=60> 입니다. 사

& ltTD width=60> 입니다. 다섯;오;5

& ltTD width=60> 입니다. 여섯;육

& lt 스크립팅 언어 = 자바스크립트 & gt

& lt! --

GNum 변종

For(I = 0;; 나<6; I++) {

Document.write ('< Tr align=center> 입니다. ') 을 참조하십시오

For(j = 0;; J<7; J++) {

GNum = i*7+j

Document.write ('< Td id = "GD"+gnum+"onmouseover =" movr ("+gnum+"")" onmouseout = "mout ()" " & lt font id = "SD"+gnum+""size = 2face = "arial black" """

If (j = = 0) document.write ('color = red'')

(j == 6) 인 경우

If (I% 2 = =1) document.write ("color = red")

Elsedocument.write ('color = green')

Document.write ('title = "> & lt/font & gt;; & ltbr & gt & ltfontid = "LD"+gnum+""style = "font-size: 9pt">. & lt/font & gt;; & lt/TD & gt;; ') 을 참조하십시오

}

Document.write ('< /tr > ') 을 참조하십시오

}

//-->

& lt/스크립트 >

& ltTR & gt

& ltTD & gt& lt/TD & gt;; & lt/TR & gt;; & lt/TBODY & gt;; & lt/TABLE & gt;; & lt/TD & gt;; & lt/TR & gt;; & lt/TBODY & gt;; & lt/TABLE & gt;;

& lt/TD & gt;; & lt/TR & gt;; & lt/FORM & gt;; & lt/TBODY & gt;; & lt/TABLE & gt;; & lt,; /body > & lt/HTML