Problem with an external subroutine

BP08

Would anyone be able to help me?
The subroutine loop does not work and I don't understand where the problem comes from.
Thanks in advance.

O1234
G90G0X30Y30
G04P1000
M98P500 L2
G04P500
G90G0X0Y0
M30
%

o600
G4P500
G91
G91G0X50Y10
M99
%

rooks

Have no experience in this area, but interested to learn more. Maybe someone can share their personal experience?