This Generalised Penrose Pattern Generator is written in Haskell and uses projection from the n-dimensional cubic lattice onto a plane equally inclined to all the axes of the lattice.
The code is available here.
The gppg executable can be used at the command line (the version here is Linux 64-bit).