注意：
本文属于八戒
改编
指标公式，源码可以用于通达信软件，第一部分源码属于主图或副图；第二部分属于选股公式源码（多个选股公式请分别使用）；第三部分属于图片示例。
注意2：防止源码复制粘贴出错，请先把源码复制到WORD文档排序，再从WORD文档中复制源码！
从技术分析来看，大盘在2870点附近有缺口。
2904--2841区间
（2635--3174的中轴和黄金分割区间）
恐慌盘可能还没有那么多，如果后面跌破2841，那么短期很可能有猛烈的恐慌盘涌出来。
不破2841，维持一个震荡筑底，那么就会比较磨人。
筑底时间会拉长一些，通过长时间的反复探底来完成筑底不管用什么样的方法筑底，在筑底成功之前，尽可能晚一点满仓
（8步仓位管理）
，肯定不会错的。
第一部分 【主图公式】 手机/电脑
【缺口农历节气】主图①
编写如下：
XQK:=H
[
]
游资八戒1:=SUMBARS(XQK,1);
游资八戒2:=SUMBARS(XQK,2);
游资八戒3:=SUMBARS(XQK,3);
游资八戒4:=SUMBARS(XQK,4);
游资八戒5:=SUMBARS(XQK,5);
游资八戒6:=SUMBARS(XQK,6);
游资八戒7:=SUMBARS(XQK,7);
游资八戒8:=SUMBARS(XQK,8);
游资八戒9:=SUMBARS(XQK,9);
游资八戒10:=SUMBARS(XQK,10);
XQKZQ:=IF(EXIST(XQK,游资八戒1) AND EVERY(H
IF(EXIST(XQK,游资八戒2) AND EVERY(H
IF(EXIST(XQK,游资八戒3) AND EVERY(H
IF(EXIST(XQK,游资八戒4) AND EVERY(H
IF(EXIST(XQK,游资八戒5) AND EVERY(H
IF(EXIST(XQK,游资八戒6) AND EVERY(H
IF(EXIST(XQK,游资八戒7) AND EVERY(H
IF(EXIST(XQK,游资八戒8) AND EVERY(H
IF(EXIST(XQK,游资八戒9) AND EVERY(H
IF(EXIST(XQK,游资八戒10) AND EVERY(H
DYKX:=BARSLAST(H=CONST(REF(H,XQKZQ+1)) AND O=CONST(REF(O,XQKZQ+1)) AND L=CONST(REF(L,XQKZQ+1)) AND C=CONST(REF(C,XQKZQ+1)));
下缺口低界:=CONST(IF(EVERY(H
[
]
下缺口高界:=CONST(REF(L,DYKX));
STICKLINE(EXIST(XQK,DYKX+1) AND EVERY(H<下缺口高界,DYKX),下缺口高界,下缺口低界,5,0),COLORGREEN;
{===上缺口===}
SQK:=L>REF(H,1);
八戒1:=SUMBARS(SQK,1);
八戒2:=SUMBARS(SQK,2);
八戒3:=SUMBARS(SQK,3);
八戒4:=SUMBARS(SQK,4);
八戒5:=SUMBARS(SQK,5);
八戒6:=SUMBARS(SQK,6);
八戒7:=SUMBARS(SQK,7);
八戒8:=SUMBARS(SQK,8);
八戒9:=SUMBARS(SQK,9);
八戒10:=SUMBARS(SQK,10);
SQKZQ:=IF(EXIST(SQK,八戒1) AND EVERY(L>CONST(REF(H,八戒1)),八戒1),八戒1-1,
IF(EXIST(SQK,八戒2) AND EVERY(L>CONST(REF(H,八戒2)),八戒2),八戒2-1,
IF(EXIST(SQK,八戒3) AND EVERY(L>CONST(REF(H,八戒3)),八戒3),八戒3-1,
IF(EXIST(SQK,八戒4) AND EVERY(L>CONST(REF(H,八戒4)),八戒4),八戒4-1,
IF(EXIST(SQK,八戒5) AND EVERY(L>CONST(REF(H,八戒5)),八戒5),八戒5-1,
IF(EXIST(SQK,八戒6) AND EVERY(L>CONST(REF(H,八戒6)),八戒6),八戒6-1,
IF(EXIST(SQK,八戒7) AND EVERY(L>CONST(REF(H,八戒7)),八戒7),八戒7-1,
IF(EXIST(SQK,八戒8) AND EVERY(L>CONST(REF(H,八戒8)),八戒8),八戒8-1,
IF(EXIST(SQK,八戒9) AND EVERY(L>CONST(REF(H,八戒9)),八戒9),八戒9-1,
IF(EXIST(SQK,八戒10) AND EVERY(L>CONST(REF(H,八戒10)),八戒10),八戒10-1,DRAWNULL))))))))));
SDYKX:=BARSLAST(H=CONST(REF(H,SQKZQ+1)) AND O=CONST(REF(O,SQKZQ+1)) AND L=CONST(REF(L,SQKZQ+1)) AND C=CONST(REF(C,SQKZQ+1)));
上缺口高界:=CONST(IF(EVERY(L>REF(H,SDYKX),SDYKX),LLV(L,SDYKX),DRAWNULL));
上缺口低界:=CONST(REF(H,SDYKX));
STICKLINE(EXIST(SQK,SDYKX+1) AND EVERY(L>上缺口低界,SDYKX),上缺口高界,上缺口低界,5,0),COLORRED;
TQ:=BARSLAST(L>REF(H,1));
EQ:=COUNT(L
[
]
农历节气:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
农历节:=INTPART(农历节气/15)+1,NODRAW;
节N:=
农历节!=REF(农历节,1);
AHZ:=HHV(H,200);
ALZ:=LLV(L,200);
BZ0:=(AHZ-ALZ)/40;
STICKLINE(农历节!=REF(农历节,1),C,C-BZ0,1,1),COLOR00FFFF;
节气:=IF(节N AND 农历节=3,'立春',IF(节N AND 农历节=4 ,'雨水',IF(节N AND 农历节=5,'惊蛰',IF(节N AND 农历节=6,'春分',
IF(节N AND 农历节=7,'清明',IF(节N AND 农历节=8,'谷雨',IF(节N AND 农历节=9,'立夏',IF(节N AND 农历节=10,'小满',
IF(节N AND 农历节=11,'芒种',IF(节N AND 农历节=12,'夏至',IF(节N AND 农历节=13,'小暑',IF(节N AND 农历节=14,'大署',
IF(节N AND 农历节=15,'立秋',IF(节N AND 农历节=16,'处暑',IF(节N AND 农历节=17,'白露',IF(节N AND 农历节=18,'秋分',
IF(节N AND 农历节=19,'寒露',IF(节N AND 农历节=20,'霜降',IF(节N AND 农历节=21 ,'立冬',IF(节N AND 农历节=22,'小雪',
IF(节N AND 农历节=23,'大雪',IF(节N AND 农历节=24,'冬至',IF(节N AND 农历节=1,'小寒',IF(节N AND 农历节=2,'大寒',
DRAWNULL))))))))))))))))))))))));
DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
DRAWNULL))))))))))));
今日:=DATE+19000000,NODRAW;
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
DRAWTEXT_FIX(1,0.30,0.02,1,输节K),COLORYELLOW;
【
缺口农历节气
】
主图
②
，
统计过往500个周期的所有缺口，将缺口全部画线，画线越密集，则代表支撑压力的能量越大
。
【缺口农历节气】主图②
编写如下：
缺口选股定义:=L>REF(H,1)*1.01 AND L/LLV(L,30)<1.25;
时间:=BARSLAST(缺口选股定义);
STICKLINE(缺口选股定义,L,REF(H,1),100,-1),COLORYELLOW;
DRAWKLINE(H,O,L,C);
DRAWNUMBER(缺口选股定义,L,L),COLORYELLOW;
DRAWNUMBER(REFX(缺口选股定义,1),H,H),COLORYELLOW;
DRAWTEXT(缺口选股定义,LOW,'●'),COLORRED;DRAWTEXT(REFX(缺口选股定义,1),H,'●'),COLORRED;
DRAWICON(COUNT(C>REF(H,时间),时间)=1 AND C>REF(H,时间) AND 时间<=15,H,1);
STICKLINE(C>O AND L>REF(H,1),H,L,0,0),COLORRED;
STICKLINE(C>O AND L>REF(H,1),C,O,3,0),COLORRED;
STICKLINE(C
REF(H,1),H,L,0,0),COLORGREEN;
STICKLINE(C
REF(H,1),C,O,3,0),COLORGREEN;
DRAWSL(C>O AND L>REF(H,1),REF(H,1),0,500,0),COLORRED;
DRAWSL(C>O AND L>REF(H,1),L,0,500,0),COLORRED;
DRAWSL(C
REF(H,1),REF(H,1),0,500,0),COLORLIGREEN;
DRAWSL(C
REF(H,1),L,0,500,0),COLORLIGREEN;
STICKLINE(C
STICKLINE(C
STICKLINE(C>O AND H
[
]
STICKLINE(C>O AND H
[
]
DRAWSL(C
DRAWSL(C
DRAWSL(C>O AND H
[
]
DRAWSL(C>O AND H
[
]
TQ:=BARSLAST(L>REF(H,1));
EQ:=COUNT(L
[
]
农历节气:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
农历节:=INTPART(农历节气/15)+1,NODRAW;
节N:=
农历节!=REF(农历节,1);
AHZ:=HHV(H,200);
ALZ:=LLV(L,200);
BZ0:=(AHZ-ALZ)/40;
STICKLINE(农历节!=REF(农历节,1),C,C-BZ0,1,1),COLOR00FFFF;
节气:=IF(节N AND 农历节=3,'立春',IF(节N AND 农历节=4 ,'雨水',IF(节N AND 农历节=5,'惊蛰',IF(节N AND 农历节=6,'春分',
IF(节N AND 农历节=7,'清明',IF(节N AND 农历节=8,'谷雨',IF(节N AND 农历节=9,'立夏',IF(节N AND 农历节=10,'小满',
IF(节N AND 农历节=11,'芒种',IF(节N AND 农历节=12,'夏至',IF(节N AND 农历节=13,'小暑',IF(节N AND 农历节=14,'大署',
IF(节N AND 农历节=15,'立秋',IF(节N AND 农历节=16,'处暑',IF(节N AND 农历节=17,'白露',IF(节N AND 农历节=18,'秋分',
IF(节N AND 农历节=19,'寒露',IF(节N AND 农历节=20,'霜降',IF(节N AND 农历节=21 ,'立冬',IF(节N AND 农历节=22,'小雪',
IF(节N AND 农历节=23,'大雪',IF(节N AND 农历节=24,'冬至',IF(节N AND 农历节=1,'小寒',IF(节N AND 农历节=2,'大寒',
DRAWNULL))))))))))))))))))))))));
DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;
月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
DRAWNULL))))))))))));
今日:=DATE+19000000,NODRAW;
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
DRAWTEXT_FIX(1,0.30,0.02,1,输节K),COLORYELLOW;
