通达信暗度陈仓主图指标(源码)

P1:=C2 =C3 AND C2 =C4 AND C2 =C5 AND C2
P2:=C MA(C,5) AND C MA(C,10) AND C MA(C,20);
P3:=C O AND C1
P4:=C
{以下为基本面}
CAP1:=CAPITAL =8000 AND CAPITAL =5000000;{流通盘在8000万股到5亿股}
S:=IF(NAMELIKE( S ),1,0)=0;{非S}
ST:=IF(NAMELIKE( ST ),1,0)=0;{非ST}
SST:=IF(NAMELIKE( *S ),1,0)=0;{非*S}
停牌:=IF((C=0 OR V=0),0,1);
PE:=C/FINANCE(33);
SYL:=PE {市盈率为正}
JBM:=S AND ST AND SST AND 停牌 AND SYL;
P:=P1 AND P2 AND P3 AND P4 AND JBM AND C1/C2 =1.05;
{画烟雨阳彩柱}
STICKLINE(P,O,O+0.382*(C-O),3,0),COLORYELLOW;
STICKLINE(P,O+0.382*(C-O),C,3,0),COLORRED;
{所属板块 所属地域 流通市值}
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,DYBLOCK);
LTSZ:=C*CAPITAL/1000000;
LTSZ1:=CON2STR(LTSZ,0);
DRAWTEXT_FIX(LTSZ 1,0,0.1,0,LTSZ1);