紫微落宮公式: 過年期間心血來潮看了一點網路上紫微斗數的資料
也剛好想學學 VS2005,
所以就用VB寫了一個排盤兼輔助學習的程式,
就在不眠不休中,發現了紫微落宮的公式,
當然,VB功力也增加不少。
由於我只是自學的初入門者,
不知有沒有他人發表過,
野人獻曝一下,或許對大家可以幫上一點忙。
沒有版權,如果對你有用,歡迎使用。
當然,如果您有甚麼好資料可以分享
也歡迎寄給我。 s69020.wang在msa.hinet.net
(請把"在"改成"@")
火六局:array六(1..6)={10,7,0,5,2,3} ★ 10=酉, 0=12=亥, ..., 3=寅
土五局: array五(1..5)={7,0,5,2,3}
金四局: array四(1..4)={0,5,2,3}
木三局: array三(1..3)={5,2,3}
水二局: array二(1..2)={2,3}
只要背 六{10,7,0,5,2,3}, 其餘依次遞減一個
紫微所在宮位 = { array局( (生日 mod 局數) ) + [(生日-1) / 局數] } mod 12
請看:
網頁 程式初步可以輔助學習,但距離我的目標還很遠。
命盤左邊的空白是預留了許多的控制項目。
以下只是圖片
網頁 由於剛開始學習VB.net,所以還在奮鬥中。
以今日電腦的能力,只要有判斷公式,
(不要以為紫微公式太多,對現代的資料庫而言,它只是小小小case)
電腦絕對是很好的輔助工具,能力絕對遠遠遠遠遠遠超過想像。
我預估,可以勝過許多江湖術士。
當然,電腦只是很細心幫你找出所有關鍵點,
我相信很多地方還是需要人腦做整體判斷。
等自學紫微初階告個段落後再找個老師深入學習。
屆時再擴充程式能力。
不要問我程式的問題,由於剛學VS2005,
還不會封裝,還在摸索中。
等我搞懂了,應該會部分公布出來。
有沒有中壢桃園一帶的好老師可以介紹?
網上看到不少好老師,可是都在台北或新竹台中,都有點遠。
祝大家新年快樂,平平安安,笑口常開。