|
以下是通达信LCW市场情绪源码附图（无源码的请下载附件导入）
红柱区间就是大资金进入该股控盘拉升期，蓝柱区间是则是大资金弃盘离场休息期，如果红柱下穿变蓝时，全仓沽空，能有效规避股价长期下跌风险！
DRAWTEXT_FIX(ISLASTBAR,0,0,0,'指标说明：红柱区间就是大资金进入该股控盘拉升期，蓝柱区间是则是大资金弃盘离场休息期，如果红柱下穿变蓝时，全仓沽空，能有效规避股价长期下跌风险！ '),COLOR0080FF;
VARA1:=MA(CLOSE,13); VARA2:=((CLOSE-VARA1)/(VARA1))*(100);
VARA3:=MA(VARA2,3); VARA4:=BARSLAST((CROSS((-10),VARA3)=1));
资金能量:=VARA3,COLORBLACK;
高涨:IF((资金能量>0.15999999),资金能量,0),COLORRED,LINETHICK3;
低落:IF((资金能量<(-0.15999999)),资金能量,0),COLORBLUE,LINETHICK3;
VAR1:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
能量值:VAR1,NODRAW; VAR2:=HHV(VAR1>20,10);
STICKLINE(资金能量>=0,(资金能量-资金能量*0.05),(资金能量-资金能量*0.15),5,0) COLOR0000CC;
STICKLINE(资金能量>=0,(资金能量-资金能量*0.2),(资金能量-资金能量*0.35),5,0) COLOR0066FF;
STICKLINE(资金能量>=0,(资金能量-资金能量*0.4),(资金能量-资金能量*0.55),5,0) COLOR0099FF;
STICKLINE(资金能量>=0,(资金能量-资金能量*0.6),(资金能量-资金能量*0.75),5,0) COLOR00CCFF;
STICKLINE(资金能量>=0,(资金能量-资金能量*0.8),(资金能量-资金能量*0.95),5,0) COLOR00FFFF;
STICKLINE(资金能量<0,(资金能量-资金能量*0.05),(资金能量-资金能量*0.15),5,0) COLORFF3300;
STICKLINE(资金能量<0,(资金能量-资金能量*0.2),(资金能量-资金能量*0.35),5,0) COLORFF6600;
STICKLINE(资金能量<0,(资金能量-资金能量*0.4),(资金能量-资金能量*0.55),5,0) COLORFF9900;
STICKLINE(资金能量<0,(资金能量-资金能量*0.6),(资金能量-资金能量*0.75),5,0) COLORFFCC00;
STICKLINE(资金能量<0,(资金能量-资金能量*0.8),(资金能量-资金能量*0.95),5,0)COLORCYAN;
DRAWTEXT(CROSS(20,资金能量),18,'↓'), COLORWHITE;
DRAWTEXT(CROSS(资金能量,-20),-18,'低吸'), , COLOR0099FF ;
DRAWTEXT(VAR1>9 AND FILTER(VAR1<REF(VAR1,1),5),资金能量+2,'顶'),COLORYELLOW;
DRAWTEXT(VAR1>20 AND FILTER(VAR1<REF(VAR1,1),5),资金能量+1,'收获'),COLORFFFF00;
DRAWTEXT(VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),资金能量+1,'高抛'),COLORWHITE;
DRAWTEXT(FILTER(VAR1<-9 AND VAR1>REF(VAR1,1),18),资金能量,'底'),COLOR0000FF;
DRAWTEXT(VAR1<-20 AND FILTER(VAR1> REF(VAR1,1),5),资金能量,'低吸')COLORCYAN;
M1 := EMA( CLOSE, 9 );
M2 := EMA( CLOSE, 18 );
MD : ( M1 - M2)*100, COLORWHITE, NODRAW;
MM := EMA( MD, 3 );
吸 : IF( MD >= MM AND MD < 0, MD, DRAWNULL ), COLORLIRED, NODRAW;
拉 : IF( MD >= MM AND MD >= 0, MD, DRAWNULL ), COLORRED, NODRAW;
派 : IF( MD < MM AND MD >= 0, MD, DRAWNULL ), COLORGREEN, NODRAW;
落 : IF( MD < MM AND MD < 0, MD, DRAWNULL ), COLORWHITE, NODRAW;
638577455.jpg
| 
