文档介绍:通达信成本铁底主图指标
以下是通达信成本铁底主图指标(无源码的请下载附件导入)
通达信成本铁底主图指标
源码
A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
{生命线:EMA(X,15),COLOR00FF00,LINETHICK3;}
VAR4:=(2*CLOSE+HIGH+LOW)/4;
成本区:EMA(VAR4,90)*,COLORWHITE,LINETHICK2,POINTDOT;
操作区:EMA(VAR4,142)*,COLORRED,LINETHICK1;
铁底区:EMA(VAR4,250)*,COLORYELLOW,LINETHICK1;
{拐点显示}
VAR1:=(O+L+H+C)/4;
拐点:=MA(C,3); 拐点1:=MA(C,3);
GD1:=REF(COUNT(拐点<=REF(拐点,1),5)=5 ,1) AND 拐点>REF(拐点,1);
GD2:=REF(COUNT(拐点1<=REF(拐点1,1),5)=5 ,1) AND 拐点1>REF(拐点1,1);
DRAWICON(GD1,*C,1);
DRAWICON(GD2,*C,9);
VARA:=AMOUNT/VOL/100;
VARB:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VARC1:=SUM(AMOUNT,7)/VARA/100;
VARD:=DMA(VARB,VOL /VARC1);
VARE:=(CLOSE-VARD) /VARD*100;
VARF:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
VARJ:=MA(VARE,20)+STD(VARE,20);
BIAS18:=(CLOSE-MA(CLOSE,18))/MA(CLOSE,18)*100;
K:=SMA(VARF,3,1);
DRAWTEXT(REF(BIAS18,1