plot "resultsPo1.txt" every ::1::i u (x1=$1):(y1=$2) w l ls 1 lc 10, "resultsPo2.txt" every ::1::i u (x2=$1):(y2=$2) w l ls 1 lc 9,\
"resultsPo1.txt" every ::i::i u (0):(0):1:2 w vector nohead lc 6,"resultsPo2.txt" every ::i::i u (x1):(y1):(x2-x1):(y2-y1) w vector nohead,\
"resultsPo1.txt" every ::i::i u 1:2 w lp pt 7 lc 8 ps 1.25, "resultsPo2.txt" every ::i::i u 1:2 w lp pt 7 lc 15 ps 1.25

#print x1,y1,x2,y2
pause 0.01

i=i+1
if (i<3000) reread