特殊数字转换问题

啊浩呀

原文（13551452365）这个已经分组（1289组不重复的），这个特殊数字怎么分组跟原文一样的特殊数字，然后进行替换？
比如两位的45换成特殊数字的⁴⁵，

houtian

这不就是简单的替换么, 如果只是数字的话这样替换就行

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_上标	字节集
集_下标	字节集

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

变量名	类 型	静态	数组	备 注
局_替换结果	字节集
局_文件名	文本型

集_上标 ＝ { 185, 0, 178, 0, 179, 0, 116, 32, 117, 32, 118, 32, 119, 32, 120, 32, 121, 32, 112, 32 }
集_下标 ＝ { 129, 32, 130, 32, 131, 32, 132, 32, 133, 32, 134, 32, 135, 32, 136, 32, 137, 32, 128, 32 }
局_替换结果 ＝ 子程序1 (“135632125412”, “13”)
局_文件名 ＝ 取运行目录 () ＋ “\测试.txt”
写到文件 (局_文件名, { 255, 254 } ＋ 局_替换结果 ＋ { 0, 0 })
文件_执行 (局_文件名)

子程序名	返回值类型	公开	备 注
子程序1	字节集		Unicode
参数名	类 型	参考	可空	数组	备 注
参_待替换文本	文本型
参_特殊数字	文本型
参_是否下标	逻辑型

变量名	类 型	静态	数组	备 注
局_文本	文本型
局_数值	整数型
局_特殊数字	字节集
局_替换文本	字节集
局_特殊字节集	字节集
局_待替换文本	字节集
i	整数型

计次循环首 (取文本长度 (参_待替换文本), i)
局_待替换文本 ＝ 局_待替换文本 ＋ 到字节集 (取文本中间 (参_待替换文本, i, 1)) ＋ { 0 }
计次循环尾 ()
计次循环首 (取文本长度 (参_特殊数字), i)
局_文本 ＝ 取文本中间 (参_特殊数字, i, 1)
局_替换文本 ＝ 局_替换文本 ＋ 到字节集 (局_文本) ＋ { 0 }
局_数值 ＝ 到整数 (局_文本)
如果真 (局_数值 ＝ 0)
局_数值 ＝ 10
局_特殊字节集 ＝ 选择 (参_是否下标, 集_下标, 集_上标)
局_特殊数字 ＝ 局_特殊数字 ＋ 取字节集中间 (局_特殊字节集, (局_数值 － 1) × 2 ＋ 1, 2)
计次循环尾 ()
局_待替换文本 ＝ 子字节集替换 (局_待替换文本, 局_替换文本, 局_特殊数字, , )
返回 (局_待替换文本)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_上标, 字节集<br /> .程序集变量 集_下标, 字节集<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 局_替换结果, 字节集<br /> .局部变量 局_文件名, 文本型<br /> <br /> 集_上标 ＝ { 185, 0, 178, 0, 179, 0, 116, 32, 117, 32, 118, 32, 119, 32, 120, 32, 121, 32, 112, 32 }<br /> 集_下标 ＝ { 129, 32, 130, 32, 131, 32, 132, 32, 133, 32, 134, 32, 135, 32, 136, 32, 137, 32, 128, 32 }<br /> <br /> 局_替换结果 ＝ 子程序1 (“135632125412”, “13”)<br /> 局_文件名 ＝ 取运行目录 () ＋ “\测试.txt”<br /> 写到文件 (局_文件名, { 255, 254 } ＋ 局_替换结果 ＋ { 0, 0 })<br /> 文件_执行 (局_文件名)<br /> <br /> .子程序 子程序1, 字节集, , Unicode<br /> .参数 参_待替换文本, 文本型<br /> .参数 参_特殊数字, 文本型<br /> .参数 参_是否下标, 逻辑型, 可空<br /> .局部变量 局_文本, 文本型<br /> .局部变量 局_数值, 整数型<br /> .局部变量 局_特殊数字, 字节集<br /> .局部变量 局_替换文本, 字节集<br /> .局部变量 局_特殊字节集, 字节集<br /> .局部变量 局_待替换文本, 字节集<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取文本长度 (参_待替换文本), i)<br />     局_待替换文本 ＝ 局_待替换文本 ＋ 到字节集 (取文本中间 (参_待替换文本, i, 1)) ＋ { 0 }<br /> .计次循环尾 ()<br /> .计次循环首 (取文本长度 (参_特殊数字), i)<br />     局_文本 ＝ 取文本中间 (参_特殊数字, i, 1)<br />     局_替换文本 ＝ 局_替换文本 ＋ 到字节集 (局_文本) ＋ { 0 }<br />     局_数值 ＝ 到整数 (局_文本)<br />     .如果真 (局_数值 ＝ 0)<br />         局_数值 ＝ 10<br />     .如果真结束<br />     局_特殊字节集 ＝ 选择 (参_是否下标, 集_下标, 集_上标)<br />     局_特殊数字 ＝ 局_特殊数字 ＋ 取字节集中间 (局_特殊字节集, (局_数值 － 1) × 2 ＋ 1, 2)<br /> .计次循环尾 ()<br /> 局_待替换文本 ＝ 子字节集替换 (局_待替换文本, 局_替换文本, 局_特殊数字, , )<br /> 返回 (局_待替换文本)

黑咖啡

.版本 2  子文本替换 (, , , , , ) 子字节集替换 (, , , , )

啊浩呀

黑咖啡 发表于 2025-9-3 16:41
.版本 2  子文本替换 (, , , , , ) 子字节集替换 (, , , , )

这个知道。。就是替换以后是？跟中文乱码，我是放图片资源里弄得

啊浩呀

特殊数字分好以后替换是乱码，不知道是什么问题，我是图片资源字节集分的，保存文本打开看看是乱码，解决乱码问题编码试了挺多都没用，特殊数字就是上下标粗细0-9

hanzhang

啊浩呀 发表于 2025-9-3 16:44
这个知道。。就是替换以后是？跟中文乱码，我是放图片资源里弄得

不支持Unicode，在字节集里面替换

Ruang

不要用文本，用字节集的方式

啊浩呀

hanzhang 发表于 2025-9-3 16:54
不支持Unicode，在字节集里面替换

写到文件里用的字节集_子节集替换的，就是想看看分的特殊数字跟替换出来的对不对，但是替换出来的是乱码，自己创建的粘贴进去就可以看见特殊数字，写出来的就不行

啊浩呀

Ruang 发表于 2025-9-3 16:58
不要用文本，用字节集的方式

替换这个搞明白了，那个特殊数字分组我这怎么弄写到文本后就是乱码，那个直接写特殊数字倒是写出来可以，但是没分组不是对应的

啊浩呀

⁰ ¹ ² ³ ⁴ ⁵ ⁶ ⁷ ⁸ ⁹ ₀ ₁ ₂ ₃ ₄ ₅ ₆ ₇ ₈ ₉