价值趋势 通达信副图指标 源码 贴图 非原创指标

DRAWTEXT(CURRBARSCOUNT=38,10,'价值发现'),COLOR0000FF;

DRAWTEXT(CURRBARSCOUNT=38,32,'安全边界'),COLORFF00FF;

DRAWTEXT(CURRBARSCOUNT=38,62,'价值中枢'),COLOR00FFFF;

DRAWTEXT(CURRBARSCOUNT=38,92,'风险警界'),COLOR00FF00;

最低成本:=COST(0.99);

最高成本:=COST(99.9);

相对价位:=(C-最低成本)/(最高成本-最低成本)*100;

K:SMA(相对价位,3,1),COLORWHITE;

D:SMA(K,3,1),COLORYELLOW;

J:3*K-2*D,COLORFF00FF;

DRAWICON( CROSS(J,K) AND J<80,J,1);

0,COLORLIBLUE;

20,COLORBLUE;

50,COLORBLUE;

100,COLORLICYAN;

85,DOTLINE;

M3:=MA(CLOSE,3);

M13:=MA(CLOSE,13);

M34:=MA(CLOSE,34);

STICKLINE(M3>=M13 AND M34>=REF(M34,1),98,101,2,0 ),COLORRED;

STICKLINE(M3<M13 AND M34>=REF(M34,1),98,101,2,0 ),COLORYELLOW;

STICKLINE(M3<M13 AND M34<REF(M34,1),98,101,2,0 ),COLORGREEN;

STICKLINE(M3>=M13 AND M34<REF(M34,1),98,101,2,0 ),COLORMAGENTA;

DRAWTEXT(ISLASTBAR,97,'---四色图'),COLORGRAY;

JJJ:=(CLOSE+HIGH+LOW)/3;

A1:=EMA(JJJ,5);

B1:=REF(A1,1);

IF(A1>B1,0,DRAWNULL),COLORYELLOW,LINETHICK2;

DRAWTEXT(ISLASTBAR,2,'---蓝黄线'),COLORGRAY;

VHF:=(HHV(CLOSE,28)-LLV(CLOSE,28))/SUM(ABS(CLOSE-REF(CLOSE,1)),28);

VHFMA:=MA(VHF,10);

短趋:=VHFMA>REF(VHFMA,1);

箱型:=VHFMA<REF(VHFMA,1);{WWW.GPXIAZAI.COM}

中趋:=VHF>0.3 {AND VHFMA>REF(VHFMA,1) AND VHF>VHFMA};

IF(短趋,85,DRAWNULL),COLORYELLOW,LINETHICK2;

IF(箱型,85,DRAWNULL),COLORGRAY,LINETHICK2;

IF(中趋,85,DRAWNULL),COLORRED,LINETHICK2;

DRAWTEXT(ISLASTBAR,85,'--趋势过滤'),COLORGRAY;

MTM:=CLOSE-REF(CLOSE,24);

MTMMA:=MA(MTM,24);

XGTJ:=MTM>0 AND MTM>MTMMA;

IF(XGTJ,50,DRAWNULL),COLORRED,LINETHICK2;

IF(XGTJ<1,50,DRAWNULL),COLORBLUE,LINETHICK2;

DRAWTEXT(ISLASTBAR,51,'---动能MTM'),COLORGRAY;

MTM金叉:=(XGTJ AND CROSS(MTM,MTMMA));

DRAWTEXT(CROSS(MTM,MTMMA),53,'×'),COLORYELLOW;

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

MAOBV:=MA(OBV,30);

IF(OBV>MAOBV,20,DRAWNULL),COLORRED,LINETHICK2;

IF(OBV<=MAOBV,20,DRAWNULL),COLORBLUE,LINETHICK2;

DRAWTEXT(ISLASTBAR,21,'----OBV'),COLORGRAY;

MA5 :=EMA(CLOSE,5);

趋势:=MA5-EMA(MA5,2);

JCSJ1:=BARSLAST(CROSS(趋势,0))+1;

JCSJ2:=JCSJ1+REF(JCSJ1,JCSJ1);

双底:(IF(JCSJ1=1 AND MA5>REF(MA5,JCSJ2) AND COUNT(趋势<0,4)>=2,1,0))*50,STICK;