diff options
Diffstat (limited to 'ShiftOS-TheRevival/TerminalApplications/Internal')
| -rw-r--r-- | ShiftOS-TheRevival/TerminalApplications/Internal/Com_Lang.vb | 15 | ||||
| -rw-r--r-- | ShiftOS-TheRevival/TerminalApplications/Internal/Com_Ver.vb | 7 |
2 files changed, 21 insertions, 1 deletions
diff --git a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Lang.vb b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Lang.vb new file mode 100644 index 0000000..864a6ea --- /dev/null +++ b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Lang.vb @@ -0,0 +1,15 @@ +Module Com_Lang + Public LangNum As Integer + + Public Sub Lang() + LangNum = RawCommand.Substring(5) + Select Case LangNum + Case 1 + ' English + Strings.OnceInfo(9) = 1 + Case 2 + ' Indonesian + Strings.OnceInfo(9) = 2 + End Select + End Sub +End Module diff --git a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Ver.vb b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Ver.vb index 8b2de41..dbbd541 100644 --- a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Ver.vb +++ b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Ver.vb @@ -1,5 +1,10 @@ Module Com_Ver Public Sub Terminal_Version() - NewLine("ShiftOS TheRevival version " & My.Resources.CurrentVersion) + Select Case Strings.OnceInfo(9) + Case 1 + NewLine(My.Resources.lang_en.Console_Ver_FullString & My.Resources.CurrentVersion) + Case 2 + NewLine(My.Resources.lang_id.Console_Ver_FullString & My.Resources.CurrentVersion) + End Select End Sub End Module |