以下是通达信小红帽和小蓝帽副图指标公式(无源码的请下载附件导入)
N:=10;
Va6:=(2*CLOSE+HIGH+LOW)/4;
Va8:=LLV(LOW,34);
VarB:=HHV(HIGH,34);
VarC:=EMA((Va6-Va8)/(VarB-Va8)*100,13);
VarD:=EMA(0.667*REF(VarC,1)+0.333*VarC,2);
生命线:EMA(VarD,N), colorff00ff,linethick2;
var1:=HHV(HIGH,9)-LLV(LOW,9);
var2:=HHV(HIGH,9)-CLOSE;
var3:=CLOSE-LLV(LOW,9);
var4:=((var2)/(var1))*(100)-70;
var5:=((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60)))*(100);
var6:=((2)*(CLOSE)+HIGH+LOW)/(4);
var7:=SMA(((var3)/(var1))*(100),3,1);
var8:=LLV(LOW,34);
var9:=SMA(var7,3,1)-SMA(var4,9,1);
var10:=IF((var9>100),var9-100,0);
var11:=HHV(HIGH,34);
b1:=EMA(((var6-var8)/(var11-var8))*(100),8);
b2:=EMA(b1,5);
STICKLINE(b1-b2>0,b1,b2,4,0),colorffffff;
STICKLINE(b1-b2<0,b1,b2,4,0),colorFFFF52;
ss1:=(LOW+HIGH+CLOSE*2)/4;
ss2:= MA(ss1,4);
ss3:=HHV(ss2,10);
ss4:=MA(ss3,3);
ss5:=1.25*ss4-0.25*ss3;
xkkj:=IF(ss5>ss3,ss3,ss5);
ff1:=LLV(ss2,10);
ff2:=MA(ff1,3);
ff3:=1.25*ff2-0.25*ff1;
dkkj:=IF(ff3<ff1,ff1,ff3);
ma13:=MA(C,13);
zdhm:=CROSS(C,dkkj) AND CROSS(C,ma13) AND CROSS(C,xkkj);
zhm:=CROSS(C,ma13) AND CROSS(C,xkkj);
大黑马:IF(zdhm OR zhm,50,0),coloryellow,POINTDOT;
a:=(3*CLOSE+LOW+OPEN+HIGH)/6;
D1:=(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))/211;
D2:=EMA(D1,2);
D3:=EMA(D2,2);
K1:=EMA(D3,2);
小黑马:IF(CROSS(D1,K1),45,0),COLORFFCC66,POINTDOT;
STICKLINE(大黑马>0,0,大黑马*1.1,1,0),colorwhite;
STICKLINE(大黑马>0 AND 大黑马<52,30,大黑马,1,0),colorred;
STICKLINE(大黑马>0,0,大黑马*0.8,4,0),colorred;
STICKLINE(大黑马>0,0,大黑马*0.4,8,0),colorred;
STICKLINE(大黑马>0,0,大黑马*0.2,10,0),coloryellow;
STICKLINE(大黑马>0,0,大黑马*0.1,10,0),colorffcc66;
STICKLINE(小黑马>0,0,小黑马*1.1,1,0),colorwhite;
STICKLINE(小黑马>0 AND 小黑马<52,30,小黑马,1,0),colorffcc66;
STICKLINE(小黑马>0,0,小黑马*0.8,4,0),colorffcc66;
STICKLINE(小黑马>0,0,小黑马*0.4,8,0),colorffcc66;
STICKLINE(小黑马>0,0,小黑马*0.2,10,0),colorff00ff;
656555255.gif
|