通达信拉升进入主图与选股公式有附图

 通达信拉升进入主图与选股公式有附图

{牛牛指标网提供：www.tdx001.com}

复制内容到剪贴板

1. {拉升进入主图}   
2. A6:EMA(CLOSE,5),COLORGREEN;   
3. A10:EMA(CLOSE,10),COLORGREEN;   
4. RJ:(C+O)*1/2;   
5. STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED;   
6. STICKLINE(A6<REF(A6,3),A6,REF(A6,1),1,1),COLORGREEN;   
7. IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2;   
8. IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2;   
9. JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));   
10. DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);   
11. JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));   
12. CYC1:IF(JJJT,0.01*EXPMA(AMOUNT,6)/EXPMA(VOL,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN;   
13. CYC2:IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN;   
14. CYC3:IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));   
15. CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));   
16. IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2;   
17. IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2;   
18. B:=CROSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1)   
19. AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2);   
20. 拉升进入:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1);   
21. DRAWTEXT(B,LOW-(H-L)*0.6,'升');   
22. DRAWTEXT(拉升进入,LOW-(H-L)*0.96,'拉升');   

 

复制内容到剪贴板

1. {拉升进入选股}   
2. A6:=EMA(CLOSE,5),COLORGREEN;   
3. A10:=EMA(CLOSE,10),COLORGREEN;   
4. RJ:=(C+O)*1/2;   
5. {STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED;   
6. STICKLINE(A6<REF(A6,3),A6,REF(A6,1),1,1),COLORGREEN;}   
7. Q1:=IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2;   
8. Q2:=IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2;   
9. JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));   
10. DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);   
11. JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));   
12. CYC1:=IF(JJJT,0.01*EXPMA(AMOUNT,6)/EXPMA(VOL,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN;   
13. CYC2:=IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN;   
14. CYC3:=IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));   
15. CYC∞:=IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));   
16. P1:=IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2;   
17. P2:=IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2;   
18. B:=CROSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1)   
19. AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2);   
20. 拉升进入:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1);   
21. 拉升:=IF(A6>REF(A6,1),1,0) AND   
22. CROSS(C,A6),COLORRED;   
23. FILTER((拉升=1 AND V*1.5),5),COLORYELLOW;   

62211719.jpg