清除源码内的备注文本

呓语丶

路人丁20 发表于 2021-2-15 10:47
调用支持库+模块 这样的BUG更多，如果有数组  某某[1]  就会变成 某某1 代码就错误了 ...

这样就行了    最后一步的处理文本改改就行了
这个代码稍微改改   能适应不少情况
比如判断子程序公开的情况   再删除注释

  

子程序名	返回值类型	公开	备 注
删除注释	文本型
参数名	类 型	参考	可空	数组	备 注
代码文本	文本型

变量名	类 型	静态	数组	备 注
局_列表	存取列表
局_计次	整数型
局_文本	文本型
局_返回文本	文本型
局_列表2	存取列表
局_还原代码	文本型

' //   .子程序 初始化服务器, , , 撒大大
' // 用换行符分割行   用 , 分割列
局_列表.从文本分割 (代码文本, #换行符, “,”, , , , )
' 输出调试 (局_列表.到文本 ())
计次循环首 (局_列表.取数量 (), 局_计次)
' // 取出代码行
局_文本 ＝ 局_列表.取文本 (创建文本 (“[{1}].[1]”, 局_计次), )
判断 (寻找文本 (局_文本, “.子程序”, , 假) ≠ -1 或 寻找文本 (局_文本, “.参数”, , 假) ≠ -1)
' // 存在子程序标识  或者参数标识
' // 如果想判断是否是公开子程序  就照着这个写就行
' // 局_列表.取文本 (创建文本 (“[{1}].[3]”, 局_计次), )   这个取出来如果是公开  那就是公开子程序
局_列表.取列表 (局_计次, 局_列表2)
' // 直接给注释部分赋值空文本
局_列表2.置文本 (4, “”)
' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看
' 局_列表.删除 (创建文本 (“[{1}].[4]”, 局_计次), -1)
局_列表2.删除 (4, -1)
局_列表.置列表 (局_计次, 局_列表2, )

判断 (寻找文本 (局_文本, “.局部变量”, , 假) ≠ -1 或 寻找文本 (局_文本, “.程序集变量”, , 假) ≠ -1)
' // 存在参数标识
' // 直接给注释部分赋值空文本
局_列表.取列表 (局_计次, 局_列表2)
' // 直接给注释部分赋值空文本
局_列表2.置文本 (5, “”)
' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看
局_列表2.删除 (5, -1)
局_列表.置列表 (局_计次, 局_列表2, )



局_还原代码 ＝ 局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), )
局_还原代码 ＝ 取文本左边 (局_还原代码, 取文本长度 (局_还原代码) － 1)
局_还原代码 ＝ 取文本右边 (局_还原代码, 取文本长度 (局_还原代码) － 1)
如果 (局_计次 ＝ 1)
局_返回文本 ＝ 局_还原代码
局_返回文本 ＝ 局_返回文本 ＋ #换行符 ＋ 局_还原代码

计次循环尾 ()
返回 (局_返回文本)

i支持库列表	支持库注释
e2ee	E2EE互联网服务器套件

.版本 2<br /> .支持库 e2ee<br /> <br /> .子程序 删除注释, 文本型<br /> .参数 代码文本, 文本型<br /> .局部变量 局_列表, 存取列表<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_文本, 文本型<br /> .局部变量 局_返回文本, 文本型<br /> .局部变量 局_列表2, 存取列表<br /> .局部变量 局_还原代码, 文本型<br /> <br /> ' //   .子程序 初始化服务器, , , 撒大大<br /> ' // 用换行符分割行   用 , 分割列<br /> 局_列表.从文本分割 (代码文本, #换行符, “,”, , , , )<br /> ' 输出调试 (局_列表.到文本 ())<br /> .计次循环首 (局_列表.取数量 (), 局_计次)<br />     ' // 取出代码行<br />     局_文本 ＝ 局_列表.取文本 (创建文本 (“[{1}].[1]”, 局_计次), )<br /> <br />     .判断开始 (寻找文本 (局_文本, “.子程序”, , 假) ≠ -1 或 寻找文本 (局_文本, “.参数”, , 假) ≠ -1)<br />         ' // 存在子程序标识  或者参数标识<br />         ' // 如果想判断是否是公开子程序  就照着这个写就行<br />         ' // 局_列表.取文本 (创建文本 (“[{1}].[3]”, 局_计次), )   这个取出来如果是公开  那就是公开子程序<br />         局_列表.取列表 (局_计次, 局_列表2)<br />         ' // 直接给注释部分赋值空文本<br />         局_列表2.置文本 (4, “”)<br />         ' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看<br />         ' 局_列表.删除 (创建文本 (“[{1}].[4]”, 局_计次), -1)<br />         局_列表2.删除 (4, -1)<br />         局_列表.置列表 (局_计次, 局_列表2, )<br /> <br />     .判断 (寻找文本 (局_文本, “.局部变量”, , 假) ≠ -1 或 寻找文本 (局_文本, “.程序集变量”, , 假) ≠ -1)<br />         ' // 存在参数标识<br />         ' // 直接给注释部分赋值空文本<br />         局_列表.取列表 (局_计次, 局_列表2)<br />         ' // 直接给注释部分赋值空文本<br />         局_列表2.置文本 (5, “”)<br />         ' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看<br />         局_列表2.删除 (5, -1)<br />         局_列表.置列表 (局_计次, 局_列表2, )<br />     .默认<br /> <br />     .判断结束<br /> <br />     局_还原代码 ＝ 局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), )<br />     局_还原代码 ＝ 取文本左边 (局_还原代码, 取文本长度 (局_还原代码) － 1)<br />     局_还原代码 ＝ 取文本右边 (局_还原代码, 取文本长度 (局_还原代码) － 1)<br /> <br />     .如果 (局_计次 ＝ 1)<br />         局_返回文本 ＝ 局_还原代码<br />     .否则<br />         局_返回文本 ＝ 局_返回文本 ＋ #换行符 ＋ 局_还原代码<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> <br /> 返回 (局_返回文本)

敬你

感谢大佬分享

呓语丶

芒果一号 发表于 2021-2-15 11:41
别人发帖子，你能干是吧，非要发内容出来，复制粘贴厉害?

自己去看看帖子内容   在看看我发的代码
但凡带一点脑子也不能这么回复我

芒果一号

呓语丶 发表于 2021-2-15 03:07
用了E2EE支持库和精易模块
能删除子程序注释  参数注释   变量注释
[e=4].版本 2

别人发帖子，你能干是吧，非要发内容出来，复制粘贴厉害?

路人丁20

呓语丶 发表于 2021-2-15 03:08
用了E2EE支持库和精易模块
能删除子程序注释  参数注释   变量注释
[e=4].版本 2

调用支持库+模块 这样的BUG更多，如果有数组  某某[1]  就会变成 某某1 代码就错误了

snak2020

学习学习

呓语丶

用了E2EE支持库和精易模块
能删除子程序注释  参数注释   变量注释

  

子程序名	返回值类型	公开	备 注
删除注释	文本型
参数名	类 型	参考	可空	数组	备 注
代码文本	文本型

变量名	类 型	静态	数组	备 注
局_列表	存取列表
局_计次	整数型
局_文本	文本型
局_返回文本	文本型
局_列表2	存取列表

' //   .子程序 初始化服务器, , , 撒大大
' // 用换行符分割行   用 , 分割列
局_列表.从文本分割 (代码文本, #换行符, “,”, , , , )
' 输出调试 (局_列表.到文本 ())
计次循环首 (局_列表.取数量 (), 局_计次)
' // 取出代码行
局_文本 ＝ 局_列表.取文本 (创建文本 (“[{1}].[1]”, 局_计次), )
判断 (寻找文本 (局_文本, “.子程序”, , 假) ≠ -1 或 寻找文本 (局_文本, “.参数”, , 假) ≠ -1)
' // 存在子程序标识  或者参数标识
' // 如果想判断是否是公开子程序  就照着这个写就行
' // 局_列表.取文本 (创建文本 (“[{1}].[3]”, 局_计次), )   这个取出来如果是公开  那就是公开子程序
局_列表.取列表 (局_计次, 局_列表2)
' // 直接给注释部分赋值空文本
局_列表2.置文本 (4, “”)
' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看
' 局_列表.删除 (创建文本 (“[{1}].[4]”, 局_计次), -1)
局_列表2.删除 (4, -1)
局_列表.置列表 (局_计次, 局_列表2, )

判断 (寻找文本 (局_文本, “.局部变量”, , 假) ≠ -1 或 寻找文本 (局_文本, “.程序集变量”, , 假) ≠ -1)
' // 存在参数标识
' // 直接给注释部分赋值空文本
局_列表.取列表 (局_计次, 局_列表2)
' // 直接给注释部分赋值空文本
局_列表2.置文本 (5, “”)
' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看
局_列表2.删除 (5, -1)
局_列表.置列表 (局_计次, 局_列表2, )



如果 (局_计次 ＝ 1)
局_返回文本 ＝ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )
局_返回文本 ＝ 局_返回文本 ＋ #换行符 ＋ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )

计次循环尾 ()
返回 (局_返回文本)

i支持库列表	支持库注释
e2ee	E2EE互联网服务器套件

.版本 2<br /> .支持库 e2ee<br /> <br /> .子程序 删除注释, 文本型<br /> .参数 代码文本, 文本型<br /> .局部变量 局_列表, 存取列表<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_文本, 文本型<br /> .局部变量 局_返回文本, 文本型<br /> .局部变量 局_列表2, 存取列表<br /> <br /> ' //   .子程序 初始化服务器, , , 撒大大<br /> ' // 用换行符分割行   用 , 分割列<br /> 局_列表.从文本分割 (代码文本, #换行符, “,”, , , , )<br /> ' 输出调试 (局_列表.到文本 ())<br /> .计次循环首 (局_列表.取数量 (), 局_计次)<br />     ' // 取出代码行<br />     局_文本 ＝ 局_列表.取文本 (创建文本 (“[{1}].[1]”, 局_计次), )<br /> <br />     .判断开始 (寻找文本 (局_文本, “.子程序”, , 假) ≠ -1 或 寻找文本 (局_文本, “.参数”, , 假) ≠ -1)<br />         ' // 存在子程序标识  或者参数标识<br />         ' // 如果想判断是否是公开子程序  就照着这个写就行<br />         ' // 局_列表.取文本 (创建文本 (“[{1}].[3]”, 局_计次), )   这个取出来如果是公开  那就是公开子程序<br />         局_列表.取列表 (局_计次, 局_列表2)<br />         ' // 直接给注释部分赋值空文本<br />         局_列表2.置文本 (4, “”)<br />         ' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看<br />         ' 局_列表.删除 (创建文本 (“[{1}].[4]”, 局_计次), -1)<br />         局_列表2.删除 (4, -1)<br />         局_列表.置列表 (局_计次, 局_列表2, )<br /> <br />     .判断 (寻找文本 (局_文本, “.局部变量”, , 假) ≠ -1 或 寻找文本 (局_文本, “.程序集变量”, , 假) ≠ -1)<br />         ' // 存在参数标识<br />         ' // 直接给注释部分赋值空文本<br />         局_列表.取列表 (局_计次, 局_列表2)<br />         ' // 直接给注释部分赋值空文本<br />         局_列表2.置文本 (5, “”)<br />         ' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看<br />         局_列表2.删除 (5, -1)<br />         局_列表.置列表 (局_计次, 局_列表2, )<br />     .默认<br /> <br />     .判断结束<br /> <br />     .如果 (局_计次 ＝ 1)<br />         局_返回文本 ＝ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )<br />     .否则<br />         局_返回文本 ＝ 局_返回文本 ＋ #换行符 ＋ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> <br /> 返回 (局_返回文本)

呓语丶

用了E2EE支持库和精易模块
能删除子程序注释  参数注释   变量注释

  

子程序名	返回值类型	公开	备 注
删除注释	文本型
参数名	类 型	参考	可空	数组	备 注
代码文本	文本型

变量名	类 型	静态	数组	备 注
局_列表	存取列表
局_计次	整数型
局_文本	文本型
局_返回文本	文本型
局_列表2	存取列表

' //   .子程序 初始化服务器, , , 撒大大
' // 用换行符分割行   用 , 分割列
局_列表.从文本分割 (代码文本, #换行符, “,”, , , , )
' 输出调试 (局_列表.到文本 ())
计次循环首 (局_列表.取数量 (), 局_计次)
' // 取出代码行
局_文本 ＝ 局_列表.取文本 (创建文本 (“[{1}].[1]”, 局_计次), )
判断 (寻找文本 (局_文本, “.子程序”, , 假) ≠ -1 或 寻找文本 (局_文本, “.参数”, , 假) ≠ -1)
' // 存在子程序标识  或者参数标识
' // 如果想判断是否是公开子程序  就照着这个写就行
' // 局_列表.取文本 (创建文本 (“[{1}].[3]”, 局_计次), )   这个取出来如果是公开  那就是公开子程序
局_列表.取列表 (局_计次, 局_列表2)
' // 直接给注释部分赋值空文本
局_列表2.置文本 (4, “”)
' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看
' 局_列表.删除 (创建文本 (“[{1}].[4]”, 局_计次), -1)
局_列表2.删除 (4, -1)
局_列表.置列表 (局_计次, 局_列表2, )

判断 (寻找文本 (局_文本, “.局部变量”, , 假) ≠ -1 或 寻找文本 (局_文本, “.程序集变量”, , 假) ≠ -1)
' // 存在参数标识
' // 直接给注释部分赋值空文本
局_列表.取列表 (局_计次, 局_列表2)
' // 直接给注释部分赋值空文本
局_列表2.置文本 (5, “”)
' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看
局_列表2.删除 (5, -1)
局_列表.置列表 (局_计次, 局_列表2, )



如果 (局_计次 ＝ 1)
局_返回文本 ＝ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )
局_返回文本 ＝ 局_返回文本 ＋ #换行符 ＋ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )

计次循环尾 ()
返回 (局_返回文本)

i支持库列表	支持库注释
e2ee	E2EE互联网服务器套件

.版本 2<br /> .支持库 e2ee<br /> <br /> .子程序 删除注释, 文本型<br /> .参数 代码文本, 文本型<br /> .局部变量 局_列表, 存取列表<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_文本, 文本型<br /> .局部变量 局_返回文本, 文本型<br /> .局部变量 局_列表2, 存取列表<br /> <br /> ' //   .子程序 初始化服务器, , , 撒大大<br /> ' // 用换行符分割行   用 , 分割列<br /> 局_列表.从文本分割 (代码文本, #换行符, “,”, , , , )<br /> ' 输出调试 (局_列表.到文本 ())<br /> .计次循环首 (局_列表.取数量 (), 局_计次)<br />     ' // 取出代码行<br />     局_文本 ＝ 局_列表.取文本 (创建文本 (“[{1}].[1]”, 局_计次), )<br /> <br />     .判断开始 (寻找文本 (局_文本, “.子程序”, , 假) ≠ -1 或 寻找文本 (局_文本, “.参数”, , 假) ≠ -1)<br />         ' // 存在子程序标识  或者参数标识<br />         ' // 如果想判断是否是公开子程序  就照着这个写就行<br />         ' // 局_列表.取文本 (创建文本 (“[{1}].[3]”, 局_计次), )   这个取出来如果是公开  那就是公开子程序<br />         局_列表.取列表 (局_计次, 局_列表2)<br />         ' // 直接给注释部分赋值空文本<br />         局_列表2.置文本 (4, “”)<br />         ' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看<br />         ' 局_列表.删除 (创建文本 (“[{1}].[4]”, 局_计次), -1)<br />         局_列表2.删除 (4, -1)<br />         局_列表.置列表 (局_计次, 局_列表2, )<br /> <br />     .判断 (寻找文本 (局_文本, “.局部变量”, , 假) ≠ -1 或 寻找文本 (局_文本, “.程序集变量”, , 假) ≠ -1)<br />         ' // 存在参数标识<br />         ' // 直接给注释部分赋值空文本<br />         局_列表.取列表 (局_计次, 局_列表2)<br />         ' // 直接给注释部分赋值空文本<br />         局_列表2.置文本 (5, “”)<br />         ' // 如果注释中包含","符号,会出现错误,我表达不清楚,你可以注释下边这行试试看<br />         局_列表2.删除 (5, -1)<br />         局_列表.置列表 (局_计次, 局_列表2, )<br />     .默认<br /> <br />     .判断结束<br /> <br />     .如果 (局_计次 ＝ 1)<br />         局_返回文本 ＝ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )<br />     .否则<br />         局_返回文本 ＝ 局_返回文本 ＋ #换行符 ＋ 文本_替换 (局_列表.取文本 (创建文本 (“[{1}]”, 局_计次), ), , , , “[”, “”, “]”, “”, , , , , , , , , , )<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> <br /> 返回 (局_返回文本)

凉城o

路过围观一下，顺便帮顶

zhifu3158

支持开源~！感谢分享