NAME T11                       ;8279鍵盤實驗二
CSEG AT 0000H
	     LJMP START
CSEG AT 4100H
START:  MOV  DPTR,#0CFE9H      ;8279命令字
	     MOV A,#0D1H       ;清顯示
	     MOVX @DPTR,A
LOOP1:  MOVX A,@DPTR
	     ANL A,#0FH
	     JZ LOOP1          ;有鍵按下？沒有則循環等待
	     MOV A,#0A0H       ;顯示\消隱命令
	     MOVX @DPTR,A
	     MOV A,#40H        ;讀FIFO命令
	     MOVX @DPTR,A
	     MOV DPTR,#0CFE8H  ;讀鍵值
	     MOVX A,@DPTR
         MOV  R1,A         ;保存鍵值
	     MOV DPTR,#0CFE9H  ;寫顯示RAM命令
	     MOV A,#81H        ;選中LED2
	     MOVX @DPTR,A      
         MOV A,R1
         ANL  A,#0FH       ;取后半字節
	     MOV DPTR,#TAB
	     MOVC A,@A+DPTR    ;取段顯碼
	     MOV DPTR,#0CFE8H  ;寫顯示RAM
	     MOVX @DPTR,A
	     MOV DPTR,#0CFE9H  ;寫顯示RAM命令
         MOV A,#80H            ;選中LED1
	     MOVX @DPTR,A
         MOV A,R1
         ANL  A,#0F0H     
         SWAP A            ;取后半字節
	     MOV DPTR,#TAB
	     MOVC A,@A+DPTR    ;取段顯碼
	     MOV DPTR,#0CFE8H  ;寫顯示RAM
	     MOVX @DPTR,A
	     MOV DPTR,#0CFE9H
	     SJMP LOOP1
TAB:     DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H  ;段顯碼表
         db 7fh,6fh,77h,7ch,39h,5eh,79h,71h
END