没找到全角的符号，只能半角了，可以补一个空格。
@echo off
call :HeiHongMeiFang heitao hongtao meihua fangpian
echo 黑桃 %heitao% 红桃 %hongtao% 梅花 %meihua% 方片 %fangpian%
echo.
echo ┏━━━━┓
echo ┃7 ┃
echo ┃%fangpian% 斗 ┃
echo ┃ 地 ┃
echo ┃ 主 %fangpian%┃
echo ┃ 7┃
echo ┗━━━━┛
echo ┏━━━━┓
echo ┃╳╳╳╳┃
echo ┃╳SYBN╳┃
echo ┃╳╳╳╳┃
echo ┃╳2010╳┃
echo ┃╳╳╳╳┃
echo ┗━━━━┛
echo ┏━┳━┳━┳━━━━┓
echo ┃7 ┃7 ┃7 ┃7 ┃
echo ┃%hongtao% ┃%fangpian% ┃%meihua% ┃%heitao% 斗 ┃
echo ┃ ┃ ┃ ┃ 地 ┃
echo ┃ ┃ ┃ ┃ 主 %heitao%┃
echo ┃ ┃ ┃ ┃ 7┃
echo ┗━┻━┻━┻━━━━┛
echo ┏━━━━┓
echo ┣━━━━┫
echo ┣━━━━┫
echo ┣━━━━┫
echo ┣━━━━┫
echo ┃╳╳╳╳┃
echo ┃╳SYBN╳┃
echo ┃╳╳╳╳┃
echo ┃╳2010╳┃
echo ┃╳╳╳╳┃
echo ┗━━━━┛
pause>nul
exit
:HeiHongMeiFang
echo For i=3 To 6:s=s^&Chr^(i^)^&" ":Next:WScript.Echo s>%temp%\~$ching$.vbs
for /f "tokens=1,2,3,4" %%a in ('cscript -nologo %temp%\~$ching$.vbs') do (
set "%1=%%d"
set "%2=%%a"
set "%3=%%c"
set "%4=%%b"
)
del /q %temp%\~$ching$.vbs
Last edited by qinchun36 on 2010-2-24 at 13:17 ]
