clc;
clear;
hold on;
axis([-100,100,-100,100]);
plot(-100:100,0,'r.');
plot(0,-100:100,'b.');
x1=input('X1= ');
y1=input('Y1= ');
x2=input('X2= ');
y2=input('Y2= ');
dx=x2-x1;
dy=y2-y1;
if (dx==0 && dy~=0)
   x=x1;
   y=y1:sign(dy):y2;
    plot(x,y,'g.');
elseif (dx~=0 && dy==0)
   y=y1;
   x=x1:sign(dx):x2;
    plot(x,y,'g.');
elseif abs(dy/dx)==1
   x=x1:sign(dx):x2;
   y=y1:sign(dy):y2;
    plot(x,y,'g.');
else
    msgbox 'Not Standard Line';
end