求个按键精灵让鼠标滚轮在指定后台上下循环滚动脚本

Set dm = CreateObject("dm.dmsoft") //创建大漠并等到大漠的版本
TracePrint "当前大漠注册版本号: " & dm.ver()
MessageBox "确定鼠标移动到目标窗口,然后按任意键获得获得句柄"
key = WaitKey()
hwnd = dm.GetMousePointWindow()
TracePrint "窗口句柄为 " & hwnd
Delay 200
dm_ret = dm.SetWindowState(hwnd,1) 
TracePrint "激活窗口? " & dm_ret
Delay 1000
dm_ret = dm.BindWindow(hwnd,"dx","dx","dx",1) '绑定后锋誉台如果绑定失败换其他模式
TracePrint "绑如培定成功? " & dm_ret
Delay 1000
Do
    dm.WheelDown 
    Delay 500'自己设置上银橡段滚后延迟
    dm.WheelUp 
    Delay 500'自己设置下滚后延迟
Loop
Sub OnScriptExit()
    dm_ret = dm.UnBindWindow() 
End Sub

记事本调试了一下没问题

这类鼠标辅助插件小程序源指网上多的是，用浏览器去搜索一大堆，可以一个个实验，看看哪一个插件适合你这个游戏，插件下载安装厚可以设置的，比如点击的频率 点击速度需要多快，雹嫌配软件很小大概也就几M大小，使用起来也不麻烦，设置也不难，不同的插件者搜适合不一样的游戏，希望能够帮助到你！