>> orbit3b([0 50],[-.97 -.466 .243 -.433 .97 -.466 -.243 -.433 0 .932 0 .866],[1 1 1],50000,250, 'fig8_orig.gif')