基于1602液晶的简易计算器

wu68aq

基于1602液晶的简易计算器

5 R* f; {# n- t; W) b
#include <reg52.h>
3 m) x+ K) B. i
  l( j% r9 \; ]  N1 y& n4 bunsigned char step = 0;  //操作步骤
. B( X; X# ]$ Hunsigned char oprt = 0;  //运算类型
signed long num1 = 0;    //操作数1
signed long num2 = 0;    //操作数2
signed long result = 0;  //运算结果
. b; p$ @% P$ g$ m+ @5 p; Wunsigned char T0RH = 0;  //T0重载值的高字节
! G# f4 u! f  `8 h* d% Z6 B7 Xunsigned char T0RL = 0;  //T0重载值的低字节

void ConfigTimer0(unsigned int ms);
1 P8 \9 g9 L! {0 b* Cextern void KeyScan();
extern void KeyDriver();
extern void InitLcd1602();
' C1 t/ }! C+ b5 T) Fextern void LcdShowStr(unsigned char x, unsigned char y, unsigned char *str);
extern void LcdAreaClear(unsigned char x, unsigned char y, unsigned char len);
5 `9 b' ]3 B: i% K7 hextern void LcdFullClear();
* m. ~9 v7 O1 l3 U3 L5 ]" p  o
1 a5 N" y3 f$ X) w5 s% d% Kvoid main()
# w$ t: q! |. l4 G( r{
: w3 I/ e/ E& O+ b0 ~, H. Y+ @    EA = 1;           //开总中断
$ C* F  u7 P- j+ W6 k2 b% W9 s, `; W    ConfigTimer0(1);  //配置T0定时1ms
        InitLcd1602();    //初始化液晶
% |2 S! ]% {- M& j/ X+ n6 v    LcdShowStr(15, 1, "0");  //初始显示一个数字0

6 N7 g7 Q# V* B$ _% F# `. P+ n    while (1)
    {
        KeyDriver();  //调用按键驱动
    }
}
/* 长整型数转换为字符串，str-字符串指针，dat-待转换数，返回值-字符串长度 */
/ d8 t2 b* `! N2 Yunsigned char LongToString(unsigned char *str, signed long dat)
5 J; a, p% Z7 i. g{
    signed char i = 0;
' v9 j! O( V$ o3 Q( t1 b    unsigned char len = 0;
; [6 i! s- F! W3 E- P9 Q0 p    unsigned char buf[12];

! ~/ f* z1 `4 Z    if (dat < 0)  //如果为负数，首先取绝对值，并在指针上添加负号
& v, f( A: a, [3 i' q' _    {
: c& P" u/ b, c  q        dat = -dat;
/ c) j, D! s5 K+ B        *str++ = '-';
+ E& L6 V. X7 A& f        len++;
    }
9 T' B( A! R. X( |) Q& w' b' S. ]    do {          //先转换为低位在前的十进制数组
        buf[i++] = dat % 10;
* U9 ~8 j9 o1 j9 R        dat /= 10;
0 O/ Q) R) s9 U' w, T% b    } while (dat > 0);
* H' b' a3 F8 [    len += i;     //i最后的值就是有效字符的个数
* F" Y- h6 `1 w2 A* \    while (i-- > 0)   //将数组值转换为ASCII码反向拷贝到接收指针上
    {
7 w& {5 x% c% ~' a4 C! y+ o9 d        *str++ = buf + '0';
" |" L% ^' E6 d" U0 _- @/ O+ Y    }
    *str = '\0';  //添加字符串结束符

    return len;   //返回字符串长度
}
5 C: K/ C' f0 j* X; `/* 显示运算符，显示位置y，运算符类型type */
" D: v7 v( R% q" n( U- B! x, mvoid ShowOprt(unsigned char y, unsigned char type)
4 T3 h+ g$ B! B" ?4 v' Q{
& }, S/ U; B* p3 ]- C% a) y    switch (type)
    {
3 H# N: a. {- @( Q/ W        case 0: LcdShowStr(0, y, "+"); break;  //0代表+
( N/ y6 |* |1 r: E        case 1: LcdShowStr(0, y, "-"); break;  //1代表-
1 A  m8 m' M% @: I7 i        case 2: LcdShowStr(0, y, "*"); break;  //2代表*
8 S1 u' e3 p  u        case 3: LcdShowStr(0, y, "/"); break;  //3代表/
/ d9 C, |9 {: ], e7 J# k        default: break;
. P1 G8 B, I6 p9 I. r1 R' u6 |    }
0 e0 A; [: P& u: i/ R% d# r( P& r9 ^}
/* 计算器复位，清零变量值，清除屏幕显示 */
void Reset()
  P* o6 E% |9 n0 u{
. }6 C( V- j1 H  o. [6 f    num1 = 0;
# m( q/ g/ X/ N. [: g  t$ l    num2 = 0;
    step = 0;
& j/ U# \7 X" S5 n9 h    LcdFullClear();
}
1 O  h( ^- E: z3 D0 v/* 数字键动作函数，n-按键输入的数值 */
; o! {) I9 ?6 L) Hvoid NumKeyAction(unsigned char n)
; {  B( a# E' E% H7 _* @0 Q: i{
    unsigned char len;
  q6 I7 ]0 ~* B; k' A    unsigned char str[12];
; j. A7 v2 B& p4 ?$ c- x) c2 p: I
1 l+ ~" Q. F8 @% P6 e  m- e& m    if (step > 1)  //如计算已完成，则重新开始新的计算
    {
" S( N& e9 B% y8 h% F) Y        Reset();
    }
    if (step == 0)  //输入第一操作数
0 @, e7 s' ]2 F0 n4 t    {
        num1 = num1*10 + n;             //输入数值累加到原操作数上
1 I0 C( ?. `* c& \* I  J, W        len = LongToString(str, num1);  //新数值转换为字符串
        LcdShowStr(16-len, 1, str);     //显示到液晶第二行上
6 N- D% @0 N4 P' }* h, S( |    }
    else            //输入第二操作数
    {
        num2 = num2*10 + n;             //输入数值累加到原操作数上
        len = LongToString(str, num2);  //新数值转换为字符串
# J4 s3 q$ w, b$ c& K1 N' T        LcdShowStr(16-len, 1, str);     //显示到液晶第二行上
    }
8 J/ _8 R. _: B1 c; o7 |) _  p* `1 I/ H}
# }# r6 }+ A( ?6 H8 m/* 运算符按键动作函数，运算符类型type */
. O/ L/ M! J1 ]2 n5 J8 Lvoid OprtKeyAction(unsigned char type)
{
* T6 B7 e: ^! U# \! v    unsigned char len;
    unsigned char str[12];

6 x2 l, M9 z- l; ^3 r1 y6 g/ `    if (step == 0)  //第二操作数尚未输入时响应，即不支持连续操作
    {
        len = LongToString(str, num1); //第一操作数转换为字符串
7 ?: V9 @; s' j- }$ o6 E2 I        LcdAreaClear(0, 0, 16-len);    //清除第一行左边的字符位
        LcdShowStr(16-len, 0, str);    //字符串靠右显示在第一行
        ShowOprt(1, type);             //在第二行显示操作符
        LcdAreaClear(1, 1, 14);        //清除第二行中间的字符位
        LcdShowStr(15, 1, "0");        //在第二行最右端显示0
        oprt = type;                   //记录操作类型
        step = 1;
( H+ v% ]$ o1 j" W$ V5 Q6 s    }
' P9 R7 w) r! L0 M# U}
* R, f2 j: W+ Q; v9 }4 H/* 计算结果函数 */
: ]- z; c/ ?7 K' T; evoid GetResult()
{
    unsigned char len;
( A: u' _' V% V. G6 D0 y    unsigned char str[12];

    if (step == 1) //第二操作数已输入时才执行计算
    {
        step = 2;
        switch (oprt)  //根据运算符类型计算结果，未考虑溢出问题
        {
& x9 g0 A  E- f% h% ^) v" h            case 0: result = num1 + num2; break;
8 v) D6 q( l  q5 ?/ F            case 1: result = num1 - num2; break;
" M, l0 ?; z. S  V( C. ]% X            case 2: result = num1 * num2; break;
1 S8 t- j# z- \" t9 ?! ?; {, v" h3 G            case 3: result = num1 / num2; break;
            default: break;
/ O. C/ i/ ]- l" H9 y+ \) N) g- O        }
        len = LongToString(str, num2);  //原第二操作数和运算符显示到第一行
5 H5 C( b+ {2 N7 b8 q5 [5 Q* M        ShowOprt(0, oprt);
        LcdAreaClear(1, 0, 16-1-len);
. W) j- m. a& {5 k' t        LcdShowStr(16-len, 0, str);
        len = LongToString(str, result);  //计算结果和等号显示在第二行
        LcdShowStr(0, 1, "=");
        LcdAreaClear(1, 1, 16-1-len);
        LcdShowStr(16-len, 1, str);
    }
! q( {  W' j/ {  c" \/ i}
, y( X7 w$ h8 _/* 按键动作函数，根据键码执行相应的操作，keycode-按键键码 */
void KeyAction(unsigned char keycode)
; p$ s( P" z5 b2 j9 l{
7 P4 Z: W2 o; X% V) [) ~6 |    if  ((keycode>='0') && (keycode<='9'))  //输入字符
    {
- `5 N& W8 }' N) C2 x        NumKeyAction(keycode - '0');
8 h  i5 S4 Z3 f    }
, H1 W" Z2 f- j! @# N    else if (keycode == 0x26)  //向上键，+
' S6 G  p, z3 m+ j    {
4 U" x% i' }$ f' T! e  Q) M        OprtKeyAction(0);
7 ]% l! p) T+ Y    }
4 B# k* B: q+ P+ G; P! e  l    else if (keycode == 0x28)  //向下键，-
( D: B9 w, x. @% H- ?    {
* Y( f0 \3 h, F% T* f  y. S        OprtKeyAction(1);
    }
; Y2 g3 d( e& w; h# Y    else if (keycode == 0x25)  //向左键，*
    {
        OprtKeyAction(2);
    }
& @  t3 }" j% }. F, p* y' D    else if (keycode == 0x27)  //向右键，÷
    {
        OprtKeyAction(3);
: @/ F5 L8 S5 _1 W# |    }
    else if (keycode == 0x0D)  //回车键，计算结果
- [; i; ~" P- a4 f    {
, Q) J+ [/ z8 H        GetResult();
4 j& S) a* C0 `: v# R# e    }
% x- I6 C6 V+ w* J    else if (keycode == 0x1B)  //Esc键，清除
, Z# h& M% w( j8 }0 ^  d! N/ K    {
5 }/ x, [1 ]9 p+ S" T8 i        Reset();
/ e$ l8 J3 _% M9 c2 X        LcdShowStr(15, 1, "0");
) \) R7 n$ W" P( A. D    }
0 e2 o9 r* \6 N- h- M}
/* 配置并启动T0，ms-T0定时时间 */
void ConfigTimer0(unsigned int ms)
{
2 T  [. }5 l. a    unsigned long tmp;  //临时变量
7 W0 H, q/ h9 |9 J5 [
    tmp = 11059200 / 12;      //定时器计数频率
4 t6 v# F2 c; g# {& N/ j    tmp = (tmp * ms) / 1000;  //计算所需的计数值
    tmp = 65536 - tmp;        //计算定时器重载值
% t/ v' X! X) Z+ A( V3 O2 r2 T    tmp = tmp + 28;           //补偿中断响应延时造成的误差
# n& g) H$ e* n9 r    T0RH = (unsigned char)(tmp>>8);  //定时器重载值拆分为高低字节
    T0RL = (unsigned char)tmp;
    TMOD &= 0xF0;   //清零T0的控制位
) p5 D" R% `3 N% g9 s    TMOD |= 0x01;   //配置T0为模式1
" I9 C. P$ I# K' T: y7 j    TH0 = T0RH;     //加载T0重载值
    TL0 = T0RL;
% x' h2 J$ y8 v3 m; K4 R    ET0 = 1;        //使能T0中断
) Y: v9 u, C( A+ Q7 H    TR0 = 1;        //启动T0
}
/* T0中断服务函数，执行按键扫描 */
5 x7 N  l8 Q7 ]2 c" Bvoid InterruptTimer0() interrupt 1
5 t0 l) w6 [/ }{
    TH0 = T0RH;  //重新加载重载值
    TL0 = T0RL;
& J$ U* Y1 s3 l5 ~( T    KeyScan();   //按键扫描
}
2 M' D0 S& \+ U* F0 z: V' h( u7 ]

sunygd

谢谢分享