各位兄台，哪里能找的“交通灯模拟控制实验”的资料？？

ml457 2002-07-05 10:42:18

用8254，8255，8259等芯片实现。最好有源程序。不胜感激！

...全文

69 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

faye_jane 2002-07-05

打赏
举报

我来帮你,用一片8255芯片来实现：PB3与发光二极管L1相连，PB2-L2,PB1-L3,
PB0-L5,PA7-L6,PA6-L7,PA5-L9,PA4-L10,PA3-L11,PA2-L13,PA1-L14,PA0-L15.
源程序如下：

ORG 32F0H
STARTP3:MOV AL,88H
MOV DX,PCTL
OUT DX,AL
MOV DX,PA
MOV AL,0B6H
OUT DX,AL
INC DX
MOV AL,0DH
OUT DX,AL
CALL DELAY1
P30: MOV AL,75H
MOV DX,PA
OUT DX,AL
INC DX
MOV AL0DH
OUT DX,AL
CALL DELAY1
CALL DELAY1
MOV CX,08H
P31: MOV DX,PA
MOV AL,0F3H
INC DX
MOV AL,0CH
OUT DX,AL
CALL DELAY2
MOV DX,PA
MOV AL,0F7H
OUT DX,AL
INC DX
MOV AL,0DH
OUT DX,AL
OUT DX,AL
CALL DELAY2
LOOP P31
MOV DX,PA
MOV AL,0AEH
OUT DX,AL
INC DX
MOV AL,0BH
OUT DX,AL
CALL DELAY1
CALL DELAY1
MOV CX,08H
P32: MOV DX,PA
MOV AL,9EH
OUT DX,AL
INC DX
MOV AL,07H
OUT DX,AL
CALL DELAY2
MOV DX,PA
MOV AL,0BEH
OUT DX,AL
INC DX
MV AL,0FH
OUT DX,AL
CALL DELAY2
JMP P30
DELAY1: PUSH AX
PUSH CX
MOV CX,0030H
DELY2: CALL DELAY2
LOOP DELY2
POP CX
POP AX
RET
DELAY2: PUSH CX
MOV CX,8000H
LOOP $
POP CX
RET