Recursively grep with emacs lisp only

I was looking for a way to recursively grep inside a directory and a find-grep replacement since its not availabe in windows and I found this.

https://www.reddit.com/r/emacs/comments/bxtwfg/grep_and_find_but_in_pure_emacs_lisp/

(project-find-regexp)