甘氏线画法

gsx:=BARSLAST(DISPSTATUS=1)+1;gsxh:=hhvall(hhv(h,gsx));gsxl:=llvall(llv(l,gsx));
 DRAWLINE(filter(gsxl=l,20),gsxl,gsxl ,gsxl*1.00078125,1),Color7F00FF;
 DRAWLINE(filter(gsxl=l,20),gsxl,gsxl ,gsxl*1.0015625,1),Color7F00FF;
 DRAWLINE(filter(gsxl=l,20),gsxl,gsxl ,gsxl*1.003125,1),Color7F00FF;
 DRAWLINE(filter(gsxl=l,20),gsxl,gsxl ,gsxl*1.00625,1),Color7F00FF;
 DRAWLINE(filter(gsxl=l,20),gsxl,gsxl ,gsxl*1.0125,1),Color7F00FF;
 DRAWLINE(filter(gsxl=l,20),gsxl,gsxl ,gsxl*1.025,1),Color7F00FF;
 DRAWLINE(filter(gsxl=l,20),gsxl,gsxl,gsxl*1.05,1),Color7F00FF,linethick2;
 DRAWLINE(filter(h=gsxh,20),gsxh,gsxh,g