找回密码
 注册
关于网站域名变更的通知
查看: 236|回复: 1
打印 上一主题 下一主题

单片机的 IO扩展-8255 仿真及源程序

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2018-12-3 13:27 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
单片机的 IO扩展-8255 仿真及源程序
# }7 M3 `. ^3 f  N, O" z" \/ }# `' Q: H% K) g: f% `
; l; Y! m" s- o/ J/ c& g9 G
51单片机的IO扩展-8255仿真图:' _' \( X- ]) L  B

+ `' V/ w( h- L% X7 K7 ?( X9 W+ f2 _

( d8 W7 S+ k: I  K; o9 {/*' `: e& q. A. P/ v4 p/ k$ v# W2 ]4 W
在应用系统中扩展1片8255, 使A口接8个发光二极管,B口接8个开关,& L0 }/ N8 q* F; {% l- G, P
A口工作在方式1输出, B口工作在方式0输入( Z7 P: P4 `1 _# |# w) s2 |* ]
要求: 将开关状态赋值到LED灯上
' l2 j) O+ l7 O# }' B5 ]*/
. u) C0 |; j+ k# `' |#include<reg51.h>; c& y) P/ n7 x
#include<absacc.h>  I, @' C; |( H1 F# e1 ^( N$ W# z
#define uchar unsigned char  H$ i& ?1 k% V/ F6 s5 h
#define uint unsigned int; P- I) R  H4 n$ n( e
//PA、PB、PC端口及命令端口地址定义: Q( B1 B9 t, d$ e2 h: o; X
//#define PA XBYTE[0x0000]
$ f" h2 U6 G" }//#define PB XBYTE[0x0001]2 c# j" s4 W' c$ C( `
//#define PC XBYTE[0x0002]
# ]1 ?' B. Z" \% e//#define COM XBYTE[0x0003]1 s6 ?) _, S+ d

7 n1 T% y& z4 v+ B" o( R; J* X
; H1 [" L( [+ a$ g7 r; }4 d2 ]0 j
uchar xdata * PA = 0x0000;
  q3 v( V- ]) E3 f! V! c1 x" Kuchar xdata * PB = 0x0001;
: J7 g' g3 L& ]2 p" c. fuchar xdata * PC = 0x0002;
) {, E) x# k1 {8 d- v/ p" a; Iuchar xdata * COM = 0x0003;% W7 q$ T% n+ n3 q8 ~
  ], t. H/ Q- i5 h: a

7 n3 F) q, Y3 H/ N- _void delay(uint ms)
7 `6 E8 O) B# H9 G9 q( Y  [- j{
- g5 o* Q2 H% U' a! u7 f7 h+ V3 ~* S0 I        uchar i;8 F& i- W$ @) h/ b" a' ?0 l
        while (ms--) ) q$ J- D7 I1 t
                for (i = 0; i<120; i++);. k( A9 G0 R3 Q. e: E, ~( O9 B# h
}6 M0 h# l+ ?# t) _* Z$ m* I& V
//主程序
2 [- F) \$ q/ }0 [( n! Uvoid main(): X; I! A$ U  Q3 F3 ^
{3 c3 W+ E1 }4 U8 Z& ^8 v
        *COM = 0xA2;                //8255工作方式选择: A口工作在方式1输出, B口工作在方式0输入 1010 00103 [9 u) |! [1 s; }6 q) D9 b7 K$ a
        while (1)
3 |0 h3 h6 E& h4 o; g$ l* r# y' A        {
, `* \' L3 y9 O9 f                *PA = *PB;7 ]# X: t1 y+ ?. m
                delay(10);: ]5 D+ b* b8 F
# \! d* C1 e( Y' t; P& e

5 b: Q8 M+ ]' U' t& U) l…………限于本文篇幅 余下代码请从论坛下载附件…………
* Y( i, ?4 C" }1 Q7 I& i
游客,如果您要查看本帖隐藏内容请回复
8 }% U$ H3 A/ V0 E2 G* [/ d
3 T% o: \; U* v) k1 Z& _( y

该用户从未签到

2#
发表于 2018-12-3 14:14 | 只看该作者
学习一下  支持
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-6-19 07:00 , Processed in 0.078125 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表