伪本征函数——Keil C51头文件INTRINS.H的应用演示(hotpower)


/*--------------------------------------------------------------------------
               伪本征函数——Keil C51头文件INTRINS.H的应用演示
                                       作者：HotPower@126.com   2004.5.16   第一版
--------------------------------------------------------------------------*/
#include "reg51.h"
#include "intrins.h"

unsigned char readdata(void)
{
unsigned char val;
   for (val = 8; val > 0; val--)
   {
       _clrb_(TXD);
_nop_();
       _movcb_(RXD);
       _rrca_();
       _setb_(TXD);
_nop_();
   }
   _movra_(val);
   return val;
}

void writedata(unsigned char val)
{
   _movar_(val);
   for (val = 8; val > 0; val--)
   {
       _clrb_(TXD);
       _rrca_();
       _movbc_(RXD);
       _setb_(TXD);
_nop_();
   }
}


main()
{
unsigned char i;
/*----------------------------------
   _movb0_();演示
-----------------------------------*/
   i = 0x01;
   _movb0_(TXD,i);

   i = 0x02;
   TXD = i & 0x01;

   i = 0x03;
   if (i & 0x01) TXD = 1;
   else TXD = 0;
/*---------------------------------*/

/*----------------------------------
   _movb7_();演示
-----------------------------------*/
   i = 0x04;
   _movb7_(RXD,i);

   i = 0x05;
   TXD = i & 0x80;

   i = 0x06;
   if (i & 0x80) TXD = 1;
   else TXD = 0;

   i = 0x07;
   if (i >= 0x80) TXD = 1;
   else TXD = 0;
/*---------------------------------*/

/*----------------------------------
   _rlcar_();_movra_()组合演示
-----------------------------------*/
   i = 0x08;
   _setc_();
   _movra_(i);

   i <<= 1;
   i |= 0x01;

   i <<= 1;
   i ++;

   i += i;

   i *= 2;
   i ++;
/*---------------------------------*/

/*----------------------------------
   _rrcar_();_movra_()组合演示
-----------------------------------*/
   i = 0x09;
   _setc_();
   _rrcar_(i);
   _movra_(i);

   i >>= 1;
   i |= 0x80;
/*---------------------------------*/

   i = readdata();
   writedata(i);
   while(1);
}  

• 评论内容...
• 匿名发表
• [添加到收藏夹]
• 发表评论：(匿名发表无需登录，已登录用户可直接发表。) 登录状态：未登录