;›; return t if char is alpha›;›  .globl  _isalpha›_isalpha:›  jsr  popax    ; get the char›  cmp  #'A'›  bcc  nope    ; if less than 'A', return 0›  cmp  #'Z+1›  bcc  yup›  cmp  #'a›  bcc  nope›  cmp  #'z+1›  bcs  nope›yup:›  lda  #1›  rts›nope:›  lda  #0›  rts››