顶底一品同花顺公式，立于不败之地

WR38:=100-100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10)),colorwhite;

WR37:=100-100*(HHV(HIGH,20)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,20)),colorgreen;

WR36:=100-100*(HHV(HIGH,30)-CLOSE)/(HHV(HIGH,30)-LLV(LOW,30)),colorblue;

WR35:=100-100*(HHV(HIGH,40)-CLOSE)/(HHV(HIGH,40)-LLV(LOW,40)),colorcyan;

WR34:=100-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50)),coloryellow;

WR33:=100-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70)),colorred;

WR32:=100-100*(HHV(HIGH,80)-CLOSE)/(HHV(HIGH,80)-LLV(LOW,80)),colorff00ff;

WR31:=100-100*(HHV(HIGH,90)-CLOSE)/(HHV(HIGH,90)-LLV(LOW,90)),colorwhite;

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

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

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

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

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

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

WR7:=100-100*(HHV(HIGH,160)-CLOSE)/(HHV(HIGH,160)-LLV(LOW,160)),colorwhite;

WR8:=100-100*(HHV(HIGH,170)-CLOSE)/(HHV(HIGH,170)-LLV(LOW,170)),colorgreen;

WR9:=100-100*(HHV(HIGH,180)-CLOSE)/(HHV(HIGH,180)-LLV(LOW,180)),colorblue;

WR10:=100-100*(HHV(HIGH,190)-CLOSE)/(HHV(HIGH,190)-LLV(LOW,190)),colorcyan;

WR11:=100-100*(HHV(HIGH,200)-CLOSE)/(HHV(HIGH,200)-LLV(LOW,200)),coloryellow;

WR12:=100-100*(HHV(HIGH,210)-CLOSE)/(HHV(HIGH,210)-LLV(LOW,210)),colorred;

WR13:=100-100*(HHV(HIGH,220)-CLOSE)/(HHV(HIGH,220)-LLV(LOW,220)),colorff00ff;

WR14:=100-100*(HHV(HIGH,230)-CLOSE)/(HHV(HIGH,230)-LLV(LOW,230)),colorwhite;

WR15:=100-100*(HHV(HIGH,240)-CLOSE)/(HHV(HIGH,240)-LLV(LOW,240)),colorgreen;

WR16:=100-100*(HHV(HIGH,250)-CLOSE)/(HHV(HIGH,250)-LLV(LOW,250)),colorblue;

WR17:=100-100*(HHV(HIGH,260)-CLOSE)/(HHV(HIGH,260)-LLV(LOW,260)),colorcyan;

WR18:=100-100*(HHV(HIGH,270)-CLOSE)/(HHV(HIGH,270)-LLV(LOW,270)),coloryellow;

WR19:=100-100*(HHV(HIGH,280)-CLOSE)/(HHV(HIGH,280)-LLV(LOW,280)),colorred;

WR20:=100-100*(HHV(HIGH,290)-CLOSE)/(HHV(HIGH,290)-LLV(LOW,290)),colorff00ff;

WR21:=100-100*(HHV(HIGH,300)-CLOSE)/(HHV(HIGH,300)-LLV(LOW,300)),colorwhite;

WR22:=100-100*(HHV(HIGH,310)-CLOSE)/(HHV(HIGH,310)-LLV(LOW,310)),colorgreen;

WR23:=100-100*(HHV(HIGH,320)-CLOSE)/(HHV(HIGH,320)-LLV(LOW,320)),colorblue;

WR24:=100-100*(HHV(HIGH,330)-CLOSE)/(HHV(HIGH,330)-LLV(LOW,330)),colorcyan;

WR25:=100-100*(HHV(HIGH,340)-CLOSE)/(HHV(HIGH,340)-LLV(LOW,340)),coloryellow;

WR26:=100-100*(HHV(HIGH,350)-CLOSE)/(HHV(HIGH,350)-LLV(LOW,350)),colorred;

WR27:=100-100*(HHV(HIGH,360)-CLOSE)/(HHV(HIGH,360)-LLV(LOW,360)),colorff00ff;

WR28:=100-100*(HHV(HIGH,370)-CLOSE)/(HHV(HIGH,370)-LLV(LOW,370)),colorwhite;

WR29:100-100*(HHV(HIGH,380)-CLOSE)/(HHV(HIGH,380)-LLV(LOW,380)),colorff00ff;

WR30:=100-100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),colorblue;

WR短:(WR30+WR34+Wr35+WR36+WR37+WR38)/6,colorred;

WR:(WR1+WR2+WR3+Wr4+WR5+WR6+WR7+WR8+WR9+Wr10+WR11+WR12+WR13+WR14+Wr15+WR16+WR17+WR18+WR19+WR20+Wr21+WR22+WR23+WR24+WR25+WR26+Wr27+WR28+WR29+WR30+Wr31+WR32+WR33+WR34+Wr35+WR36+WR37+WR38)/38,colorcyan;

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

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

DRAWICON(CROSS(K,d)  ,d,1);

DRAWICON(CROSS(d,K) ,d,2);

DRAWICON(CROSS(K,d)  AND d<5,10,4);

DRAWICON(CROSS(d,K) AND d>=95 ,90,3);

STICKLINE(wr>99  AND  wr短>99  AND  wr29>99 ,50,5,10,0 ),colorblue;

STICKLINE(wr<1 AND  wr短<1 AND  wr29<1   ,95,50,10,0),colorff00ff;

STICKLINE( d>95  ,95,80,6,0 ),colorwhite;

STICKLINE(d<5 ,20,5,6,0),colorwhite;

中:50;

顶:80;

底:20;

极:98,colorblue;

渊:2,colorblue;

击2:IF(k>d,50,DRAWNULL),colorff00ff,LINETHICK4;

击a:IF(d>80 AND d<90,50,DRAWNULL),coloryellow,LINETHICK4,POINTDOT;

击b:IF(d>90 AND d<95,50,DRAWNULL),colorred,LINETHICK6,POINTDOT;

击c:IF(d>95 ,50,DRAWNULL),colorff00ff,LINETHICK6,POINTDOT;

击1c:IF(d<20 AND  d>10,50,DRAWNULL),colorwhite,LINETHICK4,POINTDOT;

击1a:IF(d<10 AND  d>5,50,DRAWNULL),colorcyan,LINETHICK4,POINTDOT;

击1d:IF(d<5,50,DRAWNULL),colorblue,LINETHICK6,POINTDOT;

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),NODRAW;

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

STICKLINE(VAR51<REF(VAR51,1),50,80,5,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),NODRAW;

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

STICKLINE(VAR251<REF(VAR251,1),50,80,5,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),50,20,5,0),coloryellow,LINETHICK1;

BAR1:=REF(LOW,1);

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),50,20,5,0),colorblue,LINETHICK1;