Board logo

标题: 各位,我想让文字在DOS窗口的正中间显示 [打印本页]

作者: dnntgmfd     时间: 2009-3-4 23:41    标题: 各位,我想让文字在DOS窗口的正中间显示

我主要是想搞点想法,,自已也才刚入门,网上也找不到,所以....
作者: moniuming     时间: 2009-3-5 02:53
可以把文件拖进来,也可以双击运行此脚本,不支持特殊字符:
@echo off
Setlocal Enabledelayedexpansion
set m=0&set "fl=%~fs0"
if not "%~1"=="" (
  set "fl=%~1"
)
type "%fl%">tmp
>>tmp echo.
for /l %%a in (1 1 80) do (set "kong=!kong! ")
for /f "tokens=1,* delims=:" %%a in ('findstr /o .* "tmp"') do (
  set /a m+=1,n=m-1
  set "num!m!=%%a"&call set "str!m!=%%b"
  if !m! gtr 1 (
    set /a "lgth=(80+num!n!+2-num!m!)/2"
    call echo.%%kong:~0,!lgth!%%%%str!n!%%
  )
)
del tmp
pause