DB COUNTER

THVAL EQU 0FDH

ORG 0000H
         AJMP 0100H
ORG 0023H
         JBC TI,TMT
         RETI
TMT:
         DJNZ COUNTER,NEXT
         CLR TR1
         AJMP R
NEXT:    INC DPTR
         MOVX A,@DPTR
         MOV SBUF,A
R:       RET

ORG 0100H
         MOV COUNTER,#20H
         MOV SP,#50H
         MOV DPTR,#STR
         
         MOV SCON,#74H
         MOV PCON,#00H
         MOV IE,#98H
         MOV IP,#18H
         MOV TCON,#00H
         MOV TMOD,#20H
         MOV TH1,#THVAL
         MOV TL1,#THVAL
         
         SETB SCON.6
         MOVX A,@DPTR
         MOV SBUF,A
        
STR:     DB 'WELCOME TO 8052.COM AND MY PAGE.',0

         END