自编之紫微斗数与子平四柱合参之程序《紫平合参》免费分享 置顶

2011/08/22 21:22 V1.2版发布,作以下变动:

1、建立万历年,输入精确的节气时间,代替过去的节气估算确定法。以前估算交节时间有可能会与实际交节时间产生4小时以下的误差。万年历时间目前从1800年2月4日起到2099年12月31日止。
2、修改紫微未开运时,运宫会随机指定现象。修改后未开运前运宫即为命宫。
3、修改当时差超过2小时时,在零点附近的出生时间会产生时辰天干计算错误的现象。
4、修改子平起运法统一以年数为准,过去凡余头大于6个月时会加一年。本软件起运数是以节气起运数加上出生月日得出。
5、增加命主风水八宅法命宫提示,点击命宫条,可以弹出此命的八宅配置吉凶。
6、增加西方星座提示。

 

2008/12/28 20:39 V1.1版发布,作以下变动:

1、在盘面中央信息栏处直接标出身宫所在宫位,便于查找。
2、重写四柱神煞计算程序,解决极少数神煞重复出现问题。
3、把新人资料输入页面的“取消”按钮的功能由直接退出程序改为回到(或进入)排盘页面。
4、把紫微斗数大运起宫从原来的命宫改为阳男阴女从父母宫起宫顺数,阴男阳女从兄弟宫起宫逆数。此为《紫数斗数全书》记载之大运起宫法,本人验之较为正宗。具体理由详见此文:(已删除)
5、庚年四化由“阳武府同”,改为“阳武同相”。《紫微斗数全书》四化诀虽然为“阳武同阴”,然命盘实例一律用“阳武同相”。由于庚年四化流传版本过于杂乱,考《紫微斗数全书》所记春秋以降诸代名人之生、忌日辰均较现代网上流传之资料可信,故信今人不如信古人。且《紫微斗数全书》出自陈抟之后裔,更为可信,故暂改之。
6、原四化诀放在批注栏,当批注栏文本较长时阅读后面四化诀会被遮盖,对于推断流月、流日及各种需用四化推断时很不方便,故改放在页面顶部标题栏中。
7、放大批注栏字体,以方便研究时阅读。
8、修改类型设置页面“增加记录”按钮为“插入类型”按钮,可以在类型表格的任一位置插入新类型,不再加在表格底部以方便修改。
9、增加提取档案功能。以后有新命例资料只需下载到目录下,按软件提示添加即可。也可以在新版本发布时,提取旧档案到新版本数据库中。另外,各人之间,也可以以这种方法自由共享命例。
10、调整程序,解决不从“退出”按钮而直接按表单自带之叉叉按钮退出程序时VFP运行库驻留内存问题。
11、增加从春秋至汉唐若干名人命例,如孔子及诸弟子等。

程序提取方式与V1.0版相同,请参看本文尾部。

 

2008/09/03 19:16 V1.0发布:

子平四柱的优点是易于对命运有一个总体性的把握,但断事不细。而紫微斗数在具体事断上有很好的提示作用。这两种术数是相当互补的,很值得合参。最近把过去编成的独立的紫微斗数程序与子平四柱程序合而为一。这只是简版,打印之类的功能以后有兴趣再附编。也将会在某个时候,把其他的术数合而为一,尤其是常用的六爻与奇门预测程序。

这个程式虽然比较简陋,但内容与排盘功能本人认为还是相当全面的。无论初学者或深研者都应该会觉得很方便。附排盘的图片:(这个图片一从BMP转到JPG,就糊涂不清,伤脑筋)
一、天盘

二、流年盘

本软件天盘转为流年盘极为简单,只要选中“自动排流年盘”选项,任意点击右上方的运限表,就可以排出点中的行列所在的年份的流年盘。要想从流年盘状态恢复到天盘状态,通过单击把“自动排流年盘”前的勾勾取消就行了。

另外,本软件已附有不少名人命例。可以选中右下方的“按类型观摩”选项,通过点击“下一个”或“上一个”按钮,即依次排出同一类型的命例。这对于希望研究同一领域的人的命盘总结此类型人的盘面特点是很方便的。这儿上下顺序,不必在输入时便相临。只要输入的类型是一样的,那么,上一个与下一个中间无论相隔几人,都将直接被忽略。随着本人平时的研究收集,以后命例将会越来越多。在恰当的时候,本人会公开分享,请关注本博客这方面的信息。

紫微斗数的星盘虽然可以直接查表获得,但其实绝大部分星座都是可以直接计算的,计算公式分享如下:
N紫命宫数=MOD(N紫微月数+2-N紫微时支数,12)+1
N紫身宫数=MOD(N紫微月数+N紫微时支数,12)+1

DO CASE
CASE C紫命宫纳音五行=’木’
N紫微=MOD(5-3*INT((N农历日+1)/3)+1*INT(N农历日/3)+3*INT((N农历日-1)/3)-1,12)+1
CASE C紫命宫纳音五行=’水’
N紫微=MOD(2+1*INT((N农历日)/2)-1,12)+1
CASE C紫命宫纳音五行=’火’
N紫微=MOD(10-3*INT((N农历日+4)/6)+5*INT((N农历日+3)/6)+5*INT((N农历日+2)/6)-3*INT((N农历日+1)/6)+1*INT(N农历日/6)-4*INT((N农历日-1)/6)-1,12)+1
CASE C紫命宫纳音五行=’金’
N紫微=MOD(12+5*INT((N农历日+2)/4)-3*INT((N农历日+1)/4)+1*INT(N农历日/4)-2*INT((N农历日-1)/4)-1,12)+1
CASE C紫命宫纳音五行=’土’
N紫微=MOD(7+5*INT((N农历日+3)/5)-7*INT((N农历日+2)/5)-3*INT((N农历日+1)/5)+1*INT(N农历日/5)+5*INT((N农历日-1)/5)-1,12)+1
ENDCASE

N天府=MOD(3-N紫微+3-1,12)+1
N天机=MOD(N紫微-1-1,12)+1
N太阳=MOD(N紫微-3-1,12)+1
N武曲=MOD(N紫微-4-1,12)+1
N天同=MOD(N紫微-5-1,12)+1
N廉贞=MOD(N紫微-8-1,12)+1
N太阴=MOD(N天府+1-1,12)+1
N贪狼=MOD(N天府+2-1,12)+1
N巨门=MOD(N天府+3-1,12)+1
N天相=MOD(N天府+4-1,12)+1
N天梁=MOD(N天府+5-1,12)+1
N七杀=MOD(N天府+6-1,12)+1
N破军=MOD(N天府+10-1,12)+1

N文昌=MOD(11-N紫微时支数,12)+1
N文曲=MOD(5+N紫微时支数-2,12)+1
N左辅=MOD(5+N紫微月数-2,12)+1
N右弼=MOD(11-N紫微月数,12)+1

N天魁
N天钺
N禄存
N天官
N天福
N天厨
N天富
这几个干查星辰直接查表,或用数组解决

N火星=MOD(火星+N紫微时支数-2,12)+1
N铃星=MOD(铃星+N紫微时支数-2,12)+1
这两个星辰的起数要查表,或用数组解决

化科、化禄、化忌、化权,查表或数组解决

N天马=MOD(6-3*(MOD(N紫微年支数-1,4)+1)-1,12)+1
N擎羊=MOD(N禄存,12)+1
N陀罗=MOD(N禄存-2,12)+1
N地空=MOD(12-N紫微时支数,12)+1
N地劫=MOD(12+N紫微时支数-2,12)+1
N天贵=MOD(N文曲+N农历日-3,12)+1
N恩光=MOD(N文昌+N农历日-3,12)+1
N天才=MOD(N紫命宫数+N紫微年支数-2,12)+1
N天寿=MOD(N紫身宫数+N紫微年支数-2,12)+1
N三台=MOD(N左辅+N农历日-2,12)+1
N八座=MOD(N右弼-N农历日,12)+1
N龙池=MOD(5+N紫微年支数-2,12)+1
N凤阁=MOD(11-N紫微年支数,12)+1
N台辅=MOD(7+N紫微时支数-2,12)+1
N封诰=MOD(3+N紫微时支数-2,12)+1
N月德=MOD(6+N紫微年支数-2,12)+1
N解神=MOD(9+INT((N紫微月数-1)/2)*2-1,12)+1
N天巫=MOD(3*(N紫微月数+1)-1,12)+1
N天月 查表或数组解决
N红鸾=MOD(4-N紫微年支数,12)+1
N天喜=MOD(10-N紫微年支数,12)+1
N天姚=MOD(2+N紫微月数-2,12)+1
N孤辰=MOD(6+ROUND((N紫微年支数-4)/3,0)*3-1,12)+1
N寡宿=MOD(2+ROUND((N紫微年支数-4)/3,0)*3-1,12)+1
N阴煞=MOD(5-2*(MOD(N紫微月数-1,6)+1)-1,12)+1
N天刑=MOD(10+N紫微月数-2,12)+1
N破碎=MOD(6-MOD(N紫微年支数-1,3)*4-1,12)+1
N大耗=MOD(6+N紫微年支数+ROUND(0.5-MOD(N紫微年支数-1,2),0)-1,12)+1
N蜚廉=MOD(9-INT((N紫微年支数-1)/3)*3+MOD(N紫微年支数-1,3)-1,12)+1
N天虚=MOD(7+N紫微年支数-2,12)+1
N天哭=MOD(7-N紫微年支数,12)+1
N天空=MOD(N紫微年支数,12)+1
N金锁=MOD(11+N紫微年支数-N紫微月支数+N农历日-N紫微时支数-1,12)+1
N天伤=MOD(6+N紫命宫数-2,12)+1
N天使=MOD(N紫命宫数-5-1,12)+1
N截空1=11-(MOD(N紫微年干数-1,5)+1)*2
N截空2=12-(MOD(N紫微年干数-1,5)+1)*2
N旬空1=IIF((N紫微年支数-N紫微年干数)>0,N紫微年支数-N紫微年干数-1,N紫微年支数-N紫微年干数+12-1)
N旬空2=IIF((N紫微年支数-N紫微年干数)>0,N紫微年支数-N紫微年干数,N紫微年支数-N紫微年干数+12)

N斗君=MOD(N紫微年支数-N紫微月数+1+N紫微时支数-2,12)+1

C命主=SUBSTR(‘贪狼巨门禄存文曲廉贞武曲破军武曲廉贞文曲禄存巨门’,4*(N紫微年支数-1)+1,4)
C身主=SUBSTR(‘火星天相天梁天同文昌天机火星天相天梁天同文昌天机’,4*(N紫微年支数-1)+1,4)

博士十二神
N博士=N禄存
N力士=MOD(N禄存+1*N紫微顺逆-1,12)+1
N青龙=MOD(N禄存+2*N紫微顺逆-1,12)+1
N小耗=MOD(N禄存+3*N紫微顺逆-1,12)+1
N将军=MOD(N禄存+4*N紫微顺逆-1,12)+1
N奏书=MOD(N禄存+5*N紫微顺逆-1,12)+1
N飞廉=MOD(N禄存+6*N紫微顺逆-1,12)+1
N喜神=MOD(N禄存+7*N紫微顺逆-1,12)+1
N病符=MOD(N禄存+8*N紫微顺逆-1,12)+1
N大耗=MOD(N禄存+9*N紫微顺逆-1,12)+1
N伏兵=MOD(N禄存+10*N紫微顺逆-1,12)+1
N官府=MOD(N禄存+11*N紫微顺逆-1,12)+1

生年太岁十二神
N岁建=MOD(N紫微年支数-1,12)+1
N晦气=MOD(N紫微年支数-1+1,12)+1
N丧门=MOD(N紫微年支数-1+2,12)+1
N贯索=MOD(N紫微年支数-1+3,12)+1
N官符=MOD(N紫微年支数-1+4,12)+1
N小耗=MOD(N紫微年支数-1+5,12)+1
N岁破=MOD(N紫微年支数-1+6,12)+1
N龙德=MOD(N紫微年支数-1+7,12)+1
N白虎=MOD(N紫微年支数-1+8,12)+1
N天德=MOD(N紫微年支数-1+9,12)+1
N吊客=MOD(N紫微年支数-1+10,12)+1
N病符=MOD(N紫微年支数-1+11,12)+1

将前十二星
N将星=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1,12)+1
N攀鞍=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+1,12)+1
N岁驿=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+2,12)+1
N息神=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+3,12)+1
N华盖=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+4,12)+1
N劫煞=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+5,12)+1
N灾煞=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+6,12)+1
N天煞=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+7,12)+1
N指背=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+8,12)+1
N咸池=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+9,12)+1
N月煞=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+10,12)+1
N亡神=MOD(4-3*(MOD(N紫微年支数-1,4)+1)-1+11,12)+1

要获得本软件,请联系本人索取或找已经有本软件的人索取,只要只是用来自用及免费分享,则没有版权问题。目前只有 WIN XP旧字体版,WIN7雅黑字版版、 WIN10等线字体版没有去整理。旧版在 WIN7、WIN10等高分辨率屏幕上显示显得粗糙,美观度有所下降,但程序运行上是没有什么问题的。主要是高分辨率问题,如果在这两系统上使用低分辨率屏幕,则效果也就没有问题。

欢迎紫微与子平研究者对本软件的排盘提出不同的商榷观点,但如果你只是一个初学者或外行,不要发现与网上的排盘不同就提出疑问,网上排盘错误的软件很多。本人编制本软件的排法前还是对各种数据作过一点点研究的。

2008/09/03 19:16