Android奇门遁甲排盘算法

奇门遁甲与太乙神数、大六壬合称为三式,以九宫八卦式盘推测万事万物,融合古代天文地理、兵法谋略等学说于一体,最早来源于古代的行军打仗、排兵布阵,姜子牙、刘伯温、诸葛亮等人都有研究,《三国演义》和《水浒传》中军师诸葛亮和吴用都有借助奇门遁甲之法排兵布阵的案例,这里不多啰嗦,感兴趣的同学可以自己去看看原著,也是十分精彩的。

因为排盘方法不像七政四余、紫微斗数、铁板神数这么复杂,所以相对来说,在民间的流传和发展要优于以上两者,经过历代长远的发展,逐步演变为可以预测万事万物,以下是部分排盘算法:

if (shizhuStr.equals("甲子")) {   //六仪转换,甲子戊,甲戌己,甲申庚,甲午辛,甲辰壬,甲寅癸
            shizhuYi = "戊";
        } else if (shizhuStr.equals("甲戌")) {
            shizhuYi = "己";
        } else if (shizhuStr.equals("甲申")) {
            shizhuYi = "庚";
        } else if (shizhuStr.equals("甲午")) {
            shizhuYi = "辛";
        } else if (shizhuStr.equals("甲辰")) {
            shizhuYi = "壬";
        } else if (shizhuStr.equals("甲寅")) {
            shizhuYi = "癸";
        } else {
            shizhuYi = shizhuStr.substring(0, 1);
        }
        //排地盘
        for (int i = 0; i < 9; i++) {
            if (yindun) {
                qimenUnits[Gongweis[(juIndex[sanyuan] - i + 9) % 9]].setDipan(QiYis[i]);
            } else {
                qimenUnits[Gongweis[(juIndex[sanyuan] + i) % 9]].setDipan(QiYis[i]);
            }
        }
        for (int i = 0; i < 9; i++) {
            if (qimenUnits[i].getDipan().equals(qimenUtil.xunshou(shizhuStr).substring(2, 3))) {
                primaryxunshouluogong = i;
                break;
            }
        }
        for (int i = 0; i < 9; i++) {
            if (qimenUnits[i].getDipan().equals(shizhuYi)) {
                dishiganIndex = i;
                break;
            }
        }
        //落在中五宫的话调整到坤二宫
        xunshouLuogong = primaryxunshouluogong == 8 ? 5 : primaryxunshouluogong;
        zhifuTv.setText(Zhifus[primaryxunshouluogong]);
        zhishiTv.setText(Zhishis[primaryxunshouluogong]);
        xunshouTv.setText(qimenUtil.xunshou(shizhuStr));        //旬首,以时干来求

        String zhifu;
        zhifu = Zhifus[primaryxunshouluogong];
        zhifu = zhifu.equals("天禽") ? "天芮" : zhifu;
        int luocha = qimenUtil.luocha(shizhuStr, qimenUtil.xunshou(shizhuStr).substring(0, 2));
        if (yindun) {
            primaryZhishiluogon = Gongweis[(gongweiList.indexOf(primaryxunshouluogong) - luocha + 9) % 9];
            zhishiLuogong = primaryZhishiluogon == 8 ? 5 : primaryZhishiluogon;
        } else {
            primaryZhishiluogon = Gongweis[(gongweiList.indexOf(primaryxunshouluogong) + luocha) % 9];
            zhishiLuogong = primaryZhishiluogon == 8 ? 5 : primaryZhishiluogon;
        }

        dishiganIndex = dishiganIndex == 8 ? 5 : dishiganIndex;
        String xingUnit = "";
        for (int i = 0; i < 8; i++) {   //从值符开始排八神,值符跟着时干地盘开始排
            if (yindun) {
                qimenUnits[(dishiganIndex - i + 8) % 8].setShen(Shens[i]);
            } else {
                qimenUnits[(dishiganIndex + i) % 8].setShen(Shens[i]);
            }
            xingUnit = Xings[(xingList.indexOf(zhifu) + i) % 8];
            if (xingUnit.equals("天芮")) {
                qimenUnits[(dishiganIndex + i) % 8].setXing("禽芮");
                qimenUnits[(dishiganIndex + i) % 8].setZhonggongdipan(qimenUnits[8].getDipan());
            } else {
                qimenUnits[(dishiganIndex + i) % 8].setXing(xingUnit);
                qimenUnits[(dishiganIndex + i) % 8].setZhonggongdipan("");
            }
            qimenUnits[(dishiganIndex + i) % 8].setTianpan(qimenUnits[xingList.indexOf(Xings[(xingList.indexOf(zhifu) + i) % 8])].getDipan());
//            qimenUnits[(dishiganIndex + i) % 8].setTianpan(QiYis[(Arrays.asList(QiYis).indexOf(qimenUtil.xunshou(shizhuStr).substring(2, 3)) + i) % 9]);
            qimenUnits[(zhishiLuogong + i) % 8].setMen(Mens[(menList.indexOf(Zhishis[primaryxunshouluogong]) + i) % 8]);
        }
        paiAngan(showAngan.isChecked());
        for (int i = 0; i < 8 ; i++) {
            String state = qimenUtil.menState(qimenUnits[i].getGong(), qimenUnits[i].getMen());
            state = state.substring(state.length() - 1);    //取最后一个字
            String stateString = "";
            switch (state) {
                case "制":
                    stateString = "宫制门";
                    break;
                case "迫":
                    stateString = "门迫宫";
                    break;
                case "和":
                    stateString = "门生宫";
                    break;
                case "义":
                    stateString = "宫生门";
                    break;
                case "比":
                    stateString = "门比合宫";
                    break;
            }
            keyings[i].setText(GongStrs[i] + "宫  " + stateString + "\n" + qimenUtil.geju(qimenUnits[i].getTianpan(), qimenUnits[i].getDipan()) + "\n"
            + qimenUtil.geju(qimenUnits[i].getAngan(), qimenUnits[i].getDipan()));
        }

private void paiAngan(boolean show) {   //排暗干
        if (show) {
            for (int i = 0; i < 8; i++) {   //排左下角的八神:值符跟着地盘旬首,阳遁顺排,阴遁逆排
                if (yindun) {
                    qimenUnits[(xunshouLuogong - i + 8) % 8].setXiaozhifu(Xiaoshens[i]);
                } else {
                    qimenUnits[(xunshouLuogong + i) % 8].setXiaozhifu(Xiaoshens[i]);
                }
            }
            //排暗干:1、时干随值使,阳顺阴逆。2、时干与值使门落宫的地盘奇仪相同则时干入中宫。
            for (int i = 0; i < 9; i++) {
                if (yindun) {   //阴遁逆排
                    if (qimenUnits[zhishiLuogong].getDipan().equals(shizhuYi)) {
                        qimenUnits[Gongweis[(5 - i + 9) % 9]].setAngan(QiYis[(qiyiList.indexOf(shizhuYi) + i) % 9]);
                    } else {
                        qimenUnits[Gongweis[(gongweiList.indexOf(primaryZhishiluogon) - i + 9) % 9]].setAngan(QiYis[(qiyiList.indexOf(shizhuYi) + i) % 9]);
                    }
                } else {        //阳遁顺排
                    if (qimenUnits[zhishiLuogong].getDipan().equals(shizhuYi)) {
                        qimenUnits[Gongweis[(5 + i) % 9]].setAngan(QiYis[(qiyiList.indexOf(shizhuYi) + i) % 9]);
                    } else {
                        qimenUnits[Gongweis[(gongweiList.indexOf(primaryZhishiluogon) + i) % 9]].setAngan(QiYis[(qiyiList.indexOf(shizhuYi) + i) % 9]);
                    }
                }
            }
        } else {
            for (int i = 0; i <  8; i++) {
                qimenUnits[i].setXiaozhifu("");
            }
            for (int i = 0; i < 9; i++) {
                qimenUnits[i].setAngan("");
            }
        }
    }
Screenshot_20220708_185901.jpg
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 216,142评论 6 498
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 92,298评论 3 392
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 162,068评论 0 351
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 58,081评论 1 291
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 67,099评论 6 388
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 51,071评论 1 295
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 39,990评论 3 417
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 38,832评论 0 273
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 45,274评论 1 310
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 37,488评论 2 331
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 39,649评论 1 347
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 35,378评论 5 343
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 40,979评论 3 325
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 31,625评论 0 21
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 32,796评论 1 268
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 47,643评论 2 368
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 44,545评论 2 352

推荐阅读更多精彩内容