|
以下是金龙腾飞（鹏腾2009版本）源码 主图 选股 通达信 贴图（无源码的请下载附件导入）
主图与选股参数设置
{m1 0 1000 30}
{m2 0 1000 60}
{n 0 1000 20}
{主图}
T1:=MA(C,M1);
T2:=MA(C,M2);
DRAWBAND(T1,RGB(200,0,0),T2,RGB(0,200,0));
DRAWKLINE(H,O,L,C);
A:=EVERY(BETWEEN(C/MA(C,M1),1,1.1) AND T1/T2<1.1 AND MA(C,M1)>MA(C,M2) AND (MA(C,M1)-MA(C,M2))>REF((MA(C,M1)-MA(C,M2)),1),N);
B:=BARSLAST(A);
D:IF(B<N,DRAWLINE(A,C,REF(A,1),REF(C,1),1),DRAWNULL),COLORYELLOW,DOTLINE;
DRAWTEXT(REFX(B=1,1),H,'金龙腾飞'),COLORYELLOW,DRAWABOVE;
DRAWICON(CROSS(C,REF(C,B)) AND B<N,H,1);
DRAWICON(COUNT(C>REF(C,B),B)=1 AND C>REF(C,B) AND B<N,H,1);
{选股}
T1:=MA(C,M1);
T2:=MA(C,M2);
A:=EVERY(BETWEEN(C/MA(C,M1),1,1.1) AND T1/T2<1.1 AND MA(C,M1)>MA(C,M2) AND (MA(C,M1)-MA(C,M2))>REF((MA(C,M1)-MA(C,M2)),1),N);
B:=BARSLAST(A);
xg:CROSS(C,REF(C,B)) AND B<N OR COUNT(C>REF(C,B),B)=1 AND C>REF(C,B) AND B<N;
199577881.jpg
|
