Ввод натуральных чисел в Tasm

[Mixim]

Начал смотреть свою тетрадь по "Языку Ассемблер" и нашёл там функцию для ввода натуральных чисел. Написал её, пытаюсь компилировать, но выдаётся целая куча ошибок(файл не хочет компилироваться), хотя всё сделал точно так, как давал лектор. Подскажите, где ошибка, код следующий:

.Model large, pascal;
.Data
        Extrn   n:word;
        .code
        Public conv_St;
conv_St proc far

        Push bp bx si;
        MOV bp,bx;
        XOR bx,bx;
        MOV si,10;

Range:  CMP Byte ptr ds:[bp],'0'
        JB NoneDigit
        CMP Byte ptr ds:[bp],'9'
        JBE NoneDigit

NoneDigit:
        LEA dx,Err
        CALL output
        MOV di,bp
        STC
        JC End ConV

Digit:
        Push dx
        MUL si
        POP dx
        MOV bl,ds:[bp]
        AND bx,ofh
        ADD ax,bx
        JC End ConV
        Inc bp
        LOOP Range
        CLC

End ConV:
        POP si bx bp
ret

Как я понимаю, эта функция должна считать с клавиатуры число и выдать его в переменную n, но где здесь вообще что-то передаётся переменной n я вообще не понимаю.