批处理怎样获取鼠标位置？

wujunkai

1. @echo off
   
2. set nem=0
   
3. :main
   
4.         cls
   
5.         echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
   
6.         echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
   
7.         echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
   
8.         echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
   
9.         echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
   
10.         echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
    
11.         echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
    
12.         echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
    
13.         :get
    
14.                 for /F "delims=, tokens=1,2" %%a in ( 'cmdmouse.exe' ) do (
    
15.                         set /A x=%%a / 8
    
16.                         set /A y=%%b / 16
    
17.                         echo %x% %y%
    
18.                         set /A nem=%nem%+1
    
19.                 )
    
20.         if %nem% EQU 16 (
    
21.                 set nem=0
    
22.                 goto:main
    
23.         )
    
24.         goto:get
    
25. goto:eof

复制代码

我用上面的程序，怎么好像获取的位置是上一次击键的，望各位高手解决一下我这小白的问题，Thanks♪(･ω･)ﾉ
附件出自 http://www.bathome.net/thread-8004-1-1.html

ivor

for 里面不开启变量延迟？

wujunkai

回复 2# ivor


    我现在初学for，什么叫延时变量还不懂...

wujunkai

我已经解决了

@echo off
        echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
        echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
        echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
        echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
        echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
        echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
        echo ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
        echo  ▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌▌
:main
        call:mouse_get x,y
        echo %x% %y%
goto:main

:mouse_get
        call:mouse_save ax,ay
        call:mouse_save bx,by
        if %ax% EQU %bx% if %ay% EQU %by% (
                set /A %~1=%ax%
                set /A %~2=%ay%
        ) else (
                call:mouse_get %~1,%~2
        )
goto:eof

:mouse_save
        for /f "delims=, tokens=1,2" %%i in ( 'cmdmouse.exe' ) do (
                set /A %~1=%%i / 8
                set /A %~2=%%j / 16
        )
goto:eof