Need help fixing jump destination too far $[$: by $\text{'}$n$\text{'}$ bytes$]$ error in $.$asm. Edit code as needed

code provided:

INCLUDE C:$\backslash$Irvine$\backslash$Irvine$32.$inc

INCLUDE C:$\backslash$Irvine$\backslash$Macros$.$inc

$.$data

prompt BYTE "Enter string: $"$

buffer BYTE $128$ DUp$(0)$

$.$code

main PROC

; Prompt users

mov edx, OFFSET prompt

call WriteString

; Get string from user

mov edx, offset buffer

mov ecx, $($LENGTHOF buffer $-1)$

call ReadString

; Save the number of characters read in

mov ecx, eax

call categorize

exit

main ENDP

; Loops through the given string, identifying the type of each character

; Receives: edx $-$ address of buffer

; ecx $-$ number of characters to look at $($not length$)$

categorize PROC USES EAX ECX EDX

TOP:

mov al$,[$edx$]$

cmp al$,\text{'}\text{'}$ ; Non$-$destructive SUB $-$ sets flags but AL is unchanged

jb CONTROL ; Jump if AL is below $\text{'}\text{'}$

; AL $>=32$

cmp al$,\text{'}0\text{'}$

jb PUNCTUATION ; Jump if AL $<\text{'}0\text{'}$

cmp al$,\text{'}9\text{'}$

jbe DIGIT ; Jump if AL is between $\text{'}0\text{'}$ and $\text{'}9\text{'}$

cmp al$,\text{'}$A$\text{'}$

jb PUNCTUATION ; Jump if AL $<\text{'}$A$\text{'}$

cmp al$,\text{'}$Z$\text{'}$

jbe LETTER ; Jump if AL is between $\text{'}$A$\text{'}$ and $\text{'}$Z$\text{'}$

cmp al$,\text{'}$a$\text{'}$

jb PUNCTUATION ; Jump if AL $<\text{'}$a$\text{'}$

cmp al$,\text{'}$z$\text{'}$

jbe LETTER ; Jump if AL is between $\text{'}$a$\text{'}$ and $\text{'}$z$\text{'}$

cmp al$,\text{'}$~$\text{'}$

jbe PUNCTUATION ; Jump if AL is between $\text{'}\{\text{'}$ and $\text{'}$~$\text{'}$

; AL $>\text{'}$~$\text{'}$

jmp CONTROL

DIGIT:

call WriteDec

mwrite $<"$ is a digit character $">$

call WriteChar

call CRLF

jmp BOTTOM

PUNCTUATION:

call WriteDec

mwrite $<"$ is a punctuation character $">$

call WriteChar

call CRLF

jmp BOTTOM

LETTER:

call WriteDec

mwrite $<"$ is a letter character $">$

call WriteChar

call CRLF

jmp BOTTOM

CONTROL:

call WriteDec

mwrite $<"$ is a control character"$>$

ret

BOTTOM:

inc edx

loop TOP

ret

categorize ENDP

END main