SJ1:=TIME=93100;SJ2:=TIME=100000;SJ3:=TIME=103000;SJ4:=TIME=110000;SJ5:=TIME=112900;XSJ1:=TIME=130000;XSJ2:=TIME=133000;XSJ3:=TIME=140000;XSJ4:=TIME=143000;XSJ5:=TIME=150000;T1:=BARSLAST(SJ1);T2:=BARSLAST(SJ2);T3:=BARSLAST(SJ3);T4:=BARSLAST(SJ4);T5:=BARSLAST(SJ5);XT1:=BARSLAST(XSJ1);XT2:=BARSLAST(XSJ2);XT3:=BARSLAST(XSJ3);XT4:=BARSLAST(XSJ4);XT5:=BARSLAST(XSJ5);H1:=IF(TIME=100000,REF(C,T2),DRAWNULL)=C;H2:=IF(TIME=103000,REF(C,T3),DRAWNULL)=C;H3:=IF(TIME=110000,REF(C,T4),DRAWNULL)=C;H4:=IF(TIME=112900,REF(C,T5),DRAWNULL)=C;XH1:=IF(TIME=133000,REF(C,XT2),DRAWNULL)=C;XH2:=IF(TIME=140000,REF(C,XT3),DRAWNULL)=C;XH3:=IF(TIME=143000,REF(C,XT4),DRAWNULL)=C;XH4:=IF(TIME=150000,REF(C,XT5),DRAWNULL)=C;CS2:=CONST(REF(C,T2));CS3:=CONST(REF(C,T3));CS4:=CONST(REF(C,T4));CS5:=CONST(REF(C,T5));XCS2:=CONST(REF(C,XT2));XCS3:=CONST(REF(C,XT3));XCS4:=CONST(REF(C,XT4));XCS5:=CONST(REF(C,XT5));GL2:=FILTERX(H1,T2);GL3:=FILTERX(H2,T3);GL4:=FILTERX(H3,T4);GL5:=FILTERX(H4,T5);XGL2:=FILTERX(XH1,XT2);XGL3:=FILTERX(XH2,XT3);XGL4:=FILTERX(XH3,XT4);XGL5:=FILTERX(XH4,XT5);L1:=IF(TIME=93100,REF(C,T1),DRAWNULL)=C;XL1:=IF(TIME=130000,REF(C,XT1),DRAWNULL)=C;CS1:=CONST(REF(C,T1));XCS1:=CONST(REF(C,XT1));GL1:=FILTERX(L1,T1);XGL1:=FILTERX(XL1,XT1);DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL));DA1:=CONST(IF(REF(GL3,BARSLAST(GL3)),REF(BARSLAST(GL2),BARSLAST(GL3)),DRAWNULL));DA2:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL3),BARSLAST(GL4)),DRAWNULL));DA3:=CONST(IF(REF(GL5,BARSLAST(GL5)),REF(BARSLAST(GL4),BARSLAST(GL5)),DRAWNULL));XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL));XDA1:=CONST(IF(REF(XGL3,BARSLAST(XGL3)),REF(BARSLAST(XGL2),BARSLAST(XGL3)),DRAWNULL));XDA2:=CONST(IF(REF(XGL4,BARSLAST(XGL4)),REF(BARSLAST(XGL3),BARSLAST(XGL4)),DRAWNULL));XDA3:=CONST(IF(REF(XGL5,BARSLAST(XGL5)),REF(BARSLAST(XGL4),BARSLAST(XGL5)),DRAWNULL));XA:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL);XA1:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS3-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL);XA2:=IF(BARSLAST(GL3)>=0 AND BARSLAST(GL3)<=DA2,((CS4-CS3)/DA2)*BARSLAST(GL3)+CS3,DRAWNULL);XA3:=IF(BARSLAST(GL4)>=0 AND BARSLAST(GL4)<=DA3,((CS5-CS4)/DA3)*BARSLAST(GL4)+CS4,DRAWNULL);A:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL);A1:=IF(BARSLAST(XGL2)>=0 AND BARSLAST(XGL2)<=XDA1,((XCS3-XCS2)/XDA1)*BARSLAST(XGL2)+XCS2,DRAWNULL);A2:=IF(BARSLAST(XGL3)>=0 AND BARSLAST(XGL3)<=XDA2,((XCS4-XCS3)/XDA2)*BARSLAST(XGL3)+XCS3,DRAWNULL);A3:=IF(BARSLAST(XGL4)>=0 AND BARSLAST(XGL4)<=XDA3,((XCS5-XCS4)/XDA3)*BARSLAST(XGL4)+XCS4,DRAWNULL);IF(A>=REF(A,1),A,DRAWNULL)COLORLIMAGENTA;IF(A<REF(A,1),A,DRAWNULL)COLORGREEN;IF(A1>=REF(A1,1),A1,DRAWNULL)COLORLIMAGENTA;IF(A1<REF(A1,1),A1,DRAWNULL)COLORGREEN;IF(A2>=REF(A2,1),A2,DRAWNULL)COLORLIMAGENTA;IF(A2<REF(A2,1),A2,DRAWNULL)COLORGREEN;IF(A3>=REF(A3,1),A3,DRAWNULL)COLORLIMAGENTA;IF(A3<REF(A3,1),A3,DRAWNULL)COLORGREEN;IF(XA>=REF(XA,1),XA,DRAWNULL)COLORLIMAGENTA;IF(XA<REF(XA,1),XA,DRAWNULL)COLORGREEN;IF(XA1>=REF(XA1,1),XA1,DRAWNULL)COLORLIMAGENTA;IF(XA1<REF(XA1,1),XA1,DRAWNULL)COLORGREEN;IF(XA2>=REF(XA2,1),XA2,DRAWNULL)COLORLIMAGENTA;IF(XA2<REF(XA2,1),XA2,DRAWNULL)COLORGREEN;IF(XA3>=REF(XA3,1),XA3,DRAWNULL)COLORLIMAGENTA;IF(XA3<REF(XA3,1),XA3,DRAWNULL)COLORGREEN;均:SUM(CLOSE*VOL,FROMOPEN)/SUM(VOL,FROMOPEN)COLORYELLOW;
 |
