文华财经变色K线+缠论自动画线 主图

图片

SJ:=IFELSE(DATE+20000000<20990726,1,1);

MA3:=MA(C,170);

HH1:=IFELSE(H<REF(H,1)&&REF(H,1)<REF(H,2),REF(H,2),0);

LL1:=IFELSE(L>REF(L,1)&&REF(L,1)>REF(L,2),REF(L,2),0);

HH2:=VALUEWHEN(HH1>0,HH1);

LL2:=VALUEWHEN(LL1>0,LL1);

HH:=HHV(HIGH,1)*SJ/10+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;

LL:=LLV(LOW,1)*SJ/10+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;

H1:=IFELSE(HH<REF(HH,1)&&LL<REF(LL,1)&&REF(OPEN,1)>CLOSE&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HH,2),0);

L1:=IFELSE(LL>REF(LL,1)&&HH>REF(HH,1)&&REF(OPEN,1)<CLOSE&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LL,2),0);

X:=DATE;

X0:=H1,LINETHICK2;

X00:=L1;

XXX0:=O,LINETHICK2;

XXX00:=C;

XXX000:=H;

XXX0000:=L;

H2:=VALUEWHEN(X0>0,X0),LINETHICK2;

L2:=VALUEWHEN(X00>0,X00),LINETHICK2;

K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));

K2:=VALUEWHEN(K1<>0,K1);

G:=IFELSE(K2=1,H2,L2);

G1:=VALUEWHEN(ISLASTBAR,G);

X000:=K2,LINETHICK2;

TMP:=K2,LINETHICK2;

W1:=X000,LINETHICK2;

X0000:=OPEN-CLOSE,LINETHICK2;

W2:=X0000,LINETHICK2;

HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE),LINETHICK2;

LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE),LINETHICK2;

DRAWLINE(W1=1,XXX000,W1=1,HT,COLORCYAN);//青色上影线

DRAWLINE(W1=1,XXX0000,W1=1,LT,COLORCYAN);//青色下影线

DRAWLINE(W1=-3,XXX000,W1=-3,HT,COLORRED);//红色上影线

DRAWLINE(W1=-3,XXX0000,W1=-3,LT,COLORRED);//红色下影线

STICKLINE(W1>0,XXX0,XXX00,COLORCYAN,1);//青色空心K线

STICKLINE(W1<=0,XXX0,XXX00,COLORRED,1);//红色空心K线

STICKLINE(W2>0&&W1<=0,XXX0,XXX00,COLORRED,0);//红色实心K线

STICKLINE(W2>0&&W1>0,XXX0,XXX00,COLORCYAN,0);//青色实心K线

DRAWLINE(TMP=1&&REF(TMP,1)=1,G,TMP=1&&REF(TMP,1)=1,REF(G,1),COLORCYAN),DOT;//青色折竖线

DRAWLINE(TMP=-3&&REF(TMP,1)=-3,G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),COLORRED),DOT;//红色折竖线

DRAWSL(K2=1,G,0,1,0,COLORCYAN),DOT;//青色折横线

DRAWSL(K2=-3,G,0,1,0,COLORRED),DOT;//红色折横线

LC:= REF(CLOSE,1),LINETHICK2;

RSI:=SMA(MAX(CLOSE-LC, 0), 6, 1)/SMA(ABS(CLOSE-LC), 6, 1)*100,LINETHICK2;

顶周期:=20;//5的人多

底周期:=20;//21的人多

上内:=LLVBARS(H,顶周期);

上外:=LLVBARS(L,顶周期);

下内:=HHVBARS(L,底周期);

下外:=HHVBARS(H,底周期);

上力度:=HHV(L,上内+1)>LLV(H,上内+1);

下力度:=HHV(L,下内+1)>LLV(H,下内+1);

上包含:=COUNT(L>=REF(L,1),上外)>2 AND COUNT(H>=REF(H,1),上内)>2;

下包含:=COUNT(H<=REF(H,1),下外)>2 AND COUNT(L<=REF(L,1),下内)>2; 

顶0:= 上力度 AND 上包含 AND 上外>3;

底0:= 下力度 AND 下包含 AND 下外>3;

顶:=顶0 AND H=HHV(H,BARSLAST(底0)) AND BARSLAST(底0)>3;

底:=底0 AND L=LLV(L,BARSLAST(顶0)) AND BARSLAST(顶0)>3;

DRAWLINE1(CROSS(BACKSET(顶,BARSLAST(底)+1),0.5),L*SJ,CROSS(BACKSET(底,BARSLAST(顶)+1),0.5),H*SJ,0),COLORRED,LINETHICK3;

DRAWLINE1(CROSS(BACKSET(底,BARSLAST(顶)+1),0.5),H*SJ,CROSS(BACKSET(顶,BARSLAST(底)+1),0.5),L*SJ,0),COLORGREEN,LINETHICK2;