『主力活跃主图』捕捉主力动向,带个股解盘和主力活跃度数值
这款主力活跃主图指标是专为通达信打造的实战型股票分析公式,融合主力资金活跃度、量价趋势、多周期均线共振等核心维度,既能可视化呈现个股所属行业/概念板块,又能通过立体K线、动态文字提示,精准判断股价强弱、主力行为及买卖时机。
使用方法:
1. 安装:将源码复制到通达信公式管理器,选择“主图指标”新建并保存,加载到个股K线图即可;
2. 核心信号:K线标注“活跃”代表主力资金进场,“起飞”提示短线拉升机会;右上角“主力活跃值”数值越高,主力参与度越强;
3. 操作指引:图中黄色/白色文字直接给出仓位建议(如“中线参与仓位2/3”),“调整结束短线介入”“通道改变坚决离场”等提示可直接作为买卖依据;黄色/红色K线区分涨跌强度,黄色圆点标注高低点,辅助判断顶底。
该指标适配短线/中线交易,兼顾大盘与个股联动分析,新手可直接按文字提示操作,老手可结合主力活跃值进一步验证趋势。
总结
1. 指标核心是通过量价、均线、主力活跃度多维度给出直观买卖+仓位建议;
2. “活跃”“起飞”标注和主力活跃值是判断主力动向的关键信号;
3. 自带板块信息、高低点标注,新手可直接按文字提示操作。
DRAWGBK(1,RGB(58,0,0),RGB(0,0,0),0,'BJ1',0);
DRAWTEXT_FIX(ISLASTBAR,0.0,0.08,0,HYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0,00,DYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.04,0,GNBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.13,0,FGBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.18,0,ZSBLOCK)COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,0),COLOR2F2FFF;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3.1,0),COLOR000033;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0),COLOR000080;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0),COLOR0000CC;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0),COLOR0000FF;{立体红颜色};
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,0 ),COLORFFFF00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR000000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR6A6A00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORDDDD00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0),COLORFFFF00;{立体青色};
V1:=EMA(CLOSE,5);
V2:=EMA(EMA(CLOSE,90)*1.01,10);
AAA:=CONST(HHV(H,90));
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
T1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));
T4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));
T5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
T18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
T19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));
T20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));
T21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));
T22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0));
T23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));
T24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0));
T25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0));
DRAWTEXT(T1=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'量能理想,明显走强,中线参与,仓位在2/3左右'),COLOR8080FF;
DRAWTEXT(T2=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'走势趋强,还显不足,短线进场,仓位在1/2左右'),COLOR8080FF;
DRAWTEXT(T3=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'量价良好,没有明显走强,短线进场,仓位1/2左右'),COLOR8080FF;
DRAWTEXT(T4=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'形态尚可,量能不足,未完全走强,短线参与,仓位1/3左右'),COLOR8080FF;
DRAWTEXT(T5=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'形态变坏,重仓者减持大半,清仓者观望'),COLORFFFF00;
DRAWTEXT(T6=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'随大盘一起下跌,明显缩量走势,考虑到风险,减持或清仓'),COLORFFFF00;
DRAWTEXT(T7=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股放量下跌,走势明显偏弱,离场观望'),COLORFFFF00;
DRAWTEXT(T8=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'该股缩量下跌,走势偏弱,离场观望。'),COLORFFFF00;
DRAWTEXT(T9=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'该股形态良好,强势明显,量能充足,可以继续持有'),COLOR8080FF;
DRAWTEXT(T10=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'上行趋势不变,强势依然,量能开始转弱,注意风险'),COLOR8080FF;
DRAWTEXT(T11=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓'),COLOR8080FF;
DRAWTEXT(T12=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股走势趋弱,量能不足,减持大部分筹码'),COLORFFFF00;
DRAWTEXT(T13=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股形态不佳,注意成交量的变化,目前不适合参与'),COLORFFFF00;
DRAWTEXT(T14=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'趋势不明,股价偏弱,注意量能变化,目前不宜参与'),COLORFFFF00;
DRAWTEXT(T15=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'有走强迹象,但量能不足,趋势不明,不适合操作'),COLORFFFF00;
DRAWTEXT(T16=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'该股走势太弱,没有参与价值。'),COLORFFFF00;
DRAWTEXT(T17=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘理想,有明显走强迹象,中线参与,仓位在2/3左右'),COLOR8080FF;
DRAWTEXT(T18=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'如前期经过一轮下跌,最佳买点,前期有过一段涨幅需谨慎'),COLORFFFFFF;
DRAWTEXT(T19=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'考虑短线进场,仓位在1/2左右,一旦量能放大,加仓买入'),COLOR8080FF;
DRAWTEXT(T20=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘形态走坏,重仓者可以减去大部分仓位。'),COLORFFFF00;
DRAWTEXT(T21=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘缩量调整,注意风险,短线清仓观望。'),COLORFFFF00;
DRAWTEXT(T22=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘走势良好,量能理想,可以继续持有强势股。'),COLOR8080FF;
DRAWTEXT(T23=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘形态良好,但量能稍显不足,随时准备减仓。'),COLORFFFFFF;
DRAWTEXT(T24=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘趋势不明,注意成交量变化,目前不适宜进场。'),COLORFFFF00;
DRAWTEXT(T25=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘趋势向下,量能萎缩,不适合进场。'),COLORFFFF00;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.08,0,HYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0,00,DYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.04,0,GNBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.13,0,FGBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.18,0,ZSBLOCK)COLORYELLOW;
XG1:=C/REF(C,1)>1.05;
STICKLINE(XG1,H,L,0,1),COLORYELLOW;
STICKLINE(XG1,C,O,1.9,0),COLOR009F9F;
STICKLINE(XG1,C,O,1.1,0),COLOR11DDDD;
STICKLINE(XG1,C,O,0.3,0),COLOR44FFFF;
均价:=(3*C+H+L+O)/6;
ZBGS1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36;
ZBGS2:=(LLV(ZBGS1,2)+LLV(ZBGS1,4)+LLV(ZBGS1,6))/3;
SZ1:=REF(ZBGS1,1)=REF(ZBGS2,1) AND ZBGS1>ZBGS2 AND CLOSE>ZBGS1;
SZ2:=ZBGS1>ZBGS2 AND ZBGS1>REF(ZBGS1,1) AND ZBGS2>REF(ZBGS2,1) AND H/ZBGS1<1.1 AND L>ZBGS2 AND CLOSE>ZBGS1;
SZ3:=ZBGS1>ZBGS2 AND ZBGS1>REF(ZBGS1,1) AND ZBGS2>=REF(ZBGS2,1) AND H/ZBGS1>1.1;
SZ4:=ZBGS1>ZBGS2 AND ZBGS1>REF(ZBGS1,1) AND ZBGS2>REF(ZBGS2,1) AND CLOSE>ZBGS2 AND CLOSE<ZBGS1;
SZ5:=(ZBGS1>ZBGS2 AND ZBGS2>REF(ZBGS2,1) AND ZBGS1<>REF(ZBGS1,1) AND CLOSE<ZBGS2) OR (ZBGS1>ZBGS2 AND ZBGS1<REF(ZBGS1,1) AND ZBGS2<REF(ZBGS2,1) AND CLOSE<ZBGS2);
SZ6:=REF(ZBGS1,1)>REF(ZBGS2,1) AND ZBGS1=ZBGS2 AND CLOSE<ZBGS2;
XD1:=ZBGS1=ZBGS2 AND CLOSE<ZBGS2 OR (ZBGS1<REF(ZBGS1,1) AND ZBGS2<REF(ZBGS2,1)AND REF(ZBGS1,1)=REF(ZBGS2,1) AND CLOSE<ZBGS2);
XD2:=ZBGS1=ZBGS2 AND CLOSE>ZBGS1;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ1,0.8,0.05,0,'调整结束短线介入'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ2,0.8,0.05,0,'上升通道走势良好'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ3,0.8,0.05,0,'股价偏离注意调整'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ4,0.8,0.05,0,'上升通道调整洗盘'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ5,0.8,0.08,0,'转向特征注意离场'),COLOR00FFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ6,0.8,0.02,0,'通道改变坚决离场'),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD1,0.8,0.08,0,'下跌通道只宜观望'),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD2,0.8,0.05,0,'短期底部准备进入'),COLORYELLOW;
ZBGS01:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
ZBGS02:=SMA(ZBGS01,3,1);ZBGS03:=SMA(ZBGS02,3,1);ZBGS04:=3*ZBGS02-2*ZBGS03;
ZBGS05:=ZBGS02>ZBGS03 AND ZBGS04>ZBGS03 AND ZBGS04>ZBGS02;
ZBGS06:=CAPITAL*C/1000000;ZBGS07:=(C-REF(C,1))/REF(C,1)*100;
ZBGS08:=NOT(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('S') OR DYNAINFO(4)=0 OR INBLOCK('创业板') OR INBLOCK('科创板')) OR BARSCOUNT(C)>1;
ZBGS09:=ZBGS06>0 AND ZBGS06<80;
ZBGS010:=ZBGS07>9.8 AND ZBGS07<10.99 AND C=H;
ZBGS011:=C>2 AND C<22;ZBGS012:=COUNT(ZBGS010,2)=1;
ZBGS013:=ZBGS05 AND ZBGS08 AND ZBGS09 AND ZBGS010 AND ZBGS011 AND ZBGS012;
ZBGS014:=(C/REF(C,1)-1)*100;ZBGS015:=(O/REF(C,1)-1)*100;
ZBGS016:=DYNAINFO(15)/O/100;
ZBGS017:=(EMA(O,20)-REF(EMA(O,20),1))/REF(EMA(O,20),1)*100;
ZBGS018:=REF(L,BARSLAST(CROSS(ZBGS017,0)));
ZBGS019:=(O-ZBGS018)/ZBGS018*100;
ZBGS020:=CODELIKE('60') OR CODELIKE('00');
ZBGS021:=(C/REF(C,1)-1)*100>9.8 AND H=C;LB1:=EVERY(ZBGS021,4)<3;
ZBGS022:=LB1 AND ZBGS019<=20 AND REF(ZBGS014>9.80,1) AND ZBGS015>=2 AND ZBGS015<=7.5 AND ZBGS020;
STICKLINE(ZBGS013,C,O,2,0),COLORYELLOW;STICKLINE(ZBGS013,C,O,1,0),COLORYELLOW;
DRAWTEXT(ZBGS013,L*0.99,'←活跃'),COLORYELLOW;DRAWICON(ZBGS013,L*0.999,11);
STICKLINE(ZBGS022,C,O,2,0),COLORYELLOW;STICKLINE(ZBGS022,C,O,1,0),COLORYELLOW;
DRAWTEXT(ZBGS022,L*0.99,'←起飞'),COLORYELLOW;DRAWICON(ZBGS022,L*0.999,9);
主力活跃:ZBGS016/REF(V,1)*100,COLORRED,NODRAW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND V>0,0.85,0.9001,0,'主力活跃值:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND V>0,0.92,0.9001,0,主力活跃),COLORYELLOW;
局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高点预选C=1);
距前低天:=BARSLAST(局部低点预选C=-1);
小值周期:=LOWRANGE(L);
大值周期:=TOPRANGE(H);
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);
判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);
高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);
高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);
预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);
判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);
低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);
距前高天A:=BARSLAST(高保留=1);
距前低天A:=BARSLAST(低保留=-1);
预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);
判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);
高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);
高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);{}
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);
预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);
判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);
低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);
低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);
距前高天YA:=BARSLAST(高保留X=1);
距前低天YA:=BARSLAST(低保留X=-1);
预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);
判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);
高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);
高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);
预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);
判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);
低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);
低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW;
DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLOR0000FF;
DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORFFFF00;
DRAWICON(极点保留=-1,L-0.00,1);
DRAWICON(极点保留=1,H+0.00,2);