TX-1C郭天祥51单片机计算器代码

最新推荐文章于 2024-09-12 10:51:44 发布

r12016

最新推荐文章于 2024-09-12 10:51:44 发布

阅读量1.8k

点赞数 1

分类专栏： 51单片机郭天祥文章标签：编程语言

本文链接：https://blog.csdn.net/r12016/article/details/110938805

版权

本文详细探讨了TX-1C计算器的51单片机代码实现，涵盖了编程思路、关键算法及代码实现细节，为51单片机初学者提供实践参考。

摘要由CSDN通过智能技术生成

#include<reg52.h>
#include"daily.h"
#include"add.h"
#define N 10

uchar code table1[]="0123456789";
int dz=16;

void write_com(uchar com)
{
   
	lcdrs=0;
	P0=com;
	delay(5);
	lcden=1;
	delay(5);
	lcden=0;
}

void write_data(uchar date)
{
   	
	write_com(0x80+dz);
	lcdrs=1;
	P0=date;
	delay(5);
	lcden=1;
	delay(5);
	lcden=0;
	write_com(0x18);
	dz++;
}

void write_data1(uchar date)
{
   
	lcdrs=1;
	P0=date;
	delay(5);
	lcden=1;
	delay(5);
	lcden=0;
}

void init()
{
   
	dz=16;
	dula=0;
	wela=0;
	lcden=0;
	write_com(0x38);
	write_com(0x0c);
	write_com(0x06);
	write_com(0x01);
}

ulong exchange(uchar *t)
{
   
	int i;
	ulong result=0;
	for(i=0;t[i]>=0&&t[i]<=9&&i<N;i++)
		result=result*10+(ulong)t[i];
	return result;
}

ulong sizeof_result(ulong t)
{
   
	ulong i,j;
	i=t/10;
	j=1;
	while(i>0)
	{
   
		i=i/10;
		j++;
	}
	return j;
}

ulong add(ulong x,ulong y)
{
   
	ulong r;
	r=x+y;
	return r;
}

ulong sub(ulong x,ulong y)
{
   
	ulong r;
	if(x<y)
	{
   
		write_data1('-');
		r=y-x;
	}