阴阳历算法.mht

精华BBS贴子

border=3D0>
              <TBODY>
              <TR class=3Dheader>
                <TD width=3D152>=D7=F7=D5=DF:</TD>
                <TD>
                  <TABLE class=3Dsmalltxt=20
                  style=3D"TABLE-LAYOUT: fixed; WORD-WRAP: break-word"=20
                  cellSpacing=3D0 cellPadding=3D0 width=3D"100%" =
border=3D0>
                    <TBODY>
                    <TR style=3D"COLOR: #ffffff">
                      <TD class=3Dbold>=B1=EA=CC=E2: =
=D2=F5=D1=F4=C0=FA=CB=E3=B7=A8</TD>
                      <TD noWrap align=3Dright width=3D150><A=20
                        style=3D"FONT-WEIGHT: normal; COLOR: #ffffff"=20
                        =
href=3D"http://25.20.176.12/bbs/redirect.php?fid=3D144&amp;tid=3D25549&am=
p;goto=3Dnextoldset">=C9=CF=D2=BB=D6=F7=CC=E2</A>=20
                        | <A style=3D"FONT-WEIGHT: normal; COLOR: =
#ffffff"=20
                        =
href=3D"http://25.20.176.12/bbs/redirect.php?fid=3D144&amp;tid=3D25549&am=
p;goto=3Dnextnewset">=CF=C2=D2=BB=D6=F7=CC=E2</A></TD></TR></TBODY></TABL=
E></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE><A=20
      name=3Dpid213496>
      <TABLE cellSpacing=3D0 cellPadding=3D0 width=3D"100%" =
align=3Dcenter border=3D0>
        <TBODY>
        <TR>
          <TD bgColor=3Ddarkblue>
            <TABLE style=3D"TABLE-LAYOUT: fixed; WORD-WRAP: break-word"=20
            cellSpacing=3D1 cellPadding=3D4 width=3D"100%" border=3D0>
              <TBODY>
              <TR bgColor=3D#e8f2ff>
                <TD vAlign=3Dtop width=3D160>
                  <FIELDSET><LEGEND><A=20
                  =
href=3D"http://25.20.176.12/bbs/viewthread.php?tid=3D25549#endpid213496">=
<IMG=20
                  alt=3D=D7=AA=B5=BD=B5=DA1=CC=F9=C4=A9=CE=B2=20
                  =
src=3D"http://25.20.176.12/bbs/images/default/threadnext.gif"=20
                  border=3D0></A> <FONT title=3DPID=3D213496 =
color=3Dred>=C2=A5=D6=F7</FONT>=20
                  </LEGEND>
                  <TABLE style=3D"TABLE-LAYOUT: fixed" cellSpacing=3D0 =
cellPadding=3D0=20
                  width=3D"100%" border=3D0>
                    <TBODY>
                    <TR>
                      <TD>
                        <CENTER>
                        <H3>jyarmy</H3></CENTER><BR></TD></TR>
                    <TR bgColor=3D#e8f2cf>
                      <TD align=3Dmiddle><IMG=20
                        =
src=3D"http://25.20.176.12/bbs/customavatars/356.gif"=20
                        border=3D0></TD></TR>
                    <TR>
                      <TD align=3Dmiddle><IMG=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/star.gif"><IMG=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/star.gif"></TD></TR></TBODY=
></TABLE></FIELDSET>=20

                  <TABLE cellSpacing=3D0 cellPadding=3D3 width=3D"100%" =
border=3D0>
                    <TBODY>
                    <TR>
                      <TD class=3Drow><IMG height=3D11=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/ball.gif"=20
                        width=3D10> =CD=B7=CF=CE: <FONT =
color=3Dred>=BD=F0=A1=B0=D6=A5=A1=B1=D3=F1=A1=B0=D2=B6=A1=B1</FONT></TD><=
/TR>
                    <TR>
                      <TD class=3Drow><IMG height=3D11=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/ball.gif"=20
                        width=3D10> =D0=D4=B1=F0: <FONT =
color=3Dred>=C4=D0<IMG title=3D=D0=D4=B1=F0=A3=BA=C4=D0=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/male.gif">=20
                        </FONT><!--(=B7=A2=CC=F9:<font =
color=3D"red">2893</font>=C6=AA)--></TD></TR>
                    <TR>
                      <TD class=3Drow title=3D"=BB=FD=B7=D6:408 =
=B7=D6<br>=B7=A2=CC=F9:2893 =C6=AA"><IMG=20
                        height=3D11=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/ball.gif"=20
                        width=3D10> =BB=FD=B7=D6: <FONT =
color=3Dred>408</FONT>=B7=D6<!--(=B7=A2=CC=F9:<font =
color=3D"red">2893</font>=C6=AA)--></TD></TR>
                    <TR>
                      <TD class=3Drow =
title=3D"=BE=AB=BB=AA=D6=B8=CA=FD:16 =B7=D6<br>=B7=A2=CC=F9:2893 =
=C6=AA"><IMG=20
                        height=3D11=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/ball.gif"=20
                        width=3D10> =B7=A2=CC=F9: <FONT =
color=3Dred>2893</FONT>=C6=AA</TD></TR>
                    <TR>
                      <TD class=3Drow=20
                      =
title=3D"=B2=C6=B8=BB:4466+2870<br>=CF=D6=BD=F0:4466<br>=B4=E6=BF=EE:2870=
<br>=D3=F1=C2=A5=D2=F8=BA=A3"><IMG=20
                        height=3D11=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/ball.gif"=20
                        width=3D10> =B2=C6=B8=BB: <FONT =
color=3Dred>7336</FONT> =BD=F0=B1=D2</TD></TR>
                    <TR>
                      <TD class=3Drow=20
                      title=3D"=B1=E0=BA=C5: =
<b>356</b></br>=C0=B4=D7=D4:=BD=AD=C4=CF=D1=CE=B0=EF<br>=D7=A2=B2=E1: =
2003-7-28"><IMG=20
                        height=3D11=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/ball.gif"=20
                        width=3D10> =B1=E0=BA=C5: =A1=ED356<IMG =
title=3D"=D7=B4=CC=AC =C0=EB=CF=DF"=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/offline_user.gif"=20
                        align=3DabsMiddle> =
</TD></TR></TBODY></TABLE></TD>
                <TD height=3D"100%">
                  <TABLE style=3D"TABLE-LAYOUT: fixed; WORD-WRAP: =
break-word"=20
                  height=3D"100%" cellSpacing=3D0 cellPadding=3D0 =
width=3D"100%"=20
                  border=3D0>
                    <TBODY>
                    <TR>
                      <TD vAlign=3Dtop><IMG =
title=3D=D7=DC=BC=C6=C6=C0=B7=D6=A3=BA20=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/agree.gif"=20
                        align=3Dright><IMG =
title=3D=D7=DC=BC=C6=C6=C0=B7=D6=A3=BA20=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/agree.gif"=20
                        align=3Dright><IMG =
title=3D=D7=DC=BC=C6=C6=C0=B7=D6=A3=BA20=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/agree.gif"=20
                        align=3Dright><IMG =
title=3D=D7=DC=BC=C6=C6=C0=B7=D6=A3=BA20=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/agree.gif"=20
                        align=3Dright><IMG =
title=3D=D7=DC=BC=C6=C6=C0=B7=D6=A3=BA20=20
                        =
src=3D"http://25.20.176.12/bbs/images/default/agree.gif"=20
                        align=3Dright><SPAN class=3Dbold><SPAN=20
                        =
class=3Dsmalltxt>=D2=F5=D1=F4=C0=FA=CB=E3=B7=A8<BR><BR></SPAN></SPAN><BR>=
<FONT=20
                        =
color=3Dblue>=D5=E2=B8=F6=B3=CC=D0=F2=D6=B1=BD=D3=C4=C3=C8=A5=B5=F7=CA=D4=
=BF=CF=B6=A8=B2=BB=D0=D0=A3=AC=B5=AB=CA=C7=A3=AC=C6=E4=D6=D0=B5=C4=CB=BC=CF=
=EB=BB=B9=CA=C7=BF=C9=D2=D4=C4=C3=C0=B4=BD=E8=BC=F8=B5=C4=A3=AC=D3=C8=C6=E4=
=CA=C7=C6=E4=B4=A6=C0=ED=C3=BF=D2=BB=C4=EA=B5=C4=C5=A9=C0=FA=D0=C5=CF=A2=B5=
=C4=CA=FD=BE=DD=BD=E1=B9=B9=A3=AC=B5=C4=C8=B7=CA=C7=BA=DC=BA=C3=B5=C4=B7=BD=
=CA=BD=A3=AC=BF=C9=D2=D4=BD=E8=C0=B4=D2=BB=CA=D4=A3=A1</FONT><BR><BR>=D2=F5=
=D1=F4=C0=FA=CB=E3=B7=A8<BR>=D3=C3=BB=A7:kent=20
                        =B7=A2=D1=D4=CA=B1=BC=E4:2001-11-08 12:03:11 =
<BR><BR>=B3=CC=D0=F2=CE=AA=A3=BA <BR><BR>/*=20
                        <BR><BR>prototype: int calconv( struct convdate =
* );=20
                        <BR><BR>struct convdate <BR>{ <BR>int source; =
=3D=3D0=20
                        =
=D4=F2=CA=E4=C8=EB=C8=D5=C6=DA=CE=AA=CE=F7=C0=FA, !=3D0 =
=D4=F2=CA=E4=C8=EB=CE=AA=C5=A9=C0=FA <BR>int solaryear; =
=CA=E4=B3=F6=BB=F2=CA=E4=C8=EB=D6=AE=CE=F7=C0=FA=C4=EA=B7=DD=20
                        <BR>int solarmonth; =CE=F7=C0=FA=D4=C2 <BR>int =
solardate; =CE=F7=C0=FA=C8=D5 <BR>int=20
                        lunaryear; =
=CA=E4=B3=F6=BB=F2=CA=E4=C8=EB=D6=AE=C5=A9=C0=FA=C4=EA=B7=DD <BR>int =
lunarmonth; =C5=A9=C0=FA=D4=C2 <BR>int=20
                        lunardate; =C5=A9=C0=FA=C8=D5 <BR>int weekday; =
=B8=C3=C8=D5=CE=AA=D0=C7=C6=DA=BC=B8 ( 0=3D=3D=D0=C7=C6=DA=C8=D5, =
1=3D=3D=D0=C7=C6=DA=D2=BB,=20
                        ... ) <BR>int kan; =B8=C3=C8=D5=CC=EC=B8=C9 ( =
0=3D=3D=BC=D7, 1=3D=3D=D2=D2, ..., 9=3D=3D=B9=EF )=20
                        <BR>int chih; =B8=C3=C8=D5=B5=D8=D6=A7 ( =
0=3D=3D=D7=D3, 1=3D=3D=B3=F3, ..., 11=3D=3D=BA=A5 ) <BR>};=20
                        <BR><BR>=BA=F4=BD=D0=CA=B1=D0=EB=C9=E8=B6=A8 =
souce =B5=C4=D6=B5, =C8=F4=CE=AA 0 =
=D4=F2=CE=AA=CE=F7=C0=FA=D7=AA=C5=A9=C0=FA, =
=B7=F1=D4=F2=CE=AA=C5=A9=C0=FA=D7=AA=CE=F7=C0=FA. =C8=BB=E1=E1=CA=D3=20
                        =
<BR>=CA=E4=C8=EB=CE=AA=CE=F7=C0=FA=BB=F2=C5=A9=C0=FA=C0=B4=C9=E8=B6=A8=CE=
=F7=C0=FA=BB=F2=C5=A9=C0=FA=B5=C4=C4=EA=D4=C2=C8=D5. =
=D7=AA=BB=BB=E1=E1=B5=C4=C4=EA=D4=C2=C8=D5=BB=E1=CC=EE=C8=EB=BD=E1=B9=B9=D6=
=D0( =C5=A9 <BR>=C0=FA=BB=F2=CE=F7=C0=FA ),=20
                        =
=D2=D4=BC=B0=B8=C3=C8=D5=CE=AA=D0=C7=C6=DA=BC=B8, =
=CC=EC=B8=C9=B5=D8=D6=A7. =
<BR>=C8=F4=BA=AF=CA=BD=B5=C4=B7=B5=BB=D8=D6=B5=CE=AA 0 =
=B1=ED=CA=BE=C3=BB=D3=D0=B4=ED=CE=F3, 1 =
=CE=AA=CA=E4=C8=EB=D6=AE=C4=EA=B7=DD=B4=ED=CE=F3, 2=20
                        =
=CE=AA=CA=E4=C8=EB=D6=AE=D4=C2=B7=DD=B4=ED=CE=F3, <BR>3 =
=CE=AA=CA=E4=C8=EB=D6=AE=C8=D5=C6=DA=B4=ED=CE=F3. =
<BR>=CA=E4=C8=EB=D6=AE=CE=F7=C0=FA=C4=EA=D0=EB=D4=DA 1937 - 2031 =BC=E4=20
                        =
<BR>=CA=E4=C8=EB=D6=AE=C5=A9=C0=FA=C4=EA=D0=EB=D4=DA 1936 - 2030 =BC=E4 =
<BR>=C8=F4=D0=EB=C0=A9=B3=E4, =D4=F2=D4=F6=BC=D3 lunarcal[]=20
                        <BR><BR>*/ <BR><BR>#define firstyear 1936 /* the =
first=20
                        year in lunarcal[] */ <BR><BR>struct convdate =
<BR>{=20
                        <BR>int source; <BR>int solaryear; <BR>int =
solarmonth;=20
                        <BR>int solardate; <BR>int lunaryear; <BR>int=20
                        lunarmonth; <BR>int lunardate; <BR>int weekday; =
<BR>int=20
                        kan; <BR>int chih; <BR>}; <BR><BR>struct =
taglunarcal=20
                        <BR>{ <BR>int basedays; /* =B5=BD=CE=F7=C0=FA 1 =
=D4=C2 1 =
=C8=D5=B5=BD=C5=A9=C0=FA=D5=FD=D4=C2=B3=F5=D2=BB=B5=C4=C0=DB=BB=FD=C8=D5=CA=
=FD */=20
                        <BR>int intercalation; /* =
=C8=F2=D4=C2=D4=C2=B7=DD. 0=3D=3D=B4=CB=C4=EA=C3=BB=D3=D0=C8=F2=D4=C2 */ =
<BR>int=20
                        baseweekday; /* =B4=CB=C4=EA=CE=F7=C0=FA 1 =
=D4=C2 1 =C8=D5=CE=AA=D0=C7=C6=DA=BC=B8=D4=D9=BC=F5 1 */ <BR>int=20
                        basekanchih; /* =B4=CB=C4=EA=CE=F7=C0=FA 1 =
=D4=C2 1 =C8=D5=D6=AE=B8=C9=D6=A7=D0=F2=BA=C5=BC=F5 1 */ <BR>int=20
                        monthdays[13]; /* =
=B4=CB=C5=A9=C0=FA=C4=EA=C3=BF=D4=C2=D6=AE=B4=F3=D0=A1, =
0=3D=3D=D0=A1=D4=C2(29=C8=D5), 1=3D=3D=B4=F3=D4=C2(30=C8=D5)*/=20
                        <BR>}; <BR><BR>struct taglunarcal lunarcal[] =3D =
{ <BR>{=20
                        23, 3, 2, 17, 1, 0, 0, 1, 0, 0, 1, 1, 0, 1, 1, =
1, 0 },=20
                        /* 1936 */ <BR>{ 41, 0, 4, 23, 1, 0, 0, 1, 0, 0, =
1, 0,=20
                        1, 1, 1, 0, 1 }, <BR>{ 30, 7, 5, 28, 1, 1, 0, 0, =
1, 0,=20
                        0, 1, 0, 1, 1, 0, 1 }, <BR>{ 49, 0, 6, 33, 1, 1, =
0, 0,=20
                        1, 0, 0, 1, 0, 1, 0, 1, 1 }, <BR>{ 38, 0, 0, 38, =
1, 1,=20
                        0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1 }, /* 1940 */ =
<BR>{ 26,=20
                        6, 2, 44, 1, 1, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1, 0 =
}, <BR>{=20
                        45, 0, 3, 49, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, =
1, 0 },=20
                        <BR>{ 35, 0, 4, 54, 0, 1, 0, 1, 0, 1, 1, 0, 1, =
0, 1, 0,=20
                        1 }, <BR>{ 24, 4, 5, 59, 1, 0, 1, 0, 1, 0, 1, 0, =
1, 1,=20
                        0, 1, 1 }, /* 1944 */ <BR>{ 43, 0, 0, 5, 0, 0, =
1, 0, 0,=20
                        1, 0, 1, 1, 1, 0, 1, 1 }, <BR>{ 32, 0, 1, 10, 1, =
0, 0,=20
                        1, 0, 0, 1, 0, 1, 1, 0, 1, 1 }, <BR>{ 21, 2, 2, =
15, 1,=20
                        1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1 }, <BR>{ 40, =
0, 3,=20
                        20, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1 }, /* =
1948 */=20
                        <BR>{ 28, 7, 5, 26, 1, 0, 1, 1, 0, 1, 0, 0, 1, =
0, 1, 0,=20
                        1 }, <BR>{ 47, 0, 6, 31, 0, 1, 1, 0, 1, 1, 0, 0, =
1, 0,=20
                        1, 0, 1 }, <BR>{ 36, 0, 0, 36, 1, 0, 1, 1, 0, 1, =
0, 1,=20
                        0, 1, 0, 1, 0 }, <BR>{ 26, 5, 1, 41, 0, 1, 0, 1, =
0, 1,=20
                        0, 1, 1, 0, 1, 0, 1 }, /* 1952 */ <BR>{ 44, 0, =
3, 47, 0,=20
                        1, 0, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1 }, <BR>{ 33, =
0, 4,=20
                        52, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0 }, =
<BR>{ 23,=20
                        3, 5, 57, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 1 =
}, <BR>{=20
                        42, 0, 6, 2, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, =
1 }, /*=20
                        1956 */ <BR>{ 30, 8, 1, 8, 1, 0, 1, 0, 1, 0, 0, =
1, 0, 1,=20
                        0, 1, 0 }, <BR>{ 48, 0, 2, 13, 1, 1, 1, 0, 1, 0, =
0, 1,=20
                        0, 1, 0, 1, 0 }, <BR>{ 38, 0, 3, 18, 0, 1, 1, 0, =
1, 0,=20
                        1, 0, 1, 0, 1, 0, 1 }, <BR>{ 27, 6, 4, 23, 1, 0, =
1, 0,=20
                        1, 1, 0, 1, 0, 1, 0, 1, 0 }, /* 1960 */ <BR>{ =