开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 2302|回复: 5
收起左侧

[易语言纯源码] 文本字节集 转换 字节集类型 源码

[复制链接]

结帖率:100% (11/11)
发表于 2016-8-17 16:26:27 | 显示全部楼层 |阅读模式   贵州省遵义市
分享源码
界面截图: -
是否带模块: 纯源码
备注说明: -
在回答这个帖子的时候写的,原帖的代码不够优化
  
子程序名返回值类型公开备 注
字节集_查看后到字节集字节集 
参数名类 型参考可空数组备 注
查看后的字节集文本型
变量名类 型静态数组备 注
字节集字节集 
临时变量字节集 
字节数长整数型 
分割文本型0
开头字节集 
结尾字节集 
i整数型 
分割 = 分割文本 (查看后的字节集, “,”, )
字节数 = 取数组成员数 (分割)
如果真 (字节数 = 1)
返回 (到字节集 (到字节 (到整数 (取文本中间 (查看后的字节集, 2, 1)))))
开头 = 到字节集 (到字节 (到整数 (取文本右边 (分割 [1], 取文本长度 (分割 [1]) - 1))))
结尾 = 到字节集 (到字节 (到整数 (取文本左边 (分割 [字节数], 取文本长度 (分割 [字节数]) - 1))))
如果真 (字节数 = 2)
返回 (开头 + 结尾)
变量循环首 (2, 字节数 - 1, 1, i)
临时变量 = 临时变量 + 到字节集 (到字节 (到整数 (分割 [i])))
变量循环尾 ()
返回 (开头 + 临时变量 + 结尾)

然后撸了一管,转发到这里来,希望给其他易友也学习下
很简单的一个源码,反正写了也写了,就分享下拉。。。。

原来的文本:你好

文本字节集:{196,227,186,195}

字节集类型:{196,227,186,195}

  
子程序名返回值类型公开备 注
转换为字节集字节集 
参数名类 型参考可空数组备 注
文本字节集文本型
变量名类 型静态数组备 注
N整数型 
文本数组文本型0
字节长度整数型 
新字节集字节集 
文本数组 = 分割文本 (取文本中间 (文本字节集, 2, 取文本长度 (文本字节集) - 1), “,”, )
字节长度 = 取数组成员数 (文本数组)
新字节集 = 取空白字节集 (字节长度)
计次循环首 (字节长度, N)
新字节集 [N]到字节 (文本数组 [N])
计次循环尾 ()
返回 (新字节集)



评分

参与人数 1好评 +1 精币 +3 收起 理由
冰点 + 1 + 3 欢迎常来帮助新人,谢谢。

查看全部评分


结帖率:100% (1/1)
发表于 2016-8-28 14:39:26 | 显示全部楼层   江苏省扬州市
这个不错,以前没找到
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)
发表于 2016-8-18 23:30:55 | 显示全部楼层   海南省海口市
感谢分享,支持一下!
回复 支持 反对

使用道具 举报

结帖率:92% (24/26)

签到天数: 21 天

发表于 2016-8-18 12:07:44 | 显示全部楼层   河南省开封市
++++++++++++++
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)
发表于 2016-8-17 17:35:44 | 显示全部楼层   福建省厦门市
支持一下 好厉害好厉害哦
回复 支持 反对

使用道具 举报

结帖率:73% (8/11)

签到天数: 2 天

发表于 2016-8-17 16:42:02 | 显示全部楼层   河南省安阳市
撸了一管。。。。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表