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

量能:=(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);