Вычисление формулы на ассемблере

[prosport91]

Начал осваивать язык ассемблер. Но как то не очень удачно это проходит. Немогу разобраться как работать с арифметическими действиями, куда что помещается. Нужна помощь в написание кода на Ассеблере для данного выражения, хотелось бы с комментариями. Буду очень благодарен. Вот пример.

[Ivan_32]

a dd 0
d dd 0
c dd 0
result dd 0

mov eax,[a]
shl eax,2
push eax
mov eax,[d]
mov ecx,[c]
xor edx,edx
mul ecx
push eax
mov ecx,3
div ecx
push eax
mov eax,[esp+4]
shl eax,2
sub eax,[a]
push eax
mov eax,[a]
add eax,[a]
add eax,[a]
pop ecx
xchg eax,ecx
xor edx,edx
div ecx
push eax
mov eax,[esp+12]
sub eax,[esp+8]
add eax,[esp]
mov [result],eax

Простите - давно не спал, так что скорее всего где то ошибся с оффсетами в стеке. Думаю суть из этого вполне понятна.
Каждая часть разделенная + или - вычисляется отдельно, а dc - сохраняется как вторично используемый результат(для dc^2), результат сохраняется на время в стеке и в конце от самого первого вычисления(a^2) просто вычитаются/прибавлються остальные.

PS: Код не претендует на премию по оптимизированности, так как некоторые вещи можно было сделать лучше, скажем умножение через LEA.