From 8e4e6dfc097c337a14d005c1982aba073bf49618 Mon Sep 17 00:00:00 2001 From: Ivan Bushchik Date: Wed, 6 Apr 2022 19:23:36 +0300 Subject: [PATCH] Refactor code --- roulette/Program.vb | 94 ++++++++++++++++++++++++++++++++++----------- 1 file changed, 71 insertions(+), 23 deletions(-) diff --git a/roulette/Program.vb b/roulette/Program.vb index 887a1dd..2d39928 100644 --- a/roulette/Program.vb +++ b/roulette/Program.vb @@ -17,32 +17,80 @@ Module Program 7, 28, 12, 35, 3, 26} 'ringRank0 нужен, чтобы было удобно подавать массив в поиск индекса - Private Const ReleaseTag As String = "2.1.7" + Private Const ReleaseTag As String = "2.1.8" Dim _lang As Integer = -1 ' 0 - русский language, 1 - english язык - Dim ReadOnly LocalizationStrings(,)= {{"История выпадений (последние 15): ", " Нажмите любую кнопку, чтобы начать игру! ", - "Выберите сложность: ", "1) Лёгкая - 500 фишек в начале", "2) Нормальная - 100 фишек в начале", - "3) Сложная - 10 фишек в начале", "4) Невозможная - 2 фишки в начале", - "Выбор некорректен!", "Игра началась!", "Делайте ставки:", "Укажите суммы ставок:", "Ставки не корректны. Пропуск.", - "Крутим колесо...", "Выпало: ", "У Вас {0} фишек.", "Продолжить игру? (Y/n) >>> ", "Неверный ввод, продолжаем игру.", - "У Вас закончились фишки, игра окончена.", "Нажмите любую клавишу, чтобы выйти в меню.", - "Рулетка / roulette", "Автор: Иван Бущик ", "Лицензия: GNU GPLv3", "Сайт: ivabus.dev/roulette", - "Репозиторий: github.com/ivabus/roulette", "Версия: ", "Введите количество чисел для генерирования >>> ", - "Погрешность генератора случайных чисел: ", "Игра Рулетка", "1) Начать игру", - "2) Ознакомиться с правилами", "3) О игре", "Дополнительно:", "4) Проверка генератора случайных чисел", - "0) Выйти из игры", "Ошибка!"}, - {"Drop history (last 15): ", " Press any button to start ", "Choose difficulty: ", "1) Easy - 500 chips on the start", - "2) Normal - 100 chips on the start", "3) Hard - 10 chips on the start", - "4) Impossible - 2 chips on the start", "Incorrect choise!", "Game started", - "Place your bets: ", "Specify the bid amounts: ", "The bids are incorrect. Skipping.", - "Spinning wheel...", "Dropped: ", "You have {0} chips.", "Continue? (Y/n) >>> ", - "Incorrect input, we continue the game.", "You have run out of chips, the game is over.", - "Press any key to exit the menu.", "Roulette", "Author: Ivan Bushchik ", - "License: GNU GPLv3", "Website: ivabus.dev/roulette", "Repository: github.com/ivabus/roulette", - "Version: ", "Enter the number of numbers to generate >>> ", - "Error of the random number generator: ", "Roulette game", "1) Begin game", - "2) Check the rules", "3) About game", "Additional: ", "4) Checking the random number generator", "0) Exit", "Error!"}} + Dim ReadOnly LocalizationStrings(,)= {{"История выпадений (последние 15): ", + " Нажмите любую кнопку, чтобы начать игру! ", + "Выберите сложность: ", + "1) Лёгкая - 500 фишек в начале", + "2) Нормальная - 100 фишек в начале", + "3) Сложная - 10 фишек в начале", + "4) Невозможная - 2 фишки в начале", + "Выбор некорректен!", + "Игра началась!", + "Делайте ставки:", + "Укажите суммы ставок:", + "Ставки не корректны. Пропуск.", + "Крутим колесо...", + "Выпало: ", + "У Вас {0} фишек.", + "Продолжить игру? (Y/n) >>> ", + "Неверный ввод, продолжаем игру.", + "У Вас закончились фишки, игра окончена.", + "Нажмите любую клавишу, чтобы выйти в меню.", + "Рулетка / roulette", + "Автор: Иван Бущик ", + "Лицензия: GNU GPLv3", + "Сайт: ivabus.dev/roulette", + "Репозиторий: github.com/ivabus/roulette", + "Версия: ", + "Введите количество чисел для генерирования >>> ", + "Погрешность генератора случайных чисел: ", + "Игра Рулетка", + "1) Начать игру", + "2) Ознакомиться с правилами", + "3) О игре", + "Дополнительно:", + "4) Проверка генератора случайных чисел", + "0) Выйти из игры", + "Ошибка!"}, + {"Drop history (last 15): ", + " Press any button to start ", + "Choose difficulty: ", + "1) Easy - 500 chips on the start", + "2) Normal - 100 chips on the start", + "3) Hard - 10 chips on the start", + "4) Impossible - 2 chips on the start", + "Incorrect choise!", + "Game started", + "Place your bets: ", + "Specify the bid amounts: ", + "The bids are incorrect. Skipping.", + "Spinning wheel...", + "Dropped: ", + "You have {0} chips.", + "Continue? (Y/n) >>> ", + "Incorrect input, we continue the game.", + "You have run out of chips, the game is over.", + "Press any key to exit the menu.", + "Roulette", + "Author: Ivan Bushchik ", + "License: GNU GPLv3", + "Website: ivabus.dev/roulette", + "Repository: github.com/ivabus/roulette", + "Version: ", + "Enter the number of numbers to generate >>> ", + "Error of the random number generator: ", + "Roulette game", + "1) Begin game", + "2) Check the rules", + "3) About game", + "Additional: ", + "4) Checking the random number generator", + "0) Exit", + "Error!"}} Dim ReadOnly Logo() As String = { _ "#### ### # # # ##### ##### ##### #####", "# # # # # # # # # # # ",