//显示当日开盘价决定红绿色填充图阳线红阴线绿色填充
//A:="HOUR$1$VOL";//1-4小时
//N1:=BARSLAST(A<>REF(A,1))+1;//1-4小时
//N1:=BARSLAST(QUARTER<>REF(QUARTER,1))+1;
//N1:=BARSLAST(WEEKDAY<REF(WEEKDAY,1))+1;
N1:=BARSLAST(DATE<>REF(DATE,1))+1;
HD:=REF(HHV(H,N1),N1);
LD:=REF(LLV(L,N1),N1);
HD1:=REF(REF(HHV(H,N1),N1),N1);
LD1:=REF(REF(LLV(L,N1),N1),N1);
X1:=HD>=HD1 AND LD>=LD1;
X2:=HD<HD1 AND LD<LD1;
X3:=NOT(X1||X2);
XX:BACKSET(REF( REFX(N1=1,1)&&C>VALUEWHEN(N1=1,O),N1),N1),NODRAW;
YY:BACKSET(REF( REFX(N1=1,1)&&C<VALUEWHEN(N1=1,O),N1),N1),NODRAW;
STICKLINE1(X3&&YY,VALUEWHEN(X3,HD),VALUEWHEN(X3,LD),4,0),RGB(134,255,165);//绿色
STICKLINE1(X2&&YY,VALUEWHEN(X2,HD),VALUEWHEN(X2,LD),4,0),RGB(134,255,165);//绿色
STICKLINE1(X1&&YY,VALUEWHEN(X1,HD),VALUEWHEN(X1,LD),4,0),RGB(134,255,165);//红色
STICKLINE1(X3&&XX,VALUEWHEN(X3,HD),VALUEWHEN(X3,LD),4,0),RGB(255,202,202);//红色
STICKLINE1(X2&&XX,VALUEWHEN(X2,HD),VALUEWHEN(X2,LD),4,0),RGB(255,202,202);//红色
STICKLINE1(X1&&XX,VALUEWHEN(X1,HD),VALUEWHEN(X1,LD),4,0),RGB(255,202,202);//红色
STICKLINE1(ISLASTBAR&&X3&&YY,HD,LD,30,0),RGB(134,255,165);//颜色填充延伸
STICKLINE1(ISLASTBAR&&X2&&YY,HD,LD,30,0),RGB(134,255,165);//颜色填充延伸
STICKLINE1(ISLASTBAR&&X1&&YY,HD,LD,30,0),RGB(134,255,165);//颜色填充延伸
STICKLINE1(ISLASTBAR&&X3&&XX,HD,LD,30,0),RGB(255,202,202);//颜色填充延伸
STICKLINE1(ISLASTBAR&&X2&&XX,HD,LD,30,0),RGB(255,202,202);//颜色填充延伸
STICKLINE1(ISLASTBAR&&X1&&XX,HD,LD,30,0),RGB(255,202,202);//颜色填充延伸
DRAWKLINE1(H,O,L,C);//K线显示
老师麻烦把指标中的填充高低处用横线显示,红显示红色线,绿显示绿色线谢谢老师!
来源:程序化99