全自动回贴内容生成工具

易语言 2020-09-01 11:09:14

全自动回贴内容生成工具

注册热键 (窗口_回贴机.取窗口句柄 (), 标签_信息.取窗口句柄 (), 0, #F3键)
回贴内容S_集 = 分割文本 (#常量回贴内容, #换行符, ) ' 回贴内容请大家一起来完善,我只是举例了几条
回贴内容数组数_集 = 取数组成员数 (回贴内容S_集)

.子程序 _标签_信息_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.局部变量 局_原剪辑板文本, 文本型

局_原剪辑板文本 = 取剪辑板文本 ()
置剪辑板文本 (回贴内容S_集 [取随机数 (1, 回贴内容数组数_集)])
.如果真 (参数一 = 33001)
模拟按键 (#Ctrl键, #V键, )
延迟 (500)
置剪辑板文本 (局_原剪辑板文本)