通达信急拉急洗（鹏腾2009版本）源码 主图 选股

{主图}
A:=EVERY(C REF(C,1),3) AND EVERY(REF(C,3)/REF(C,4) 1.04,2) AND L =REF(L,4);
B:=BARSLAST(A);
DRAWTEXT(A,LOW,'------------------------------------------------------------')COLORYELLOW;
DRAWTEXT(A,H,'急拉急洗')COLORYELLOW;
DRAWICON(CROSS(C,REF(H*1.05,B)) AND C O AND B 60,LOW,9);

{选股}
A:=EVERY(C REF(C,1),3) AND EVERY(REF(C,3)/REF(C,4) 1.04,2) AND L =REF(L,4);
B:=BARSLAST(A);
CROSS(C,REF(H*1.05,B)) AND C O AND B