一品顶底（同花顺公式 副图 源码 测试图）

WR1:=100-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34));

WR2:=100-100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55));

WR3:=100-100*(HHV(HIGH,89)-CLOSE)/(HHV(HIGH,89)-LLV(LOW,89));

WR4:=100-100*(HHV(HIGH,144)-CLOSE)/(HHV(HIGH,144)-LLV(LOW,144));

WR5:=100-100*(HHV(HIGH,233)-CLOSE)/(HHV(HIGH,233)-LLV(LOW,233));

WR6:=100-100*(HHV(HIGH,377)-CLOSE)/(HHV(HIGH,377)-LLV(LOW,377));

wr:(WR1+WR2+WR3+WR4+WR5+WR6)/6,colorblue;

RSV:=(CLOSE-LLV(LOW,233))/(HHV(HIGH,233)-LLV(LOW,233))*100;

K:=SMA(RSV,3,1);

D:SMA(K,3,1),colorblue;

买线:=EMA(C,2);

卖线:=EMA(SLOPE(C,21)*20+C,42);

DIFF : =EMA(CLOSE,13) - EMA(CLOSE,34);

DEA := EMA(DIFF,5);

击:IF(K>=d AND rsv>=d  AND DIFF>= DEA AND 买线>=卖线 AND d>REF(d,1) ,d,DRAWNULL),LINETHICK3,colorff00ff;

击r:IF(rsv>d,wr,DRAWNULL),colorred,LINETHICK3;

击r99:IF(wr>99.5,wr,DRAWNULL),colorff00ff,LINETHICK3;

击0:IF(wr<0.5,wr,DRAWNULL),colorff00ff,LINETHICK3;

STICKLINE(wr>99 AND d>95 ,90,20,1,0),colorwhite;

STICKLINE( wr<1 AND d<5,20,90,1,0),coloryellow;

海:20;

天:80;

渊:5;

极:95;

VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);

VAR21:=SMA(ABS(HIGH-VAR1),13,1)/SMA(MIN(HIGH-VAR1,0),13,1);

VAR31:=EMA(VAR21,13);

VAR41:=HHV(HIGH,34);

VAR51:=EMA(IF(HIGH>=VAR41,VAR31,0),3);

出货:=IF(VAR51>REF(VAR51,1),VAR51,0);

STICKLINE(VAR51>REF(VAR51,1),k,d,3,0 ),colorgreen;

主力拉高:=IF(VAR51<REF(VAR51,1),VAR51,0);

STICKLINE(VAR51<REF(VAR51,1),k,d,9,0),colorred;

VAR21:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);

VAR221:=SMA(ABS(HIGH-VAR21),26,1)/SMA(MIN(HIGH-VAR21,0),26,1);

VAR231:=EMA(VAR221,26);

VAR241:=HHV(HIGH,255);

VAR251:=EMA(IF(HIGH>=VAR241,VAR231,0),3);

出货2:=IF(VAR251>REF(VAR251,1),VAR251,0);

STICKLINE(VAR251>REF(VAR251,1),k,d,3,0 ),colorwhite;

主力拉高2:=IF(VAR251<REF(VAR251,1),VAR251,0);

拉高:=VAR251<REF(VAR251,1);

STICKLINE(VAR251<REF(VAR251,1),k,d,9,0),colorff00ff;

BAR1:=REF(LOW,1);

BAR2:=SMA(ABS(LOW-BAR1),13,1)/SMA(MAX(LOW-BAR1,0),13,1)*4;

BAR3:=EMA(BAR2,13);

BAR4:=LLV(LOW,34);

BAR5:=EMA(IF(LOW<=BAR4,BAR3,0),3);

STICKLINE(BAR5>REF(BAR5,1),wr,d,16,0),coloryellow,LINETHICK1;

BAR22:=SMA(ABS(LOW-BAR1),26,1)/SMA(MAX(LOW-BAR1,0),26,1)*4;

BAR32:=EMA(BAR22,26);

BAR42:=LLV(LOW,250);

BAR52:=EMA(IF(LOW<=BAR42,BAR32,0),3);

STICKLINE(BAR52>REF(BAR52,1),wr,d,16,0),colorblue,LINETHICK1;