求助-天干地支的計算

bikkuri

什么意思？為什么我發的貼老是被刪？超不滿！
刪我的貼至少給個理由吧？

bikkuri

回復 1# bikkuri


沒辦法，只能以回帖的方式發貼了！
拜托別再刪了！

大家好，我有一個問題向大家請教。
從百度百科上我查到生辰八字的推算方法。
https://baike.baidu.com/item/%E7%94%9F%E8%BE%B0%E5%85%AB%E5%AD%97/87875?fr=aladdin
我想用一個命令得到當前時刻所對應的天干地支八字。
首先我用如下命令得到了天干地支八字中的前六字。
┌─[Sun Nov 25 02:27:39 CST 2018]
└─[root@apaciprtac:/tmp]# echo $(curl -s "http://nongli.hdjr.org/"|grep -oP "(?<=\<\/li\>\<li class\='A2'\>).*?(?=\<\/li\>)"|iconv -c -f GBK -t UTF8|head -n 3|tr -d " ")|awk -vOFS="|" '{print $1,$3,$2}'
2018年11月25日星期日射手座|戊戌年癸亥月辛酉日|2018年十月(小)十八屬狗
┌─[Sun Nov 25 02:27:45 CST 2018]
└─[root@apaciprtac:/tmp]# echo $(curl -s "http://nongli.hdjr.org/"|grep -oP "(?<=\<\/li\>\<li class\='A2'\>).*?(?=\<\/li\>)"|iconv -c -f GBK -t UTF8|head -n 3|tr -d " ")|awk '{print$3}'
戊戌年癸亥月辛酉日
┌─[Sun Nov 25 02:27:53 CST 2018]
└─[root@apaciprtac:/tmp]#
根據百度百科的說法，02:27:53屬于丑時（丑時：1點——凌晨2點59分），也就是說八字中第八字的時地支為“丑”字。
同時根據百度百科的說法，時天干要從日天干來推算，因為日天干為辛，所以辛日的丑時應該是“巳丑”，也就是說八字中第七字的時天干為“巳”字。
所以完整的八字應該是：
戊戌年癸亥月辛酉日巳丑時
請問應該如何修改命令從而能夠得到完整的八字。
謝謝大家的幫助。

bikkuri

回復 1# bikkuri

大家好，我有一個問題向大家請教。
從百度百科上我查到生辰八字的推算方法。
https://baike.baidu.com/item/%E7%94%9F%E8%BE%B0%E5%85%AB%E5%AD%97/87875?fr=aladdin
我想用一個命令得到當前時刻所對應的天干地支八字。
首先我用如下命令得到了天干地支八字中的前六字。

┌─[Sun Nov 25 02:27:39 CST 2018]
└─[root@apaciprtac:/tmp]# echo $(curl -s "http://nongli.hdjr.org/"|grep -oP "(?<=\<\/li\>\<li class\='A2'\>).*?(?=\<\/li\>)"|iconv -c -f GBK -t UTF8|head -n 3|tr -d " ")|awk -vOFS="|" '{print $1,$3,$2}'
2018年11月25日星期日射手座|戊戌年癸亥月辛酉日|2018年十月(小)十八屬狗
┌─[Sun Nov 25 02:27:45 CST 2018]
└─[root@apaciprtac:/tmp]# echo $(curl -s "http://nongli.hdjr.org/"|grep -oP "(?<=\<\/li\>\<li class\='A2'\>).*?(?=\<\/li\>)"|iconv -c -f GBK -t UTF8|head -n 3|tr -d " ")|awk '{print$3}'
戊戌年癸亥月辛酉日
┌─[Sun Nov 25 02:27:53 CST 2018]
└─[root@apaciprtac:/tmp]#
根據百度百科的說法，02:27:53屬于丑時（丑時：1點——凌晨2點59分），也就是說八字中第八字的時地支為“丑”字。


同時根據百度百科的說法，時天干要從日天干來推算，因為日天干為辛，所以辛日的丑時應該是“巳丑”，也就是說八字中第七字的時天干為“巳”字。


所以完整的八字應該是：
戊戌年癸亥月辛酉日巳丑時
請問應該如何修改命令從而能夠得到完整的八字。
謝謝大家的幫助。

wh7211

回復 3# bikkuri

1. curl -s "http://nongli.hdjr.org/"|grep -Po "(?<=<li class='A2'>).*?(?=</li>)"|iconv -f GBK -t utf-8|awk 'BEGIN{a=split("甲乙丙丁戊己庚辛壬癸",b,"");c=split("子丑寅卯辰巳午未申酉戌亥",d,"");for(i=1;i<=a;i++){for(j=1;j<=c;j++){k=++k>10?1:k;e[b[i]d[j]]=b[k]d[j]}};for(i=1;i<=12;i++){f[++g<24?g:0]=f[++g]=d[i<12?i+1:1]};h=strftime("%H",systime())}NR<=3{gsub(/ /,"");m[NR]=$0}END{split(m[3],n,"");print m[1]"|"m[3]e[n[7]f[h]]"時|"m[2]}'
   
2. 2018年12月12日星期三射手座|戊戌年甲子月戊寅日庚申時|2018年十一月(大)初六屬狗

復制代碼

bikkuri

回復 4# wh7211

非常感謝您的幫助！
但是我執行了一下，好象時干支并沒有顯示出來？

bikkuri

回復 4# wh7211

非常感謝您的幫助！
把您的代碼中的f[h]改成f[h+0]以后在丑時可以正確顯示時干支了。
┌─[Thu Dec 13 02:38:45 CST 2018]
└─[root@apaciprtac:~]# curl -s "http://nongli.hdjr.org/"|grep -Po "(?<=<li class='A2'>).*?(?=</li>)"|iconv -f GBK -t utf-8|awk 'BEGIN{a=split("甲乙丙丁戊己庚辛壬癸",b,"");c=split("子丑寅卯辰巳午未申酉戌亥",d,"");for(i=1;i<=a;i++){for(j=1;j<=c;j++){k=++k>10?1:k;e[bd[j]]=b[k]d[j]}};for(i=1;i<=12;i++){f[++g<24?g:0]=f[++g]=d[i<12?i+1:1]};h=strftime("%H",systime())}NR<=3{gsub(/ /,"");m[NR]=$0}END{split(m[3],n,"");print m[1]"|"m[3]e[n[7]f[h+0]]"時|"m[2]}'
2018年12月13日星期四射手座|戊戌年甲子月己卯日乙丑時|2018年十一月(大)初七屬狗

wh7211

回復 6# bikkuri


f[h+0]或f[strtonum(h)]

bikkuri

回復 7# wh7211

謝謝您的指點。
我一般用f[h+0]或者f[h-0]。

bikkuri

回復 8# Phyllis666

謝謝管理大大反刪除我之前發的幾個帖子。
不知道是怎么回事，最近幾次發帖沒有一次是痛痛快快地發一次就成功的。
我還反復檢查是不是文章里夾帶了什么*_*敏*_*感*_*詞*_*。。。