如何把循环指令做成这样的脚本？

summer0411

大家好，想请问一下，易语言的循环指令怎么做成这种形式？
------------------------------------
循环
鼠标点击指令
输入文本指令
循环结束
------------------------------------

mytiger

上面循环有错,请用这个.

aiso

.版本 2

.子程序 子程序1

.计次循环首 (100000, )
    鼠标_单击 (取窗口句柄 (), 0, 0, 1)
    延时 (10)
    输出调试文本 (12312)
.计次循环尾 ()

summer0411

aiso 发表于 2024-1-9 08:42
.版本 2

.子程序 子程序1

我要把循环做成两个指令，第一部分是循环，中间可以插入我自己做的鼠标点击指令，最后再插入一个循环结束。

空心los

  

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

变量名	类 型	静态	数组	备 注
n	整数型
指令	文本型
参数1	文本型
参数2	文本型
窗口句柄	整数型

计次循环首 (10, n)
指令 ＝ _启动窗口.超级列表框1.取标题 (n － 1, 0)
参数1 ＝ _启动窗口.超级列表框1.取标题 (n － 1, 1)
参数2 ＝ _启动窗口.超级列表框1.取标题 (n － 1, 2)
判断 (指令 ＝ “鼠标单击”)
鼠标_单击 (窗口句柄, 到整数 (参数1), 到整数 (参数2), )
判断 (指令 ＝ “延迟”)
程序_延时 (到整数 (参数1), )



计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 n, 整数型<br /> .局部变量 指令, 文本型<br /> .局部变量 参数1, 文本型<br /> .局部变量 参数2, 文本型<br /> .局部变量 窗口句柄, 整数型<br /> <br /> .计次循环首 (10, n)<br />     指令 ＝ _启动窗口.超级列表框1.取标题 (n － 1, 0)<br />     参数1 ＝ _启动窗口.超级列表框1.取标题 (n － 1, 1)<br />     参数2 ＝ _启动窗口.超级列表框1.取标题 (n － 1, 2)<br />     .判断开始 (指令 ＝ “鼠标单击”)<br />         鼠标_单击 (窗口句柄, 到整数 (参数1), 到整数 (参数2), )<br />     .判断 (指令 ＝ “延迟”)<br />         程序_延时 (到整数 (参数1), )<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()

大兔崽子

这种其实我一直有设想弄一个  最开始   找图 找字 找色  鼠标点击  键盘输入 这些都弄好了。但是 后面发现， 要做逻辑处理的 太麻烦了。  只能做做简单的脚本操作。

楼主可以这样做   首先 确定指令的格式  例如：
循环_100
鼠标点击_0,0
延迟_1000
键盘输入_12345
循环结束_0

理论上  就是这样的一个路子  就可以实现的，  但是，实际上  做脚本操作的话，  还需要考虑更多的问题 ，比如  识别当前页面  再去判断点击
否则 光用延迟的话，  一步错  步步错，
再就是  很多时候 ， 鼠标点击的坐标  并不是固定的，  所以  还得结合 找图 找色 等命令，  进行动态的点击。
总之，  将内容扩展起来后， 逻辑就比较复杂了。    光有循环命令是不足够的  还得有  判断，  以及 找色找字等操作才行

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
程_命令组	命令列表	0

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

命令解析 (编辑框1.内容)
启动线程 (&指令运行, , )

子程序名	返回值类型	公开	备 注
命令解析
参数名	类 型	参考	可空	数组	备 注
指令文本	文本型

变量名	类 型	静态	数组	备 注
指令文本数组	文本型		0
i	整数型
单行指令	文本型		0
逻辑状态	整数型			0  无状态  1 循环状态  2 如果真
局_命令列表	命令列表
局_单行命令	单行命令
局_单行命令组	单行命令		0
局_循环命令	循环命令

指令文本数组 ＝ 分割文本 (指令文本, #换行符, )
计次循环首 (取数组成员数 (指令文本数组), i)
单行指令 ＝ 分割文本 (指令文本数组 [i], “_”, )
如果真 (取数组成员数 (单行指令) ＜ 2)
调试输出 (“无效的命令：”, 指令文本数组 [i])
到循环尾 ()
局_单行命令.命令名 ＝ 单行指令 [1]
局_单行命令.命令参数 ＝ 单行指令 [2]
判断 (单行指令 [1] ＝ “循环”)
逻辑状态 ＝ 1
局_循环命令.命令名 ＝ “循环”
局_循环命令.命令参数 ＝ 到整数 (单行指令 [2])
清除数组 (局_单行命令组)
判断 (单行指令 [1] ＝ “鼠标点击”)
判断 (逻辑状态 ＝ 1)
加入成员 (局_单行命令组, 局_单行命令)
局_命令列表.类型 ＝ 1
局_命令列表.单行命令 ＝ 局_单行命令

判断 (单行指令 [1] ＝ “延迟”)
判断 (逻辑状态 ＝ 1)
加入成员 (局_单行命令组, 局_单行命令)
局_命令列表.类型 ＝ 1
局_命令列表.单行命令 ＝ 局_单行命令

判断 (单行指令 [1] ＝ “循环结束”)
逻辑状态 ＝ 0
局_命令列表.类型 ＝ 2
局_循环命令.子命令组 ＝ 局_单行命令组
局_命令列表.循环单行命令 ＝ 局_循环命令


如果真 (逻辑状态 ＝ 0)
加入成员 (程_命令组, 局_命令列表)

计次循环尾 ()

子程序名	返回值类型	公开	备 注
指令运行

变量名	类 型	静态	数组	备 注
i	整数型
循环次数	整数型
循环命令数	整数型

计次循环首 (取数组成员数 (程_命令组), i)
调试输出 (“命令类型：”, 程_命令组 [i].类型)
判断 (程_命令组 [i].类型 ＝ 1)
' 单行命令
执行单命令 (程_命令组 [i].单行命令)
判断 (程_命令组 [i].类型 ＝ 2)
' 循环命令
计次循环首 (程_命令组 [i].循环单行命令.命令参数, 循环次数)
计次循环首 (取数组成员数 (程_命令组 [i].循环单行命令.子命令组), 循环命令数)
执行单命令 (程_命令组 [i].循环单行命令.子命令组 [循环命令数])
计次循环尾 ()
计次循环尾 ()



计次循环尾 ()

子程序名	返回值类型	公开	备 注
执行单命令			执行无逻辑的单一命令
参数名	类 型	参考	可空	数组	备 注
单行指令	单行命令

变量名	类 型	静态	数组	备 注
指令文本数组	整数型		0
i	整数型

判断 (单行指令.命令名 ＝ “鼠标点击”)
' 鼠标点击
调试输出 (“鼠标点击”, 单行指令.命令参数)
判断 (单行指令.命令名 ＝ “延迟”)
' 延迟
调试输出 (“延迟”, 单行指令.命令参数)
判断 (单行指令.命令名 ＝ “键盘输入”)
' 键盘输入
调试输出 (“键盘输入”, 单行指令.命令参数)

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 程_命令组, 命令列表, , "0"<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 命令解析 (编辑框1.内容)<br /> 启动线程 (&指令运行, , )<br /> <br /> .子程序 命令解析<br /> .参数 指令文本, 文本型<br /> .局部变量 指令文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 单行指令, 文本型, , "0"<br /> .局部变量 逻辑状态, 整数型, , , 0  无状态  1 循环状态  2 如果真<br /> .局部变量 局_命令列表, 命令列表<br /> .局部变量 局_单行命令, 单行命令<br /> .局部变量 局_单行命令组, 单行命令, , "0"<br /> .局部变量 局_循环命令, 循环命令<br /> <br /> 指令文本数组 ＝ 分割文本 (指令文本, #换行符, )<br /> .计次循环首 (取数组成员数 (指令文本数组), i)<br />     单行指令 ＝ 分割文本 (指令文本数组 <i>, “_”, )<br />     .如果真 (取数组成员数 (单行指令) ＜ 2)<br />         调试输出 (“无效的命令：”, 指令文本数组 <i>)<br />         到循环尾 ()<br />     .如果真结束<br />     局_单行命令.命令名 ＝ 单行指令 [1]<br />     局_单行命令.命令参数 ＝ 单行指令 [2]<br />     .判断开始 (单行指令 [1] ＝ “循环”)<br />         逻辑状态 ＝ 1<br />         局_循环命令.命令名 ＝ “循环”<br />         局_循环命令.命令参数 ＝ 到整数 (单行指令 [2])<br />         清除数组 (局_单行命令组)<br />     .判断 (单行指令 [1] ＝ “鼠标点击”)<br />         .判断开始 (逻辑状态 ＝ 1)<br />             加入成员 (局_单行命令组, 局_单行命令)<br />         .默认<br />             局_命令列表.类型 ＝ 1<br />             局_命令列表.单行命令 ＝ 局_单行命令<br />         .判断结束<br /> <br />     .判断 (单行指令 [1] ＝ “延迟”)<br />         .判断开始 (逻辑状态 ＝ 1)<br />             加入成员 (局_单行命令组, 局_单行命令)<br />         .默认<br />             局_命令列表.类型 ＝ 1<br />             局_命令列表.单行命令 ＝ 局_单行命令<br />         .判断结束<br /> <br />     .判断 (单行指令 [1] ＝ “循环结束”)<br />         逻辑状态 ＝ 0<br />         局_命令列表.类型 ＝ 2<br />         局_循环命令.子命令组 ＝ 局_单行命令组<br />         局_命令列表.循环单行命令 ＝ 局_循环命令<br />     .默认<br /> <br />     .判断结束<br />     .如果真 (逻辑状态 ＝ 0)<br />         加入成员 (程_命令组, 局_命令列表)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 指令运行<br /> .局部变量 i, 整数型<br /> .局部变量 循环次数, 整数型<br /> .局部变量 循环命令数, 整数型<br /> <br /> .计次循环首 (取数组成员数 (程_命令组), i)<br />     调试输出 (“命令类型：”, 程_命令组 <i>.类型)<br />     .判断开始 (程_命令组 <i>.类型 ＝ 1)<br />         ' 单行命令<br />         执行单命令 (程_命令组 <i>.单行命令)<br />     .判断 (程_命令组 <i>.类型 ＝ 2)<br />         ' 循环命令<br />         .计次循环首 (程_命令组 <i>.循环单行命令.命令参数, 循环次数)<br />             .计次循环首 (取数组成员数 (程_命令组 <i>.循环单行命令.子命令组), 循环命令数)<br />                 执行单命令 (程_命令组 <i>.循环单行命令.子命令组 [循环命令数])<br />             .计次循环尾 ()<br />         .计次循环尾 ()<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 执行单命令, , , 执行无逻辑的单一命令<br /> .参数 单行指令, 单行命令<br /> .局部变量 指令文本数组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> .判断开始 (单行指令.命令名 ＝ “鼠标点击”)<br />     ' 鼠标点击<br />     调试输出 (“鼠标点击”, 单行指令.命令参数)<br /> .判断 (单行指令.命令名 ＝ “延迟”)<br />     ' 延迟<br />     调试输出 (“延迟”, 单行指令.命令参数)<br /> .判断 (单行指令.命令名 ＝ “键盘输入”)<br />     ' 键盘输入<br />     调试输出 (“键盘输入”, 单行指令.命令参数)<br /> .默认<br /> <br /> .判断结束

  

数据类型名	公开	备 注
单行命令		普通命令
成员名	类 型	传址	数组	备 注
命令名	文本型
命令参数	文本型

数据类型名	公开	备 注
循环命令		循环逻辑命令
成员名	类 型	传址	数组	备 注
命令名	文本型
命令参数	整数型
子命令组	单行命令		1

数据类型名	公开	备 注
命令列表
成员名	类 型	传址	数组	备 注
类型	整数型			1  普通命令  2 循环逻辑命令
单行命令	单行命令
循环单行命令	循环命令

.版本 2<br /> <br /> .数据类型 单行命令, , 普通命令<br />     .成员 命令名, 文本型<br />     .成员 命令参数, 文本型<br /> <br /> .数据类型 循环命令, , 循环逻辑命令<br />     .成员 命令名, 文本型<br />     .成员 命令参数, 整数型<br />     .成员 子命令组, 单行命令, , "1"<br /> <br /> .数据类型 命令列表<br />     .成员 类型, 整数型, , , 1  普通命令  2 循环逻辑命令<br />     .成员 单行命令, 单行命令<br />     .成员 循环单行命令, 循环命令

mytiger

写了个简单的框架,看看是否能用上.