实战指标之【拉升进入主图】与【选股公式】,(源码。通达信,有贴图)
2016-7-25 16:40:37点击:
{拉升进入主图} A6:EMA(CLOSE,5),COLORGREEN; A10:EMA(CLOSE,10),COLORGREEN; RJ:(C+O)*1/2; STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED; STICKLINE(A6<REF(A6,3),A6,REF(A6,1),1,1),COLORGREEN; IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2; IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2; JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3)); DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01); JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01))); CYC1:IF(JJJT,0.01*EXPMA(AMOUNT,6)/EXPMA(VOL,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN; CYC2:IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN; CYC3:IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34)); CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)); IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2; IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2; B:=CROSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1) AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2); 拉升进入:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1); DRAWTEXT(B,LOW-(H-L)*0.6,'升'); DRAWTEXT(拉升进入,LOW-(H-L)*0.96,'拉升'); {拉升进入选股} A6:=EMA(CLOSE,5),COLORGREEN; A10:=EMA(CLOSE,10),COLORGREEN; RJ:=(C+O)*1/2; {STICKLINE(A6>REF(A6,3),A6,REF(A6,1),1,1),COLORRED; STICKLINE(A6<REF(A6,3),A6,REF(A6,1),1,1),COLORGREEN;} Q1:=IF(C>A6,A6,DRAWNULL),COLORWHITE,LINETHICK2; Q2:=IF(C>A10,A10,DRAWNULL),COLORRED,LINETHICK2; JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3)); DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01); JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01))); CYC1:=IF(JJJT,0.01*EXPMA(AMOUNT,6)/EXPMA(VOL,6),EMA((HIGH+LOW+CLOSE)/3,6)),COLORGREEN; CYC2:=IF(JJJT,0.01*EXPMA(AMOUNT,8)/EXPMA(VOL,8),EMA((HIGH+LOW+CLOSE)/3,8)),COLORGREEN; CYC3:=IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34)); CYC∞:=IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)); P1:=IF(CYC1>REF(CYC1,1) OR C>CYC1,CYC1,DRAWNULL),COLORWHITE,LINETHICK2; P2:=IF(C>CYC2,CYC2,DRAWNULL),COLORRED,LINETHICK2; B:=CROSS(CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1) AND CYC∞>REF(CYC∞,1) AND C>CYC∞ AND RJ>REF(RJ,1) AND A6>REF(A6,1),0.2); 拉升进入:= CROSS(C,CYC∞) AND CYC∞>REF(CYC∞,1) AND CYC1>REF(CYC1,1) AND CYC2>REF(CYC2,1) AND CYC3>REF(CYC3,1); 拉升:=IF(A6>REF(A6,1),1,0) AND CROSS(C,A6),COLORRED; FILTER((拉升=1 AND V*1.5),5),COLORYELLOW;
- 上一篇:专吃主升浪的【抄底王】,(附图源码,通达信 有贴图) 2016/7/25
- 下一篇:买进逃顶(无未来函数) 2016/7/25