通达信三红共振指标公式源码副图

　　量能:=(CLOSE-MA(CLOSE,30))/MA(CLOSE,20)*500;

　　神秘机构1:IF(量能>0,量能,0)*10,COLORMAGENTA,LINETHICK2;

　　神秘机构2:STICKLINE(量能>0,量能*5,0,3.8,-1)*800000,COLOR000555;

　　STICKLINE(量能>0,量能*5,0,2.7,-1)*800000,,COLOR000777;

　　STICKLINE(量能>0,量能*5,0,1.9,-1)*800000,COLOR000999;

　　STICKLINE(量能>0,量能*5,0,1.3,-1)*800000,COLOR000BBB;

　　STICKLINE(量能>0,量能*5,0,0.1,-1)*800000,COLOR000DDD;

　　STICKLINE(量能<0,0,量能*5,3,0)*800000,COLOR005500;

　　STICKLINE(量能<0,0,量能*5,2.3,0)*800000,COLOR007700;

　　STICKLINE(量能<0,0,量能*5,1.6,0)*800000,COLOR009900;

　　STICKLINE(量能<0,0,量能*5,0.8,0)*800000,COLOR00BB00;

　　STICKLINE(量能<0,0,量能*5,0.1,0)*800000,COLOR00DD00;

　　神秘机构3:EMA(EMA(量能,30),3)*20,CIRCLEDOT,COLORGREEN;

　　乖离:=(C-MA(C,5))/MA(C,5)*1000,CIRCLEDOT,COLORGREEN,LINETHICK2;

　　神秘机构3S:IF(神秘机构3>REF(神秘机构3,1),神秘机构3,DRAWNULL),,CIRCLEDOT,COLORRED,LINETHICK3;

　　ABC10:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100;

　　ABC11:=SMA(ABC10, 9, 1);

　　ABC12:=SMA(ABC11, 3, 1);

　　专用:=3*ABC11-2*ABC12;

　　ABC16:=HHVBARS(HIGH, 50);

　　ABC18:=(CLOSE-REF(OPEN, ABC16))/REF(OPEN, ABC16)*100;

　　顶:=STICKLINE(crOSS(专用, 8) AND ABC18<-13, 0,340,10,0);

　　底顶:=FILTER(顶,50);

　　股民指标:=EMA(ABC11, 3);

　　DRAWTEXT(FILTER(CROSS(股民指标,专用) AND REF(专用,1)>80 AND 股民指标>80,20), -260,'☆机构卖'),COLORBLUE,LINETHICK5;

　　AA:=STICKLINE(CROSS(股民指标,专用) AND REF(专用,1)>80 AND 股民指标>80, 0,270,10,0);

　　底顶A:=FILTER(AA,30);

　　STICKLINE(底顶A, 0,-260,5,0),COLOR000077;

　　STICKLINE(底顶A, 0,-260,4,0),COLOR000099;

　　STICKLINE(底顶A, 0,-260,3,0),COLOR0000BB;

　　STICKLINE(底顶A, 0,-260,2,0),COLOR0000DD;

　　STICKLINE(底顶A, 0,-260,1,0),COLOR0000FF;

　　ABC3:=100-(100-3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))

　　*100,20,1)+2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))

　　*100,20,1),15,1));

　　ABC4:=100-(100-3*SMA((O-LLV(L,55))/(HHV(H,55)-LLV(L,55))

　　*100,20,1)+2*SMA(SMA((O-LLV(L,55))/(HHV(H,55)-LLV(L,55))

　　*100,20,1),15,1));

　　T7:=ABC3>REF(ABC4,1) AND V>REF(V,1) AND C>REF(C,1);

　　指标营地:=STICKLINE(T7 AND COUNT(T7,30)=1,0,20,2,0);

　　指标营地A:=STICKLINE(底顶 OR 指标营地, 0,270,5,0) ;

　　指标营地AA:=FILTER(指标营地A,20);

　　STICKLINE(指标营地AA, 0,260,5,0),COLORFF11FF;

　　STICKLINE(指标营地AA, 0,260,4,0),COLORFF33FF;

　　STICKLINE(指标营地AA, 0,260,3,0),COLORFF55FF;

　　STICKLINE(指标营地AA, 0,260,2,0),COLORFF77FF;

　　STICKLINE(指标营地AA, 0,260,1,0),COLORFF99FF;

　　DRAWTEXT(FILTER(指标营地AA,20),250,'☆机构买'),COLORYELLOW,LINETHICK5;

　　ABC1:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;

　　ABC2:=2*Abs(ABC1);

　　ABC5:=(H+L+C)/3;

　　ABC6:=(ABC5-MA(ABC5,10))/(0.015*AVEDEV(ABC5,10));

　　ABC7:=(ABC5-MA(ABC5,30))/(0.015*AVEDEV(ABC5,30));

　　ABC8:=IF(ABC6>=150 AND ABC6<200 AND ABC7>=150 AND ABC7<200,10,0);

　　ABC9:=IF(ABC6<=-150 AND ABC6>-200 AND ABC7<=-150 AND ABC7>-200,-10,ABC8);

　　VA:=(C-MA(C,13))/MA(C,13)*100;

　　VB:=100-ABS(VA);

　　VC:=3*SMA((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1)-2

　　*SMA(SMA((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55))*100,20,1),15,1);

　　顶线:= IF(VB<90,VB,100);

　　多方:= IF(ABC1>0,ABC1,0);

　　空方:= -IF(ABC1<0,ABC2,0);

　　预警系统:= (IF((ABC7>=200 AND ABC6>=150) OR CROSS(65,多方),15,IF(ABC7<=-200 AND ABC6<=-150,-15,ABC9))+65);

　　T1:=C>MA(C,20) AND MA(C,20)>=REF(MA(C,20),1);

　　T3:=多方>60 AND 预警系统>65 AND 顶线=100;

　　T4:=多方>48 AND 预警系统>65 AND 顶线<100;

　　T8:=ABC3<=REF(ABC4,1) AND C AND 空方>=REF(空方,1) AND VC;

　　DRAWTEXT(T1 AND COUNT(T1,30)=1,-150,'上升通道'),COLOR00FFFF;

　　钱袋子:=神秘机构1 AND 神秘机构2 AND 神秘机构3S;

　　三红共振:BArslASTCOUNT(钱袋子)=1;

　　DRAWICON(三红共振,L*1,9);