日周月空心柱K线同显

//n=2,2,100//   

c1:="001.c1#week";    

o1:="001.o1#week";    

h1:="001.h1#week";    

l1:="001.l1#week";    

c2:="001.c1#MONTH";    

o2:="001.o1#MONTH";    

h2:="001.h1#MONTH";    

l2:="001.l1#MONTH";   

t1:=DAY=15 OR DAY=16 OR DAY=17 OR DAY=18 OR DAY=19   

OR DAY=20 OR DAY=21 OR DAY=22 OR DAY=23 OR DAY=24;   

t2:=FILTER(t1,10);   

d:=DAY;   

YQ:=if(D

YD:=if(D>REFX(D,1),DAY,-1);   

yj:=(c2>o2 or c2=o2 and c2>ref(c2,day));   

STICKLINE(t2 and yj,h2,c2,10,1)color3F7CFF;   

STICKLINE(t2 and yj,l2,o2,10,1)color3F7CFF;   

STICKLINE(t2 and not(yj),h2,o2,10,1)ColorF38593;   

STICKLINE(t2 and not(yj),l2,c2,10,1)ColorF38593;   

partline(D>REF(D,1)and yj ,c2)color3F7CFF;   

partline(D>REF(D,1)and not(yj),C2)ColorF38593;   

partline(D>REF(D,1)and yj ,O2)color3F7CFF;   

partline(D>REF(D,1)and not(yj) ,O2)ColorF38593;   

stickline(YQ>0 and yj,c2,o2,0.5,0)color3F7CFF;   

stickline(YD>0 and yj,c2,o2,0.5,0)color3F7CFF;   

stickline(YQ>0 and not(yj),c2,o2,0.5,0)ColorF38593;   

stickline(YD>0 and not(yj),c2,o2,0.5,0)ColorF38593;   

STICKLINE(t2 and yj,c2+(h2-c2)/n,o2-(o2-l2)/n,9.9,0)COLORBLACK;   

STICKLINE(t2 and not(yj),c2-(c2-l2)/n,o2+(h2-o2)/n,9.9,0)COLORBLACK;   

  

  

Z:=WEEKDAY;   

Zd1:=if(Z>REF(Z,1),WEEKDAY,1);   

ZQa:=if(Zd1

T:=BARSLAST(ZQa)+1;   

Zql:=LLV(DATE,T)LINETHICK0;   

Zmh:=HHV(DATE,T)LINETHICK0;   

ts1:=DATEDIFF(ZQl,Zmh)+1;   

ts2:=if(ts1<7,ts1,1);   

ts3:=BARSLAST(ts2

z1:=min(ts1,ts3);   

ZQa:=if(Z1

ZDa:=if(Z1>REFX(Z1,1),z1,-1);   

zj:=(c1>o1 or c1=o1 and c1>ref(c1,z1));   

partline(z1>REF(Z1,1)and zj,C1)Color9973FD,linethick2;   

partline(Z1>REF(Z1,1)and zj,O1)Color9973FD,linethick2;   

partline(Z1>REF(Z1,1)and not(zj),C1)Color9DFC48,linethick2;   

partline(Z1>REF(Z1,1)and not(zj),O1)Color9DFC48,linethick2;   

stickline(ZQa>0and zj,c1,o1,0.5,0)Color9973FD,linethick2;   

stickline(ZDa>0and zj,c1,o1,0.5,0)Color9973FD,linethick2;   

stickline(ZQa>0and not(zj),c1,o1,0.5,0)Color9DFC48,linethick2;   

stickline(ZDa>0and not(zj),c1,o1,0.5,0)Color9DFC48,linethick2;   

  

rj:=(c>o or c=o and c>ref(c,1));   

stickline(rj,h,l,0.1,1),colorred;   

stickline(rj,c,o,8,1),colorred;   

stickline(not(rj),h,l,0.1,0),colorcyan;   

stickline(not(rj),c,o,8,0),colorcyan;   

ma5:ma(c,5);   

ma10:ma(c,10);   

ma30:ma(c,30);   

ma60:ma(c,60);