I made a modest attempt to create a working nb for the original Desargues' Theorem (before included) and I include this new one, however, since I am essentially a beginner in programming with Mathematica, I am not able to make the dashed red/blue lines invisible in the regions where they are not needed (accordingly to the original nb). I'd appreciate to receive some hints on this part and if one can write a shorter and better version of this new code.
Attachments:
