You may wish to work on a copy of your document, but this is working for me:
In find:
(*)^13

In replace:
[\1]^p

Try one at a time. If it's working, use Replace all.

^13 is used for a paragraph break in the Find.
\1 means replace what was found.

Best,
Ulodesk