萬年曆查詢生辰八字 [轉帖]PHP世紀萬年曆

//世纪万年历
#这是唯一的设置-请输入php文件的位置
$file="http://192.168.1.168/php/rl/s2m.php";
//#农历每月的天数
$everym
0=>array(8,0,0,0,0,0,0,0,0,0,0,0,29,30,7,1), 
1=>array(0,29,30,29,29,30,29,30,29,30,30,30,29,0,8,2), 
2=>array(0,30,29,30,29,29,30,29,30,29,30,30,30,0,9,3), 
3=>array(5,29,30,29,30,29,29,30,29,29,30,30,29,30,10,4), 
4=>array(0,30,30,29,30,29,29,30,29,29,30,30,29,0,1,5), 
5=>array(0,30,30,29,30,30,29,29,30,29,30,29,30,0,2,6), 
6=>array(4,29,30,30,29,30,29,30,29,30,29,30,29,30,3,7), 
7=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,4,8), 
8=>array(0,30,29,29,30,30,29,30,29,30,30,29,30,0,5,9), 
9=>array(2,29,30,29,29,30,29,30,29,30,30,30,29,30,6,10), 
10=>array(0,29,30,29,29,30,29,30,29,30,30,30,29,0,7,11), 
11=>array(6,30,29,30,29,29,30,29,29,30,30,29,30,30,8,12), 
12=>array(0,30,29,30,29,29,30,29,29,30,30,29,30,0,9,1), 
13=>array(0,30,30,29,30,29,29,30,29,29,30,29,30,0,10,2), 
14=>array(5,30,30,29,30,29,30,29,30,29,30,29,29,30,1,3), 
15=>array(0,30,29,30,30,29,30,29,30,29,30,29,30,0,2,4), 
16=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,3,5), 
17=>array(2,30,29,29,30,29,30,30,29,30,30,29,30,29,4,6), 
18=>array(0,30,29,29,30,29,30,29,30,30,29,30,30,0,5,7), 
19=>array(7,29,30,29,29,30,29,29,30,30,29,30,30,30,6,8), 
20=>array(0,29,30,29,29,30,29,29,30,30,29,30,30,0,7,9), 
21=>array(0,30,29,30,29,29,30,29,29,30,29,30,30,0,8,10), 
22=>array(5,30,29,30,30,29,29,30,29,29,30,29,30,30,9,11), 
23=>array(0,29,30,30,29,30,29,30,29,29,30,29,30,0,10,12), 
24=>array(0,29,30,30,29,30,30,29,30,29,30,29,29,0,1,1), 
25=>array(4,30,29,30,29,30,30,29,30,30,29,30,29,30,2,2), 
26=>array(0,29,29,30,29,30,29,30,30,29,30,30,29,0,3,3), 
27=>array(0,30,29,29,30,29,30,29,30,29,30,30,30,0,4,4), 
28=>array(2,29,30,29,29,30,29,29,30,29,30,30,30,30,5,5), 
29=>array(0,29,30,29,29,30,29,29,30,29,30,30,30,0,6,6), 
30=>array(6,29,30,30,29,29,30,29,29,30,29,30,30,29,7,7), 
31=>array(0,30,30,29,30,29,30,29,29,30,29,30,29,0,8,8), 
32=>array(0,30,30,30,29,30,29,30,29,29,30,29,30,0,9,9), 
33=>array(5,29,30,30,29,30,30,29,30,29,30,29,29,30,10,10), 
34=>array(0,29,30,29,30,30,29,30,29,30,30,29,30,0,1,11), 
35=>array(0,29,29,30,29,30,29,30,30,29,30,30,29,0,2,12), 
36=>array(3,30,29,29,30,29,29,30,30,29,30,30,30,29,3,1), 
37=>array(0,30,29,29,30,29,29,30,29,30,30,30,29,0,4,2), 
38=>array(7,30,30,29,29,30,29,29,30,29,30,30,29,30,5,3), 
39=>array(0,30,30,29,29,30,29,29,30,29,30,29,30,0,6,4), 
40=>array(0,30,30,29,30,29,30,29,29,30,29,30,29,0,7,5), 
41=>array(6,30,30,29,30,30,29,30,29,29,30,29,30,29,8,6), 
42=>array(0,30,29,30,30,29,30,29,30,29,30,29,30,0,9,7), 
43=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,10,8), 
44=>array(4,30,29,30,29,30,29,30,29,30,30,29,30,30,1,9), 
45=>array(0,29,29,30,29,29,30,29,30,30,30,29,30,0,2,10), 
46=>array(0,30,29,29,30,29,29,30,29,30,30,29,30,0,3,11), 
47=>array(2,30,30,29,29,30,29,29,30,29,30,29,30,30,4,12), 
48=>array(0,30,29,30,29,30,29,29,30,29,30,29,30,0,5,1), 
49=>array(7,30,29,30,30,29,30,29,29,30,29,30,29,30,6,2), 
50=>array(0,29,30,30,29,30,30,29,29,30,29,30,29,0,7,3), 
51=>array(0,30,29,30,30,29,30,29,30,29,30,29,30,0,8,4), 
52=>array(5,29,30,29,30,29,30,29,30,30,29,30,29,30,9,5), 
53=>array(0,29,30,29,29,30,30,29,30,30,29,30,29,0,10,6), 
54=>array(0,30,29,30,29,29,30,29,30,30,29,30,30,0,1,7), 
55=>array(3,29,30,29,30,29,29,30,29,30,29,30,30,30,2,8), 
56=>array(0,29,30,29,30,29,29,30,29,30,29,30,30,0,3,9), 
57=>array(8,30,29,30,29,30,29,29,30,29,30,29,30,29,4,10), 
58=>array(0,30,30,30,29,30,29,29,30,29,30,29,30,0,5,11), 
59=>array(0,29,30,30,29,30,29,30,29,30,29,30,29,0,6,12), 
60=>array(6,30,29,30,29,30,30,29,30,29,30,29,30,29,7,1), 
61=>array(0,30,29,30,29,30,29,30,30,29,30,29,30,0,8,2), 
62=>array(0,29,30,29,29,30,29,30,30,29,30,30,29,0,9,3), 
63=>array(4,30,29,30,29,29,30,29,30,29,30,30,30,29,10,4), 
64=>array(0,30,29,30,29,29,30,29,30,29,30,30,30,0,1,5), 
65=>array(0,29,30,29,30,29,29,30,29,29,30,30,29,0,2,6), 
66=>array(3,30,30,30,29,30,29,29,30,29,29,30,30,29,3,7), 
67=>array(0,30,30,29,30,30,29,29,30,29,30,29,30,0,4,8), 
68=>array(7,29,30,29,30,30,29,30,29,30,29,30,29,30,5,9), 
69=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,6,10), 
70=>array(0,30,29,29,30,29,30,30,29,30,30,29,30,0,7,11), 
71=>array(5,29,30,29,29,30,29,30,29,30,30,30,29,30,8,12), 
72=>array(0,29,30,29,29,30,29,30,29,30,30,29,30,0,9,1), 
73=>array(0,30,29,30,29,29,30,29,29,30,30,29,30,0,10,2), 
74=>array(4,30,30,29,30,29,29,30,29,29,30,30,29,30,1,3), 
75=>array(0,30,30,29,30,29,29,30,29,29,30,29,30,0,2,4), 
76=>array(8,30,30,29,30,29,30,29,30,29,29,30,29,30,3,5), 
77=>array(0,30,29,30,30,29,30,29,30,29,30,29,29,0,4,6), 
78=>array(0,30,29,30,30,29,30,30,29,30,29,30,29,0,5,7), 
79=>array(6,30,29,29,30,29,30,30,29,30,30,29,30,29,6,8), 
80=>array(0,30,29,29,30,29,30,29,30,30,29,30,30,0,7,9), 
81=>array(0,29,30,29,29,30,29,29,30,30,29,30,30,0,8,10), 
82=>array(4,30,29,30,29,29,30,29,29,30,29,30,30,30,9,11), 
83=>array(0,30,29,30,29,29,30,29,29,30,29,30,30,0,10,12), 
84=>array(10,30,29,30,30,29,29,30,29,29,30,29,30,30,1,1), 
85=>array(0,29,30,30,29,30,29,30,29,29,30,29,30,0,2,2), 
86=>array(0,29,30,30,29,30,30,29,30,29,30,29,29,0,3,3), 
87=>array(6,30,29,30,29,30,30,29,30,30,29,30,29,29,4,4), 
88=>array(0,30,29,30,29,30,29,30,30,29,30,30,29,0,5,5), 
89=>array(0,30,29,29,30,29,29,30,30,29,30,30,30,0,6,6), 
90=>array(5,29,30,29,29,30,29,29,30,29,30,30,30,30,7,7), 
91=>array(0,29,30,29,29,30,29,29,30,29,30,30,30,0,8,8), 
92=>array(0,29,30,30,29,29,30,29,29,30,29,30,30,0,9,9), 
93=>array(3,29,30,30,29,30,29,30,29,29,30,29,30,29,10,10), 
94=>array(0,30,30,30,29,30,29,30,29,29,30,29,30,0,1,11), 
95=>array(8,29,30,30,29,30,29,30,30,29,29,30,29,30,2,12), 
96=>array(0,29,30,29,30,30,29,30,29,30,30,29,29,0,3,1), 
97=>array(0,30,29,30,29,30,29,30,30,29,30,30,29,0,4,2), 
98=>array(5,30,29,29,30,29,29,30,30,29,30,30,29,30,5,3), 
99=>array(0,30,29,29,30,29,29,30,29,30,30,30,29,0,6,4), 
100=>array(0,30,30,29,29,30,29,29,30,29,30,30,29,0,7,5), 
101=>array(4,30,30,29,30,29,30,29,29,30,29,30,29,30,8,6), 
102=>array(0,30,30,29,30,29,30,29,29,30,29,30,29,0,9,7), 
103=>array(0,30,30,29,30,30,29,30,29,29,30,29,30,0,10,8), 
104=>array(2,29,30,29,30,30,29,30,29,30,29,30,29,30,1,9), 
105=>array(0,29,30,29,30,29,30,30,29,30,29,30,29,0,2,10), 
106=>array(7,30,29,30,29,30,29,30,29,30,30,29,30,30,3,11), 
107=>array(0,29,29,30,29,29,30,29,30,30,30,29,30,0,4,12), 
108=>array(0,30,29,29,30,29,29,30,29,30,30,29,30,0,5,1), 
109=>array(5,30,30,29,29,30,29,29,30,29,30,29,30,30,6,2), 
110=>array(0,30,29,30,29,30,29,29,30,29,30,29,30,0,7,3), 
111=>array(0,30,29,30,30,29,30,29,29,30,29,30,29,0,8,4), 
112=>array(4,30,29,30,30,29,30,29,30,29,30,29,30,29,9,5), 
113=>array(0,30,29,30,29,30,30,29,30,29,30,29,30,0,10,6), 
114=>array(9,29,30,29,30,29,30,29,30,30,29,30,29,30,1,7), 
115=>array(0,29,30,29,29,30,29,30,30,30,29,30,29,0,2,8), 
116=>array(0,30,29,30,29,29,30,29,30,30,29,30,30,0,3,9), 
117=>array(6,29,30,29,30,29,29,30,29,30,29,30,30,30,4,10), 
118=>array(0,29,30,29,30,29,29,30,29,30,29,30,30,0,5,11), 
119=>array(0,30,29,30,29,30,29,29,30,29,29,30,30,0,6,12), 
120=>array(4,29,30,30,30,29,30,29,29,30,29,30,29,30,7,1) 
); 
############################## 
#农历天干 
$mten=array("null","甲","乙","丙","丁","戊","己","庚","辛","壬","癸"); 
#农历地支 
$mtwelve=array("null","子（鼠）","丑（牛）","寅（虎）","卯（兔）","辰（龙）", 
               "巳（蛇）","午（马）","未（羊）","申（猴）","酉（鸡）","戌（狗）","亥（猪）"); 
#农历月份 
$mm
              "七","八","九","十","十一","十二","月"); 
#农历日 
$mday=array("null","初一","初二","初三","初四","初五","初六","初七","初八","初九","初十", 
"十一","十二","十三","十四","十五","十六","十七","十八","十九","二十",
            "廿一","廿二","廿三","廿四","廿五","廿六","廿三","廿四","廿五","廿六","廿三","廿四","廿五","廿六","廿八","廿八","廿九》十"); 
############################## 
#賦給初值 
#天干地支 
$ten=0; 
$twelve=0; 
#星期 
$week=5; 
#農曆日 
$md=0; 
#農曆日 
$md=0; 
#農曆日 
$mm=0; 
#陽曆總天數 至1900年12月21日 
$total=11; 
#陰曆總天數 
$mtotal=0;>#陰曆總天數 
$mtotal=0; # ############################ 
#取得當日日期 
$today=getdate(); 
#如果沒有輸入，設定為當日日期 
if ($year=="" or $m
    or ($month12)){ 
  
     $m
   } 
############################## 
#計算到所求日期陽曆的總天數-自1900年12月21日始 
#先算年的和 
for ($y=1901;$y    ; 
      if ($y%4==0) $total ++; 
    } 
# 
              $total+=30; 
         case 🎜>         case 10: 
              法         $total+=31; 
         case 8: 
                         $total+=30; 
         case 6: 
      case 6: 
       case 5: 
$total+=30; 
         case 4: 
             >              $total+=28; 
         case   } 
#如果當年是閏年還要加一天 
if ($year%4==0 and $month>2){ 
     $total++日星期幾 
$week=($total+$week)%7; 
############################################################################################################## # 
#用農曆的天數累加來判斷是否超過陽曆的天數 
$flag1=0;#判斷跳出循環的條件 
$j=0; 
while ($j      $i=1; 
      while ($i               if ($mtotal>=$total) { 
                 $flag1=1; 
              } 
            $i++; 
          }
      if ($flag1==1) break; 
      $j++; 
    } ###### 
#計算所求月份1號的農曆日期 
$md=$everymonth[$j][$i]-($mtotal-$total); 
#月頭空開的天數 
$k=$week; 
#是否跨越一年 
switch ($month){ 
                 case 5: 
         case 7: 
         case 8: 
      
              $dd=31; 
                   case 6: 
case 9: 
         case 11: 
              $dd=30; 
              break; 
         case 2: 
              if ($year%4==0){ 
                  $dd=29;
                 }else{ 
                   } 
              break; 
      $everymonth[$j][0]0 and $i==13) or ($everymonth[$j][0]==0 and $i==12)) 
      $i==12)) 
      $.and $mtotal-$to$ ?> 
 

 
 
 
 
 
 
月抬頭 
    echo "

".$year."年".$month."月 p>n"; 
    if($ty==0) 
    { 
        echo  everymonth[$j][14]].$mtwelve[$everymonth[$j][15]]."年

"; 
    } 
    else >    { 
        echo "

".$mten[$everymonth[$j][14]].$mtwelve[$everyten ][15]]."/".$mten[$everymonth[$j+1][14]].$mtwelve[$everymonth[$j+1][15]]."年 b>

"; 
    } 
？ > 

 
  ; 
   
   center" bgcolor="#CCCCCC">星期日 
      星期一 
      星期二 
      週三 
   " align="center" bgcolor="#CCCCCC">星期四 
     星期五 
      星期六 
    tr> 
 
$天=1; 
$line=0; 
while ($day   echo "n"; 
   echo " n"; 
for ($s=0;$s         if ($k0 或$day>$dd){    = "center">n"; 
              $k--; 
         }else{ 
    //設置字符顏色 
               switch ($s){ 
                       case 1: 
                       case 2: 
                        案例3： 
                        案例4： 
                        案例5： 
                             $color="#000000";          休息； 
                                  $color="#FF0000"; 
                                              #008000"; 
                               } 
#產生中文農曆 
              if ($md==1){#1日印  everymonth[$j][0 ]0 及$每月[$j][0]                             }否則{ 
                      地>                    }                j][0]0) $chi=$mmonth[0].$ mmonth[$mm ];#閏月 
                    else $chi=$mmonth[$mm].$mm 
                    $chi=$mday[$md]; 
      
               echo "$day  $chi\n"; 
               $day++; 
               $md++; 
               if ($md>$everymonth[$j][$i]){ 
                    $md=1; 
                    $i++; 
                  } 
               if (($i>12 and $everymonth[$j][0]==0) or ($i>13 and $everymonth[$j][0]<>0)){ 
                     $i=1; 
                     $j++; 
                  } 
           } 
       } 
   echo "\n"; 
   $line++; 
} 
?> 
   
   

 
#補足空行 
for ($l=1;$l      echo "      echo "n"; 
      echo "n"; 
      echo "color> n"; 
      echo "n"; 
      echo "n";  $last=$month-1; 
if ($last==0){ 
     $last=12;     } 
$next=$month+1; 
if ($next==13){ 
     $next=1; 
      $next=1; 
      $ 
if ($ly>=1901) 
echo "

   \n"; 
else 
echo "

"; 
if ($ny<=2020)
echo "

\n"; 
?> 
 echo "

\n"; 
?> 
  

年份： 
  2020 
  2019 
  2018 
  2017 
  2016 
  2015 
  2014 
  2013 
  2012 
  2011 
  2010 
  2009 
  2008 
  2007 
  2006 
  2005 
  2004 
  2003 
  2002 
  2001 
  2000 
  1999 
  1998 
  1997 
  1996 
  1995 
  1994 
  1993 
  1992 
  1991 
  1990 
  1989 
  1988 
  1987 
  1986 
  1985 
  1984 
  1983 
  1982 
  1981 
  1980 
  1979 
  1978 
  1977 
  1976 
  1975 
  1974 
  1973 
  1972 
  1971 
  1970 
  1969 
  1968 
  1967 
  1966 
  1965 
  1964 
  1963 
  1962 
  1961 
  1960 
  1959 
  1958 
  1957 
  1956 
  1955 
  1954 
  1953 
  1952 
  1951 
  1950 
  1949 
  1948 
  1947 
  1946 
  1945 
  1944 
  1943 
  1942 
  1941 
  1940 
  1939 
  1938 
  1937 
  1936 
  1935 
  1934 
  1933 
  1932 
  1931 
  1930 
  1929 
  1928 
  1927 
  1926 
  1925 
  1924 
  1923 
  1922 
  1921 
  1920 
  1919 
  1918 
  1917 
  1916 
  1915 
  1914 
  1913 
  1912 
  1911 
  1910 
  1909 
  1908 
  1907 
  1906 
  1905 
  1904 
  1903 
  1902 
  1901 
    
  年     
  月份： 
  1 
  2 
  3 
4 
  5 
  6 
  7​​ 
  8 option> 
   9 
  10 
  11 
  月      
 
 

以上就介紹了萬年曆查詢生辰八字 [轉帖]PHP世紀萬年曆，包括了萬年曆查詢生辰八字方面的內容，希望對PHP教程有興趣的朋友有所幫助。