8255A.rar

/*
  在C51中通过总线地址来写总线上的器件
如:
#define CTRL8255A XBYTE[0x7f00]
要写的话就用:
CTRL8255A=0x0d; 即可。
而如今ATmega大多没有总线,写这些器件就得自已动手了。
ATmega8L 模拟总线 控制 8255A
环境 ATmega8L GCC PROTEUS6.7
作者 zhb2000
           执行效果 ATmega8L通过8255A的A口控制2个数码管循环显示0~ff.
*/
#include <avr/io.h>
#include <avr/delay.h>

#define uchar unsigned char
#define uint  unsigned int

#define sbi(sfr,bit) (sfr|=(1<<bit))
#define cbi(sfr,bit) (sfr&=~(1<<bit))
#define CS_8255A     4

void init(void);
void ctrl8255a(uchar ctrl);   //写8255a控制字
void wa_8255a(uchar value);   //写8255a的A口
int main(void)
{
uchar i=0;
init();
while(1)
{
wa_8255a(i);
_delay_ms(200);
++i;
}
return 0;
}

void init(void)
{
PORTB=0xff;
PORTC=0xff;
PORTD=0xff;
DDRB=0xff;
DDRC=0xff;
DDRD=0xff;

ctrl8255a(0x80);    //ABC口方式0输出
}

void ctrl8255a(uchar ctrl)
{
PORTD=0x0d;          //选择写控制字
PORTB=ctrl;
sbi(PORTD,CS_8255A);   //不选8255A
}

void wa_8255a(uchar value)
{ //写值到8255A的A口
PORTD=0x01;   //写8255A的A口
PORTB=value;
sbi(PORTD,CS_8255A);   //不选8255A
}

全部代码及PROTEUS6.7仿真例子:



程式执行如下图: