指标用到不知那位老师的原码,在此表示感谢!自己编的一个能看底部割肉资金底部资金进入的指标,看能否帮助到小散。
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;
当日成交:AMOUNT*LXG入/10000-AMOUNT*LXG出/10000,COLORRED,LINETHICK0;
HS:=VOL/CAPITAL;
DD:=(LXG入-LXG出);
DT:=HS*DD*100;
当日增减度: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;
当日成交1:AMOUNT*LXG入1/10000-AMOUNT*LXG出1/10000,COLORYELLOW,LINETHICK0;
STICKLINE(当日成交1>0,0,当日成交1,4,0),COLORYELLOW;
STICKLINE(当日成交1<0,当日成交1,0,4,0),COLORBLUE;
STICKLINE(当日成交>0,0,当日成交,4,0),COLORRED; {红柱}
STICKLINE(当日成交<0,当日成交,0,4,0),COLORGREEN; {绿柱}
DD1:=(LXG入1-LXG出1);
DT1:=HS*DD1*100;
当日增减度1:DT1,COLORBLUE,LINETHICK0;
当日成交1:=(DT1*CAPITAL)*DYNAINFO(11)/10000;
买入手数1:=(CAPITAL*DT1)/100;
IF (当日成交1>=0)THEN
BEGIN
STR11:='主力净买入:'+NUMTOSTRN(当日成交1,3)+'万元,';
STR22:= '净买入:'+ NUMTOSTRN(买入手数1,0)+'手,';
STR33:= '当日增减度1:' + NUMTOSTRN(DT1,3);
END;
IF 当日成交1<0 THEN
BEGIN
STR11:='主力净卖出:'+ NUMTOSTRN(当日成交1,3)+'万元,';
STR22:='净卖出:'+NUMTOSTRN(买入手数1,0)+'手,';
STR33:='当日增减度1:'+NUMTOSTRN(DT1,3);
END;
DRAWFLAGTEXT(DT1>=0,当日成交1,STR11+STR22+STR33),COLORYELLOW;
DRAWFLAGTEXT(DT1<0,当日成交1,STR11+STR22+STR33),COLORBLUE;
QJJ:=(VOL/(((HIGH-LOW)*2)-ABS((CLOSE-OPEN))));
XVL:=(IF((CLOSE>OPEN),(QJJ*(HIGH-LOW)),IF((CLOSE<OPEN),(QJJ*((HIGH-OPEN)+(CLOSE-LOW))),(VOL/2)))+IF((CLOSE>OPEN),(0-(QJJ*((HIGH-CLOSE)+(OPEN-LOW)))),IF((CLOSE<OPEN),(0-(QJJ*(HIGH-LOW))),(0-(VOL/2)))));
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);{ 分析家公式网www.88gs.com}
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 MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;
DRAWICON(CROSS( 量柱,0) AND COUNT(当日成交1=0,5)=5 AND COUNT(C<REF(C,1),5)>=4,0+2,1),ALIGN1;
DRAWICON((CROSS( 量柱,0) OR (量柱>0 AND 量柱>REF(量柱,1))) AND REF(COUNT(当日成交1<0,7)=7,1) AND 当日成交1=0,0+2,9),ALIGN1;
DRAWICON((REF(COUNT(当日成交1=0,5)=5,1) AND 当日成交1<0 AND ((REF(主买>=主卖,1))
OR (主买>=主卖))) OR (CROSS( 量柱,0) AND REF(COUNT(当日成交1=0,10)=10,1)
AND 当日成交1<0) OR (REF(量柱>0,1) AND 量柱>0 AND DIFF2<0 AND REF(DIFF2,1)>REF(DIFF2,2) AND DIFF2>REF(DIFF2,1) AND 当日成交1<0 AND REF(当日成交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 当日成交1>0,0+2,7),ALIGN1;
DRAWICON((当日成交1>0 AND 一穿三) OR (CROSS( 量柱,0) AND REF(COUNT(当日成交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 当日成交1>0 AND MACD2>0 AND MACD2<0.6,0+2,7),ALIGN1;
DRAWICON(CROSS( 量柱,0) AND REF(当日成交1=0,1) AND 当日成交1<0,0+2,11),ALIGN1;
DRAWICON((CROSS( 0,量柱) OR (量柱<REF(量柱,1) AND C>=REF(C,1))) AND ((COUNT(当日成交>0,3)>=1) OR (COUNT(当日成交1>0,3)>=1)),0+2,8),ALIGN1;
0,DOTLINE,COLORRED;
上图: