Составить программу вычисления двойной суммы (Assembler)

[fuzo]

Условие: http://s42.radikal.ru/i097/1102/d8/00938bf5f370.jpg

Запись этого условия на паскале я понимаю:
for I:=1 to N do
for J:=1 to M do Sum:=Sum+I-2*J;

а вот как организовать его в ассемблере :/

[VadikV]

mov cx, n
loop1:
push cx
mov ax, cx
mov cx, m
loop2:
тут твой код расчета. i находится в ax, j находится в cx
loop loop2;
pop cx
loop loop1

[fuzo]

Вот что у меня получилось, но не могу понять в чём ошибка т.к. этаже программа решённая в дельфи с выше написанным условием выдаёт ответ -60. А здесь ответ FFE3 = -29

	.model small
	.stack 100h
	.data
 N	dw 3
 M	dw 5
 S	dw ?
	.code
begin:	mov ax,@data
	mov ds,ax
	mov cx,N
loop1:	push cx
	mov ax, cx
	mov cx, m
loop2:   	sub ax,cx
	sub ax,cx
	add [S],ax
	loop loop2
	pop cx
	loop loop1
exit:    	mov S,ax
	mov ah,4ch
	int 21h
end	begin

[VadikV]

а кто будет s перед начало расчета обнулять?