


版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)
文檔簡介
1、#include <> double r;#include ""#define RS_1 P3OUT|=BIT0 #define RS_0 P3OUT&=BIT0 #define RW_1 P3OUT|=BIT1 #define RW_0 P3OUT&=BIT1 #define E_1 P3OUT|=BIT2 #define E_0 P3OUT&=BIT2 #define DATA P4OUT #define data_dir P4DIR#define KEYDIR P5DIR#define KEYOUT P5OUT#define KEY
2、IN P5IN#define led P2OUT#define LED1 P2DIR=0XFF; #define uchar unsigned char #define uint unsigned intchar table116="1"char table216=' ' char flag;int flag1;/* 延時 */void delay(void) unsigned int i,j; for(i=0;i<50;i+) for(j=0;j<10;j+) J/* 消抖延時 */void delay_key(void)int i,j; fo
3、r(i=0;i<500;i+) for(j=0;j<100;j+) void delayms(uchar ms)int i,j;for(i=0;i<ms;i+) for(j=0;j<157;j+);int key_column_scan() int a;P5DIR = 0xff;P5OUT = 0x0f;P5DIR = 0X00; a = P5IN; switch(a)case 0x8f:return 4;case 0x4f:return 3;case 0x2f:return 2;case 0x1f:return 1;int key_line_scan()int a,c
4、olumn,key=-1,line;P5DIR = 0xff;P5OUT = 0xf0;P5DIR = 0X00;a = P5IN;if(a!=0xf0)column = key_column_scan();switch(a)case 0xf8:line=4;break;case 0xf4:line=3;break;case 0xf2:line=2;break;case 0xf1:line=1;break; key=(line-1)*4+column;delay_key(); ;table1+i='.'break;elsewrite_data(')');tabl
5、e1+i=')'break;case 15:write_data('=');table1+i='='break;case 16: if(flag=0)write_com(0x80+i-1);i-; else WDTCTL=0X00;if(table1i='=')cal(table1);sprintf(table2,"%lf",r);lcd_string(1,6,table2);break; break;case 5:write_data('4');table1+i='4'brea
6、k; case 6:write_data('5');table1+i='5'break; case 7:write_data('6');table1+i='6'break; case 8:if(flag=0)write_data('#');table1+i='#'break;else write_data('A');table1+i='A'break; case 9:write_data('1');table1+i='1'break;
7、case 10:write_data('2');table1+i='2'break; case 11:write_data('3');table1+i='3'break; case 12:if(flag=0)lcd_string(1,0,"shift ");flag=1;write_com(0x80+i);break;else lcd_string(1,0,"");write_com(0x80+i);flag=0;break; case 13:if(flag=0)write_data(
8、9;0');table1+i='0'break;else write_data('(');table1+i='('break; case 14:if(flag=0)write_data('.');table1+i='.'break;else write_data(')');table1+i=')'break; case 15:write_data('=');table1+i='='break; case 16:if(flag=0)write_c
9、om(0x80+i-1);i-;else WDTCTL=0X00; if(table1i='=')cal(table1);sprintf(table2,"%g",r);lcd_string(1,6,table2);/*=*函數(shù)名:多項式運算*函數(shù)功能描述 : 實現(xiàn)多項式運算* 參數(shù): char 型數(shù)組* 返回值: double 結(jié)果=*/#include<>#include<>#include<>void cal(char a)int i=1,j,k,m,cnt=0,t1=0,t2=0,t3=0;char nibo20=&
10、#39;0',zhan215='0'1=x;2=+cnt;2; nibot1+1='0' m=i; break; zhan3+t3=num->datam.d1;else if(niboj='+') zhan3t3-1=zhan3t3-1+zhan3t3; t3-;else if(niboj='-') zhan3t3-1=zhan3t3-1-zhan3t3; t3-;else if(niboj='*') zhan3t3-1=zhan3t3-1*zhan3t3; t3-;else if(niboj=
11、9;/') zhan3t3-1=zhan3t3-1/zhan3t3; t3-;else if(n iboj='A') zhan3t3-1=pow(zhan3t3-1,zhan3t3); t3-;else if(niboj='#') zhan3t3=sqrt(zhan3t3);j+;r=zhan3t3;/*memory management functions and variables.Copyright (c) Borland International 1987,1988 All Rights Reserved.*/#if _STDC_#define
12、 _Cdecl#else#define _Cdecl cdecl#endif#ifndef _STDDEF#define _STDDEF#ifndef _PTRDIFF_T#define _PTRDIFF_T#if defined(_LARGE_) | defined(_HUGE_) | d typedef long ptrdiff_t;#elsetypedef int ptrdiff_t;#endif#endif#ifndef _SIZE_T#define _SIZE_Ttypedef unsigned size_t;#endif#endif#ifndef NULL#if defined(_
13、TINY_) | defined(_SMALL_) | defined(_MEDIUM_) #define NULL#else#define NULL#endif0L#endifint _Cdecl brk*_Cdecl callocvoid(void *addr);(size_t nitems, size_t size);#if defined(_COMPACT_) | defined(_LARGE_) | defined(_HUGE_) unsigned long _Cdecl coreleft#elseunsigned _Cdecl coreleft #endif(void);(void);void_Cdecl free(void *block);void*_Cdecl malloc(size_t size);void *_Cdecl realloc (void *block, size_t size);void*_Cdecl sbrk(int incr);#if !_STDC_void far * _Cdecl farcalloc(unsigned long nunits, unsigned
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 音樂課中國古典課件
- 急救方法培訓(xùn)課件
- 油田開發(fā)項目質(zhì)量管理方案
- 高效節(jié)能電機項目社會穩(wěn)定風(fēng)險評估報告(范文參考)
- 2025年砂洗機項目發(fā)展計劃
- 2025年碾米機械項目合作計劃書
- 2025年家用制冷電器具項目發(fā)展計劃
- 2025年政府引導(dǎo)基金項目合作計劃書
- 維修表揚信范文
- 2025年旅游景區(qū)開發(fā)建設(shè)項目社會穩(wěn)定風(fēng)險評估與管理規(guī)范報告
- 《無人機介紹》課件
- 2025-2030中國硼酸行業(yè)市場發(fā)展現(xiàn)狀及競爭格局與投資研究報告
- 學(xué)校中層干部選拔聘用實施方案中層干部選聘實施方案2
- 生物必修1教師用書
- 園藝植物育種學(xué)知到課后答案智慧樹章節(jié)測試答案2025年春浙江大學(xué)
- 《電力機車制動系統(tǒng)檢修與維護》課件 項目二任務(wù)四檢修中繼閥
- GB/T 15683-2025糧油檢驗大米直鏈淀粉含量的測定
- 2025吉林省安全員C證考試(專職安全員)題庫及答案
- 電鉆清洗消毒流程
- 裝修貸款申請書
- 造林安全文明施工方案
評論
0/150
提交評論