进制_十到十六不能转换负数

ppoo00ii

进制_十到十六不能转换负数，我试改了下不知道对不对

.版本 2

.子程序 进制_十到十六, 文本型
.参数 十进制数, 长整数型
.局部变量 余数数组, 文本型, , "16"
.局部变量 tempint, 长整数型
.局部变量 str, 文本型
.局部变量 余, 整数型

' 余数数组 ＝ { “0”, “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9”, “A”, “B”, “C”, “D”, “E”, “F” }
余数数组 ＝ { “F”, “E”, “D”, “C”, “B”, “A”, “9”, “8”, “7”, “6”, “5”, “4”, “3”, “2”, “1”, “0” }
tempint ＝ 取绝对值 (十进制数 ＋ 1)
.判断循环首 (tempint ≥ 0)  ' 除16取余，结果倒序
    余 ＝ tempint ％ 16
    str ＝ 余数数组 [余 ＋ 1] ＋ str
    tempint ＝ (tempint － 余) ÷ 16  ' zc()
    .如果真 (tempint ≤ 0)  ' 如果为0，则跳出循环。
        跳出循环 ()
    .如果真结束

.判断循环尾 ()
.计次循环首 (8 － 取文本长度 (str), )  ' 32位
    str ＝ “F” ＋ str
.计次循环尾 ()
返回 (str)

ppoo00ii

萧阳天 发表于 2016-2-26 22:46
十进制整数型怎么会出负数，网页在线版工具都转换不了负数，还有你修改的有问题

十进制整数怎么会没有负数呢，不是还有符号整数和无符号整数吗

我是因为用到负数转换成十六进制，才发现精易模块转换不对

这个代码我就测试过几个负数，和计算器对比结果是对的

wasd84560

44444444444444

萧阳天

十进制整数型怎么会出负数，网页在线版工具都转换不了负数，还有你修改的有问题