Need Lisp to draw the grid and coordinates of the map sheet

[Oliver_C3D]

Hello Dears

I need a lisp grid and draw the coordinates of the map sheet in the image format below.
Thank you for your attention

[gxz1135261742]

Thank you in advance. I add the (setq ang (+ ang pi)) as shown, but does not work in some quadrants, do you have any suggestions?

 

 

[Sea-Haven]

I know it took me a while to get the text working away from the box. So I have other projects more urgent sorry. Just change a little bit at a time in a copy of the lsip. Look at the "ah:dotext1 2 &  3" defuns. Change 1 at a time to see what happens. Set a UNDO mark before running then can undo back to that running point.