主题：编个循环语句，从2000开始画直线向上向下辐射直线，间距为12个点

编个循环语句，从2000开始画直线向上向下辐射直线，间距为12个点

INPUT:LineN(10,1,100,1),price(2000,1,4000,1);//price是画线起始价格，可以修改，LineN是画线数量，可以调整。
VARIABLE:mark:=0;

if mark<LineN and BARPOS>=DATACOUNT-LineN then
begin
DRAWSL(1,price+(mark)*12，0, 0,2);
mark:=mark+1;
end

需要注意的一点是：画线的效果会受到图表本身坐标的一些影响。如果价格和画线价格差距很大，可能要下拉或者上拉才能看到。