If statement 批量-RPS-石头、布、剪刀-几轮后继续失败

If statement 批量-RPS-石头、布、剪刀-几轮后继续失败,if-statement,batch-file,goto,If Statement,Batch File,Goto,我一直在尝试批量制作一个石头、布、剪刀游戏。到目前为止,脚本运行,我可以让它自己玩,也可以和我玩(我需要将B变量从/A和随机数更改为/P,并有用户输入) 问题是,经过几轮(每次数量不同)后,脚本崩溃,我没有时间阅读最后一行文本(这将帮助我找到错误)。我尝试过打开和关闭ECHO,也尝试过从不同的DOS窗口(选择正确的目录)运行“RPS.bat>>log.txt”。它确实记录了一切,直到崩溃,也没有得到最后一行 我已经看了好几遍了,但是我找不到错误…:( 我用PHP做了同样的游戏,目前没有错误…(我

我一直在尝试批量制作一个石头、布、剪刀游戏。到目前为止,脚本运行,我可以让它自己玩,也可以和我玩(我需要将B变量从/A和随机数更改为/P,并有用户输入)

问题是,经过几轮(每次数量不同)后,脚本崩溃,我没有时间阅读最后一行文本(这将帮助我找到错误)。我尝试过打开和关闭ECHO,也尝试过从不同的DOS窗口(选择正确的目录)运行“RPS.bat>>log.txt”。它确实记录了一切,直到崩溃,也没有得到最后一行

我已经看了好几遍了,但是我找不到错误…:(

我用PHP做了同样的游戏,目前没有错误…(我知道这是一种完全不同的语言)

这是我的剧本:

@ECHO OFF
:TOP
SET /A AWON=0
SET /A BWON=0
SET /A NWON=0

:GAME
SET /A A=%RANDOM% %% 3 + 1
SET /P B=Number from 1 to 3

IF %A% EQU 1 (
    GOTO A1
) ELSE IF %A% EQU 2 (
GOTO A2
) ELSE IF %A% EQU 3 (
GOTO A3
) ELSE (
GOTO GAME
)

:A1
IF %B% EQU 1 (
GOTO DRAW
) ELSE IF %B% EQU 2 (
GOTO BWIN
) ELSE IF %B% EQU 3 (
GOTO AWIN
) ELSE (
    GOTO GAME
)

:A2
IF %B% EQU 1 (
    GOTO ARAW
) ELSE IF %B% EQU 2 (
    GOTO DRAW
) ELSE IF %B% EQU 3 (
    GOTO BWIN
) ELSE (
    GOTO GAME
)

:A3
IF %B% EQU 1 (
    GOTO BWIN
) ELSE IF %B% EQU 2 (
    GOTO AWIN
) ELSE IF %B% EQU 3 (
    GOTO DRAW
) ELSE (
    GOTO GAME
)

:AWIN
SET /A AWON=%AWON% + 1
ECHO -------------------------------------------------------------------------------
ECHO A won this round!
ECHO ---
ECHO A won: %AWON%
ECHO B won: %BWON%
ECHO Draw: %NWON%
PAUSE
GOTO GAME

:BWIN
SET /A BWON=%BWON% + 1
ECHO -------------------------------------------------------------------------------
ECHO B won this round!
ECHO ---
ECHO A won: %AWON%
ECHO B won: %BWON%
ECHO Draw: %NWON%
PAUSE
GOTO GAME

:DRAW
SET /A NWON=%NWON% + 1
ECHO -------------------------------------------------------------------------------
ECHO This round was a draw!
ECHO ---
ECHO A won: %AWON%
ECHO B won: %BWON%
ECHO Draw: %NWON%
PAUSE
GOTO GAME
谢谢格雷帮我解决了这个愚蠢的错误^^

也谢谢你的剧本,但是如果我没有遗漏什么,那就不太正确了

运行该脚本(格雷脚本的“缩短”版本)。使用类似于我的“表”中的变量,你可以看到,选择1(岩石),a不能赢(a=1 vs B=3应该是:a赢)。你知道如何解决这个问题吗?我想a=1和B=3时的“硬编码”解决方案是最好的?(我的意思是,当这些是值时,“正常”脚本不适用,但一个特殊的代码会给出结果)

在我的表中,如果最后一个符号是“+”,则脚本给出正确答案,如果最后一个符号是“-”,则脚本给出错误答案

ITEM     VALUE

ROCK     1
PAPER    2
SCISSORS 3

A - B = WINNER

1 - 1 =  0 DRAW  +
1 - 2 = -1 B WON +
1 - 3 = -2 A WON -
2 - 1 =  1 A WON +
2 - 2 =  0 DRAW  +
2 - 3 = -1 B WON +
3 - 1 =  2 B WON +
3 - 2 =  1 A WON +
3 - 3 =  0 DRAW  +
此外,如果您有任何关于如何保持脚本更整洁和使用更少行代码来完成相同工作的提示,我很乐意倾听


提前感谢!-Espen

您的错误可能是:

系统找不到指定的批次标签-ARAW

这是因为您的
A2
标签中有
GOTO-ARAW
,而您的
GOTO-AWIN

奖金:作为一种更“聪明”的决定胜利者的方法(肯定可以改进得更多)

最后,这里有一个打印“石头”、“布”和“剪刀”的工具,让它更有趣

@echo off

rem rock:1; paper:2; scissors:3
:GAME
SET /A CPU=%RANDOM% %% 3 + 1
SET /P PLAYER=Number from 1 to 3
goto CPUTYPE
:TYPE1
goto PLAYERTYPE
:TYPE2
cls
echo CPU:%CPUT% vs YOU:%PLAYERT%

rem set /A WINNER=(%CPU%-%PLAYER%) %% 3 //this does not work with batch - my mistake
SET /A WINNER=(%CPU% - %PLAYER% + 3) %% 3
IF %WINNER% EQU 1 (
    echo CPU WON! 
) ELSE (
IF %WINNER% EQU 0 (
    echo DRAW!
) ELSE (
    echo YOU WON!
))

GOTO GAME

:CPUTYPE
    IF %CPU% EQU 1 (
        SET CPUT="ROCK" 
    ) ELSE (
    IF %CPU% EQU 2 (
        SET CPUT="PAPER" 
    ) ELSE (
        SET CPUT="SCISSORS" 
    ))
    GOTO TYPE1

:PLAYERTYPE
    IF %PLAYER% EQU 1 (
        SET PLAYERT="ROCK" 
    ) ELSE (
    IF %PLAYER% EQU 2 (
        SET PLAYERT="PAPER" 
    ) ELSE (
        SET PLAYERT="SCISSORS" 
    ))
    GOTO TYPE2
根据asker的PvP版本更新版本(固定模块

@ECHO OFF
:GAME
SET /P A=A: 
SET /P B=B: 
SET /A WINNER=(%A% - %B% + 3) %% 3
ECHO W= %WINNER%
IF %WINNER% EQU 1 (
    echo A WON! 
) ELSE (
IF %WINNER% EQU 0 (
    echo DRAW!
) ELSE (
    echo B WON!
))
PAUSE
GOTO GAME
SET/A胜者解释=(%CPU%-%PLAYER%+3)%%3
: 2拍1,3拍2,1拍3。如果你把它画出来,它是一种圆形。我们使用
%
或模运算符来做这件事。如果你用整数除法除以这个数字,模运算符基本上会给你余数

这里是1到6模3,答案用粗体表示

1/3=0雷姆1

2/3=0雷姆2

3/3=1雷姆0

4/3=1雷姆1

5/3=1雷姆2

6/3=2雷姆0

注意结果如何总是<3和>0?我们利用这个机制来模拟石头剪纸的循环行为。你可能也注意到了,在这些例子中我没有做+3。添加+3是因为微软选择实现模数的方式,当你有一个负数时,它会做一些奇怪的事情(这就是我们修复您捕获的错误的方式)。我假设它使用了一个模数,就像我习惯的那样,符号不会改变结果。基本上,它只是将运算向上移动3,这样它就永远不会是负的。您可以在这里阅读更多关于这类事情的信息:。我喜欢示例,因此这里有一些可能会有所帮助

领带: 1v1->(1-1+3)%3->3%3->1 rem0

2v2->(2-2+3)%3->3%3->1 rem0

3v3->(3-3+3)%3->3%3->1 rem0

玩家1获胜 1v3->(1-3+3)%3->1%3->0 rem1

2v1->(2-1+3)%3->4%3->1 rem1

3v2->(3-2+3)%3->4%3->1 rem1

玩家2获胜 1v2->(1-2+3)%3->2%3->0 rem2

2v3->(2-3+3)%3->2%3->0 rem2

3v1->(3-1+3)%3->5%3->1 rem2


这里的模式是所有余数(模运算符的结果)所有匹配。多么方便!现在我们可以将该案例与if语句匹配,我们知道谁赢得了每场比赛。

就看到错误而言,您是否尝试从命令窗口执行它,而不仅仅是运行文件?或者,您也可以尝试将stderr重定向到一个文件:谢谢您的回答,我不认识您可以像那样运行脚本(只有当我点击它们时如何启动它们)。当脚本在DOS窗口运行时停止时,最后一行是:系统找不到指定的批标签-ARAW。我搜索了我的脚本以查找ARAW,这是AWIN的拼写错误!如果a为2,B为1,则会发生错误。我修复了它并运行了scipt 300轮(机器人同时播放a和B)没有错误!Thaks!我应该删除这个qestion,还是保持原样?哈,好吧,我实际上注意到了,当我运行它并回答问题时。如果你愿意,你可以将我的答案标记为正确。:PMarked it:)再次感谢!@Espen没问题,我还用不同的方式更新了我的答案来计算获胜者……只是为了好玩。@Espen我已经修复了你发现的错误-如果还有任何问题,请告诉我。太好了!非常感谢你花时间如此深思熟虑地回答:)非常感谢您的详细解释!我确实理解这个概念,并且在更新我的PHP版本时能够重新创建这个公式:)
@echo off

rem rock:1; paper:2; scissors:3
:GAME
SET /A CPU=%RANDOM% %% 3 + 1
SET /P PLAYER=Number from 1 to 3
goto CPUTYPE
:TYPE1
goto PLAYERTYPE
:TYPE2
cls
echo CPU:%CPUT% vs YOU:%PLAYERT%

rem set /A WINNER=(%CPU%-%PLAYER%) %% 3 //this does not work with batch - my mistake
SET /A WINNER=(%CPU% - %PLAYER% + 3) %% 3
IF %WINNER% EQU 1 (
    echo CPU WON! 
) ELSE (
IF %WINNER% EQU 0 (
    echo DRAW!
) ELSE (
    echo YOU WON!
))

GOTO GAME

:CPUTYPE
    IF %CPU% EQU 1 (
        SET CPUT="ROCK" 
    ) ELSE (
    IF %CPU% EQU 2 (
        SET CPUT="PAPER" 
    ) ELSE (
        SET CPUT="SCISSORS" 
    ))
    GOTO TYPE1

:PLAYERTYPE
    IF %PLAYER% EQU 1 (
        SET PLAYERT="ROCK" 
    ) ELSE (
    IF %PLAYER% EQU 2 (
        SET PLAYERT="PAPER" 
    ) ELSE (
        SET PLAYERT="SCISSORS" 
    ))
    GOTO TYPE2
@ECHO OFF
:GAME
SET /P A=A: 
SET /P B=B: 
SET /A WINNER=(%A% - %B% + 3) %% 3
ECHO W= %WINNER%
IF %WINNER% EQU 1 (
    echo A WON! 
) ELSE (
IF %WINNER% EQU 0 (
    echo DRAW!
) ELSE (
    echo B WON!
))
PAUSE
GOTO GAME