庄氏分时，突信号是买入

A:=MA(C,34); 

AAA:=A/REF(A,1)*MA(C,5);

A1:=IF(C>L,C,(C+H+O)/3);

A11:=EMA(A1,4);

A12:=EMA(A1,7);

A13:=EMA(A1,28);

A14:=EMA(A1,56);

A15:=EMA(A1,112);

A16:=EMA(A1,224);

A17:=EMA(A1,448);

A18:=EMA(A1,896);

A19:=EMA(A1,1792);

A20:=EMA(A1,3594);

B:(A11+A12+A13+A14+A15)/5;

GG:(A14+A15+A16+A17+A18)/5 COLORGREEN LINETHICK3;

B1:(A16+A17+A18+A19+A20)/5 COLOR00FFE9 LINETHICK1;

B11:(A16+A17+A18+A19+A20)/5 COLOR00CDE9 LINETHICK2;

B12:(A16+A17+A18+A19+A20)/5 COLOR0082F8 LINETHICK3;

IF(B<MA(B,27),B,DRAWNULL)COLORFF2190 LINETHICK2;

IF(B<MA(B,27),B,DRAWNULL)COLORFF5C90 LINETHICK1;

IF(B>MA(B,27),B,DRAWNULL)COLOR3522FF LINETHICK2;

IF(B>MA(B,27),B,DRAWNULL)COLOR7422FF LINETHICK1;

 

跌2:REF(C,1)/1.020 NODRAW;

跌3:REF(C,1)/1.030 NODRAW;

跌5:REF(C,1)/1.050 NODRAW;

A1A:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0),NODRAW;

成交额:=V*C/100,NODRAW;{万元}

A2A:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0),NODRAW;

A3A:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0),NODRAW;

A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0),NODRAW;

A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0),NODRAW;

A6A:=((A2A+A3A)+A4)+A5,NODRAW;

A7:=IF((ISLASTBAR),((100*A2A)/A6A),0),NODRAW;

A8:=IF((ISLASTBAR),((100*A3A)/A6A),0),NODRAW;

A9:=IF((ISLASTBAR),((100*A4)/A6A),0),NODRAW;

A10:=IF((ISLASTBAR),((100*A5)/A6A),0),NODRAW;

IF(C<500,DYNAINFO(3)*(1+0.02),DYNAINFO(3)*(1+0.005)),DOTLINE,COLORYELLOW;

IF(C<500,DYNAINFO(3)*(1-0.015),DYNAINFO(3)*(1-0.005)),DOTLINE,COLORWHITE;

机构买:(A2A),LINETHICK6,COLORRED,NODRAW;

机构卖:(A3A),LINETHICK6,COLORGREEN,NODRAW;

机构进出:机构买-机构卖,NODRAW,NODRAW;

散户买:(A4),COLOR5555FF,NODRAW;

散户卖:(A5),COLOR55FF55,NODRAW;

DD1A:=1;{分析家公式网www.gspt.Com}

AAA1:=STRCAT(STRCAT('机构买入',CON2STR((100*A2A)/A6A,0)),'%')/100;

AAA2:=STRCAT(STRCAT('机构卖出',CON2STR((100*A3A)/A6A,0)),'%')/100;

DRAWTEXT_FIX(DD1A=1,0.001,0.15,0,AAA1),COLORRED,NODRAW;

DRAWTEXT_FIX(DD1A=1,0.001,0.25,0,AAA2),COLORGREEN,NODRAW;

AAA0:=STRCAT(STRCAT('机构净买入',CON2STR((100*(A2A-A3A))/A6A,0)),'%');

DRAWTEXT_FIX(DD1A=1,0,0.95,0,AAA0),LINETHICK5,COLORCYAN;

JGZM:DYNAINFO(3)+DYNAINFO(3)*0.1*((A2A-A3A)/A6A),LINETHICK1,DOTLINE,COLORCYAN,NODRAW;

AX:=(DVOL/C)/2;

A2:=SUM(IF(AX>100 AND CLOSE>REF(CLOSE,1),AX,0),0);

A3:=SUM(IF(AX>100 AND CLOSE<REF(CLOSE,1),AX,0),0);

A4X:=SUM(IF(AX<100 AND CLOSE>REF(CLOSE,1),AX,0),0);

A5X:=SUM(IF(AX<100 AND CLOSE<REF(CLOSE,1),AX,0),0);

A6:=A2+A3+A4X+A5X;

机买:=(A2/A6)*100,LINETHICK2,COLORRED;

机卖:=(A3/A6)*100,LINETHICK2,COLORGREEN;

散买:=(A4X/A6)*100,LINETHICK0;

散卖:=(A5X/A6)*100,LINETHICK0;

主力差:=机买-机卖,LINETHICK2;

散户差:=散买-散卖,LINETHICK0;

AAA1X:=DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构')=1,COLORRED;

XG:=DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○机构'),COLORWHITE;

AAA2X:=DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.15,'▲散户'),COLORCYAN;

AAA3:=DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.15,'△散户'),COLORWHITE;

DRAWTEXT(AAA1X>0 ,CLOSE*1.0001,'●'),COLORRED;