变色K线 趋势支撑压力点,红绿K线 变色彩带(通达信公式 主图 源码 测试图)
公式很简单,没有未来函数,信号不会漂移。{变色趋势K支压}SJ:=1;{+4天上方时间为准}VAR1:=EMA(CLOSE,15)*SJ;VAR2:=EMA(CLOSE,60)*SJ;VAR3:=(CLOSE*SJ-VAR2*SJ)*2/(60+1)+VAR2;生命线:VAR3*SJ,LINETHICK2, COLORYELLOW;HX:=HHV(HIGH,3);LX:=LLV(LOW,3);H1:=IF(HX<REF(HX,1)&&HX<REF(HX,2)&&HX<REF(HX,4)&&LX<REF(LX,1)&&LX<REF(LX,3)&&LX<REF(LX,5)&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HX,4),0);L1:=IF(LX>REF(LX,1)&&LX>REF(LX,3)&&LX>REF(LX,5)&&HX>REF(HX,1)&&HX>REF(HX,2)&&HX>REF(HX,4)&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LX,4),0);H2:=VALUEWHEN(H1>0,H1);L2:=VALUEWHEN(L1>0,L1);K1:=IF(CLOSE>H2,-3,IF(CLOSE<L2,1,0));K2:=VALUEWHEN(K1<>0,K1);G:=IF(K2=1,H2,L2);G1:=VALUEWHEN(ISLASTBAR,G);TMP:=K2;W1:=K2;W2:=OPEN-CLOSE;HT:=IF(OPEN>CLOSE,OPEN,CLOSE);LT:=IF(OPEN<CLOSE,OPEN,CLOSE);STICKLINE(W1=1,HIGH,HT,0,0),COLORCYAN;STICKLINE(W1=1,LOW,LT,0,0),COLORCYAN;STICKLINE(W1=-3,HIGH,HT,0,0),COLORRED;STICKLINE(W1=-3,LOW,LT,0,0),COLORRED;STICKLINE(W1>0,OPEN,CLOSE,3,1),COLORCYAN;STICKLINE(W1<=0,OPEN,CLOSE,3,1),COLORRED;STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,3,0),COLORRED;STICKLINE(W2>0&&W1>0,OPEN,CLOSE,3,0),COLORCYAN;A:=WMA(HIGH,30);B:=WMA(LOW,30);A1:=WMA(HIGH,150),LINETHICK2;B1:=WMA(LOW,150);S1:=CROSS(CLOSE,WMA(HIGH,150));X1:=CROSS(WMA(LOW,150),CLOSE);WS1:=BARSLAST(S1)+1;WX1:=BARSLAST(X1)+1;SS1:=CROSS(SUM(S1,WX1),0.5);XX1:=CROSS(SUM(X1,WS1),0.5);S:=CROSS(CLOSE,WMA(HIGH,30));X:=CROSS(WMA(LOW,30),CLOSE),LINETHICK2;WS:=BARSLAST(S)+1,LINETHICK2;WX:=BARSLAST(X)+1,LINETHICK2;SS:=CROSS(SUM(S,WX),0.5);XX:=CROSS(SUM(X,WS),0.5);{STICKLINE(CLOSE>WMA(HIGH,30),WMA(HIGH,30),WMA(LOW,30),3,1),COLORMAGENTA;STICKLINE(CLOSE<WMA(LOW,30),WMA(LOW,30),WMA(HIGH,30),3,1),COLORGREEN;}STICKLINE(CLOSE>WMA(HIGH,150),WMA(HIGH,150),WMA(LOW,150),3,1),COLORRED;STICKLINE(CLOSE<WMA(LOW,150),WMA(LOW,150),WMA(HIGH,150),3,1),COLORBLUE;IF(CLOSE>WMA(HIGH,150),WMA(HIGH,150),DRAWNULL),COLORRED;IF(CLOSE<WMA(HIGH,150),WMA(HIGH,150),DRAWNULL),COLORBLUE;IF(CLOSE>WMA(LOW,150),WMA(LOW,150),DRAWNULL),COLORRED;IF(CLOSE<WMA(LOW,150),WMA(LOW,150),DRAWNULL),COLORBLUE;