Facebook
From gg, 1 Month ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 147
  1. clc;
  2. clear;
  3. hold on;
  4. axis([-100,100,-100,100]);
  5. plot(-100:100,0,'r.');
  6. plot(0,-100:100,'b.');
  7. x1=input('X1= ');
  8. y1=input('Y1= ');
  9. x2=input('X2= ');
  10. y2=input('Y2= ');
  11. dx=x2-x1;
  12. dy=y2-y1;
  13. if (dx==0 && dy~=0)
  14.    x=x1;
  15.    y=y1:sign(dy):y2;
  16.     plot(x,y,'g.');
  17. elseif (dx~=0 && dy==0)
  18.    y=y1;
  19.    x=x1:sign(dx):x2;
  20.     plot(x,y,'g.');
  21. elseif abs(dy/dx)==1
  22.    x=x1:sign(dx):x2;
  23.    y=y1:sign(dy):y2;
  24.     plot(x,y,'g.');
  25. else
  26.     msgbox 'Not Standard Line';
  27. end    
  28.