М-да, исходник сложноват, ну ладно разберусь как-нибудь.
А вот что получилось с InlineCode: code_8935.txt, вроде работает.

Вот, есть над чем подумать - сравнил 2 пакета Delphi и FASM по скорости работы созданных на них программ.
Схема для Delphi: code_8936.txt
Схема для FASM: code_8937.txt
Оказалось, что программа сделанная на FASM, справилась с задачей примерно в 3 раза быстрее, чем прогамма на Delphi. Хоть и говорят, что API вызовы в любом пакете занимают одинаковое время. В чём же, все-таки, такая разница?