十进制转换二/八进制工具源码

.版本 2

.子程序 十转二, 文本型
.参数 十进制数, 长整数型
.局部变量 temp, 文本型

temp ＝ “                                                                ”
置入代码 ({ 86, 83, 139, 69, 8, 139, 85, 12, 139, 93, 252, 131, 195, 63, 137, 198, 9, 214, 116, 23, 80, 131, 224, 1, 131, 200, 48, 136, 3, 88, 75, 185, 1, 0, 0, 0, 232, 6, 0, 0, 0, 235, 227, 91, 94, 235, 33, 128, 249, 64, 115, 22, 128, 249, 32, 115, 6, 15, 173, 208, 211, 250, 195, 137, 208, 193, 250, 31, 128, 225, 31, 211, 248, 195, 193, 250, 31, 137, 208, 195 })
返回 (删首空 (temp))

.子程序 十转八, 文本型
.参数 十进制数, 长整数型
.局部变量 temp, 文本型

temp ＝ “                      ”
置入代码 ({ 86, 83, 139, 69, 8, 139, 85, 12, 139, 93, 252, 131, 195, 21, 137, 198, 9, 214, 116, 23, 80, 131, 224, 7, 131, 200, 48, 136, 3, 88, 75, 185, 3, 0, 0, 0, 232, 6, 0, 0, 0, 235, 227, 91, 94, 235, 33, 128, 249, 64, 115, 22, 128, 249, 32, 115, 6, 15, 173, 208, 211, 250, 195, 137, 208, 193, 250, 31, 128, 225, 31, 211, 248, 195, 193, 250, 31, 137, 208, 195 })
返回 (删首空 (temp))