function plot(a,b)
      local pixel = CreateMOPixel("Line Particle");
      pixel.Pos = Vector(a,b);
      MovableMan:AddParticle(pixel);
   end
   
   function line(x0, x1, y0, y1)
      if math.abs(y1-y0) > math.abs(x1-x0) then
         steep = true;
      end
      if steep == true then
         x0,y0,x1,y1 = y0,x0,y1,x1;
      end
      if x0 > x1 then
         x0,x1,y0,y1 = x1,x0,y1,y0;
      end
      deltax = x1 - x0;
      deltay = math.abs(y1 - y0);
      xerror = deltax / 2
      y = y0;
      if y0 < y1 then
         ystep = 1;
      else
         ystep = -1;
      end
      for x=x0,x1 do
         if steep == true then
            plot(y,x);
         else
            plot(x,y);
         end
         xerror = xerror - deltay;
         if xerror < 0 then
            y = y + ystep;
            xerror = xerror + deltax;
         end
      end
   end