Как вам такой код на Ассемблере? :D

mov eax, [(t inid esi).ZoomLevel]
cmp [(t inid esi).fZoomPointer], 0
jz @@m10

cmp eax, 2
jc @@m10

xchg ecx, eax
mov esi, ofs ptSize_dst
lea ebx, [@@rc]
mov eax, [(t POINT esi).x]
shr ecx, 1

shr eax, 1
test [(t POINT edi).x], 1
jz @@odd_0
sub eax, ecx
@@odd_0:

mov [(t RECT ebx).left], eax
lea eax, [eax+ecx*2]
mov [(t RECT ebx).right], eax