通达信二次启爆翻红主图/副图/选股预警源码

启爆翻红主图源码

MA1:MA(CLOSE,5);

MA3:MA(CLOSE,21);
MA4:MA(CLOSE,75);

VAR2:=(REF(HIGH,1)+REF(LOW,1))/2;
VAR3:=MA(CLOSE,21)+2*STD(CLOSE,21);
DRAWICON(CROSS(VAR2,VAR3),HIGH*1.035,2);
DRAWTEXT(CROSS(VAR2,VAR3),HIGH*1.02,'卖出'), COLORGREEN;
{VAR4:=REF(CLOSE,1);
VAR5:=SMA(MAX(CLOSE-VAR4,0),7,1)/SMA(ABS(CLOSE-VAR4),7,1)*100;
VAR6:=CROSS(79,VAR5);
VAR7:=FILTER(VAR6,4);
DRAWICON(VAR7,HIGH*1.035,2);
DRAWTEXT(VAR7,HIGH*1.02,'卖出'), COLORGREEN;}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
F:=EMA(CLOSE,10)-EMA(CLOSE,22);
A:=EMA(F,8);
MD:=(F-A)*2;
HS:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,VOL)/CAPITAL*100;
周期:=BARSLAST(CROSS(F,A) AND A<=0.05)+1;
绿柱:=BARSLASTCOUNT(MD<REF(MD,1))>1;
红柱:=BARSLASTCOUNT(MD>REF(MD,1))>1;
绿柱群:=BARSLASTCOUNT(绿柱);
红柱群:=BARSLASTCOUNT(红柱);
绿柱群统计:=COUNT(绿柱群,周期);
红柱群统计:=COUNT(红柱群,周期);
DIF:=EMA(HS,13)-EMA(HS,26);
DEA:=EMA(DIF,10);
MACD:=DIF-DEA;
量缩:=REF(BARSLASTCOUNT(HS<=REF(HS,1)),1)>1;
量缩1:=REF(BARSLASTCOUNT(HS<=MA(HS,10)),1)>1;
量缩2:=REF(BARSLASTCOUNT(MACD<=REF(MACD,1)),1)>1;
量缩3:=量缩 OR 量缩1 OR 量缩2;
倍量:=HS>=REF(HS,1)*2.98;
梯量:=量缩3 AND 倍量;
前量成立:=REF(COUNT(C>O AND C>H*0.8 AND (C-REF(C,1))/REF(C,1)*100>=5,周期)>0,1);
前量1:=HHV(HS,BARSLAST(C>O AND C>H*0.8 AND (C-REF(C,1))/REF(C,1)*100>=5));
前量2:=HHV(HS,BARSLAST(CROSS(J,100))+1);
反转量:=IF(前量成立,HS>REF(前量1,1) ,HS>REF(前量1,1) AND HS>REF(前量2,1));
换手翻红:=HS>=3;
回调1:=BARSLASTCOUNT(MD<=REF(MD,1));
回调2:=BARSLASTCOUNT(MAX(C,O)<=REF(MAX(C,O),1));
回调3:=BARSLASTCOUNT(C<=MA(C,10));
回调:=REF(回调1,1)>1 OR REF(回调2,1)>1 OR REF(回调3,1)>1;
启动1:=C>MA(C,10) AND C>REF(MAX(C,O),1) AND (O-REF(C,1))/REF(C,1)*100<=3;
启动2:=C>MA(C,10) AND MD>REF(MD,1) AND (O-REF(C,1))/REF(C,1)*100<=3;
TJ:=REF(绿柱群统计<2 OR 红柱群统计<1,1);
TJ1:=梯量;
TJ2:=反转量;
TJ3:=换手翻红;
TJ4:=回调 AND 启动1;
TJ5:=回调 AND 启动2;
N:=BARSLAST(REF(BARSLASTCOUNT(MD<REF(MD,1))>1,1) AND MD>REF(MD,1) AND MD<0)+1;
CL:=SUM((C-MIN(L,REF(C,1)))*VOL/10000/(MAX(REF(C,1),H)-MIN(REF(C,1),L)),N);
CH:=SUM((MAX(H,REF(C,1))-C)*VOL/10000/(MAX(REF(C,1),H)-MIN(REF(C,1),L)),N);
XGK:=TJ AND TJ1  AND TJ2 AND TJ3 AND TJ4 AND REF(周期,1)>2 AND INDEXC>MA(INDEXC,10) AND INDEXADV>INDEXDEC;
XGM:=TJ AND TJ1  AND TJ2 AND TJ3 AND TJ5 AND REF(周期,1)>2 AND INDEXC>MA(INDEXC,10) AND INDEXADV>INDEXDEC;
XG:=XGK OR XGM;
DRAWICON(XG,L*0.98,1);
DRAWTEXT(XG,L*0.96,'启爆翻红');
 

智取地量副图源码

换手:VOL/CAPITAL*100,VOLSTICK;
V1:=MIN(REF(换手,1),REF(换手,2));
V2:=MIN(REF(换手,3),REF(换手,4));
V3:=MIN(REF(换手,5),REF(换手,6));
V4:=MIN(REF(换手,7),REF(换手,8));
V5:=MIN(REF(换手,9),REF(换手,10));
V6:=MIN(REF(换手,11),REF(换手,12));
V7:=MIN(REF(换手,13),REF(换手,14));
V8:=MIN(REF(换手,15),REF(换手,16));
W1:=MIN(MIN(V1,V2),MIN(V3,V4));
W2:=MIN(MIN(V5,V6),MIN(V7,V8));
ZM1:=MIN(W1,W2);
五日:=REF(MA(换手,5),1);
智取地量:(ZM1*3+五日)/4,COLORBLUE;
 

{二次翻红}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
F:=EMA(CLOSE,10)-EMA(CLOSE,22);
A:=EMA(F,8);
MD:=(F-A)*2;
HS:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,VOL)/CAPITAL*100;
周期:=BARSLAST(CROSS(F,A) AND A<=0.05)+1;
绿柱:=BARSLASTCOUNT(MD<REF(MD,1))>1;
红柱:=BARSLASTCOUNT(MD>REF(MD,1))>1;
绿柱群:=BARSLASTCOUNT(绿柱);
红柱群:=BARSLASTCOUNT(红柱);
绿柱群统计:=COUNT(绿柱群,周期);
红柱群统计:=COUNT(红柱群,周期);
DIF:=EMA(HS,13)-EMA(HS,26);
DEA:=EMA(DIF,10);
MACD:=DIF-DEA;
量缩:=REF(BARSLASTCOUNT(HS<=REF(HS,1)),1)>1;
量缩1:=REF(BARSLASTCOUNT(HS<=MA(HS,10)),1)>1;
量缩2:=REF(BARSLASTCOUNT(MACD<=REF(MACD,1)),1)>1;
量缩3:=量缩 OR 量缩1 OR 量缩2;
倍量:=HS>=REF(HS,1)*2.98;
梯量:=量缩3 AND 倍量;
前量成立:=REF(COUNT(C>O AND C>H*0.8 AND (C-REF(C,1))/REF(C,1)*100>=5,周期)>0,1);
前量1:=HHV(HS,BARSLAST(C>O AND C>H*0.8 AND (C-REF(C,1))/REF(C,1)*100>=5));
前量2:=HHV(HS,BARSLAST(CROSS(J,100))+1);
反转量:=IF(前量成立,HS>REF(前量1,1) ,HS>REF(前量1,1) AND HS>REF(前量2,1));
换手翻红:=HS>=3;
回调1:=BARSLASTCOUNT(MD<=REF(MD,1));
回调2:=BARSLASTCOUNT(MAX(C,O)<=REF(MAX(C,O),1));
回调3:=BARSLASTCOUNT(C<=MA(C,10));
回调:=REF(回调1,1)>1 OR REF(回调2,1)>1 OR REF(回调3,1)>1;
启动1:=C>MA(C,10) AND C>REF(MAX(C,O),1) AND (O-REF(C,1))/REF(C,1)*100<=3;
启动2:=C>MA(C,10) AND MD>REF(MD,1) AND (O-REF(C,1))/REF(C,1)*100<=3;
TJ:=REF(绿柱群统计<2 OR 红柱群统计<1,1);
TJ1:=梯量;
TJ2:=反转量;
TJ3:=换手翻红;
TJ4:=回调 AND 启动1;
TJ5:=回调 AND 启动2;
N:=BARSLAST(REF(BARSLASTCOUNT(MD<REF(MD,1))>1,1) AND MD>REF(MD,1) AND MD<0)+1;
CL:=SUM((C-MIN(L,REF(C,1)))*VOL/10000/(MAX(REF(C,1),H)-MIN(REF(C,1),L)),N);
CH:=SUM((MAX(H,REF(C,1))-C)*VOL/10000/(MAX(REF(C,1),H)-MIN(REF(C,1),L)),N);
XGK:=TJ AND TJ1  AND TJ2 AND TJ3 AND TJ4 AND REF(周期,1)>2 AND INDEXC>MA(INDEXC,10) AND INDEXADV>INDEXDEC;
XGM:=TJ AND TJ1  AND TJ2 AND TJ3 AND TJ5 AND REF(周期,1)>2 AND INDEXC>MA(INDEXC,10) AND INDEXADV>INDEXDEC;
XG:=XGK OR XGM;
STICKLINE(XG,80,88,0,0),COLORRED;
STICKLINE(XG,50,80,3,0),COLOR3366BB;
STICKLINE(XG,50,80,2,0),COLOR3399CC;
STICKLINE(XG,50,80,1,0),COLOR33CCEE;
STICKLINE(XG,50,80,0.1,0),COLOR33FFFF;
STICKLINE(XG,20,50,5,0),COLOR3366BB;
STICKLINE(XG,20,50,3.3,0),COLOR3399CC;
STICKLINE(XG,20,50,1.6,0),COLOR33CCEE;
STICKLINE(XG,20,50,0.1,0),COLOR33FFFF;
STICKLINE(XG,0,20,7,0),COLOR3366BB;
STICKLINE(XG,0,20,5,0),COLOR3399CC;
STICKLINE(XG,0,20,3,0),COLOR33CCEE;
STICKLINE(XG,0,20,1,0),COLOR33FFFF;
DRAWICON(XG,94,1);
DRAWTEXT(XG>0,82,'  ←★二次启动翻红，买入可以有丰盈的收入'),COLORRED;
DRAWTEXT(XG>0,65,'  ←★买入时尽量降低成本，选择低位进入'),COLORYELLOW;
DRAWTEXT(XG,48,'   ←★指标特征，回调或横盘后再次发力买入，此指标适合短线'),COLOR00FFFF;
DRAWTEXT(XG ,33,'   ←★买入时，注意成交量，前一天缩量越大，后期涨幅越可观'),COLORYELLOW;
DRAWTEXT(XG ,14,'    ←★投资有风险，买入需谨慎！'),COLORMAGENTA;