diff --git a/English/kryz.bat b/English/kryz.bat new file mode 100644 index 0000000..6da7262 --- /dev/null +++ b/English/kryz.bat @@ -0,0 +1,223 @@ +@echo off + +REM ---------------------------------------- LICENSE ------------------------------------------------------- +REM +REM Copyright (c) 2006-2012+, MekDrop +REM +REM Permission to use, copy, modify, and/or distribute this software for any purpose with or without fee is hereby granted, provided that the above copyright notice and this permission +REM notice appear in all copies. +REM +REM THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF +REM MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES +REM WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF +REM OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. +REM +REM ---------------------------------------- NOTE ------------------------------------------------------- +REM +REM This app is can run only on Windows 2000 or newer + +:pradzia +rem Here we setting default values for all of our variables +set tuscias_langelis=%% +set zaidejas1=X +set zaidejas2=O +set e1=%tuscias_langelis% +set e2=%tuscias_langelis% +set e3=%tuscias_langelis% +set e4=%tuscias_langelis% +set e5=%tuscias_langelis% +set e6=%tuscias_langelis% +set e7=%tuscias_langelis% +set e8=%tuscias_langelis% +set e9=%tuscias_langelis% +set e_spc= +set emsg= +goto braizom + +:braizom +rem This part is used for drawing the board +rem We need to specify value for griztam variable, before using this part (is use label names) +cls +echo %e1% ! %e2% ! %e3% +echo - + - + - +echo %e4% ! %e5% ! %e6% +echo - + - + - +echo %e7% ! %e8% ! %e9% +echo. +rem If there was an error, we show this here +if NOT "%e_spc%"=="" ( + echo %emsg% + echo. + goto %e_spc% +) +if NOT "%klaida%"=="" ( + echo Error: %klaida% + echo. +) +rem Here it's possible enter where to place mark +set zenklas=%zaidejas1% +echo Enter coordinate (1-9): +set /P ejimas= +goto tikrink + +:tikrink +set klaida= +if "%ejimas%"=="1" ( + if "%e1%"=="%tuscias_langelis%" ( + set e1=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="2" ( + if "%e2%"=="%tuscias_langelis%" ( + set e2=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="3" ( + if "%e3%"=="%tuscias_langelis%" ( + set e3=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="4" ( + if "%e4%"=="%tuscias_langelis%" ( + set e4=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="5" ( + if "%e5%"=="%tuscias_langelis%" ( + set e5=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="6" ( + if "%e6%"=="%tuscias_langelis%" ( + set e6=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="7" ( + if "%e7%"=="%tuscias_langelis%" ( + set e7=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="8" ( + if "%e8%"=="%tuscias_langelis%" ( + set e8=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +if "%ejimas%"=="9" ( + if "%e9%"=="%tuscias_langelis%" ( + set e9=%zenklas% + ) else ( + set klaida=Such already exists! + ) +) +rem if entered number is lower than 1, also that was an error! +if /I %ejimas% LSS 1 ( + set klaida=You have entered a bad coordinate +) +rem if entered number is greater than 9, also that was an error! +if /I %ejimas% GTR 9 ( + set klaida=You have entered a bad coordinate +) +rem checking if there was a previous error +rem if that was the computer turn, we hide all errors +if NOT "%klaida%"=="" ( + if "%zenklas%"=="%zaidejas1%" ( + goto braizom + ) else ( + goto kompiuteris + ) +) + +rem here we are checking if somebody wins +if "%e1%%e2%%e3%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas +if "%e4%%e5%%e6%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas +if "%e7%%e8%%e9%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas + +if "%e1%%e4%%e7%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas +if "%e2%%e5%%e8%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas +if "%e3%%e6%%e9%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas + +if "%e1%%e5%%e9%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas +if "%e3%%e5%%e7%" == "%zenklas%%zenklas%%zenklas%" goto laimejimas + +if NOT "%e1%"=="%tuscias_langelis%" ( + if NOT "%e2%"=="%tuscias_langelis%" ( + if NOT "%e3%"=="%tuscias_langelis%" ( + if NOT "%e4%"=="%tuscias_langelis%" ( + if NOT "%e5%"=="%tuscias_langelis%" ( + if NOT "%e6%"=="%tuscias_langelis%" ( + if NOT "%e7%"=="%tuscias_langelis%" ( + if NOT "%e8%"=="%tuscias_langelis%" ( + if NOT "%e9%"=="%tuscias_langelis%" ( + goto lygiosios + ) + ) + ) + ) + ) + ) + ) + ) +) + +rem if you are in this place, it means you have places a mark sucessfully! +rem now we thinking what to doo next +if "%zenklas%"=="%zaidejas1%" goto kompiuteris +set griztam=ivedimas +goto braizom + +:kompiuteris +rem here is a computer turn +set zenklas=%zaidejas2% +set /A ejimas=%RANDOM%/(32752/(9-1))+1 +goto tikrink + +:laimejimas +if "%zenklas%"=="%zaidejas1%" ( + set emsg=Player wins! +) else ( + set emsg=Computer wins! +) + +set e_spc=arzaistidar +echo. +echo. +goto braizom + +:lygiosios +set emsg=Draw +set e_spc=arzaistidar +echo. +echo. +goto braizom + +:arzaistidar +echo Do You want to play again (yes/no)? +set /p ats= +if "%ats%" == "yes" goto pradzia +if "%ats%" == "YES" goto pradzia +if "%ats%" == "y" goto pradzia +if "%ats%" == "Y" goto pradzia +if "%ats%" == "no" goto pabaiga +if "%ats%" == "NO" goto pabaiga +if "%ats%" == "n" goto pabaiga +if "%ats%" == "N" goto pabaiga +cls +goto arzaistidar + +:pabaiga \ No newline at end of file diff --git a/English/screenshot.png b/English/screenshot.png new file mode 100644 index 0000000..feb10cf Binary files /dev/null and b/English/screenshot.png differ diff --git a/kryz.bat b/Lithuanian/kryz.bat similarity index 100% rename from kryz.bat rename to Lithuanian/kryz.bat diff --git a/Lithuanian/screenshot.png b/Lithuanian/screenshot.png new file mode 100644 index 0000000..3f3217f Binary files /dev/null and b/Lithuanian/screenshot.png differ