ZV6:=REF(SUM(V,N6),N6);
VV6:=SUM(V,N6);
C6:=IF(REFX1(N6=1,1)&&VV6>ZV6,1,0);
LL6:=HHV(H,N6);
HH6:=LLV(L,N6);
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, LL6),VALUEWHEN(C6, LL6),2,COLORLIGHTGREEN);//数字显示
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, HH6),VALUEWHEN(C6, HH6),2,COLORRED);//数字显示
A1:=VALUEWHEN(C6, HH6)>REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)>REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1);
A2:=VALUEWHEN(C6, HH6)A3:=VALUEWHEN(C6, HH6)>REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1);
FILLRGN(A1,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),RGB(255,202,202));//红色
FILLRGN(A2,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),RGB(134,255,165));//绿色
FILLRGN(A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),RGB(255,255,185));//黄色
STICKLINE1(ISLASTBAR&&A1,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),80,0),RGB(255,202,202);
STICKLINE1(ISLASTBAR&&A2,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),80,0),RGB(134,255,165);
STICKLINE1(ISLASTBAR&&A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),80,0),RGB(255,255,185);
DRAWKLINE1(H,O,L,C);//K线显示
修改成如果是阳线,收盘价到最低点之间用红色填充,如果是阴线,收盘价到最高点之间用绿色填充,黄色区域部分就去掉谢谢老师!
参考:
N6:=BARSLAST(DATE<>REF(DATE,1))+1;
ZV6:=REF(SUM(V,N6),N6);
VV6:=SUM(V,N6);
C6:=IF(REFX1(N6=1,1)&&VV6>ZV6,1,0);
LL6:=HHV(H,N6);
HH6:=LLV(L,N6);
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, LL6),VALUEWHEN(C6, LL6),2,COLORLIGHTGREEN);//数字显示
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, HH6),VALUEWHEN(C6, HH6),2,COLORRED);//数字显示
A1:=ISUP;
A2:=ISDOWN;
//A3:=VALUEWHEN(C6, HH6)>REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)<REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1)||VALUEWHEN(C6, HH6)<REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)>REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1);
FILLRGN(A1,C,L,RGB(255,202,202));//红色
FILLRGN(A2,C,H,RGB(134,255,165));//绿色
//FILLRGN(A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),RGB(255,255,185));//黄色
STICKLINE1(ISLASTBAR&&A1,C,L,80,0),RGB(255,202,202);
STICKLINE1(ISLASTBAR&&A2,C,H,80,0),RGB(134,255,165);
//STICKLINE1(ISLASTBAR&&A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),80,0),RGB(255,255,185);
DRAWKLINE1(H,O,L,C);//K线显示
原先指标就是这种效果的,是想改成画柱?参考:
N6:=BARSLAST(DATE<>REF(DATE,1))+1;
ZV6:=REF(SUM(V,N6),N6);
VV6:=SUM(V,N6);
C6:=IF(REFX1(N6=1,1)&&VV6>ZV6,1,0);
LL6:=HHV(H,N6);
HH6:=LLV(L,N6);
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, LL6),VALUEWHEN(C6, LL6),2,COLORLIGHTGREEN);//数字显示
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, HH6),VALUEWHEN(C6, HH6),2,COLORRED);//数字显示
A1:=ISUP;
A2:=ISDOWN;
//A3:=VALUEWHEN(C6, HH6)>REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)<REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1)||VALUEWHEN(C6, HH6)<REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)>REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1);
STICKLINE1(A1,C,L,6,0),RGB(255,202,202);//红色
STICKLINE1(A2,C,H,6,0),RGB(134,255,165);//绿色
//FILLRGN(A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),RGB(255,255,185));//黄色
STICKLINE1(ISLASTBAR&&A1,C,L,80,0),RGB(255,202,202);
STICKLINE1(ISLASTBAR&&A2,C,H,80,0),RGB(134,255,165);
//STICKLINE1(ISLASTBAR&&A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),80,0),RGB(255,255,185);
DRAWKLINE1(H,O,L,C);//K线显示
核实一下
1.1楼说的阳线,是指日线的?
2.从收盘价到最高价,是指日线的收盘价到最高价?
实现不了的,整根日线的收盘价和最高价,对于盘中K线来说,是未来才能取到的值
只能是取当前已经走出来的最高价和单根收盘价,例如一天10根K线,已经走了5根,取这5根的最高价
您考虑下
那么判断阳线,使用上个交易日数据判断?参考:
CC:="DAY$1$C";
OO:="DAY$1$O";
HH:="DAY$1$H";
LL:="DAY$1$L";
N6:=BARSLAST(DATE<>REF(DATE,1))+1;
ZV6:=REF(SUM(V,N6),N6);
VV6:=SUM(V,N6);
C6:=IF(REFX1(N6=1,1)&&VV6>ZV6,1,0);
LL6:=HHV(H,N6);
HH6:=LLV(L,N6);
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, LL6),VALUEWHEN(C6, LL6),2,COLORLIGHTGREEN);//数字显示
DRAWNUMBER(ISLASTBAR,VALUEWHEN(C6, HH6),VALUEWHEN(C6, HH6),2,COLORRED);//数字显示
A1:=CC>OO;
A2:=CC<OO;
//A3:=VALUEWHEN(C6, HH6)>REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)<REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1)||VALUEWHEN(C6, HH6)<REF(VALUEWHEN(C6, HH6),BARSLAST(C6)+1)&&VALUEWHEN(C6, LL6)>REF(VALUEWHEN(C6, LL6),BARSLAST(C6)+1);
FILLRGN(A1,CC,LL,RGB(255,202,202));//红色
FILLRGN(A2,CC,HH,RGB(134,255,165));//绿色
//FILLRGN(A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),RGB(255,255,185));//黄色
STICKLINE1(ISLASTBAR&&A1,CC,LL,80,0),RGB(255,202,202);
STICKLINE1(ISLASTBAR&&A2,CC,HH,80,0),RGB(134,255,165);
//STICKLINE1(ISLASTBAR&&A3,VALUEWHEN(C6, HH6),VALUEWHEN(C6, LL6),80,0),RGB(255,255,185);
DRAWKLINE1(H,O,L,C);//K线显示

