请老师改成日线的

1天前发布

15FOO:MIN$15$O,CIRCLEDOT,COLORCYAN,NODRAW;15FN:CROSS(MOD(MINUTE,15)=0,0.5),NODRAW;N:=BARSLAST(CROSS(...

15FOO:"MIN$15$O",CIRCLEDOT,COLORCYAN,NODRAW;
15FN:CROSS(MOD(MINUTE,15)=0,0.5),NODRAW;
N:=BARSLAST(CROSS(15FN,0.5))+1;
NN:=MINUTE,NODRAW;
D:=MOD(NN,15)=0;
QO:=VALUEWHEN(D,O),DASH;
QC:=VALUEWHEN(D,REF(C,1)),DASH;
N1:=BARSLAST(HOUR<>REF(HOUR,1))+1;


T:=REFX1(MOD(NN,15)=0,1);
DRAWSL(T,HHV(H,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGRAY);
DRAWSL(T,LLV(L,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGRAY);
DRAWLINE(T,HHV(H,SUMBARS(T,2)-1),T,LLV(L,SUMBARS(T,2)-1),COLORGRAY);
DRAWLINE3(T,HHV(H,SUMBARS(T,2)-1),SUMBARS(T,2)-2,T,LLV(L,SUMBARS(T,2)-1),SUMBARS(T,2)-2,0),COLORGRAY;


DRAWSL(ISLASTBAR,HHV(H,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGRAY);
DRAWSL(ISLASTBAR,LLV(L,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGRAY);
DRAWLINE(ISLASTBAR,HHV(H,SUMBARS(T,1)-1),ISLASTBAR,LLV(L,SUMBARS(T,1)-1),COLORGRAY);
DRAWLINE3(ISLASTBAR,HHV(H,SUMBARS(T,1)-1),SUMBARS(T,1)-2,ISLASTBAR,LLV(L,SUMBARS(T,1)-1),SUMBARS(T,1)-2,0),COLORGRAY;

A:=REF(SUM(V,N),N)>REF(SUM(V,N),SUMBARS(N=1,2))&&REF(SUM(V,N),N)>SUM(V,N)&&REF(C>REF(O,N-1),N)&&CREF((HHV(H,N)+LLV(L,N))/2,N)&&C
DRAWSL(A&&T,HHV(H,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGREEN);
DRAWSL(A&&T,LLV(L,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGREEN);
DRAWLINE(A&&T,HHV(H,SUMBARS(T,2)-1),T,LLV(L,SUMBARS(T,2)-1),COLORGREEN);
DRAWLINE3(A&&T,HHV(H,SUMBARS(T,2)-1),SUMBARS(T,2)-2,T,LLV(L,SUMBARS(T,2)-1),SUMBARS(T,2)-2,0),COLORGREEN;

DRAWSL(A&&ISLASTBAR,HHV(H,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGREEN);
DRAWSL(A&&ISLASTBAR,LLV(L,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGREEN);
DRAWLINE(A&&ISLASTBAR,HHV(H,SUMBARS(T,1)-1),ISLASTBAR,LLV(L,SUMBARS(T,1)-1),COLORGREEN);
DRAWLINE3(A&&ISLASTBAR,HHV(H,SUMBARS(T,1)-1),SUMBARS(T,1)-2,ISLASTBAR,LLV(L,SUMBARS(T,1)-1),SUMBARS(T,1)-2,0),COLORGREEN;
请老师把这个改成日线框变色 谢谢
付费偷看设置
发送
5条回答
文华解答
2楼-- · 1天前

编写如下,仅供参考

15FOO:"DAY$1$O",CIRCLEDOT,COLORCYAN,NODRAW;
15FN:DAYBARPOS=1,NODRAW;
N:=BARSLAST(CROSS(15FN,0.5))+1;
NN:=DAYBARPOS=1,NODRAW;
D:=DAYBARPOS=1;
QO:=VALUEWHEN(D,O),DASH;
QC:=VALUEWHEN(D,REF(C,1)),DASH;
//N1:=BARSLAST(HOUR<>REF(HOUR,1))+1;


T:=REFX1(NN,1);
DRAWSL(T,HHV(H,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGRAY);
DRAWSL(T,LLV(L,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGRAY);
DRAWLINE(T,HHV(H,SUMBARS(T,2)-1),T,LLV(L,SUMBARS(T,2)-1),COLORGRAY);
DRAWLINE3(T,HHV(H,SUMBARS(T,2)-1),SUMBARS(T,2)-2,T,LLV(L,SUMBARS(T,2)-1),SUMBARS(T,2)-2,0),COLORGRAY;


DRAWSL(ISLASTBAR,HHV(H,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGRAY);
DRAWSL(ISLASTBAR,LLV(L,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGRAY);
DRAWLINE(ISLASTBAR,HHV(H,SUMBARS(T,1)-1),ISLASTBAR,LLV(L,SUMBARS(T,1)-1),COLORGRAY);
DRAWLINE3(ISLASTBAR,HHV(H,SUMBARS(T,1)-1),SUMBARS(T,1)-2,ISLASTBAR,LLV(L,SUMBARS(T,1)-1),SUMBARS(T,1)-2,0),COLORGRAY;

A:=REF(SUM(V,N),N)>REF(SUM(V,N),SUMBARS(N=1,2))&&REF(SUM(V,N),N)>SUM(V,N)&&REF(C>REF(O,N-1),N)&&CREF((HHV(H,N)+LLV(L,N))/2,N)&&C
DRAWSL(A&&T,HHV(H,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGREEN);
DRAWSL(A&&T,LLV(L,SUMBARS(T,2)-1),0,-SUMBARS(T,2)+2,0,COLORGREEN);
DRAWLINE(A&&T,HHV(H,SUMBARS(T,2)-1),T,LLV(L,SUMBARS(T,2)-1),COLORGREEN);
DRAWLINE3(A&&T,HHV(H,SUMBARS(T,2)-1),SUMBARS(T,2)-2,T,LLV(L,SUMBARS(T,2)-1),SUMBARS(T,2)-2,0),COLORGREEN;

DRAWSL(A&&ISLASTBAR,HHV(H,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGREEN);
DRAWSL(A&&ISLASTBAR,LLV(L,SUMBARS(T,1)-1),0,-SUMBARS(T,1)+2,0,COLORGREEN);
DRAWLINE(A&&ISLASTBAR,HHV(H,SUMBARS(T,1)-1),ISLASTBAR,LLV(L,SUMBARS(T,1)-1),COLORGREEN);
DRAWLINE3(A&&ISLASTBAR,HHV(H,SUMBARS(T,1)-1),SUMBARS(T,1)-2,ISLASTBAR,LLV(L,SUMBARS(T,1)-1),SUMBARS(T,1)-2,0),COLORGREEN;
无语无文
3楼-- · 1天前
你好老师 1楼是15分钟的框 我是想换成日线的框 也就是在日内画日框 只是级别放大 ,变色规则不变 只是换成日线级别的 请老师帮忙写一下 谢谢
文华解答
4楼-- · 1天前

之前是每15分钟K线为一组,取高低价画线,

在日内画日框 只是级别放大,还是15分钟画一个框吗?

画框用的是多长时间的高低价?
无语无文
5楼-- · 1天前
就是一根日K线对应一个框 框的高以日k线最高点为准,框底以日k线低点为准,时间就是日K线的时间
文华解答
6楼-- · 1天前

2楼编写调整成日线了的,请参考下