主頁 > 知識(shí)庫 > Shell腳本實(shí)現(xiàn)的陽歷轉(zhuǎn)農(nóng)歷代碼分享

Shell腳本實(shí)現(xiàn)的陽歷轉(zhuǎn)農(nóng)歷代碼分享

熱門標(biāo)簽:百度地圖的地圖標(biāo)注 佛山高德地圖標(biāo)注中心 excel地址地圖標(biāo)注 百度地圖標(biāo)注圖標(biāo)更換 杭州機(jī)器人外呼系統(tǒng) 東莞電銷機(jī)器人價(jià)格一覽表 陜西電銷卡外呼系統(tǒng)怎么安裝 地圖標(biāo)注超出范圍怎么辦 旅游地圖標(biāo)注大全

閑來無事,想在Linux下用shell寫一個(gè)陽歷轉(zhuǎn)農(nóng)歷的腳本,斷斷續(xù)續(xù)大概一個(gè)星期終于搞定。現(xiàn)在拿出來與大家分享。

1、緣由

本腳本實(shí)現(xiàn)原理是查表法(因?yàn)楣接姓`差);基于農(nóng)歷新年為基準(zhǔn),對(duì)農(nóng)歷新年前后兩個(gè)不同的農(nóng)歷進(jìn)行計(jì)算。

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

2、功能及使用

功能:將具體的陽歷日期轉(zhuǎn)換為農(nóng)歷日期。

時(shí)間范圍:1901~2099,對(duì)應(yīng)農(nóng)歷年時(shí)間為4598~4796

參數(shù)格式(無參數(shù)默認(rèn)為當(dāng)前系統(tǒng)日期):yyyymmdd

如2013年1月1日:

復(fù)制代碼 代碼如下:

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

3、完整數(shù)據(jù)

完整數(shù)據(jù)下載鏈接:
http://xiazai.jb51.net/201408/tools/lunar-20131202.7z

包中文件:

lunar.sh 主腳本,具體實(shí)現(xiàn)

datebases 農(nóng)歷元數(shù)據(jù)

change.log 更改日志

readme 腳本說明及注意事項(xiàng)

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

#!/bin/sh

DATE=$@
[ "$DATE" = "" ]  DATE=$(date +%Y%m%d)

databases_path=databases

date_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=0

if [ "$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')
fi

lunar_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
  done
else
  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
  done
fi

if [ "$lunar_leap_month" = "0" ]; then
  echo $lunar_year-$lunar_month-$lunar_day
else
  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
  fi
fi

lunar.sh

4 修改歷史

2013-12-02

發(fā)現(xiàn)bug:如果農(nóng)歷上個(gè)月是大月,本月為小月,則上個(gè)月的三十輸出為本月的初一,原因是上個(gè)月剩下30天,這正好是上個(gè)月的三十,而本月是29天,2930,下一次循環(huán)的時(shí)候又減本月的天數(shù),使得上個(gè)月的三十成為本月的初一

bug修改:添加判斷語句,如果農(nóng)歷剩余天數(shù)等于當(dāng)月的天數(shù)則不再循環(huán)

您可能感興趣的文章:
  • php實(shí)現(xiàn)陽歷陰歷互轉(zhuǎn)的方法
  • php 陰歷-農(nóng)歷-轉(zhuǎn)換類代碼
  • PHP實(shí)現(xiàn)陽歷到農(nóng)歷轉(zhuǎn)換的類實(shí)例
  • 顯示今天的日期js代碼(陽歷和農(nóng)歷)
  • python實(shí)現(xiàn)的陽歷轉(zhuǎn)陰歷(農(nóng)歷)算法
  • js輸出陰歷、陽歷、年份、月份、周示例代碼
  • 很全的顯示陰歷(農(nóng)歷)日期的js代碼
  • php陽歷轉(zhuǎn)農(nóng)歷優(yōu)化版

標(biāo)簽:通遼 西藏 雅安 延邊 隨州 朝陽 青島 南充

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《Shell腳本實(shí)現(xiàn)的陽歷轉(zhuǎn)農(nóng)歷代碼分享》,本文關(guān)鍵詞  Shell,腳本,實(shí)現(xiàn),的,陽歷,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《Shell腳本實(shí)現(xiàn)的陽歷轉(zhuǎn)農(nóng)歷代碼分享》相關(guān)的同類信息!
  • 本頁收集關(guān)于Shell腳本實(shí)現(xiàn)的陽歷轉(zhuǎn)農(nóng)歷代碼分享的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章