MCS-51单片机实用子程序库 应用开发九

（３１） 标号： RTOD 功能：浮点弧度数转换成浮点度数

入口条件：浮点弧度数在[R0]中。
出口信息：转换成的浮点度数仍在[R0]中。
影响资源：PSW、A、B、R2～R7、位1EH、1FH 堆栈需求：６字节
RTOD: MOV R5,#6 ；系数（１８０／π）传送到第二工作区
MOV R6,#0E5H
MOV R7,#2FH
SJMP DR ；通过乘法进行转换

（３２） 标号： DTOR 功能：浮点度数转换成浮点弧度数

入口条件：浮点度数在[R0]中。
出口信息：转换成的浮点弧度数仍在[R0]中。
影响资源：PSW、A、B、R2～R7、位1EH、1FH 堆栈需求：６字节
DTOR: MOV R5,#0FBH；系数（π／１８０）传送到第二工作区
MOV R6,#8EH
MOV R7,#0FAH
DR: LCALL MVR0 ；将[R0]传送到第一工作区
CLR 1EH ；系数为正
LCALL MUL1 ；通过乘法进行转换
LJMP MOV0 ；结果传送到[R0]中
END 

论坛精选：
单片机教程:51单片机 五天速成出师系列一
http://bbs.huazhoucn.com/Topic.aspx?id=2244
单片机教程:51单片机 五天速成出师系列二
http://bbs.huazhoucn.com/Topic.aspx?id=2250
单片机教程:51单片机 五天速成出师系列三
http://bbs.huazhoucn.com/Topic.aspx?id=2251
单片机教程:51单片机 五天速成出师系列四
http://bbs.huazhoucn.com/Topic.aspx?id=2268
单片机教程:51单片机 五天速成出师系列五
http://bbs.huazhoucn.com/Topic.aspx?id=2269