51单片机

N字节无符号二进制 转 十进制BCD码（C调用汇编子程序）

2020-02-01 16:23发布

站内问答 / 51单片机
5367 17 17
汇编子程序模块：NBYTE_BCD.asm
  1. ;========================================================================
  2. ; extern void NBYTEBCD(unsigned char idata *pri, unsigned char leni, unsigned char idata *pro, unsigned char leno);
  3. ;
  4. ; N字节无符号二进制  对应  十进制BCD码字节数
  5. ; (N <= 4 )  则 N+1   
  6. ; (N <= 9 )  则 N+2          
  7. ; (N <= 12) 则 N+3
  8. ; ……

  10. $NOMOD51

  12. NAME NBYTE_BCD                                                  ;模块名

  14. ?PR?_NBYTEBCD?NBYTE_BCD  SEGMENT CODE              ;在程序存储区中定义段     
  15. ?DT?_NBYTEBCD?NBYTE_BCD  SEGMENT DATA OVERLAYABLE
  16.         PUBLIC  ?_NBYTEBCD?BYTE
  17.         PUBLIC  _NBYTEBCD                                        ;用PUBLIC 声明函数为公共函数

  19.         RSEG          ?DT?_NBYTEBCD?NBYTE_BCD
  20. ?_NBYTEBCD?BYTE:
  21.             pri?040:   DS   1    ;R7
  22.            leni?041:   DS   1    ;R5
  23.             pro?042:   DS   1    ;R3
  24.            ORG 3
  25.            leno?043:   DS   1
  26.         RSEG    ?PR?_NBYTEBCD?NBYTE_BCD                ;用RSEG 表示函数可被连接器放置在任何地方

  28. ;========================================================================
  29. ;函数：N字节无符号二进制转十进制BCD码
  30. ;输入：*pri         
  31. ;输出：*pro
  32. ;资源：ACC、CY、R0、R1、R3、R4、R5、R7、leno?043
  33. ; ROM：59B（包括调用函数时的形参输入）

  35. _NBYTEBCD:
  36.         ;USING        0
  37.         MOV  A,R7
  38.         ADD  A,R5  
  39.         DEC  A     
  40.         MOV  R7,A
  41.        
  42.         MOV  A,leno?043
  43.         MOV  R4,A
  44.         ADD  A,R3
  45.         DEC  A      
  46.         MOV  R3,A

  48.         MOV  R0,A
  49. NP__0:
  50.          MOV  @R0,#0
  51.         DEC  R0
  52.         DJNZ R4,NP__0
  53.        
  54.         MOV  A,R5       ;转换(R5)字节二进制整数
  55.         RL   A
  56.         RL   A
  57.         RL   A
  58.         MOV  R1,A       ;计数器
  59.      CLR  C
  60. NP__1:       
  61.         MOV  A,R5
  62.         MOV  R4,A       ;循环(R5)次
  63.         MOV  A,R7
  64.         MOV  R0,A
  65. NP__2:
  66.          MOV  A,@R0      ;从高端移出待转换数的1位到CY中
  67.          RLC  A
  68.          MOV  @R0,A
  69.         DEC  R0
  70.         DJNZ R4,NP__2
  71.        
  72.         MOV  A,leno?043
  73.         MOV  R4,A       ;循环(leno)次
  74.         MOV  A,R3
  75.         MOV  R0,A
  76. NP__3:
  77.          MOV  A,@R0      ;BCD码带进位自身相加，相当于乘2
  78.          ADDC A,@R0
  79.          DA   A          ;十进制调整
  80.          MOV  @R0,A
  81.         DEC  R0
  82.         DJNZ R4,NP__3
  83.        
  84.          DJNZ R1,NP__1
  85.        
  86.          RET

  88.         END
复制代码使用方法，将 NBYTE_BCD.asm 添加到工程中，在 main.c 中声明后就可以调用，举例：
  1. unsigned char asc[8] = {0x0A,0xAA,0xAA,0xAA,0xAA,0xAA,0xAA,0xAA};
  2. unsigned char nz[10];

  4. extern void NBYTEBCD(unsigned char idata *pri, unsigned char leni, unsigned char idata *pro, unsigned char leno);

  6. void main(void)
  7. {
  8.         NBYTEBCD(asc, 8, nz, 10);
  9.        
  10.         while (1)
  11.         {
  12.                
  13.         }
  14. }
复制代码
友情提示: 此问题已得到解决，问题已经关闭,关闭后问题禁止继续编辑，回答。
该问题目前已经被作者或者管理员关闭, 无法添加新回复
16条回答
downtoearth
1楼-- · 2020-02-01 21:24
 精彩回答 2  元偷偷看……
BXAK
2楼-- · 2020-02-02 02:40
downtoearth 发表于 2012-9-29 06:43
汇编没有看懂，为什么不用C写一个呢，速度问题吗？

用C写这个N字节转换还真不会，
如果你有C写的可否帖上来
Rookie_li
3楼-- · 2020-02-02 05:44
/*
* @brief  exchange the data to BCD
* @param  *source : the data to exchange
* @param  *target : the data exchanged
* @param  number :        the bytes of source to change
* @retval None
*/
void Tool_ChangeTo_BCD(rt_uint8_t *source,rt_uint8_t *target,rt_uint8_t number)
{
        rt_uint8_t count;
        rt_uint8_t length;

        length = number;
        for(count = 0;count < length;count++)
        {
                if(count%2 == 0)
                {
                        *(target + count/2) = *(source + count);
                        *(target + count/2) &= 0x0F;
                }
                if(count%2 == 1)
                {
                        *(target + count/2) |= (*(source + count)<<4);
                }
        }
}
BXAK
4楼-- · 2020-02-02 10:00
Rookie_li 发表于 2012-9-29 09:55
/*
* @brief  exchange the data to BCD
* @param  *source : the data to exchange


这个程序好像是N位十进制 转 BCD码，而不是 N字节无符号二进制 转 BCD码
hameyou
5楼-- · 2020-02-02 10:11
C的那个肯定不对
downtoearth
6楼-- · 2020-02-02 14:50
 精彩回答 2  元偷偷看……
1 2 3 下一页

一周热门 更多>