? //顯示N天內(nèi)大量紅藍(lán)K+大量高低顏色填充

K2:=SUMBARS(DAYBARPOS=1,15);//10日
VV2:="DAY$1$V";//日
HH2:="DAY$1$H";//日
LL2:="DAY$1$L";//日
OO2:="DAY$1$O";//日
CC2:="DAY$1$C";//日

//K4:=SUMBARS(WEEKDAY<REF(WEEKDAY,1),15);//5周
//VV4:="WEEK$1$V";
//HH4:="WEEK$1$H";
//LL4:="WEEK$1$L";
//OO4:="WEEK$1$O";
//CC4:="WEEK$1$C";
//STICKLINE1(VALUEWHEN(VV2=HHV(VV2,K2),CC2>=OO2),VALUEWHEN(VV2=HHV(VV2,K2),HH2),VALUEWHEN(VV2=HHV(VV2,K2),LL2),4,0),RGB(170,170,170);//紅色填充
//STICKLINE1(VALUEWHEN(VV2=HHV(VV2,K2),CC2<OO2),VALUEWHEN(VV2=HHV(VV2,K2),HH2),VALUEWHEN(VV2=HHV(VV2,K2),LL2) ,4,0),RGB(170,170,170);//綠色填充
//STICKLINE1(ISLASTBAR&&VALUEWHEN(VV2=HHV(VV2,K2),CC2>=OO2),VALUEWHEN(VV2=HHV(VV2,K2),HH2),VALUEWHEN(VV2=HHV(VV2,K2),LL2),5,0),RGB(170,170,170);//紅色填充后段
//STICKLINE1(ISLASTBAR&&VALUEWHEN(VV2=HHV(VV2,K2),CC2<OO2),VALUEWHEN(VV2=HHV(VV2,K2),HH2),VALUEWHEN(VV2=HHV(VV2,K2),LL2),5,0),RGB(170,170,170);//綠色 填充后段

QQ:=VALUEWHEN(VV2=HHV(VV2,K2),HH2)<>REF(VALUEWHEN(VV2=HHV(VV2,K2),HH2),1);
Q:=BACKSET(REFX(QQ=1,1)||ISLASTBAR,HHVBARS(V,BARSLAST(QQ=1)+1)+1);

XX:CROSS(Q=1&&QQ,0.5)&&ISUP||CROSS(Q=1,0.5)&&ISUP,NODRAW;
YY:CROSS(Q=1&&QQ,0.5)&&ISDOWN||CROSS(Q=1,0.5)&&ISDOWN,NODRAW;
AX:BACKSET(ISLASTBAR,SUMBARS(XX||YY,1)),NODRAW;
STICKLINE1(AX,VALUEWHEN(XX&&AX ,H),VALUEWHEN(XX&&AX ,L),5,0),COLORRED;//前段填充顯示
STICKLINE1(AX,VALUEWHEN(YY&&AX,H),VALUEWHEN(YY&&AX ,L),5,0),COLORBLUE;//前段填充顯示
STICKLINE1(ISLASTBAR&&BARSLAST(XX)>BARSLAST(YY),VALUEWHEN(YY&&AX,H),VALUEWHEN(YY&&AX ,L),15,0),COLORBLUE;//后段填充顯示
STICKLINE1(ISLASTBAR&&BARSLAST(XX)<BARSLAST(YY),VALUEWHEN(XX&&AX,H),VALUEWHEN(XX&&AX ,L),15,0),COLORRED;//后段填充顯示
DRAWKLINE1(H,O,L,C);//K線顯示
老師麻煩把指標(biāo)中的填充帶的K線用紅藍(lán)K持續(xù)顯示：出現(xiàn)紅色帶時(shí)，只要收盤價(jià)不破紅色帶下邊緣，就持續(xù)顯示紅K(上漲用空心紅K,下跌用實(shí)心紅K），如收盤價(jià)破紅色帶下邊緣就用藍(lán)K持續(xù)顯示（下跌用實(shí)心藍(lán)，上漲用空心藍(lán)），反之當(dāng)出現(xiàn)藍(lán)色帶時(shí)只要收盤價(jià)不破藍(lán)色帶上邊緣，就持續(xù)顯示藍(lán)K(上漲用空心藍(lán)K,下跌用實(shí)心藍(lán)K），如收盤價(jià)破紅藍(lán)色帶上邊緣就用紅K持續(xù)顯示（下跌用實(shí)心紅，上漲用空心紅）謝謝老師！

?

?來源:程序化99