引用 | 编辑
刘宗岩
2007-06-24 18:20 |
楼主
▼ |
||
x0
本卦不出现的六亲,不限何爻, 如子孙或妻财, 不在六爻内,也就是本卦所缺的六亲,动爻所变出的不算,年月日算如何写,如干宫天风姤卦缺妻财本卦无元神,动爻所变出的不算,年月日算如何写,及元神的旺相休囚,空破墓绝 另外伏神,伏在初爻如何写,及伏神的旺相休囚,空破如何写,是不是和本卦一样 世爻在第几爻如何写,如世爻在三爻 用神或六亲多现,两个以上如何写(包括年月日变爻),个指令执行错误 化墓化绝化空化破,只有一到六爻,请再加世、应化墓化绝化空化破 用神入墓于年月日,请再加其他六亲入墓于年月日 世爻入墓于年月日,这个指令执行错误 麻烦你 谢谢 x0
|
引用 | 编辑
mainchen
2007-06-25 17:46 |
1楼
▲ |
使用下列范例, 请更新到 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" x0 |