diff options
| author | EverythingWindows <[email protected]> | 2022-11-20 21:53:17 +0700 |
|---|---|---|
| committer | EverythingWindows <[email protected]> | 2022-11-20 21:53:17 +0700 |
| commit | 3f4edf1b79ee4ee5a73251930af641bcd0db225e (patch) | |
| tree | c018dad0d65e9997867f951df94ef907ea18956c /ShiftOS-TheRevival/TerminalApplications | |
| parent | 9d384be17594240918b6b277521d3eaa15151ae9 (diff) | |
| download | shiftos-therevival-old-3f4edf1b79ee4ee5a73251930af641bcd0db225e.tar.gz shiftos-therevival-old-3f4edf1b79ee4ee5a73251930af641bcd0db225e.tar.bz2 shiftos-therevival-old-3f4edf1b79ee4ee5a73251930af641bcd0db225e.zip | |
trial on Dual Window Manager
Diffstat (limited to 'ShiftOS-TheRevival/TerminalApplications')
| -rw-r--r-- | ShiftOS-TheRevival/TerminalApplications/External/MathQuiz/App_MathQuiz.vb | 5 | ||||
| -rw-r--r-- | ShiftOS-TheRevival/TerminalApplications/Internal/Com_Unzip.vb | 2 |
2 files changed, 5 insertions, 2 deletions
diff --git a/ShiftOS-TheRevival/TerminalApplications/External/MathQuiz/App_MathQuiz.vb b/ShiftOS-TheRevival/TerminalApplications/External/MathQuiz/App_MathQuiz.vb index 235664f..40ce30b 100644 --- a/ShiftOS-TheRevival/TerminalApplications/External/MathQuiz/App_MathQuiz.vb +++ b/ShiftOS-TheRevival/TerminalApplications/External/MathQuiz/App_MathQuiz.vb @@ -26,7 +26,7 @@ MQ_Operation = " + " MQ_ShouldResult = MQ_1stNum + MQ_2ndNum Case 2 - While MQ_2ndNum > MQ_1stNum + While MQ_2ndNum >= MQ_1stNum MQ_2ndNum = RandomNum.Next(1, 10) End While MQ_Operation = " - " @@ -35,6 +35,9 @@ MQ_Operation = " * " MQ_ShouldResult = MQ_1stNum * MQ_2ndNum Case 4 + While MQ_2ndNum > MQ_1stNum + MQ_2ndNum = RandomNum.Next(1, 10) + End While MQ_Operation = " / " MQ_ShouldResult = MQ_1stNum / MQ_2ndNum Case Else diff --git a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Unzip.vb b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Unzip.vb index 37231fb..09be14b 100644 --- a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Unzip.vb +++ b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Unzip.vb @@ -84,7 +84,7 @@ Module Com_Unzip ' copy all the sub-directories by recursively calling this same routine Dim SubDir As DirectoryInfo For Each SubDir In SourceDir.GetDirectories() - NewLine("Copying " & SubDir.Name & "...") + NewLine("Copying '" & SubDir.Name & "' directory ...") CopyDirectory(SubDir.FullName, Path.Combine(DestDir.FullName, SubDir.Name), Overwrite) AddLine(" OK") |