Я не знаю, знает ли кто-нибудь из вас что-нибудь о пакете (я уверен, что кто-то знает), но что касается этого поста, я пытаюсь создать неработающий помощник DND (что-то, что вы бы сказали статистике и это помогло бы вам завершить действие быстрее, чем бросать кубики, и выполнять математику самостоятельно.
В настоящее время у меня работает генератор случайных чисел (хотя я бы хотел его улучшить)
Эта версия настроена на выбор случайного числа от 1 до 20, я хотел бы выяснить способ получения уведомления о программе, если вы бросаете 1 или 20 (Критические удары / критические ошибки)
Кроме того, позже мне понадобится кое-что, что покажет мне, как сохранить определенные значения как переменные,
@echo off
:Start
Set /a ans="%RANDOM% %% 20"+1
echo %ans%
pause
goto Start
(Что касается сохранения переменных, когда программа запускается, она скажет мне, что я пропускаю операцию.)
Раскрашивающая часть была только для этого, если кто-то может показать мне способ упростить этот раздел, пожалуйста, скажите.
Пожалуйста, используйте термины Ламенс, я все еще не очень хорош в понимании всего этого.
(ПРОГРАММА ПРОГРАММЫ ПО ТЕКУЩЕЙ ПОМОЩИ)
@echo off
cls
:BEGIN
Echo HI THERE! AND WELCOME TO MY GAME!!
Echo Lets begin by setting your prefered color!
:A
set choice=
set /p choice= RED, WHITE, OR BLUE?!?
if not '%choice%'=='' set '%choice%'=='Red, White, Blue'
if '%choice%'=='RED' goto RED
if '%choice%'=='WHITE' goto WHITE
if '%choice%'=='BLUE' goto BLUE
if '%choice%'=='Red' goto RED
if '%choice%'=='White' goto WHITE
if '%choice%'=='Blue' goto BLUE
if '%choice%'=='red' goto RED
if '%choice%'=='white' goto WHITE
if '%choice%'=='blue' goto BLUE
if '%choice%'=='9' goto 1Bs
echo "%choice%" is not a good color bro, do a different one
goto A
:RED
color 4
goto START SCREEN
:WHITE
color 7
goto START SCREEN
:BLUE
color 1
goto START SCREEN
:START SCREEN
cls
TITLE CHOOSER GAME BOI
Echo ---THE DND GAME---
echo Welcome to the DND game, we will first choose your Attributes
echo Strength (How hard you hit) (STR)
echo Constitution (Your health) (CNST)
echo Knowledge (Better Rolls against Vendors and Questions) (KNLG)
echo Dexterity (Your chances of dodging and Hitting) (DXT)
echo You have a total of 10 points to apply to each Attribute
echo Your points HAVE to equal 10 otherwise you will have to restart
:ATTRSET
set MXPNTS=10
set choice=
set /p STR= STR (1-10)
set choice=
set /p CNST= CNST (1-10)
set CNST=CNST
set choice=
set /p KNLG= KNLG (1-10)
set KNLG=KNLG
set choice=
set /p DXT= DXT (1-10)
set DXT=DXT
set /a ATTRTTL=STR+CNST+KNLG+DXT
echo ATTRTTL
if NOT ATTRTTL=MXPNTS goto ATTRSET
if ATTRTTL=MXPNTS goto testyay
pause
:testyay
pause