3D torus in Pascal, anyone?

[m_dr_m]

I'm looking for a Pascal enthusiast to port this little program: https://64nops.wordpress.com/2021/01/21/rosetta-sugar-japprends-a-coder-avec-mon-cpc/
(There is a pseudo-code and a BASIC version).


The main goal is to profile the result.
Sub-goals: Demonstrating that Pascal can be useful on CPC, showing good coding practices, having fun drinking smoothies...


On a related note, I've found a Z80 source of TP3.01: https://www.memotech.franken.de/CPM80/
Yet I think Free Pascal is more promising: https://www.freepascal.org/
It apparently can be compiled to Z80.