通达信牛熊持仓指标公式

VAR1:=vol/CAPITAL;
VAR2:=VOL/700000000;
VAR3:=IF(VAR1=0,VAR2,VAR1);
VAR4:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);
VAR5:=2.5*MAX(VAR3,VAR4);
VAR6:=DMA(CLOSE,VAR5);
VAR7:=SMA(20*(VAR6/REF(VAR6,1)-1),2,1);
VAR8:=EMA(VAR7,2);
VAR9:=0.06;
VARA:=0.24;
VARB:=CLOSE>=REF(CLOSE,1);
VARC:=CLOSE<=REF(CLOSE,1);
卖: IF(VAR7>VAR9 AND VAR8>=0.005 AND VARB,1,0),COLORMAGENTA ,STICK,LINETHICK3 ;
牛: IF(VAR7>VARA AND VAR8>=0.005 AND VARB,1,0),COLOR3399CC , ;
熊: IF(VAR7<(-1)*VAR9 AND VAR8<=-0.005 AND VARC,-1,0),COLORFF9999 ,STICK,LINETHICK3;
疯熊: IF(VAR7<(-1)*VARA AND VAR8<=-0.005 AND VARC,-1,0),COLORFFFF00 , ;
持仓区: STICKLINE(VAR8>=0.003,-0.4,0.6,10,0),COLORRED ,;
观察区: STICKLINE(BETWEEN(VAR8,0.003,-0.003),-0.4,0.35,10,0),COLORYELLOW , ;
空仓区: STICKLINE(VAR8<=-0.003,-0.4,0.2,10,0),COLORGREEN , ;
DRAWTEXT(crOSS(牛,0.5) AND COUNT(牛>0.5,10)=1,0.25,'疯牛'), , ;
DRAWTEXT(CROSS(-0.5,疯熊) AND COUNT(疯熊<-0.5,10)=1,-0.55,'疯熊') ;