Нумерация, сохранение и построение точек пересечения линий и многоугольника

Question

Как я могу пронумеровать, сохранить в массиве и нанести / указать координаты пересечения линий и многоугольника? Есть идеи, как указать, что линия имеет много точек пересечения?

Код:

clc;
clear all;
close all;
% draw angle lines
xCenter = 17;
yCenter = 8;
poly1 = polyshape([ 15 15 20 15 10],[ 10 0 10 15 0]);
plot(poly1)
hold on;
L=15; %Line length, can be changed
angle = 25; %Choose angle, can be more
  
for langle =  0:angle:360 
    langle
    x2=xCenter+ L * cosd(langle);
    y2=yCenter+ L * sind(langle);    
    line([xCenter,x2], [yCenter,y2], 'Color', 'r', 'LineWidth', 1);
    lineseg = [xCenter,x2; yCenter,y2];
    [in,out] = intersect(poly1,lineseg);    
end