ORG 0000H MOV R0,#45H MOV R1,#5 Mov Tmod,#20H Mov Th1,#0Fdh Mov Scon,#50H Setb Tr1 Again: JNB Ri, Again Mov A, Sbuf MOV @R0, A Inc R0 DJNZ R1, Again
ORG 0000H MOV R0,#45H MOV R1,#5 Mov Tmod,#20H Mov Th1,#0Fdh Mov Scon,#50H Setb Tr1 Again: JNB Ri, Again Mov A, Sbuf MOV @R0, A Inc R0 DJNZ R1, Again
ORG 0000H MOV R0,#45H MOV R1,#5 Mov Tmod,#20H Mov Th1,#0Fdh Mov Scon,#50H Setb Tr1 Again: JNB Ri, Again Mov A, Sbuf MOV @R0, A Inc R0 DJNZ R1, Again
CHALLENGING TASK 1
ORG 0000H
MOV R0,#45H
MOV R1,#5
MOV TMOD,#20H
MOV TH1,#0FDH
MOV SCON,#50H
SETB TR1
MOV A,SBUF
MOV @R0,A
INC R0
DJNZ R1,AGAIN
END
TASK 1
ORG 0000H
MOV TMOD,#20H
MOV TH1,#0FDH
MOV SCON,#50H
SETB TR1
ACALL TRANS
MOV A,#'I'
ACALL TRANS
MOV A,#'T'
ACALL TRANS
ACALL TRANS
SJMP AGAIN
CLR TI
RET
END
TASK 2
ORG 0000H
MOV TH1,#0FAH
MOV SCON,#50H
SETB TR1
MOV A,SBUF
MOV 45H,A
CLR RI
SJMP HERE
END
CHALLEGING TASK 2
ORG 0000H
MOV P1,#0FFH
MOV P2,#00H
MOV TMOD,#20H
MOV TH1,#0FDH
MOV SCON,#50H
SETB TR1
MOV A,#'E'
ACALL TRANS
MOV A,#'L'
ACALL TRANS
MOV A,#'L'
ACALL TRANS
MOV A,#'O'
ACALL TRANS
ACALL TRANS
SJMP AGAIN
MOV A,SBUF
MOV P2,A
CLR RI
SJMP AGAIN
CLR TI
RET
END