通达信资金进出副图指标

通达信资金进出副图指标

源码

周期:=-15;过滤:=8;

VAR1:=MA(CLOSE,5);
VAR2:=MA(CLOSE,10);
VAR3:=MA(CLOSE,20);
VAR4:=MA(CLOSE,30);
VAR5:=(VAR1+VAR2+VAR3+VAR4)/4;
VAR6:=(VAR5-REF(VAR5,(-1)*周期))/REF(VAR5,(-1)*周期)*100;
VAR7:=(VAR5-REF(VAR5,(-1)*周期))/REF(VAR5,(-1)*周期)*100;
VAR8:=EMA(VAR6,过滤);
反转: STICKLINE(VAR8>REF(VAR8,1),VAR6,0,5,0),COLORMAGENTA;
持股: STICKLINE(VAR6>REF(VAR6,1),VAR6,VAR8,5,0),COLORRED;
调整: STICKLINE(VAR6<REF(VAR6,1) AND VAR8>1*REF(VAR8,1),VAR6,VAR8,10,0),COLORYELLOW;
持币: STICKLINE(VAR6<REF(VAR6,1),VAR6,VAR8,5,1),COLORGREEN ;
DRAWTEXT(VAR8<-10 AND VAR8>REF(VAR8,1) AND REF(VAR8,1)<REF(VAR8,2),-2,'转点'),COLORFFFF00;
DRAWTEXT(VAR8>10 AND VAR8<REF(VAR8,1) AND REF(VAR8,1)>REF(VAR8,2),VAR8,'逃点'),COLORGREEN;
VAR9:=(CLOSE-MA(CLOSE,58))/MA(CLOSE,58)*100;
VARA:=VOL/CAPITAL*100;
VARB:=LLVBARS(LOW,50);
VARC:=SUM(VOL,VARB);
VARD:=HHVBARS(HIGH,50);
VARE:=SUM(VOL,VARD);
VARF:=(CLOSE-REF(OPEN,VARD))/REF(OPEN,VARD)*100;
VAR10:=VARE/CAPITAL*100;
VAR11:=(CLOSE-REF(OPEN,VARB))/REF(OPEN,VARB)*100;
VAR12:=VARC/CAPITAL*100;
VAR13:=MA(CLOSE,3);
VAR14:=REF(CLOSE,2)*0.865;
VAR15:=REF(CLOSE,13)*0.772;
VAR16:=MIN(VAR14,VAR15);
VAR17:=MA(CLOSE,13);
低买: IF(VAR6<-10 AND VAR6<REF(VAR6,1),20,0),COLORBLUE ,STICK,LINETHICK2 ;
资金进出: STICKLINE((CLOSE-VAR16)/CLOSE<0.03 AND VARF<-35 AND SUM(VARA,5)/5<1.8,0,24,0.8,1),COLORFFFF00 ;
VAR18:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
VAR19:=(EMA(CLOSE,12)-EMA(CLOSE,26))*100;
VAR1A:=EMA(VAR19,9);
VAR1B:=2*(VAR19-VAR1A);
DRAWTEXT(VAR19<-50 AND VAR18>7 AND VAR19<VAR1A,-10,'');
DRAWTEXT(VAR19<-50 AND VAR18>7 AND VAR19>=VAR1A,5,'');
STICKLINE(VAR19<-50 AND VAR18>7,0,-10,5,0);