K线转向标记

林858629

请教论坛里的高手们，以下情况能否实现：当最新价格突破前3根K线高点标记为B1，中途只要价格不突破前3根K线的低点，则一直标记Bx....   直到最新价突破前3根K线低点，标记为S1，并且，只要价格不上破前3根高点，则持续标记Sx。是否能够实现，中间有穿头破脚的情况，能否用最新情况标记，比如先涨后跌，则收盘显示是S1

技术008

DRAWTEXT(c=hhv(c,3),high,'B1');
DRAWTEXT(c=llv(c,3),low,'S1');

技术008

DRAWTEXT(c=hhv(c,3),high,'B1');
DRAWTEXT(c=llv(c,3),low,'S1');

林858629

技术008 发表于 2024-12-30 14:44
DRAWTEXT(c=hhv(c,3),high,'B1');
DRAWTEXT(c=llv(c,3),low,'S1');

林858629

技术008 发表于 2024-12-30 14:44
DRAWTEXT(c=hhv(c,3),high,'B1');
DRAWTEXT(c=llv(c,3),low,'S1');

你好，我是想要有一个指标，可以随时看到当下价格处于转向第几根

林858629

技术008 发表于 2024-12-30 14:44
DRAWTEXT(c=hhv(c,3),high,'B1');
DRAWTEXT(c=llv(c,3),low,'S1');

截图不知道怎么发上来，这里添加图片要复制地址，我刚试了一下，没看见有上传图片上来

技术008

这个转向没法写，你是要类似9转那种把，下面这个代码试下把
其他的不好写，没办法光一个转向就写好的，这里涉及的内容比较多的


A1:=C>=REF(C,4); A:=C<REF(C,4); AA:=C<REF(C,4) AND REF(A1,1); T:=BARSLAST(AA)NODRAW; M:=(T=0 AND REFX(T=1 AND NOT(A),1)) OR (REFX(T=2 AND NOT(A),2)) OR (REFX(T=3 AND NOT(A),3)) OR (REFX(T=4 AND NOT(A),4)) OR (REFX(T=5 AND NOT(A),5))OR (REFX(T=6 AND NOT(A),6)) OR (REFX(T=7 AND NOT(A),7)) OR (REFX(T=8 AND NOT(A),8)); M1:=T=1 AND REFX(T=2 AND NOT(A),1) OR (REFX(T=3 AND NOT(A),2)) OR (REFX(T=4 AND NOT(A),3)) OR (REFX(T=5 AND NOT(A),4)) OR (REFX(T=6 AND NOT(A),5))OR (REFX(T=7 AND NOT(A),6)) OR (REFX(T=8 AND NOT(A),7)); M2:=T=2 AND REFX(T=3 AND NOT(A),1) OR (REFX(T=4 AND NOT(A),2)) OR (REFX(T=5 AND NOT(A),3)) OR (REFX(T=6 AND NOT(A),4)) OR (REFX(T=7 AND NOT(A),5)) OR (REFX(T=8 AND NOT(A),6)); M3:=T=3 AND REFX(T=4 AND NOT(A),1)OR (REFX(T=5 AND NOT(A),2)) OR (REFX(T=6 AND NOT(A),3)) OR (REFX(T=7 AND NOT(A),4)) OR (REFX(T=8 AND NOT(A),5)); M4:=T=4 AND REFX(T=5 AND NOT(A),1) OR (REFX(T=6 AND NOT(A),2)) OR (REFX(T=7 AND NOT(A),3)) OR (REFX(T=8 AND NOT(A),4));M5:=T=5 AND REFX(T=6 AND NOT(A),1) OR (REFX(T=7 AND NOT(A),2)) OR (REFX(T=8 AND NOT(A),3)); M6:=T=6 AND REFX(T=7 AND NOT(A),1) OR (REFX(T=8 AND NOT(A),2));M7:=T=7 AND REFX(T=8 AND NOT(A),1);N:=T=1 AND REF(T=0 AND AA,1) AND A; N1:=T=2 AND REF(N,1) AND A; N2:=T=3 AND REF(N1,1) AND A; N3:=T=4 AND REF(N2,1) AND A; N4:=T=5 AND REF(N3,1) AND A; N5:=T=6 AND REF(N4,1) AND A; N6:=T=7 AND REF(N5,1) AND A; N7:=T=8 AND REF(N6,1) AND A; DRAWTEXT(T=0,H*1.02,'1')COLORGREEN; DRAWTEXT(N,H*1.02,'2')COLORGREEN; DRAWTEXT(N1,H*1.02,'3')COLORGREEN; DRAWTEXT(N2,H*1.02,'4')COLORGREEN; DRAWTEXT(N3,H*1.02,'5')COLORGREEN; DRAWTEXT(N4,H*1.02,'6')COLORGREEN; DRAWTEXT(N5,H*1.02,'7')COLORGREEN; DRAWTEXT(N6,H*1.02,'8')COLORGREEN; DRAWTEXT(N7,H*1.02,'9')COLORGREEN; DRAWICON(N7,H*1.04,1)COLORGREEN; DRAWTEXT(M,H*1.02,'1')COLORBLACK; DRAWTEXT(M1,H*1.02,'2')COLORBLACK; DRAWTEXT(M2,H*1.02,'3')COLORBLACK; DRAWTEXT(M3,H*1.02,'4')COLORBLACK; DRAWTEXT(M4,H*1.02,'5')COLORBLACK; DRAWTEXT(M5,H*1.02,'6')COLORBLACK; DRAWTEXT(M6,H*1.02,'7')COLORBLACK; DRAWTEXT(M7,H*1.02,'8')COLORBLACK; B1:=C<=REF(C,4); B:=C>REF(C,4);

林858629

技术008 发表于 2024-12-30 14:57
这个转向没法写，你是要类似9转那种把，下面这个代码试下把
其他的不好写，没办法光一个转向就写好的，这 ...

可以加个V聊吗？我想表达的是，价格首次突破前3根K线最高价视为转向上HB1，第二根K线开始为HB2，只要价格没有下破前3根K线最低价，则持续记录HBn，直到价格突破前3根K线最低价，则记录HS1，直到HSn
自己整理的语句如下，但存在BUG，一个是：第二根价格没有再创新高低，转向的值没有叠加。第二个是穿透破脚的情况没法处理
HH:=REF(HHV(h,2),1);                                                      
LL:=REF(LLV(l,2),1);
BH:barslast(count(h>hh,BARSLAST(l<ll)+1)=1 )+1;
BL:barslast(count(l<ll,BARSLAST(h>hh)+1)=1 )+1;
HB:IF(BH<=BL and l>ll,BH,null);
HS:IF(bl<=bh and h<hh ,bl,null);

补充内容 (2024-12-30 15:19):
HH:=REF(HHV(h,3),1);                                                      //新高新低通道
LL:=REF(LLV(l,3),1);

//BH:barslast(count(h>hh,BARSLAST(l<ll))=1 and h>hh)+1;
//BL:barslast(count(l<ll,BARS...

技术008

variable:n=0,m=0;

if not(close=llv(close,3)) and n>0 then
begin
        n:=n+1;
        DRAWTEXT(1,high,'HB'+NUMTOSTR(n,0));
END
if close=hhv(close,3) and n=0 then
begin
        m:=0;
        DRAWTEXT(1,high,'HB1');
        n:=1;
end



if not(close=hhv(close,3)) and m>0 then
begin
        m:=m+1;
        DRAWTEXT(1,low,'SB'+NUMTOSTR(m,0));
END
if close=llv(close,3) and m=0 then
begin
        n:=0;
        DRAWTEXT(1,low,'SB1');
        m:=1;
end

林858629

技术008 发表于 2024-12-30 15:26
variable:n=0,m=0;

if not(close=llv(close,3)) and n>0 then

大体能够标记出来，请问是否能参数化，便于使用