Ах*еть...
![]() |
Код для BAT-файла типа "Симулятор рыбалки"
Конечно сам написать я не мог(ибо я не знаю как делать титульник) @echo off title Fishing Simulator '95 color 1F setlocal EnableDelayedExpansion :: Стартовые переменные set fish=0 set gold=20 set bait=5 set rod=1 :main cls echo ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ echo 🎣 Fishing Simulator '95 echo ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ echo Gold: !gold! Bait: !bait! Fish: !fish! Rod Level: !rod! echo. echo 1. Go Fishing echo 2. Visit Shop echo 3. Sell Fish echo 4. Quit echo. set /p act=Choose action (1-4): if "!act!"=="1" goto fish if "!act!"=="2" goto shop if "!act!"=="3" goto sell if "!act!"=="4" exit goto main :fish if !bait! LEQ 0 ( echo You have no bait left! pause goto main ) set /a bait-=1 cls echo Casting your line... ping localhost -n 2 >nul set /a chance=%random% %% 100 if !chance! LSS 10 ( echo A golden fish appears! +50 gold! set /a gold+=50 ) else if !chance! LSS 20 ( echo The line snapped! You lost the bait. ) else if !chance! LSS 30 ( echo You caught... an old boot ) else ( set /a fish+=1 echo You caught a fish! ) pause goto main :sell if !fish! LEQ 0 ( echo No fish to sell. pause goto main ) set /a sellprice=!fish! * 5 set /a gold+=sellprice echo Sold !fish! fish for !sellprice! gold! set fish=0 pause goto main :shop cls echo Welcome to the Fishing Shop! echo You have !gold! gold. echo. echo 1. Buy Bait (5g each) echo 2. Upgrade Rod (+10%% catch chance) (30g) echo 3. Back set /p shopact=Choose (1-3): if "!shopact!"=="1" ( set /p amount=How many bait?: set /a cost=amount * 5 if !gold! GEQ !cost! ( set /a bait+=amount set /a gold-=cost echo Bought !amount! bait. ) else ( echo Not enough gold! ) pause goto shop ) if "!shopact!"=="2" ( if !gold! GEQ 30 ( set /a rod+=1 set /a gold-=30 echo Your rod is now level !rod! ) else ( echo Not enough gold! ) pause goto shop ) goto main |