51控制自动窗帘程序

智能定时控制窗帘开关，在适当的时间自动关闭窗帘

#include “includes.h“

char sec min hour day month yearweek;

sbit SCLK = P0^5; 									//实时时钟时钟线引脚 
sbit IO   = P0^6; 									//实时时钟数据线引脚 
sbit RST  = P0^7; 									//实时时钟复位线引脚 
sbit ACC0=ACC^0;
sbit ACC7=ACC^7;

void write_byte（uchar dat）;
uchar read_byte（）;
void write_1302（uchar adduchar dat）;
uchar read_1302（uchar add）;
uchar BCD_Decimal（uchar bcd）;
void ds1302_init（void）;
void get_time（void）;

void write_byte（uchar dat）//写一个字节
{
	uchar a;

	ACC=dat;
	RST=1;
	for（a=8;a>0;a--）
	{
		IO=ACC0;
		SCLK=0;
		SCLK=1;
		ACC=ACC>>1;
	}
}
uchar read_byte（）//读一个字节
{
	uchar a;
	RST=1;
	for（a=8;a>0;a--）
	{
		ACC7=IO;
		SCLK=1;
		SCLK=0;
		ACC=ACC>>1;

	}
	return （ACC）;
}
//----------------------------------------
void write_1302（uchar adducha

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2014-08-18 09:04  卷帘\
     文件        2298  2014-06-18 00:05  卷帘\1302.c
     文件        5311  2014-06-20 20:31  卷帘\1302.LST
     文件        7605  2014-06-20 20:31  卷帘\1302.OBJ
     文件           0  2014-06-08 19:52  卷帘\ds1302.h
     文件        2264  2014-06-08 16:29  卷帘\hongwai.c
     文件         192  2014-06-08 16:36  卷帘\hongwai.h
     文件        5537  2014-06-08 16:31  卷帘\hongwai.LST
     文件        5757  2014-06-08 16:31  卷帘\hongwai.OBJ
     文件         294  2014-06-08 17:59  卷帘\includes.h
     文件       38091  2014-06-20 20:31  卷帘\juanlian
     文件        9686  2014-06-20 20:31  卷帘\juanlian.hex
     文件          85  2014-06-20 20:31  卷帘\juanlian.lnp
     文件       43368  2014-06-20 20:31  卷帘\juanlian.M51
     文件         183  2014-07-26 21:38  卷帘\juanlian.plg
     文件      143560  2014-07-26 21:38  卷帘\juanlian.uvopt
     文件       13823  2014-06-08 19:32  卷帘\juanlian.uvproj
     文件      143560  2014-07-26 20:58  卷帘\juanlian_uvopt.bak
     文件       13987  2014-06-07 16:33  卷帘\juanlian_uvproj.bak
     文件        7299  2014-06-17 16:17  卷帘\lcd.c
     文件         533  2014-06-08 19:37  卷帘\lcd.h
     文件       13167  2014-06-20 20:31  卷帘\lcd.LST
     文件        8111  2014-06-20 20:31  卷帘\lcd.OBJ
     文件       13400  2014-06-20 20:31  卷帘\main.c
     文件       32134  2014-06-20 20:31  卷帘\main.LST
     文件       28835  2014-06-20 20:31  卷帘\main.OBJ
     文件        6376  2009-05-07 14:37  卷帘\STARTUP.A51
     文件       14062  2014-06-20 20:31  卷帘\STARTUP.LST
     文件         749  2014-06-20 20:31  卷帘\STARTUP.OBJ