我写了个无聊刷钱小游戏
bat吧
全部回复
仅看楼主
level 12
ArianaSama 楼主
编的累死。。。果然一个人编还是有点累
2015年03月25日 12点03分 1
level 12
ArianaSama 楼主
@echo off
set gold=1000
set heroHP=500
set heroAT=50
set butterfly=1
set butterflys=0
set shiva=0
set shivas=0
set heart=0
set hearts=0
set roshanHP=2000000
set roshanAT=2000000
:menu
cls
set pawnHP=200
set pawnAT=10
set superpawnHP=200
set superpawnAT=100
set towerHP=20000
set towerAT=1000
echo 游戏
echo.
echo 金币 %gold% 生命 %heroHP% 攻击 %heroAT%
echo.
echo 1.打钱
echo.
echo 2.推塔
echo.
echo 3.肉山
echo.
echo 4.商店
set /p menu=
if %menu% equ 0 goto wtf
if %menu% equ 1 goto farm
if %menu% equ 2 goto push
if %menu% equ 3 goto roshan
if %menu% equ 4 goto shop
goto menu
:wtf
cls
set gold=100000000
echo 你真机智找到了作弊的方法
pause>nul
goto menu
:farm
cls
echo 打钱
echo.
echo 1.小兵
echo.
echo 2.大兵
echo.
echo 3.返回
set /p farm=
if %farm% equ 1 goto pawn
if %farm% equ 2 goto superpawn
if %farm% equ 3 goto menu
:pawn
cls
echo 小兵生命 %pawnHP%
echo.
echo 小兵攻击 %pawnAT%
echo.
echo 英雄生命 %heroHP%
echo.
echo 英雄攻击 %heroAT%
pause>nul
for /l %%a in (1,1,%butterfly%) do (
set /a pawnHP-=heroAT
set /a pawnAT-=shiva
set /a heroHP+=heart
)
set /a heroHP-=pawnAT
if %pawnHP% lss 1 goto pawnwin
if %heroHP% lss 1 goto die
goto pawn
:pawnwin
cls
echo 你击杀了小兵获得1000金币
set G=1000
set /a gold+=G
pause>nul
goto menu
:superpawn
cls
echo 大兵生命 %superpawnHP%
echo.
echo 大兵攻击 %superpawnAT%
echo.
echo 英雄生命 %heroHP%
echo.
echo 英雄攻击 %heroAT%
pause>nul
for /l %%a in (1,1,%butterfly%) do (
set /a superpawnHP-=heroAT
set /a pawnAT-=shiva
set /a heroHP+=heart
)
set /a heroHP-=superpawnAT
if %superpawnHP% lss 1 goto superpawnwin
if %heroHP% lss 1 goto die
goto superpawn
:superpawnwin
cls
echo 你击杀了大兵获得3000金币
set G=3000
set /a gold+=G
pause>nul
goto menu
:back
cls
goto menu
:push
cls
echo 推塔
echo.
echo 1.防御塔
echo.
echo 2.返回
set /p push=
if %push% equ 1 goto tower
if %push% equ 2 goto menu
:tower
cls
echo 防御塔生命 %towerHP%
echo.
echo 防御塔攻击 %towerAT%
echo.
echo 英雄生命 %heroHP%
echo.
echo 英雄攻击 %heroAT%
pause>nul
for /l %%a in (1,1,%butterfly%) do (
set /a towerHP-=heroAT
set /a pawnAT-=shiva
set /a heroHP+=heart
)
set /a heroHP-=towerAT
if %towerHP% lss 1 goto towerwin
if %heroHP% lss 1 goto die
goto tower
:towerwin
cls
echo 你击杀了防御塔获得了50000金币
set G=50000
set /a gold+=G
pause>nul
goto menu
:roshan
cls
echo 肉山
echo.
echo 1.肉山
echo.
echo 2.返回
set /p roshan=
if %roshan% equ 1 goto killroshan
if %roshan% equ 2 goto menu
:killroshan
cls
echo 肉山生命 %roshanHP%
echo.
echo 肉山攻击 %roshanAT%
echo.
echo 英雄生命 %heroHP%
echo.
echo 英雄攻击 %heroAT%
pause>nul
for /l %%a in (1,1,%butterfly%) do (
set /a roshanHP-=heroAT
set /a pawnAT-=shiva
set /a heroHP+=heart
)
set /a heroHP-=roshanAT
if %roshanHP% lss 1 goto roshanwin
if %heroHP% lss 1 goto die
goto roshan
:roshanwin
cls
echo 你击杀了肉山获得了100000000金币
set /a gold+=100000000
set roshanHP=2000000
set roshanAT=2000000
pause>nul
goto menu
:shop
cls
echo 商店
echo.
echo 金币 %gold%
echo.
echo 1.英雄生命+100
echo 100金币
echo.
echo 2.英雄攻击+100
echo 100金币
echo.
echo 3.英雄生命+10000
echo 10000金币
echo.
echo 4.英雄攻击+10000
echo 10000金币
echo.
echo 5.物品
echo.
echo 6.返回
set /p shop=
if %shop% equ 1 goto buyHP
if %shop% equ 2 goto buyAT
if %shop% equ 3 goto moreHP
if %shop% equ 4 goto moreAT
if %shop% equ 5 goto items
if %shop% equ 6 goto menu
:buyHP
cls
if %gold% lss 100 goto nogold
if %heroHP% geq 1000000 goto toomuch
set /a heroHP+=100
set /a gold-=100
echo 英雄生命+100 金币-100
pause>nul
goto shop
:buyAT
cls
if %gold% lss 100 goto nogold
if %heroAT% geq 1000000 goto toomuch
set /a heroAT+=100
set /a gold-=100
echo 英雄攻击+100 金币-100
pause>nul
goto shop
:moreHP
cls
if %gold% lss 10000 goto nogold
if %heroHP% geq 1000000 goto toomuch
set /a heroHP+=10000
set /a gold-=10000
echo 英雄生命+10000 金币-10000
pause>nul
goto shop
:moreAT
cls
if %gold% lss 10000 goto nogold
if %heroAT% geq 1000000 goto toomuch
set /a heroAT+=10000
set /a gold-=10000
echo 英雄攻击+10000 金币-10000
pause>nul
goto shop
:items
cls
echo 物品
echo.
echo 金币 %gold%
echo.
echo 1.蝴蝶之刃
echo 40000金币
echo.
echo 2.西瓦的守护
echo 50000金币
echo.
echo 3.恐鳌之心
echo 60000金币
echo.
echo 4.返回
set /p items=
if %items% equ 1 goto butterfly
if %items% equ 2 goto shivas
if %items% equ 3 goto heart
if %items% equ 4 goto menu
:butterfly
cls
set /a butterfly+=1
set /a butterflys+=1
if %butterfly% geq 6 goto toomuch
echo 你每攻击1次可以额外攻击%butterfly%次
echo.
echo 蝴蝶之刃+1 金币-40000
echo.
echo 蝴蝶之刃 %butterflys% 个
pause>nul
goto menu
:shivas
cls
set /a shiva+=1000
set /a shivas+=1
echo 每次攻击削弱敌方单位%shiva%攻击
echo.
echo 西瓦的守护+1 金币-50000
echo.
echo 西瓦的守护 %shivas% 个
pause>nul
goto menu
:heart
cls
set /a heart+=1000
set /a hearts+=1
echo 你每攻击一次回复英雄%heart%生命
echo.
echo 恐鳌之心+1 金币-60000
echo.
echo 恐鳌之心 %hearts% 个
pause>nul
goto menu
:toomuch
echo 你买这件商品太多了没货了
pause>nul
goto menu
:die
cls
echo 死亡
echo.
echo 金币-500
echo.
echo 按任意键复活
set /a gold-=500
pause>nul
goto menu
:nogold
cls
echo 没钱
echo.
echo 没钱什么都没有
pause>nul
goto menu
2015年03月25日 12点03分 4
level 12
ArianaSama 楼主
玩过dota应该觉得这些名字很熟悉[吐舌]
2015年03月25日 13点03分 5
Dota、LOL、3C、真三、三百都玩过......还差风暴英雄......话说代码能精简的地方很多,你可以尝试模块化!
2015年03月26日 06点03分
回复
������
:惊现千年水怪
2015年03月29日 12点03分
回复
���ǹ��β�����
:看一样就知道你是谁了,小马甲= ̄ω ̄=
2015年06月05日 16点06分
level 11
[真棒]
2015年03月26日 03点03分 7
level 12
来顶个
#include <QApplication>
#include <QLabel>
int main(int argc, char *argv[])
{
QApplication app(argc, argv);
QLabel label("Hello, world");
label.show();
return app.exec();
}
   --你好,世界
   --梦想的起点
   --平凡而伟大的开始
2015年03月26日 04点03分 8
Qt[真棒]
2015年04月08日 06点04分
level 11
围观
2015年03月26日 10点03分 9
level 11
围观[开心]
2015年03月26日 10点03分 10
level 11
[惊讶]
2015年03月26日 10点03分 11
你这三连发啊
2015年03月26日 10点03分
level 12
ArianaSama 楼主
这是我一口气瞎编的,修改了下bug就发了...等我有空改简单点。@黄田杰
2015年03月26日 10点03分 12
level 7
这bat纠正了我对for的某种误解
2015年03月26日 13点03分 13
level 13
嫌累可以找小白,既可以提高他们技术,又能自己省事
2015年03月26日 14点03分 14
level 11
好吊
2015年03月26日 14点03分 15
level 12
ArianaSama 楼主
我又加了些东西,并模块化了。
2015年03月28日 07点03分 16
level 12
ArianaSama 楼主
@echo off
set gold=1000
set hehp=500
set heat=50
set crit=0
set cris=0
set skad=0
set skas=0
set hear=0
set heas=0
set butt=1
set buts=0
set roup=1
:menu
cls
set pahp=100
set paat=10
set
bp
hp=500
set bpat=50
set tohp=1000
set toat=100
set bthp=5000
set btat=500
set /a rohp=%hehp%*%roup%
set /a roat=%heat%*%roup%
echo 状态:金币 %gold% 生命 %hehp% 攻击 %heat%
echo.
echo 物品:大炮 %cris% 冰眼 %skas% 龙心 %heas% 蝴蝶 %buts%
echo.
echo 肉山等级:%roup%
echo.
echo 1.带线
echo.
echo 2.推塔
echo.
echo 3.肉山
echo.
echo 4.商店
echo.
echo 5.泉水
echo.
set /p menu=
if %menu% equ 0 goto wtf
if %menu% equ 1 goto farm
if %menu% equ 2 goto push
if %menu% equ 3 goto roshan
if %menu% equ 4 goto shop
if %menu% equ 5 goto fountain
goto menu
:wtf
cls
set /a gold+=100000000
pause>nul
goto menu
:farm
cls
echo 带线
echo.
echo 1.小兵
echo.
echo 2.大兵
echo.
echo 3.返回
echo.
set /p farm=
if %farm% equ 1 goto pa
if %farm% equ 2 goto bp
if %farm% equ 3 goto menu
goto farm
:pa
set wh=小兵
set hp=%pahp%
set at=%paat%
set go=100
goto war
:bp
set wh=大兵
set hp=%bphp%
set at=%bpat%
set go=500
goto war
:push
cls
echo 推塔
echo.
echo 1.小塔
echo.
echo 2.大塔
echo.
echo 3.返回
echo.
set /p push=
if %push% equ 1 goto to
if %push% equ 2 goto bt
if %push% equ 3 goto menu
goto push
:to
set wh=小塔
set hp=%tohp%
set at=%toat%
set go=1000
goto war
:bt
set wh=大塔
set hp=%bthp%
set at=%btat%
set go=5000
goto war
:roshan
cls
echo 肉山
echo.
echo 1.肉山
echo.
echo 2.返回
echo.
set /p roshan=
if %roshan% equ 1 goto ro
if %roshan% equ 2 goto menu
goto roshan
:ro
set wh=肉山
set hp=%rohp%
set at=%roat%
set /a go=10000*%roup%
goto war
:shop
cls
echo 1.大炮
echo.
echo 2.冰眼
echo.
echo 3.龙心
echo.
echo 4.蝴蝶
echo.
echo 5.返回
echo.
set /p shop=
if %shop% equ 1 goto shcr
if %shop% equ 2 goto shsk
if %shop% equ 3 goto shhe
if %shop% equ 4 goto shbu
if %shop% equ 5 goto menu
goto shop
:fountain
cls
echo 泉水
echo.
echo 1.增加生命
echo.
echo 2.增加攻击
echo.
echo 3.返回
echo.
set /p fountain=
if %fountain% equ 1 goto fohp
if %fountain% equ 2 goto foat
if %fountain% equ 3 goto menu
goto fountain
:war
cls
echo 战斗
echo.
echo 你的生命 %hehp%%wh%生命 %hp%
echo.
echo 你的攻击 %heat%%wh%攻击 %at%
echo.
pause>nul
if %hp% lss 1 goto win
if %hehp% lss 1 goto die
for /l %%a in (1,1,%butt%) do (
set /a hehp+=hear
set /a heat+=crit
set /a hp-=heat
set /a at-=skad
)
set /a hehp-=at
goto war
:win
echo 你击杀了%wh%得到了%go%金币
set /a gold+=go
if %wh% equ 肉山 set /a roup+=1
pause>nul
goto menu
:die
echo 你被%wh%击杀损失了%go%金币
set /a gold-=go
pause>nul
goto menu
:shcr
cls
echo 4000金币=1大炮
echo.
echo 购买量:
echo.
set /p shcr=
set /a crgo=4000*%shcr%
if %gold% lss %crgo% goto nogo
set /a crit+=100*%shcr%
set /a cris+=%shcr%
set /a gold-=4000*%shcr%
goto menu
:shsk
cls
echo 5000金币=1冰眼
echo.
echo 购买量:
echo.
set /p shsk=
set /a skgo=5000*%shsk%
if %gold% lss %skgo% goto nogo
set /a skad+=100*%shsk%
set /a skas+=%shsk%
set /a gold-=5000*%shsk%
goto menu
:shhe
cls
echo 6000金币=1龙心
echo.
echo 购买量:
echo.
set /p shhe=
set /a hego=6000*%shhe%
if %gold% lss %hego% goto nogo
set /a hear+=100*%shhe%
set /a heas+=%shhe%
set /a gold-=6000*%shhe%
goto menu
:shbu
cls
echo 4000金币=1蝴蝶
echo.
echo 购买量:
echo.
set /p shbu=
set /a bugo=4000*%shbu%
if %gold% lss %bugo% goto nogo
set /a butt+=%shbu%
set /a buts+=%shbu%
set /a gold-=4000*%shbu%
goto menu
:fohp
cls
echo 1金币=1生命
echo.
echo 购买量:
echo.
set /p fohp=
if %gold% lss %fohp% goto nogo
set /a hehp+=%fohp%
set /a gold-=%fohp%
goto menu
:foat
cls
echo 1金币=1攻击
echo.
echo 购买量:
echo.
set /p foat=
if %gold% lss %foat% goto nogo
set /a heat+=%foat%
set /a gold-=%foat%
goto menu
:nogo
echo.
echo 金币不足
pause>nul
goto menu
2015年03月28日 07点03分 17
level 5
bug出现了
2015年03月29日 08点03分 18
...因为把肉山属性改为击杀次数乘英雄属性了,当英雄是负的肉山也是负的...
2015年03月29日 12点03分
level 1
顶楼主&小白求罩
2015年04月03日 11点04分 19
level 11
你这就算累那我的bat版Minecraft算神马?
2015年04月06日 04点04分 20
level 11
Dota水友
2015年04月06日 06点04分 21
level 8
wtf那个是什么鬼[滑稽]
2015年04月07日 05点04分 22
what the fun[滑稽] 开挂,菜单输入0
2015年04月07日 05点04分
回复
WizؼInvoker
:不是what the fu[滑稽]ck么
2015年04月08日 04点04分
1 2 尾页