N1:=10;N2:=3;N3:=6;
LXG入:=sum((bigorder(1,2)-bigorder(2,2))*amount,5)/sum(amount,5)>0.05;
LXG出:=sum((bigorder(1,2)-bigorder(2,2))*amount,5)/sum(amount,5)<-0.05;
當(dāng)日成交:amount*LXG入/10000-amount*LXG出/10000,colorred,linethick0;
HS:=vol/capital;
DD:=(LXG入-LXG出);
DT:=HS*DD*100;
當(dāng)日增減度:DT,colorgreen,linethick0;
LXG入1:=sum((bigorder(1,2)-bigorder(2,2))*amount,5)/sum(amount,5)>0.03;
LXG出1:=sum((bigorder(1,2)-bigorder(2,2))*amount,5)/sum(amount,5)<-0.03;
當(dāng)日成交1:amount*LXG入1/10000-amount*LXG出1/10000,coloryellow,linethick0;
stickline(當(dāng)日成交1>0,0,當(dāng)日成交1,4,0),coloryellow;
stickline(當(dāng)日成交1<0,當(dāng)日成交1,0,4,0),colorblue;
stickline(當(dāng)日成交>0,0,當(dāng)日成交,4,0),colorred; {紅柱}
stickline(當(dāng)日成交<0,當(dāng)日成交,0,4,0),colorgreen; {綠柱}
DD1:=(LXG入1-LXG出1);
DT1:=HS*DD1*100;
當(dāng)日增減度1:DT1,colorblue,linethick0;
當(dāng)日成交1:=(DT1*capital)*DYNAINFO(11)/10000;
買入手?jǐn)?shù)1:=(capital*DT1)/100;
if (當(dāng)日成交1>=0)then
begin
Str11:=’主力凈買入：’+NUMTOSTRN(當(dāng)日成交1,3)+’萬元,’;
Str22:= ‘凈買入：’+ NUMTOSTRN(買入手?jǐn)?shù)1,0)+’手,’;
Str33:= ‘當(dāng)日增減度1：’ + NUMTOSTRN(DT1,3);
end;
if 當(dāng)日成交1<0 then
begin
Str11:=’主力凈賣出：’+ NUMTOSTRN(當(dāng)日成交1,3)+’萬元,’;
Str22:=’凈賣出：’+NUMTOSTRN(買入手?jǐn)?shù)1,0)+’手,’;
Str33:=’當(dāng)日增減度1：’+NUMTOSTRN(DT1,3);
end;
DRAWFLAGTEXT(DT1>=0,當(dāng)日成交1,Str11+str22+str33),COLORyellow;
DRAWFLAGTEXT(DT1<0,當(dāng)日成交1,Str11+str22+str33),COLORblue;
QJJ:=(VOL/(((HIGH-LOW)*2)-ABS((CLOSE-OPEN))));
XVL:=(IF((CLOSE>OPEN),(QJJ*(HIGH-LOW)),IF((CLOSEOPEN),(0-(QJJ*((HIGH-CLOSE)+(OPEN-LOW)))),IF((CLOSE HSL:=((XVL/40)/1.15);
主買:=SUM(HSL,N1);
主賣:=EMA(主買,N3);
量柱:主買-主賣,colorWhite,linethick1;
STICKLINE((主買>=主賣),主買,主賣,8,1),COLORFF00FF,LINETHICK2;
STICKLINE((主買<主賣),主買,主賣,8,1),COLORFFFF00,LINETHICK2;
MACD2:=(EMA(CLOSE,30)-REF(EMA(CLOSE,30),1))/REF(EMA(CLOSE,30),1)*100;
DIFF2:=EMA(SUM(MACD2,2),5);
DEA2:=MA(DIFF2,5);
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1OPEN ;
DRAWICON(CROSS( 量柱,0) and COUNT(當(dāng)日成交1=0,5)=5 and COUNT(C=4,0+2,1),ALIGN1;
DRAWICON((CROSS( 量柱,0) OR (量柱>0 and 量柱>REF(量柱,1))) and REF(COUNT(當(dāng)日成交1<0,7)=7,1) and 當(dāng)日成交1=0,0+2,9),ALIGN1;
DRAWICON((REF(COUNT(當(dāng)日成交1=0,5)=5,1) and 當(dāng)日成交1<0 and ((REF(主買>=主賣,1))
OR (主買>=主賣))) OR (CROSS( 量柱,0) and REF(COUNT(當(dāng)日成交1=0,10)=10,1)
and 當(dāng)日成交1<0) OR (REF(量柱>0,1) and 量柱>0 and DIFF2<0 and REF(DIFF2,1)>REF(DIFF2,2) and DIFF2>REF(DIFF2,1) and 當(dāng)日成交1<0 and REF(當(dāng)日成交1=0,1)),0+2,5),ALIGN1;
DRAWICON(((REF(MACD2<0,1) and MACD2>0) OR (CROSS(DIFF2,DEA2)) OR (REF(CROSS(DIFF2,DEA2),1))) and 當(dāng)日成交1>0,0+2,7),ALIGN1;
DRAWICON((當(dāng)日成交1>0 and 一穿三) OR (CROSS( 量柱,0) and REF(COUNT(當(dāng)日成交1=0,5)=5,1) and 一穿三),0+2,7),ALIGN1;
DRAWICON((CROSS( 量柱,0) OR (量柱>0 and 量柱>REF(量柱,1) and MACD2>0 and MACD2<0.33)) and 當(dāng)日成交1>0 and MACD2>0 and MACD2<0.6,0+2,7),ALIGN1;
DRAWICON(CROSS( 量柱,0) and REF(當(dāng)日成交1=0,1) and 當(dāng)日成交1<0,0+2,11),ALIGN1;
DRAWICON((CROSS( 0,量柱) OR (量柱=REF(C,1))) and ((COUNT(當(dāng)日成交>0,3)>=1) OR (COUNT(當(dāng)日成交1>0,3)>=1)),0+2,8),ALIGN1;
0,DOTLINE,COLORRED;