Delphi to MMX/BASM

A simple routine, already prepared for MMX, has to be converted to MMX. It's probably simple enough that it can be done without testing the converted routine in reality. I will simply test it and help finding any bugs. ## Deliverables 1) Conversion of the attached code into equivalent MMX, so that the "black box" functionality remains the same. 2) reasonable coding style, some comments. 3) When it does not work, fixing the bugs in cooperation with me. ## Platform Any CPU with MMX