Подсчет элементов массива. Assembler NASM

[IL_89]

Суть задачи:
Написать программу подсчета положительных элементов массива типа WORD. реализовать с помощью NASM.

То, что получилось, но не работает:

 
SECTION .data
MAS: dw 1,1,2,-5,5,-3

SECTION .text
org 0x100

START:
mov si,0
mov bl,0
mov dh,0
FOR_LOOP:
mov al,[MAS+si]
cmp al,bl
ja CHETCHIK

METKA:
inc si 
cmp si,6
jne FOR_LOOP
jmp FINISH 

CHETCHIK:
inc dh
jmp METKA

FINISH:
mov dl,ah
add DL,'0'
mov dh, 0x02
int 0x21
mov aH,0x4C
int 0x21
int 0x21

[IL_89]

ап для повышения

[vadimych]

Не знаю, понимает ли NASM такие имена меток. org 100h в программе типа exe не нужно. Код на MASM.

.model small
.data
MAS dw 1,2,-4,-7,0,3

.code
start:

mov ax,@data
mov ds,ax

lea si,MAS
mov cx,6 
xor bx,bx

@@:
lodsw
test ax,ax
jns @1
inc bx
@1:
loop @b

mov al,bl
or al,30h
int 29h

xor ax,ax
int 16h

mov ax,4c00h
int 21h

end start