怎么随机给一句话加变量

tyxy100

比如
[早上，中午，晚上]在宁静的夜晚[睡觉，吃夜宵，打游戏]，过的很开心。
[]里面的是变量，并且[]的位置不固定。
这样输出就是
早上在宁静的夜晚睡觉，过的很开心。
中午在宁静的夜晚睡觉，过的很开心。
晚上在宁静的夜晚睡觉，过的很开心。
早上在宁静的夜晚吃夜宵，过的很开心。
中午在宁静的夜晚吃夜宵，过的很开心。
晚上在宁静的夜晚吃夜宵，过的很开心。

早上在宁静的夜晚打游戏，过的很开心。
中午在宁静的夜晚打游戏，过的很开心。
晚上在宁静的夜晚打游戏，过的很开心。


这种该怎么写。

w589321

随机给一句话加变量_全部.e (956.84 KB, 下载次数: 4)

2024-10-8 00:37 上传

点击文件名下载附件

有点烧脑，一直想着怎么递归，不过还是搞出来了。

  

窗口程序集名	保 留	保 留	备 注
程序集1
变量名	类 型	数组	备 注
集_所有内容	文本型

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

子程序1 (“[早上，中午，晚上]在宁静的夜晚[睡觉，吃夜宵，打游戏，运动]，过的很开心。”)
信息框 (集_所有内容, 64, , )
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
子程序1	逻辑型
参数名	类 型	参考	可空	数组	备 注
参_源文本	文本型

变量名	类 型	静态	数组	备 注
reg	正则表达式类
ret	逻辑型
count	整数型
i	整数型
arr	文本型		0
tmp	文本型
content	文本型

ret ＝ reg.创建 (“\[(.+?)\]”, 参_源文本, )
如果真 (ret ＝ 假)
返回 (假)
count ＝ reg.取匹配数量 ()
如果真 (count ＝ 0)
返回 (假)
tmp ＝ reg.取子匹配文本 (1, 1)
arr ＝ 分割文本 (tmp, “，”, )
计次循环首 (取数组成员数 (arr), i)
content ＝ 子文本替换 (参_源文本, “[” ＋ tmp ＋ “]”, arr [i], , , 真)
ret ＝ 子程序1 (content)
如果真 (ret ＝ 假)
集_所有内容 ＝ 集_所有内容 ＋ content ＋ #换行符

计次循环尾 ()
集_所有内容 ＝ 集_所有内容 ＋ “--------------------------” ＋ #换行符
返回 (真)

.版本 2<br /> <br /> .程序集 程序集1<br /> .程序集变量 集_所有内容, 文本型<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 子程序1 (“[早上，中午，晚上]在宁静的夜晚[睡觉，吃夜宵，打游戏，运动]，过的很开心。”)<br /> 信息框 (集_所有内容, 64, , )<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 子程序1, 逻辑型<br /> .参数 参_源文本, 文本型<br /> .局部变量 reg, 正则表达式类<br /> .局部变量 ret, 逻辑型<br /> .局部变量 count, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 tmp, 文本型<br /> .局部变量 content, 文本型<br /> <br /> ret ＝ reg.创建 (“\[(.+?)\]”, 参_源文本, )<br /> .如果真 (ret ＝ 假)<br />     返回 (假)<br /> .如果真结束<br /> count ＝ reg.取匹配数量 ()<br /> .如果真 (count ＝ 0)<br />     返回 (假)<br /> .如果真结束<br /> tmp ＝ reg.取子匹配文本 (1, 1)<br /> arr ＝ 分割文本 (tmp, “，”, )<br /> .计次循环首 (取数组成员数 (arr), i)<br />     content ＝ 子文本替换 (参_源文本, “[” ＋ tmp ＋ “]”, arr <i>, , , 真)<br />     ret ＝ 子程序1 (content)<br />     .如果真 (ret ＝ 假)<br />         集_所有内容 ＝ 集_所有内容 ＋ content ＋ #换行符<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 集_所有内容 ＝ 集_所有内容 ＋ “--------------------------” ＋ #换行符<br /> 返回 (真)

五花牛

数组 固定文字+数组[i]

fire9

放到一个数组里面，索引随机

YourH

这样

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
变量	文本型	0
过程	文本型	0
集_文本	文本型

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

变量 ＝ { “早上”, “中午”, “晚上” }
过程 ＝ { “睡觉”, “吃夜宵”, “打游戏” }
集_文本 ＝ “[变量]在宁静的夜晚[过程]，过的很开心。”
子程序1 ()

子程序名	返回值类型	公开	备 注
子程序1

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

置随机数种子 ()
文本 ＝ 文本_替换 (集_文本, , , , “[变量]”, 变量 [取随机数 (1, 取数组成员数 (变量))])
文本 ＝ 文本_替换 (文本, , , , “[过程]”, 过程 [取随机数 (1, 取数组成员数 (过程))])
调试输出 (文本)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 变量, 文本型, , "0"<br /> .程序集变量 过程, 文本型, , "0"<br /> .程序集变量 集_文本, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 变量 ＝ { “早上”, “中午”, “晚上” }<br /> 过程 ＝ { “睡觉”, “吃夜宵”, “打游戏” }<br /> 集_文本 ＝ “[变量]在宁静的夜晚[过程]，过的很开心。”<br /> 子程序1 ()<br /> <br /> .子程序 子程序1<br /> .局部变量 文本, 文本型<br /> <br /> 置随机数种子 ()<br /> 文本 ＝ 文本_替换 (集_文本, , , , “[变量]”, 变量 [取随机数 (1, 取数组成员数 (变量))])<br /> 文本 ＝ 文本_替换 (文本, , , , “[过程]”, 过程 [取随机数 (1, 取数组成员数 (过程))])<br /> 调试输出 (文本)

2wEn

变量1="早上"
变量2="睡觉"
txt="[变量1]在宁静的夜晚[变量2]，过的很开心"
txt=子文本替换（txt，“变量1”，变量1）
txt=子文本替换（txt，“变量2”，变量2）

KongChengY

https://bbs.125.la/forum.php?mod=viewthread&tid=14812529
可以参考一下这个最佳

补充内容 (2024-10-7 17:27):
只是这么个原理，中间和结尾的话，也可以用数组的形式包装起来，然后叠加

走一回

楼上的都是正解

影纸

上面大佬的都对，学习下

  

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

变量名	类 型	静态	数组	备 注
变量	文本型		0
过程	文本型		0

变量 ＝ { “早上”, “中午”, “晚上” }
过程 ＝ { “睡觉”, “吃夜宵”, “打游戏” }
调试输出 (取文本 (“%s在宁静的夜晚%s，过的很开心。”, 变量 [取随机数 (1, 取数组成员数 (变量))], 过程 [取随机数 (1, 取数组成员数 (过程))]))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 变量, 文本型, , "0"<br /> .局部变量 过程, 文本型, , "0"<br /> <br /> 变量 ＝ { “早上”, “中午”, “晚上” }<br /> 过程 ＝ { “睡觉”, “吃夜宵”, “打游戏” }<br /> 调试输出 (取文本 (“%s在宁静的夜晚%s，过的很开心。”, 变量 [取随机数 (1, 取数组成员数 (变量))], 过程 [取随机数 (1, 取数组成员数 (过程))]))

w589321

随机给一句话加变量.e (956.52 KB, 下载次数: 2)

2024-10-7 20:07 上传

点击文件名下载附件

我也玩玩。

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

输出调试文本 (子程序1 (“[早上，中午，晚上]在宁静的夜晚[睡觉，吃夜宵，打游戏]，过的很开心。”))
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
子程序1	文本型
参数名	类 型	参考	可空	数组	备 注
参_源文本	文本型

变量名	类 型	静态	数组	备 注
reg	正则表达式类
ret	逻辑型
count	整数型
i	整数型
arr	文本型		0
tmp	文本型
j	整数型

ret ＝ reg.创建 (“\[(.+?)\]”, 参_源文本, )
如果真 (ret ＝ 假)
返回 (“”)
count ＝ reg.取匹配数量 ()
如果真 (count ＝ 0)
返回 (“”)
置随机数种子 ()
计次循环首 (count, i)
tmp ＝ reg.取子匹配文本 (i, 1)
arr ＝ 分割文本 (tmp, “，”, )
参_源文本 ＝ 子文本替换 (参_源文本, “[” ＋ tmp ＋ “]”, arr [取随机数 (1, 取数组成员数 (arr))], , , 真)
计次循环尾 ()
返回 (参_源文本)

.版本 2<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 输出调试文本 (子程序1 (“[早上，中午，晚上]在宁静的夜晚[睡觉，吃夜宵，打游戏]，过的很开心。”))<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 子程序1, 文本型<br /> .参数 参_源文本, 文本型<br /> .局部变量 reg, 正则表达式类<br /> .局部变量 ret, 逻辑型<br /> .局部变量 count, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 tmp, 文本型<br /> .局部变量 j, 整数型<br /> <br /> ret ＝ reg.创建 (“\[(.+?)\]”, 参_源文本, )<br /> .如果真 (ret ＝ 假)<br />     返回 (“”)<br /> .如果真结束<br /> count ＝ reg.取匹配数量 ()<br /> .如果真 (count ＝ 0)<br />     返回 (“”)<br /> .如果真结束<br /> 置随机数种子 ()<br /> .计次循环首 (count, i)<br />     tmp ＝ reg.取子匹配文本 (i, 1)<br />     arr ＝ 分割文本 (tmp, “，”, )<br />     参_源文本 ＝ 子文本替换 (参_源文本, “[” ＋ tmp ＋ “]”, arr [取随机数 (1, 取数组成员数 (arr))], , , 真)<br /> .计次循环尾 ()<br /> 返回 (参_源文本)