السلام عليكم
كيف يُمكنني كتابة برنامج يطبع عدد مكون من 3 أرقام أو أكثر بإستخدام Loop .
هذا ما توصلت إليه والهدف هو أن تكون الطباعة في إجراء أي procedure يمكنني إلصاقه في أي برنامج آخر( أقد procedure الطباعة )
f db 10 dup('?')
stackk ends
data segment
tab db ('?')
data ends
code segment
main proc far
assume ss:stackk, ds:data, cs:code
mov ax,data
mov ds,ax
mov ax,1100; 700+400
mov cx,0
mov bl,0
z: sub ax,10
cmp bl,9
jg z
mov bh,1
mov Tab[bh],bl
inc cx
inc bh
cmp ax,9
jg z
mov Tab[bh],bl
call print
mov ah,4ch
int 21h
main endp
print proc near
mov ah,02h
s: mov dl,Tab[cx]
add dl,30h
int 21h
loop s
ret
print endp
code ends
end main
stackk segment
طبعا بإستخدام Tasm