ORG 00H
MAIN:
;QUET HANG 1
MOV P0,#11111110B
JNB P0.4,PHIM1
JNB P0.5,PHIM2
JNB P0.6,PHIM3
JNB P0.7,PHIM4

;QUET HANG 2
MOV P0,#11111101B
JNB P0.4,PHIM5
JNB P0.5,PHIM6
JNB P0.6,PHIM7
JNB P0.7,PHIM8

;QUET HANG 3
MOV P0,#11111011B
JNB P0.4,PHIM9
JNB P0.5,PHIM10
JNB P0.6,PHIM11
JNB P0.7,PHIM12

;QUET HANG 4
MOV P0,#11110111B
JNB P0.4,PHIM13
JNB P0.5,PHIM14
JNB P0.6,PHIM13
JNB P0.7,PHIM14

LJMP MAIN

PHIM1:;nhấn nút 1
MOV DPTR,#MASO1
CALL CTHT
LJMP MAIN



PHIM2:;nhấn nút 2
MOV DPTR,#MASO2
CALL CTHT
LJMP MAIN


PHIM3:;nhấn phím 3
MOV DPTR,#MASO3
CALL CTHT
LJMP MAIN


PHIM4:;nhấn phím 4
MOV DPTR,#MASO4
CALL CTHT
LJMP MAIN


PHIM5:;nhấn phím 5
MOV DPTR,#MASO5
CALL CTHT
LJMP MAIN



PHIM6:  ;nhấn phím 6
MOV DPTR,#MASO6
CALL CTHT
LJMP MAIN


PHIM7: ;nhấn phím 7
MOV DPTR,#MASO7
CALL CTHT
LJMP MAIN


PHIM8: ;nhấn phím 8
MOV  DPTR,#MASO8
CALL CTHT
LJMP MAIN


PHIM9: ;nhấn phím 9
MOV DPTR,#MASO9
CALL CTHT
LJMP MAIN


PHIM10: ;nhấn phím 10
MOV DPTR,#MASO10
CALL CTHT
LJMP MAIN


PHIM11: ;nhấn phím 11
MOV DPTR,#MASO11
CALL CTHT
LJMP MAIN


PHIM12: ;nhấn phím 12
MOV DPTR,#MASO12
CALL CTHT
LJMP MAIN

PHIM13: ;nhấn phím 13
MOV DPTR,#MASO13
CALL CTHT
LJMP MAIN


PHIM14: ;nhấn phím 14
MOV DPTR,#MASO14
CALL CTHT
LJMP MAIN




CTHT:;CHUONG TRINH HIEN THI
MOV R7,#16
CHAYCHU:
MOV R5,#20
QUET:
MOV R0,#00
MOV R1,#01111111B
LAPS:MOV P3,R1
MOV A,R1
RL A
MOV R1,A
MOV P3,R1
MOV A,R0
MOVC A,@A+DPTR
MOV P2,A
CALL DELAY
INC R0
CJNE R0,#8,LAPS
DJNZ R7,QUET
INC DPTR
DJNZ R6,CHAYCHU
RET


;BLOG DIEN TU - TIN HOC
MASO1:;B
DB    0H,0H,66H,66H,66H,99H,0FFH,0FFH
DB       
MASO2:;L
DB    0H,0H,3FH,3FH,3FH,0FFH,0FFH,0FFH
DB       
MASO3:;O
DB    0FFH,81H,0H,3CH,3CH,0H,81H,0FFH 
DB       
MASO4:;G
DB    0C3H,81H,3CH,3CH,2CH,0CH,0CH,0EFH
DB       
MASO5:;D
DB    0FFH,0E7H,0H,24H,3CH,0H,81H,0FFH 
DB       
MASO6:;I
DB    0FFH,0FFH,0H,0H,0H,0FFH,0FFH,0FFH
DB       
MASO7:;E
DB    0FFH,0H,0H,24H,24H,24H,0FFH,0FFH 
DB       
MASO8:;N
DB    0H,0H,0F1H,0E3H,0C7H,8FH,0H,0H
DB       
MASO9:;T
DB    0FFH,0FCH,0FCH,0H,0H,0FCH,0FCH,0FFH
DB       
MASO10:;U
DB    0FFH,0H,0H,3FH,3FH,0H,0H,0FFH
DB     
MASO11:;-
DB    0FFH,0E7H,0E7H,0E7H,0E7H,0E7H,0E7H,0FFH
DB       
MASO12:;T
DB    0FFH,0FCH,0FCH,0H,0H,0FCH,0FCH,0FFH
DB       
MASO13:;I
DB    0FFH,0FFH,0H,0H,0H,0FFH,0FFH,0FFH
DB       
MASO14:;N
DB    0H,0H,0F1H,0E3H,0C7H,8FH,0H,0H
DB     
MASO15:;H
DB    0FFH,0H,0H,0E7H,0E7H,0H,0H,0FFH 
DB       
MASO16:;O
DB    0FFH,81H,0H,3CH,3CH,0H,81H,0FFH 
 


DELAY:
MOV R4,#50
LAPF:
NOP
NOP
NOP
DJNZ R4,LAPF
RET

END