本当にただ2d6を振るだけのバッチファイルです。見た目はちょっとそれっぽく。
いずれポーカーの続編のギャンブルゲームをつくるときはこれを使います()
丁半とか2分くらいで出来そうですね。
@echo off
:top
set d=1
set /a n1=%random%*6/32768+1
call :d%n1%
set d=2
set /a n2=%random%*6/32768+1
call :d%n2%
set /a sum=n1+n2
cls
echo ――― ―――
echo %l1[1]%%l2[1]%
echo %l1[2]%%l2[2]%
echo %l1[3]%%l2[3]%
echo ――― ―――
echo.
echo 合計:%sum%
pause >nul
goto top
:d1
set l%d%[1]=| |
set l%d%[2]=| ● |
set l%d%[3]=| |
exit /b
:d2
set l%d%[1]=|● |
set l%d%[2]=| |
set l%d%[3]=| ●|
exit /b
:d3
set l%d%[1]=|● |
set l%d%[2]=| ● |
set l%d%[3]=| ●|
exit /b
:d4
set l%d%[1]=|● ●|
set l%d%[2]=| |
set l%d%[3]=|● ●|
exit /b
:d5
set l%d%[1]=|● ●|
set l%d%[2]=| ● |
set l%d%[3]=|● ●|
exit /b
:d6
set l%d%[1]=|● ●|
set l%d%[2]=|● ●|
set l%d%[3]=|● ●|
exit /b