以下是通达信火山趋势公式
通达信火山趋势公式
源码
STICKLINE(C>0.1,0,100,4.8,0),COLOR668800;
STICKLINE(C>0.1,-5,0,4.8,0),COLORFFB06C;
VAR1:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
VAR2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
火:=BARSLAST(EMA(CLOSE,5)<REF(EMA(CLOSE,5),1)),NODRAW;
山:=COUNT(EMA(CLOSE,5)>REF(EMA(CLOSE,5),1),5),NODRAW;
KL:=IF(山>0,2*火,0);
趋势:=KL/2,COLOREE687B,NODRAW;
VARL1:=(EMA(C,12)-EMA(C,26))*100+50;
VARL2:=EMA(VARL1,9);
VARL3:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10;
VARL4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
VARL5:=SMA(VARL4,13,8);
VARL6:=SMA(VARL3,21,8);
低位线:=IF((趋势-VARL6<(-70)),0,-5);
DRAWBAND(低位线,RGB(00,300,150),-5,RGB(00,300,150));
QS:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-
2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
高位线:=IF((QS-VARL6>85),0,-5);
DRAWBAND(高位线,RGB(255,20,147),-5,RGB(255,20,147));
K1:EMA(VAR2,5),COLORLIBLUE,NODRAW;
K2:SMA(VAR2,5,1),COLORYELLOW,NODRAW;
K:EMA((K1-K2),2),COLORWHITE,NODRAW;
DRAWBAND(85,RGB(100,100,100),85+K,RGB(128,00,00));
KK1:=IF(K>12,90,85),COLORCYAN;
KK2:=IF(K<-12,80,85),COLORCYAN;
DRAWBAND(KK1,RGB(200,200,200),KK2,RGB(200,200,200));
DRAWBAND(K1,RGB(400,200,00),K2,RGB(50,300,100));
STICKLINE(C>0.1,15,15,1,0),COLORCYAN;
STICKLINE(C>0.1,50,50,1,0),COLORCYAN;
LC:=REF(CLOSE,1);
VAR01:=C-REF(C,1);
VAR02:=100*EMA(EMA(VAR01,6),6)/EMA(EMA(ABS(VAR01),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST
(CROSS(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST
(CROSS(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV
(L,BARSLAST(CROSS(MA13,MA5))+1),0),COLOR00FF00;
BT:=(LLV(VAR02,2)=LLV(VAR02,7) AND COUNT(VAR02<0,2) AND CROSS(VAR02,MA
(VAR02,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
STICKLINE(BT,85,100,2,0),COLOR000088;
STICKLINE(BT,85,100,1,0),COLOR0000CC;
STICKLINE(BT,85,100,0.22,0),COLOR0000FF;
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82;
STICKLINE(TJ1,85,95,3,0),COLOR880088;
STICKLINE(TJ1,85,95,1.5,0),COLORAA00AA;
STICKLINE(TJ1,85,95,0.8,0),COLORCC00CC;
STICKLINE(TJ1,85,95,0.2,0),COLORFF00FF;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33;
STICKLINE(TJ2,85,90,4,0),COLOR008888;
STICKLINE(TJ2,85,90,2,0),COLOR00AAAA;
STICKLINE(TJ2,85,90,1,0),COLOR00CCCC;
STICKLINE(TJ2,85,90,0.2,0),COLOR00FFFF;
A8:=100*EMA(EMA((C-REF(C,1)),6),6)/EMA(EMA(ABS((C-REF(C,1))),6),6);
UP1:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))
+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),H=HHV
(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS
(EMA(CLOSE,7),EMA(CLOSE,19)))+1),0);
DOWN1:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))
+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),L=LLV
(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS
(EMA(CLOSE,19),EMA(CLOSE,7)))+1),0);
买1:=IF((LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)))
AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1),DRAWNULL,100);
卖:=IF(DOWN = UP AND DOWN<REF(UP,1) AND CROSS(MA(A8,2),A8),
DRAWNULL,100);
STICKLINE(买1=100,0,5,4,0),COLOR00AAAA;
STICKLINE(买1=100,0,5,2.5,0),COLOR00CCCC;
STICKLINE(买1=100,0,5,0.5,0),COLOR00FFFF;
STICKLINE(卖,85,100,2,0),COLOR006600;
STICKLINE(卖,85,100,1,0),COLOR009900;
STICKLINE(卖,85,100,0.22,0),COLOR00CC00;
