DIS_12      PUSH    R4                    	;顯示8個數據到顯示器
            PUSH    R5
            MOV.B   #8,R5
DIS_121     MOV.B   1FFH(R5),R4			;取出8個要顯示的數據之一
            CALL    #DIS_1			;調一位數據顯示子程序
            DEC.B   R5            
            JNZ     DIS_121			;8位顯示完了嗎
            POP     R5
            POP     R4
            RET
DIS_1       PUSH    R5					
            PUSH    R4
            MOV     #8,R5        		;顯示一個數字
            MOV.B   DIS_TAB(R4),R4		;查得顯示碼
LOOP:      RLC.B   R4				;移出將要送到74164的數據位
            JC      LOOP1            	  	;C=1 JMP  P2.0=1
            BIC.B   #1,&P2OUT			;送出數據"0"
            JMP     LOOP2
LOOP1     BIS.B   #1,&P2OUT         		;送出數據"1"
LOOP2     CALL    #CLK164			;給出時鐘上升沿
            DEC     R5	
            JNZ     LOOP			;8位數據沒有移完，則繼續
            POP     R4
            POP     R5
            RET
CLK164     BIS.B #2,&P2OUT     			;時鐘子程序
            BIC.B #2,&P2OUT        		;
            RET
;以下為顯示段碼表
TABLED:  DB  3FH , 06H ,  5BH   ,4FH        	;0   1   2   3
	      DB  66H , 6DH ,  7DH ,  07H       ;4   5   6   7
	      DB  7FH , 6FH ,  77H,   7CH       ;8   9   A   B
	      DB  39H , 5EH,   79H  , 71H       ;C   D   E   F