Programación Ys

Comparar interpolación lineal punto por punto

====================================== === ====================================

f = 0; función de desviación

xs = 0; coordenada inicial X

ys = 0; coordenada inicial Y

xe = 5; p> ye = 6; coordenada del punto final Y

xo = coordenada x antes de la interpolación xs

yo = coordenada y antes de la interpolación ys

xn = después de la interpolación xs x coordenada

yn = ys coordenada y interpolada

dx = 1; equivalente de pulso X

dy = 1; equivalente de pulso Y

TT; = 1; período de interpolación

====================================== == =====================================

n = ABS( xe- xs) ABS(ye-ys); número de interpolaciones

plot([xs xe*dx], [ys ye*dy], 'r-'); p >

============================================== = ============================

mientras(n gt; 0)

if (F gt;=0)

xn = XO dx;

yn = yo

Trama ([xo xn], [yo yn], ' b -'); espera; cuadrícula abierta

xo = xnyo = yn

F = F-ye

Otro

yn = yo dy;

xn = xo

Plot([xo xn], [yo yn], 'b-'); cuadrícula abierta;

xo = xnyo = yn

F = F xe;

Fin

Pausa (TT);

n = n-1;

Fin