发一个三十六到十进制 十到三十六进制源码

秦天

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

调试输出 (十到三十六 (111111111) ＝ “1u5hvr”)
调试输出 (三十六到十 (“1u5hvr”) ＝ 111111111)
结束 ()

子程序名	返回值类型	公开	备 注
三十六到十	长整数型
参数名	类 型	参考	可空	数组	备 注
三十六进制字符	文本型

变量名	类 型	静态	数组	备 注
进制字符	字节集
字符长度	整数型
十进制	长整数型
x	整数型

进制字符 ＝ 到字节集 (三十六进制字符)
字符长度 ＝ 取字节集长度 (进制字符)
计次循环首 (字符长度, x)
十进制 ＝ 十进制 ＋ 三十六到十进制对照 (进制字符 [x]) × 求次方 (36, 字符长度 － x)
计次循环尾 ()
返回 (十进制)

子程序名	返回值类型	公开	备 注
三十六到十进制对照	整数型
参数名	类 型	参考	可空	数组	备 注
x	字节型

如果真 (x ＜ 58)
返回 (x － 48)
返回 (x － 87)

子程序名	返回值类型	公开	备 注
十到三十六	文本型
参数名	类 型	参考	可空	数组	备 注
十进制数值	长整数型

变量名	类 型	静态	数组	备 注
三十六进制	文本型
整除数	长整数型

三十六进制 ＝ “”
整除数 ＝ 十进制数值
判断循环首 (真)
整除数 ＝ 整除数 ＼ 36
如果真 (整除数 ＝ 0)
三十六进制 ＝ 三十六进制 ＋ 十到三十六进制对照 (十进制数值 ％ 36)
跳出循环 ()
三十六进制 ＝ 十到三十六进制对照 (整除数 ％ 36) ＋ 三十六进制
判断循环尾 ()
返回 (三十六进制)

子程序名	返回值类型	公开	备 注
十到三十六进制对照	文本型
参数名	类 型	参考	可空	数组	备 注
x	长整数型

如果真 (x ＜ 10)
返回 (字符 (48 ＋ x))
返回 (字符 (87 ＋ x))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 调试输出 (十到三十六 (111111111) ＝ “1u5hvr”)<br /> 调试输出 (三十六到十 (“1u5hvr”) ＝ 111111111)<br /> 结束 ()<br /> <br /> <br /> .子程序 三十六到十, 长整数型<br /> .参数 三十六进制字符, 文本型<br /> .局部变量 进制字符, 字节集<br /> .局部变量 字符长度, 整数型<br /> .局部变量 十进制, 长整数型<br /> .局部变量 x, 整数型<br /> <br /> 进制字符 ＝ 到字节集 (三十六进制字符)<br /> 字符长度 ＝ 取字节集长度 (进制字符)<br /> .计次循环首 (字符长度, x)<br />     十进制 ＝ 十进制 ＋ 三十六到十进制对照 (进制字符 [x]) × 求次方 (36, 字符长度 － x)<br /> .计次循环尾 ()<br /> 返回 (十进制)<br /> <br /> .子程序 三十六到十进制对照, 整数型<br /> .参数 x, 字节型<br /> <br /> .如果真 (x ＜ 58)<br />     返回 (x － 48)<br /> .如果真结束<br /> 返回 (x － 87)<br /> <br /> .子程序 十到三十六, 文本型<br /> .参数 十进制数值, 长整数型<br /> .局部变量 三十六进制, 文本型<br /> .局部变量 整除数, 长整数型<br /> <br /> 三十六进制 ＝ “”<br /> 整除数 ＝ 十进制数值<br /> .判断循环首 (真)<br />     整除数 ＝ 整除数 ＼ 36<br />     .如果真 (整除数 ＝ 0)<br />         三十六进制 ＝ 三十六进制 ＋ 十到三十六进制对照 (十进制数值 ％ 36)<br />         跳出循环 ()<br />     .如果真结束<br />     三十六进制 ＝ 十到三十六进制对照 (整除数 ％ 36) ＋ 三十六进制<br /> .判断循环尾 ()<br /> 返回 (三十六进制)<br /> <br /> .子程序 十到三十六进制对照, 文本型<br /> .参数 x, 长整数型<br /> <br /> .如果真 (x ＜ 10)<br />     返回 (字符 (48 ＋ x))<br /> .如果真结束<br /> 返回 (字符 (87 ＋ x))

36.e (4.13 KB, 下载次数: 19)

2020-8-1 18:08 上传

点击文件名下载附件

ghost12

感谢你的支持，精易有你更精彩

寡人i

来看看

tapouki

正是我需要的

wjswzj0

666666666666666666