通达信又一锤子主图及选股指标(源码)

TJ:=C<O AND REF(C,1)/C>0.3;
A:=(H/C-1)*100;
A1:=(C/O-1)*100;
A2:=(O/L-1)*100;
TJ2:=H>C AND C>O AND H>REF((O-C)/3+C,1) AND O<REF(C,1);
TJ3:=BETWEEN(A,2.5,13.5) AND A1>1.4 AND A2<3.2 AND A1<A;
XG:=REF(TJ,1) AND TJ2 AND TJ3;
STICKLINE(XG,C,O,2,0),COLORYELLOW;
STICKLINE(XG,L,H,0,0),COLORYELLOW;
DRAWICON(XG,H*1.02,25);

{
选股公式:

TJ:=C<O AND REF(C,1)/C>0.3;
A:=(H/C-1)*100;
A1:=(C/O-1)*100;
A2:=(O/L-1)*100;
TJ2:=H>C AND C>O AND H>REF((O-C)/3+C,1) AND O<REF(C,1);
TJ3:=BETWEEN(A,2.5,13.5) AND A1>1.4 AND A2<3.2 AND A1<A;
XG:REF(TJ,1) AND TJ2 AND TJ3;
}