通达信分时主图分享

此分时主图是我结合网上收集到的相关指标改编的，选了我需要的部分，去除我不需要的部分。

D1:=HOUR=9 AND MINUTE=40;
D2:=HOUR=9 AND MINUTE=50;
D3:=HOUR=10 AND MINUTE=0;
D1D:=IF(D1=1,C,DRAWNULL);
D2D:=IF(D2=1,C,DRAWNULL);
D3D:=IF(D3=1,C,DRAWNULL);
DRAWLINE(D1=1,D1D,D2=1,D2D,0),COLORRED,LINETHICK2;
DRAWLINE(D2=1,D2D,D3=1,D3D,0),COLORRED,LINETHICK2;
DD1:D1D,NODRAW;
DD2:D2D,NODRAW;
DD3:D3D,NODRAW;
DRAWNUMBER(D1=1,C*0.998,C),COLORGREEN;
DRAWNUMBER(D2=1,C*0.998,C),COLORCYAN;
DRAWNUMBER(D3=1,C*0.998,C),COLORLIRED;
DRAWTEXT_FIX( 1,0.00,1-0.18,0,' 9:40：'),COLORGREEN;
DRAWNUMBER_FIX(1,0.09,1-0.18,0,D1D),COLORGREEN;
DRAWTEXT_FIX( 1,0.00,1-0.12,0,' 9:50：'),COLORCYAN;
DRAWNUMBER_FIX(1,0.09,1-0.12,0,D2D),COLORCYAN;
DRAWTEXT_FIX( 1,0.00,1-0.03,0,'10:00：'),COLORLIRED;
DRAWNUMBER_FIX(1,0.09,1-0.03,0,D3D),COLORLIRED;

ZS:=DYNAINFO(3);
KP:=DYNAINFO(4);
ZX:=DYNAINFO(7);
ZG:=DYNAINFO(5);
ZD:=DYNAINFO(6);
OP:=500-(KP/ZS-1)*4000;
CL:=500-(ZX/ZS-1)*4000;
HI:=500-(ZG/ZS-1)*4000;
LO:=500-(ZD/ZS-1)*4000;
N1:=IF(TIME>=130000 OR TIME<91500,360,860);
DRAWRECTREL(N1+4,OP,N1+8,HI,RGB(255,0,255)),COLORFF00FF;{今日最高}{玫红}
DRAWRECTREL(N1+4,CL,N1+8,LO,RGB(0,128,0)),COLOR008000;{今日最低}{暗绿}
Q1:=IF(ZX>=KP,255,0);
Q2:=IF(ZX>=KP,0,255);
Q3:=IF(ZX>=KP,0,255);
DRAWRECTREL(N1-10,OP,N1+22,CL,RGB(Q1,Q2,Q3));{今日实体}{255,0,0大红}{0,255,255青}
ZO:="FSKY.ZO#DAY";
ZC:="FSKY.ZC#DAY";
ZH:="FSKY.ZH#DAY";
ZL:="FSKY.ZL#DAY";
ZKP:=500-(ZO/ZS-1)*4000;
ZCP:=500-(ZC/ZS-1)*4000;
ZZG:=500-(ZH/ZS-1)*4000;
ZZD:=500-(ZL/ZS-1)*4000;
DRAWRECTREL(N1-36,ZKP,N1-32,ZZG,RGB(255,0,255)),COLORFF00FF;{昨日最高}{玫红}
DRAWRECTREL(N1-36,ZCP,N1-32,ZZD,RGB(0,128,0)),COLOR008000;{昨日最低}{暗绿}
Q4:=IF(ZC>=ZO,255,0);
Q5:=IF(ZC>=ZO,0,255);
Q6:=IF(ZC>=ZO,0,255);
DRAWRECTREL(N1-49,ZKP,N1-17,ZCP,RGB(Q4,Q5,Q6)),COLOR00FFFF;{昨日实体}{大红或青}
JO:="FSKY.JO#DAY";
JC:="FSKY.JC#DAY";
JH:="FSKY.JH#DAY";
JL:="FSKY.JL#DAY";
ZZKP:=500-(JO/ZS-1)*4000;
ZZCP:=500-(JC/ZS-1)*4000;
ZZZG:=500-(JH/ZS-1)*4000;
ZZZD:=500-(JL/ZS-1)*4000;
DRAWRECTREL(N1-76,ZZKP,N1-72,ZZZG,RGB(255,0,255)),COLORFF00FF;{前日最高}{玫红}
DRAWRECTREL(N1-76,ZZCP,N1-72,ZZZD,RGB(0,128,0)),COLOR008000;{前日最低}{暗绿}