O @Blue Lynx também precisará examinar set /a
.
Set /a num=%random% %%100 +1
if %num% GEQ 10 Goto AHtrees
Como um pequeno bônus, o aleatório parece gerar uma distribuição bastante uniforme no longo prazo.
:: Roll-Dice.cmd ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@Echo off&SetLocal EnableExtensions EnableDelayedExpansion
Set /A Rolls=100000, Max=6
Echo:%date% %time% Rolls:%Rolls% Max:%Max%
For /L %%N in (1,1,%Rolls%) Do Set /a num=!random!%%Max+1,Arr[!num!]+=1
Set Arr
Echo:%date% %time%
> Roll-Dice.cmd
2016-11-02 19:56:58,29 Rolls:100000 Max:6
Arr[1]=16630
Arr[2]=16593
Arr[3]=16787
Arr[4]=16549
Arr[5]=16648
Arr[6]=16793
2016-11-02 19:57:09,89