哪位大哥有空帮忙转一下易语言代码

103029110

• General]
• Description=鼠标相对移动的语句
• BeginHotkey=121
• BeginHotkeyMod=0
• RunOnce=1
• Enable=1
• [Repeat]
• Type=0
• Number=1
• [CallBack]
• OnSetup=
• [Comment]
• Content=
• [Script]
• VBSCall GetCursorPos(x,y)
• //先用这个语句得到当前的鼠标位置信息 保存到变量x,y中
• Delay 100
• //延时100毫秒
• VBSCall MessageBox(x&","&y)
• //弹出一个窗口 内容是变量x,y的值
• Delay 100
• //延时100毫秒
• MoveR 100 100
• //相对于目前的鼠标坐标位置而移动横坐标加100,纵坐标加100的距离
• Delay 100
• //延时100毫秒
• VBSCall GetCursorPos(x,y)
• //移动后再次得到当前鼠标位置信息 保存到变量x,y中(这时候变量x,y已经被重新赋值了)
• Delay 100
• //延时100毫秒
• VBSCall MessageBox(x&","&y)
• //弹出一个窗口 内容是变量x,y的值
  

这个是按键精灵代码.请大哥转换易语言代码或例子。谢谢，谢谢

小逸老师

转一下易语言代码.e (284.47 KB, 下载次数: 1)

2023-5-12 00:43 上传

点击文件名下载附件

正鑫软件开发

按键精灵转易语言()

Suky

正鑫软件开发 发表于 2023-5-11 23:17
按键精灵转易语言()

此楼正解

补充内容 (2023-5-11 23:23):
就是这子程序名可以含蓄一点

103029110

正鑫软件开发 发表于 2023-5-11 23:17
按键精灵转易语言()

是的大哥