Fixed some textbox related issues

This commit is contained in:
CaptainSegis 2017-10-27 20:18:27 -05:00
parent 8c6c78e759
commit 2eac9b665f
4 changed files with 4 additions and 5 deletions

View File

@ -42,6 +42,7 @@
<UseVSHostingProcess>false</UseVSHostingProcess>
</PropertyGroup>
<ItemGroup>
<Import Include="System.Text" />
<Reference Include="System" />
<Reference Include="System.Drawing" />
<Reference Include="System.Management" />

View File

@ -51,7 +51,7 @@ Public Class Trainer
Dim path As String = GameModeManager.GetScriptPath("Trainer\" & TrainerFile & ".trainer")
Security.FileValidation.CheckFileValid(path, False, "Trainer.vb")
Dim Data() As String = System.IO.File.ReadAllLines(path)
Dim Data() As String = System.IO.File.ReadAllLines(path, Encoding.GetEncoding("iso-8859-1"))
If Data(0) = "[TRAINER FORMAT]" Then
LoadTrainer(Data)

View File

@ -3,7 +3,7 @@
Public Shared ReadOnly DefaultColor As Color = New Color(16, 24, 32)
Public Shared ReadOnly PlayerColor As Color = New Color(0, 0, 180)
Public Shared TextSpeed As Integer = 0
Public Shared TextSpeed As Integer = 1
Public Text As String
Dim currentChar As Integer = 0

View File

@ -122,9 +122,7 @@ nextScript:
Security.FileValidation.CheckFileValid(path, False, "ActionScript.vb")
If System.IO.File.Exists(path) = True Then
Dim Data As String = System.IO.File.ReadAllText(path)
Dim Data As String = System.IO.File.ReadAllText(path, Encoding.GetEncoding("iso-8859-1"))
Data = Data.Replace(vbNewLine, "^")
Dim ScriptData() As String = Data.Split(CChar("^"))