1. 令 dm = createobject("dm.dmsoft")
  2. 向调试窗口输出:dm.Ver
  3. dm.setpath("g:\星辰变\SnapShot")
  4. 令 hwnd = dm.FindWindow("XCBClientWnd",0)
  5. 令 dm_ret = dm.bindwindow(hwnd,"dx2","dx2","dx",1)
  6. 用户定义变量 刷怪模式=DropList{"0":"0"|"1":"1"}=0 "刷怪模式"
  7. 用户定义变量 自动组队=DropList{"0":"0"|"1":"1"}=0 "自动组队"
  8. 用户定义变量 是否拾取=DropList{"0":"0"|"1":"1"}=0 "是否拾取"
  9. 用户定义变量 辅助技能1=DropList{"关闭":""|"1":"49"|"2":"50"|"3":"51"|"4":"52"|"5":"53"|"6":"54"|"7":"55"|"8":"56"|"9":"57"}=0 "辅助技能1"
  10. 用户定义变量 辅助技能1时间=0 "辅助技能1时间(s)"
  11. 用户定义变量 辅助技能2=DropList{"关闭":""|"1":"49"|"2":"50"|"3":"51"|"4":"52"|"5":"53"|"6":"54"|"7":"55"|"8":"56"|"9":"57"}=0 "辅助技能2"
  12. 用户定义变量 辅助技能2时间=0 "辅助技能2时间(s)"
  13. 用户定义变量 首发技按键=DropList{"关闭":""|"1":"49"|"2":"50"|"3":"51"|"4":"52"|"5":"53"|"6":"54"|"7":"55"|"8":"56"|"9":"57"}=0 "首发技"
  14. 用户定义变量 组合技按键=DropList{"关闭":""|"1":"49"|"2":"50"|"3":"51"|"4":"52"|"5":"53"|"6":"54"|"7":"55"|"8":"56"|"9":"57"}=0 "组合技"
  15. 用户定义变量 组合技延时=0 "组合技延时(ms)"
  16. 用户定义变量 其它技能按键=DropList{"关闭":""|"1":"49"|"2":"50"|"3":"51"|"4":"52"|"5":"53"|"6":"54"|"7":"55"|"8":"56"|"9":"57"}=0 "其它技能"
  17. 用户定义变量 其它技能冷却时间=0 "其它技能冷却时间(ms)"
  18. 用户定义变量 引怪数量=0 "引怪数量"
  19. 用户定义变量 引怪技能=DropList{"1":"49"|"2":"50"|"3":"51"|"4":"52"|"5":"53"|"6":"54"|"7":"55"|"8":"56"|"9":"57"}=0 "引怪技能"
  20. 用户定义变量 群怪技能=DropList{"1":"49"|"2":"50"|"3":"51"|"4":"52"|"5":"53"|"6":"54"|"7":"55"|"8":"56"|"9":"57"}=0 "群怪技能"
  21. 用户定义变量 群怪时间=0 "群怪时间(s)"
  22. 定义变量 qt, ft1, ft2
  23. 令 组队 = dm.getcolor(602,493)
  24. 令 灵力 = dm.getcolor(681,184)
  25. 注释:***********************刷怪模式**********
  26. 注释:************************单刷*****************
  27. 如果 刷怪模式 = 0 则
  28.     dm.keypress(辅助技能2)
  29.     延时 1500 毫秒
  30.     标记 f1
  31.     令 ft1 = now
  32.     令 ft2 = now
  33.     dm.keypress(辅助技能1)
  34.     如果 datediff("s",ft2,now) >= 辅助技能2时间 则
  35.         dm.keypress(辅助技能2)
  36.         令 ft2 = now
  37.     条件结束
  38.     循环当 true 时
  39.         标记 Start1
  40.         延时 500 毫秒
  41.         注释:***************自动灵力*********
  42.         如果 灵力 = "6a341a" 则
  43.             dm.moveto(681,184)
  44.             延时 300 毫秒
  45.             dm.leftclick()
  46.             延时 300 毫秒
  47.             dm.leftclick()
  48.         条件结束
  49.         注释:**************自动组队**********
  50.         如果 自动组队 = 0 则
  51.             令 dm_ret = dm.FindPic(0,0,2000,2000,"组队.bmp","000000",0.9,0,X,Y)
  52.             如果 X >= 0 则
  53.                 dm.moveto(609,484)
  54.                 延时 300 毫秒
  55.                 dm.LeftClick()
  56.                 延时 1500 毫秒
  57.                 dm.moveto(450,359)
  58.                 延时 300 毫秒
  59.                 dm.LeftClick()
  60.             条件结束
  61.         条件结束
  62.         注释:***********自动捡物品*******
  63.         如果 是否拾取 = 0 则
  64.             dm.KeyPress(32)
  65.             延时 200 毫秒
  66.             dm.KeyPress(32)
  67.             延时 1000 毫秒
  68.         条件结束
  69.         注释:**************选怪*************
  70.         标记 选怪
  71.         dm.KeyPress(9)
  72.         注释:**********************打怪****************************
  73.         令 color1 = dm.GetColor(354,38)
  74.         如果 color1 = "774324" 则
  75.             令 color2 = dm.GetColor(521,60)
  76.             如果 color2 = "bbffff" 则
  77.                 跳转到标记 选怪
  78.             条件结束
  79.             注释:*********************首发技*****************************
  80.             dm.keypress(首发技按键)
  81.             延时 1000 毫秒
  82.             注释:************************打怪过程*******************************
  83.             如果 组合技按键 = "" 则
  84.             否则
  85.                 标记 打怪1
  86.                 dm.KeyPress(组合技按键)
  87.                 延时 700 毫秒
  88.                 dm.KeyPress(组合技按键)
  89.                 令 color3 = dm.GetColor(439,39)
  90.                 如果 color3 = "4a1800" 则
  91.                     跳转到标记 打怪1
  92.                 否则
  93.                 条件结束
  94.             条件结束
  95.             如果 其它技能按键 = "" 则
  96.             否则
  97.                 标记 打怪2
  98.                 dm.KeyPress(其它技能按键)
  99.                 延时 1000 毫秒
  100.                 令 color3 = dm.GetColor(439,39)