From f7e490d79105218da924a8c26beb6104f382ae28 Mon Sep 17 00:00:00 2001
From: Ivan Bushchik <ivan@bushchik.ru>
Date: Thu, 6 Jan 2022 14:43:36 +0300
Subject: [PATCH] lol

---
 .DS_Store           | Bin 6148 -> 8196 bytes
 Dockerfile          |   7 -------
 roulette/.DS_Store  | Bin 0 -> 6148 bytes
 roulette/Program.vb |  15 ++++++++-------
 4 files changed, 8 insertions(+), 14 deletions(-)
 delete mode 100644 Dockerfile
 create mode 100644 roulette/.DS_Store

diff --git a/.DS_Store b/.DS_Store
index a72e92f3ad03805fbc2eb2f3722e6a0b09464362..55a766cbbeff3bcd013b1d46de360fc77e71d81f 100644
GIT binary patch
literal 8196
zcmeHM&ubGw6n@jD?WC<Vh+-9my;vyJ(jQXkK}gdSDX0`z^q|sayCGTG?1W@v&@{5(
z!Gr&RE&c;u^yJNxp1ccQ_3G8T`sPQQoov!V4^nU@%zTr1-<x^!&2%TT1ptz3xbpy$
z06;Nw%#2~tBXK*=i8P>EE+7*02fs9LZ?j4@!88p<0i%FXz$jo8FbbR$1@O$~iS{}7
zrPY*10i(cwsQ`aISeQ9x6-E-pqXP?Z1wc$;vq)Ia@Cu@(Fsm?<h!#vlx*|$fqOKT3
zx?{Vgcv*#!MClGhT|S5!nW!5I5u;=OmY@U4N;IWWz$lPZfZyFyFbgH{Ak^;f=W~za
zwhGJV9iKVaMn8^EO;7KAUeWFDq4sJy_HN)}gsw2MKQ5G^0gg60O#DnT;xT+U`?3kI
zMGRg2R9GjH{wysX*x>ODVLTqVP=taW%jp-oH6F*xkDV*Oc10X9|9A|&8T$BJeEbo(
z3G1*5Yj7KESX=kmwo;rw)ZSyB{UZ`5LmKWNa|QBn3vm`I;OZXaQkMsX8ZcDa#~FtB
zDe8ReOCKS@cbfI8is*||^}TvHH}{PU45o&LM<^Yoqo+n6*=5$W!$R1o=L)q4{M$w$
zEIX=xmofjKUU2St#pY(_%qk1Qf)^BP!r60+NO^eQ3tZOBu}0w5ML)JQP@1Oc&CF!0
zwQy}|##&rhZqHb)<%PK!>+0fCyPc-zF3(?I->N))*4k-5-{o52d7#b>n2_HO$~~+l
zCaNv};BS7$BslR+;JzCx-S{LnK@VPMJ08Z<HpH;lkcqyY*tNiCK?&pG^BM16P}~M}
zT;4!mSn>+F@vSq4tZnoy;wQj*8Mj3Ub#2!4>mqvfVaDe^_2w;g<R3s^c1MAu*_saY
zyZGh7ryF57opm(lzmUTeMuB51Fep7I`Tc*b|NH-A_ir4H0!D$8uK-Eq?R*a7-2aW#
z9WuXbTbQ>n^Tc_PMB#!3r|@=h9Y;L)hauK2Wy>mzB%%eAc@ZFFFojXzpDOSdY6U4^

delta 136
zcmZp1XfcprU|?W$DortDU=RQ@Ie-{MGjUE#6q~50D9Q$s2aEYJ1T(mL=Hw?Q<!nq`
z&dA8Nd5T~!<K&&f?i<t8Sr)T%a0oI36$60)H;`}z8L~0)JM(0I8Ap&UAY)iSG!w)c
Lu-N8!o;l0_{$mv{

diff --git a/Dockerfile b/Dockerfile
deleted file mode 100644
index 32ecc02..0000000
--- a/Dockerfile
+++ /dev/null
@@ -1,7 +0,0 @@
-FROM mcr.microsoft.com/dotnet/sdk:5.0
-
-RUN git clone https://github.com/BushchikIvan/roulette
-
-WORKDIR roulette/roulette
-
-ENTRYPOINT ["dotnet", "run"]
diff --git a/roulette/.DS_Store b/roulette/.DS_Store
new file mode 100644
index 0000000000000000000000000000000000000000..28f584833e1c4b62510b8e42d67f8090adeeb3d4
GIT binary patch
literal 6148
zcmeHKJ5Iwu5S@u#M50N9M7c*GH!zVYs6&f{Oe8*vaT<DeoPm=-&pEgN6@m-!=407b
zEJ`HMjI{f9XLk14Px7vZh<Np|SrRRXXpSbxGMF%NPljf`Sb{8jEZ0{}y;Cpdf5PP1
zGpgv8?zh*&=RbSyBXv`j)wZeNnV-L<_s^%-lVNo8Lv(jD-1P%#;A_BmH{zRJy!4SF
z-(miE{MGSkUfuM3`_U0!rhLK~77By{p+G1Q3Umti9X&tj9D$)gC=d#`0&+eiG{M5L
zHPoX6ot6N=9Bws?rIwJK<XAYihKRt}Qh}DrUShDN!=HRz;n*5lI<XfY?95&9!pe^Q
zlP)JN45JSPLV>XYnN1gR|DWQMnJn_hDKQHLLV<s#0O#epT;ZksZryu5xoZ>JC7PJ5
qYh?h#c=Qv1iJT)x8nk$lG1e81t)c89eoY6)kAMmiT`2Gi3VZ`d;zL>h

literal 0
HcmV?d00001

diff --git a/roulette/Program.vb b/roulette/Program.vb
index 9402656..235b87e 100644
--- a/roulette/Program.vb
+++ b/roulette/Program.vb
@@ -1,19 +1,20 @@
 
 
 Module Program
-	'https://github.com/BushchikIvan/roulette
+	'https://github.com/ivabus/roulette
+	'https://ivabus.github.io/roulette
 	Dim ReadOnly _
 		Ring(,) As Integer =
 			{{0, 32, 15, 19, 4, 21, 2, 25, 17, 34, 6, 27, 13, 36, 11, 30, 8, 23, 10, 5, 24, 16, 33, 1, 20, 14, 31, 9, 22, 18, 29,
 			  7, 28, 12, 35, 3, 26},
 			 {0, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2}}
+	'Второе измерение массива Ring необходимо для распределения цвета с помощью массива Colors по номерам 0 - белый, 1 - красный, 2 - чёрный
 
 	Dim ReadOnly Colors() As ConsoleColor = {ConsoleColor.White, ConsoleColor.Red, ConsoleColor.Black}
 
 	Dim ReadOnly _
-		RingRank0() As Integer =
-			{0, 32, 15, 19, 4, 21, 2, 25, 17, 34, 6, 27, 13, 36, 11, 30, 8, 23, 10, 5, 24, 16, 33, 1, 20, 14, 31, 9, 22, 18, 29,
-			 7, 28, 12, 35, 3, 26}
+		RingRank0() As Integer = {0, 32, 15, 19, 4, 21, 2, 25, 17, 34, 6, 27, 13, 36, 11, 30, 8, 23, 10, 5, 24, 16, 33, 1, 20, 14, 31, 9, 22, 18, 29,
+			  7, 28, 12, 35, 3, 26}
 	'ringRank0 нужен, чтобы было удобно подавать массив в поиск индекса
 	
 	Dim ReadOnly ReleaseTag As String = "1.26"
@@ -35,7 +36,7 @@ Module Program
 		Return - 1
 	End Function
 
-	Sub DisplayHistory(history() As Integer)
+	Sub DisplayHistory(history() As Integer)		'Эта функция не реализована в Game(), потому что это захламляло бы код
 		Console.ForegroundColor = ConsoleColor.DarkBlue
 		Console.Write("История выпадений (последние 15): ")
 		For i = If(Ubound(history) > 14, Ubound(history) - 14, 0) To UBound(history)
@@ -45,7 +46,7 @@ Module Program
 		Console.ForegroundColor = ConsoleColor.DarkBlue
 	End Sub
 
-	Function RemoveAt (Of T)(arr As T(), index As Integer) As T()
+	Function RemoveAt (Of T)(arr As T(), index As Integer) As T()	'Скопировано с StackOverflow
 		Dim uBound = arr.GetUpperBound(0)
 		Dim lBound = arr.GetLowerBound(0)
 		Dim arrLen = uBound - lBound
@@ -55,7 +56,7 @@ Module Program
 		Return outArr
 	End Function
 
-	Sub Sleep(d As Single)
+	Sub Sleep(d As Single)		'Название говорит о предназначении функции
 		Dim t As Single = Timer
 		Do while Timer - t < d
 		Loop