如何在程序8086汇编程序中使用本地标签?

时间:2017-05-06 17:20:14

标签: assembly dos x86-16 dosbox

我写了简单的

.MODEL  small

.STACK 100h
.DATA 
    liczba dw 0h
    licznik dw 0
    potega dw 1
    liczbaString dw ?

    buff db 26
.CODE
  Program:
    mov ax, @DATA
    mov ds, ax

    call PobierzString
    call PetlaIteracjiZnaku

    ;zwraca do ax pobraną liczbę
    PetlaIteracjiZnaku PROC
        mov si, liczbaString
        call ZnajdzDlugoscString
        mov si, liczbaString
        add si, 2
        mov bl, 1
        petla:
            xor ax, ax
            mov al, [si]
            cmp al, 24h; sprawdza czy nie jest koniec wprowadzanej liczby '$'
            je return
            sub al, 30h ; odejmuję 30 żeby zamienić znak na liczbę
            mul bx
            add [liczba], ax
            mov ax, bx
            mov bx, 0Ah
            mul bx
            mov bx, ax
            inc si
        jmp petla
        return:
            ret
    PetlaIteracjiZnaku ENDP

    ; ! si - caly string 
    ; - ax - dlugosc stringu
    ZnajdzDlugoscString PROC
        mov al, 0h
        petla:
            mov dl, [si]
            cmp dl, 24h
            je return
            inc al
        jmp petla
        return: 
            ret
    ZnajdzDlugoscString ENDP

    PobierzString PROC
        xor ax,ax
        mov ah, 0Ah 
        mov dx, offset buff
        int 21h     
        mov liczbaString, dx
        ret
    PobierzString ENDP
    Koniec:
    mov     ah, 4ch
    int     21h

    end Program

但我无法用tasm编译它,因为我收到了错误:

  

符号已定义elswere:PETLA
     符号已经定义为elswere:RETURN

如何使用本地标签执行程序?我尝试在Use procedure scope to avoid local labels?中添加.PETLA%%PETLA,但仍然无效。
我不知道如何实现这个......

1 个答案:

答案 0 :(得分:2)

要在TASM程序中使用本地标签,您需要:

  • 使用@@前缀作为标签名称;和
  • LOCALS @@放在文件的开头。

您可以使用不同的前缀而不是@@,但@@是常用的。

请参阅http://www.ousob.com/ng/masm/ng54fa6.php