[Therion] looking for code metapost for area Blocks

Hello, I'm looking for the code metapost for area blocks, I want to custumize it in my survey. I found several exemple for area and lines, but not the specific "area blocks". Can you send it to me or send the url web page where we can find it ? Thanks Gilbert