shiftos-archive/ShiftOS-TheRevival-Old
1
0
Fork 0
mirror of https://github.com/EverythingWindows/ShiftOS-TheRevival-Old.git synced 2025-01-22 18:02:16 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

implemented the password stuff, but failed to be able to convert other than alphabet to its correspondant

Browse source
This commit is contained in:
EverythingWindows 2022-11-19 06:17:02 +07:00
parent 996601e9cc
commit e73d05d3b0
2 changed files with 37 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
ShiftOS-TheRevival/API/TerminalAPI.vb
View file

@ -231,6 +231,9 @@
NormalCommand() NormalCommand()
SaveGame() SaveGame()
InitializeTerminal() InitializeTerminal()
'Case "secure"
' Console.Secure = True
' Console.TextBox1.ReadOnly = True
Case "shiftorium" Case "shiftorium"
NewLine(My.Resources.man_shiftorium) NewLine(My.Resources.man_shiftorium)
AdvancedCommand = False AdvancedCommand = False

20
ShiftOS-TheRevival/MainForms/Console.vb
View file

@ -15,6 +15,8 @@ Public Class Console
Public ToolBarUse As Boolean = False 'Either any program is using ToolBar or not Public ToolBarUse As Boolean = False 'Either any program is using ToolBar or not
Public ReleaseCursor As Boolean = False 'Release cursor from TrackPos Public ReleaseCursor As Boolean = False 'Release cursor from TrackPos
Public ShOSKey As String 'DOSKEY tracking string for ShiftOS Public ShOSKey As String 'DOSKEY tracking string for ShiftOS
Public Secure As Boolean 'Define either Secure Text mode is enabled or not (experimental!)
Public SecureString As String 'String for Secure Text mode (experimental)
Private Sub Console_Load(sender As Object, e As EventArgs) Handles MyBase.Load Private Sub Console_Load(sender As Object, e As EventArgs) Handles MyBase.Load
With ShortcutHandler With ShortcutHandler
@ -35,6 +37,15 @@ Public Class Console
Select Case e.KeyData Select Case e.KeyData
Case Keys.Enter Case Keys.Enter
e.SuppressKeyPress = True e.SuppressKeyPress = True
If Secure = True Then
Secure = False
TextBox1.ReadOnly = False
Terminal_ReadCommand()
NewLine(SecureString)
Terminal_PrintPrompt()
SecureString = Nothing
TextRebind()
Else
If TextBox1.ReadOnly = True Then If TextBox1.ReadOnly = True Then
Else Else
@ -52,6 +63,7 @@ Public Class Console
TextRebind() TextRebind()
End If End If
End If End If
End If
TrackPos = 0 TrackPos = 0
Case Keys.ShiftKey, Keys.LShiftKey, Keys.RShiftKey, Keys.Alt, Keys.ControlKey, Keys.LWin, Keys.RWin Case Keys.ShiftKey, Keys.LShiftKey, Keys.RShiftKey, Keys.Alt, Keys.ControlKey, Keys.LWin, Keys.RWin
e.SuppressKeyPress = True e.SuppressKeyPress = True
@ -113,7 +125,15 @@ Public Class Console
TextRebind() TextRebind()
End If End If
Case Else Case Else
If Secure = True Then
If e.Modifiers = Keys.Shift Then
SecureString = SecureString & Chr(e.KeyValue)
Else
SecureString = SecureString & Chr(e.KeyValue + 32)
End If
Else
TrackPos = TrackPos + 1 TrackPos = TrackPos + 1
End If
End Select End Select
End If End If
'If e.KeyCode = Keys.Enter Then 'If e.KeyCode = Keys.Enter Then