自己写的.tmp出错，源码献上，去掉goto就能启动

ailuwei

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 dm, 大漠英文版
.程序集变量 窗口句柄, 整数型
.程序集变量 线程句柄, 整数型

.子程序 __启动窗口_创建完毕

注册COM组件 (取运行目录 () ＋ “\dm.dll”)
.如果真 (判断大漠组件是否被注册 () ＝ 假)
    信息框 (“注册大漠失败，请手动注册”, 0, , )
.如果真结束
dm.创建对象 ()


.子程序 _按钮2_被单击

多线程 ()
许可证 ＝ 线程_创建许可证 ()

.子程序 多线程

.如果真 (dm.WaitKey (116, 0) ＝ 1)
    线程_启动 (&绑定窗口, , 线程句柄)
.如果真结束


.子程序 绑定窗口

线程_进入许可区 (许可证)

dm.创建对象 ()
窗口句柄 ＝ dm.GetMousePointWindow ()
dm.BindWindow (窗口句柄, “normal”, “windows”, “windows”, 0)
脚本 ()

.子程序 脚本
.局部变量 x, 整数型
.局部变量 y, 整数型

dm.SetPath (“C:\Users\99125\Desktop\操作夹\御龙辅助”)
dm.SetDict (0, “C:\Users\99125\Desktop\操作夹\御龙辅助\字库.txt”)
Goto (“置:完成任务接受任务”)
Goto (“置:接受任务”)
.如果真 (dm.FindPic (0, 0, 600, 600, “接受任务.bmp”, “000000”, 1, 3, x, y) ＝ -1)
    Goto (“跳:接受任务”)
.如果真结束
dm.MoveTo (519, 479)
dm.LeftDown ()
dm.LeftUp ()
Goto (“置:完成任务”)
.如果真 (dm.FindPic (0, 0, 600, 600, “完成任务.bmp”, “000000”, 1, 3, x, y) ＝ -1)
    Goto (“跳:完成任务”)
.如果真结束
dm.MoveTo (519, 479)
dm.LeftDown ()
dm.LeftUp ()
Goto (“跳:完成任务接受任务”)
线程_退出许可区 (许可证)

ailuwei

哪里出错了   ，求指教

ailuwei

在多线程子程序出，如果真开始结束有个GOTO 跳转 ，加上这个就不行了

易辅解答达人

GOTO不能乱用。请看事例来用。而且易本身没有GOTo！建议不用，你可以封装成子程序来进行 跳转调用
如果希望能及时得到解答。可以加入易辅的VIP！会有多名老师进行指导解答！

ailuwei

随风 发表于 2017-9-14 23:01

做两个子程序进行循环嵌套    我去试试