文章
文章用户商铺文档快讯有问必答话题

写一个画线指标。 (文华财经)

投资者咨询：写一个画线指标。 (文华财经)
来源:文华财经  日期:2020-10-18 16:58
要求：日线图中，若存在一个K线，它的影线部分长度， 是实体部分的2.5倍，则进入更小周期，对这根K线的最高价和最低价画两条水平线。

有两个要注意的地方，如果是影线很长，的十字星，这种也算符合要求，但是十字星实体部分为0，影线长度除与0，除法分母不能为0，所以请加入 只要是十字星就可以算也符合要求，进入更小周期画线。
第二个注意的是，如果一个K线上下影线都很长，肯定是取单边的影线，不能把上影线+下影线 再除与实体部分。。
 
技术人员回复
日期:2020-10-18 17:13
 参考


Vars
     Numeric HH,LL,H,L,N,A,O,C,ST;
Begin
//超短指标
L=Low;
H=High;
O=Open;
C=Close;
N=DayBarPos;
HH=HHV(H,N);
LL=LLV(L,N);
A=Max(HH-Max(Ref(O,N-1),C),Min(Ref(O,N-1),C)-LL);
ST=Abs(Ref(O,N-1)-C);
DrawSL1(IsLastKLine&&A>2.5*ST,HH,0,N-1,1,Red);
DrawSL1(IsLastKLine&&A>2.5*ST,LL,0,N-1,1,Green);
End   
投资者咨询：写一个画线指标。 (文华财经)
来源:文华财经  日期:2020-10-18 16:58
好的老师
技术人员回复
日期:2020-10-18 17:57
 为方便论坛管理，新的问题请重新发帖提问，感谢您的 配合 
投资者咨询：写一个画线指标。 (文华财经)
来源:文华财经  日期:2020-10-18 16:58
 老师 我文华9用的不太顺手，交易还会以文华8为主，有空的话可以文华8的也给我发一份吗
技术人员回复
日期:2020-10-19 8:10

参考

 

N:=DAYBARPOS;
HH:=HHV(H,N);
LL:=LLV(L,N);
A:=MAX(HH-MAX(REF(O,N-1),C),MIN(REF(O,N-1),C)-LL);
ST:=ABS(REF(O,N-1)-C);
DRAWSL1(ISLASTKLINE&&A>2.5*ST,HH,0,N-1,1),COLORRED;
DRAWSL1(ISLASTKLINE&&A>2.5*ST,LL,0,N-1,1),COLORGREEN;

投资者咨询：写一个画线指标。 (文华财经)
来源:文华财经  日期:2020-10-18 16:58
 老师 代码有误 说第六行ISLASTKLINE没有定义或存在非法字符。。
技术人员回复
日期:2020-10-19 11:14

 6楼是wh8的源码，wh6这样改下

 

N:=DAYBARPOS;
HH:=HHV(H,N);
LL:=LLV(L,N);
A:=MAX(HH-MAX(REF(O,N-1),C),MIN(REF(O,N-1),C)-LL);
ST:=ABS(REF(O,N-1)-C);
DRAWSL1((REFX(N=1,1)||ISLASTBAR)&&A>2.5*ST,HH,0,N-1,1),COLORRED;
DRAWSL1((REFX(N=1,1)||ISLASTBAR)&&A>2.5*ST,LL,0,N-1,1),COLORGREEN;

投资者咨询：写一个画线指标。 (文华财经)
来源:文华财经  日期:2020-10-18 16:58
 老师 已经好了 在日线以下有正确显示了，但是在日线里面好像有乱码 满屏花花绿绿的线
技术人员回复
日期:2020-10-19 11:29

 参考

 

N:=DAYBARPOS;
HH:=HHV(H,N);
LL:=LLV(L,N);
A:=MAX(HH-MAX(REF(O,N-1),C),MIN(REF(O,N-1),C)-LL);
ST:=ABS(REF(O,N-1)-C);
DRAWSL1((REFX(N=1,1)||ISLASTBAR)&&A>2.5*ST,HH,0,N,1),COLORRED;
DRAWSL1((REFX(N=1,1)||ISLASTBAR)&&A>2.5*ST,LL,0,N,1),COLORGREEN;