- 否则
- 条件结束
- 子程序结束
- 子程序 juqing
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"剧","fdff3c-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 1000 毫秒
- 否则
- 条件结束
- 子程序结束
- 子程序 wancheng
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"成","f2e88f-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 100 毫秒
- 否则
- 调用 jieshou
- 条件结束
- 子程序结束
- 子程序 jieshou
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"受","f2e88f-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 100 毫秒
- 否则
- 条件结束
- 子程序结束
- 子程序 goumai
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"购","f2e88f-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftClick()
- 延时 1000 毫秒
- 否则
- 条件结束
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"确","f2e88f-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftClick()
- 延时 100 毫秒
- 否则
- 条件结束
- 子程序结束
- 子程序 dati
- 令 dm_ret = dm.FindStr(1,0,2000,2000,"要","ffa000-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 100 毫秒
- 否则
- 条件结束
- 延时 1000 毫秒
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"未","ffa000-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 100 毫秒
- 否则
- 条件结束
- 延时 1000 毫秒
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"魔","ffa000-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX + 20,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 100 毫秒
- 否则
- 条件结束
- 延时 1000 毫秒
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"光","ffa000-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX - 10,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 100 毫秒
- 否则
- 条件结束
- 延时 300 毫秒
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"成","f2e88f-000000",1.0,intX,intY)
- 如果 intX >= 0 并且 intY >= 0 则
- dm.MoveTo(intX,intY)
- 延时 100 毫秒
- dm.LeftDoubleClick()
- 延时 1000 毫秒
- 否则
- 条件结束
- 子程序结束
- 子程序 daguai
- 令 dm_ret = dm.FindStr(0,0,2000,2000,"打","e5f2f2-000000",1.0,intX,intY)