- @echo off&setlocal enabledelayedexpansion //关闭回显并开启变量延迟
- color 1f&mode con cols=46 lines=15 //调整颜色和屏幕大小
- for /f "skip=19 delims=" %%a in (%~fs0) do ( //%~fs0表示当前文件全目录的 短目录，本句意思是读取下面的坐标表中的坐标
- for %%b in (%%a) do ( // 对每一个坐标执行
- cls&echo 当前坐标：%%b^(以当字位置为0-0^) //清除屏幕并显示当前坐标
- echo ____________________________________________ //显示上边界
- for /f "tokens=1,2 delims=-" %%c in ("%%b") do ( // 分别提取横纵坐标
- for /l %%e in (1,1,%%d) do echo. //空纵坐标行
- for /l %%f in (1,1,%%c) do set /p= <nul //光标移动横坐标列
- set /p=★<nul&echo. //显示★并换行
- set /a num=9-%%d
- for /l %%i in (1,1,!num!) do echo. //空9-%%d行 也就是说整个显示区域为10行
- echo ____________________________________________ //显示下边界
- for /l %%j in (1,1,500) do echo>nul //两次显示★间的延时
- )
- )
- )
- pause>nul&goto :eof //暂停 并在按任意键之后退出
- 以下是由横竖组坐标构成的点阵：
- 1-1 2-2 3-3 4-4 5-5 6-6 7-7 8-8 9-9
- 10-8 11-7 12-6 13-5 14-4 15-3 16-2 17-1
- 18-2 19-3 20-4 21-5 22-6 23-7 24-8 25-9
- 26-8 27-7 28-6 29-5 30-4 31-3 32-2 33-1
- 34-2 35-3 36-4 37-5 38-6 39-7 40-8 41-9
| 
发表于 2010-12-29 13:38
|