51单片机

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

2020-02-01 16:23发布

站内问答 / 51单片机
5369 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-02 16:34
想了一会写了这程序，我还是很菜，有什么错误的地方望大家多点指导，口下流情。
  1. #include <STRING.H>
  2. uchar Data[]= {0x0A,0xAA,0xAA,0xAA,0xAA,0xAA,0xAA,0xAA};
  3. uchar BCD[]={0};
  4. uchar Four_Bit_BCD (uchar Data)
  5. {
  6. uchar Data_Temp ;
  7. switch (Data)
  8.         {
  9.                  case 0 : Data_Temp = 0x00 ; break ;
  10.                  case 1 : Data_Temp = 0x01 ; break ;
  11.                  case 2 : Data_Temp = 0x02 ; break ;
  12.                  case 3 : Data_Temp = 0x03 ; break ;
  13.                  case 4 : Data_Temp = 0x04 ; break ;
  14.                  case 5 : Data_Temp = 0x05 ; break ;
  15.                  case 6 : Data_Temp = 0x06 ; break ;
  16.                  case 7 : Data_Temp = 0x07 ; break ;
  17.                  case 8 : Data_Temp = 0x08 ; break ;
  18.                  case 9 : Data_Temp = 0x09 ; break ;
  19.                  default : break ;
  20.                 }
  21. return Data_Temp ;
  22. }

  24. void Data_Change_BCD(uchar *Data_P,uchar *BCD_P)
  25. {
  26. uchar i ;
  27. uchar Data_Temp_L,Data_Temp_H;
  28. i=strlen(Data_P);
  29. for (; i>0; i--)
  30.       {
  31.            Data_Temp_L = *Data_P  % 10 ;
  32.            Data_Temp_H = *Data_P  / 10 ;
  33.            *BCD_P = Four_Bit_BCD( Data_Temp_H )<<4+Four_Bit_BCD( Data_Temp_L );
  34.            Data_P++;
  35.            BCD_P++ ;
  36.           }
  37. }
复制代码
BXAK
2楼-- · 2020-02-02 18:12
downtoearth 发表于 2012-9-29 14:05
想了一会写了这程序，我还是很菜，有什么错误的地方望大家多点指导，口下流情。 ...

好像不对头，比如：
十六进制0xFF = 十进制255，将 十六进制0xFF 转换成 BCD 结果应该是 0x0225
十六进制0x0FFF FFFF FFFF FFFF = 十进制1,152,921,504,606,846,975，将 十六进制0x0FFF FFFF FFFF FFFF 转换成 BCD 结果应该是 0x01152921504606846975
downtoearth
3楼-- · 2020-02-02 20:50
本帖最后由 downtoearth 于 2012-9-29 14:31 编辑

BCD码不是用4位的二进制数表示1位的十进制数中的0-9吗？那么一个8位二进制数就是只可以表示0-99咯！
那为什么有0xAA的数据的。不明白，跟帖弄个究竟.理解错，我再想想！
BXAK
4楼-- · 2020-02-03 02:21
本帖最后由 BXAK 于 2012-9-29 15:28 编辑
downtoearth 发表于 2012-9-29 14:28
BCD码不是用4位的二进制数表示1位的十进制数中的0-9吗？那么一个8位二进制数就是只可以表示0-99咯！
那为什 ...


1字节（即8位）无符号二进制数：0000 0000 ~ 1111 1111         
对应 十六进制：0x00 ~ 0xFF   
对应    十进制：0 ~ 255

比如想把十六进制数以十进制显示到数码管、液晶屏……时，
如果小于等于4字节时直接用除法和求余提取就可以，如：
unsigned int n = 12345;
十万位 = n/10000;
万位 = n/1000%10;
……
但如果8字节、……的十六进制数时，上面的方法行不通（keil C51支持最大的整形数据是unsigned long，4字节），这就需要把 8字节、……的十六进制数 先转成BCD


之所以弄这个程序是因为想做等精度频率计，需要公式 fx = (fo * nx) / no，其中:
unsigned long code fo = 22118400UL;
unsigned long no,nx;
运算中为了精确没有用浮点float运算，keil C51不支持double。
(fo * nx) 的积是 8字节十六进制，
(fo * nx) / no 的商是 8字节十六进制，余数是 4字节十六进制

downtoearth
5楼-- · 2020-02-03 02:39
 精彩回答 2  元偷偷看……
downtoearth
6楼-- · 2020-02-03 02:52
本帖最后由 downtoearth 于 2012-9-29 16:04 编辑
BXAK 发表于 2012-9-29 15:20
1字节（即8位）无符号二进制数：0000 0000 ~ 1111 1111         
对应 十六进制：0x00 ~ 0xFF   
对应   ...


哦，原来是这样，好复杂呀，不过我在keil51中用过double型数据修饰符，为什么编译器没有报错的。运算正确奇怪！
上一页 1 2 3 下一页

一周热门 更多>