Определить первую и последнюю цифры числа

@stack  segment para stack
        db      1024 dup(?)
@stack  ends
 
@data   segment
        N               dw      45678
        First           db      ?
        Last            db      ?
        MsgFirst        db      'The First digit: '
        FirstChar       db      ?
                        db      0Dh, 0Ah
                        db      'The Last digit: '
        LastChar        db      ?
        CrLf            db      0Dh, 0Ah, '$'
@data   ends
 
@code   segment
        assume  cs:@code, ds:@data, ss:@stack
main    proc
        ;инициализация сегментного регистра данных
        mov     ax,     @data
        mov     ds,     ax
 
        mov     ax,     [N]
        call    GetFirstLastDigits
        mov     [Last], al
        mov     [First],ah
        ;Преобразование результата для вывода на экран
        add     ax,     '00'
        mov     [LastChar],     al
        mov     [FirstChar],    ah
        ;вывод результата
        mov     ah,     09h
        lea     dx,     [MsgFirst]
        int     21h
        ;завершение программы
        mov     ax,     4C00h
        int 21h
main    endp
 
;Функция возвращает первую и последнюю цифры числа
;на входе:
;  ax - число
;на выходе:
;  al - последняя (младшая) цифра числа
;  ah - первая (старшая) цифра числа
GetFirstLastDigits      proc
        push    bx
        push    cx
        push    dx
 
        ;записываем в стек цифры заданного числа
        mov     bx,     10      ;делитель
        mov     cx,     0       ;количество цифр в числе
        @@While:
                mov     dx,     0
                div     bx
                push    dx
                inc     cx
        cmp     ax,     0
        jnz     @@While
 
        ;извлекаем цифры из стека
        mov     ah,     dl      ;запоминаем первую цифру
        @@For:
                pop     dx
        loop    @@For
        mov     al,     dl
 
        pop     dx
        pop     cx
        pop     bx
        ret
GetFirstLastDigits      endp
 
@code   ends
 
        end     main