Is_2_Byte

;===============================================================
Is_2_Byte:
;===============================================================
          sub $EF \ ret z        ;ef
          add a,34h \ ret z      ;bb
          add a,3Dh \ ret z      ;7E
Is_Var_Name:
;Before calling this, add 82h to a
          sub 2Ch \ ret z        ;AA
          add a,47h \ ret z      ;63
          inc a \ ret z
          inc a \ ret z
          inc a \ ret z
          add a,2 \ ret z
          inc a \ ret z
          inc a \ ret