Search and Matching with Financial Accelerator

I am trying to replicate the model of Petrosky-Nadeau (2014), that is a Search and Matching model a la Mortensen and Pissarides which incorporates the financial accelerator by Bernanke, Gertler and Gilrist (1999).
Can anyone provide the code? I have the BGG99 code and understand it but do not know where to start to bring it together with a S&M model :open_mouth: . Thank you.
Petrosky-Nadeau_2014_Credit vacancies and unemployment fluctuations.pdf (563 KB)

You should start with the replication files at