高速直线绘制程序

程序：罗健军

---

　　我特别的感谢罗健军大师，罗健军是一位水平高超的程序设计师。按我的推断，他应该有着丰富、高超的编程经验，远非在下能及。我再次向他表示感谢。

　　下面的算法中，var16表示有符号16位数据类型；HLine(x,y,n)是画水平线函数；VLine(x,y,n)是画垂直线函数；PutPixel(x,y)是画点函数。请看程序。

void Line(var16 x1,var16 y1,var16 x2,var16 y2)
{
 var16 p,n,x,y,tn;

 if(y1==y2)
 {
  if(x1>x2)
  {
   x=x2;x2=x1;x1=x;
  }

  HLine(x1,y1,x2-x1+1);
  return;
 }

 if(x1==x2)
 {
  if(y1>y2)
  {
   y=y2;y2=y1;y1=y;
  }

  VLine(x1,y1,y2-y1+1);
  return;
 }

 if(abs(y2-y1)<=abs(x2-x1))
 {
  if((y2<y1&&x2<x1)||(y1<=y2&&x1>x2))
  {
   x=x2;y=y2;x2=x1;y2=y1;x1=x;y1=y;
  }

  if(y2>=y1&&x2>=x1)
  {
   x=x2-x1;y=y2-y1;
   p=2*y;n=2*x-2*y;tn=x;

   while(x1<=x2)
   {
    if(tn>=0)tn-=p;
     else {tn+=n;y1++;}

    PutPixel(x1++,y1);
   }
  }
  else
  {
   x=x2-x1;y=y2-y1;
   p=-2*y;n=2*x+2*y;tn=x;
   while(x1<=x2)
   {
    if(tn>=0)tn-=p;
     else {tn+=n;y1--;}

    PutPixel(x1++,y1);
   }
  }
 }
 else
 {
  x=x1;x1=y2;y2=x;y=y1;y1=x2;x2=y;

  if((y2<y1&&x2<x1)||(y1<=y2&&x1>x2))
  {
   x=x2;y=y2;x2=x1;y2=y1;x1=x;y1=y;
  }

  if(y2>=y1&&x2>=x1)
  {
   x=x2-x1;y=y2-y1;p=2*y;n=2*x-2*y;tn=x;

   while(x1<=x2)
   {
    if(tn>=0)tn-=p;
     else {tn+=n;y1++;}

    PutPixel(y1,x1++);
   }
  }
  else
  {
   x=x2-x1;y=y2-y1;p=-2*y;n=2*x+2*y;tn=x;

   while(x1<=x2)
   {
    if(tn>=0)tn-=p;
     else {tn+=n;y1--;}

    PutPixel(y1,x1++);
   }
  }
 }
}