... setcolor (5) ; line (50 , 350 ,620, 350 ); {Ve truc toa do} line (50 ,5, 50, 350 ); line (50 ,5, 47, 15) ; {Ve mui ten truc y} line (50 ,5, 53, 15) ; line(620, 350 ,6 15, 347); {Ve mui ten truc t} line(620, 350 ,6 15, 353 ); ... line(km +50 , 350 -round(ky*max),km +50 , 350 ); line (50 , 350 -round(1. 05* ky/k2),620, 350 -round(1. 05* ky/k2)); {duong sai so} line (50 , 350 -round(0. 95* ky/k2),620, 350 -round(0. 95* ky/k2)); setlinestyle(SolidLn,0,1); line (50 , 350 -round(ky/k2),620, 350 -round(ky/k2)); ... moveto (50 , 350 ); setlinestyle(Dottedln,0,1); line(round(tod/t)+49, 350 -round(ky*y[round(tod/t)]),round(tod/t)+49, 350 ); line (50 , 350 -round(ky*max),km +50 , 350 -round(ky*max)); line(km +50 , 350 -round(ky*max),km +50 , 350 );...