ZJHJ

@echo off
setlocal ENABLEDELAYEDEXPANSION
ConsExt /event
set /a ret=%errorlevel%
if %ret% geq 1000 (
        set /a "mouseY=ret%1000"
        set /a "mouseX=(ret-mouseY-1000)/1000"
        echo 鼠标点击在!mouseX!，!mouseY!。
) else (
        if %ret% equ 27 echo 你按下了返回键。
        if %ret% equ 37 echo 你按下了左键。
        if %ret% equ 38 echo 你按下了上键。
        if %ret% equ 39 echo 你按下了右键。
        if %ret% equ 37 echo 你按下了下键。
        if %ret% equ 13 echo 你按下了回车键。
        echo 键盘码：%ret%
)

为什么!mouseX!正确 ，为什么 !mouseY!=0  ？？？？？？

------------------------

以上问题我已经坚决了，X   Y 我用变量截取。也取消了setlocal

[ 本帖最后由 ZJHJ 于 2009-7-17 06:55 编辑 ]

czl1378

因此贴词不答意,已删除.

[ 本帖最后由 czl1378 于 2009-7-16 15:44 编辑 ]

czl1378

不好意思,昨天没翻到第2页.没看到你16楼的帖子.只看到了15楼的.
set /a "mouseY=ret%%1000"才对.
记住哦,2个百分号.

czl1378

因为最近在找工作,所以ConsExt一直没更新.不好意思.

ZJHJ

建议取消延迟变量（获取键盘鼠标事件），因为有多处goto者可能会带来麻烦

2oo9

嗯，不错，很好很强大。谢谢LZ了。

Seter

我想来小水一下...
首先果然是恐怖的小强...
还有DEF你的C系列很受欢迎么...那个大杂烩啥时发出啊..
还有啊,console.dec.cn你哪里弄来的,我去看www,dec,cn是痔疮网站....

defanive

不受欢迎，因为有点占CPU。。。
那个域名是在www.meibu.com上注册的。。。
dec.cn是旗下的一个域名，可以注册二级。。。
其实以前还有个console.cn.ms，结果外国那烧饼网站不开了。。。

huangmin1111

这个很强大。不错。下载收藏。

HAT

ConsExt图形界面及鼠标坐标获取应用演示.bat

:KK
@echo off
start "NewThread" /b ConsExt.exe /showtime 61 0 0 10 8 "本地时间："
color 0B
@title  计算机系统维护  编辑 Wangwei QQ：251485609  %date%  %zcb%
:KSY
cls
@echo       演示版                     系统维护功能表:
@echo.    ╭━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━╮
@echo     ┃ 1  清除残留垃圾文件(修改版)           2  清除恶意程序(安全卫士360) ┃
@echo.    ┃                                                                    ┃
@echo     ┃ 3  设置(取消)软件“防火墙”限制病毒启动(预防或减少中毒)            ┃
@echo.    ┃                                                                    ┃
@echo     ┃ 4  exe、dll、inf 程序快照比较(检查是否被病毒修改)                  ┃
@echo.    ┃                                                                    ┃
@echo     ┃ 5  查看某天或之后生成的文件(默认所有日期及所有文件)                ┃
@echo.    ┃                                                                    ┃
@echo     ┃ 6  文件或系统备份(还原)               7  驱动程序备份(安装)        ┃
@echo.    ┃                                                                    ┃
@echo     ┃ 8  安装(卸载)一键GHOST备份            9  安装 影子系统(替身)       ┃
@echo.    ┃                                                                    ┃
@echo     ┃10  任意创建系统还原点                11  按清单搜索并自动删除文件  ┃
@echo.    ┃                                                                    ┃
@echo     ┃12  当前运行的程序信息(含查找某DLL)   13  检测收藏夹的有效连接      ┃
@echo.    ┃                                                                    ┃
@echo     ┃18  设置(解除)指定文件全属性          19  系统隐藏加锁(解锁)        ┃
@echo.    ┃                                                                    ┃
@echo     ┃23  文件加密解密及变化检查类          34  安全辅助工具 SREng        ┃
@echo.    ┃                                                                    ┃
@echo     ┃35  查看注册dll ocx exe组件           36  网络设置备份端口类        ┃
@echo     ╰━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━╯
ConsExt /fillrect 3 1 74 23 1 15
set ceo=ConsExt /echo
%ceo% 73 23 11 13 "下 页"
::获取鼠标坐标
ConsExt /event
  set /a sbs=%errorlevel%+1
  set  mX=%sbs:~0,-3%
  set  mY=%sbs:~-2,2%
        @echo  坐标 ( X %mX%， Y %mY% )
  set wX=X%mX%
  set wY=Y%mY%
@echo 鼠 %wX%    %wY%
::鼠标坐标判断
if %sbs% EQU 14  goto KK
        if %mX% LSS 35 if %mY%==03 @echo  1
        if %mX% GTR 45 if %mY%==03 @echo  2
        if %mX% LSS 60 if %mY%==05 @echo  3
        if %mX% LSS 55 if %mY%==07 @echo  4
        if %mX% LSS 57 if %mY%==09 @echo  5
        if %mX% LSS 35 if %mY%==11 @echo  6
        if %mX% GTR 45 if %mY%==11 @echo  7
        if %mX% LSS 35 if %mY%==13 @echo  8
        if %mX% GTR 45 if %mY%==13 @echo  9
        if %mX% LSS 35 if %mY%==15 @echo  10
        if %mX% GTR 45 if %mY%==15 @echo  11
        if %mX% LSS 35 if %mY%==17 @echo  12
        if %mX% GTR 45 if %mY%==17 @echo  13
        if %mX% LSS 35 if %mY%==19 @echo  18
        if %mX% GTR 45 if %mY%==19 @echo  19
        if %mX% LSS 35 if %mY%==21 @echo  23
        if %mX% GTR 45 if %mY%==21 @echo  34
        if %mX% LSS 35 if %mY%==23 @echo  35
        if %mX% GTR 45 if %mY%==23 @echo  36
        if %mX% GTR 73 if %mY%==24 goto KXY
ping/n 3 127.1>nul>NUL
goto kk
:KXY
@echo off
CLS
@echo.   ╭━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━╮
@echo    ┃ 24  系统默认共享(局域网共享设置)         26  修改TTL键值避免黑客攻击 ┃
@echo.   ┃                                                                      ┃
@echo    ┃ 27  收藏夹备份或恢复(D:\)                28  查看或设置系统启动项    ┃
@echo.   ┃                                                                      ┃
@echo    ┃ 29  当前运行的程序信息                   SJ  国家授时中心时间(校对)  ┃
@echo.   ┃                                                                      ┃
@echo    ┃ JD  删除快捷方式箭头或恢复               KX   快速终止指定以外的进程 ┃
@echo.   ┃                                                                      ┃
@echo    ┃ KJ  网络免费空间(上传下载)               ARP  局域网ARP木马检查      ┃
@echo.   ┃                                                                      ┃
@echo    ┃ 14  查找可疑程序         15  强行终止可疑进程      16  万能软件提取  ┃
@echo.   ┃                                                                      ┃
@echo    ┃ 30  进入事件查看器       31  反删除工具            32  微软安全扫描  ┃
@echo.   ┃                                                                      ┃
@echo    ┃ 33  程序活动信息查看     37  获取计算机资料信息    38  注册表快照比较┃
@echo.   ┃                                                                      ┃
@echo    ┃ 39  畸形文件夹目录       17  杀灭天王              20  系统修复      ┃
@echo.   ┃                                                                      ┃
@echo    ┃ bat 查看bat转exe 源代码  21  IE修复  22  注册表类  25  系统服务类    ┃
@echo.   ┃                                                                      ┃
@echo    ┃ yy  娱 乐(人机对战游戏)  ZY  局域网共享资源扫描    40   其    他     ┃
@echo    ╰━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━╯
@echo                                                   原版演示
ConsExt /fillrect 2 0 76 23 1 15
::set ceo=ConsExt /echo
%ceo% 73 23 11 13 "上 页"
::获取鼠标坐标
ConsExt /event
  set /a sbs=%errorlevel%+1
  set  mX=%sbs:~0,-3%
  set  mY=%sbs:~-2,2%
        @echo  坐标 ( X %mX%， Y %mY% )
::鼠标坐标判断
if %sbs% EQU 14  goto KXY
        if %mX% LSS 35 if %mY%==02 @echo  24
        if %mX% GTR 45 if %mY%==02 @echo  26
        if %mX% LSS 35 if %mY%==04 @echo  27
        if %mX% GTR 45 if %mY%==04 @echo  28
        if %mX% LSS 35 if %mY%==06 @echo  29
        if %mX% GTR 45 if %mY%==06 @echo  SJ
        if %mX% LSS 35 if %mY%==08 @echo  JD
        if %mX% GTR 45 if %mY%==08 @echo  KX
        if %mX% LSS 35 if %mY%==10 @echo  KJ
        if %mX% GTR 45 if %mY%==10 @echo  ARP
        if %mX% LSS 25 if %mY%==12 @echo 14
        if %mX% LSS 50 if %mX% GTR 35 if %mY%==12 @echo 15
        if %mX% GTR 57 if %mY%==12 @echo 16
        if %mX% LSS 25 if %mX% GTR 3  if %mY%==14 @echo 30
        if %mX% LSS 50 if %mX% GTR 35 if %mY%==14 @echo 31
        if %mX% GTR 57 if %mY%==14 @echo 32
        if %mX% LSS 25 if %mY%==16 @echo 33
        if %mX% LSS 50 if %mX% GTR 35 if %mY%==16 @echo 37
        if %mX% GTR 57 if %mY%==16 @echo 38
        if %mX% LSS 25 if %mY%==18 @echo 39
        if %mX% LSS 50 if %mX% GTR 35 if %mY%==18 @echo 17
        if %mX% GTR 57 if %mY%==18 @echo 20
        if %mX% LSS 25 if %mY%==20 @echo bat
        if %mX% LSS 40 if %mX% GTR 31 if %mY%==20 @echo 21
        if %mX% LSS 54 if %mX% GTR 45 if %mY%==20 @echo 22
        if %mX% GTR 57 if %mY%==20 @echo 25
        if %mX% LSS 25 if %mY%==22 @echo yy
        if %mX% LSS 50 if %mX% GTR 35 if %mY%==22 @echo ZY
        if %mX% GTR 57 if %mY%==22 @echo 40
        if %mX% GTR 50 if %mX% LSS 57 if %mY%==24 goto jxys
        if %mX% GTR 73 if %mY%==24 goto KK
ping/n 1 127.1>nul>NUL
goto KXY
-----------------------------------------------------------------------------------
:jxys
::原版演示
@echo off
setlocal ENABLEDELAYEDEXPANSION
echo 下面将要演示ConsExt的用法。
echo 你可以直接运行ConsExt.exe来查看用法，或者在Cmd里输入ConsExt /?。
echo.
pause
cls
echo 首先输出一行字符：
echo ConsExt /echo x坐标 y坐标 背景色 文字颜色 要显示的文字 [字符串宽度] [对齐方式]
echo.
echo 示例：ConsExt /echo 3 2 11 13 "I love you!"
echo 按任意键开始显示...
pause>nul
ConsExt /echo 3 2 11 13 "I love you!"
echo.
echo 看到了没？什么，没看到？
echo 好吧，如果你没说谎，那就是ConsExt出问题了，请联系作者报告问题吧。
echo 下面的演示如果有任何问题，都请与作者联系。QQ：378246800。谢谢。
echo.
pause
cls
echo 再来显示一个窗口：
echo ConsExt /window x坐标 y坐标 宽度 高度 背景色 [标题] [顶部线条左边字符] [顶部线条中间字符] [顶部线条右边字符] [中间线条左边字符] [中间线条中间字符] [中间线条右边字符] [底部线条左边字符] [底部线条中间字符] [底部线条右边字符] [分割线左边字符] [分割线中间字符] [分割线右边字符]
echo.
echo 示例：ConsExt /window 5 4 20 15 11 "ConsExt"
pause
ConsExt /window 5 4 20 15 11 "ConsExt"
pause>nul
cls
echo 再来改变下窗口样式：
echo ConsExt /window 5 4 20 15 11 "ConsExt" "┌" "─" "┐" "│" "  " "│" "└" "─" "┘" "├" "─" "┤"
pause
ConsExt /window 5 4 20 15 11 "ConsExt" "┌" "─" "┐" "│" "  " "│" "└" "─" "┘" "├" "─" "┤"
pause>nul
cls
echo 接下来显示一个矩形框：
echo ConsExt /box  x坐标 y坐标 宽度 高度 背景色 前景色 [顶部线条左边字符] [顶部线条中间字符] [顶部线条右边字符] [中间线条左边字符] [中间线条中间字符] [中间线条右边字符] [底部线条左边字符] [底部线条中间字符] [底部线条右边字符]
echo.
echo 示例：ConsExt /box 5 4 20 15 11 0
pause
ConsExt /box 5 4 20 15 11 0
pause>nul
cls
echo 显示一个按钮：
echo ConsExt /button x坐标 y坐标 宽度 高度 背景色 边框色 标题 [标题颜色]
echo.
echo 示例：ConsExt /button 10 10 15 5 11 0 "按钮" 13
pause
ConsExt /button 10 10 15 5 11 0 "按钮" 13
pause>nul
cls
echo 显示一个消息框：
echo ConsExt /msg x坐标 y坐标 宽度 背景色 边框色 标题 提示 [提示颜色] [按钮个数(1或2)] [顶部线条左边字符] [顶部线条中间字符] [顶部线条右边字符] [中间线条左边字符] [中间线条中间字符] [中间线条右边字符] [底部线条左边字符] [底部线条中间字符] [底部线条右边字符] [分割线左边字符] [分割线中间字符] [分割线右边字符]
echo.
echo %errorlevel%表示返回值。如果返回值为1，说明选择了“确定”，如果返回2，说明选择了取消或点击了关闭。
echo 示例：ConsExt /msg 1 1 20 11 0 MSG "消息框" 13 2
pause
ConsExt /msg 1 1 20 11 0 MSG "消息框" 13 2
cls
if %errorlevel% equ 1 echo 你选择了确定。
if %errorlevel% equ 2 echo 你选择了取消或点击了关闭。
pause
cls
echo 显示一个进度框：
echo ConsExt /prog x坐标 y坐标 宽度 背景色 边框色 标题 提示 [提示颜色] [进度值] [是否画边框(1画，0不画)]  [顶部线条左边字符] [顶部线条中间字符] [顶部线条右边字符] [中间线条左边字符] [中间线条中间字符] [中间线条右边字符] [底部线条左边字符] [底部线条中间字符] [底部线条右边字符] [分割线左边字符] [分割线中间字符] [分割线右边字符]
echo.
echo 示例：显示一个进度框，它的值从1-100。
echo ConsExt /prog 10 10 20 11 0 "进度条" "正在开始下次演示...0%%" 1 0 1
echo for /l %%i in (1,1,100) do (
echo         ConsExt /prog 10 10 20 11 0 "进度条" "正在开始下次演示...%%i%%" 1 %%i 0
echo )
echo 为了避免闪烁，只在循环外画一次边框。
pause
ConsExt /prog 10 10 20 11 0 "进度条" "正在开始下次演示...0%%" 1 0 1
for /l %%i in (1,1,100) do (
        ConsExt /prog 10 10 20 11 0 "进度条" "正在开始下次演示...%%i%%" 1 %%i 0
)
cls
echo 显示一个列表框：
echo ConsExt /listbox x坐标 y坐标 宽度 高度 背景色 边框色 文字颜色 [列表项1-9]
echo.
echo 示例：ConsExt /listbox 10 10 20 12 11 0 13 "列表1" "列表2" "列表3" "列表4" "列表5" "列表6" "列表7" "列表8" "列表9"
pause
ConsExt /listbox 10 10 20 12 11 0 13 "列表1" "列表2" "列表3" "列表4" "列表5" "列表6" "列表7" "列表8" "列表9"
pause>nul
cls
echo 用指定颜色填充一块矩形区域:
echo ConsExt /fillrect 矩形区左边坐标 矩形区顶部坐标 矩形区右边坐标 矩形区底部坐标 背景色 前景色
echo.
echo 示例：ConsExt /fillrect 10 1 30 15 14 13
pause
ConsExt /fillrect 10 1 30 15 14 13
pause>nul
cls
echo 延时：
echo ConsExt /sleep 毫秒数
echo.
echo 示例：ConsExt /sleep 1000
pause
echo 开始延时。
ConsExt /sleep 1000
echo 延时完毕。
pause
cls
echo 获取键盘鼠标事件：
echo ConsExt /event
echo.
echo 示例：
echo :loop
echo ConsExt /event
echo set /a ret=%%errorlevel%%
echo if %ret% geq 1000 (
echo         set /a "mouseY=ret%%1000"
echo        set /a "mouseX=(ret-mouseY-1000)/1000"
echo        鼠标点击在!mouseX!，!mouseY!。
echo ) else (
echo         if %ret% equ 27 echo 你按下了返回键。
echo        if %ret% equ 37 echo 你按下了左键。
echo         if %ret% equ 38 echo 你按下了上键。
echo         if %ret% equ 39 echo 你按下了右键。
echo        if %ret% equ 37 echo 你按下了下键。
echo         if %ret% equ 13 echo 你按下了回车键。
echo        echo 键盘码：%ret%
echo )
pause
echo 开始检测键盘鼠标事件。
:loop
ConsExt /event
set /a ret=%errorlevel%
if %ret% geq 1000 (
        set /a "mouseY=ret%%1000"
        set /a "mouseX=(ret-mouseY-1000)/1000"
        echo 鼠标点击在!mouseX!，!mouseY!。
) else (
        if %ret% equ 27 echo 你按下了返回键。
        if %ret% equ 37 echo 你按下了左键。
        if %ret% equ 38 echo 你按下了上键。
        if %ret% equ 39 echo 你按下了右键。
        if %ret% equ 37 echo 你按下了下键。
        if %ret% equ 13 echo 你按下了回车键。
        echo 键盘码：%ret%
)
pause
cls
echo 使窗口闪烁：
echo ConsExt /flashwindow
echo.
echo 示例：ConsExt /flashwindow
pause
echo 闪烁窗口。
ConsExt /flashwindow
echo 闪烁完毕。
pause
cls
echo 隐藏/显示插入符：
echo ConsExt /crv [显示(0)/隐藏(1)]
echo.
echo 示例：ConsExt /crv 0
pause
echo 隐藏插入符。
ConsExt /crv 0
pause
echo 显示插入符。
ConsExt /crv 1
pause
cls
echo 设置插入符位置：
echo ConsExt /pos x坐标 y坐标
echo.
echo 示例：ConsExt /pos 20 20
pause
ConsExt /pos 20 20
pause
cls
echo 检测一个点是否在矩形区域内：
echo ConsExt /ptinrect x坐标 y坐标 矩形区左边坐标 矩形区顶部坐标 矩形区右边坐标 矩形区底部坐标
echo.
echo 示例：没有。
pause
cls
echo 显示时间：
echo ConsExt /showtime x坐标 y坐标 背景色 前景色 [时区+] [提示]
echo.
echo 注意：须用start "NewThread" /b 的形式采用新线程开启，不然就没有意义。
echo 结束程序用ConsExt /close发送WM_CLOSE消息结束。
echo.
echo 示例：start "NewThread" /b ConsExt.exe /showtime 10 10 1 15 8 "本地时间："
pause
start "NewThread" /b ConsExt.exe /showtime 10 10 1 15 8 "本地时间："
pause
cls
echo 关闭窗口，并退出由start "NewThread" /b 方式调用的程序 ：
echo ConsExt /close
echo.
echo 示例：ConsExt /close
pause
ConsExt /close
复制代码

转自：http://www.cn-dos.net/forum/viewthread.php?tid=46783

czl1378

太好了。楼上好人

ZJHJ

非常很希望 czl1378 [楼主] 能够放一个单独的 体积很小的 CMD鼠标获取程序。
以下这个体积很小，但是启用的ntvdm.exe占用cpu太高（几呼100%），操作中非常卡。[楼主] 原来的ConsExt.exe很好用，启用的ntvdm.exe不占用cpu，但是，200Kb实在太大，不能用debug-dw装入bat（极限值2.5K）
@echo off
title 鼠标三方演示批处理
(chcp 437 &graftabl 936)>nul
SET SYB=A100;0AEB 3030 3020 2030 3030 2420 00B8 CD00;B833 0001 33CD 05B8 CD00 A933 0007 F674;E086 300D A330 0102 C889 08B3 18E8 A300;0105 D089 08B3 0EE8 A300 0108 09B4 02BA;CD01 B421 CD4C F621 08F3 74E4 FE02 FEC0;88C0 B1C4 D204 25E8 0F0F 300D 3C30 7639;0402 8007 39FC 0376 C480 C307  ;
SET V=;RCX;006C;N mouse.com;W;Q
(ECHO.%SYB:;=&ECHO.DW %&ECHO.%V:;=&ECHO.%)|DEBUG>NUL
:lp
cls
echo.
echo   鼠标点击窗口
echo.                                                  点击这里关闭窗口
echo.                            查看代码
echo.
echo           X %X%       Y %Y%
for /f "tokens=1-3" %%1 in ('mouse.com') do (set /a X=0x%%2,Y=0x%%3)
if %X% GTR 51 if %X% LSS 65  if %Y% EQU 03 goto we
if %X% GTR 29 if %X% LSS 36  if %Y% EQU 04 goto ck
goto :lp
:ck
start mrt.exe  %0
goto :lp
:we
Exit

cyxgg

看看。。。

cyxgg

看看。。。

598782168

..........