I do not know if you used !pre! and !/pre! under that assumption here is what the first 2 lines would look like if I wrote them,

            call   put_crlf           ;transmit newline
            mov    dptr,#TestPgmText

1) uppercase is ugly
2) a nice tabulation makes it neat
2) TXT is a meningless label
4) have fun,

Erik