1.     调用 dati
  2. 否则
  3. 条件结束
  4. 注释：sub区
  5. 子程序 huifu
  6.     令 dm_ret = dm.FindStr(825,238,1009,432,"回","e5f2f2-000000",1.0,intX,intY)
  7.     如果 intX >= 0 并且 intY >= 0 则
  8.         dm.MoveTo(intX + 40,intY)
  9.         延时 100 毫秒
  10.         dm.LeftDoubleClick()
  11.         延时 5000 毫秒
  12.         调用 juqing
  13.     否则
  14.     条件结束
  15. 子程序结束
  16. 子程序 zhao
  17.     令 dm_ret = dm.FindStr(825,238,1009,432,"找","e5f2f2-000000",1.0,intX,intY)
  18.     如果 intX >= 0 并且 intY >= 0 则
  19.         dm.MoveTo(intX + 80,intY)
  20.         延时 100 毫秒
  21.         dm.LeftDoubleClick()
  22.         延时 2500 毫秒
  23.     否则
  24.     条件结束
  25.     令 dm_ret = dm.FindStr(6,114,384,623,"剧","fdff3c-000000",1.0,intX,intY)
  26.     如果 intX >= 0 并且 intY >= 0 则
  27.         调用 juqing
  28.     否则
  29.     条件结束
  30.     令 dm_ret = dm.FindStr(20,238,269,414,"职","fdff3c-000000",1.0,intX,intY)
  31.     如果 intX >= 0 并且 intY >= 0 则
  32.         dm.MoveTo(intX + 50,intY)
  33.         延时 100 毫秒
  34.         dm.LeftDoubleClick()
  35.         延时 1000 毫秒
  36.     条件结束
  37.     令 dm_ret = dm.FindStr(85,515,248,576,"定","f2e88f-000000",1.0,intX,intY)
  38.     如果 intX >= 0 并且 intY >= 0 则
  39.         dm.MoveTo(intX,intY)
  40.         延时 100 毫秒
  41.         dm.LeftDoubleClick()
  42.     否则
  43.     条件结束
  44. 子程序结束
  45. 子程序 jiequ
  46.     令 dm_ret = dm.FindStr(825,238,1009,432,"接","e5f2f2-000000",1.0,intX,intY)
  47.     如果 intX >= 0 并且 intY >= 0 则
  48.         dm.MoveTo(intX + 80,intY)
  49.         延时 100 毫秒
  50.         dm.LeftDoubleClick()
  51.         延时 5000 毫秒
  52.         调用 juqing
  53.     否则
  54.     条件结束
  55. 子程序结束
  56. 子程序 songxin
  57.     令 dm_ret = dm.FindStr(825,238,1009,432,"信","e5f2f2-000000",1.0,intX,intY)
  58.     如果 intX >= 0 并且 intY >= 0 则
  59.         dm.MoveTo(intX + 80,intY)
  60.         延时 100 毫秒
  61.         dm.LeftDoubleClick()
  62.         延时 5000 毫秒
  63.         调用 juqing
  64.     否则
  65.     条件结束
  66. 子程序结束
  67. 子程序 jiang
  68.     令 dm_ret = dm.FindStr(825,238,1009,432,"将","e5f2f2-000000",1.0,intX,intY)
  69.     如果 intX >= 0 并且 intY >= 0 则
  70.         dm.MoveTo(intX + 80,intY)
  71.         延时 100 毫秒
  72.         dm.LeftDoubleClick()
  73.         延时 5000 毫秒
  74.         调用 juqing
  75.     否则
  76.     条件结束
  77. 子程序结束
  78. 子程序 kuaisu
  79.     令 dm_ret = dm.FindStr(825,238,1009,432,"快","fdff3c-000000",1.0,intX,intY)
  80.     如果 intX >= 0 并且 intY >= 0 则
  81.         dm.MoveTo(intX,intY)
  82.         延时 100 毫秒
  83.         dm.LeftDoubleClick()
  84.         延时 1500 毫秒
  85.     否则
  86.     条件结束
  87.     令 dm_ret = dm.FindStr(540,39,865,182,"传","f2e88f-000000",1.0,intX,intY)
  88.     如果 intX >= 0 并且 intY >= 0 则
  89.         dm.MoveTo(intX,intY)
  90.         延时 100 毫秒
  91.         dm.LeftDoubleClick()
  92.         延时 2000 毫秒
  93.     否则
  94.     条件结束
  95.     令 dm_ret = dm.FindStr(825,238,1009,432,"回","e5f2f2-000000",1.0,intX,intY)
  96.     如果 intX >= 0 并且 intY >= 0 则
  97.         dm.MoveTo(intX + 10,intY + 20)
  98.         延时 100 毫秒
  99.         dm.LeftDoubleClick()
  100.         延时 15000 毫秒