вывод отрицательного числа в ассемблер TASM

Задача: Вывести число -1 на экран.
Почему программный код работает неправильно, хотя должен работать. А стоит изменить регистр на CL начинает работать как надо.
.model small
.data
.stack 80h
.code
start:
mov ax,@data
mov ds,ax
mov al,-1 // меняю здесь mov cl,-1
mov dl,'-'
mov ah,2
int 21h // добавляю строчку mov al,cl и начинает работать
neg al
mov dl,al
add dl,'0'
int 21h
mov ax,4c00h
int 21h
end start