代码如下:
N:=20;
YX1Z:=1;//全显示
YX1A:=REF(HIGH,N)=HHV(HIGH,2*N+1);
YX1B:=FILTER(YX1A,N);
YX1C:=BACKSET(YX1B,N+1);
YX1D:=FILTER(YX1C,N);
YX2A:=REF(LOW,N)=LLV(LOW,2*N+1);
YX2B:=FILTER(YX2A,N);
YX2C:=BACKSET(YX2B,N+1);
YX2D:=FILTER(YX2C,N);
YX1E:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
YX2E:=(HIGH+LOW)/2;
YX1H:=(YX1D AND NOT(YX2D AND YX1E<YX2E)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
YX2F:=YX1D AND NOT(YX2D AND YX1E>=YX2E);
YX1I:=YX2D AND NOT(YX1D AND YX1E<YX2E);
YX1J:=REF(BARSLAST(YX1H),1)+1;
YX1K:=BACKSET(YX1H AND COUNT(YX1I,YX1J)>0,LLVBARS(IF(YX1I,LOW,10000),YX1J));
YX1N:=YX1K>REF(YX1K,1);
YX1O:=BACKSET(YX1N,2);
YX1:=YX1O>REF(YX1O,1),NODRAW;
YX2G:=YX1 OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
YX2H:=REF(BARSLAST(YX2G),1)+1;
YX2I:=BACKSET(YX2G AND COUNT(YX2F,YX2H)>0,HHVBARS(IF(YX2F,HIGH,0),YX2H));
YX2J:=YX2I>REF(YX2I,1);
YX2K:=BACKSET(YX2J,2);
YX2:=YX2K>REF(YX2K,1),NODRAW;
YX2L:=BACKSET(BARSTATUS=2,MIN(BARSLAST(YX2),BARSLAST(YX1))+1);
YX2M:=YX2L>REF(YX2L,1),NODRAW;
YX8L:=BACKSET(BARSTATUS=2,MAX(BARSLAST(YX1),BARSLAST(YX2))+1);
YX8M:=YX8L>REF(YX8L,1),NODRAW;
YX2N:=BACKSET(BARSTATUS=2,BARSLAST(YX1)+1);//定位
YX2O:=YX2N>REF(YX2N,1),NODRAW,COLORWHITE;
YX2P:=BACKSET(YX2O,REF(BARSLAST(YX1),1)+2);
YX2Q:=YX2P>REF(YX2P,1),NODRAW,COLORRED;
YX2R:=BACKSET(BARSTATUS=2,BARSLAST(YX2)+1);
YX2S:=YX2R>REF(YX2R,1),NODRAW,COLORGREEN;
YX2T:=BACKSET(YX2S,REF(BARSLAST(YX2),1)+2);
YX2U:=YX2T>REF(YX2T,1),NODRAW,COLORBLUE;
YX8N:=BACKSET(YX2U,REF(BARSLAST(YX2),1)+3);
YX8O:=YX8N>REF(YX8N,1),NODRAW,COLORBLUE;
YX1R:=BACKSET(YX2Q,REF(BARSLAST(YX1),1)+3);
YX1S:=YX1R>REF(YX1R,1),NODRAW,COLORBLUE;
YX1V:=YX8O OR YX1S;
YX1W:=BARSLAST(YX1V)>0;
YX1X:=VALUEWHEN(YX1W=1,1),NODRAW;
YX1Y:=IF(YX1Z=1,1,YX1X);
DRAWLINE(YX1 AND YX1Y,L,YX2 AND YX1Y,H,0),COLORRED;
DRAWLINE(YX2 AND YX1Y,H,YX1 AND YX1Y,L,0),COLORGREEN;
DRAWLINE(YX2Q,L,YX2O,L,1),COLORMAGENTA,LINETHICK1;
DRAWLINE(YX2U,H,YX2S,H,1),COLORRED,LINETHICK1;
不同软件函数机制处理不同,加载效果可能略有差异是正常的,改写参考:
N:=20;
YX1Z:=1;//全显示
YX1A:=REF(HIGH,N)=HHV(HIGH,2*N+1);
YX1B:=FILTER(YX1A,N);
YX1C:=BACKSET(YX1B,N+1);
YX1D:=FILTER(YX1C,N);
YX2A:=REF(LOW,N)=LLV(LOW,2*N+1);
YX2B:=FILTER(YX2A,N);
YX2C:=BACKSET(YX2B,N+1);
YX2D:=FILTER(YX2C,N);
YX1E:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
YX2E:=(HIGH+LOW)/2;
YX1H:=(YX1D AND NOT(YX2D AND YX1E<YX2E)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
YX2F:=YX1D AND NOT(YX2D AND YX1E>=YX2E);
YX1I:=YX2D AND NOT(YX1D AND YX1E<YX2E);
YX1J:=REF(BARSLAST(YX1H),1)+1;
YX1K:=BACKSET(YX1H AND COUNT(YX1I,YX1J)>0,LLVBARS(IF(YX1I,LOW,10000),YX1J));
YX1N:=YX1K>REF(YX1K,1);
YX1O:=BACKSET(YX1N,2);
YX1:=YX1O>REF(YX1O,1),NODRAW;
YX2G:=YX1 OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;
YX2H:=REF(BARSLAST(YX2G),1)+1;
YX2I:=BACKSET(YX2G AND COUNT(YX2F,YX2H)>0,HHVBARS(IF(YX2F,HIGH,0),YX2H));
YX2J:=YX2I>REF(YX2I,1);
YX2K:=BACKSET(YX2J,2);
YX2:=YX2K>REF(YX2K,1),NODRAW;
YX2L:=BACKSET(BARSTATUS=2,MIN(BARSLAST(YX2),BARSLAST(YX1))+1);
YX2M:=ISNULL(YX2L)=0&&REF(ISNULL(YX2L)=1,1),NODRAW;
YX8L:=BACKSET(BARSTATUS=2,MAX(BARSLAST(YX1),BARSLAST(YX2))+1);
YX8M:=ISNULL(YX8L)=0&&REF(ISNULL(YX8L)=1,1),NODRAW;
YX2N:=BACKSET(BARSTATUS=2,BARSLAST(YX1)+1);//定位
YX2O:=ISNULL(YX2N)=0&&REF(ISNULL(YX2N)=1,1),NODRAW,COLORWHITE;
YX2P:=BACKSET(YX2O,REF(BARSLAST(YX1),1)+2);
YX2Q:=ISNULL(YX2P)=0&&REF(ISNULL(YX2P)=1,1),NODRAW,COLORRED;
YX2R:=BACKSET(BARSTATUS=2,BARSLAST(YX2)+1);
YX2S:=ISNULL(YX2R)=0&&REF(ISNULL(YX2R)=1,1),NODRAW,COLORGREEN;
YX2T:=BACKSET(YX2S,REF(BARSLAST(YX2),1)+2);
YX2U:=ISNULL(YX2T)=0&&REF(ISNULL(YX2T)=1,1),NODRAW,COLORBLUE;
YX8N:=BACKSET(YX2U,REF(BARSLAST(YX2),1)+3);
YX8O:=ISNULL(YX8N)=0&&REF(ISNULL(YX8N)=1,1),NODRAW,COLORBLUE;
YX1R:=BACKSET(YX2Q,REF(BARSLAST(YX1),1)+3);
YX1S:=ISNULL(YX1R)=0&&REF(ISNULL(YX1R)=1,1),NODRAW,COLORBLUE;
YX1V:=YX8O OR YX1S;
YX1W:=BARSLAST(YX1V)>0;
YX1X:=VALUEWHEN(YX1W=1,1),NODRAW;
YX1Y:=IF(YX1Z=1,1,YX1X);
DRAWLINE1(YX1 AND YX1Y,L,YX2 AND YX1Y,H,0),COLORRED;
DRAWLINE1(YX2 AND YX1Y,H,YX1 AND YX1Y,L,0),COLORGREEN;
DRAWLINE1(YX2Q,L,YX2O,L,1),COLORMAGENTA,LINETHICK1;
DRAWLINE1(YX2U,H,YX2S,H,1),COLORRED,LINETHICK1;