INPUT: ��(2018,1900,2050,1),��(1,1,12,1),��(1,1,31,1);
ָ������:=��*10000-19000000+��*100+��;
M5:MA(C,5),color00ccff;
xs:=BARSLAST(DISPSTATUS=2);xe:=BARPOS;
tjout1:=H;
tjout2:=C;
tjout3:=open;
tjout4:=L;
tjout5:=M5;
for x=xs to xe do BEGIN if ref(date,x)<=ָ������ then begin
���ֵ1:=ref(tjout1,x);
���ֵ2:=ref(tjout2,x);
���ֵ3:=ref(tjout3,x);
���ֵ4:=ref(tjout4,x);
���ֵ5:=ref(tjout5,x);
break; end END
ָ���ո�:���ֵ1,colorff99ff;
ָ������:���ֵ2,colorffffff;
ָ���տ�:���ֵ3,color99ffff;
ָ���յ�:���ֵ4,colorffcc00;
ָ����M5:���ֵ5,color00ccff;
cn:=10;
STICKLINE(c,���ֵ1,���ֵ1,2*cn*x,1),colorff99ff;
STICKLINE(c,���ֵ2,���ֵ2,2*cn*x,1),colorffffff;
STICKLINE(c,���ֵ3,���ֵ3,2*cn*x,1),color99ffff;
STICKLINE(c,���ֵ4,���ֵ4,2*cn*x,1),colorffcc00;
STICKLINE(c,���ֵ5,���ֵ5,200,1),color00ccff;
if(DYNAINFO(7)>0,DYNAINFO(7),C),dotline,colorffffff;