Tổng từ 1 đến n

include \masm32\include\masm32rt.inc

.data
    n dd 0 ;khai bao bien n co kieu du lieu DWORD va khoi tao gia tri ban dau la 0
    sum dd 0

tong1denn PROTO :DWORD
.code

start:
    call nhap
    invoke tong1denn, n
    exit

nhap proc
    mov n, sval(input("Nhap n = "))
    ret
nhap endp

tong1denn proc x:DWORD
    LOCAL i :DWORD
    mov i, 1
    mov eax, i
    laplai:
    cmp eax, x
    jle congtong
    jg thoat
    congtong:
        mov eax, i
        add sum, eax
        inc i
        mov eax, i
        jmp laplai
    thoat:
        print chr$("Tong tu 1 den ")
        print str$(n)
        print chr$(" la ")
        print str$(sum)
    ret
tong1denn endp

end start