assume cs:code
data segment
  db "Beginner's All-purpose Symbolic Instruction Code.",0
data ends
code segment
begin:mov ax,data
      mov ds,ax
      mov si,0
      call letterc
      mov ax,4c00h
      int 21h
letterc:mov ch,0
        mov cl,[si]
        jcxz s
        cmp cl,61h
   ...