易语言任意进制转换

yh3215

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

编辑框2.内容 ＝ 进制转换 (编辑框1.内容, 16, 2)
编辑框3.内容 ＝ 进制转换 (编辑框1.内容, 16, 8)
编辑框4.内容 ＝ 进制转换 (编辑框1.内容, 16, 10)
编辑框5.内容 ＝ 进制转换 (编辑框1.内容, 16, 16)
编辑框6.内容 ＝ 进制转换 (编辑框1.内容, 16, 32)

子程序名	返回值类型	公开	备 注
进制转换	文本型
参数名	类 型	参考	可空	数组	备 注
被转换文本	文本型
被转换进制	整数型
转换的进制	整数型

变量名	类 型	静态	数组	备 注
计次变量
临时数值
欲转换文本	文本型

如果真 (被转换进制 ＝ 转换的进制)
返回 (被转换文本)
计次循环首 (取文本长度 (被转换文本), 计次变量)  ' 整数转换开始
临时数值 ＝ (寻找文本 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 取文本中间 (被转换文本, 计次变量, 1), , 真) － 1) × 求次方 (被转换进制, 取文本长度 (被转换文本) － 计次变量) ＋ 临时数值
计次循环尾 ()
判断循环首 (临时数值 ＞ 转换的进制 － 1)
欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 到数值 (到文本 (临时数值 ％ 转换的进制)) ＋ 1, 1) ＋ 欲转换文本
临时数值 ＝ 取整 (临时数值 ÷ 转换的进制)
判断循环尾 ()
欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 临时数值 ＋ 1, 1) ＋ 欲转换文本  ' 整数转换结束
返回 (欲转换文本)

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 编辑框2.内容 ＝ 进制转换 (编辑框1.内容, 16, 2)<br /> 编辑框3.内容 ＝ 进制转换 (编辑框1.内容, 16, 8)<br /> 编辑框4.内容 ＝ 进制转换 (编辑框1.内容, 16, 10)<br /> 编辑框5.内容 ＝ 进制转换 (编辑框1.内容, 16, 16)<br /> 编辑框6.内容 ＝ 进制转换 (编辑框1.内容, 16, 32)<br /> <br /> .子程序 进制转换, 文本型<br /> .参数 被转换文本, 文本型<br /> .参数 被转换进制, 整数型<br /> .参数 转换的进制, 整数型<br /> .局部变量 计次变量<br /> .局部变量 临时数值<br /> .局部变量 欲转换文本, 文本型<br /> <br /> .如果真 (被转换进制 ＝ 转换的进制)<br />     返回 (被转换文本)<br /> .如果真结束<br /> .计次循环首 (取文本长度 (被转换文本), 计次变量)  ' 整数转换开始<br />     临时数值 ＝ (寻找文本 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 取文本中间 (被转换文本, 计次变量, 1), , 真) － 1) × 求次方 (被转换进制, 取文本长度 (被转换文本) － 计次变量) ＋ 临时数值<br /> .计次循环尾 ()<br /> .判断循环首 (临时数值 ＞ 转换的进制 － 1)<br />     欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 到数值 (到文本 (临时数值 ％ 转换的进制)) ＋ 1, 1) ＋ 欲转换文本<br />     临时数值 ＝ 取整 (临时数值 ÷ 转换的进制)<br /> .判断循环尾 ()<br /> 欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 临时数值 ＋ 1, 1) ＋ 欲转换文本  ' 整数转换结束<br /> 返回 (欲转换文本)

进制转换例子.e (4.91 KB, 下载次数: 183)

2018-2-4 13:51 上传

点击文件名下载附件

huhuhuf

感谢分享，很给力！~

softking

学习一下源码

boomsa

谢谢你的支持,请继续努力!

风往北吹yyds

感谢开源  ~

q714

谢谢分享

HuangQAQ

谢谢谢谢谢

fengxiaokun

1233211234567

不看你喜人

谢谢分享

z123zhang

6666666666666666666666