Lisp to draw arc between two lines

[Mohamed_Essam_2000]

It is good to have a LISP that performs the following steps:

At first, there are many lines that are intersecting in one point, I will select some lines and leave 2 lines unselected.

After that, draw a circle (2mm Dia) centered to the intersection point of the lines.

Then trim inside the circle and delete the circle.

After that, draw an ARC (2mm Dia) centered to the intersection point of lines, this arc is drawen between the two unselected lines and it is passing through the selected lines.

finally, delete the selected lines.

This is indicated in the picture attached.

Edited 6 hours ago by Mohamed_Essam_2000