C51库实现流水灯

在keil uvision3中编写#include<intrins.h>,然后右击打开intrins.h,内容如下：

/*--------------------------------------------------------------------------
INTRINS.H

Intrinsic functions for C51.
Copyright (c) 1988-2004 Keil Elektronik GmbH and Keil Software, Inc.
All rights reserved.
--------------------------------------------------------------------------*/

#ifndef __INTRINS_H__
#define __INTRINS_H__

extern void          _nop_     (void);
extern bit           _testbit_ (bit);
extern unsigned char _cror_    (unsigned char, unsigned char);
extern unsigned int  _iror_    (unsigned int,  unsigned char);
extern unsigned long _lror_    (unsigned long, unsigned char);
extern unsigned char _crol_    (unsigned char, unsigned char);
extern unsigned int  _irol_    (unsigned int,  unsigned char);
extern unsigned long _lrol_    (unsigned long, unsigned char);
extern unsigned char _chkfloat_(float);
extern void          _push_    (unsigned char _sfr);
extern void          _pop_     (unsigned char _sfr);

#endif

里面有循环左、右移函数。左移函数是_crol_(),右移函数是_cror_();

利用此函数实现流水灯。程序如下：

#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char
void delay(uchar xms)
{
 uchar i,j;
 for(i=xms;i>0;i--)
  for(j=110;j>0;j--);
}

void main()
{
  uchar a;
  a=0xfe;
  P1=a;
  while(1)
  {
     a=_crol_(a,1);
  P1=a;
  delay(1000);   
   
  }
     

}