|
以下是通达信阴阳互换（鹏腾2009版本）源码主图选股贴图（无源码的请下载附件导入）
思路分享：取两根涨跌幅大于4%的Ｋ线，两根Ｋ线区间小于15天，区间振幅小于10%，两根Ｋ线可根据需要任意更换，基本有四种：阴阳组合、双阳组合、双阴组合、阳阴组合。大于最后一根4%Ｋ线的收盘价为买入信号。当收盘价大于该线为红色，当收盘价小于该线为绿色。参数设置见第5与第6两幅图，主图与选股公式设置同理
{主图}
T1:=IF(1*大阳1,C>REF(C,1)*1.04,IF(1*大阴1,REF(C,1)/C>1.04,0));
T2:=IF(1*大阳2,C>REF(C,1)*1.04,IF(1*大阴2,REF(C,1)/C>1.04,0));
TT:=BARSLAST(T1);
ZF:=HHV(H,TT+1)/LLV(L,TT+1);
A1:=REF(ZF,1)<1.10;
A2:=BETWEEN(REF(TT,1),1,15);
A3:=T2 AND H>REF(REF(L,TT),1);
XG:=CURRBARSCOUNT=CONST(BARSLAST(A1 AND A2 AND A3))+2;
A:=DRAWLINE(REF(XG,1),C,REF(REF(XG,1),1),REF(C,1),1);
A4:=BARSLAST(XG);
B:=IF(A4<15,A,DRAWNULL);
红进:IF(C>A,B,DRAWNULL),COLORRED,LINETHICK2;
绿出:IF(C<A,B,DRAWNULL),COLORGREEN,LINETHICK2;
A5:=BACKSET(XG=1,TT+1);
A6:=BARSLAST(CROSS(A5=1,0.5));
STICKLINE(A6=0,H*1.01,L*0.99,4,-1),COLORWHITE;
STICKLINE(REF(XG,1),H*1.01,L*0.99,4,-1),COLORWHITE;
DRAWTEXT(A6=0,H*1.02,'阴阳互换'),COLORYELLOW;
DRAWKLINE(H,O,L,C);
STICKLINE(A6=0 AND 大阳1,C,O,2.5,0),COLORRED;
STICKLINE(A6=0 AND 大阴1,C,O,2.5,0),COLORGREEN;
STICKLINE(REF(XG,1) AND 大阳2,C,O,2.5,0),COLORRED;
STICKLINE(REF(XG,1) AND 大阴2,C,O,2.5,0),COLORGREEN;
DRAWICON((COUNT(C>A,A4-1)=1 AND C>A OR CROSS(C,A)) AND A4-1<15,L,1);
DRAWTEXT_FIX(ISLASTBAR,0,10,0,'鹏腾2009版本'),COLORWHITE;
{选股}
T1:=IF(1*大阳1,C>REF(C,1)*1.04,IF(1*大阴1,REF(C,1)/C>1.04,0));
T2:=IF(1*大阳2,C>REF(C,1)*1.04,IF(1*大阴2,REF(C,1)/C>1.04,0));
TT:=BARSLAST(T1);
ZF:=HHV(H,TT+1)/LLV(L,TT+1);
A1:=REF(ZF,1)<1.10;
A2:=BETWEEN(REF(TT,1),5,15);
A3:=T2 AND H>REF(REF(L,TT),1);
XG:=CURRBARSCOUNT=CONST(BARSLAST(A1 AND A2 AND A3))+2;
A:=DRAWLINE(REF(XG,1),C,REF(REF(XG,1),1),REF(C,1),1);
A4:=BARSLAST(XG);
XG1:=(COUNT(C>A,A4)=1 AND C>A OR CROSS(C,A)) AND A4<15;
COUNT(XG1,5);
723333577.jpg
723400705.jpg
723477499.jpg
723533047.jpg
723588717.jpg
72444293.jpg
724100575.jpg
|
