program PE32_CUI 'test application';

#set bits 32;

#include 'platform_def.zir';
#include 'console.zir';

function absf(single n) : single
{
   return (n >= 0) ? n : -n;
}

edx = absf(-200.0f);
print('Number: ', [single]edx ,'\r\n');

wait_key();
ExitProcess(0);

single X;
fld @X; 
fabs;

X &= 0x7FFFFFFF;