8255_1.asm

基于89s51的一通用平台

;实验六 、 8255 A口、B口、C口输出方波
;文件名称: 8255_1.ASM
;程序清单
NAME  T8255_1
$NOLIST
$INCLUDE (LJD_2008.INC )
$LIST

				TIMER0  EQU  30H
				TIMER1  EQU  31H
     					ORG  0000H
	START:	MOV	DPTR,# D_8255_2		;8255控制口
			MOV	A,# 80H
			MOVX	@DPTR,A			;送命令A,B,C口均为输出
			MOV 	A,# 55H
	LP:		MOV   DPTR, #A_8255_2   	;A口送01010101B
			MOVX 	@DPTR,A
			INC 	DPTR
			MOVX 	@DPTR,A	            ;B口送01010101B
			INC	DPTR
			MOVX 	@DPTR,A			;C口送01010101B
			LCALL	DELAY1S           	;延时1秒
			CPL A
			SJMP LP
;延时子程序
DELAY:      	PUSH  TIMER1;         延时TIMER1*1 ms for 12MHz
	  		PUSH  TIMER0
DELAY1:     	MOV   TIMER0,#250    ;循环一次需要4个机器周期，时间为4*1μS
DELAY2:     	NOP			;		 1个周期
            	NOP			;		 1个周期	
            	DJNZ  TIMER0,DELAY2  ;2个周期
	 		DJNZ  TIMER1,DELAY1
	      	POP   TIMER0
	        	POP   TIMER1
            	RET
DELAY1S:    	NOP;	      	延时 1 sec
	 		PUSH  TIMER1
	  		MOV	TIMER1,#250
	  		LCALL	DELAY
	 		LCALL	DELAY
	  		LCALL DELAY
	 		LCALL DELAY
	  		POP   TIMER1
	  		RET
	  		NOP;---------------------


END