买卖分时图立马分高下源码分享

均价:=MONEY/VOL;
 e:=(NEW-均价)/均价;
 //(1)上涨动量指标;
IF(FORMATTIME(1)>0)
 {
 DIFF :=EMA(NEW,5) - EMA(NEW,12);
 DEA :=EMA(DIFF,9);
上涨动量 :2*(DIFF-DEA)*100;
 }
 ELSE
 {
 DIFF:=0;
 DEA:=0;
上涨动量:0;
 }
 //(2)大单指标与大单差值{大单指标};
DDJL:=((BIGBUYCOUNT1+BIGBUYCOUNT2+WAITBUYCOUNT1+WAITBUYCOUNT2)-(BIGSELLCOUNT1+BIGSELLCOUNT2+WAITSELLCOUNT1+WAITSELLCOUNT2))/SHGZG*100;
 zdm:=(BIGBUYCOUNT1+BIGBUYCOUNT2)/SHGZG*100;
 dm:=ddjl-REF(ddjl,1);
 dz:=zdm-REF(zdm,1);
 zdzq:=COUNT(dz=0,3)>=2;
 //(3)成交量{成交量指标};
b:=MAX(0,SUBSAMEDAY(&VOL));
 Vb:=SUM(b,FORMATTIME(1));
 MA5b:=(SUM(b,6)-b)/5;
 dv:=b/MA5b;
 VL5:=SUM(b,5);
 Vl51:=SUM(b,10)-SUM(b,5);
 dl5:=Vl5/Vl51;
 //(4)振幅和最低涨幅条件;
H1:=HHV(NEW,20);
 L1:=LLV(NEW,20);
 p1:=(H1-L1);
 p2:=PRE;
 ZF:=p1/p2;
 zd:=(NEW-L1)/PRE;
 zg:=(NEW-H1)/PRE;
 //5分钟震荡量
H0:=HHV(NEW,5);
 L0:=LLV(NEW,5);
 HL:=(H0-L0)/PRE;
 MAhl:=MA(Hl,FORMATTIME(1));
 dhl:=Hl/MAhl;
 //(5)委托指标
 委买:=BUYCOUNT;
委卖:=SELLCOUNT;
 //(6)均线趋势指标
MA1:=MA(NEW,5);
 MA2:=MA(NEW,30);
 sv:=MA1-MA2;
 sv1:=MA(NEW,2)-MA(NEW,5);
 //卖出条件1
 ss:=CROSS(dea,diff) AND 委卖>0 AND Hl>=0.01 AND dhl>1 AND e>0.02 AND zd>0.02;
 sd:=COUNT(ss>0,FORMATTIME(1));
 IF(sd<=1)
 ss1:=ss;
 ELSE
 ss1:=0;
 //买入条件1
 zq:=BARSLAST(ss1>0);
 jg:=REF(NEW,zq);
 ZFf:=(NEW-REF(NEW,zq))/REF(NEW,zq);
 bb:=CROSS(diff,dea) AND ZFf<-0.01 AND sd>0 AND dm>=0 AND dv>1 ;
 ssb:=COUNT(bb>0,FORMATTIME(1));
 IF(ssb<=1)
 bb1:=bb;
 ELSE
 bb1:=0;
 //卖出条件2
 H2:=HHV(NEW,MIN(FORMATTIME(1),10));
 L2:=LLV(NEW,MIN(FORMATTIME(1),10));
 ZF1:=IF(FORMATTIME(1)>=10,(NEW-L2)/PRE,0);;
 ss0:=CROSS(dea,diff) AND HHV(ZF1,10)>0.03 AND HHV(ZF1,10)<0.08AND 委卖>0 AND ss=0;
 sd0:=COUNT(ss0>0,FORMATTIME(1));
 IF(sd0<=1)
 ss2:=ss0;
 ELSE
 ss2:=0;
 //买入条件2
 zq1:=BARSLAST(ss2>0);
 jg:=REF(NEW,zq1);
 ZF2:=(NEW-REF(NEW,zq1))/REF(NEW,zq1);
 bb0:=CROSS(diff,dea) AND sd0>0 AND ((ZF2<-0.01 AND sv>0)OR (ZF2<-0.02 AND sv1>0));
 ssb1:=COUNT(bb0>0,FORMATTIME(1));
 IF(ssb1<=1)
 bb2:=bb0;
 ELSE
 bb2:=0;
 FILLRGN(diff,dea,上涨动量>0,Color0000ff,上涨动量<0,Color00ff00);
 //卖
DRAWTEXT(ss1>0,diff+0.8*ABS(diff),"高抛"),colorliblue;
 DRAWTEXT(ss2>0 ,diff+0.8*ABS(diff),"出"),colorligreen;
 VERLINE( ss1>0,1),colorwhite,LINETHICK2;
 VERLINE(ss2>00,1),COLOR00FF00,LINETHICK2;
 //买
DRAWTEXT(bb1>0,diff-0.1,"低吸"),colorred;
 DRAWTEXT(bb2>0 ,diff-0.1,"入"),colorlired;
 VERLINE( bb1>0,1),colorred,LINETHICK2;
 VERLINE(bb2>0 ,1),colorlired,LINETHICK2;