修改K线变色实心空心 (文华财经WH6赢顺V6.7)

投资者咨询:修改K线变色实心空心 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2019-4-16 10:40

 请老师将下列指标中的K线,保持红 蓝颜色不变,上涨变成空心,下跌变成实心。谢谢老师。

P81:=PEAKBARS(H,0.2,1,1),NODRAW;//////君耀编辑((指标))
P82:=TROUGHBARS(L,0.2,1,1),NODRAW;
A8:=BACKSET(ISLASTBAR,SUMBARS(P81=0,1));//
B8:=BACKSET(ISLASTBAR,BARSLAST(P82=0)+1);
A1:=CROSS(A8,0.5);
A2:=CROSS(B8,0.5);//
DRAWCOLORKLINE(P81<=P82,COLORBLUE,0);
DRAWCOLORKLINE(P82<=P81,RGB(213,0,0),0);
DRAWLINE(P81<=P82,H,1,L,COLORBLUE),LINETHICK3;
DRAWLINE(P82<=P81,H,1,L,RGB(213,0,0)),LINETHICK3;
HS:=P81<=P82 && P81<>0 ||P82=0;
LS:=P82<=P81 && P82<>0 ||P81=0;
DRAWCOLORKLINE(HS ,COLORBLUE,0);
DRAWCOLORKLINE(LS,RGB(213,0,0),0);
DRAWLINE(HS,H,1,L,COLORBLUE),LINETHICK3;
DRAWLINE(LS,H,1,L,RGB(213,0,0)),LINETHICK3;//冬夜编辑
DRAWCOLORKLINE(H>VALUEWHEN(P81<=P82,REF(H,P81))&&P81<=P82,COLORRED,0);/////////////君耀编辑
DRAWCOLORKLINE(L<VALUEWHEN(P81>=P82,REF(L,P82))&&P82<=P81,COLORBLUE,0); /////////////君耀编辑 /////请重新编辑

 

 
技术人员回复
日期:2019-4-16 10:43
核实下,上涨、下跌如何定义?

投资者咨询:修改K线变色实心空心 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2019-4-16 10:40
 以原始K线为依据,代码叫我删了,那里不是有空心和实心吗,就按那个办。
技术人员回复
日期:2019-4-16 13:10
阳线并且满足变色条件改为空心,阴线且满足条件改为实心,参考

P81:=PEAKBARS(H,0.2,1,1),NODRAW;//////君耀编辑((指标))
P82:=TROUGHBARS(L,0.2,1,1),NODRAW;
A8:=BACKSET(ISLASTBAR,SUMBARS(P81=0,1));//
B8:=BACKSET(ISLASTBAR,BARSLAST(P82=0)+1);
A1:=CROSS(A8,0.5);
A2:=CROSS(B8,0.5);//
DRAWCOLORKLINE(P81<=P82&&ISUP,COLORBLUE,1);
DRAWCOLORKLINE(P81<=P82&&ISDOWN,COLORBLUE,0);
DRAWCOLORKLINE(P82<=P81&&ISUP,RGB(213,0,0),1);
DRAWCOLORKLINE(P82<=P81&&ISDOWN,RGB(213,0,0),0);
//DRAWLINE(P81<=P82,H,1,L,COLORBLUE),LINETHICK3;
//DRAWLINE(P82<=P81,H,1,L,RGB(213,0,0)),LINETHICK3;
HS:=P81<=P82 && P81<>0 ||P82=0;
LS:=P82<=P81 && P82<>0 ||P81=0;
DRAWCOLORKLINE(HS&&ISUP ,COLORBLUE,1);
DRAWCOLORKLINE(HS&&ISDOWN ,COLORBLUE,0);

DRAWCOLORKLINE(LS&&ISUP,RGB(213,0,0),1);
DRAWCOLORKLINE(LS&&ISDOWN,RGB(213,0,0),0);

//DRAWLINE(HS,H,1,L,COLORBLUE),LINETHICK3;
//DRAWLINE(LS,H,1,L,RGB(213,0,0)),LINETHICK3;//冬夜编辑
DRAWCOLORKLINE(H>VALUEWHEN(P81<=P82,REF(H,P81))&&P81<=P82&&ISDOWN,COLORRED,0);/////////////君耀编辑
DRAWCOLORKLINE(L<VALUEWHEN(P81>=P82,REF(L,P82))&&P82<=P81&&ISDOWN,COLORBLUE,0); /////////////君耀编辑 /////请重新编辑
DRAWCOLORKLINE(H>VALUEWHEN(P81<=P82,REF(H,P81))&&P81<=P82&&ISUP,COLORRED,1);/////////////君耀编辑
DRAWCOLORKLINE(L<VALUEWHEN(P81>=P82,REF(L,P82))&&P82<=P81&&ISUP,COLORBLUE,1);