Proteus单片机仿真跑马灯程序

Proteus单片机仿真跑马灯程序

/*
 * 跑马灯 按键改变闪烁方式
 *
*/


#include 


sbit ENLED = P1^4;
sbit ADDR3 = P1^3;
sbit ADDR2 = P1^2;
sbit ADDR1 = P1^1;
sbit ADDR0 = P1^0;
sbit KeyIn1 = P2^4;
sbit KeyIn2 = P2^5;
sbit KeyIn3 = P2^6;
sbit KeyIn4 = P2^7;
sbit KeyOut1 = P2^3;
sbit KeyOut2 = P2^2;
sbit KeyOut3 = P2^1;
sbit KeyOut4 = P2^0;


unsigned char key=0;


void delay（unsigned int i）
{
	while （i--）;
}

unsigned char just_keys（unsigned char n）
{
	if （KeyIn1 == 0）
	{
		delay （100）;
		if （KeyIn1 == 0）
		{
			while （KeyIn1 == 0）;
			return （1+4*n）;
		}
		else
			return 0;
	}
	if （KeyIn2 == 0）
	{
		delay （100）;
		if （KeyIn2 == 0）
		{
			while （KeyIn2 == 0）;
			return （2+4*n）;
		}
		else
			return 0;
	}
	if （KeyIn3 == 0）
	{
		delay （100）;
		if （KeyIn3 == 0）
		{
			while （KeyIn3 == 0）;
			return （3+4*n）;
		}
		else
			return 0;
	}
	if （KeyIn4 == 0）
	{
		delay （100）;
		if （KeyIn4 == 0）
		{
			while （KeyIn4 == 0）;
			return （4+4*n）;
		}
		else
			

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       3425  2012-02-08 17:31  paomadeng\leds.hex

     文件         40  2012-02-08 17:31  paomadeng\leds.lnp

     文件      25625  2012-02-08 17:31  paomadeng\leds.M51

     文件        514  2012-02-08 23:25  paomadeng\leds.plg

     文件       1975  2010-10-26 22:06  paomadeng\leds_Uv2.Bak

     文件       5552  2010-10-26 23:03  paomadeng\main.c

     文件       2094  2011-11-17 17:23  paomadeng\leds.Uv2

     文件       1187  2012-02-08 00:40  paomadeng\leds_Opt.Bak

     文件      18168  2012-02-08 17:31  paomadeng\main.LST

     文件      15145  2012-02-08 17:31  paomadeng\main.OBJ

     文件      12872  2012-02-08 17:31  paomadeng\leds

     文件       1181  2012-02-08 23:25  paomadeng\leds.Opt

     文件     146518  2013-05-23 21:59  paomadeng\8051 LED 跑马灯.DSN

     目录          0  2010-10-26 19:14  paomadeng

----------- ---------  ---------- -----  ----

               234296                    14