asm_isalpha.asm
bitfixer_bitfixer/dg/z88dk/libsrc/ctype/asm_isalpha.asm
; asm_isalpha

PUBLIC asm_isalpha

; determine if the char is in [A-Za-z]

; enter : a = char
; exit  : carry = not alphabetic
; uses  : f

.asm_isalpha

   cp 'A'
   ret c
   cp 'Z'+1
   ccf
   ret nc
   
   cp 'a'
   ret c
   cp 'z'+1
   ccf
   
   ret
