通达信暗渡陈仓主图及选股公式源码

　　C1:=REF(C,1);

　　C2:=REF(C,2);

　　C3:=REF(C,3);

　　C4:=REF(C,4);

　　C5:=REF(C,5);

　　C6:=REF(C,6);

　　O1:=REF(O,1);

　　O2:=REF(O,2);

　　O3:=REF(O,3);

　　O4:=REF(O,4);

　　MA5:MA(C,5);

　　MA10:MA(C,10);

　　MA20:MA(C,20);

　　P1:=C2<=C3 AND C2<=C4 AND C2<=C5 AND C2<=C6;

　　P2:=C>MA(C,5) AND C>MA(C,10) AND C>MA(C,20);

　　P3:=C>O AND C1>C2;

　　P4:=C>C1;

　　{以下为基本面}

　　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>0;{市盈率为正}

　　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);

　　{

　　选股公式:

　　C1:=REF(C,1);

　　C2:=REF(C,2);

　　C3:=REF(C,3);

　　C4:=REF(C,4);

　　C5:=REF(C,5);

　　C6:=REF(C,6);

　　O1:=REF(O,1);

　　O2:=REF(O,2);

　　O3:=REF(O,3);

　　O4:=REF(O,4);

　　MA5:=MA(C,5);

　　MA10:=MA(C,10);

　　MA20:=MA(C,20);

　　P1:=C2<=C3 AND C2<=C4 AND C2<=C5 AND C2<=C6;

　　P2:=C>MA(C,5) AND C>MA(C,10) AND C>MA(C,20);

　　P3:=C>O AND C1>C2;

　　P4:=C>C1;

　　CAP1:=CAPITAL>=8000 AND CAPITAL<=5000000;

　　S:=IF(NAMELIKE('S'),1,0)=0;

　　ST:=IF(NAMELIKE('ST'),1,0)=0;

　　SST:=IF(NAMELIKE('*S'),1,0)=0;

　　停牌:=IF((C=0 OR V=0),0,1);

　　PE:=C/FINANCE(33);

　　SYL:=PE>0;

　　JBM:=S AND ST AND SST AND 停牌 AND SYL;

　　P1 AND P2 AND P3 AND P4 AND JBM AND C1/C2<1.012 AND V>REF(V,1);

　　}