实验五并行IO口8255扩展实验程序1

  • 格式:doc
  • 大小:30.50 KB
  • 文档页数:2

实验五并行I/O口8255扩展实验程序1
ORG 0630H;
HA4S:MOV SP,#60H;设置栈指针
MOV DPTR,#0FF2BH
MOV A,#80H;设置PC、PB为输出口,工作方式0
MOVX @DPTR,A
MOV DPTR,#0FF29H
MOV A,#02H
MOVX @DPTR,A
INC DPTR
MOV A,#49H
MOVX @DPTR,A ;电亮四个红灯
MOV R2,#25H
LCALL DELAY ;延时
HA4S3:MOV DPTR,#0FF29H
MOV A,#08H
MOVX @DPTR,A
INC DPTR
MOV A,#61H
MOVX @DPTR,A;东西绿色灯亮,南北红色灯亮
MOV R2,#55H
LCALL DELAY;延时
MOV R7,#05H;黄灯闪烁5次
HA4S1: MOV DPTR,#0FF29H
MOV A,#04H
MOVX @DPTR,A
INC DPTR
MOV A,#51H;东西黄色灯亮,南北红色灯亮
MOVX @DPTR,A
MOV R2,#20H
LCALL DELAY
MOV DPTR,#0FF29H
MOV A,#00H
MOVX @DPTR,A
INC DPTR
MOV A,#41H;南北红色灯亮
MOVX @DPTR,A
MOV R2,#20H
LCALL DELAY
DJNZ R7, HA4S1;闪烁次数未到继续
MOV DPTR,#0FF29H
MOV A,#03H
MOVX @DPTR,A
INC DPTR
MOV A,#0CH
MOVX @DPTR,A ;东西红色灯亮,南北绿色灯亮
MOV R2,#55H
LCALL DELAY
MOV R7,#05H ;黄灯闪烁5次
HA4S2: MOV DPTR,#0FF29H
MOV A,#02H
MOVX @DPTR,A
INC DPTR
MOV A,#8AH
MOVX @DPTR,A ;东西绿色灯亮,南北黄灯亮
MOV R2,#20H
LCALL DELAY
MOV DPTR,#0FF29H
MOV A,#02H
MOVX @DPTR,A
INC DPTR
MOV A,#08H ;东西绿色灯亮
MOVX @DPTR,A
MOV R2,#20H
LCALL DELAY
DJNZ R7, HA4S2 ;闪烁次数未到继续
LJMP HA4S3
DELAY:PUSH 02H
DELAY1:PUSH 02H
DELAY2:PUSH 02H
DELAY3:DJNZ R2,DELAY3
POP 02H
DJNZ R2,DELAY2
POP 02H
DJNZ R2,DELAY1
POP 02H
DJNZ R2,DELAY
RET
END。