使用下列范例, 请更新到 v1.192 版以后.
本卦不出现的六亲,不限何爻, 如子孙或妻财, 不在六爻内,也就是本卦所缺的六亲,动爻所变出的不算,年月日算如何写,如干宫天风姤卦缺妻财
复制程式
计数
回圈:i=0 到 4
设定:六亲数量[i]=0
回圈:b=0 到 4
设定:六亲数量[本卦.#{卦爻$(b)}#的六亲]=六亲数量[本卦.#{卦爻$(b)}#的六亲]+1
如果:卜卦.#{卜卦六亲$(b)}#的五行是:卜卦年支的五行,卜卦月支的五行,卜卦日支的五行
设定:六亲数量[卜卦#{卜卦六亲$(b)}#]=六亲数量[卜卦#{卜卦六亲$(b)}#]+1
显示
回圈:i=0 到 4
应用
如果:六亲数量[卜卦父母]=0
如果:六亲数量[卜卦兄弟]=0
如果:六亲数量[卜卦子孙]=0
如果:六亲数量[卜卦妻财]=0
如果:六亲数量[卜卦官鬼]=0
本卦无元神,动爻所变出的不算,年月日算如何写,及元神的旺相休囚,空破墓绝
复制程式
无元神
计数
回圈:i=0 到 4
设定:五行数量[i]=0
回圈:b=0 到 5
设定:五行数量[本卦.#{卦爻$(b)}#的五行]=五行数量[本卦.#{卦爻$(b)}#的五行]+1
如果:卜卦.元神的五行=卜卦年支的五行
设定:五行数量[卜卦.元神的五行]=五行数量[卜卦.元神的五行]+1
如果:卜卦.元神的五行=卜卦月支的五行
设定:五行数量[卜卦.元神的五行]=五行数量[卜卦.元神的五行]+1
如果:卜卦.元神的五行=卜卦日支的五行
设定:五行数量[卜卦.元神的五行]=五行数量[卜卦.元神的五行]+1
设定:无元神=(五行数量[卜卦.元神的五行]=0)
显示
回圈:i=0 到 4
如果:无元神
旺相
如果:卜卦.#{五行$(卜卦.元神的五行)}#的旺相=旺
如果:卜卦.#{五行$(卜卦.元神的五行)}#的旺相=相
如果:卜卦.#{五行$(卜卦.元神的五行)}#的旺相=死
如果:卜卦.#{五行$(卜卦.元神的五行)}#的旺相=囚
如果:卜卦.#{五行$(卜卦.元神的五行)}#的旺相=休
空破墓绝
如果:卜卦.元神的五行=#{地支$(卜卦.空亡)}#的五行
如果:卜卦.元神的五行=#{地支$(卜卦.空亡1)}#的五行
如果:卜卦.元神的五行=#{地支$(卜卦.月破)}#的五行
如果:卜卦.#{五行$(卜卦.元神的五行)}#的长生=墓
如果:卜卦.#{五行$(卜卦.元神的五行)}#的长生=绝
另外伏神,伏在初爻如何写,及伏神的旺相休囚,空破如何写,是不是和本卦一样
复制程式
伏神
如果:本卦.六爻的伏神
如果:卜卦.#{五行$(首卦.六爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.六爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.六爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.六爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.六爻的五行)}#的旺相=休
如果:本卦.五爻的伏神
如果:卜卦.#{五行$(首卦.五爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.五爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.五爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.五爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.五爻的五行)}#的旺相=休
如果:本卦.四爻的伏神
如果:卜卦.#{五行$(首卦.四爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.四爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.四爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.四爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.四爻的五行)}#的旺相=休
如果:本卦.三爻的伏神
如果:卜卦.#{五行$(首卦.三爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.三爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.三爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.三爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.三爻的五行)}#的旺相=休
如果:本卦.二爻的伏神
如果:卜卦.#{五行$(首卦.二爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.二爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.二爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.二爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.二爻的五行)}#的旺相=休
如果:本卦.初爻的伏神
如果:卜卦.#{五行$(首卦.初爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.初爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.初爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.初爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.初爻的五行)}#的旺相=休
如果:本卦.世爻的伏神
如果:卜卦.#{五行$(首卦.世爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.世爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.世爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.世爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.世爻的五行)}#的旺相=休
如果:本卦.应爻的伏神
如果:卜卦.#{五行$(首卦.应爻的五行)}#的旺相=旺
如果:卜卦.#{五行$(首卦.应爻的五行)}#的旺相=相
如果:卜卦.#{五行$(首卦.应爻的五行)}#的旺相=死
如果:卜卦.#{五行$(首卦.应爻的五行)}#的旺相=囚
如果:卜卦.#{五行$(首卦.应爻的五行)}#的旺相=休
伏神:空
如果:本卦.六爻的伏神.且.首卦.六爻的空亡
如果:本卦.五爻的伏神.且.首卦.五爻的空亡
如果:本卦.四爻的伏神.且.首卦.四爻的空亡
如果:本卦.三爻的伏神.且.首卦.三爻的空亡
如果:本卦.二爻的伏神.且.首卦.二爻的空亡
如果:本卦.初爻的伏神.且.首卦.初爻的空亡
如果:本卦.世爻的伏神.且.首卦.世爻的空亡
如果:本卦.应爻的伏神.且.首卦.应爻的空亡
伏神:破
如果:本卦.六爻的伏神.且.首卦.六爻的地支=卜卦.月破
如果:本卦.五爻的伏神.且.首卦.五爻的地支=卜卦.月破
如果:本卦.四爻的伏神.且.首卦.四爻的地支=卜卦.月破
如果:本卦.三爻的伏神.且.首卦.三爻的地支=卜卦.月破
如果:本卦.二爻的伏神.且.首卦.二爻的地支=卜卦.月破
如果:本卦.初爻的伏神.且.首卦.初爻的地支=卜卦.月破
如果:本卦.世爻的伏神.且.首卦.世爻的地支=卜卦.月破
如果:本卦.应爻的伏神.且.首卦.应爻的地支=卜卦.月破
世爻在第几爻如何写,如世爻在三爻
复制程式
回圈:b=0 到 5
如果:原卦.世=b
设定:世爻位=(5-b)+1
如果:原卦.应=b
设定:应爻位=(5-b)+1
用神或六亲多现,两个以上如何写(包括年月日变爻),个指令执行错误
已修正, 请见 "问题(3) 2007-06-21"
化墓化绝化空化破,只有一到六爻,请再加世、应化墓化绝化空化破
已加入, 请见 "问题(2) 2007-06-18"
用神入墓于年月日,请再加其他六亲入墓于年月日
复制程式
年
如果:卜卦长生(卜卦.父母的五行,卜卦年支)=墓
如果:卜卦长生(卜卦.兄弟的五行,卜卦年支)=墓
如果:卜卦长生(卜卦.子孙的五行,卜卦年支)=墓
如果:卜卦长生(卜卦.妻财的五行,卜卦年支)=墓
如果:卜卦长生(卜卦.官鬼的五行,卜卦年支)=墓
如果:卜卦长生(卜卦.世爻的五行,卜卦年支)=墓
如果:卜卦长生(卜卦.应爻的五行,卜卦年支)=墓
月
如果:卜卦长生(卜卦.父母的五行,卜卦月支)=墓
如果:卜卦长生(卜卦.兄弟的五行,卜卦月支)=墓
如果:卜卦长生(卜卦.子孙的五行,卜卦月支)=墓
如果:卜卦长生(卜卦.妻财的五行,卜卦月支)=墓
如果:卜卦长生(卜卦.官鬼的五行,卜卦月支)=墓
如果:卜卦长生(卜卦.世爻的五行,卜卦月支)=墓
如果:卜卦长生(卜卦.应爻的五行,卜卦月支)=墓
日
如果:卜卦长生(卜卦.父母的五行,卜卦日支)=墓
如果:卜卦长生(卜卦.兄弟的五行,卜卦日支)=墓
如果:卜卦长生(卜卦.子孙的五行,卜卦日支)=墓
如果:卜卦长生(卜卦.妻财的五行,卜卦日支)=墓
如果:卜卦长生(卜卦.官鬼的五行,卜卦日支)=墓
如果:卜卦长生(卜卦.世爻的五行,卜卦日支)=墓
如果:卜卦长生(卜卦.应爻的五行,卜卦日支)=墓
世爻入墓于年月日,这个指令执行错误
已修正, 请见 "问题(1) 2007-06-15"