国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發 > Linux Shell > 正文

Shell腳本實現的陽歷轉農歷代碼分享

2020-07-27 19:13:34
字體:
來源:轉載
供稿:網友

閑來無事,想在Linux下用shell寫一個陽歷轉農歷的腳本,斷斷續續大概一個星期終于搞定。現在拿出來與大家分享。

1、緣由

本腳本實現原理是查表法(因為公式有誤差);基于農歷新年為基準,對農歷新年前后兩個不同的農歷進行計算。

寫這個腳本之前是想在Linux 終端命令提示符中加入陽歷及農歷日期。在Ubuntu中有Lunar軟件可以獲取農歷日期,但在Fedora或CentOS中并沒有類似軟件,所以就想自己來實現一個,但網上用其他語言寫的一大把,如果再寫沒什么必要。所以就想用shell來寫一個。

2、功能及使用

功能:將具體的陽歷日期轉換為農歷日期。

時間范圍:1901~2099,對應農歷年時間為4598~4796

參數格式(無參數默認為當前系統日期):yyyymmdd

如2013年1月1日:

復制代碼 代碼如下:

$./lunar.sh 20130101
4709-11-20

3、完整數據

完整數據下載鏈接:
http://xiazai.VeVB.COm/201408/tools/lunar-20131202.7z

包中文件:

lunar.sh 主腳本,具體實現

datebases 農歷元數據

change.log 更改日志

readme 腳本說明及注意事項

主要腳本lunar.sh代碼如下:

#!/bin/shDATE=$@[ "$DATE" = "" ] && DATE=$(date +%Y%m%d)databases_path=databasesdate_year=$(echo $DATE |sed 's/^/(./{4/}/).*//1/')date_month=$(echo $DATE |sed 's/.*/(../)..$//1/')date_day=$(echo $DATE |sed 's/.*/(../)$//1/')date_days=$(date -d $DATE +%j)lunar_year=$(sed /$date_year/!d $databases_path |sed 's/^/(..../).*//1/')lunar_year_data=$(sed /$date_year/!d $databases_path |sed 's/.*/ /(.*/)//1/')lunar_year_data_bin=$(echo "ibase=16;obase=2;$lunar_year_data"|bc |sed -e :a -e 's/^./{1,23/}$/0&/;ta')new_year_month_bin=$(echo $lunar_year_data_bin |sed -e 's/^./{17/}/(./{2/}/).*//1/')new_year_month=$(echo "ibase=2;$new_year_month_bin"|bc |sed -e :a -e 's/^./{1,1/}$/0&/;ta')new_year_day_bin=$(echo $lunar_year_data_bin |sed -e 's/.*/(./{5/}/)$//1/')new_year_day=$(echo "ibase=2;$new_year_day_bin"|bc |sed -e :a -e 's/^./{1,1/}$/0&/;ta')new_year_days=$(date -d $date_year$new_year_month$new_year_day +%j)lunar_days=$(expr $date_days - $new_year_days + 1)befor_or_after=0if [ "$lunar_days" -le "0" ]; then  befor_or_after=1  date_year=$(($date_year - 1))  lunar_year=$(sed /$date_year/!d $databases_path |sed 's/^/(..../).*//1/')  lunar_year_data=$(sed /$date_year/!d $databases_path |sed 's/.*/ /(.*/)//1/')  lunar_year_data_bin=$(echo "ibase=16;obase=2;$lunar_year_data"|bc |sed -e :a -e 's/^./{1,23/}$/0&/;ta')filunar_leap_month_bin=$(echo $lunar_year_data_bin |sed -e 's/^/(./{4/}/).*//1/')lunar_leap_month=$(echo "ibase=2;$lunar_leap_month_bin"|bc)lunar_month_all_bin=$(echo $lunar_year_data_bin |sed -e 's/^./{4/}/(./{13/}/).*//1/')[ "$lunar_leap_month" = "0" ] && lunar_month_all_bin=$(echo $lunar_year_data_bin |sed -e 's/^./{4/}/(./{12/}/).*//1/')lunar_month_all=$(echo $lunar_month_all_bin |sed -e 's/0/29/ /g' |sed -e 's/1/30/ /g')if [ "$befor_or_after" = "0" ];then  lunar_month=1  lunar_day=$lunar_days  for i in $lunar_month_all  do   [ "$lunar_day" -gt "$i" ] && lunar_day=$(($lunar_day - $i)) && lunar_month=$(($lunar_month + 1))   [ "$lunar_day" = "$i" ] && break  doneelse  lunar_month=12  lunar_day=$((-$lunar_days))  lunar_month_all_bin=$(echo $lunar_month_all_bin |rev)  lunar_month_all=$(echo $lunar_month_all_bin |sed -e 's/0/29/ /g' |sed -e 's/1/30/ /g')  for i in $lunar_month_all  do   if [ "$lunar_day" -gt "$i" ]; then     lunar_day=$(($lunar_day - $i))     lunar_month=$(($lunar_month - 1))   else     lunar_day=$(($i - $lunar_day))     break   fi  donefiif [ "$lunar_leap_month" = "0" ]; then  echo $lunar_year-$lunar_month-$lunar_dayelse  if [ "$lunar_leap_month" -ge "$lunar_month" ]; then   echo $lunar_year-$lunar_month-$lunar_day  elif [ "$befor_or_after" = "0" ]; then   if [ "$(($lunar_leap_month + 1))" = "$lunar_month" ];then     lunar_month=$(($lunar_month - 1))     echo $lunar_year-*$lunar_month-$lunar_day   else     lunar_month=$(($lunar_month - 1))     echo $lunar_year-$lunar_month-$lunar_day   fi  else   echo $lunar_year-$lunar_month-$lunar_day  fifilunar.sh

4 修改歷史

2013-12-02

發現bug:如果農歷上個月是大月,本月為小月,則上個月的三十輸出為本月的初一,原因是上個月剩下30天,這正好是上個月的三十,而本月是29天,29<30,下一次循環的時候又減本月的天數,使得上個月的三十成為本月的初一

bug修改:添加判斷語句,如果農歷剩余天數等于當月的天數則不再循環

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 杭州市| 如东县| 柯坪县| 皋兰县| 红原县| 乐清市| 城市| 盐池县| 景宁| 从化市| 五大连池市| 林口县| 武穴市| 定安县| 财经| 青浦区| 华蓥市| 息烽县| 怀来县| 辽阳县| 峡江县| 莫力| 额敏县| 龙陵县| 巴东县| 咸宁市| 陕西省| 汉中市| 新沂市| 聂拉木县| 临桂县| 阳江市| 寿宁县| 疏附县| 丽江市| 哈巴河县| 禄劝| 罗源县| 玉树县| 南充市| 永新县|