[nearengine]

A good chunk of it is 68k assembly, but you can check out the Pascal+asm source here:

http://www.computerhistory.org/atchm/adobe-photoshop-source-...