;*********************************************************
;                8253方式0計數器實驗 
; 計數初值為N,當輸入N+1個脈沖后,OUT0變為高電平
;*********************************************************

CODE SEGMENT
	ASSUME  CS:CODE
START:   MOV AL,00010000B   ;10H    ;通道0,工作方式0,二進制計數
	 MOV DX,0C403H
	 OUT DX,AL
	 MOV DX,0C400H      
	 MOV AL,0BH	  ;送計數初值為0BH
	 OUT DX,AL
L0:      IN AL,DX         ;讀計數初值
	 CALL DISPLAY     ;調顯示子程序
	 PUSH DX  
	 MOV AH,06H 
	 MOV DL,0FFH
	 INT 21H
	 POP DX
	 JZ L0


;****************************************************
;		子程序部分
;****************************************************

DISPLAY   PROC		;顯示子程序
	 PUSH DX
	 AND AL,0FH     ;屏蔽高四位,取低四位
	 MOV DL,AL
	 CMP DL,9         
	 JLE  L1        ;小于9,ASCII碼加30H
	 ADD DL,7       ;否則,為'A'-'F',ASCII碼加37H
L1:     ADD DL,30H
	 MOV AH,02H       ;顯示
	 INT 21H
	 MOV DL,0DH       ;加回車符
	 INT 21H
	 MOV DL,0AH       ;加換行符
	 INT 21H
	 POP DX
	 RET             
DISPLAY ENDP

	 MOV AH,4CH       
	 INT 21H
CODE ENDS
END START