帮我写一个vbs脚本，要求运行脚本后，用户手动将鼠标移到指定位置，按下空格键后获取鼠标坐标，并开始自动双击屏幕，双击屏幕间隔为0.5秒，无限循环，运行一分钟或再次按下空格键后退出循环并关闭脚本，尽量精简

好的，下面是精简版的 VBS 脚本，实现你所描述的功能：

Set objShell = CreateObject("WScript.Shell")
Set objMouse = CreateObject("WScript.Shell").Exec("cmd /c echo %MOUSE_X% %MOUSE_Y%")
blnExitLoop = False
dtmEndTime = DateAdd("n", 1, Now)

WScript.Echo "请将鼠标移到指定位置后按下空格键开始自动双击屏幕。"
WScript.Sleep 500

Do While Now < dtmEndTime And Not blnExitLoop
    If objShell.AppActivate("VBScript") Then
        strKeyState = objShell.SendKeys("{SPACE}", True)
        If strKeyState = "True" Then blnExitLoop = True
    End If
    
    objMouse.Exec("cmd /c echo WScript.Sleep 500 ^& WScript.SendKeys ""{LEFTCLICK}"" > temp.vbs")
    objShell.Run "wscript.exe temp.vbs", 0, True
    objShell.Run "cmd.exe /C del temp.vbs", 0, True
Loop

WScript.Echo "已退出循环并关闭脚本。"

请将上述代码保存为一个以 .vbs 为后缀名的文件，然后运行它即可。希望这次的精简版本能满足你的需求！