以下是通达信鹏腾2009版双阴探路主图幅图选股源码(无源码的请下载附件导入)
宝箱那边生意红火,指标区连续三天精华帖,双丰收。朋友 你还指责我吗?时间就是证明。
这是”鹏腾2009”童鞋再次出招,谢谢您的无私奉献。
{主图}
VH:=REF(VOL,BARSLAST(VOL=HHV(VOL,250)));
VV:=VOL/VH;
ZF:=(H-L)/REF(C,1)*100;
TJ:=ZF>5.6 AND VH>0.7 AND C<O;
T:=BARSLAST(TJ);
BL:=(L/REF(L,T)-1)*100;
A:=BL<1.7 AND L>REF(L,T) AND VV<REF(VV,T) AND VV>0.33 AND C<O;
TJA:=COUNT(A,T)=1 AND A;
TA:=BARSLAST(TJA);
QF:=BACKSET(TA=0,T+1);
QT:=BARSLAST(CROSS(QF=1,0.5));
STICKLINE(QT=0,C,O,2,0),COLORYELLOW;
STICKLINE(QT=0,H,L,2,0),COLORYELLOW;
DRAWLINE(QT=0,L,TA=0,REF(L,QT),1),COLORYELLOW;
STICKLINE(TA=0,C,O,2,0),COLORMAGENTA;
STICKLINE(TA=0,H,L,2,0),COLORMAGENTA;
DRAWICON(TA=0,L*0.95,1);
{幅图}
VH:=REF(VOL,BARSLAST(VOL=HHV(VOL,250)));
VV:=VOL/VH;
ZF:=(H-L)/REF(C,1)*100;
TJ:=ZF>5.6 AND VH>0.7 AND C<O;
T:=BARSLAST(TJ);
BL:=(L/REF(L,T)-1)*100;
A:=BL<1.7 AND L>REF(L,T) AND VV<REF(VV,T) AND VV>0.33 AND C<O;
TJA:=COUNT(A,T)=1 AND A;
TA:=BARSLAST(TJA);
STICKLINE(TA=0,0,6,1.5,0),COLORMAGENTA;
{选股}
VH:=REF(VOL,BARSLAST(VOL=HHV(VOL,250)));
VV:=VOL/VH;
ZF:=(H-L)/REF(C,1)*100;
TJ:=ZF>5.6 AND VH>0.7 AND C<O;
T:=BARSLAST(TJ);
BL:=(L/REF(L,T)-1)*100;
A:=BL<1.7 AND L>REF(L,T) AND VV<REF(VV,T) AND VV>0.33 AND C<O;
TJA:=COUNT(A,T)=1 AND A;
TA:=BARSLAST(TJA);
TA=0;
631166117.png
631233421.png
631300259.jpg
631355967.rar
(2.58 KB, 下载次数: 0, 售价: 3 金钱)
|