十到十六完美版（支持长整数，正负数，是否去除前面零）

腾讯小攸

需要用到精易模块命令，不想用的自己去扣源码，我主要是方便自己使用而已，我发现精易原先的十到十六，不支持负数，并且不支持保留00在前边

为了符合我自己的使用需求，自己就写了一份完美版的。

  

子程序名	返回值类型	公开	备 注
十到十六	文本型
参数名	类 型	参考	可空	数组	备 注
十进制	长整数型
是否不去零	逻辑型				默认为假

变量名	类 型	静态	数组	备 注
整数十进制	整数型
结果	文本型

如果 (十进制 ≤ 2147483647 且 十进制 ≥ -2147483647)
整数十进制 ＝ 十进制
结果 ＝ 字节集_字节集到十六进制 (字节集_反转 (到字节集 (整数十进制)))
结果 ＝ 字节集_字节集到十六进制 (字节集_反转 (到字节集 (十进制)))

如果真 (是否不去零 ＝ 真)
判断循环首 (取文本左边 (结果, 2) ＝ “00”)
结果 ＝ 取文本右边 (结果, 取文本长度 (结果) － 2)
判断循环尾 ()
返回 (结果)

.版本 2<br /> <br /> .子程序 十到十六, 文本型, 公开<br /> .参数 十进制, 长整数型<br /> .参数 是否不去零, 逻辑型, 可空, 默认为假<br /> .局部变量 整数十进制, 整数型<br /> .局部变量 结果, 文本型<br /> <br /> .如果 (十进制 ≤ 2147483647 且 十进制 ≥ -2147483647)<br />     整数十进制 ＝ 十进制<br />     结果 ＝ 字节集_字节集到十六进制 (字节集_反转 (到字节集 (整数十进制)))<br /> .否则<br />     结果 ＝ 字节集_字节集到十六进制 (字节集_反转 (到字节集 (十进制)))<br /> .如果结束<br /> <br /> .如果真 (是否不去零 ＝ 真)<br />     .判断循环首 (取文本左边 (结果, 2) ＝ “00”)<br />         结果 ＝ 取文本右边 (结果, 取文本长度 (结果) － 2)<br />     .判断循环尾 ()<br /> .如果真结束<br /> 返回 (结果)

大司命

用错方法得到的结果自然不一样！

liyajun000

1111111111111111111111111111111

liaoxiaohu

666666666666

yuxuanju

进制转换，非常棒。

xiaojiancccc

感谢分享，很给力！~

紙鳶

感谢分享

lmwdz

感谢大神分享

我非平凡

[分享源码] 一个简单的电脑挂机锁 源码（无模块）

happyweeks365

666666666666666666666

不苦小和尚

大司命 发表于 2024-1-13 14:33
用错方法得到的结果自然不一样！

他的方法没有问题，是吧？