通达信分时图每半个小时高低点连线
 

源码

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)*BARSLA