脚本中显示扑克牌的花色 - 中国DOS联盟论坛

俺要写个斗地主的批处理游戏,
有个小问题,咋显示扑克牌的花色.
最好是全角的.

[ Last edited by sl543001 on 2010-2-23 at 21:14 ]

这是我做的，能不能起研究研究
http://bathome.l3.wuyou.com/thread-4578-1-3.html

没有在那里的账号,暂时没看到代码.
在回帖中看到了圆角扑克感觉不错,不过俺暂时打算用尖角的,虽然可能要更多代码.
AI方面,俺找到了别人写的BASIC代码(文曲星上用的那种),打算移植AI代码段来用.
┏━━━━┓
┃７　　　┃
┃◇ 斗　┃
┃　地　┃
┃　主 ◇┃
┃　　　７┃
┗━━━━┛
┏━━━━┓
┃╳╳╳╳┃
┃╳SYBN╳┃
┃╳╳╳╳┃
┃╳2010╳┃
┃╳╳╳╳┃
┗━━━━┛
┏━┳━┳━┳━━━━┓
┃７┃７┃７┃７　　　┃
┃○┃◇┃▲┃■ 斗　┃
┃　┃　┃　┃　地　┃
┃　┃　┃　┃　主 ■┃
┃　┃　┃　┃　　　７┃
┗━┻━┻━┻━━━━┛
┏┳┳┳┳┳┳━━━━┓
┃┃┃┃┃┃┃╱╳╳╲┃
┃┃┃┃┃┃┃╳SYBN╳┃
┃┃┃┃┃┃┃　╳╳　┃
┃┃┃┃┃┃┃╳2010╳┃
┃┃┃┃┃┃┃╲╳╳╱┃
┗┻┻┻┻┻┻━━━━┛
┏━━━━┓
┣━━━━┫
┣━━━━┫
┣━━━━┫
┣━━━━┫
┃╳╳╳╳┃
┃╳SYBN╳┃
┃╳╳╳╳┃
┃╳2010╳┃
┃╳╳╳╳┃
┗━━━━┛

[ Last edited by sl543001 on 2010-2-26 at 14:24 ]

没找到全角的符号，只能半角了，可以补一个空格。


@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 ]

扑克牌的花色吗？批处理可以显示啊

还是半角符号..俺想要全角的..

第1楼　sl543001	发表于 2010-02-23 19:36
中级用户　发帖 225　积分 499
[求助]脚本中显示扑克牌的花色俺要写个斗地主的批处理游戏, 有个小问题,咋显示扑克牌的花色. 最好是全角的. [ Last edited by sl543001 on 2010-2-23 at 21:14 ]

第2楼　netbenton	发表于 2010-02-23 20:08
银牌会员　发帖 752　积分 1,916　来自广西
这是我做的，能不能起研究研究 http://bathome.l3.wuyou.com/thread-4578-1-3.html

第3楼　sl543001	发表于 2010-02-23 21:06
中级用户　发帖 225　积分 499
没有在那里的账号,暂时没看到代码. 在回帖中看到了圆角扑克感觉不错,不过俺暂时打算用尖角的,虽然可能要更多代码. AI方面,俺找到了别人写的BASIC代码(文曲星上用的那种),打算移植AI代码段来用. ┏━━━━┓ ┃７　　　┃ ┃◇ 斗　┃ ┃　地　┃ ┃　主 ◇┃ ┃　　　７┃ ┗━━━━┛ ┏━━━━┓ ┃╳╳╳╳┃ ┃╳SYBN╳┃ ┃╳╳╳╳┃ ┃╳2010╳┃ ┃╳╳╳╳┃ ┗━━━━┛ ┏━┳━┳━┳━━━━┓ ┃７┃７┃７┃７　　　┃ ┃○┃◇┃▲┃■ 斗　┃ ┃　┃　┃　┃　地　┃ ┃　┃　┃　┃　主 ■┃ ┃　┃　┃　┃　　　７┃ ┗━┻━┻━┻━━━━┛ ┏┳┳┳┳┳┳━━━━┓ ┃┃┃┃┃┃┃╱╳╳╲┃ ┃┃┃┃┃┃┃╳SYBN╳┃ ┃┃┃┃┃┃┃　╳╳　┃ ┃┃┃┃┃┃┃╳2010╳┃ ┃┃┃┃┃┃┃╲╳╳╱┃ ┗┻┻┻┻┻┻━━━━┛ ┏━━━━┓ ┣━━━━┫ ┣━━━━┫ ┣━━━━┫ ┣━━━━┫ ┃╳╳╳╳┃ ┃╳SYBN╳┃ ┃╳╳╳╳┃ ┃╳2010╳┃ ┃╳╳╳╳┃ ┗━━━━┛ [ Last edited by sl543001 on 2010-2-26 at 14:24 ]

第4楼　qinchun36	发表于 2010-02-24 10:24
高级用户　发帖 400　积分 609
没找到全角的符号，只能半角了，可以补一个空格。 @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 ]

第5楼　jarry0932	发表于 2010-03-02 19:12
初级用户　发帖 122　积分 128
扑克牌的花色吗？批处理可以显示啊附件花色.rar (102 bytes)

第6楼　sl543001	发表于 2010-03-03 11:07
中级用户　发帖 225　积分 499
还是半角符号..俺想要全角的..