;; | ---------------------------------------------------------------------------
;; | ST_IsAlphabet
;; | ---------------------------------------------------------------------------
;; | Function : Checks if a given character is an alphabet (a-z or A-Z)
;; | Arguments : 'Char'        - Character to check
;; | Return   : T or nil
;; | Updated  : February 15, 2004
;; | e-mail   : rakesh.rao@4d-technologies.com 
;; | Web      : www.4d-technologies.com
;; | ---------------------------------------------------------------------------


(defun ST_IsAlphabet ( Char / asc )

(setq asc (ascii Char))
(if (or
		(MI_InBetween asc 97 122)	; a-z
		(MI_InBetween asc 65 90)	; A-Z
	)
	T
	nil
)
)