diff options
| author | TheUltimateHacker <[email protected]> | 2015-05-26 20:35:30 -0400 |
|---|---|---|
| committer | TheUltimateHacker <[email protected]> | 2015-05-26 20:35:30 -0400 |
| commit | af7679661260c7c9b02e8e746a10f2db42afe70b (patch) | |
| tree | 4739c6f141afe22d7d32ae43894992674435605a /shiftos_next/TerminalGames.vb | |
| parent | f9b8f50f27cb8b7330ba143fff24ae98bd1789e9 (diff) | |
| download | shiftos-next-af7679661260c7c9b02e8e746a10f2db42afe70b.tar.gz shiftos-next-af7679661260c7c9b02e8e746a10f2db42afe70b.tar.bz2 shiftos-next-af7679661260c7c9b02e8e746a10f2db42afe70b.zip | |
Minor MathQuiz errors fixed
Just some variable stuff.
Diffstat (limited to 'shiftos_next/TerminalGames.vb')
| -rw-r--r-- | shiftos_next/TerminalGames.vb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/shiftos_next/TerminalGames.vb b/shiftos_next/TerminalGames.vb index 3cb7ee2..6d4dfed 100644 --- a/shiftos_next/TerminalGames.vb +++ b/shiftos_next/TerminalGames.vb @@ -5,8 +5,9 @@ Public Sub MQInterpret(question As String, answer As Integer) Dim random As New Random() - Private correct As Boolean = False + Dim correct As Boolean = False Dim args() As String = question.Replace("What is ", "").Split(" ") + Dim cptoadd As Integer = random.Next(1, 5) Select Case args(1) Case "+" correct = (answer = CInt(args(0)) + CInt(args(2))) |