#include“STC15F.h“
#include
#include
#define?uint?unsigned?int
#define?uchar?unsigned?char

sbit?SDA1640=P1^6;	???//TM1640時鐘線
sbit?SCL1640=P1^7;	???//TM1640數據線
uchar?date[16]?=?{0xff0xff0xff0xff0xff0xff0xff0xff0xff0xff0xff0xff0xff0xff0xff0xff};
uchar?display[]={0x3F0x060x5B0x4F0x660x6D0x7D0x070xFF0x6F0x770x7C0x390x5E0x790x71};//共陰
//*************************************************************
//*********START***********************************************
void?start1640（）		??//1640開始
{
	//SCL1640=0;
	SDA1640=1;
	_nop_（）;
	_nop_（）;?
	SCL1640=1;	
	_nop_（）;
	_nop_（）;?
	SDA1640=0;
	_nop_（）;
	_nop_（）;
	SCL1640=0;
	_nop_（）;
	_nop_（）;
}



//**************************************************************
void?stop1640（）			?//1640結束
{
	SCL1640=0;
	_nop_（）;
	_nop_（）;?
	SDA1640=0;
	SCL1640=1;
	_nop_（）;
	_nop_（）;?
	SDA1640=1;
	_nop_（）;
	_nop_（）;
	SCL1640=1;
	_nop_（）;
	_nop_（）;	
}




//***********************************************************
void?write1640（uchar?date）	??	//1640寫字節
{
	uchar?iaa;
	aa=date;
	//SDA1640=0;
	//SCL1640=0;
	for（i=0;i<8;i++）
	{	?
		SCL1640=0;?
		if（aa&0x01）		
		??{
			SDA1640=1;
			_nop_（）;
	????????_nop_（）;?
		??}
		else
		??{
			SDA1640=0;
		????????_nop_（）;
	????????????_nop_（）;??
	??	??}
		SCL1640=1;
		_nop_（）;
		aa=aa>>1;
	}
	//SCL1640=0;
	//SDA1640=0;			
}

void?send1640（uchar?date1uchar?date2）??????????????????
{
????start1640（）;
	write1640（date1）;
	write1640（date2）;
	//FD650_write（date3）;
	stop1640（）;?

?????
	?start1640（）;
	?write1640（0x8f）;???????//控制顯示開顯示脈沖寬度為14/16
	?stop1640（）;?
	???	
}??


//************************************************************
void?delay（uint?z）		??//延時子程序
{
	uint?xy;
	for（x=z;x>0;x--）
		for（y=487;y>0;y--）;
}

void?main（）
{
	?


	?//FD650_send（0x8F0x8F）;//?開啟顯示、1級亮度
???while（1）
???	{
	????send1640（0XC0display[2]）;??//GID1
	????send1640（0XC1display[3]）;??//GID2
	????send1640（0XC2display[0]）;??//GID3
????????send1640（0XC3display[1]）;??//GID4
		send1640（0XC4display[4]）;??//GID5
	????send1640（0XC5display[5]）;??//GID6
	????send1640（0XC6display[6]）;??//GID7
????????send1640（0XC7display[8]）;??//GID8
		send1640（0XC8display[7]）;??//GID9
	????send1640（0XC9display[9]）;??//GID10
	????send1640（0XCAdisplay[1]）;??//GID11
????????send1640（0XCBdisplay[2]）;??//GID12
		send1640（0XCCdisplay[3]）;??//GID13
	????send1640（0XCDdisplay[4]）;??//GID14
	????send1640（0XCEdisplay[5]）;??//GID15
????????send1640（0XCFdisplay[6]）;??//GID16	
//	FD650_READ（）;
//	delay（500）;	
	}
?????/*send（）;?*/
	?
}

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????64151??2013-05-31?13:41??TM1640-2\1.DSN
?????文件?????????790??2013-05-31?14:33??TM1640-2\1.PWI
?????文件????????1316??2013-05-31?13:41??TM1640-2\1.SDF
?????文件??????111183??2018-12-11?17:29??TM1640-2\1640.jpg
?????文件????????6376??2013-05-17?17:57??TM1640-2\STARTUP.A51
?????文件???????14048??2018-12-10?04:04??TM1640-2\STARTUP.LST
?????文件?????????749??2018-12-10?04:04??TM1640-2\STARTUP.OBJ
?????文件???????12805??2018-09-26?00:26??TM1640-2\STC15F.h
?????文件????????9317??2018-12-10?04:04??TM1640-2\test
?????文件????????2712??2018-12-10?04:04??TM1640-2\test.c
?????文件????????1285??2018-12-10?04:04??TM1640-2\test.hex
?????文件??????????56??2018-12-10?04:04??TM1640-2\test.lnp
?????文件????????6400??2018-12-10?04:04??TM1640-2\test.LST
?????文件????????9141??2018-12-10?04:04??TM1640-2\test.M51
?????文件????????9386??2018-12-10?04:04??TM1640-2\test.OBJ
?????文件?????????738??2018-12-10?04:05??TM1640-2\test.plg
?????文件???????55637??2018-12-10?04:04??TM1640-2\test.uvopt
?????文件???????13409??2013-05-17?17:57??TM1640-2\test.uvproj
?????文件???????55643??2018-12-10?03:45??TM1640-2\test_uvopt.bak
?????文件???????13405??2013-05-17?17:57??TM1640-2\test_uvproj.bak
?????文件??????626069??2018-11-28?22:17??TM1640-2\TM1640_V1.2.pdf