You get the "letter not found" error because you are still using the TEXTIN macro w/c will overwrite the content of your BUF1. You have to remove the TEXTIN in your code.

To hardcode the character to compare you have to remove the interrupt 21 function 01 and hardcode the character in AL.