[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[代码合集] DOS如何辅助石头剪刀布

本帖最后由 JK_m 于 2023-4-24 18:25 编辑

[img]链接:https://pan.baidu.com/s/1g0tdaT0TVZqhXUdo-2b2iA?pwd=1467  提取码:1467[/img]
看图片知道有四个按钮我们只要鼠标点击三个就可以。石头剪刀布。
怎么让鼠标根据我的策略点击呢?
更或者统计对手的或者自己的特点而选择挥着中间变换策略最终战胜电脑?
注意:这个游戏策略是如下:我已经可以经常的赢过电脑了。只是想让批处理替我自动点击而已。如果有大神能针对电脑策略打败电脑策略就是更完美了。
谁赢了一轮

计算机策略

历史搜索

预言

过去的选择

历史搜索

过去选项列表

最佳猜测

img里面是图片 图片帮你发出来

TOP

本帖最后由 JK_m 于 2023-4-26 18:50 编辑

回复 2# jyswjjgdwtdtj


    看不见吗图片
图片

TOP

echo off
setlocal enabledelayedexpansion

::初始化区域

set /a user_win=0

set /a computer_win=0

set /a tie=0


:gameStart

:游戏开始

echo 请选择:1.剪刀 2.石头 3.布

set /p user_choice=你的选择:

if %user_choice%==1 (
    set user=剪刀
) else if %user_choice%==2 (
    set user=石头
) else

if %user_choice%==3 (
    set user=布
) else (
   
echo 输入有误,请重新输入
   
goto gameStart
)


:: 计算电脑的选择

set /a computer_choice=%random% %% 3 + 1
if %computer_choice%==1 (
    set computer=剪刀
)

else if %computer_choice%==2 (
    set computer=石头
) else if %computer_choice%==3 (
    set

computer=布
)


:: 判断胜负

if %user_choice%==%computer_choice% (
    set /a tie+=1
    set result=平局!
) else if

(%user_choice%-1+3)%3+1==%computer_choice% (
    set /a computer_win+=1
    set result=你输了


) else (
    set /a user_win+=1
    set result=你赢了!
)


:: 输出结果

echo -------------------------------

echo 你出了:%user%
echo 电脑出了:%computer%
echo 结果:%result%
echo

-------------------------------


:: 询问是否继续
set /p continue=是否继续?(Y/N)
if /i "%continue%"=="Y" goto gameStart


:: 输出记分牌
echo =================================
echo 本次游戏共进行了 %user_win% 局
echo

你赢了 %user_win% 局,电脑赢了 %computer_win% 局,平局 %tie% 局

echo =================================
不知道 哪里错误晕

TOP

本帖最后由 77七 于 2023-4-28 16:30 编辑

回复 4# JK_m


   认真检查一下,比如这些换行
  1.    set
  2. computer=布
  3.     set result=你输了
  4. ) else
复制代码
  1. (%user_choice%-1+3)%3+1==%computer_choice% (
复制代码
bat小白,请多指教!谢谢!

TOP

返回列表