基于1602液晶的简易计算器

wu68aq

基于1602液晶的简易计算器


& ]$ B5 ]: N/ N* v: M$ c$ b#include <reg52.h>
2 r6 K, H* g0 ]% P4 A1 K) N" T* B
7 u: s2 q3 s. e+ @- V5 \unsigned char step = 0;  //操作步骤
unsigned char oprt = 0;  //运算类型
signed long num1 = 0;    //操作数1
) ^7 k4 E$ L. Vsigned long num2 = 0;    //操作数2
signed long result = 0;  //运算结果
unsigned char T0RH = 0;  //T0重载值的高字节
unsigned char T0RL = 0;  //T0重载值的低字节

6 G1 j# E$ y$ Jvoid ConfigTimer0(unsigned int ms);
( n3 H& Z1 U. z0 oextern void KeyScan();
extern void KeyDriver();
extern void InitLcd1602();
+ i) o2 m: K* R/ Q+ |extern void LcdShowStr(unsigned char x, unsigned char y, unsigned char *str);
extern void LcdAreaClear(unsigned char x, unsigned char y, unsigned char len);
2 h& g) O/ W3 M! Pextern void LcdFullClear();

  h7 f3 `8 s- g# W1 s$ x% {void main()
; a6 d  I5 [) m7 u: t' f{
5 [' Y8 D: |, d* B    EA = 1;           //开总中断
    ConfigTimer0(1);  //配置T0定时1ms
        InitLcd1602();    //初始化液晶
    LcdShowStr(15, 1, "0");  //初始显示一个数字0
& c- q6 @6 h# {& k) F0 z
    while (1)
    {
        KeyDriver();  //调用按键驱动
; M( X$ u# G' \  o    }
}
/* 长整型数转换为字符串，str-字符串指针，dat-待转换数，返回值-字符串长度 */
unsigned char LongToString(unsigned char *str, signed long dat)
{
    signed char i = 0;
5 @3 A( }; `) F7 U8 `! @/ ?    unsigned char len = 0;
    unsigned char buf[12];

/ C. e) I8 ^3 H* U) U    if (dat < 0)  //如果为负数，首先取绝对值，并在指针上添加负号
    {
& }- X2 [) x2 G, y3 {( Z& X        dat = -dat;
+ d% D4 C1 r+ F1 S& h( X        *str++ = '-';
        len++;
5 a9 P- P$ ^4 d7 j. D    }
  l2 t, O8 t( f; Z7 e. x+ u    do {          //先转换为低位在前的十进制数组
, q5 f; V+ n" F' z5 X7 M; J        buf[i++] = dat % 10;
$ I! j* y5 [$ B; G- |1 ~. G# e% x        dat /= 10;
( }; F# `& u  s7 V% j7 W    } while (dat > 0);
$ ^( e$ P$ I# G! d    len += i;     //i最后的值就是有效字符的个数
" j: A) @! @5 k. w7 [0 o    while (i-- > 0)   //将数组值转换为ASCII码反向拷贝到接收指针上
  t7 m. a  a* |/ `* I    {
        *str++ = buf + '0';
' i& X9 n5 @  ~    }
    *str = '\0';  //添加字符串结束符
( t  _; }8 a2 l% S
    return len;   //返回字符串长度
}
/* 显示运算符，显示位置y，运算符类型type */
6 \" a5 w# Y  A! @( J$ I  |8 ^6 T* {void ShowOprt(unsigned char y, unsigned char type)
' _2 c+ R3 e1 G" m{
    switch (type)
    {
$ ~3 _: y" ]6 s: z2 p, E        case 0: LcdShowStr(0, y, "+"); break;  //0代表+
        case 1: LcdShowStr(0, y, "-"); break;  //1代表-
        case 2: LcdShowStr(0, y, "*"); break;  //2代表*
3 ?, I( ^" k% U+ @+ V5 O        case 3: LcdShowStr(0, y, "/"); break;  //3代表/
1 W" R! i  ]; Z0 P' z# P  F& o( P! I        default: break;
    }
}
/* 计算器复位，清零变量值，清除屏幕显示 */
4 H. _! A/ Y6 J/ r  j2 v/ tvoid Reset()
4 [- W0 V' p! m& V0 T{
    num1 = 0;
4 `# ]5 ?5 C. p9 M5 ]    num2 = 0;
$ F. O0 p6 p! e- d+ ?1 G  N* s: h    step = 0;
0 R0 x* ?5 \: X    LcdFullClear();
}
# f# C0 z' f1 o, }/* 数字键动作函数，n-按键输入的数值 */
* j0 @" }$ w( C) s, R% dvoid NumKeyAction(unsigned char n)
3 O) V9 B# d6 e" `6 }{
    unsigned char len;
' @; {+ M! r" \5 O( v    unsigned char str[12];
  [/ |! P$ e1 X' i3 t* i1 ?, P
    if (step > 1)  //如计算已完成，则重新开始新的计算
    {
        Reset();
( ^0 c8 J1 A. ]9 I( \  M    }
    if (step == 0)  //输入第一操作数
. }, ]7 i- t9 s3 ?7 ^    {
: `% K2 M% O* t        num1 = num1*10 + n;             //输入数值累加到原操作数上
$ E% y9 S: A; K. S' U0 ]' F5 O        len = LongToString(str, num1);  //新数值转换为字符串
! C' B! j% j' q4 Q, O        LcdShowStr(16-len, 1, str);     //显示到液晶第二行上
    }
    else            //输入第二操作数
8 M! a" D2 {$ D  p7 d  M$ y    {
, i* q" n8 a6 U, M$ m; n8 W        num2 = num2*10 + n;             //输入数值累加到原操作数上
        len = LongToString(str, num2);  //新数值转换为字符串
        LcdShowStr(16-len, 1, str);     //显示到液晶第二行上
, J4 O7 A5 }+ S. \, V    }
}
/* 运算符按键动作函数，运算符类型type */
7 S  \" P8 f' E5 Lvoid OprtKeyAction(unsigned char type)
{
    unsigned char len;
    unsigned char str[12];
7 u$ K% M7 G( S, t% z+ F7 a/ T, Q7 T
    if (step == 0)  //第二操作数尚未输入时响应，即不支持连续操作
    {
        len = LongToString(str, num1); //第一操作数转换为字符串
        LcdAreaClear(0, 0, 16-len);    //清除第一行左边的字符位
        LcdShowStr(16-len, 0, str);    //字符串靠右显示在第一行
. ^' J$ u0 D& o" l( O( U        ShowOprt(1, type);             //在第二行显示操作符
  x, V/ H; n0 z& C9 s3 L7 o( W! ]        LcdAreaClear(1, 1, 14);        //清除第二行中间的字符位
4 b  ^1 \( C( L0 f' ?+ B        LcdShowStr(15, 1, "0");        //在第二行最右端显示0
        oprt = type;                   //记录操作类型
% }9 x1 y; P3 m4 w- O; D6 s        step = 1;
1 B( b2 t1 ?6 c( P- x    }
* V5 V' K! ]# |+ `}
: q: y$ z" L1 O6 j& `0 n/* 计算结果函数 */
( n' \, G8 n' X' B6 q; r9 }/ P( kvoid GetResult()
# p! Y, |! M6 b; b8 F- P" c{
! l4 {, L; d2 i" O5 k' ~    unsigned char len;
5 ?. _) w0 E! L. E  D9 P5 @8 O' K    unsigned char str[12];

+ J4 n( d1 \  g2 d    if (step == 1) //第二操作数已输入时才执行计算
) {4 P2 s& i1 C    {
- k+ V1 v& j5 Q% y& [1 \$ h# r! t        step = 2;
& }% e# y! @0 U8 G, G9 y  `  H        switch (oprt)  //根据运算符类型计算结果，未考虑溢出问题
        {
            case 0: result = num1 + num2; break;
            case 1: result = num1 - num2; break;
' J; r3 y5 j: r  [            case 2: result = num1 * num2; break;
* A* R) V2 M) C4 b0 `8 \            case 3: result = num1 / num2; break;
            default: break;
        }
4 q' T' s, w  h8 V8 {        len = LongToString(str, num2);  //原第二操作数和运算符显示到第一行
        ShowOprt(0, oprt);
/ Y6 t- U8 b% y, G0 r* \/ }        LcdAreaClear(1, 0, 16-1-len);
        LcdShowStr(16-len, 0, str);
7 J3 P. n% e- z) e# e0 `8 t7 |        len = LongToString(str, result);  //计算结果和等号显示在第二行
3 A0 f* W# |( V' ?        LcdShowStr(0, 1, "=");
5 Y, }( ?8 d& i% Y        LcdAreaClear(1, 1, 16-1-len);
        LcdShowStr(16-len, 1, str);
    }
}
/* 按键动作函数，根据键码执行相应的操作，keycode-按键键码 */
void KeyAction(unsigned char keycode)
{
    if  ((keycode>='0') && (keycode<='9'))  //输入字符
# c% L0 [6 ?& [    {
* r$ x. B0 S! i6 [4 v7 {, i6 J        NumKeyAction(keycode - '0');
    }
/ K7 s: I9 v/ b* ^    else if (keycode == 0x26)  //向上键，+
    {
        OprtKeyAction(0);
    }
    else if (keycode == 0x28)  //向下键，-
    {
0 B2 c- |! Q3 t* f+ G1 A% y, Z        OprtKeyAction(1);
% z6 m( c! c+ m  T0 ]/ `    }
4 Y2 C$ q" N5 \2 z    else if (keycode == 0x25)  //向左键，*
9 z; S1 }( y% ^1 I8 M6 l" _    {
        OprtKeyAction(2);
    }
5 I- S% Q8 f6 N% K    else if (keycode == 0x27)  //向右键，÷
4 `: C. c8 d) r, b4 m    {
        OprtKeyAction(3);
    }
6 K! y& S) v  m0 S    else if (keycode == 0x0D)  //回车键，计算结果
    {
        GetResult();
5 c6 D, X# f& q6 `; t& m# T    }
    else if (keycode == 0x1B)  //Esc键，清除
    {
        Reset();
        LcdShowStr(15, 1, "0");
    }
}
; j4 t; \/ e9 ~$ l, D/* 配置并启动T0，ms-T0定时时间 */
6 E  D) Y" n( Yvoid ConfigTimer0(unsigned int ms)
: M2 Q; g) X# O: |5 X- N! K; Y{
    unsigned long tmp;  //临时变量

4 V6 D  d, {+ R/ O* A    tmp = 11059200 / 12;      //定时器计数频率
    tmp = (tmp * ms) / 1000;  //计算所需的计数值
    tmp = 65536 - tmp;        //计算定时器重载值
( O6 E+ i3 \" ^+ x3 Y1 t    tmp = tmp + 28;           //补偿中断响应延时造成的误差
    T0RH = (unsigned char)(tmp>>8);  //定时器重载值拆分为高低字节
    T0RL = (unsigned char)tmp;
    TMOD &= 0xF0;   //清零T0的控制位
    TMOD |= 0x01;   //配置T0为模式1
+ n) }& y. S4 L( D3 W    TH0 = T0RH;     //加载T0重载值
    TL0 = T0RL;
    ET0 = 1;        //使能T0中断
    TR0 = 1;        //启动T0
) d& A* A5 V( e* l. r8 _}
# S) l, ]4 i0 m0 u0 p7 t" G/* T0中断服务函数，执行按键扫描 */
void InterruptTimer0() interrupt 1
{
5 h' f' s. o# U+ ^4 ~- y1 ~    TH0 = T0RH;  //重新加载重载值
5 e. W, J4 ^% H" M    TL0 = T0RL;
    KeyScan();   //按键扫描
}

sunygd

谢谢分享