Skip to content
This repository was archived by the owner on Apr 7, 2022. It is now read-only.

Commit 8e4e6df

Browse files
committed
Refactor code
1 parent ad8c259 commit 8e4e6df

File tree

1 file changed

+71
-23
lines changed

1 file changed

+71
-23
lines changed

roulette/Program.vb

Lines changed: 71 additions & 23 deletions
Original file line numberDiff line numberDiff line change
@@ -17,32 +17,80 @@ Module Program
1717
7, 28, 12, 35, 3, 26}
1818
'ringRank0 нужен, чтобы было удобно подавать массив в поиск индекса
1919

20-
Private Const ReleaseTag As String = "2.1.7"
20+
Private Const ReleaseTag As String = "2.1.8"
2121

2222
Dim _lang As Integer = -1 ' 0 - русский language, 1 - english язык
2323

24-
Dim ReadOnly LocalizationStrings(,)= {{"История выпадений (последние 15): ", " Нажмите любую кнопку, чтобы начать игру! ",
25-
"Выберите сложность: ", "1) Лёгкая - 500 фишек в начале", "2) Нормальная - 100 фишек в начале",
26-
"3) Сложная - 10 фишек в начале", "4) Невозможная - 2 фишки в начале",
27-
"Выбор некорректен!", "Игра началась!", "Делайте ставки:", "Укажите суммы ставок:", "Ставки не корректны. Пропуск.",
28-
"Крутим колесо...", "Выпало: ", "У Вас {0} фишек.", "Продолжить игру? (Y/n) >>> ", "Неверный ввод, продолжаем игру.",
29-
"У Вас закончились фишки, игра окончена.", "Нажмите любую клавишу, чтобы выйти в меню.",
30-
"Рулетка / roulette", "Автор: Иван Бущик <[email protected]>", "Лицензия: GNU GPLv3", "Сайт: ivabus.dev/roulette",
31-
"Репозиторий: github.com/ivabus/roulette", "Версия: ", "Введите количество чисел для генерирования >>> ",
32-
"Погрешность генератора случайных чисел: ", "Игра Рулетка", "1) Начать игру",
33-
"2) Ознакомиться с правилами", "3) О игре", "Дополнительно:", "4) Проверка генератора случайных чисел",
34-
"0) Выйти из игры", "Ошибка!"},
35-
{"Drop history (last 15): ", " Press any button to start ", "Choose difficulty: ", "1) Easy - 500 chips on the start",
36-
"2) Normal - 100 chips on the start", "3) Hard - 10 chips on the start",
37-
"4) Impossible - 2 chips on the start", "Incorrect choise!", "Game started",
38-
"Place your bets: ", "Specify the bid amounts: ", "The bids are incorrect. Skipping.",
39-
"Spinning wheel...", "Dropped: ", "You have {0} chips.", "Continue? (Y/n) >>> ",
40-
"Incorrect input, we continue the game.", "You have run out of chips, the game is over.",
41-
"Press any key to exit the menu.", "Roulette", "Author: Ivan Bushchik <[email protected]>",
42-
"License: GNU GPLv3", "Website: ivabus.dev/roulette", "Repository: github.com/ivabus/roulette",
43-
"Version: ", "Enter the number of numbers to generate >>> ",
44-
"Error of the random number generator: ", "Roulette game", "1) Begin game",
45-
"2) Check the rules", "3) About game", "Additional: ", "4) Checking the random number generator", "0) Exit", "Error!"}}
24+
Dim ReadOnly LocalizationStrings(,)= {{"История выпадений (последние 15): ",
25+
" Нажмите любую кнопку, чтобы начать игру! ",
26+
"Выберите сложность: ",
27+
"1) Лёгкая - 500 фишек в начале",
28+
"2) Нормальная - 100 фишек в начале",
29+
"3) Сложная - 10 фишек в начале",
30+
"4) Невозможная - 2 фишки в начале",
31+
"Выбор некорректен!",
32+
"Игра началась!",
33+
"Делайте ставки:",
34+
"Укажите суммы ставок:",
35+
"Ставки не корректны. Пропуск.",
36+
"Крутим колесо...",
37+
"Выпало: ",
38+
"У Вас {0} фишек.",
39+
"Продолжить игру? (Y/n) >>> ",
40+
"Неверный ввод, продолжаем игру.",
41+
"У Вас закончились фишки, игра окончена.",
42+
"Нажмите любую клавишу, чтобы выйти в меню.",
43+
"Рулетка / roulette",
44+
"Автор: Иван Бущик <[email protected]>",
45+
"Лицензия: GNU GPLv3",
46+
"Сайт: ivabus.dev/roulette",
47+
"Репозиторий: github.com/ivabus/roulette",
48+
"Версия: ",
49+
"Введите количество чисел для генерирования >>> ",
50+
"Погрешность генератора случайных чисел: ",
51+
"Игра Рулетка",
52+
"1) Начать игру",
53+
"2) Ознакомиться с правилами",
54+
"3) О игре",
55+
"Дополнительно:",
56+
"4) Проверка генератора случайных чисел",
57+
"0) Выйти из игры",
58+
"Ошибка!"},
59+
{"Drop history (last 15): ",
60+
" Press any button to start ",
61+
"Choose difficulty: ",
62+
"1) Easy - 500 chips on the start",
63+
"2) Normal - 100 chips on the start",
64+
"3) Hard - 10 chips on the start",
65+
"4) Impossible - 2 chips on the start",
66+
"Incorrect choise!",
67+
"Game started",
68+
"Place your bets: ",
69+
"Specify the bid amounts: ",
70+
"The bids are incorrect. Skipping.",
71+
"Spinning wheel...",
72+
"Dropped: ",
73+
"You have {0} chips.",
74+
"Continue? (Y/n) >>> ",
75+
"Incorrect input, we continue the game.",
76+
"You have run out of chips, the game is over.",
77+
"Press any key to exit the menu.",
78+
"Roulette",
79+
"Author: Ivan Bushchik <[email protected]>",
80+
"License: GNU GPLv3",
81+
"Website: ivabus.dev/roulette",
82+
"Repository: github.com/ivabus/roulette",
83+
"Version: ",
84+
"Enter the number of numbers to generate >>> ",
85+
"Error of the random number generator: ",
86+
"Roulette game",
87+
"1) Begin game",
88+
"2) Check the rules",
89+
"3) About game",
90+
"Additional: ",
91+
"4) Checking the random number generator",
92+
"0) Exit",
93+
"Error!"}}
4694
Dim ReadOnly Logo() As String = { _
4795
"#### ### # # # ##### ##### ##### #####",
4896
"# # # # # # # # # # # ",

0 commit comments

Comments
 (0)