【原创】中文or火星文互转！

憨憨问号

哈哈，很早就想写一个啦！但是一直没找到怎么转，这次找到方法啦！

效果展示：


思路：

共计2826个常用字，我将他们的中文和火星文全部整理出来，转换时只要将每个中文都转换成其对应的火星文即可！


步骤：
1.将2826个字逐字分割，分别存进“中文数组”“火星文数组”
因为文本较长，逐字分割我使用了精易的汇编版本

  

子程序名	返回值类型	公开	备 注
文本_逐字分割_汇编	整数型		超长文本计算时有优势
参数名	类 型	参考	可空	数组	备 注
参_内容	文本型
参_文本数组	文本型

变量名	类 型	静态	数组	备 注
返回值	文本型

返回值 ＝ 取空白文本 (取文本长度 (参_内容) × 2)
置入代码 ({ 139, 69, 8, 139, 48, 139, 125, 252, 172, 168, 128, 117, 26, 60, 32, 116, 247, 60, 9, 116, 243, 60, 13, 116, 239, 60, 10, 116, 235, 132, 192, 116, 28, 170, 176, 9, 170, 235, 225, 60, 161, 117, 10, 134, 224, 172, 60, 161, 116, 214, 134, 224, 78, 170, 172, 170, 176, 9, 170, 235, 203, 49, 192, 170 })
参_文本数组 ＝ 分割文本 (返回值, 到文本 ({ 9 }), )
返回 (取数组成员数 (参_文本数组))

.版本 2<br /> <br /> .子程序 文本_逐字分割_汇编, 整数型, , 超长文本计算时有优势<br /> .参数 参_内容, 文本型<br /> .参数 参_文本数组, 文本型, 数组<br /> .局部变量 返回值, 文本型<br /> <br /> 返回值 ＝ 取空白文本 (取文本长度 (参_内容) × 2)<br /> 置入代码 ({ 139, 69, 8, 139, 48, 139, 125, 252, 172, 168, 128, 117, 26, 60, 32, 116, 247, 60, 9, 116, 243, 60, 13, 116, 239, 60, 10, 116, 235, 132, 192, 116, 28, 170, 176, 9, 170, 235, 225, 60, 161, 117, 10, 134, 224, 172, 60, 161, 116, 214, 134, 224, 78, 170, 172, 170, 176, 9, 170, 235, 203, 49, 192, 170 })<br /> 参_文本数组 ＝ 分割文本 (返回值, 到文本 ({ 9 }), )<br /> 返回 (取数组成员数 (参_文本数组))

2.中文转火星文时，只需要计次循环2826次，执行
处理后文本 = 子文本替换 (原文, 全_普通话数组 , 全_火星文数组 , , , 真)
即可，如果是火星文转中文，同理！
3.没了，就是这么的简单


雖然莈什仫鼡，但莪覺嘚挺洧意思啲



注意：
火星文应该没有某种固定格式，是通过形近字来拼凑出汉句子，让学过汉字的人能够猜出句子代表的内容
比如“我”，既可以使用“莪”也可以试用‘睋’等字，如果你想要修改，只需要修改“火星文常量”中对应的字即可


源码回复可见~


普通话转火星文.e (31.83 KB, 下载次数: 15, 售价: 1 枚 精币)

2024-12-13 11:15 上传

点击文件名下载附件

impkq

感谢分享。。。

该死dē蚊子

感谢分享。。。

薇沐啊

感谢分享

一菜鸟

谢谢分享

fuguanli

很好，很强大！

wdjyltzh01

看看是啥

网络注册络员

支持楼主

麦八

雖然莈什仫鼡，但莪覺嘚挺洧意思啲

yang1990

雖然莈什仫鼡，但莪覺嘚挺洧意思啲