分时整点红绿柱源码

分时整点红绿柱源码：
均价:=SUM(C*V,0)/SUM(V,0);
PARTLINE(CLOSE,CLOSE>均价,RGB(255,0,0),CLOSE<均价,RGB(0,255,0),1,RGB(0,0,255)),LINETHICK2;
停牌:=(DYNAINFO(4)=0);
tj:=BARPOS>1 and BARPOS<31;
HH:=HHV(h,20);
t:=BARSLAST(tj and h=HHV(H,10));
Y10:=max(HHV(ref(HH,t),0),DYNAINFO(4));
LL:=LLV(l,20);
tl:=BARSLAST((tj and l=LLV(LL,10)));
x10:=if(停牌,DYNAINFO(3),min(LLV(ref(L,tl),0),DYNAINFO(4)));
dkd:=c-DYNAINFO(4);
STICKLINE(dkd>0 and BARPOS>1 and BARPOS<31 and not(停牌),c,DYNAINFO(4),0,1),COLOR000aaa;
STICKLINE(dkd<0 and BARPOS>1 and BARPOS<31 and not(停牌),c,DYNAINFO(4),0,1),COLOR008800;
tj1:=BARPOS>31 and BARPOS<61;
t1:=BARSLAST(tj1);
Y11:=HHV(ref(H,t1),0);
tl1:=BARSLAST((tj1));
x11:=llV(ref(L,tl1),0);
as:=hhv(if(BARPOS=31,c,0),0);
dkd1:=c-as;
STICKLINE(dkd1>0 and BARPOS>31 and BARPOS<61,c,as,0,1),COLOR000aaa;
STICKLINE(dkd1<0 and BARPOS>31 and BARPOS<61,c,as,0,1),COLOR008800;
tj2:=BARPOS>61 and BARPOS<91;
t2:=BARSLAST(tj2);
Y12:=HHV(ref(H,t2),0);
tl2:=BARSLAST((tj2));
x12:=llV(ref(L,tl2),0);
as1:=hhv(if(BARPOS=61,c,0),0);
dkd2:=c-as1;
STICKLINE(dkd2>0 and BARPOS>61 and BARPOS<91,c,as1,0,1),COLOR000aaa;
STICKLINE(dkd2<0 and BARPOS>61 and BARPOS<91,c,as1,0,1),COLOR008800;
tj3:=BARPOS>91 and BARPOS<121;
t3:=BARSLAST(tj3);
Y13:=HHV(ref(H,t3),0);
tl3:=BARSLAST((tj3));
x13:=llV(ref(L,tl3),0);
as2:=hhv(if(BARPOS=91,c,0),0);
dkd3:=c-as2;
STICKLINE(dkd3>0 and BARPOS>91 and BARPOS<121,c,as2,0,1),COLOR000aaa;
STICKLINE(dkd3<0 and BARPOS>91 and BARPOS<121,c,as2,0,1),COLOR008800;
tj4:=BARPOS>121 and BARPOS<151;
t4:=BARSLAST(tj4);
Y14:=HHV(ref(H,t4),0);
tl4:=BARSLAST((tj4));
x14:=llV(ref(L,tl4),0);
as3:=hhv(if(BARPOS=121,c,0),0);
dkd4:=c-as3;
STICKLINE(dkd4>0 and BARPOS>121 and BARPOS<151,c,as3,0,1),COLOR000aaa;
STICKLINE(dkd4<0 and BARPOS>121 and BARPOS<151,c,as3,0,1),COLOR008800;
tj5:=BARPOS>151 and BARPOS<181;
t5:=BARSLAST(tj5);
Y15:=HHV(ref(H,t5),0);
tl5:=BARSLAST((tj5));
x15:=llV(ref(L,tl5),0);
as4:=hhv(if(BARPOS=151,c,0),0);
dkd5:=c-as4;
STICKLINE(dkd5>0 and BARPOS>151 and BARPOS<181,c,as4,0,1),COLOR000aaa;
STICKLINE(dkd5<0 and BARPOS>151 and BARPOS<181,c,as4,0,1),COLOR008800;
tj6:=BARPOS>181 and BARPOS<211;
t6:=BARSLAST(tj6);
Y16:=HHV(ref(H,t6),0);
tl6:=BARSLAST((tj6));
x16:=llV(ref(L,tl6),0);
as5:=hhv(if(BARPOS=181,c,0),0);
dkd6:=c-as5;
STICKLINE(dkd6>0 and BARPOS>181 and BARPOS<211,c,as5,0,1),COLOR000aaa;
STICKLINE(dkd6<0 and BARPOS>181 and BARPOS<211,c,as5,0,1),COLOR008800;
tj7:=BARPOS>211 and BARPOS<241;
t7:=BARSLAST(tj7);
Y17:=HHV(ref(H,t7),0);
tl7:=BARSLAST((tj7));
x17:=llV(ref(L,tl7),0);
as6:=hhv(if(BARPOS=211,c,0),0);
dkd7:=c-as6;
STICKLINE(dkd7>0 and BARPOS>211 and BARPOS<241,c,as6,0,1),COLOR000aaa;
STICKLINE(dkd7<0 and BARPOS>211 and BARPOS<241,c,as6,0,1),COLOR008800;