diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..c33d8d2 --- /dev/null +++ b/.gitignore @@ -0,0 +1,217 @@ +# https://www.gitignore.io/api/visualstudio,windows,linux + +### VisualStudio ### +## Ignore Visual Studio temporary files, build results, and +## files generated by popular Visual Studio add-ons. + +# User-specific files +*.suo +*.user +*.sln.docstates + +# Build results +[Dd]ebug/ +[Dd]ebugPublic/ +[Rr]elease/ +[Rr]eleases/ +x64/ +x86/ +build/ +bld/ +[Bb]in/ +[Oo]bj/ + +# Roslyn cache directories +*.ide/ + +# MSTest test Results +[Tt]est[Rr]esult*/ +[Bb]uild[Ll]og.* + +#NUNIT +*.VisualState.xml +TestResult.xml + +# Build Results of an ATL Project +[Dd]ebugPS/ +[Rr]eleasePS/ +dlldata.c + +*_i.c +*_p.c +*_i.h +*.ilk +*.meta +*.obj +*.pch +*.pdb +*.pgc +*.pgd +*.rsp +*.sbr +*.tlb +*.tli +*.tlh +*.tmp +*.tmp_proj +*.log +*.vspscc +*.vssscc +.builds +*.pidb +*.svclog +*.scc + +# Chutzpah Test files +_Chutzpah* + +# Visual C++ cache files +ipch/ +*.aps +*.ncb +*.opensdf +*.sdf +*.cachefile + +# Visual Studio profiler +*.psess +*.vsp +*.vspx + +# TFS 2012 Local Workspace +$tf/ + +# Guidance Automation Toolkit +*.gpState + +# ReSharper is a .NET coding add-in +_ReSharper*/ +*.[Rr]e[Ss]harper +*.DotSettings.user + +# JustCode is a .NET coding addin-in +.JustCode + +# TeamCity is a build add-in +_TeamCity* + +# DotCover is a Code Coverage Tool +*.dotCover + +# NCrunch +_NCrunch_* +.*crunch*.local.xml + +# MightyMoose +*.mm.* +AutoTest.Net/ + +# Web workbench (sass) +.sass-cache/ + +# Installshield output folder +[Ee]xpress/ + +# DocProject is a documentation generator add-in +DocProject/buildhelp/ +DocProject/Help/*.HxT +DocProject/Help/*.HxC +DocProject/Help/*.hhc +DocProject/Help/*.hhk +DocProject/Help/*.hhp +DocProject/Help/Html2 +DocProject/Help/html + +# Click-Once directory +publish/ + +# Publish Web Output +*.[Pp]ublish.xml +*.azurePubxml +# TODO: Comment the next line if you want to checkin your web deploy settings +# but database connection strings (with potential passwords) will be unencrypted +*.pubxml +*.publishproj + +# NuGet Packages +*.nupkg +# The packages folder can be ignored because of Package Restore +**/packages/* +# except build/, which is used as an MSBuild target. +!**/packages/build/ +# If using the old MSBuild-Integrated Package Restore, uncomment this: +#!**/packages/repositories.config + +# Windows Azure Build Output +csx/ +*.build.csdef + +# Windows Store app package directory +AppPackages/ + +# Others +sql/ +*.Cache +ClientBin/ +[Ss]tyle[Cc]op.* +~$* +*~ +*.dbmdl +*.dbproj.schemaview +*.pfx +*.publishsettings +node_modules/ + +# RIA/Silverlight projects +Generated_Code/ + +# Backup & report files from converting an old project file +# to a newer Visual Studio version. Backup files are not needed, +# because we have git ;-) +_UpgradeReport_Files/ +Backup*/ +UpgradeLog*.XML +UpgradeLog*.htm + +# SQL Server files +*.mdf +*.ldf + +# Business Intelligence projects +*.rdl.data +*.bim.layout +*.bim_*.settings + +# Microsoft Fakes +FakesAssemblies/ + + +### Windows ### +# Windows image file caches +Thumbs.db +ehthumbs.db + +# Folder config file +Desktop.ini + +# Recycle Bin used on file shares +$RECYCLE.BIN/ + +# Windows Installer files +*.cab +*.msi +*.msm +*.msp + +# Windows shortcuts +*.lnk + + +### Linux ### +*~ + +# KDE directory preferences +.directory + +# Vim swp files +*.swp diff --git a/LICENSE b/LICENSE new file mode 100644 index 0000000..2ee227c --- /dev/null +++ b/LICENSE @@ -0,0 +1,201 @@ +Apache License + Version 2.0, January 2004 + http://www.apache.org/licenses/ + + TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION + + 1. Definitions. + + "License" shall mean the terms and conditions for use, reproduction, + and distribution as defined by Sections 1 through 9 of this document. + + "Licensor" shall mean the copyright owner or entity authorized by + the copyright owner that is granting the License. + + "Legal Entity" shall mean the union of the acting entity and all + other entities that control, are controlled by, or are under common + control with that entity. For the purposes of this definition, + "control" means (i) the power, direct or indirect, to cause the + direction or management of such entity, whether by contract or + otherwise, or (ii) ownership of fifty percent (50%) or more of the + outstanding shares, or (iii) beneficial ownership of such entity. + + "You" (or "Your") shall mean an individual or Legal Entity + exercising permissions granted by this License. + + "Source" form shall mean the preferred form for making modifications, + including but not limited to software source code, documentation + source, and configuration files. + + "Object" form shall mean any form resulting from mechanical + transformation or translation of a Source form, including but + not limited to compiled object code, generated documentation, + and conversions to other media types. + + "Work" shall mean the work of authorship, whether in Source or + Object form, made available under the License, as indicated by a + copyright notice that is included in or attached to the work + (an example is provided in the Appendix below). + + "Derivative Works" shall mean any work, whether in Source or Object + form, that is based on (or derived from) the Work and for which the + editorial revisions, annotations, elaborations, or other modifications + represent, as a whole, an original work of authorship. For the purposes + of this License, Derivative Works shall not include works that remain + separable from, or merely link (or bind by name) to the interfaces of, + the Work and Derivative Works thereof. + + "Contribution" shall mean any work of authorship, including + the original version of the Work and any modifications or additions + to that Work or Derivative Works thereof, that is intentionally + submitted to Licensor for inclusion in the Work by the copyright owner + or by an individual or Legal Entity authorized to submit on behalf of + the copyright owner. For the purposes of this definition, "submitted" + means any form of electronic, verbal, or written communication sent + to the Licensor or its representatives, including but not limited to + communication on electronic mailing lists, source code control systems, + and issue tracking systems that are managed by, or on behalf of, the + Licensor for the purpose of discussing and improving the Work, but + excluding communication that is conspicuously marked or otherwise + designated in writing by the copyright owner as "Not a Contribution." + + "Contributor" shall mean Licensor and any individual or Legal Entity + on behalf of whom a Contribution has been received by Licensor and + subsequently incorporated within the Work. + + 2. Grant of Copyright License. Subject to the terms and conditions of + this License, each Contributor hereby grants to You a perpetual, + worldwide, non-exclusive, no-charge, royalty-free, irrevocable + copyright license to reproduce, prepare Derivative Works of, + publicly display, publicly perform, sublicense, and distribute the + Work and such Derivative Works in Source or Object form. + + 3. Grant of Patent License. Subject to the terms and conditions of + this License, each Contributor hereby grants to You a perpetual, + worldwide, non-exclusive, no-charge, royalty-free, irrevocable + (except as stated in this section) patent license to make, have made, + use, offer to sell, sell, import, and otherwise transfer the Work, + where such license applies only to those patent claims licensable + by such Contributor that are necessarily infringed by their + Contribution(s) alone or by combination of their Contribution(s) + with the Work to which such Contribution(s) was submitted. If You + institute patent litigation against any entity (including a + cross-claim or counterclaim in a lawsuit) alleging that the Work + or a Contribution incorporated within the Work constitutes direct + or contributory patent infringement, then any patent licenses + granted to You under this License for that Work shall terminate + as of the date such litigation is filed. + + 4. Redistribution. You may reproduce and distribute copies of the + Work or Derivative Works thereof in any medium, with or without + modifications, and in Source or Object form, provided that You + meet the following conditions: + + (a) You must give any other recipients of the Work or + Derivative Works a copy of this License; and + + (b) You must cause any modified files to carry prominent notices + stating that You changed the files; and + + (c) You must retain, in the Source form of any Derivative Works + that You distribute, all copyright, patent, trademark, and + attribution notices from the Source form of the Work, + excluding those notices that do not pertain to any part of + the Derivative Works; and + + (d) If the Work includes a "NOTICE" text file as part of its + distribution, then any Derivative Works that You distribute must + include a readable copy of the attribution notices contained + within such NOTICE file, excluding those notices that do not + pertain to any part of the Derivative Works, in at least one + of the following places: within a NOTICE text file distributed + as part of the Derivative Works; within the Source form or + documentation, if provided along with the Derivative Works; or, + within a display generated by the Derivative Works, if and + wherever such third-party notices normally appear. The contents + of the NOTICE file are for informational purposes only and + do not modify the License. You may add Your own attribution + notices within Derivative Works that You distribute, alongside + or as an addendum to the NOTICE text from the Work, provided + that such additional attribution notices cannot be construed + as modifying the License. + + You may add Your own copyright statement to Your modifications and + may provide additional or different license terms and conditions + for use, reproduction, or distribution of Your modifications, or + for any such Derivative Works as a whole, provided Your use, + reproduction, and distribution of the Work otherwise complies with + the conditions stated in this License. + + 5. Submission of Contributions. Unless You explicitly state otherwise, + any Contribution intentionally submitted for inclusion in the Work + by You to the Licensor shall be under the terms and conditions of + this License, without any additional terms or conditions. + Notwithstanding the above, nothing herein shall supersede or modify + the terms of any separate license agreement you may have executed + with Licensor regarding such Contributions. + + 6. Trademarks. This License does not grant permission to use the trade + names, trademarks, service marks, or product names of the Licensor, + except as required for reasonable and customary use in describing the + origin of the Work and reproducing the content of the NOTICE file. + + 7. Disclaimer of Warranty. Unless required by applicable law or + agreed to in writing, Licensor provides the Work (and each + Contributor provides its Contributions) on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or + implied, including, without limitation, any warranties or conditions + of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A + PARTICULAR PURPOSE. You are solely responsible for determining the + appropriateness of using or redistributing the Work and assume any + risks associated with Your exercise of permissions under this License. + + 8. Limitation of Liability. In no event and under no legal theory, + whether in tort (including negligence), contract, or otherwise, + unless required by applicable law (such as deliberate and grossly + negligent acts) or agreed to in writing, shall any Contributor be + liable to You for damages, including any direct, indirect, special, + incidental, or consequential damages of any character arising as a + result of this License or out of the use or inability to use the + Work (including but not limited to damages for loss of goodwill, + work stoppage, computer failure or malfunction, or any and all + other commercial damages or losses), even if such Contributor + has been advised of the possibility of such damages. + + 9. Accepting Warranty or Additional Liability. While redistributing + the Work or Derivative Works thereof, You may choose to offer, + and charge a fee for, acceptance of support, warranty, indemnity, + or other liability obligations and/or rights consistent with this + License. However, in accepting such obligations, You may act only + on Your own behalf and on Your sole responsibility, not on behalf + of any other Contributor, and only if You agree to indemnify, + defend, and hold each Contributor harmless for any liability + incurred by, or claims asserted against, such Contributor by reason + of your accepting any such warranty or additional liability. + + END OF TERMS AND CONDITIONS + + APPENDIX: How to apply the Apache License to your work. + + To apply the Apache License to your work, attach the following + boilerplate notice, with the fields enclosed by brackets "{}" + replaced with your own identifying information. (Don't include + the brackets!) The text should be enclosed in the appropriate + comment syntax for the file format. We also recommend that a + file or class name and description of purpose be included on the + same "printed page" as the copyright notice for easier + identification within third-party archives. + + Copyright 2015 ShiftOS + + Licensed under the Apache License, Version 2.0 (the "License"); + you may not use this file except in compliance with the License. + You may obtain a copy of the License at + + http://www.apache.org/licenses/LICENSE-2.0 + + Unless required by applicable law or agreed to in writing, software + distributed under the License is distributed on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + See the License for the specific language governing permissions and + limitations under the License. diff --git a/ShiftOS.Engine/Properties/AssemblyInfo.cs b/ShiftOS.Engine/Properties/AssemblyInfo.cs new file mode 100644 index 0000000..0a17339 --- /dev/null +++ b/ShiftOS.Engine/Properties/AssemblyInfo.cs @@ -0,0 +1,36 @@ +using System.Reflection; +using System.Runtime.CompilerServices; +using 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. +[assembly: AssemblyTitle("ShiftOS.Engine")] +[assembly: AssemblyDescription("")] +[assembly: AssemblyConfiguration("")] +[assembly: AssemblyCompany("")] +[assembly: AssemblyProduct("ShiftOS.Engine")] +[assembly: AssemblyCopyright("Copyright © 2017")] +[assembly: AssemblyTrademark("")] +[assembly: AssemblyCulture("")] + +// Setting ComVisible to false makes the types in this assembly not visible +// to COM components. If you need to access a type in this assembly from +// COM, set the ComVisible attribute to true on that type. +[assembly: ComVisible(false)] + +// The following GUID is for the ID of the typelib if this project is exposed to COM +[assembly: Guid("604eb1d7-998f-4a52-90a6-67f3dc3203d2")] + +// 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("1.0.0.0")] diff --git a/ShiftOS.Engine/ShiftOS.Engine.csproj b/ShiftOS.Engine/ShiftOS.Engine.csproj new file mode 100644 index 0000000..1a98ff0 --- /dev/null +++ b/ShiftOS.Engine/ShiftOS.Engine.csproj @@ -0,0 +1,47 @@ + + + + + Debug + AnyCPU + {604EB1D7-998F-4A52-90A6-67F3DC3203D2} + Library + Properties + ShiftOS.Engine + ShiftOS.Engine + v4.5 + 512 + + + true + full + false + bin\Debug\ + DEBUG;TRACE + prompt + 4 + + + pdbonly + true + bin\Release\ + TRACE + prompt + 4 + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/ShiftOS.Engine/WindowManager.cs b/ShiftOS.Engine/WindowManager.cs new file mode 100644 index 0000000..df1d734 --- /dev/null +++ b/ShiftOS.Engine/WindowManager.cs @@ -0,0 +1,12 @@ +using System; +using System.Collections.Generic; +using System.Linq; +using System.Text; +using System.Threading.Tasks; + +namespace ShiftOS.Engine +{ + public class WindowManager + { + } +} diff --git a/ShiftOS.Main/App.config b/ShiftOS.Main/App.config new file mode 100644 index 0000000..8e15646 --- /dev/null +++ b/ShiftOS.Main/App.config @@ -0,0 +1,6 @@ + + + + + + \ No newline at end of file diff --git a/ShiftOS.Main/NewHijack.Designer.cs b/ShiftOS.Main/NewHijack.Designer.cs new file mode 100644 index 0000000..25dda8b --- /dev/null +++ b/ShiftOS.Main/NewHijack.Designer.cs @@ -0,0 +1,104 @@ +namespace HijackScreen +{ + partial class Form1 + { + /// + /// Required designer variable. + /// + private System.ComponentModel.IContainer components = null; + + /// + /// Clean up any resources being used. + /// + /// true if managed resources should be disposed; otherwise, false. + protected override void Dispose(bool disposing) + { + if (disposing && (components != null)) + { + components.Dispose(); + } + base.Dispose(disposing); + } + + #region Windows Form Designer generated code + + /// + /// Required method for Designer support - do not modify + /// the contents of this method with the code editor. + /// + private void InitializeComponent() + { + this.components = new System.ComponentModel.Container(); + this.lblHijack = new System.Windows.Forms.Label(); + this.conversationTimer = new System.Windows.Forms.Timer(this.components); + this.textGen = new System.Windows.Forms.Timer(this.components); + this.lblhackwords = new System.Windows.Forms.Label(); + this.tmrHackFX = new System.Windows.Forms.Timer(this.components); + this.BackgroundWorker1 = new System.ComponentModel.BackgroundWorker(); + this.SuspendLayout(); + // + // lblHijack + // + this.lblHijack.Anchor = System.Windows.Forms.AnchorStyles.None; + this.lblHijack.AutoSize = true; + this.lblHijack.BackColor = System.Drawing.Color.WhiteSmoke; + this.lblHijack.Font = new System.Drawing.Font("Microsoft Sans Serif", 15.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0))); + this.lblHijack.Location = new System.Drawing.Point(151, 173); + this.lblHijack.Name = "lblHijack"; + this.lblHijack.Size = new System.Drawing.Size(18, 25); + this.lblHijack.TabIndex = 2; + this.lblHijack.Text = "\\"; + // + // conversationTimer + // + this.conversationTimer.Tick += new System.EventHandler(this.conversationTimer_Tick); + // + // textGen + // + this.textGen.Interval = 20; + this.textGen.Tick += new System.EventHandler(this.textGen_Tick); + // + // lblhackwords + // + this.lblhackwords.AutoSize = true; + this.lblhackwords.Dock = System.Windows.Forms.DockStyle.Fill; + this.lblhackwords.Font = new System.Drawing.Font("Microsoft Sans Serif", 11.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0))); + this.lblhackwords.ForeColor = System.Drawing.SystemColors.ButtonFace; + this.lblhackwords.Location = new System.Drawing.Point(0, 0); + this.lblhackwords.Name = "lblhackwords"; + this.lblhackwords.Size = new System.Drawing.Size(127, 18); + this.lblhackwords.TabIndex = 3; + this.lblhackwords.Text = "Encrypting MBR..."; + // + // tmrHackFX + // + this.tmrHackFX.Interval = 50; + // + // Form1 + // + this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F); + this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font; + this.BackColor = System.Drawing.Color.Silver; + this.ClientSize = new System.Drawing.Size(653, 457); + this.Controls.Add(this.lblHijack); + this.Controls.Add(this.lblhackwords); + this.Name = "Form1"; + this.Text = "Form1"; + this.TransparencyKey = System.Drawing.Color.White; + this.Load += new System.EventHandler(this.Form1_Load); + this.ResumeLayout(false); + this.PerformLayout(); + + } + + #endregion + + internal System.Windows.Forms.Label lblHijack; + internal System.Windows.Forms.Timer conversationTimer; + internal System.Windows.Forms.Timer textGen; + internal System.Windows.Forms.Label lblhackwords; + internal System.Windows.Forms.Timer tmrHackFX; + internal System.ComponentModel.BackgroundWorker BackgroundWorker1; + } +} + diff --git a/ShiftOS.Main/NewHijack.cs b/ShiftOS.Main/NewHijack.cs new file mode 100644 index 0000000..dcd83ab --- /dev/null +++ b/ShiftOS.Main/NewHijack.cs @@ -0,0 +1,176 @@ +using System; +using System.Collections.Generic; +using System.ComponentModel; +using System.Data; +using System.Drawing; +using System.Linq; +using System.Text; +using System.Threading.Tasks; +using System.Windows.Forms; +using System.IO; +using System.Media; + + +namespace HijackScreen +{ + public partial class Form1 : Form + { +#region Setting Up Stuff + string shiftVersion = "0.1.0 Beta 1"; + bool newGame = true; + int textCount = 0; + string rText; + int charCount; + string textToTypeGen; + int currentLetter; + int slashCount; + int convoCount = 0; + object textGenInput; + DirectoryInfo di; + bool needToClose = false; + string oldVersion; + public bool upgraded = false; + FileStream fs; + StreamReader sr; + int hackEffect; + int percentChanged; + DriveInfo cDrive; + DialogResult dialogResult; + //Holy jesus that was a lot of objects... Really Phil? +#endregion + public Form1() + { + InitializeComponent(); + } + + private void Form1_Load(object sender, EventArgs e) + { + CheckForIllegalCrossThreadCalls = false; + this.FormBorderStyle = FormBorderStyle.None; + this.WindowState = FormWindowState.Maximized; + cDrive = new DriveInfo("C:\\"); + if (Directory.Exists("C:\\ShiftOS-Rewind\\")) + { + if (File.ReadAllText("C:\\ShiftOS-Rewind\\Shiftum64\\HDAccess.sft") != shiftVersion) + { + dialogResult = MessageBox.Show("It appears that the version you are running is not compatible with this version of ShiftOS-Rewind\nWould you like to convert the save file?", "Oh dear!", MessageBoxButtons.YesNo, MessageBoxIcon.Asterisk); + if (dialogResult == DialogResult.Yes) + { + ConvertSaveFile(); + } + else + { + Application.Exit(); + } + } + } + else + { + tmrHackFX.Start(); + BackgroundWorker1.RunWorkerAsync(); + conversationTimer.Start(); + textGen.Start(); + } + } + /// + /// The text to type during the intro sequence. + /// + /// The string it uses to type. + private void TextType(string textToType) + { + textToTypeGen = textToType; + conversationTimer.Stop(); + charCount = textToTypeGen.Length; + currentLetter = 0; + slashCount = 1; + textGen.Start(); + } + + /// + /// Attempts to convert the save file into the correct version. + /// + private void ConvertSaveFile() + { + try + { + File.AppendAllText("C:\\ShiftOS-Rewind\\Shiftum64\\HDAccess.sft", shiftVersion); + } + catch(Exception ex) + { + MessageBox.Show("An error occured (big surprise). Here's the error: " + ex); + } + } + + private void textGen_Tick(object sender, EventArgs e) + { + switch (slashCount) + { + case 1: + if (currentLetter < textToTypeGen.Length) + { + textGenInput = rText + @"\"; + } + break; + case 2: + if (currentLetter < textToTypeGen.Length) + { + textGenInput = rText + @"|"; + } + break; + case 3: + if (currentLetter < textToTypeGen.Length) + { + textGenInput = rText + @"/"; + } + break; + case 4: + if (currentLetter < textToTypeGen.Length) + { + rText += textToTypeGen.ToCharArray(currentLetter, 1); + textGenInput = rText; + Stream str = ShiftOS.Main.Properties.Resources.typesound; + SoundPlayer sp = new SoundPlayer(str); + sp.Play(); + sp.Stream.Position = 0; + } + break; + + } + slashCount += 1; + if (slashCount == 5) + { + slashCount = 1; + } + + if (currentLetter == textToTypeGen.Length) + { + textToTypeGen = ""; + conversationTimer.Start(); + textGen.Stop(); + } + } + + private void conversationTimer_Tick(object sender, EventArgs e) + { + switch (convoCount) + { + case 0: + if (needToClose == true) this.Close(); + break; + case 1: + textGenInput = lblhackwords; + TextType("Your computer is now being Hijacked"); + conversationTimer.Interval = 1000; + break; + case 2: + textGenInput = lblhackwords; + textGen.Interval = 10; + rText = ""; + TextType("Congrats, " + Environment.UserName + "! You've been involunatarily selected to test out my new experimental operating system called ShiftOS!"); + break; + } + convoCount = convoCount + 1; + + } + } +} diff --git a/ShiftOS.Main/NewHijack.resx b/ShiftOS.Main/NewHijack.resx new file mode 100644 index 0000000..bf059b2 --- /dev/null +++ b/ShiftOS.Main/NewHijack.resx @@ -0,0 +1,132 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 498, 17 + + + 648, 17 + + + 741, 17 + + + 17, 56 + + \ No newline at end of file diff --git a/ShiftOS.Main/Program.cs b/ShiftOS.Main/Program.cs new file mode 100644 index 0000000..fd2ca89 --- /dev/null +++ b/ShiftOS.Main/Program.cs @@ -0,0 +1,22 @@ +using System; +using System.Collections.Generic; +using System.Linq; +using System.Threading.Tasks; +using System.Windows.Forms; + +namespace HijackScreen +{ + static class Program + { + /// + /// The main entry point for the application. + /// + [STAThread] + static void Main() + { + Application.EnableVisualStyles(); + Application.SetCompatibleTextRenderingDefault(false); + Application.Run(new newHijack()); + } + } +} diff --git a/ShiftOS.Main/Properties/AssemblyInfo.cs b/ShiftOS.Main/Properties/AssemblyInfo.cs new file mode 100644 index 0000000..6f85581 --- /dev/null +++ b/ShiftOS.Main/Properties/AssemblyInfo.cs @@ -0,0 +1,36 @@ +using System.Reflection; +using System.Runtime.CompilerServices; +using 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. +[assembly: AssemblyTitle("HijackScreen")] +[assembly: AssemblyDescription("")] +[assembly: AssemblyConfiguration("")] +[assembly: AssemblyCompany("")] +[assembly: AssemblyProduct("HijackScreen")] +[assembly: AssemblyCopyright("Copyright © 2017")] +[assembly: AssemblyTrademark("")] +[assembly: AssemblyCulture("")] + +// Setting ComVisible to false makes the types in this assembly not visible +// to COM components. If you need to access a type in this assembly from +// COM, set the ComVisible attribute to true on that type. +[assembly: ComVisible(false)] + +// The following GUID is for the ID of the typelib if this project is exposed to COM +[assembly: Guid("61a6e932-3129-4d58-ac79-f69d6e0b3054")] + +// 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("1.0.0.0")] diff --git a/ShiftOS.Main/Properties/Resources.Designer.cs b/ShiftOS.Main/Properties/Resources.Designer.cs new file mode 100644 index 0000000..94a198f --- /dev/null +++ b/ShiftOS.Main/Properties/Resources.Designer.cs @@ -0,0 +1,3408 @@ +//------------------------------------------------------------------------------ +// +// 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. +// +//------------------------------------------------------------------------------ + +namespace ShiftOS.Main.Properties { + using System; + + + /// + /// A strongly-typed resource class, for looking up localized strings, etc. + /// + // 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. + [global::System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0")] + [global::System.Diagnostics.DebuggerNonUserCodeAttribute()] + [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()] + internal class Resources { + + private static global::System.Resources.ResourceManager resourceMan; + + private static global::System.Globalization.CultureInfo resourceCulture; + + [global::System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")] + internal Resources() { + } + + /// + /// Returns the cached ResourceManager instance used by this class. + /// + [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)] + internal static global::System.Resources.ResourceManager ResourceManager { + get { + if (object.ReferenceEquals(resourceMan, null)) { + global::System.Resources.ResourceManager temp = new global::System.Resources.ResourceManager("ShiftOS.Main.Properties.Resources", typeof(Resources).Assembly); + resourceMan = temp; + } + return resourceMan; + } + } + + /// + /// Overrides the current thread's CurrentUICulture property for all + /// resource lookups using this strongly typed resource class. + /// + [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)] + internal static global::System.Globalization.CultureInfo Culture { + get { + return resourceCulture; + } + set { + resourceCulture = value; + } + } + + /// + /// Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + /// + internal static System.IO.UnmanagedMemoryStream _3beepvirus { + get { + return ResourceManager.GetStream("_3beepvirus", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap anycolourshade { + get { + object obj = ResourceManager.GetObject("anycolourshade", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap anycolourshade2 { + get { + object obj = ResourceManager.GetObject("anycolourshade2", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap anycolourshade3 { + get { + object obj = ResourceManager.GetObject("anycolourshade3", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap anycolourshade4 { + get { + object obj = ResourceManager.GetObject("anycolourshade4", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeaudioplayerbox { + get { + object obj = ResourceManager.GetObject("appscapeaudioplayerbox", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeaudioplayerprice { + get { + object obj = ResourceManager.GetObject("appscapeaudioplayerprice", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeaudioplayerpricepressed { + get { + object obj = ResourceManager.GetObject("appscapeaudioplayerpricepressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapecalculator { + get { + object obj = ResourceManager.GetObject("appscapecalculator", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapecalculatorprice { + get { + object obj = ResourceManager.GetObject("appscapecalculatorprice", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapecalculatorpricepressed { + get { + object obj = ResourceManager.GetObject("appscapecalculatorpricepressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapedepositbitnotewalletscreenshot { + get { + object obj = ResourceManager.GetObject("appscapedepositbitnotewalletscreenshot", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapedepositinfo { + get { + object obj = ResourceManager.GetObject("appscapedepositinfo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapedepositnowbutton { + get { + object obj = ResourceManager.GetObject("appscapedepositnowbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapedownloadbutton { + get { + object obj = ResourceManager.GetObject("appscapedownloadbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfoaudioplayertext { + get { + object obj = ResourceManager.GetObject("appscapeinfoaudioplayertext", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfoaudioplayervisualpreview { + get { + object obj = ResourceManager.GetObject("appscapeinfoaudioplayervisualpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfobackbutton { + get { + object obj = ResourceManager.GetObject("appscapeinfobackbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfobutton { + get { + object obj = ResourceManager.GetObject("appscapeinfobutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfobuttonpressed { + get { + object obj = ResourceManager.GetObject("appscapeinfobuttonpressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfobuybutton { + get { + object obj = ResourceManager.GetObject("appscapeinfobuybutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfocalculatortext { + get { + object obj = ResourceManager.GetObject("appscapeinfocalculatortext", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfocalculatorvisualpreview { + get { + object obj = ResourceManager.GetObject("appscapeinfocalculatorvisualpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfoorcwritetext { + get { + object obj = ResourceManager.GetObject("appscapeinfoorcwritetext", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfoorcwritevisualpreview { + get { + object obj = ResourceManager.GetObject("appscapeinfoorcwritevisualpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfovideoplayertext { + get { + object obj = ResourceManager.GetObject("appscapeinfovideoplayertext", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfovideoplayervisualpreview { + get { + object obj = ResourceManager.GetObject("appscapeinfovideoplayervisualpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfowebbrowsertext { + get { + object obj = ResourceManager.GetObject("appscapeinfowebbrowsertext", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeinfowebbrowservisualpreview { + get { + object obj = ResourceManager.GetObject("appscapeinfowebbrowservisualpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapemoresoftware { + get { + object obj = ResourceManager.GetObject("appscapemoresoftware", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeorcwrite { + get { + object obj = ResourceManager.GetObject("appscapeorcwrite", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapetitlebanner { + get { + object obj = ResourceManager.GetObject("appscapetitlebanner", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeundefinedprice { + get { + object obj = ResourceManager.GetObject("appscapeundefinedprice", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapeundefinedpricepressed { + get { + object obj = ResourceManager.GetObject("appscapeundefinedpricepressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapevideoplayer { + get { + object obj = ResourceManager.GetObject("appscapevideoplayer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapevideoplayerprice { + get { + object obj = ResourceManager.GetObject("appscapevideoplayerprice", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapevideoplayerpricepressed { + get { + object obj = ResourceManager.GetObject("appscapevideoplayerpricepressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapewebbrowser { + get { + object obj = ResourceManager.GetObject("appscapewebbrowser", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapewebbrowserprice { + get { + object obj = ResourceManager.GetObject("appscapewebbrowserprice", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapewebbrowserpricepressed { + get { + object obj = ResourceManager.GetObject("appscapewebbrowserpricepressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap appscapewelcometoappscape { + get { + object obj = ResourceManager.GetObject("appscapewelcometoappscape", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadcirclerubber { + get { + object obj = ResourceManager.GetObject("ArtPadcirclerubber", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadcirclerubberselected { + get { + object obj = ResourceManager.GetObject("ArtPadcirclerubberselected", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPaderacer { + get { + object obj = ResourceManager.GetObject("ArtPaderacer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadfloodfill { + get { + object obj = ResourceManager.GetObject("ArtPadfloodfill", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadlinetool { + get { + object obj = ResourceManager.GetObject("ArtPadlinetool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadmagnify { + get { + object obj = ResourceManager.GetObject("ArtPadmagnify", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadnew { + get { + object obj = ResourceManager.GetObject("ArtPadnew", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadopen { + get { + object obj = ResourceManager.GetObject("ArtPadopen", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadOval { + get { + object obj = ResourceManager.GetObject("ArtPadOval", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadpaintbrush { + get { + object obj = ResourceManager.GetObject("ArtPadpaintbrush", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadpencil { + get { + object obj = ResourceManager.GetObject("ArtPadpencil", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadpixelplacer { + get { + object obj = ResourceManager.GetObject("ArtPadpixelplacer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadRectangle { + get { + object obj = ResourceManager.GetObject("ArtPadRectangle", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadredo { + get { + object obj = ResourceManager.GetObject("ArtPadredo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadsave { + get { + object obj = ResourceManager.GetObject("ArtPadsave", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadsquarerubber { + get { + object obj = ResourceManager.GetObject("ArtPadsquarerubber", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadsquarerubberselected { + get { + object obj = ResourceManager.GetObject("ArtPadsquarerubberselected", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadtexttool { + get { + object obj = ResourceManager.GetObject("ArtPadtexttool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ArtPadundo { + get { + object obj = ResourceManager.GetObject("ArtPadundo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Byte[]. + /// + internal static byte[] AxInterop_WMPLib { + get { + object obj = ResourceManager.GetObject("AxInterop_WMPLib", resourceCulture); + return ((byte[])(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap bitnotediggergradetable { + get { + object obj = ResourceManager.GetObject("bitnotediggergradetable", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap BitnotesAcceptedHereLogo { + get { + object obj = ResourceManager.GetObject("BitnotesAcceptedHereLogo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap bitnoteswebsidepnl { + get { + object obj = ResourceManager.GetObject("bitnoteswebsidepnl", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap bitnotewalletdownload { + get { + object obj = ResourceManager.GetObject("bitnotewalletdownload", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap bitnotewalletpreviewscreenshot { + get { + object obj = ResourceManager.GetObject("bitnotewalletpreviewscreenshot", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap bitnotewebsitetitle { + get { + object obj = ResourceManager.GetObject("bitnotewebsitetitle", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized string similar to <?xml version="1.0" encoding="UTF-8" ?> + ///<grammar version="1.0" xml:lang="en-US" + /// xmlns="http://www.w3.org/2001/06/grammar" + /// tag-format="semantics/1.0" root="Main"> + /// + /// <!-- Catalyst Grammar File + /// + /// This file gives Catalyst the ability to recognize + /// audio input and give a proper response. + /// + /// --> + /// + /// <rule id="Main"> + /// <item> + /// How much Code Points do I have? + /// </item> + /// <item>Can you run <ruleref uri="#programs"/>?</item> + /// <item>Can you mini [rest of string was truncated]";. + /// + internal static string CatalystGrammar { + get { + return ResourceManager.GetString("CatalystGrammar", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap centrebutton { + get { + object obj = ResourceManager.GetObject("centrebutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap centrebuttonpressed { + get { + object obj = ResourceManager.GetObject("centrebuttonpressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap christmaseasteregg { + get { + object obj = ResourceManager.GetObject("christmaseasteregg", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap crash { + get { + object obj = ResourceManager.GetObject("crash", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap crash_cheat { + get { + object obj = ResourceManager.GetObject("crash_cheat", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap crash_force { + get { + object obj = ResourceManager.GetObject("crash_force", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap crash_ofm { + get { + object obj = ResourceManager.GetObject("crash_ofm", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap deletefile { + get { + object obj = ResourceManager.GetObject("deletefile", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap deletefolder { + get { + object obj = ResourceManager.GetObject("deletefolder", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized string similar to Desktop++ v1.0 + /// + ///Ever wanted to have a useful desktop with icons? Icons that can open files, websites or other content? Icons that can be dragged across the screen any way you like? Well, Desktop++ is for you. Desktop++ constantly scans 'C:/ShiftOS/Home/Desktop' and creates an icon for each file and folder within. + /// + ///Desktop++ also allows you to change between Icon and Tile view, where Tile view gives more information, and Icon View allows simplicity and draggability. It also allows you to dump a Text File [rest of string was truncated]";. + /// + internal static string DesktopPlusPlusAbout { + get { + return ResourceManager.GetString("DesktopPlusPlusAbout", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + /// + internal static System.IO.UnmanagedMemoryStream dial_up_modem_02 { + get { + return ResourceManager.GetStream("dial_up_modem_02", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap dodge { + get { + object obj = ResourceManager.GetObject("dodge", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap downarrow { + get { + object obj = ResourceManager.GetObject("downarrow", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap downloadmanagericon { + get { + object obj = ResourceManager.GetObject("downloadmanagericon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap DSC01042 { + get { + object obj = ResourceManager.GetObject("DSC01042", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap fileiconsaa { + get { + object obj = ResourceManager.GetObject("fileiconsaa", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap fileskimmericon_fw { + get { + object obj = ResourceManager.GetObject("fileskimmericon_fw", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap floodgateicn { + get { + object obj = ResourceManager.GetObject("floodgateicn", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap Gray_Shades { + get { + object obj = ResourceManager.GetObject("Gray_Shades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconArtpad { + get { + object obj = ResourceManager.GetObject("iconArtpad", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconAudioPlayer { + get { + object obj = ResourceManager.GetObject("iconAudioPlayer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconBitnoteDigger { + get { + object obj = ResourceManager.GetObject("iconBitnoteDigger", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconBitnoteWallet { + get { + object obj = ResourceManager.GetObject("iconBitnoteWallet", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconCalculator { + get { + object obj = ResourceManager.GetObject("iconCalculator", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconClock { + get { + object obj = ResourceManager.GetObject("iconClock", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconColourPicker_fw { + get { + object obj = ResourceManager.GetObject("iconColourPicker_fw", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconDodge { + get { + object obj = ResourceManager.GetObject("iconDodge", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconDownloader { + get { + object obj = ResourceManager.GetObject("iconDownloader", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconFileOpener_fw { + get { + object obj = ResourceManager.GetObject("iconFileOpener_fw", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconFileSaver_fw { + get { + object obj = ResourceManager.GetObject("iconFileSaver_fw", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconFileSkimmer { + get { + object obj = ResourceManager.GetObject("iconFileSkimmer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconfloodgate { + get { + object obj = ResourceManager.GetObject("iconfloodgate", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap icongraphicpicker { + get { + object obj = ResourceManager.GetObject("icongraphicpicker", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconIconManager { + get { + object obj = ResourceManager.GetObject("iconIconManager", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconInfoBox_fw { + get { + object obj = ResourceManager.GetObject("iconInfoBox_fw", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconKnowledgeInput { + get { + object obj = ResourceManager.GetObject("iconKnowledgeInput", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconmaze { + get { + object obj = ResourceManager.GetObject("iconmaze", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconNameChanger { + get { + object obj = ResourceManager.GetObject("iconNameChanger", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconorcwrite { + get { + object obj = ResourceManager.GetObject("iconorcwrite", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconPong { + get { + object obj = ResourceManager.GetObject("iconPong", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconShifter { + get { + object obj = ResourceManager.GetObject("iconShifter", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconShiftnet { + get { + object obj = ResourceManager.GetObject("iconShiftnet", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconShiftorium { + get { + object obj = ResourceManager.GetObject("iconShiftorium", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconshutdown { + get { + object obj = ResourceManager.GetObject("iconshutdown", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconSkinLoader { + get { + object obj = ResourceManager.GetObject("iconSkinLoader", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconSkinShifter { + get { + object obj = ResourceManager.GetObject("iconSkinShifter", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconSnakey { + get { + object obj = ResourceManager.GetObject("iconSnakey", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconSysinfo { + get { + object obj = ResourceManager.GetObject("iconSysinfo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconTerminal { + get { + object obj = ResourceManager.GetObject("iconTerminal", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconTextPad { + get { + object obj = ResourceManager.GetObject("iconTextPad", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconunitytoggle { + get { + object obj = ResourceManager.GetObject("iconunitytoggle", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconVideoPlayer { + get { + object obj = ResourceManager.GetObject("iconVideoPlayer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconvirusscanner { + get { + object obj = ResourceManager.GetObject("iconvirusscanner", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap iconWebBrowser { + get { + object obj = ResourceManager.GetObject("iconWebBrowser", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Byte[]. + /// + internal static byte[] Industrial { + get { + object obj = ResourceManager.GetObject("Industrial", resourceCulture); + return ((byte[])(obj)); + } + } + + /// + /// Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + /// + internal static System.IO.UnmanagedMemoryStream infobox { + get { + return ResourceManager.GetStream("infobox", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap installericon { + get { + object obj = ResourceManager.GetObject("installericon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Byte[]. + /// + internal static byte[] Interop_WMPLib { + get { + object obj = ResourceManager.GetObject("Interop_WMPLib", resourceCulture); + return ((byte[])(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Byte[]. + /// + internal static byte[] Linux_Mint_7 { + get { + object obj = ResourceManager.GetObject("Linux_Mint_7", resourceCulture); + return ((byte[])(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap loadbutton { + get { + object obj = ResourceManager.GetObject("loadbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap Minimatchbackground { + get { + object obj = ResourceManager.GetObject("Minimatchbackground", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap minimatchdodgepreviewimage { + get { + object obj = ResourceManager.GetObject("minimatchdodgepreviewimage", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap minimatchlabyrinthpreview { + get { + object obj = ResourceManager.GetObject("minimatchlabyrinthpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap newfolder { + get { + object obj = ResourceManager.GetObject("newfolder", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap newicon { + get { + object obj = ResourceManager.GetObject("newicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap nextbutton { + get { + object obj = ResourceManager.GetObject("nextbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap openicon { + get { + object obj = ResourceManager.GetObject("openicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap pausebutton { + get { + object obj = ResourceManager.GetObject("pausebutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap pixelsetter { + get { + object obj = ResourceManager.GetObject("pixelsetter", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap playbutton { + get { + object obj = ResourceManager.GetObject("playbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap previousbutton { + get { + object obj = ResourceManager.GetObject("previousbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap Receive { + get { + object obj = ResourceManager.GetObject("Receive", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap ReceiveClicked { + get { + object obj = ResourceManager.GetObject("ReceiveClicked", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + /// + internal static System.IO.UnmanagedMemoryStream rolldown { + get { + return ResourceManager.GetStream("rolldown", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + /// + internal static System.IO.UnmanagedMemoryStream rollup { + get { + return ResourceManager.GetStream("rollup", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap saveicon { + get { + object obj = ResourceManager.GetObject("saveicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap Send { + get { + object obj = ResourceManager.GetObject("Send", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap SendClicked { + get { + object obj = ResourceManager.GetObject("SendClicked", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap shiftomizericonpreview { + get { + object obj = ResourceManager.GetObject("shiftomizericonpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap shiftomizerindustrialskinpreview { + get { + object obj = ResourceManager.GetObject("shiftomizerindustrialskinpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap shiftomizerlinuxmintskinpreview { + get { + object obj = ResourceManager.GetObject("shiftomizerlinuxmintskinpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap shiftomizernamechangerpreview { + get { + object obj = ResourceManager.GetObject("shiftomizernamechangerpreview", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap shiftomizerskinshifterscreenshot { + get { + object obj = ResourceManager.GetObject("shiftomizerskinshifterscreenshot", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap shiftomizersliderleftarrow { + get { + object obj = ResourceManager.GetObject("shiftomizersliderleftarrow", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap shiftomizersliderrightarrow { + get { + object obj = ResourceManager.GetObject("shiftomizersliderrightarrow", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized string similar to Apache License + /// Version 2.0, January 2004 + /// http://www.apache.org/licenses/ + /// + /// TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION + /// + /// 1. Definitions. + /// + /// "License" shall mean the terms and conditions for use, reproduction, + /// and distribution as defined by Sections 1 through 9 of this document. + /// + /// "Licensor" shall mean the copyright owner or entity authorized by + /// the copyright owner that is granting the License. + /// + /// " [rest of string was truncated]";. + /// + internal static string ShiftOS_License { + get { + return ResourceManager.GetString("ShiftOS_License", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap skindownarrow { + get { + object obj = ResourceManager.GetObject("skindownarrow", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap skinfile { + get { + object obj = ResourceManager.GetObject("skinfile", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap skinuparrow { + get { + object obj = ResourceManager.GetObject("skinuparrow", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap snakeyback { + get { + object obj = ResourceManager.GetObject("snakeyback", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap stopbutton { + get { + object obj = ResourceManager.GetObject("stopbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap stretchbutton { + get { + object obj = ResourceManager.GetObject("stretchbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap stretchbuttonpressed { + get { + object obj = ResourceManager.GetObject("stretchbuttonpressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap Symbolinfo { + get { + object obj = ResourceManager.GetObject("Symbolinfo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap test { + get { + object obj = ResourceManager.GetObject("test", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap textpad_fw { + get { + object obj = ResourceManager.GetObject("textpad_fw", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap tilebutton { + get { + object obj = ResourceManager.GetObject("tilebutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap tilebuttonpressed { + get { + object obj = ResourceManager.GetObject("tilebuttonpressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap TotalBalanceClicked { + get { + object obj = ResourceManager.GetObject("TotalBalanceClicked", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap TotalBalanceUnclicked { + get { + object obj = ResourceManager.GetObject("TotalBalanceUnclicked", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap transactionsClicked { + get { + object obj = ResourceManager.GetObject("transactionsClicked", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap transactionsUnclicked { + get { + object obj = ResourceManager.GetObject("transactionsUnclicked", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + /// + internal static System.IO.UnmanagedMemoryStream typesound { + get { + return ResourceManager.GetStream("typesound", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap uparrow { + get { + object obj = ResourceManager.GetObject("uparrow", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap updatecustomcolourpallets { + get { + object obj = ResourceManager.GetObject("updatecustomcolourpallets", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealartpad { + get { + object obj = ResourceManager.GetObject("upgradealartpad", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealclock { + get { + object obj = ResourceManager.GetObject("upgradealclock", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealfileskimmer { + get { + object obj = ResourceManager.GetObject("upgradealfileskimmer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealpong { + get { + object obj = ResourceManager.GetObject("upgradealpong", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealshifter { + get { + object obj = ResourceManager.GetObject("upgradealshifter", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealshiftorium { + get { + object obj = ResourceManager.GetObject("upgradealshiftorium", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealtextpad { + get { + object obj = ResourceManager.GetObject("upgradealtextpad", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradealunitymode { + get { + object obj = ResourceManager.GetObject("upgradealunitymode", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeamandpm { + get { + object obj = ResourceManager.GetObject("upgradeamandpm", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeapplaunchermenu { + get { + object obj = ResourceManager.GetObject("upgradeapplaunchermenu", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeapplaunchershutdown { + get { + object obj = ResourceManager.GetObject("upgradeapplaunchershutdown", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpad { + get { + object obj = ResourceManager.GetObject("upgradeartpad", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpad128colorpallets { + get { + object obj = ResourceManager.GetObject("upgradeartpad128colorpallets", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpad16colorpallets { + get { + object obj = ResourceManager.GetObject("upgradeartpad16colorpallets", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpad32colorpallets { + get { + object obj = ResourceManager.GetObject("upgradeartpad32colorpallets", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpad4colorpallets { + get { + object obj = ResourceManager.GetObject("upgradeartpad4colorpallets", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpad64colorpallets { + get { + object obj = ResourceManager.GetObject("upgradeartpad64colorpallets", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpad8colorpallets { + get { + object obj = ResourceManager.GetObject("upgradeartpad8colorpallets", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpaderaser { + get { + object obj = ResourceManager.GetObject("upgradeartpaderaser", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadfilltool { + get { + object obj = ResourceManager.GetObject("upgradeartpadfilltool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadicon { + get { + object obj = ResourceManager.GetObject("upgradeartpadicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadlimitlesspixels { + get { + object obj = ResourceManager.GetObject("upgradeartpadlimitlesspixels", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadlinetool { + get { + object obj = ResourceManager.GetObject("upgradeartpadlinetool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadload { + get { + object obj = ResourceManager.GetObject("upgradeartpadload", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadnew { + get { + object obj = ResourceManager.GetObject("upgradeartpadnew", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadovaltool { + get { + object obj = ResourceManager.GetObject("upgradeartpadovaltool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpaintbrushtool { + get { + object obj = ResourceManager.GetObject("upgradeartpadpaintbrushtool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpenciltool { + get { + object obj = ResourceManager.GetObject("upgradeartpadpenciltool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit1024 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit1024", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit16 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit16", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit16384 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit16384", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit256 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit256", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit4 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit4", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit4096 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit4096", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit64 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit64", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit65536 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit65536", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixellimit8 { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixellimit8", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixelplacer { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixelplacer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadpixelplacermovementmode { + get { + object obj = ResourceManager.GetObject("upgradeartpadpixelplacermovementmode", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadrectangletool { + get { + object obj = ResourceManager.GetObject("upgradeartpadrectangletool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadredo { + get { + object obj = ResourceManager.GetObject("upgradeartpadredo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadsave { + get { + object obj = ResourceManager.GetObject("upgradeartpadsave", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadtexttool { + get { + object obj = ResourceManager.GetObject("upgradeartpadtexttool", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeartpadundo { + get { + object obj = ResourceManager.GetObject("upgradeartpadundo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeautoscrollterminal { + get { + object obj = ResourceManager.GetObject("upgradeautoscrollterminal", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeblue { + get { + object obj = ResourceManager.GetObject("upgradeblue", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradebluecustom { + get { + object obj = ResourceManager.GetObject("upgradebluecustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeblueshades { + get { + object obj = ResourceManager.GetObject("upgradeblueshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeblueshadeset { + get { + object obj = ResourceManager.GetObject("upgradeblueshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradebrown { + get { + object obj = ResourceManager.GetObject("upgradebrown", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradebrowncustom { + get { + object obj = ResourceManager.GetObject("upgradebrowncustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradebrownshades { + get { + object obj = ResourceManager.GetObject("upgradebrownshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradebrownshadeset { + get { + object obj = ResourceManager.GetObject("upgradebrownshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeclock { + get { + object obj = ResourceManager.GetObject("upgradeclock", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeclockicon { + get { + object obj = ResourceManager.GetObject("upgradeclockicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeclosebutton { + get { + object obj = ResourceManager.GetObject("upgradeclosebutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradecolourpickericon { + get { + object obj = ResourceManager.GetObject("upgradecolourpickericon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradecustomusername { + get { + object obj = ResourceManager.GetObject("upgradecustomusername", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradedesktoppanel { + get { + object obj = ResourceManager.GetObject("upgradedesktoppanel", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradedesktoppanelclock { + get { + object obj = ResourceManager.GetObject("upgradedesktoppanelclock", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradedraggablewindows { + get { + object obj = ResourceManager.GetObject("upgradedraggablewindows", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradefileskimmer { + get { + object obj = ResourceManager.GetObject("upgradefileskimmer", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradefileskimmerdelete { + get { + object obj = ResourceManager.GetObject("upgradefileskimmerdelete", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradefileskimmericon { + get { + object obj = ResourceManager.GetObject("upgradefileskimmericon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradefileskimmernew { + get { + object obj = ResourceManager.GetObject("upgradefileskimmernew", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegray { + get { + object obj = ResourceManager.GetObject("upgradegray", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegraycustom { + get { + object obj = ResourceManager.GetObject("upgradegraycustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegrayshades { + get { + object obj = ResourceManager.GetObject("upgradegrayshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegrayshadeset { + get { + object obj = ResourceManager.GetObject("upgradegrayshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegreen { + get { + object obj = ResourceManager.GetObject("upgradegreen", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegreencustom { + get { + object obj = ResourceManager.GetObject("upgradegreencustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegreenshades { + get { + object obj = ResourceManager.GetObject("upgradegreenshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradegreenshadeset { + get { + object obj = ResourceManager.GetObject("upgradegreenshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradehoursssincemidnight { + get { + object obj = ResourceManager.GetObject("upgradehoursssincemidnight", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeiconunitymode { + get { + object obj = ResourceManager.GetObject("upgradeiconunitymode", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeinfoboxicon { + get { + object obj = ResourceManager.GetObject("upgradeinfoboxicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradekiaddons { + get { + object obj = ResourceManager.GetObject("upgradekiaddons", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradekielements { + get { + object obj = ResourceManager.GetObject("upgradekielements", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeknowledgeinput { + get { + object obj = ResourceManager.GetObject("upgradeknowledgeinput", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeknowledgeinputicon { + get { + object obj = ResourceManager.GetObject("upgradeknowledgeinputicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgrademinimizebutton { + get { + object obj = ResourceManager.GetObject("upgrademinimizebutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgrademinimizecommand { + get { + object obj = ResourceManager.GetObject("upgrademinimizecommand", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgrademinuteaccuracytime { + get { + object obj = ResourceManager.GetObject("upgrademinuteaccuracytime", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgrademinutesssincemidnight { + get { + object obj = ResourceManager.GetObject("upgrademinutesssincemidnight", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgrademoveablewindows { + get { + object obj = ResourceManager.GetObject("upgrademoveablewindows", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgrademultitasking { + get { + object obj = ResourceManager.GetObject("upgrademultitasking", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeorange { + get { + object obj = ResourceManager.GetObject("upgradeorange", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeorangecustom { + get { + object obj = ResourceManager.GetObject("upgradeorangecustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeorangeshades { + get { + object obj = ResourceManager.GetObject("upgradeorangeshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeorangeshadeset { + get { + object obj = ResourceManager.GetObject("upgradeorangeshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeosname { + get { + object obj = ResourceManager.GetObject("upgradeosname", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepanelbuttons { + get { + object obj = ResourceManager.GetObject("upgradepanelbuttons", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepink { + get { + object obj = ResourceManager.GetObject("upgradepink", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepinkcustom { + get { + object obj = ResourceManager.GetObject("upgradepinkcustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepinkshades { + get { + object obj = ResourceManager.GetObject("upgradepinkshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepinkshadeset { + get { + object obj = ResourceManager.GetObject("upgradepinkshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepong { + get { + object obj = ResourceManager.GetObject("upgradepong", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepongicon { + get { + object obj = ResourceManager.GetObject("upgradepongicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepurple { + get { + object obj = ResourceManager.GetObject("upgradepurple", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepurplecustom { + get { + object obj = ResourceManager.GetObject("upgradepurplecustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepurpleshades { + get { + object obj = ResourceManager.GetObject("upgradepurpleshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradepurpleshadeset { + get { + object obj = ResourceManager.GetObject("upgradepurpleshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradered { + get { + object obj = ResourceManager.GetObject("upgradered", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderedcustom { + get { + object obj = ResourceManager.GetObject("upgraderedcustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderedshades { + get { + object obj = ResourceManager.GetObject("upgraderedshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderedshadeset { + get { + object obj = ResourceManager.GetObject("upgraderedshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderemoveth1 { + get { + object obj = ResourceManager.GetObject("upgraderemoveth1", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderemoveth2 { + get { + object obj = ResourceManager.GetObject("upgraderemoveth2", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderemoveth3 { + get { + object obj = ResourceManager.GetObject("upgraderemoveth3", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderemoveth4 { + get { + object obj = ResourceManager.GetObject("upgraderemoveth4", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderesize { + get { + object obj = ResourceManager.GetObject("upgraderesize", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderollupbutton { + get { + object obj = ResourceManager.GetObject("upgraderollupbutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgraderollupcommand { + get { + object obj = ResourceManager.GetObject("upgraderollupcommand", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradesecondssincemidnight { + get { + object obj = ResourceManager.GetObject("upgradesecondssincemidnight", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradesgameconsoles { + get { + object obj = ResourceManager.GetObject("upgradesgameconsoles", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftapplauncher { + get { + object obj = ResourceManager.GetObject("upgradeshiftapplauncher", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftborders { + get { + object obj = ResourceManager.GetObject("upgradeshiftborders", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftbuttons { + get { + object obj = ResourceManager.GetObject("upgradeshiftbuttons", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftdesktop { + get { + object obj = ResourceManager.GetObject("upgradeshiftdesktop", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftdesktoppanel { + get { + object obj = ResourceManager.GetObject("upgradeshiftdesktoppanel", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshifter { + get { + object obj = ResourceManager.GetObject("upgradeshifter", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftericon { + get { + object obj = ResourceManager.GetObject("upgradeshiftericon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftitems { + get { + object obj = ResourceManager.GetObject("upgradeshiftitems", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftoriumicon { + get { + object obj = ResourceManager.GetObject("upgradeshiftoriumicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftpanelbuttons { + get { + object obj = ResourceManager.GetObject("upgradeshiftpanelbuttons", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshiftpanelclock { + get { + object obj = ResourceManager.GetObject("upgradeshiftpanelclock", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshifttitlebar { + get { + object obj = ResourceManager.GetObject("upgradeshifttitlebar", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshifttitletext { + get { + object obj = ResourceManager.GetObject("upgradeshifttitletext", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeshutdownicon { + get { + object obj = ResourceManager.GetObject("upgradeshutdownicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeskicarbrands { + get { + object obj = ResourceManager.GetObject("upgradeskicarbrands", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeskinning { + get { + object obj = ResourceManager.GetObject("upgradeskinning", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradesplitsecondaccuracy { + get { + object obj = ResourceManager.GetObject("upgradesplitsecondaccuracy", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradesysinfo { + get { + object obj = ResourceManager.GetObject("upgradesysinfo", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeterminalicon { + get { + object obj = ResourceManager.GetObject("upgradeterminalicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeterminalscrollbar { + get { + object obj = ResourceManager.GetObject("upgradeterminalscrollbar", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetextpad { + get { + object obj = ResourceManager.GetObject("upgradetextpad", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetextpadicon { + get { + object obj = ResourceManager.GetObject("upgradetextpadicon", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetextpadnew { + get { + object obj = ResourceManager.GetObject("upgradetextpadnew", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetextpadopen { + get { + object obj = ResourceManager.GetObject("upgradetextpadopen", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetextpadsave { + get { + object obj = ResourceManager.GetObject("upgradetextpadsave", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetitlebar { + get { + object obj = ResourceManager.GetObject("upgradetitlebar", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetitletext { + get { + object obj = ResourceManager.GetObject("upgradetitletext", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradetrm { + get { + object obj = ResourceManager.GetObject("upgradetrm", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeunitymode { + get { + object obj = ResourceManager.GetObject("upgradeunitymode", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeusefulpanelbuttons { + get { + object obj = ResourceManager.GetObject("upgradeusefulpanelbuttons", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradevirusscanner { + get { + object obj = ResourceManager.GetObject("upgradevirusscanner", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradewindowborders { + get { + object obj = ResourceManager.GetObject("upgradewindowborders", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradewindowedterminal { + get { + object obj = ResourceManager.GetObject("upgradewindowedterminal", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradewindowsanywhere { + get { + object obj = ResourceManager.GetObject("upgradewindowsanywhere", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeyellow { + get { + object obj = ResourceManager.GetObject("upgradeyellow", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeyellowcustom { + get { + object obj = ResourceManager.GetObject("upgradeyellowcustom", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeyellowshades { + get { + object obj = ResourceManager.GetObject("upgradeyellowshades", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap upgradeyellowshadeset { + get { + object obj = ResourceManager.GetObject("upgradeyellowshadeset", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap webback { + get { + object obj = ResourceManager.GetObject("webback", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap webforward { + get { + object obj = ResourceManager.GetObject("webforward", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap webhome { + get { + object obj = ResourceManager.GetObject("webhome", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + /// + internal static System.IO.UnmanagedMemoryStream writesound { + get { + return ResourceManager.GetStream("writesound", resourceCulture); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap zoombutton { + get { + object obj = ResourceManager.GetObject("zoombutton", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Looks up a localized resource of type System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap zoombuttonpressed { + get { + object obj = ResourceManager.GetObject("zoombuttonpressed", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + } +} diff --git a/ShiftOS.Main/Properties/Resources.resx b/ShiftOS.Main/Properties/Resources.resx new file mode 100644 index 0000000..7d95cf4 --- /dev/null +++ b/ShiftOS.Main/Properties/Resources.resx @@ -0,0 +1,1117 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + ..\Resources\anycolourshade.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\anycolourshade2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\anycolourshade3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\anycolourshade4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeaudioplayerbox.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeaudioplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeaudioplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapecalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapecalculatorprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapecalculatorpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedepositbitnotewalletscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedepositinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedepositnowbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedownloadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfoaudioplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfoaudioplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfobackbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfobutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfobuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfobuybutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfocalculatortext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfocalculatorvisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfoorcwritetext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfoorcwritevisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfovideoplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfovideoplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfowebbrowsertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfowebbrowservisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapemoresoftware.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeorcwrite.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapetitlebanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeundefinedprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeundefinedpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapevideoplayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapevideoplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapevideoplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewebbrowser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewebbrowserprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewebbrowserpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewelcometoappscape.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadcirclerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadcirclerubberselected.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPaderacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadfloodfill.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadlinetool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadmagnify.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadOval.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadpaintbrush.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadpencil.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadRectangle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadsquarerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadsquarerubberselected.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\AxInterop.WMPLib.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\bitnotediggergradetable.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\BitnotesAcceptedHereLogo.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnoteswebsidepnl.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnotewalletdownload.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnotewalletpreviewscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnotewebsitetitle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\CatalystGrammar.xml;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252 + + + ..\Resources\centrebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\centrebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\christmaseasteregg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash-cheat.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash-force.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash_ofm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\deletefile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\deletefolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\DesktopPlusPlusAbout.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252 + + + ..\Resources\dial-up-modem-02.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\dodge.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\downarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\downloadmanagericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\DSC01042.JPG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\fileiconsaa.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\fileskimmericon.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\floodgateicn.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Gray Shades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconArtpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconAudioPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconBitnoteDigger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconBitnoteWallet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconCalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconClock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconColourPicker.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconDodge.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconDownloader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconFileOpener.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconFileSaver.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconFileSkimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconfloodgate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\icongraphicpicker.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconIconManager.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconInfoBox.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconKnowledgeInput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconmaze.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconNameChanger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconorcwrite.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconPong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconShiftnet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconShiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconshutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSkinLoader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSkinShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSnakey.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSysinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconTerminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconTextPad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconunitytoggle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconVideoPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconvirusscanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconWebBrowser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Industrial.skn;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\infobox.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\installericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Interop.WMPLib.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\Linux Mint 7.skn;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\loadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Minimatchbackground.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\minimatchdodgepreviewimage.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\minimatchlabyrinthpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\newfolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\newicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\nextbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\openicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\pausebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\pixelsetter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\playbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\previousbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Receive.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ReceiveClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\rolldown.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\rollup.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\saveicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Send.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\SendClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizericonpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizerindustrialskinpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizerlinuxmintskinpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizernamechangerpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizerskinshifterscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizersliderleftarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizersliderrightarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ShiftOS License.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252 + + + ..\Resources\skindownarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\skinfile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\skinuparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\snakeyback.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\stopbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\stretchbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\stretchbuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Symbolinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\test.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\textpad.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\tilebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\tilebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\TotalBalanceClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\TotalBalanceUnclicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\transactionsClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\transactionsUnclicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\typesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\uparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\updatecustomcolourpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealfileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealpong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealshiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealtextpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeamandpm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeapplaunchermenu.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeapplaunchershutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad128colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad16colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad32colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad4colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad64colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad8colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpaderaser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadfilltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadlimitlesspixels.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadlinetool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadload.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadovaltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpaintbrushtool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpenciltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit1024.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit16384.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit256.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit4096.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit64.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit65536.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit8.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixelplacermovementmode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadrectangletool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeautoscrollterminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeblue.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebluecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeblueshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeblueshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrowncustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrownshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrownshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeclockicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeclosebutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradecolourpickericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradecustomusername.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradedesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradedesktoppanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradedraggablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmerdelete.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmernew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegray.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegraycustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegrayshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegrayshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreencustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreenshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreenshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradehoursssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeiconunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeinfoboxicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradekiaddons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradekielements.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeknowledgeinput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeknowledgeinputicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademinimizebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademinimizecommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademinuteaccuracytime.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademinutesssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademoveablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademultitasking.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorange.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorangecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorangeshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorangeshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeosname.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepink.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepinkcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepinkshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepinkshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepongicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurplecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurpleshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurpleshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradered.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderedcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderedshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderedshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderesize.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderollupbutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderollupcommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesecondssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesgameconsoles.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftapplauncher.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftdesktop.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftdesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftitems.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftoriumicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftpanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftpanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshifttitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshifttitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshutdownicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeskicarbrands.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeskinning.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesplitsecondaccuracy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesysinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeterminalicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeterminalscrollbar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetrm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeusefulpanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradevirusscanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradewindowborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradewindowedterminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradewindowsanywhere.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellowcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellowshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellowshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\webback.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\webforward.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\webhome.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\writesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\zoombutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\zoombuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\3beepvirus.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/ShiftOS.Main/Properties/Settings.Designer.cs b/ShiftOS.Main/Properties/Settings.Designer.cs new file mode 100644 index 0000000..fca3917 --- /dev/null +++ b/ShiftOS.Main/Properties/Settings.Designer.cs @@ -0,0 +1,26 @@ +//------------------------------------------------------------------------------ +// +// 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. +// +//------------------------------------------------------------------------------ + +namespace ShiftOS.Main.Properties { + + + [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()] + [global::System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.3.0.0")] + internal sealed partial class Settings : global::System.Configuration.ApplicationSettingsBase { + + private static Settings defaultInstance = ((Settings)(global::System.Configuration.ApplicationSettingsBase.Synchronized(new Settings()))); + + public static Settings Default { + get { + return defaultInstance; + } + } + } +} diff --git a/ShiftOS.Main/Properties/Settings.settings b/ShiftOS.Main/Properties/Settings.settings new file mode 100644 index 0000000..3964565 --- /dev/null +++ b/ShiftOS.Main/Properties/Settings.settings @@ -0,0 +1,7 @@ + + + + + + + diff --git a/ShiftOS.Main/Resources/3beepvirus.wav b/ShiftOS.Main/Resources/3beepvirus.wav new file mode 100644 index 0000000..c1af078 Binary files /dev/null and b/ShiftOS.Main/Resources/3beepvirus.wav differ diff --git a/ShiftOS.Main/Resources/ArtPadOval.png b/ShiftOS.Main/Resources/ArtPadOval.png new file mode 100644 index 0000000..fceec4c Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadOval.png differ diff --git a/ShiftOS.Main/Resources/ArtPadRectangle.png b/ShiftOS.Main/Resources/ArtPadRectangle.png new file mode 100644 index 0000000..d9e2aa2 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadRectangle.png differ diff --git a/ShiftOS.Main/Resources/ArtPadcirclerubber.png b/ShiftOS.Main/Resources/ArtPadcirclerubber.png new file mode 100644 index 0000000..f7331e2 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadcirclerubber.png differ diff --git a/ShiftOS.Main/Resources/ArtPadcirclerubberselected.png b/ShiftOS.Main/Resources/ArtPadcirclerubberselected.png new file mode 100644 index 0000000..17f0416 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadcirclerubberselected.png differ diff --git a/ShiftOS.Main/Resources/ArtPaderacer.png b/ShiftOS.Main/Resources/ArtPaderacer.png new file mode 100644 index 0000000..051718c Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPaderacer.png differ diff --git a/ShiftOS.Main/Resources/ArtPadfloodfill.png b/ShiftOS.Main/Resources/ArtPadfloodfill.png new file mode 100644 index 0000000..487585c Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadfloodfill.png differ diff --git a/ShiftOS.Main/Resources/ArtPadlinetool.png b/ShiftOS.Main/Resources/ArtPadlinetool.png new file mode 100644 index 0000000..eb7329b Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadlinetool.png differ diff --git a/ShiftOS.Main/Resources/ArtPadmagnify.png b/ShiftOS.Main/Resources/ArtPadmagnify.png new file mode 100644 index 0000000..1310233 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadmagnify.png differ diff --git a/ShiftOS.Main/Resources/ArtPadnew.png b/ShiftOS.Main/Resources/ArtPadnew.png new file mode 100644 index 0000000..e1dc34f Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadnew.png differ diff --git a/ShiftOS.Main/Resources/ArtPadopen.png b/ShiftOS.Main/Resources/ArtPadopen.png new file mode 100644 index 0000000..9dc232b Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadopen.png differ diff --git a/ShiftOS.Main/Resources/ArtPadpaintbrush.png b/ShiftOS.Main/Resources/ArtPadpaintbrush.png new file mode 100644 index 0000000..c26ac3b Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadpaintbrush.png differ diff --git a/ShiftOS.Main/Resources/ArtPadpencil.png b/ShiftOS.Main/Resources/ArtPadpencil.png new file mode 100644 index 0000000..cf230e2 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadpencil.png differ diff --git a/ShiftOS.Main/Resources/ArtPadpixelplacer.png b/ShiftOS.Main/Resources/ArtPadpixelplacer.png new file mode 100644 index 0000000..4cc338b Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadpixelplacer.png differ diff --git a/ShiftOS.Main/Resources/ArtPadredo.png b/ShiftOS.Main/Resources/ArtPadredo.png new file mode 100644 index 0000000..ef42439 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadredo.png differ diff --git a/ShiftOS.Main/Resources/ArtPadsave.png b/ShiftOS.Main/Resources/ArtPadsave.png new file mode 100644 index 0000000..5a31d05 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadsave.png differ diff --git a/ShiftOS.Main/Resources/ArtPadsquarerubber.png b/ShiftOS.Main/Resources/ArtPadsquarerubber.png new file mode 100644 index 0000000..16391ef Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadsquarerubber.png differ diff --git a/ShiftOS.Main/Resources/ArtPadsquarerubberselected.png b/ShiftOS.Main/Resources/ArtPadsquarerubberselected.png new file mode 100644 index 0000000..5991242 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadsquarerubberselected.png differ diff --git a/ShiftOS.Main/Resources/ArtPadtexttool.png b/ShiftOS.Main/Resources/ArtPadtexttool.png new file mode 100644 index 0000000..a669a6d Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadtexttool.png differ diff --git a/ShiftOS.Main/Resources/ArtPadundo.png b/ShiftOS.Main/Resources/ArtPadundo.png new file mode 100644 index 0000000..6484122 Binary files /dev/null and b/ShiftOS.Main/Resources/ArtPadundo.png differ diff --git a/ShiftOS.Main/Resources/AxInterop.WMPLib.dll b/ShiftOS.Main/Resources/AxInterop.WMPLib.dll new file mode 100644 index 0000000..0d8a4ce Binary files /dev/null and b/ShiftOS.Main/Resources/AxInterop.WMPLib.dll differ diff --git a/ShiftOS.Main/Resources/BitnotesAcceptedHereLogo.bmp b/ShiftOS.Main/Resources/BitnotesAcceptedHereLogo.bmp new file mode 100644 index 0000000..100bfd1 Binary files /dev/null and b/ShiftOS.Main/Resources/BitnotesAcceptedHereLogo.bmp differ diff --git a/ShiftOS.Main/Resources/CatalystGrammar.xml b/ShiftOS.Main/Resources/CatalystGrammar.xml new file mode 100644 index 0000000..b082a0d --- /dev/null +++ b/ShiftOS.Main/Resources/CatalystGrammar.xml @@ -0,0 +1,42 @@ + + + + + + + + How much Code Points do I have? + + Can you run ? + Can you minimize ? + Can you close ? + + + + + Terminal + Knowledge Input + Pong + Shiftorium + Shifter + Labyrinth + Web Browser + Shiftnet + Skin Loader + Skin Shifter + Artpad + TextPad + OrcWrite + File Skimmer + Name Changer + Icon Manager + + + \ No newline at end of file diff --git a/ShiftOS.Main/Resources/DSC01042.JPG b/ShiftOS.Main/Resources/DSC01042.JPG new file mode 100644 index 0000000..bebf8a3 Binary files /dev/null and b/ShiftOS.Main/Resources/DSC01042.JPG differ diff --git a/ShiftOS.Main/Resources/DesktopPlusPlusAbout.txt b/ShiftOS.Main/Resources/DesktopPlusPlusAbout.txt new file mode 100644 index 0000000..cce539a --- /dev/null +++ b/ShiftOS.Main/Resources/DesktopPlusPlusAbout.txt @@ -0,0 +1,7 @@ +Desktop++ v1.0 + +Ever wanted to have a useful desktop with icons? Icons that can open files, websites or other content? Icons that can be dragged across the screen any way you like? Well, Desktop++ is for you. Desktop++ constantly scans 'C:/ShiftOS/Home/Desktop' and creates an icon for each file and folder within. + +Desktop++ also allows you to change between Icon and Tile view, where Tile view gives more information, and Icon View allows simplicity and draggability. It also allows you to dump a Text File containing the specs of your PC. The possibilities are endless. + +By using Desktop++, you agree that we send anonymous usability data directly to DevX. diff --git a/ShiftOS.Main/Resources/Gray Shades.png b/ShiftOS.Main/Resources/Gray Shades.png new file mode 100644 index 0000000..70945bc Binary files /dev/null and b/ShiftOS.Main/Resources/Gray Shades.png differ diff --git a/ShiftOS.Main/Resources/Industrial.skn b/ShiftOS.Main/Resources/Industrial.skn new file mode 100644 index 0000000..680f4e7 Binary files /dev/null and b/ShiftOS.Main/Resources/Industrial.skn differ diff --git a/ShiftOS.Main/Resources/Interop.WMPLib.dll b/ShiftOS.Main/Resources/Interop.WMPLib.dll new file mode 100644 index 0000000..d53b3b9 Binary files /dev/null and b/ShiftOS.Main/Resources/Interop.WMPLib.dll differ diff --git a/ShiftOS.Main/Resources/Linux Mint 7.skn b/ShiftOS.Main/Resources/Linux Mint 7.skn new file mode 100644 index 0000000..bc275d5 Binary files /dev/null and b/ShiftOS.Main/Resources/Linux Mint 7.skn differ diff --git a/ShiftOS.Main/Resources/Minimatchbackground.png b/ShiftOS.Main/Resources/Minimatchbackground.png new file mode 100644 index 0000000..ccb8569 Binary files /dev/null and b/ShiftOS.Main/Resources/Minimatchbackground.png differ diff --git a/ShiftOS.Main/Resources/Receive.png b/ShiftOS.Main/Resources/Receive.png new file mode 100644 index 0000000..ded20a0 Binary files /dev/null and b/ShiftOS.Main/Resources/Receive.png differ diff --git a/ShiftOS.Main/Resources/ReceiveClicked.png b/ShiftOS.Main/Resources/ReceiveClicked.png new file mode 100644 index 0000000..f5f968b Binary files /dev/null and b/ShiftOS.Main/Resources/ReceiveClicked.png differ diff --git a/ShiftOS.Main/Resources/Send.png b/ShiftOS.Main/Resources/Send.png new file mode 100644 index 0000000..f4e4302 Binary files /dev/null and b/ShiftOS.Main/Resources/Send.png differ diff --git a/ShiftOS.Main/Resources/SendClicked.png b/ShiftOS.Main/Resources/SendClicked.png new file mode 100644 index 0000000..807f785 Binary files /dev/null and b/ShiftOS.Main/Resources/SendClicked.png differ diff --git a/ShiftOS.Main/Resources/ShiftOS License.txt b/ShiftOS.Main/Resources/ShiftOS License.txt new file mode 100644 index 0000000..2ee227c --- /dev/null +++ b/ShiftOS.Main/Resources/ShiftOS License.txt @@ -0,0 +1,201 @@ +Apache License + Version 2.0, January 2004 + http://www.apache.org/licenses/ + + TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION + + 1. Definitions. + + "License" shall mean the terms and conditions for use, reproduction, + and distribution as defined by Sections 1 through 9 of this document. + + "Licensor" shall mean the copyright owner or entity authorized by + the copyright owner that is granting the License. + + "Legal Entity" shall mean the union of the acting entity and all + other entities that control, are controlled by, or are under common + control with that entity. For the purposes of this definition, + "control" means (i) the power, direct or indirect, to cause the + direction or management of such entity, whether by contract or + otherwise, or (ii) ownership of fifty percent (50%) or more of the + outstanding shares, or (iii) beneficial ownership of such entity. + + "You" (or "Your") shall mean an individual or Legal Entity + exercising permissions granted by this License. + + "Source" form shall mean the preferred form for making modifications, + including but not limited to software source code, documentation + source, and configuration files. + + "Object" form shall mean any form resulting from mechanical + transformation or translation of a Source form, including but + not limited to compiled object code, generated documentation, + and conversions to other media types. + + "Work" shall mean the work of authorship, whether in Source or + Object form, made available under the License, as indicated by a + copyright notice that is included in or attached to the work + (an example is provided in the Appendix below). + + "Derivative Works" shall mean any work, whether in Source or Object + form, that is based on (or derived from) the Work and for which the + editorial revisions, annotations, elaborations, or other modifications + represent, as a whole, an original work of authorship. For the purposes + of this License, Derivative Works shall not include works that remain + separable from, or merely link (or bind by name) to the interfaces of, + the Work and Derivative Works thereof. + + "Contribution" shall mean any work of authorship, including + the original version of the Work and any modifications or additions + to that Work or Derivative Works thereof, that is intentionally + submitted to Licensor for inclusion in the Work by the copyright owner + or by an individual or Legal Entity authorized to submit on behalf of + the copyright owner. For the purposes of this definition, "submitted" + means any form of electronic, verbal, or written communication sent + to the Licensor or its representatives, including but not limited to + communication on electronic mailing lists, source code control systems, + and issue tracking systems that are managed by, or on behalf of, the + Licensor for the purpose of discussing and improving the Work, but + excluding communication that is conspicuously marked or otherwise + designated in writing by the copyright owner as "Not a Contribution." + + "Contributor" shall mean Licensor and any individual or Legal Entity + on behalf of whom a Contribution has been received by Licensor and + subsequently incorporated within the Work. + + 2. Grant of Copyright License. Subject to the terms and conditions of + this License, each Contributor hereby grants to You a perpetual, + worldwide, non-exclusive, no-charge, royalty-free, irrevocable + copyright license to reproduce, prepare Derivative Works of, + publicly display, publicly perform, sublicense, and distribute the + Work and such Derivative Works in Source or Object form. + + 3. Grant of Patent License. Subject to the terms and conditions of + this License, each Contributor hereby grants to You a perpetual, + worldwide, non-exclusive, no-charge, royalty-free, irrevocable + (except as stated in this section) patent license to make, have made, + use, offer to sell, sell, import, and otherwise transfer the Work, + where such license applies only to those patent claims licensable + by such Contributor that are necessarily infringed by their + Contribution(s) alone or by combination of their Contribution(s) + with the Work to which such Contribution(s) was submitted. If You + institute patent litigation against any entity (including a + cross-claim or counterclaim in a lawsuit) alleging that the Work + or a Contribution incorporated within the Work constitutes direct + or contributory patent infringement, then any patent licenses + granted to You under this License for that Work shall terminate + as of the date such litigation is filed. + + 4. Redistribution. You may reproduce and distribute copies of the + Work or Derivative Works thereof in any medium, with or without + modifications, and in Source or Object form, provided that You + meet the following conditions: + + (a) You must give any other recipients of the Work or + Derivative Works a copy of this License; and + + (b) You must cause any modified files to carry prominent notices + stating that You changed the files; and + + (c) You must retain, in the Source form of any Derivative Works + that You distribute, all copyright, patent, trademark, and + attribution notices from the Source form of the Work, + excluding those notices that do not pertain to any part of + the Derivative Works; and + + (d) If the Work includes a "NOTICE" text file as part of its + distribution, then any Derivative Works that You distribute must + include a readable copy of the attribution notices contained + within such NOTICE file, excluding those notices that do not + pertain to any part of the Derivative Works, in at least one + of the following places: within a NOTICE text file distributed + as part of the Derivative Works; within the Source form or + documentation, if provided along with the Derivative Works; or, + within a display generated by the Derivative Works, if and + wherever such third-party notices normally appear. The contents + of the NOTICE file are for informational purposes only and + do not modify the License. You may add Your own attribution + notices within Derivative Works that You distribute, alongside + or as an addendum to the NOTICE text from the Work, provided + that such additional attribution notices cannot be construed + as modifying the License. + + You may add Your own copyright statement to Your modifications and + may provide additional or different license terms and conditions + for use, reproduction, or distribution of Your modifications, or + for any such Derivative Works as a whole, provided Your use, + reproduction, and distribution of the Work otherwise complies with + the conditions stated in this License. + + 5. Submission of Contributions. Unless You explicitly state otherwise, + any Contribution intentionally submitted for inclusion in the Work + by You to the Licensor shall be under the terms and conditions of + this License, without any additional terms or conditions. + Notwithstanding the above, nothing herein shall supersede or modify + the terms of any separate license agreement you may have executed + with Licensor regarding such Contributions. + + 6. Trademarks. This License does not grant permission to use the trade + names, trademarks, service marks, or product names of the Licensor, + except as required for reasonable and customary use in describing the + origin of the Work and reproducing the content of the NOTICE file. + + 7. Disclaimer of Warranty. Unless required by applicable law or + agreed to in writing, Licensor provides the Work (and each + Contributor provides its Contributions) on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or + implied, including, without limitation, any warranties or conditions + of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A + PARTICULAR PURPOSE. You are solely responsible for determining the + appropriateness of using or redistributing the Work and assume any + risks associated with Your exercise of permissions under this License. + + 8. Limitation of Liability. In no event and under no legal theory, + whether in tort (including negligence), contract, or otherwise, + unless required by applicable law (such as deliberate and grossly + negligent acts) or agreed to in writing, shall any Contributor be + liable to You for damages, including any direct, indirect, special, + incidental, or consequential damages of any character arising as a + result of this License or out of the use or inability to use the + Work (including but not limited to damages for loss of goodwill, + work stoppage, computer failure or malfunction, or any and all + other commercial damages or losses), even if such Contributor + has been advised of the possibility of such damages. + + 9. Accepting Warranty or Additional Liability. While redistributing + the Work or Derivative Works thereof, You may choose to offer, + and charge a fee for, acceptance of support, warranty, indemnity, + or other liability obligations and/or rights consistent with this + License. However, in accepting such obligations, You may act only + on Your own behalf and on Your sole responsibility, not on behalf + of any other Contributor, and only if You agree to indemnify, + defend, and hold each Contributor harmless for any liability + incurred by, or claims asserted against, such Contributor by reason + of your accepting any such warranty or additional liability. + + END OF TERMS AND CONDITIONS + + APPENDIX: How to apply the Apache License to your work. + + To apply the Apache License to your work, attach the following + boilerplate notice, with the fields enclosed by brackets "{}" + replaced with your own identifying information. (Don't include + the brackets!) The text should be enclosed in the appropriate + comment syntax for the file format. We also recommend that a + file or class name and description of purpose be included on the + same "printed page" as the copyright notice for easier + identification within third-party archives. + + Copyright 2015 ShiftOS + + Licensed under the Apache License, Version 2.0 (the "License"); + you may not use this file except in compliance with the License. + You may obtain a copy of the License at + + http://www.apache.org/licenses/LICENSE-2.0 + + Unless required by applicable law or agreed to in writing, software + distributed under the License is distributed on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + See the License for the specific language governing permissions and + limitations under the License. diff --git a/ShiftOS.Main/Resources/Symbolinfo.png b/ShiftOS.Main/Resources/Symbolinfo.png new file mode 100644 index 0000000..659d9b3 Binary files /dev/null and b/ShiftOS.Main/Resources/Symbolinfo.png differ diff --git a/ShiftOS.Main/Resources/TotalBalanceClicked.png b/ShiftOS.Main/Resources/TotalBalanceClicked.png new file mode 100644 index 0000000..18ef996 Binary files /dev/null and b/ShiftOS.Main/Resources/TotalBalanceClicked.png differ diff --git a/ShiftOS.Main/Resources/TotalBalanceUnclicked.png b/ShiftOS.Main/Resources/TotalBalanceUnclicked.png new file mode 100644 index 0000000..0968413 Binary files /dev/null and b/ShiftOS.Main/Resources/TotalBalanceUnclicked.png differ diff --git a/ShiftOS.Main/Resources/anycolourshade.png b/ShiftOS.Main/Resources/anycolourshade.png new file mode 100644 index 0000000..70d12b7 Binary files /dev/null and b/ShiftOS.Main/Resources/anycolourshade.png differ diff --git a/ShiftOS.Main/Resources/anycolourshade2.png b/ShiftOS.Main/Resources/anycolourshade2.png new file mode 100644 index 0000000..9494e3a Binary files /dev/null and b/ShiftOS.Main/Resources/anycolourshade2.png differ diff --git a/ShiftOS.Main/Resources/anycolourshade3.png b/ShiftOS.Main/Resources/anycolourshade3.png new file mode 100644 index 0000000..a71abb0 Binary files /dev/null and b/ShiftOS.Main/Resources/anycolourshade3.png differ diff --git a/ShiftOS.Main/Resources/anycolourshade4.png b/ShiftOS.Main/Resources/anycolourshade4.png new file mode 100644 index 0000000..b33644b Binary files /dev/null and b/ShiftOS.Main/Resources/anycolourshade4.png differ diff --git a/ShiftOS.Main/Resources/appscapeaudioplayerbox.png b/ShiftOS.Main/Resources/appscapeaudioplayerbox.png new file mode 100644 index 0000000..1dd4096 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeaudioplayerbox.png differ diff --git a/ShiftOS.Main/Resources/appscapeaudioplayerprice.png b/ShiftOS.Main/Resources/appscapeaudioplayerprice.png new file mode 100644 index 0000000..5700c24 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeaudioplayerprice.png differ diff --git a/ShiftOS.Main/Resources/appscapeaudioplayerpricepressed.png b/ShiftOS.Main/Resources/appscapeaudioplayerpricepressed.png new file mode 100644 index 0000000..d79c687 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeaudioplayerpricepressed.png differ diff --git a/ShiftOS.Main/Resources/appscapecalculator.png b/ShiftOS.Main/Resources/appscapecalculator.png new file mode 100644 index 0000000..c08f92d Binary files /dev/null and b/ShiftOS.Main/Resources/appscapecalculator.png differ diff --git a/ShiftOS.Main/Resources/appscapecalculatorprice.png b/ShiftOS.Main/Resources/appscapecalculatorprice.png new file mode 100644 index 0000000..36402e4 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapecalculatorprice.png differ diff --git a/ShiftOS.Main/Resources/appscapecalculatorpricepressed.png b/ShiftOS.Main/Resources/appscapecalculatorpricepressed.png new file mode 100644 index 0000000..fc815b8 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapecalculatorpricepressed.png differ diff --git a/ShiftOS.Main/Resources/appscapedepositbitnotewalletscreenshot.png b/ShiftOS.Main/Resources/appscapedepositbitnotewalletscreenshot.png new file mode 100644 index 0000000..6a47f38 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapedepositbitnotewalletscreenshot.png differ diff --git a/ShiftOS.Main/Resources/appscapedepositinfo.png b/ShiftOS.Main/Resources/appscapedepositinfo.png new file mode 100644 index 0000000..8d5c7ca Binary files /dev/null and b/ShiftOS.Main/Resources/appscapedepositinfo.png differ diff --git a/ShiftOS.Main/Resources/appscapedepositnowbutton.png b/ShiftOS.Main/Resources/appscapedepositnowbutton.png new file mode 100644 index 0000000..fc99814 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapedepositnowbutton.png differ diff --git a/ShiftOS.Main/Resources/appscapedownloadbutton.png b/ShiftOS.Main/Resources/appscapedownloadbutton.png new file mode 100644 index 0000000..1ffaf7f Binary files /dev/null and b/ShiftOS.Main/Resources/appscapedownloadbutton.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfoaudioplayertext.png b/ShiftOS.Main/Resources/appscapeinfoaudioplayertext.png new file mode 100644 index 0000000..4143b03 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfoaudioplayertext.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfoaudioplayervisualpreview.png b/ShiftOS.Main/Resources/appscapeinfoaudioplayervisualpreview.png new file mode 100644 index 0000000..b3bbbed Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfoaudioplayervisualpreview.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfobackbutton.png b/ShiftOS.Main/Resources/appscapeinfobackbutton.png new file mode 100644 index 0000000..6025099 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfobackbutton.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfobutton.png b/ShiftOS.Main/Resources/appscapeinfobutton.png new file mode 100644 index 0000000..41d9331 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfobutton.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfobuttonpressed.png b/ShiftOS.Main/Resources/appscapeinfobuttonpressed.png new file mode 100644 index 0000000..148958c Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfobuttonpressed.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfobuybutton.png b/ShiftOS.Main/Resources/appscapeinfobuybutton.png new file mode 100644 index 0000000..cbbe4d3 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfobuybutton.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfocalculatortext.png b/ShiftOS.Main/Resources/appscapeinfocalculatortext.png new file mode 100644 index 0000000..7833187 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfocalculatortext.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfocalculatorvisualpreview.png b/ShiftOS.Main/Resources/appscapeinfocalculatorvisualpreview.png new file mode 100644 index 0000000..00ad970 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfocalculatorvisualpreview.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfoorcwritetext.png b/ShiftOS.Main/Resources/appscapeinfoorcwritetext.png new file mode 100644 index 0000000..fe02672 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfoorcwritetext.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfoorcwritevisualpreview.png b/ShiftOS.Main/Resources/appscapeinfoorcwritevisualpreview.png new file mode 100644 index 0000000..5e7fe03 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfoorcwritevisualpreview.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfovideoplayertext.png b/ShiftOS.Main/Resources/appscapeinfovideoplayertext.png new file mode 100644 index 0000000..b73d5c9 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfovideoplayertext.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfovideoplayervisualpreview.png b/ShiftOS.Main/Resources/appscapeinfovideoplayervisualpreview.png new file mode 100644 index 0000000..f22d6cc Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfovideoplayervisualpreview.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfowebbrowsertext.png b/ShiftOS.Main/Resources/appscapeinfowebbrowsertext.png new file mode 100644 index 0000000..27155d4 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfowebbrowsertext.png differ diff --git a/ShiftOS.Main/Resources/appscapeinfowebbrowservisualpreview.png b/ShiftOS.Main/Resources/appscapeinfowebbrowservisualpreview.png new file mode 100644 index 0000000..008e11e Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeinfowebbrowservisualpreview.png differ diff --git a/ShiftOS.Main/Resources/appscapemoresoftware.png b/ShiftOS.Main/Resources/appscapemoresoftware.png new file mode 100644 index 0000000..915ef8c Binary files /dev/null and b/ShiftOS.Main/Resources/appscapemoresoftware.png differ diff --git a/ShiftOS.Main/Resources/appscapeorcwrite.png b/ShiftOS.Main/Resources/appscapeorcwrite.png new file mode 100644 index 0000000..0145ef7 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeorcwrite.png differ diff --git a/ShiftOS.Main/Resources/appscapetitlebanner.png b/ShiftOS.Main/Resources/appscapetitlebanner.png new file mode 100644 index 0000000..4ca5d5f Binary files /dev/null and b/ShiftOS.Main/Resources/appscapetitlebanner.png differ diff --git a/ShiftOS.Main/Resources/appscapeundefinedprice.png b/ShiftOS.Main/Resources/appscapeundefinedprice.png new file mode 100644 index 0000000..80573ef Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeundefinedprice.png differ diff --git a/ShiftOS.Main/Resources/appscapeundefinedpricepressed.png b/ShiftOS.Main/Resources/appscapeundefinedpricepressed.png new file mode 100644 index 0000000..deea443 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapeundefinedpricepressed.png differ diff --git a/ShiftOS.Main/Resources/appscapevideoplayer.png b/ShiftOS.Main/Resources/appscapevideoplayer.png new file mode 100644 index 0000000..4b07adc Binary files /dev/null and b/ShiftOS.Main/Resources/appscapevideoplayer.png differ diff --git a/ShiftOS.Main/Resources/appscapevideoplayerprice.png b/ShiftOS.Main/Resources/appscapevideoplayerprice.png new file mode 100644 index 0000000..ef9b139 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapevideoplayerprice.png differ diff --git a/ShiftOS.Main/Resources/appscapevideoplayerpricepressed.png b/ShiftOS.Main/Resources/appscapevideoplayerpricepressed.png new file mode 100644 index 0000000..4849f54 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapevideoplayerpricepressed.png differ diff --git a/ShiftOS.Main/Resources/appscapewebbrowser.png b/ShiftOS.Main/Resources/appscapewebbrowser.png new file mode 100644 index 0000000..b469924 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapewebbrowser.png differ diff --git a/ShiftOS.Main/Resources/appscapewebbrowserprice.png b/ShiftOS.Main/Resources/appscapewebbrowserprice.png new file mode 100644 index 0000000..a3cb24c Binary files /dev/null and b/ShiftOS.Main/Resources/appscapewebbrowserprice.png differ diff --git a/ShiftOS.Main/Resources/appscapewebbrowserpricepressed.png b/ShiftOS.Main/Resources/appscapewebbrowserpricepressed.png new file mode 100644 index 0000000..36ecfb1 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapewebbrowserpricepressed.png differ diff --git a/ShiftOS.Main/Resources/appscapewelcometoappscape.png b/ShiftOS.Main/Resources/appscapewelcometoappscape.png new file mode 100644 index 0000000..92e17c9 Binary files /dev/null and b/ShiftOS.Main/Resources/appscapewelcometoappscape.png differ diff --git a/ShiftOS.Main/Resources/bitnotediggergradetable.png b/ShiftOS.Main/Resources/bitnotediggergradetable.png new file mode 100644 index 0000000..54cbe21 Binary files /dev/null and b/ShiftOS.Main/Resources/bitnotediggergradetable.png differ diff --git a/ShiftOS.Main/Resources/bitnoteswebsidepnl.png b/ShiftOS.Main/Resources/bitnoteswebsidepnl.png new file mode 100644 index 0000000..2d6e17f Binary files /dev/null and b/ShiftOS.Main/Resources/bitnoteswebsidepnl.png differ diff --git a/ShiftOS.Main/Resources/bitnotewalletdownload.png b/ShiftOS.Main/Resources/bitnotewalletdownload.png new file mode 100644 index 0000000..71a1f2b Binary files /dev/null and b/ShiftOS.Main/Resources/bitnotewalletdownload.png differ diff --git a/ShiftOS.Main/Resources/bitnotewalletpreviewscreenshot.png b/ShiftOS.Main/Resources/bitnotewalletpreviewscreenshot.png new file mode 100644 index 0000000..bd8c483 Binary files /dev/null and b/ShiftOS.Main/Resources/bitnotewalletpreviewscreenshot.png differ diff --git a/ShiftOS.Main/Resources/bitnotewebsitetitle.png b/ShiftOS.Main/Resources/bitnotewebsitetitle.png new file mode 100644 index 0000000..7703382 Binary files /dev/null and b/ShiftOS.Main/Resources/bitnotewebsitetitle.png differ diff --git a/ShiftOS.Main/Resources/centrebutton.png b/ShiftOS.Main/Resources/centrebutton.png new file mode 100644 index 0000000..0578039 Binary files /dev/null and b/ShiftOS.Main/Resources/centrebutton.png differ diff --git a/ShiftOS.Main/Resources/centrebuttonpressed.png b/ShiftOS.Main/Resources/centrebuttonpressed.png new file mode 100644 index 0000000..52c2725 Binary files /dev/null and b/ShiftOS.Main/Resources/centrebuttonpressed.png differ diff --git a/ShiftOS.Main/Resources/christmaseasteregg.png b/ShiftOS.Main/Resources/christmaseasteregg.png new file mode 100644 index 0000000..b15feea Binary files /dev/null and b/ShiftOS.Main/Resources/christmaseasteregg.png differ diff --git a/ShiftOS.Main/Resources/crash-cheat.png b/ShiftOS.Main/Resources/crash-cheat.png new file mode 100644 index 0000000..5bc6e63 Binary files /dev/null and b/ShiftOS.Main/Resources/crash-cheat.png differ diff --git a/ShiftOS.Main/Resources/crash-force.png b/ShiftOS.Main/Resources/crash-force.png new file mode 100644 index 0000000..79c135d Binary files /dev/null and b/ShiftOS.Main/Resources/crash-force.png differ diff --git a/ShiftOS.Main/Resources/crash.png b/ShiftOS.Main/Resources/crash.png new file mode 100644 index 0000000..a90aa4a Binary files /dev/null and b/ShiftOS.Main/Resources/crash.png differ diff --git a/ShiftOS.Main/Resources/crash_ofm.png b/ShiftOS.Main/Resources/crash_ofm.png new file mode 100644 index 0000000..04f599a Binary files /dev/null and b/ShiftOS.Main/Resources/crash_ofm.png differ diff --git a/ShiftOS.Main/Resources/deletefile.png b/ShiftOS.Main/Resources/deletefile.png new file mode 100644 index 0000000..89bcc65 Binary files /dev/null and b/ShiftOS.Main/Resources/deletefile.png differ diff --git a/ShiftOS.Main/Resources/deletefolder.png b/ShiftOS.Main/Resources/deletefolder.png new file mode 100644 index 0000000..afcf19f Binary files /dev/null and b/ShiftOS.Main/Resources/deletefolder.png differ diff --git a/ShiftOS.Main/Resources/dial-up-modem-02.wav b/ShiftOS.Main/Resources/dial-up-modem-02.wav new file mode 100644 index 0000000..f6bb696 Binary files /dev/null and b/ShiftOS.Main/Resources/dial-up-modem-02.wav differ diff --git a/ShiftOS.Main/Resources/dodge.png b/ShiftOS.Main/Resources/dodge.png new file mode 100644 index 0000000..d741ad6 Binary files /dev/null and b/ShiftOS.Main/Resources/dodge.png differ diff --git a/ShiftOS.Main/Resources/downarrow.png b/ShiftOS.Main/Resources/downarrow.png new file mode 100644 index 0000000..15d3663 Binary files /dev/null and b/ShiftOS.Main/Resources/downarrow.png differ diff --git a/ShiftOS.Main/Resources/downloadmanagericon.png b/ShiftOS.Main/Resources/downloadmanagericon.png new file mode 100644 index 0000000..c4cc648 Binary files /dev/null and b/ShiftOS.Main/Resources/downloadmanagericon.png differ diff --git a/ShiftOS.Main/Resources/fileiconsaa.png b/ShiftOS.Main/Resources/fileiconsaa.png new file mode 100644 index 0000000..291770a Binary files /dev/null and b/ShiftOS.Main/Resources/fileiconsaa.png differ diff --git a/ShiftOS.Main/Resources/fileskimmericon.fw.png b/ShiftOS.Main/Resources/fileskimmericon.fw.png new file mode 100644 index 0000000..cb4262b Binary files /dev/null and b/ShiftOS.Main/Resources/fileskimmericon.fw.png differ diff --git a/ShiftOS.Main/Resources/floodgateicn.png b/ShiftOS.Main/Resources/floodgateicn.png new file mode 100644 index 0000000..c243c8c Binary files /dev/null and b/ShiftOS.Main/Resources/floodgateicn.png differ diff --git a/ShiftOS.Main/Resources/iconArtpad.png b/ShiftOS.Main/Resources/iconArtpad.png new file mode 100644 index 0000000..103eef8 Binary files /dev/null and b/ShiftOS.Main/Resources/iconArtpad.png differ diff --git a/ShiftOS.Main/Resources/iconAudioPlayer.png b/ShiftOS.Main/Resources/iconAudioPlayer.png new file mode 100644 index 0000000..a445af4 Binary files /dev/null and b/ShiftOS.Main/Resources/iconAudioPlayer.png differ diff --git a/ShiftOS.Main/Resources/iconBitnoteDigger.png b/ShiftOS.Main/Resources/iconBitnoteDigger.png new file mode 100644 index 0000000..42cbae3 Binary files /dev/null and b/ShiftOS.Main/Resources/iconBitnoteDigger.png differ diff --git a/ShiftOS.Main/Resources/iconBitnoteWallet.png b/ShiftOS.Main/Resources/iconBitnoteWallet.png new file mode 100644 index 0000000..1f06a17 Binary files /dev/null and b/ShiftOS.Main/Resources/iconBitnoteWallet.png differ diff --git a/ShiftOS.Main/Resources/iconCalculator.png b/ShiftOS.Main/Resources/iconCalculator.png new file mode 100644 index 0000000..4a15583 Binary files /dev/null and b/ShiftOS.Main/Resources/iconCalculator.png differ diff --git a/ShiftOS.Main/Resources/iconClock.png b/ShiftOS.Main/Resources/iconClock.png new file mode 100644 index 0000000..2bcd19a Binary files /dev/null and b/ShiftOS.Main/Resources/iconClock.png differ diff --git a/ShiftOS.Main/Resources/iconColourPicker.fw.png b/ShiftOS.Main/Resources/iconColourPicker.fw.png new file mode 100644 index 0000000..ece25ab Binary files /dev/null and b/ShiftOS.Main/Resources/iconColourPicker.fw.png differ diff --git a/ShiftOS.Main/Resources/iconDodge.png b/ShiftOS.Main/Resources/iconDodge.png new file mode 100644 index 0000000..9a23b57 Binary files /dev/null and b/ShiftOS.Main/Resources/iconDodge.png differ diff --git a/ShiftOS.Main/Resources/iconDownloader.png b/ShiftOS.Main/Resources/iconDownloader.png new file mode 100644 index 0000000..9a3ef2b Binary files /dev/null and b/ShiftOS.Main/Resources/iconDownloader.png differ diff --git a/ShiftOS.Main/Resources/iconFileOpener.fw.png b/ShiftOS.Main/Resources/iconFileOpener.fw.png new file mode 100644 index 0000000..578d499 Binary files /dev/null and b/ShiftOS.Main/Resources/iconFileOpener.fw.png differ diff --git a/ShiftOS.Main/Resources/iconFileSaver.fw.png b/ShiftOS.Main/Resources/iconFileSaver.fw.png new file mode 100644 index 0000000..351b5d4 Binary files /dev/null and b/ShiftOS.Main/Resources/iconFileSaver.fw.png differ diff --git a/ShiftOS.Main/Resources/iconFileSkimmer.png b/ShiftOS.Main/Resources/iconFileSkimmer.png new file mode 100644 index 0000000..cb4262b Binary files /dev/null and b/ShiftOS.Main/Resources/iconFileSkimmer.png differ diff --git a/ShiftOS.Main/Resources/iconIconManager.png b/ShiftOS.Main/Resources/iconIconManager.png new file mode 100644 index 0000000..99246e9 Binary files /dev/null and b/ShiftOS.Main/Resources/iconIconManager.png differ diff --git a/ShiftOS.Main/Resources/iconInfoBox.fw.png b/ShiftOS.Main/Resources/iconInfoBox.fw.png new file mode 100644 index 0000000..0c9ebbd Binary files /dev/null and b/ShiftOS.Main/Resources/iconInfoBox.fw.png differ diff --git a/ShiftOS.Main/Resources/iconKnowledgeInput.png b/ShiftOS.Main/Resources/iconKnowledgeInput.png new file mode 100644 index 0000000..b5e513f Binary files /dev/null and b/ShiftOS.Main/Resources/iconKnowledgeInput.png differ diff --git a/ShiftOS.Main/Resources/iconNameChanger.png b/ShiftOS.Main/Resources/iconNameChanger.png new file mode 100644 index 0000000..7d94b21 Binary files /dev/null and b/ShiftOS.Main/Resources/iconNameChanger.png differ diff --git a/ShiftOS.Main/Resources/iconPong.png b/ShiftOS.Main/Resources/iconPong.png new file mode 100644 index 0000000..c96cd58 Binary files /dev/null and b/ShiftOS.Main/Resources/iconPong.png differ diff --git a/ShiftOS.Main/Resources/iconShifter.png b/ShiftOS.Main/Resources/iconShifter.png new file mode 100644 index 0000000..07344bf Binary files /dev/null and b/ShiftOS.Main/Resources/iconShifter.png differ diff --git a/ShiftOS.Main/Resources/iconShiftnet.png b/ShiftOS.Main/Resources/iconShiftnet.png new file mode 100644 index 0000000..405662d Binary files /dev/null and b/ShiftOS.Main/Resources/iconShiftnet.png differ diff --git a/ShiftOS.Main/Resources/iconShiftorium.png b/ShiftOS.Main/Resources/iconShiftorium.png new file mode 100644 index 0000000..a72239e Binary files /dev/null and b/ShiftOS.Main/Resources/iconShiftorium.png differ diff --git a/ShiftOS.Main/Resources/iconSkinLoader.png b/ShiftOS.Main/Resources/iconSkinLoader.png new file mode 100644 index 0000000..1df8f53 Binary files /dev/null and b/ShiftOS.Main/Resources/iconSkinLoader.png differ diff --git a/ShiftOS.Main/Resources/iconSkinShifter.png b/ShiftOS.Main/Resources/iconSkinShifter.png new file mode 100644 index 0000000..cccc0d1 Binary files /dev/null and b/ShiftOS.Main/Resources/iconSkinShifter.png differ diff --git a/ShiftOS.Main/Resources/iconSnakey.png b/ShiftOS.Main/Resources/iconSnakey.png new file mode 100644 index 0000000..469367c Binary files /dev/null and b/ShiftOS.Main/Resources/iconSnakey.png differ diff --git a/ShiftOS.Main/Resources/iconSysinfo.png b/ShiftOS.Main/Resources/iconSysinfo.png new file mode 100644 index 0000000..0d1146b Binary files /dev/null and b/ShiftOS.Main/Resources/iconSysinfo.png differ diff --git a/ShiftOS.Main/Resources/iconTerminal.png b/ShiftOS.Main/Resources/iconTerminal.png new file mode 100644 index 0000000..df5e779 Binary files /dev/null and b/ShiftOS.Main/Resources/iconTerminal.png differ diff --git a/ShiftOS.Main/Resources/iconTextPad.png b/ShiftOS.Main/Resources/iconTextPad.png new file mode 100644 index 0000000..0d536ce Binary files /dev/null and b/ShiftOS.Main/Resources/iconTextPad.png differ diff --git a/ShiftOS.Main/Resources/iconVideoPlayer.png b/ShiftOS.Main/Resources/iconVideoPlayer.png new file mode 100644 index 0000000..17a9043 Binary files /dev/null and b/ShiftOS.Main/Resources/iconVideoPlayer.png differ diff --git a/ShiftOS.Main/Resources/iconWebBrowser.png b/ShiftOS.Main/Resources/iconWebBrowser.png new file mode 100644 index 0000000..e22117f Binary files /dev/null and b/ShiftOS.Main/Resources/iconWebBrowser.png differ diff --git a/ShiftOS.Main/Resources/iconfloodgate.png b/ShiftOS.Main/Resources/iconfloodgate.png new file mode 100644 index 0000000..2a7c483 Binary files /dev/null and b/ShiftOS.Main/Resources/iconfloodgate.png differ diff --git a/ShiftOS.Main/Resources/icongraphicpicker.png b/ShiftOS.Main/Resources/icongraphicpicker.png new file mode 100644 index 0000000..59ded9f Binary files /dev/null and b/ShiftOS.Main/Resources/icongraphicpicker.png differ diff --git a/ShiftOS.Main/Resources/iconmaze.png b/ShiftOS.Main/Resources/iconmaze.png new file mode 100644 index 0000000..18c3c3f Binary files /dev/null and b/ShiftOS.Main/Resources/iconmaze.png differ diff --git a/ShiftOS.Main/Resources/iconorcwrite.png b/ShiftOS.Main/Resources/iconorcwrite.png new file mode 100644 index 0000000..e1c2862 Binary files /dev/null and b/ShiftOS.Main/Resources/iconorcwrite.png differ diff --git a/ShiftOS.Main/Resources/iconshutdown.png b/ShiftOS.Main/Resources/iconshutdown.png new file mode 100644 index 0000000..d4959c2 Binary files /dev/null and b/ShiftOS.Main/Resources/iconshutdown.png differ diff --git a/ShiftOS.Main/Resources/iconunitytoggle.png b/ShiftOS.Main/Resources/iconunitytoggle.png new file mode 100644 index 0000000..450b092 Binary files /dev/null and b/ShiftOS.Main/Resources/iconunitytoggle.png differ diff --git a/ShiftOS.Main/Resources/iconvirusscanner.png b/ShiftOS.Main/Resources/iconvirusscanner.png new file mode 100644 index 0000000..5fcb50c Binary files /dev/null and b/ShiftOS.Main/Resources/iconvirusscanner.png differ diff --git a/ShiftOS.Main/Resources/infobox.wav b/ShiftOS.Main/Resources/infobox.wav new file mode 100644 index 0000000..3c6f3f2 Binary files /dev/null and b/ShiftOS.Main/Resources/infobox.wav differ diff --git a/ShiftOS.Main/Resources/installericon.png b/ShiftOS.Main/Resources/installericon.png new file mode 100644 index 0000000..9b567b7 Binary files /dev/null and b/ShiftOS.Main/Resources/installericon.png differ diff --git a/ShiftOS.Main/Resources/loadbutton.png b/ShiftOS.Main/Resources/loadbutton.png new file mode 100644 index 0000000..54ede1c Binary files /dev/null and b/ShiftOS.Main/Resources/loadbutton.png differ diff --git a/ShiftOS.Main/Resources/minimatchdodgepreviewimage.png b/ShiftOS.Main/Resources/minimatchdodgepreviewimage.png new file mode 100644 index 0000000..d156318 Binary files /dev/null and b/ShiftOS.Main/Resources/minimatchdodgepreviewimage.png differ diff --git a/ShiftOS.Main/Resources/minimatchlabyrinthpreview.png b/ShiftOS.Main/Resources/minimatchlabyrinthpreview.png new file mode 100644 index 0000000..3bc7a8b Binary files /dev/null and b/ShiftOS.Main/Resources/minimatchlabyrinthpreview.png differ diff --git a/ShiftOS.Main/Resources/newfolder.png b/ShiftOS.Main/Resources/newfolder.png new file mode 100644 index 0000000..61e3d80 Binary files /dev/null and b/ShiftOS.Main/Resources/newfolder.png differ diff --git a/ShiftOS.Main/Resources/newicon.png b/ShiftOS.Main/Resources/newicon.png new file mode 100644 index 0000000..0d6db34 Binary files /dev/null and b/ShiftOS.Main/Resources/newicon.png differ diff --git a/ShiftOS.Main/Resources/nextbutton.png b/ShiftOS.Main/Resources/nextbutton.png new file mode 100644 index 0000000..2fdb3ff Binary files /dev/null and b/ShiftOS.Main/Resources/nextbutton.png differ diff --git a/ShiftOS.Main/Resources/openicon.png b/ShiftOS.Main/Resources/openicon.png new file mode 100644 index 0000000..8239c2e Binary files /dev/null and b/ShiftOS.Main/Resources/openicon.png differ diff --git a/ShiftOS.Main/Resources/pausebutton.png b/ShiftOS.Main/Resources/pausebutton.png new file mode 100644 index 0000000..7119b30 Binary files /dev/null and b/ShiftOS.Main/Resources/pausebutton.png differ diff --git a/ShiftOS.Main/Resources/pixelsetter.png b/ShiftOS.Main/Resources/pixelsetter.png new file mode 100644 index 0000000..4dae604 Binary files /dev/null and b/ShiftOS.Main/Resources/pixelsetter.png differ diff --git a/ShiftOS.Main/Resources/playbutton.png b/ShiftOS.Main/Resources/playbutton.png new file mode 100644 index 0000000..4b701f4 Binary files /dev/null and b/ShiftOS.Main/Resources/playbutton.png differ diff --git a/ShiftOS.Main/Resources/previousbutton.png b/ShiftOS.Main/Resources/previousbutton.png new file mode 100644 index 0000000..69a1c93 Binary files /dev/null and b/ShiftOS.Main/Resources/previousbutton.png differ diff --git a/ShiftOS.Main/Resources/rolldown.wav b/ShiftOS.Main/Resources/rolldown.wav new file mode 100644 index 0000000..ede21d3 Binary files /dev/null and b/ShiftOS.Main/Resources/rolldown.wav differ diff --git a/ShiftOS.Main/Resources/rollup.wav b/ShiftOS.Main/Resources/rollup.wav new file mode 100644 index 0000000..3e44e72 Binary files /dev/null and b/ShiftOS.Main/Resources/rollup.wav differ diff --git a/ShiftOS.Main/Resources/saveicon.png b/ShiftOS.Main/Resources/saveicon.png new file mode 100644 index 0000000..6404b15 Binary files /dev/null and b/ShiftOS.Main/Resources/saveicon.png differ diff --git a/ShiftOS.Main/Resources/shiftomizericonpreview.png b/ShiftOS.Main/Resources/shiftomizericonpreview.png new file mode 100644 index 0000000..f26aa3d Binary files /dev/null and b/ShiftOS.Main/Resources/shiftomizericonpreview.png differ diff --git a/ShiftOS.Main/Resources/shiftomizerindustrialskinpreview.png b/ShiftOS.Main/Resources/shiftomizerindustrialskinpreview.png new file mode 100644 index 0000000..fb8d61e Binary files /dev/null and b/ShiftOS.Main/Resources/shiftomizerindustrialskinpreview.png differ diff --git a/ShiftOS.Main/Resources/shiftomizerlinuxmintskinpreview.png b/ShiftOS.Main/Resources/shiftomizerlinuxmintskinpreview.png new file mode 100644 index 0000000..8308328 Binary files /dev/null and b/ShiftOS.Main/Resources/shiftomizerlinuxmintskinpreview.png differ diff --git a/ShiftOS.Main/Resources/shiftomizernamechangerpreview.png b/ShiftOS.Main/Resources/shiftomizernamechangerpreview.png new file mode 100644 index 0000000..dfec30c Binary files /dev/null and b/ShiftOS.Main/Resources/shiftomizernamechangerpreview.png differ diff --git a/ShiftOS.Main/Resources/shiftomizerskinshifterscreenshot.png b/ShiftOS.Main/Resources/shiftomizerskinshifterscreenshot.png new file mode 100644 index 0000000..2474786 Binary files /dev/null and b/ShiftOS.Main/Resources/shiftomizerskinshifterscreenshot.png differ diff --git a/ShiftOS.Main/Resources/shiftomizersliderleftarrow.png b/ShiftOS.Main/Resources/shiftomizersliderleftarrow.png new file mode 100644 index 0000000..44eb41d Binary files /dev/null and b/ShiftOS.Main/Resources/shiftomizersliderleftarrow.png differ diff --git a/ShiftOS.Main/Resources/shiftomizersliderrightarrow.png b/ShiftOS.Main/Resources/shiftomizersliderrightarrow.png new file mode 100644 index 0000000..84b85f0 Binary files /dev/null and b/ShiftOS.Main/Resources/shiftomizersliderrightarrow.png differ diff --git a/ShiftOS.Main/Resources/skindownarrow.png b/ShiftOS.Main/Resources/skindownarrow.png new file mode 100644 index 0000000..2a568d0 Binary files /dev/null and b/ShiftOS.Main/Resources/skindownarrow.png differ diff --git a/ShiftOS.Main/Resources/skinfile.png b/ShiftOS.Main/Resources/skinfile.png new file mode 100644 index 0000000..11048fb Binary files /dev/null and b/ShiftOS.Main/Resources/skinfile.png differ diff --git a/ShiftOS.Main/Resources/skinuparrow.png b/ShiftOS.Main/Resources/skinuparrow.png new file mode 100644 index 0000000..753dab1 Binary files /dev/null and b/ShiftOS.Main/Resources/skinuparrow.png differ diff --git a/ShiftOS.Main/Resources/snakeyback.bmp b/ShiftOS.Main/Resources/snakeyback.bmp new file mode 100644 index 0000000..19a55e1 Binary files /dev/null and b/ShiftOS.Main/Resources/snakeyback.bmp differ diff --git a/ShiftOS.Main/Resources/stopbutton.png b/ShiftOS.Main/Resources/stopbutton.png new file mode 100644 index 0000000..b4df28d Binary files /dev/null and b/ShiftOS.Main/Resources/stopbutton.png differ diff --git a/ShiftOS.Main/Resources/stretchbutton.png b/ShiftOS.Main/Resources/stretchbutton.png new file mode 100644 index 0000000..7c1d3f3 Binary files /dev/null and b/ShiftOS.Main/Resources/stretchbutton.png differ diff --git a/ShiftOS.Main/Resources/stretchbuttonpressed.png b/ShiftOS.Main/Resources/stretchbuttonpressed.png new file mode 100644 index 0000000..63ae251 Binary files /dev/null and b/ShiftOS.Main/Resources/stretchbuttonpressed.png differ diff --git a/ShiftOS.Main/Resources/test.png b/ShiftOS.Main/Resources/test.png new file mode 100644 index 0000000..7a391e5 Binary files /dev/null and b/ShiftOS.Main/Resources/test.png differ diff --git a/ShiftOS.Main/Resources/textpad.fw.png b/ShiftOS.Main/Resources/textpad.fw.png new file mode 100644 index 0000000..0d536ce Binary files /dev/null and b/ShiftOS.Main/Resources/textpad.fw.png differ diff --git a/ShiftOS.Main/Resources/tilebutton.png b/ShiftOS.Main/Resources/tilebutton.png new file mode 100644 index 0000000..2504be2 Binary files /dev/null and b/ShiftOS.Main/Resources/tilebutton.png differ diff --git a/ShiftOS.Main/Resources/tilebuttonpressed.png b/ShiftOS.Main/Resources/tilebuttonpressed.png new file mode 100644 index 0000000..6621cb2 Binary files /dev/null and b/ShiftOS.Main/Resources/tilebuttonpressed.png differ diff --git a/ShiftOS.Main/Resources/transactionsClicked.png b/ShiftOS.Main/Resources/transactionsClicked.png new file mode 100644 index 0000000..cf78531 Binary files /dev/null and b/ShiftOS.Main/Resources/transactionsClicked.png differ diff --git a/ShiftOS.Main/Resources/transactionsUnclicked.png b/ShiftOS.Main/Resources/transactionsUnclicked.png new file mode 100644 index 0000000..0af55df Binary files /dev/null and b/ShiftOS.Main/Resources/transactionsUnclicked.png differ diff --git a/ShiftOS.Main/Resources/typesound.wav b/ShiftOS.Main/Resources/typesound.wav new file mode 100644 index 0000000..d3e381f Binary files /dev/null and b/ShiftOS.Main/Resources/typesound.wav differ diff --git a/ShiftOS.Main/Resources/uparrow.png b/ShiftOS.Main/Resources/uparrow.png new file mode 100644 index 0000000..55a1d61 Binary files /dev/null and b/ShiftOS.Main/Resources/uparrow.png differ diff --git a/ShiftOS.Main/Resources/updatecustomcolourpallets.png b/ShiftOS.Main/Resources/updatecustomcolourpallets.png new file mode 100644 index 0000000..61e7f90 Binary files /dev/null and b/ShiftOS.Main/Resources/updatecustomcolourpallets.png differ diff --git a/ShiftOS.Main/Resources/upgradealartpad.png b/ShiftOS.Main/Resources/upgradealartpad.png new file mode 100644 index 0000000..fa0e6ce Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealartpad.png differ diff --git a/ShiftOS.Main/Resources/upgradealclock.png b/ShiftOS.Main/Resources/upgradealclock.png new file mode 100644 index 0000000..af944a1 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealclock.png differ diff --git a/ShiftOS.Main/Resources/upgradealfileskimmer.png b/ShiftOS.Main/Resources/upgradealfileskimmer.png new file mode 100644 index 0000000..9cb4a99 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealfileskimmer.png differ diff --git a/ShiftOS.Main/Resources/upgradealpong.png b/ShiftOS.Main/Resources/upgradealpong.png new file mode 100644 index 0000000..0f60a2c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealpong.png differ diff --git a/ShiftOS.Main/Resources/upgradealshifter.png b/ShiftOS.Main/Resources/upgradealshifter.png new file mode 100644 index 0000000..a8a7728 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealshifter.png differ diff --git a/ShiftOS.Main/Resources/upgradealshiftorium.png b/ShiftOS.Main/Resources/upgradealshiftorium.png new file mode 100644 index 0000000..71fe105 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealshiftorium.png differ diff --git a/ShiftOS.Main/Resources/upgradealtextpad.png b/ShiftOS.Main/Resources/upgradealtextpad.png new file mode 100644 index 0000000..857139f Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealtextpad.png differ diff --git a/ShiftOS.Main/Resources/upgradealunitymode.png b/ShiftOS.Main/Resources/upgradealunitymode.png new file mode 100644 index 0000000..871fb52 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradealunitymode.png differ diff --git a/ShiftOS.Main/Resources/upgradeamandpm.png b/ShiftOS.Main/Resources/upgradeamandpm.png new file mode 100644 index 0000000..dd6b35d Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeamandpm.png differ diff --git a/ShiftOS.Main/Resources/upgradeapplaunchermenu.png b/ShiftOS.Main/Resources/upgradeapplaunchermenu.png new file mode 100644 index 0000000..ba82af9 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeapplaunchermenu.png differ diff --git a/ShiftOS.Main/Resources/upgradeapplaunchershutdown.png b/ShiftOS.Main/Resources/upgradeapplaunchershutdown.png new file mode 100644 index 0000000..ee5097b Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeapplaunchershutdown.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpad.png b/ShiftOS.Main/Resources/upgradeartpad.png new file mode 100644 index 0000000..ef66c2c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpad.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpad128colorpallets.png b/ShiftOS.Main/Resources/upgradeartpad128colorpallets.png new file mode 100644 index 0000000..6fbaf99 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpad128colorpallets.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpad16colorpallets.png b/ShiftOS.Main/Resources/upgradeartpad16colorpallets.png new file mode 100644 index 0000000..b4dfd50 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpad16colorpallets.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpad32colorpallets.png b/ShiftOS.Main/Resources/upgradeartpad32colorpallets.png new file mode 100644 index 0000000..1a1eda4 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpad32colorpallets.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpad4colorpallets.png b/ShiftOS.Main/Resources/upgradeartpad4colorpallets.png new file mode 100644 index 0000000..d18758b Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpad4colorpallets.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpad64colorpallets.png b/ShiftOS.Main/Resources/upgradeartpad64colorpallets.png new file mode 100644 index 0000000..ba665ae Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpad64colorpallets.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpad8colorpallets.png b/ShiftOS.Main/Resources/upgradeartpad8colorpallets.png new file mode 100644 index 0000000..f4bf2bd Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpad8colorpallets.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpaderaser.png b/ShiftOS.Main/Resources/upgradeartpaderaser.png new file mode 100644 index 0000000..ee6a37c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpaderaser.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadfilltool.png b/ShiftOS.Main/Resources/upgradeartpadfilltool.png new file mode 100644 index 0000000..6dcead2 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadfilltool.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadicon.png b/ShiftOS.Main/Resources/upgradeartpadicon.png new file mode 100644 index 0000000..a499621 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadicon.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadlimitlesspixels.png b/ShiftOS.Main/Resources/upgradeartpadlimitlesspixels.png new file mode 100644 index 0000000..7163005 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadlimitlesspixels.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadlinetool.png b/ShiftOS.Main/Resources/upgradeartpadlinetool.png new file mode 100644 index 0000000..869b21d Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadlinetool.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadload.png b/ShiftOS.Main/Resources/upgradeartpadload.png new file mode 100644 index 0000000..2c5f061 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadload.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadnew.png b/ShiftOS.Main/Resources/upgradeartpadnew.png new file mode 100644 index 0000000..2672079 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadnew.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadovaltool.png b/ShiftOS.Main/Resources/upgradeartpadovaltool.png new file mode 100644 index 0000000..fa12d60 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadovaltool.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpaintbrushtool.png b/ShiftOS.Main/Resources/upgradeartpadpaintbrushtool.png new file mode 100644 index 0000000..330ee32 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpaintbrushtool.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpenciltool.png b/ShiftOS.Main/Resources/upgradeartpadpenciltool.png new file mode 100644 index 0000000..d8eae9c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpenciltool.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit1024.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit1024.png new file mode 100644 index 0000000..c40557e Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit1024.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit16.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit16.png new file mode 100644 index 0000000..7867b43 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit16.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit16384.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit16384.png new file mode 100644 index 0000000..9496f09 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit16384.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit256.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit256.png new file mode 100644 index 0000000..fb3b9d8 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit256.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit4.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit4.png new file mode 100644 index 0000000..ddce437 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit4.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit4096.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit4096.png new file mode 100644 index 0000000..6ff819f Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit4096.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit64.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit64.png new file mode 100644 index 0000000..29eb05f Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit64.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit65536.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit65536.png new file mode 100644 index 0000000..5cc23d4 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit65536.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixellimit8.png b/ShiftOS.Main/Resources/upgradeartpadpixellimit8.png new file mode 100644 index 0000000..f21e03e Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixellimit8.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixelplacer.png b/ShiftOS.Main/Resources/upgradeartpadpixelplacer.png new file mode 100644 index 0000000..88f1a9a Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixelplacer.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadpixelplacermovementmode.png b/ShiftOS.Main/Resources/upgradeartpadpixelplacermovementmode.png new file mode 100644 index 0000000..39097dc Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadpixelplacermovementmode.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadrectangletool.png b/ShiftOS.Main/Resources/upgradeartpadrectangletool.png new file mode 100644 index 0000000..0647fa7 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadrectangletool.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadredo.png b/ShiftOS.Main/Resources/upgradeartpadredo.png new file mode 100644 index 0000000..c574abd Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadredo.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadsave.png b/ShiftOS.Main/Resources/upgradeartpadsave.png new file mode 100644 index 0000000..5d464a9 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadsave.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadtexttool.png b/ShiftOS.Main/Resources/upgradeartpadtexttool.png new file mode 100644 index 0000000..acf7d56 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadtexttool.png differ diff --git a/ShiftOS.Main/Resources/upgradeartpadundo.png b/ShiftOS.Main/Resources/upgradeartpadundo.png new file mode 100644 index 0000000..e60c686 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeartpadundo.png differ diff --git a/ShiftOS.Main/Resources/upgradeautoscrollterminal.png b/ShiftOS.Main/Resources/upgradeautoscrollterminal.png new file mode 100644 index 0000000..096377d Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeautoscrollterminal.png differ diff --git a/ShiftOS.Main/Resources/upgradeblue.png b/ShiftOS.Main/Resources/upgradeblue.png new file mode 100644 index 0000000..d611fd7 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeblue.png differ diff --git a/ShiftOS.Main/Resources/upgradebluecustom.png b/ShiftOS.Main/Resources/upgradebluecustom.png new file mode 100644 index 0000000..15ff419 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradebluecustom.png differ diff --git a/ShiftOS.Main/Resources/upgradeblueshades.png b/ShiftOS.Main/Resources/upgradeblueshades.png new file mode 100644 index 0000000..e24073b Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeblueshades.png differ diff --git a/ShiftOS.Main/Resources/upgradeblueshadeset.png b/ShiftOS.Main/Resources/upgradeblueshadeset.png new file mode 100644 index 0000000..d1df0a6 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeblueshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgradebrown.png b/ShiftOS.Main/Resources/upgradebrown.png new file mode 100644 index 0000000..26946f1 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradebrown.png differ diff --git a/ShiftOS.Main/Resources/upgradebrowncustom.png b/ShiftOS.Main/Resources/upgradebrowncustom.png new file mode 100644 index 0000000..689da23 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradebrowncustom.png differ diff --git a/ShiftOS.Main/Resources/upgradebrownshades.png b/ShiftOS.Main/Resources/upgradebrownshades.png new file mode 100644 index 0000000..39da965 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradebrownshades.png differ diff --git a/ShiftOS.Main/Resources/upgradebrownshadeset.png b/ShiftOS.Main/Resources/upgradebrownshadeset.png new file mode 100644 index 0000000..dcaf86b Binary files /dev/null and b/ShiftOS.Main/Resources/upgradebrownshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgradeclock.png b/ShiftOS.Main/Resources/upgradeclock.png new file mode 100644 index 0000000..c89ffeb Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeclock.png differ diff --git a/ShiftOS.Main/Resources/upgradeclockicon.png b/ShiftOS.Main/Resources/upgradeclockicon.png new file mode 100644 index 0000000..d31ab31 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeclockicon.png differ diff --git a/ShiftOS.Main/Resources/upgradeclosebutton.gif b/ShiftOS.Main/Resources/upgradeclosebutton.gif new file mode 100644 index 0000000..eb45ea6 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeclosebutton.gif differ diff --git a/ShiftOS.Main/Resources/upgradecolourpickericon.png b/ShiftOS.Main/Resources/upgradecolourpickericon.png new file mode 100644 index 0000000..a9a1e2d Binary files /dev/null and b/ShiftOS.Main/Resources/upgradecolourpickericon.png differ diff --git a/ShiftOS.Main/Resources/upgradecustomusername.png b/ShiftOS.Main/Resources/upgradecustomusername.png new file mode 100644 index 0000000..d2ee85c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradecustomusername.png differ diff --git a/ShiftOS.Main/Resources/upgradedesktoppanel.png b/ShiftOS.Main/Resources/upgradedesktoppanel.png new file mode 100644 index 0000000..db142d4 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradedesktoppanel.png differ diff --git a/ShiftOS.Main/Resources/upgradedesktoppanelclock.png b/ShiftOS.Main/Resources/upgradedesktoppanelclock.png new file mode 100644 index 0000000..1d417ce Binary files /dev/null and b/ShiftOS.Main/Resources/upgradedesktoppanelclock.png differ diff --git a/ShiftOS.Main/Resources/upgradedraggablewindows.gif b/ShiftOS.Main/Resources/upgradedraggablewindows.gif new file mode 100644 index 0000000..c91bbd1 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradedraggablewindows.gif differ diff --git a/ShiftOS.Main/Resources/upgradefileskimmer.png b/ShiftOS.Main/Resources/upgradefileskimmer.png new file mode 100644 index 0000000..8559818 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradefileskimmer.png differ diff --git a/ShiftOS.Main/Resources/upgradefileskimmerdelete.png b/ShiftOS.Main/Resources/upgradefileskimmerdelete.png new file mode 100644 index 0000000..f0ec7d6 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradefileskimmerdelete.png differ diff --git a/ShiftOS.Main/Resources/upgradefileskimmericon.png b/ShiftOS.Main/Resources/upgradefileskimmericon.png new file mode 100644 index 0000000..5c3501e Binary files /dev/null and b/ShiftOS.Main/Resources/upgradefileskimmericon.png differ diff --git a/ShiftOS.Main/Resources/upgradefileskimmernew.png b/ShiftOS.Main/Resources/upgradefileskimmernew.png new file mode 100644 index 0000000..0c519d6 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradefileskimmernew.png differ diff --git a/ShiftOS.Main/Resources/upgradegray.png b/ShiftOS.Main/Resources/upgradegray.png new file mode 100644 index 0000000..ffe4632 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegray.png differ diff --git a/ShiftOS.Main/Resources/upgradegraycustom.png b/ShiftOS.Main/Resources/upgradegraycustom.png new file mode 100644 index 0000000..adcc04c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegraycustom.png differ diff --git a/ShiftOS.Main/Resources/upgradegrayshades.png b/ShiftOS.Main/Resources/upgradegrayshades.png new file mode 100644 index 0000000..70945bc Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegrayshades.png differ diff --git a/ShiftOS.Main/Resources/upgradegrayshadeset.png b/ShiftOS.Main/Resources/upgradegrayshadeset.png new file mode 100644 index 0000000..8899401 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegrayshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgradegreen.png b/ShiftOS.Main/Resources/upgradegreen.png new file mode 100644 index 0000000..775eb4d Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegreen.png differ diff --git a/ShiftOS.Main/Resources/upgradegreencustom.png b/ShiftOS.Main/Resources/upgradegreencustom.png new file mode 100644 index 0000000..cca44c8 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegreencustom.png differ diff --git a/ShiftOS.Main/Resources/upgradegreenshades.png b/ShiftOS.Main/Resources/upgradegreenshades.png new file mode 100644 index 0000000..1e9c2ef Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegreenshades.png differ diff --git a/ShiftOS.Main/Resources/upgradegreenshadeset.png b/ShiftOS.Main/Resources/upgradegreenshadeset.png new file mode 100644 index 0000000..d52e8ee Binary files /dev/null and b/ShiftOS.Main/Resources/upgradegreenshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgradehoursssincemidnight.png b/ShiftOS.Main/Resources/upgradehoursssincemidnight.png new file mode 100644 index 0000000..506d970 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradehoursssincemidnight.png differ diff --git a/ShiftOS.Main/Resources/upgradeiconunitymode.png b/ShiftOS.Main/Resources/upgradeiconunitymode.png new file mode 100644 index 0000000..ca61f46 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeiconunitymode.png differ diff --git a/ShiftOS.Main/Resources/upgradeinfoboxicon.png b/ShiftOS.Main/Resources/upgradeinfoboxicon.png new file mode 100644 index 0000000..22db5b2 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeinfoboxicon.png differ diff --git a/ShiftOS.Main/Resources/upgradekiaddons.png b/ShiftOS.Main/Resources/upgradekiaddons.png new file mode 100644 index 0000000..c7e618b Binary files /dev/null and b/ShiftOS.Main/Resources/upgradekiaddons.png differ diff --git a/ShiftOS.Main/Resources/upgradekielements.png b/ShiftOS.Main/Resources/upgradekielements.png new file mode 100644 index 0000000..5c5b398 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradekielements.png differ diff --git a/ShiftOS.Main/Resources/upgradeknowledgeinput.png b/ShiftOS.Main/Resources/upgradeknowledgeinput.png new file mode 100644 index 0000000..74ec0d0 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeknowledgeinput.png differ diff --git a/ShiftOS.Main/Resources/upgradeknowledgeinputicon.png b/ShiftOS.Main/Resources/upgradeknowledgeinputicon.png new file mode 100644 index 0000000..d5b5b42 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeknowledgeinputicon.png differ diff --git a/ShiftOS.Main/Resources/upgrademinimizebutton.png b/ShiftOS.Main/Resources/upgrademinimizebutton.png new file mode 100644 index 0000000..4068564 Binary files /dev/null and b/ShiftOS.Main/Resources/upgrademinimizebutton.png differ diff --git a/ShiftOS.Main/Resources/upgrademinimizecommand.png b/ShiftOS.Main/Resources/upgrademinimizecommand.png new file mode 100644 index 0000000..c268e68 Binary files /dev/null and b/ShiftOS.Main/Resources/upgrademinimizecommand.png differ diff --git a/ShiftOS.Main/Resources/upgrademinuteaccuracytime.png b/ShiftOS.Main/Resources/upgrademinuteaccuracytime.png new file mode 100644 index 0000000..697a60b Binary files /dev/null and b/ShiftOS.Main/Resources/upgrademinuteaccuracytime.png differ diff --git a/ShiftOS.Main/Resources/upgrademinutesssincemidnight.png b/ShiftOS.Main/Resources/upgrademinutesssincemidnight.png new file mode 100644 index 0000000..45b7889 Binary files /dev/null and b/ShiftOS.Main/Resources/upgrademinutesssincemidnight.png differ diff --git a/ShiftOS.Main/Resources/upgrademoveablewindows.gif b/ShiftOS.Main/Resources/upgrademoveablewindows.gif new file mode 100644 index 0000000..3e657a8 Binary files /dev/null and b/ShiftOS.Main/Resources/upgrademoveablewindows.gif differ diff --git a/ShiftOS.Main/Resources/upgrademultitasking.png b/ShiftOS.Main/Resources/upgrademultitasking.png new file mode 100644 index 0000000..536c40a Binary files /dev/null and b/ShiftOS.Main/Resources/upgrademultitasking.png differ diff --git a/ShiftOS.Main/Resources/upgradeorange.png b/ShiftOS.Main/Resources/upgradeorange.png new file mode 100644 index 0000000..b45f890 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeorange.png differ diff --git a/ShiftOS.Main/Resources/upgradeorangecustom.png b/ShiftOS.Main/Resources/upgradeorangecustom.png new file mode 100644 index 0000000..84bf020 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeorangecustom.png differ diff --git a/ShiftOS.Main/Resources/upgradeorangeshades.png b/ShiftOS.Main/Resources/upgradeorangeshades.png new file mode 100644 index 0000000..bfe5683 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeorangeshades.png differ diff --git a/ShiftOS.Main/Resources/upgradeorangeshadeset.png b/ShiftOS.Main/Resources/upgradeorangeshadeset.png new file mode 100644 index 0000000..e30a466 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeorangeshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgradeosname.png b/ShiftOS.Main/Resources/upgradeosname.png new file mode 100644 index 0000000..bb0db4f Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeosname.png differ diff --git a/ShiftOS.Main/Resources/upgradepanelbuttons.png b/ShiftOS.Main/Resources/upgradepanelbuttons.png new file mode 100644 index 0000000..451058a Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepanelbuttons.png differ diff --git a/ShiftOS.Main/Resources/upgradepink.png b/ShiftOS.Main/Resources/upgradepink.png new file mode 100644 index 0000000..6312fa1 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepink.png differ diff --git a/ShiftOS.Main/Resources/upgradepinkcustom.png b/ShiftOS.Main/Resources/upgradepinkcustom.png new file mode 100644 index 0000000..60ed53a Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepinkcustom.png differ diff --git a/ShiftOS.Main/Resources/upgradepinkshades.png b/ShiftOS.Main/Resources/upgradepinkshades.png new file mode 100644 index 0000000..cf715e4 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepinkshades.png differ diff --git a/ShiftOS.Main/Resources/upgradepinkshadeset.png b/ShiftOS.Main/Resources/upgradepinkshadeset.png new file mode 100644 index 0000000..dc83681 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepinkshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgradepong.png b/ShiftOS.Main/Resources/upgradepong.png new file mode 100644 index 0000000..d17c5c7 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepong.png differ diff --git a/ShiftOS.Main/Resources/upgradepongicon.png b/ShiftOS.Main/Resources/upgradepongicon.png new file mode 100644 index 0000000..61dffe3 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepongicon.png differ diff --git a/ShiftOS.Main/Resources/upgradepurple.png b/ShiftOS.Main/Resources/upgradepurple.png new file mode 100644 index 0000000..7ac8ce5 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepurple.png differ diff --git a/ShiftOS.Main/Resources/upgradepurplecustom.png b/ShiftOS.Main/Resources/upgradepurplecustom.png new file mode 100644 index 0000000..eae2523 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepurplecustom.png differ diff --git a/ShiftOS.Main/Resources/upgradepurpleshades.png b/ShiftOS.Main/Resources/upgradepurpleshades.png new file mode 100644 index 0000000..52323a6 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepurpleshades.png differ diff --git a/ShiftOS.Main/Resources/upgradepurpleshadeset.png b/ShiftOS.Main/Resources/upgradepurpleshadeset.png new file mode 100644 index 0000000..4e0fc5e Binary files /dev/null and b/ShiftOS.Main/Resources/upgradepurpleshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgradered.png b/ShiftOS.Main/Resources/upgradered.png new file mode 100644 index 0000000..0337b5e Binary files /dev/null and b/ShiftOS.Main/Resources/upgradered.png differ diff --git a/ShiftOS.Main/Resources/upgraderedcustom.png b/ShiftOS.Main/Resources/upgraderedcustom.png new file mode 100644 index 0000000..e2e37b3 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderedcustom.png differ diff --git a/ShiftOS.Main/Resources/upgraderedshades.png b/ShiftOS.Main/Resources/upgraderedshades.png new file mode 100644 index 0000000..3f6afb3 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderedshades.png differ diff --git a/ShiftOS.Main/Resources/upgraderedshadeset.png b/ShiftOS.Main/Resources/upgraderedshadeset.png new file mode 100644 index 0000000..7ad2ffe Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderedshadeset.png differ diff --git a/ShiftOS.Main/Resources/upgraderemoveth1.png b/ShiftOS.Main/Resources/upgraderemoveth1.png new file mode 100644 index 0000000..0b63d2a Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderemoveth1.png differ diff --git a/ShiftOS.Main/Resources/upgraderemoveth2.png b/ShiftOS.Main/Resources/upgraderemoveth2.png new file mode 100644 index 0000000..c9f45e4 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderemoveth2.png differ diff --git a/ShiftOS.Main/Resources/upgraderemoveth3.png b/ShiftOS.Main/Resources/upgraderemoveth3.png new file mode 100644 index 0000000..68c6e33 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderemoveth3.png differ diff --git a/ShiftOS.Main/Resources/upgraderemoveth4.png b/ShiftOS.Main/Resources/upgraderemoveth4.png new file mode 100644 index 0000000..ecedb19 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderemoveth4.png differ diff --git a/ShiftOS.Main/Resources/upgraderesize.png b/ShiftOS.Main/Resources/upgraderesize.png new file mode 100644 index 0000000..f57d4b4 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderesize.png differ diff --git a/ShiftOS.Main/Resources/upgraderollupbutton.gif b/ShiftOS.Main/Resources/upgraderollupbutton.gif new file mode 100644 index 0000000..4157203 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderollupbutton.gif differ diff --git a/ShiftOS.Main/Resources/upgraderollupcommand.png b/ShiftOS.Main/Resources/upgraderollupcommand.png new file mode 100644 index 0000000..330adb0 Binary files /dev/null and b/ShiftOS.Main/Resources/upgraderollupcommand.png differ diff --git a/ShiftOS.Main/Resources/upgradesecondssincemidnight.png b/ShiftOS.Main/Resources/upgradesecondssincemidnight.png new file mode 100644 index 0000000..0bd8ae0 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradesecondssincemidnight.png differ diff --git a/ShiftOS.Main/Resources/upgradesgameconsoles.png b/ShiftOS.Main/Resources/upgradesgameconsoles.png new file mode 100644 index 0000000..a52fffb Binary files /dev/null and b/ShiftOS.Main/Resources/upgradesgameconsoles.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftapplauncher.png b/ShiftOS.Main/Resources/upgradeshiftapplauncher.png new file mode 100644 index 0000000..db97f08 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftapplauncher.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftborders.png b/ShiftOS.Main/Resources/upgradeshiftborders.png new file mode 100644 index 0000000..58f00b3 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftborders.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftbuttons.png b/ShiftOS.Main/Resources/upgradeshiftbuttons.png new file mode 100644 index 0000000..a678d21 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftbuttons.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftdesktop.png b/ShiftOS.Main/Resources/upgradeshiftdesktop.png new file mode 100644 index 0000000..f48296f Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftdesktop.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftdesktoppanel.png b/ShiftOS.Main/Resources/upgradeshiftdesktoppanel.png new file mode 100644 index 0000000..421bae5 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftdesktoppanel.png differ diff --git a/ShiftOS.Main/Resources/upgradeshifter.png b/ShiftOS.Main/Resources/upgradeshifter.png new file mode 100644 index 0000000..d1b507f Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshifter.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftericon.png b/ShiftOS.Main/Resources/upgradeshiftericon.png new file mode 100644 index 0000000..4c04dc1 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftericon.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftitems.png b/ShiftOS.Main/Resources/upgradeshiftitems.png new file mode 100644 index 0000000..8528d3c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftitems.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftoriumicon.png b/ShiftOS.Main/Resources/upgradeshiftoriumicon.png new file mode 100644 index 0000000..61247df Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftoriumicon.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftpanelbuttons.png b/ShiftOS.Main/Resources/upgradeshiftpanelbuttons.png new file mode 100644 index 0000000..36fc82a Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftpanelbuttons.png differ diff --git a/ShiftOS.Main/Resources/upgradeshiftpanelclock.png b/ShiftOS.Main/Resources/upgradeshiftpanelclock.png new file mode 100644 index 0000000..cbe4cf8 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshiftpanelclock.png differ diff --git a/ShiftOS.Main/Resources/upgradeshifttitlebar.png b/ShiftOS.Main/Resources/upgradeshifttitlebar.png new file mode 100644 index 0000000..91c8090 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshifttitlebar.png differ diff --git a/ShiftOS.Main/Resources/upgradeshifttitletext.png b/ShiftOS.Main/Resources/upgradeshifttitletext.png new file mode 100644 index 0000000..9242d9a Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshifttitletext.png differ diff --git a/ShiftOS.Main/Resources/upgradeshutdownicon.png b/ShiftOS.Main/Resources/upgradeshutdownicon.png new file mode 100644 index 0000000..4ada5ca Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeshutdownicon.png differ diff --git a/ShiftOS.Main/Resources/upgradeskicarbrands.png b/ShiftOS.Main/Resources/upgradeskicarbrands.png new file mode 100644 index 0000000..a73d5cc Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeskicarbrands.png differ diff --git a/ShiftOS.Main/Resources/upgradeskinning.png b/ShiftOS.Main/Resources/upgradeskinning.png new file mode 100644 index 0000000..020de14 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeskinning.png differ diff --git a/ShiftOS.Main/Resources/upgradesplitsecondaccuracy.png b/ShiftOS.Main/Resources/upgradesplitsecondaccuracy.png new file mode 100644 index 0000000..eff89a5 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradesplitsecondaccuracy.png differ diff --git a/ShiftOS.Main/Resources/upgradesysinfo.png b/ShiftOS.Main/Resources/upgradesysinfo.png new file mode 100644 index 0000000..42c9c13 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradesysinfo.png differ diff --git a/ShiftOS.Main/Resources/upgradeterminalicon.png b/ShiftOS.Main/Resources/upgradeterminalicon.png new file mode 100644 index 0000000..5c65a13 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeterminalicon.png differ diff --git a/ShiftOS.Main/Resources/upgradeterminalscrollbar.png b/ShiftOS.Main/Resources/upgradeterminalscrollbar.png new file mode 100644 index 0000000..ffa3dea Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeterminalscrollbar.png differ diff --git a/ShiftOS.Main/Resources/upgradetextpad.png b/ShiftOS.Main/Resources/upgradetextpad.png new file mode 100644 index 0000000..03958e8 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetextpad.png differ diff --git a/ShiftOS.Main/Resources/upgradetextpadicon.png b/ShiftOS.Main/Resources/upgradetextpadicon.png new file mode 100644 index 0000000..f144a8b Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetextpadicon.png differ diff --git a/ShiftOS.Main/Resources/upgradetextpadnew.png b/ShiftOS.Main/Resources/upgradetextpadnew.png new file mode 100644 index 0000000..8dad0ce Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetextpadnew.png differ diff --git a/ShiftOS.Main/Resources/upgradetextpadopen.png b/ShiftOS.Main/Resources/upgradetextpadopen.png new file mode 100644 index 0000000..c29190c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetextpadopen.png differ diff --git a/ShiftOS.Main/Resources/upgradetextpadsave.png b/ShiftOS.Main/Resources/upgradetextpadsave.png new file mode 100644 index 0000000..d62d369 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetextpadsave.png differ diff --git a/ShiftOS.Main/Resources/upgradetitlebar.png b/ShiftOS.Main/Resources/upgradetitlebar.png new file mode 100644 index 0000000..722b60e Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetitlebar.png differ diff --git a/ShiftOS.Main/Resources/upgradetitletext.png b/ShiftOS.Main/Resources/upgradetitletext.png new file mode 100644 index 0000000..e29d7d3 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetitletext.png differ diff --git a/ShiftOS.Main/Resources/upgradetrm.png b/ShiftOS.Main/Resources/upgradetrm.png new file mode 100644 index 0000000..bc6f02c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradetrm.png differ diff --git a/ShiftOS.Main/Resources/upgradeunitymode.png b/ShiftOS.Main/Resources/upgradeunitymode.png new file mode 100644 index 0000000..24fa057 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeunitymode.png differ diff --git a/ShiftOS.Main/Resources/upgradeusefulpanelbuttons.png b/ShiftOS.Main/Resources/upgradeusefulpanelbuttons.png new file mode 100644 index 0000000..6308051 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeusefulpanelbuttons.png differ diff --git a/ShiftOS.Main/Resources/upgradevirusscanner.png b/ShiftOS.Main/Resources/upgradevirusscanner.png new file mode 100644 index 0000000..37e548e Binary files /dev/null and b/ShiftOS.Main/Resources/upgradevirusscanner.png differ diff --git a/ShiftOS.Main/Resources/upgradewindowborders.png b/ShiftOS.Main/Resources/upgradewindowborders.png new file mode 100644 index 0000000..fb7e876 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradewindowborders.png differ diff --git a/ShiftOS.Main/Resources/upgradewindowedterminal.png b/ShiftOS.Main/Resources/upgradewindowedterminal.png new file mode 100644 index 0000000..2f87ce0 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradewindowedterminal.png differ diff --git a/ShiftOS.Main/Resources/upgradewindowsanywhere.png b/ShiftOS.Main/Resources/upgradewindowsanywhere.png new file mode 100644 index 0000000..9fa307c Binary files /dev/null and b/ShiftOS.Main/Resources/upgradewindowsanywhere.png differ diff --git a/ShiftOS.Main/Resources/upgradeyellow.png b/ShiftOS.Main/Resources/upgradeyellow.png new file mode 100644 index 0000000..1e4e13d Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeyellow.png differ diff --git a/ShiftOS.Main/Resources/upgradeyellowcustom.png b/ShiftOS.Main/Resources/upgradeyellowcustom.png new file mode 100644 index 0000000..641b40f Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeyellowcustom.png differ diff --git a/ShiftOS.Main/Resources/upgradeyellowshades.png b/ShiftOS.Main/Resources/upgradeyellowshades.png new file mode 100644 index 0000000..9052945 Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeyellowshades.png differ diff --git a/ShiftOS.Main/Resources/upgradeyellowshadeset.png b/ShiftOS.Main/Resources/upgradeyellowshadeset.png new file mode 100644 index 0000000..05c9ada Binary files /dev/null and b/ShiftOS.Main/Resources/upgradeyellowshadeset.png differ diff --git a/ShiftOS.Main/Resources/webback.png b/ShiftOS.Main/Resources/webback.png new file mode 100644 index 0000000..6e52ffc Binary files /dev/null and b/ShiftOS.Main/Resources/webback.png differ diff --git a/ShiftOS.Main/Resources/webforward.png b/ShiftOS.Main/Resources/webforward.png new file mode 100644 index 0000000..eea3e76 Binary files /dev/null and b/ShiftOS.Main/Resources/webforward.png differ diff --git a/ShiftOS.Main/Resources/webhome.png b/ShiftOS.Main/Resources/webhome.png new file mode 100644 index 0000000..5bb886f Binary files /dev/null and b/ShiftOS.Main/Resources/webhome.png differ diff --git a/ShiftOS.Main/Resources/writesound.wav b/ShiftOS.Main/Resources/writesound.wav new file mode 100644 index 0000000..84092d0 Binary files /dev/null and b/ShiftOS.Main/Resources/writesound.wav differ diff --git a/ShiftOS.Main/Resources/zoombutton.png b/ShiftOS.Main/Resources/zoombutton.png new file mode 100644 index 0000000..32e5da9 Binary files /dev/null and b/ShiftOS.Main/Resources/zoombutton.png differ diff --git a/ShiftOS.Main/Resources/zoombuttonpressed.png b/ShiftOS.Main/Resources/zoombuttonpressed.png new file mode 100644 index 0000000..d82d2be Binary files /dev/null and b/ShiftOS.Main/Resources/zoombuttonpressed.png differ diff --git a/ShiftOS.Main/ShiftOS.Main.csproj b/ShiftOS.Main/ShiftOS.Main.csproj new file mode 100644 index 0000000..0d41313 --- /dev/null +++ b/ShiftOS.Main/ShiftOS.Main.csproj @@ -0,0 +1,1074 @@ + + + + + Debug + AnyCPU + {61A6E932-3129-4D58-AC79-F69D6E0B3054} + WinExe + ShiftOS.Main + ShiftOS.Main + v4.5 + 512 + + + AnyCPU + true + full + false + bin\Debug\ + DEBUG;TRACE + prompt + 4 + + + AnyCPU + pdbonly + true + bin\Release\ + TRACE + prompt + 4 + + + + + + + + + + + + + + + + + Form + + + NewHijack.cs + + + + + NewHijack.cs + + + ResXFileCodeGenerator + Resources.Designer.cs + Designer + + + True + Resources.resx + True + + + SettingsSingleFileGenerator + Settings.Designer.cs + + + True + Settings.settings + True + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/ShiftOS.sln b/ShiftOS.sln new file mode 100644 index 0000000..a8ac945 --- /dev/null +++ b/ShiftOS.sln @@ -0,0 +1,42 @@ + +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio 15 +VisualStudioVersion = 15.0.26730.12 +MinimumVisualStudioVersion = 10.0.40219.1 +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ShiftOS.Old", "ShiftOS\ShiftOS.Old.vbproj", "{7DCD55AB-F67D-4C43-9BFB-74ED8AD0FDCF}" +EndProject +Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution Items", "{B35F8DA7-BCB0-4558-A9BE-673F44572E21}" + ProjectSection(SolutionItems) = preProject + ShiftOS\API.vb = ShiftOS\API.vb + EndProjectSection +EndProject +Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "ShiftOS.Main", "HijackScreen\ShiftOS.Main.csproj", "{61A6E932-3129-4D58-AC79-F69D6E0B3054}" +EndProject +Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "ShiftOS.Engine", "ShiftOS.Engine\ShiftOS.Engine.csproj", "{604EB1D7-998F-4A52-90A6-67F3DC3203D2}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Release|Any CPU = Release|Any CPU + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {7DCD55AB-F67D-4C43-9BFB-74ED8AD0FDCF}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {7DCD55AB-F67D-4C43-9BFB-74ED8AD0FDCF}.Debug|Any CPU.Build.0 = Debug|Any CPU + {7DCD55AB-F67D-4C43-9BFB-74ED8AD0FDCF}.Release|Any CPU.ActiveCfg = Release|Any CPU + {7DCD55AB-F67D-4C43-9BFB-74ED8AD0FDCF}.Release|Any CPU.Build.0 = Release|Any CPU + {61A6E932-3129-4D58-AC79-F69D6E0B3054}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {61A6E932-3129-4D58-AC79-F69D6E0B3054}.Debug|Any CPU.Build.0 = Debug|Any CPU + {61A6E932-3129-4D58-AC79-F69D6E0B3054}.Release|Any CPU.ActiveCfg = Release|Any CPU + {61A6E932-3129-4D58-AC79-F69D6E0B3054}.Release|Any CPU.Build.0 = Release|Any CPU + {604EB1D7-998F-4A52-90A6-67F3DC3203D2}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {604EB1D7-998F-4A52-90A6-67F3DC3203D2}.Debug|Any CPU.Build.0 = Debug|Any CPU + {604EB1D7-998F-4A52-90A6-67F3DC3203D2}.Release|Any CPU.ActiveCfg = Release|Any CPU + {604EB1D7-998F-4A52-90A6-67F3DC3203D2}.Release|Any CPU.Build.0 = Release|Any CPU + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection + GlobalSection(ExtensibilityGlobals) = postSolution + SolutionGuid = {A08E2A97-C1DC-45F8-87D9-04A422C78B73} + EndGlobalSection +EndGlobal diff --git a/ShiftOS/API.vb b/ShiftOS/API.vb new file mode 100644 index 0000000..3abcf5f --- /dev/null +++ b/ShiftOS/API.vb @@ -0,0 +1,1245 @@ +Imports System.Runtime.InteropServices +Public Class API + 'Error handling + Private Shared LastError As Exception + _ + Public Shared Sub HandleError() + If LastError IsNot Nothing Then + Throw LastError + ElseIf Marshal.GetLastWin32Error() <> 0 Then + Throw New System.ComponentModel.Win32Exception(Marshal.GetLastWin32Error()) + End If + End Sub + + Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Int32, ByVal Msg As UInteger, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As Integer + Public Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hWnd As Int32, ByVal Msg As UInteger, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As Integer + Public Declare Function AttachThreadInput Lib "user32" (ByVal idAttach As Integer, ByVal idAttackTo As Integer, ByVal fAttack As Int32) As Boolean + Public Declare Function GetCurrentThreadId Lib "kernel32" () As Integer + + Public Class WM + Public Enum SC 'System Commands + CLOSE = &HF060 + CONTEXTHELP = &HF180 + CDEFAULT = &HF160 + HOTKEY = &HF150 + HSCROLL = &HF080 + ISSECURE = &H1 + KEYMENU = &HF100 + MAXIMIZE = &HF030 + MINIMIZE = &HF020 + MONITORPOWER = &HF170 + MouseMenu = &HF090 + MOVE = &HF010 + NEXTWINDOW = &HF040 + PREVWINDOW = &HF050 + RESTORE = &HF120 + SCREENSAVE = &HF140 + Size = &HF000 + TASKLIST = &HF130 + VSCROLL = &HF070 + End Enum + + Public Enum msg As UInteger + USER = &H400& + ACTIVATE = &H6 + ACTIVATEAPP = &H1C + ASKCBFORMATNAME = &H30C + CANCELJOURNAL = &H4B + CANCELMODE = &H1F + CHANGECBCHAIN = &H30D + Chr = &H102 + CHARTOITEM = &H2F + CHILDACTIVATE = &H22 + CHOOSEFONT_GETLOGFONT = (USER + 1) + CHOOSEFONT_SETFLAGS = (USER + 102) + CHOOSEFONT_SETLOGFONT = (USER + 101) + CLEAR = &H303 + CLOSE = &H10 + Command = &H111 + COMMNOTIFY = &H44 ' no longer suported + COMPACTING = &H41 + COMPAREITEM = &H39 + CONVERTREQUESTEX = &H108 + Copy = &H301 + COPYDATA = &H4A + CREATE = &H1 + CTLCOLORBTN = &H135 + CTLCOLORDLG = &H136 + CTLCOLOREDIT = &H133 + CTLCOLORLISTBOX = &H134 + CTLCOLORMSGBOX = &H132 + CTLCOLORSCROLLBAR = &H137 + CTLCOLORSTATIC = &H138 + CUT = &H300 + DDE_FIRST = &H3E0 + DDE_ACK = (DDE_FIRST + 4) + DDE_ADVISE = (DDE_FIRST + 2) + DDE_DATA = (DDE_FIRST + 5) + DDE_EXECUTE = (DDE_FIRST + 8) + DDE_INITIATE = (DDE_FIRST) + DDE_LAST = (DDE_FIRST + 8) + DDE_POKE = (DDE_FIRST + 7) + DDE_REQUEST = (DDE_FIRST + 6) + DDE_TERMINATE = (DDE_FIRST + 1) + DDE_UNADVISE = (DDE_FIRST + 3) + DEADCHAR = &H103 + DELETEITEM = &H2D + DESTROY = &H2 + DESTROYCLIPBOARD = &H307 + DEVMODECHANGE = &H1B + DRAWCLIPBOARD = &H308 + DRAWITEM = &H2B + DROPFILES = &H233 + ENABLE = &HA + ENDSESSION = &H16 + ENTERIDLE = &H121 + ENTERMENULOOP = &H211 + ERASEBKGND = &H14 + EXITMENULOOP = &H212 + FONTCHANGE = &H1D + GETFONT = &H31 + GETDLGCODE = &H87 + GETHOTKEY = &H33 + GETMINMAXINFO = &H24 + GETTEXT = &HD + GETTEXTLENGTH = &HE + HOTKEY = &H312 + HSCROLL = &H114 + HSCROLLCLIPBOARD = &H30E + ICONERASEBKGND = &H27 + IME_CHAR = &H286 + IME_COMPOSITION = &H10F + IME_COMPOSITIONFULL = &H284 + IME_CONTROL = &H283 + IME_ENDCOMPOSITION = &H10E + IME_KEYDOWN = &H290 + IME_KEYLAST = &H10F + IME_KEYUP = &H291 + IME_NOTIFY = &H282 + IME_SELECT = &H285 + IME_SETCONTEXT = &H281 + IME_STARTCOMPOSITION = &H10D + INITDIALOG = &H110 + INITMENU = &H116 + INITMENUPOPUP = &H117 + KEYDOWN = &H100 + KEYFIRST = &H100 + KEYLAST = &H108 + KEYUP = &H101 + KILLFOCUS = &H8 + LBUTTONDBLCLK = &H203 + LBUTTONDOWN = &H201 + LBUTTONUP = &H202 + MBUTTONDBLCLK = &H209 + MBUTTONDOWN = &H207 + MBUTTONUP = &H208 + MDIACTIVATE = &H222 + MDICASCADE = &H227 + MDICREATE = &H220 + MDIDESTROY = &H221 + MDIGETACTIVE = &H229 + MDIICONARRANGE = &H228 + MDIMAXIMIZE = &H225 + MDINEXT = &H224 + MDIREFRESHMENU = &H234 + MDIRESTORE = &H223 + MDISETMENU = &H230 + MDITILE = &H226 + MEASUREITEM = &H2C + MENUCHAR = &H120 + MENUSELECT = &H11F + MOUSEACTIVATE = &H21 + MOUSEFIRST = &H200 + MOUSELAST = &H209 + MOUSEMOVE = &H200 + MOVE = &H3 + NCACTIVATE = &H86 + NCCALCSIZE = &H83 + NCCREATE = &H81 + NCDESTROY = &H82 + NCHITTEST = &H84 + NCLBUTTONDBLCLK = &HA3 + NCLBUTTONDOWN = &HA1 + NCLBUTTONUP = &HA2 + NCMBUTTONDBLCLK = &HA9 + NCMBUTTONDOWN = &HA7 + NCMBUTTONUP = &HA8 + NCMOUSEMOVE = &HA0 + NCPAINT = &H85 + NCRBUTTONDBLCLK = &HA6 + NCRBUTTONDOWN = &HA4 + NCRBUTTONUP = &HA5 + NEXTDLGCTL = &H28 + NULL = &H0 + PAINT = &HF + PAINTCLIPBOARD = &H309 + PAINTICON = &H26 + PALETTECHANGED = &H311 + PALETTEISCHANGING = &H310 + PARENTNOTIFY = &H210 + PASTE = &H302 + PENWINFIRST = &H380 + PENWINLAST = &H38F + POWER = &H48 + Print = &H317 + PSD_ENVSTAMPRECT = (USER + 5) + PSD_FULLPAGERECT = (USER + 1) + PSD_GREEKTEXTRECT = (USER + 4) + PSD_MARGINRECT = (USER + 3) + PSD_MINMARGINRECT = (USER + 2) + PSD_PAGESETUPDLG = (USER) + PSD_YAFULLPAGERECT = (USER + 6) + QUERYDRAGICON = &H37 + QUERYENDSESSION = &H11 + QUERYNEWPALETTE = &H30F + QUERYOPEN = &H13 + QUEUESYNC = &H23 + QUIT = &H12 + RBUTTONDBLCLK = &H206 + RBUTTONDOWN = &H204 + RBUTTONUP = &H205 + RENDERALLFORMATS = &H306 + RENDERFORMAT = &H305 + SETCURSOR = &H20 + SETFOCUS = &H7 + SETFONT = &H30 + SETHOTKEY = &H32 + SETREDRAW = &HB + SETTEXT = &HC + Size = &H5 + SIZECLIPBOARD = &H30B + SPOOLERSTATUS = &H2A + SYSCHAR = &H106 + SYSCOLORCHANGE = &H15 + SYSCOMMAND = &H112 + SYSDEADCHAR = &H107 + SYSKEYDOWN = &H104 + SYSKEYUP = &H105 + SHOWWINDOW = &H18 + Timer = &H113 + TIMECHANGE = &H1E + UNDO = &H304 + VKEYTOITEM = &H2E + VSCROLL = &H115 + VSCROLLCLIPBOARD = &H30A + WINDOWPOSCHANGED = &H47 + WINDOWPOSCHANGING = &H46 + WININICHANGE = &H1A + End Enum 'Window Messages + + Public Shared Function GETTEXTLENGTH(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.GETTEXTLENGTH, 0, 0) + 1 + End Function + Public Shared Property TEXT(ByVal hwnd As IntPtr) As String + Get + Dim length As Integer = GETTEXTLENGTH(hwnd) + Dim Handle As IntPtr = Marshal.AllocHGlobal(length) + SendMessage(hwnd, 13, length, Handle) + TEXT = Marshal.PtrToStringAnsi(Handle) + Marshal.FreeHGlobal(Handle) + End Get + Set(ByVal value As String) + Dim handle As IntPtr = Marshal.StringToHGlobalAnsi(value) + SendMessage(hwnd, &HC, IntPtr.Zero, handle) + Marshal.FreeHGlobal(handle) + End Set + End Property + Public Shared Property FONT(ByVal hwnd As IntPtr) As System.Drawing.Font + Get + Return System.Drawing.Font.FromHfont(SendMessage(hwnd, msg.GETFONT, 0, 0)) + End Get + Set(ByVal value As System.Drawing.Font) + SendMessage(hwnd, msg.SETFONT, value.ToHfont, True) + End Set + End Property + Public Shared Function SETFOCUS(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.SETFOCUS, 0, 0) + End Function + Public Shared Function CLOSE(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.CLOSE, 0, 0) + End Function + Public Shared Function DESTROY(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.DESTROY, 0, 0) + End Function + Public Shared Function CLEAR(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.CLEAR, 0, 0) + End Function + Public Shared Function UNDO(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.UNDO, 0, 0) + End Function + Public Shared Function Copy(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.Copy, 0, 0) + End Function + Public Shared Function PASTE(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.PASTE, 0, 0) + End Function + Public Shared Function CUT(ByVal hwnd As IntPtr) As Integer + Return SendMessage(hwnd, msg.CUT, 0, 0) + End Function + Public Shared Function SETREDRAW(ByVal hwnd As IntPtr, Optional ByVal redraw As Boolean = True) As Integer + Return SendMessage(hwnd, msg.SETREDRAW, redraw, 0) + End Function + Public Shared Function KILLFOCUS(ByVal hwnd As IntPtr) As Boolean + Return SendMessage(hwnd, msg.KILLFOCUS, 0, 0) + End Function + + 'listview + Public Shared Function SETICONSPACING(ByVal lview As ListView, ByVal spaceX As Integer, ByVal spaceY As Integer) As Integer + Return SETICONSPACING(lview.Handle, spaceX, spaceY) + End Function + Public Shared Function SETICONSPACING(ByVal hwnd As IntPtr, ByVal spaceX As Integer, ByVal spaceY As Integer) As Integer + Return SendMessage(hwnd, &H1035, spaceX, spaceY) + End Function + + Public Shared Function SYSCOMMAND(ByVal hwnd As IntPtr, ByVal command As SC, Optional ByVal lparam As Integer = 0) As Boolean + Return SendMessage(hwnd, WM.msg.SYSCOMMAND, command, lparam) + End Function + Public Shared Function SYSCOMMAND(ByVal hwnd As IntPtr, ByVal command As SC, ByVal x As Short, ByVal y As Short) As Boolean + Return SendMessage(hwnd, WM.msg.SYSCOMMAND, command, New DWORD(x, y)) + End Function + End Class + + Public Class SPI + _ + Private Shared Function SystemParametersInfoGet(ByVal uAction As SPI.GetActions, ByVal uiParam As UInt32, ByRef pvParam As IntPtr, ByVal fuWinIni As UInt32) As Boolean + End Function + _ + Private Shared Function SystemParametersInfoSet(ByVal uAction As SPI.SetActions, ByVal uiParam As UInt32, ByVal pvParam As IntPtr, ByVal fuWinIni As UInt32) As Boolean + End Function + + Public Enum GetActions As UInt32 + ICONHORIZONTALSPACING = &HD + ICONVERTICALSPACING = &H18 + BEEP = &H1 + MOUSE = &H3 + BORDER = &H5 + KEYBOARDSPEED = &HA + SCREENSAVETIMEOUT = &HE + SCREENSAVEACTIVE = &H10 + GRIDGRANULARITY = &H12 + KEYBOARDDELAY = &H16 + ICONTITLEWRAP = &H19 + MENUDROPALIGNMENT = &H1B + ICONTITLELOGFONT = &H1F + FASTTASKSWITCH = &H23 + DRAGFULLWINDOWS = &H26 + NONCLIENTMETRICS = &H29 + MINIMIZEDMETRICS = &H2B + ICONMETRICS = &H2D + WORKAREA = &H30 + HIGHCONTRAST = &H42 + KEYBOARDPREF = &H44 + SCREENREADER = &H46 + ANIMATION = &H48 + FONTSMOOTHING = &H4A + LOWPOWERTIMEOUT = &H4F + POWEROFFTIMEOUT = &H50 + LOWPOWERACTIVE = &H53 + POWEROFFACTIVE = &H54 + DEFAULTINPUTLANG = &H59 + WINDOWSEXTENSION = &H5C + MOUSETRAILS = &H5E + FILTERKEYS = &H32 + TOGGLEKEYS = &H34 + MOUSEKEYS = &H36 + SHOWSOUNDS = &H38 + STICKYKEYS = &H3A + ACCESSTIMEOUT = &H3C + SERIALKEYS = &H3E + SOUNDSENTRY = &H40 + SNAPTODEFBUTTON = &H5F + MOUSEHOVERWIDTH = &H62 + MOUSEHOVERHEIGHT = &H64 + MOUSEHOVERTIME = &H66 + WHEELSCROLLLINES = &H68 + MENUSHOWDELAY = &H6A + WHEELSCROLLCHARS = &H6C + SCREENSAVERRUNNING = &H72 + MOUSESPEED = &H70 + DESKWALLPAPER = &H73 + AUDIODESCRIPTION = &H74 + SCREENSAVESECURE = &H76 + SHOWIMEUI = &H6E + ACTIVEWINDOWTRACKING = &H1000 + MENUANIMATION = &H1002 + COMBOBOXANIMATION = &H1004 + LISTBOXSMOOTHSCROLLING = &H1006 + GRADIENTCAPTIONS = &H1008 + KEYBOARDCUES = &H100A + MENUUNDERLINES = KEYBOARDCUES + ACTIVEWNDTRKZORDER = &H100C + HOTTRACKING = &H100E + MENUFADE = &H1012 + SELECTIONFADE = &H1014 + TOOLTIPANIMATION = &H1016 + TOOLTIPFADE = &H1018 + CURSORSHADOW = &H101A + MOUSESONAR = &H101C + MOUSECLICKLOCK = &H101E + MOUSEVANISH = &H1020 + FLATMENU = &H1022 + DROPSHADOW = &H1024 + BLOCKSENDINPUTRESETS = &H1026 + UIEFFECTS = &H103E + DISABLEOVERLAPPEDCONTENT = &H1040 + CLIENTAREAANIMATION = &H1042 + CLEARTYPE = &H1048 + SPEECHRECOGNITION = &H104A + FOREGROUNDLOCKTIMEOUT = &H2000 + ACTIVEWNDTRKTIMEOUT = &H2002 + FOREGROUNDFLASHCOUNT = &H2004 + CARETWIDTH = &H2006 + MOUSECLICKLOCKTIME = &H2008 + FONTSMOOTHINGTYPE = &H200A + FONTSMOOTHINGCONTRAST = &H200C + FOCUSBORDERWIDTH = &H200E + FOCUSBORDERHEIGHT = &H2010 + FONTSMOOTHINGORIENTATION = &H2012 + MINIMUMHITRADIUS = &H2014 + MESSAGEDURATION = &H2016 + End Enum + Public Enum SetActions As UInt32 + BEEP = &H2 + MOUSE = &H4 + BORDER = &H6 + KEYBOARDSPEED = &HB + SCREENSAVETIMEOUT = &HF + SCREENSAVEACTIVE = &H11 + GRIDGRANULARITY = &H13 + DESKWALLPAPER = &H14 + DESKPATTERN = &H15 + KEYBOARDDELAY = &H17 + ICONTITLEWRAP = &H1A + MENUDROPALIGNMENT = &H1C + DOUBLECLKWIDTH = &H1D + DOUBLECLKHEIGHT = &H1E + DOUBLECLICKTIME = &H20 + MOUSEBUTTONSWAP = &H21 + ICONTITLELOGFONT = &H22 + FASTTASKSWITCH = &H24 + DRAGFULLWINDOWS = &H25 + NONCLIENTMETRICS = &H2A + MINIMIZEDMETRICS = &H2C + ICONMETRICS = &H2E + WORKAREA = &H2F + PENWINDOWS = &H31 + HIGHCONTRAST = &H43 + KEYBOARDPREF = &H45 + SCREENREADER = &H47 + ANIMATION = &H49 + FONTSMOOTHING = &H4B + DRAGWIDTH = &H4C + DRAGHEIGHT = &H4D + HANDHELD = &H4E + LOWPOWERTIMEOUT = &H51 + POWEROFFTIMEOUT = &H52 + LOWPOWERACTIVE = &H55 + POWEROFFACTIVE = &H56 + CURSORS = &H57 + ICONS = &H58 + DEFAULTINPUTLANG = &H5A + LANGTOGGLE = &H5B + MOUSETRAILS = &H5D + SCREENSAVERRUNNING = &H61 + FILTERKEYS = &H33 + TOGGLEKEYS = &H35 + MOUSEKEYS = &H37 + SHOWSOUNDS = &H39 + STICKYKEYS = &H3B + ACCESSTIMEOUT = &H3D + SERIALKEYS = &H3F + SOUNDSENTRY = &H41 + SNAPTODEFBUTTON = &H60 + MOUSEHOVERWIDTH = &H63 + MOUSEHOVERHEIGHT = &H65 + MOUSEHOVERTIME = &H67 + WHEELSCROLLLINES = &H69 + MENUSHOWDELAY = &H6B + WHEELSCROLLCHARS = &H6D + SHOWIMEUI = &H6F + MOUSESPEED = &H71 + AUDIODESCRIPTION = &H75 + SCREENSAVESECURE = &H77 + ACTIVEWINDOWTRACKING = &H1001 + MENUANIMATION = &H1003 + COMBOBOXANIMATION = &H1005 + LISTBOXSMOOTHSCROLLING = &H1007 + GRADIENTCAPTIONS = &H1009 + KEYBOARDCUES = &H100B + MENUUNDERLINES = KEYBOARDCUES + ACTIVEWNDTRKZORDER = &H100D + HOTTRACKING = &H100F + MENUFADE = &H1013 + SELECTIONFADE = &H1015 + TOOLTIPANIMATION = &H1017 + TOOLTIPFADE = &H1019 + CURSORSHADOW = &H101B + MOUSESONAR = &H101D + MOUSECLICKLOCK = &H101F + MOUSEVANISH = &H1021 + FLATMENU = &H1023 + DROPSHADOW = &H1025 + BLOCKSENDINPUTRESETS = &H1027 + UIEFFECTS = &H103F + DISABLEOVERLAPPEDCONTENT = &H1041 + CLIENTAREAANIMATION = &H1043 + CLEARTYPE = &H1049 + SPEECHRECOGNITION = &H104B + FOREGROUNDLOCKTIMEOUT = &H2001 + ACTIVEWNDTRKTIMEOUT = &H2003 + FOREGROUNDFLASHCOUNT = &H2005 + CARETWIDTH = &H2007 + MOUSECLICKLOCKTIME = &H2009 + FONTSMOOTHINGTYPE = &H200B + FONTSMOOTHINGCONTRAST = &H200D + FOCUSBORDERWIDTH = &H200F + FOCUSBORDERHEIGHT = &H2011 + FONTSMOOTHINGORIENTATION = &H2013 + MINIMUMHITRADIUS = &H2015 + MESSAGEDURATION = &H2017 + End Enum + Public Enum FontSmoothing As Int32 + STANDARD = &H1 + CLEARTYPE = &H2 + DOCKING = &H8000 + End Enum + Public Enum FontSmoothingOrientation As Int32 + BGR = &H0 + RGB = &H1 + End Enum + + Public Shared Function SetParameter(ByVal parameter As SetActions, ByVal uparam As UInteger, ByVal pvParam As IntPtr) As Boolean + Return SystemParametersInfoSet(parameter, uparam, pvParam, 1) + End Function + Public Shared Function SetParameter(ByVal parameter As SetActions, ByVal pvParam As IntPtr) As Boolean + Return SetParameter(parameter, 0, pvParam) + End Function + Public Shared Function GetParameter(ByVal parameter As GetActions) As IntPtr + SystemParametersInfoGet(parameter, 0, GetParameter, 0) + End Function + End Class + + Public Class DC + Implements System.IDisposable + + Private Declare Function BitBlt Lib "gdi32" (ByVal hdc As IntPtr, ByVal nXDest As Integer, ByVal nYDest As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal hdcSrc As IntPtr, ByVal nXSrc As Integer, ByVal nYSrc As Integer, ByVal dwRop As UInteger) As Boolean + Private Declare Function GetPixel Lib "gdi32" Alias "GetPixel" (ByVal hdc As IntPtr, ByVal X As Int32, ByVal Y As Int32) As Int32 + Private Declare Function SetPixel Lib "gdi32" Alias "SetPixel" (ByVal hdc As IntPtr, ByVal X As Int32, ByVal Y As Int32, ByVal crColor As UInt32) As UInt32 + Private Declare Function ReleaseDC Lib "user32" (ByVal hWnd As IntPtr, ByVal hDC As IntPtr) As Boolean + Private Declare Function GetClipBox Lib "gdi32" (ByVal hdc As IntPtr, ByRef lprc As WRECT) As Integer + Private Declare Function GetClipRgn Lib "gdi32" (ByVal hdc As IntPtr, ByRef hrgn As Region) As Integer + Private Declare Function GetRandomRgn Lib "gdi32" (ByVal hdc As IntPtr, ByRef hrgn As Region, ByVal inum As Integer) As Integer + + Private managedtype As DCSource + Private managedobject As Object + Private managedgraphics As Graphics + Private hdc As IntPtr + Private _disposed As Boolean + Public Enum DCSource + None + Handle + Graphics + End Enum + Sub New(ByVal g As Graphics) + Me.managedobject = g + Me.managedtype = DCSource.Graphics + Me.hdc = g.GetHdc + End Sub + Sub New(ByVal hwnd As IntPtr, ByVal hdc As IntPtr) + Me.managedobject = hwnd + Me.managedtype = DCSource.Handle + Me.hdc = hdc + End Sub + Sub New() + Me.managedobject = Nothing + Me.managedtype = DCSource.None + End Sub + Public ReadOnly Property Source() As DCSource + Get + Return Me.managedtype + End Get + End Property + Public Sub SetPixel(ByVal X As Integer, ByVal Y As Integer, ByVal C As Color) + SetPixel(Me.hdc, X, Y, C.ToArgb) + End Sub + Public Function GetPixel(ByVal X As Integer, ByVal Y As Integer) As Color + Return ColorTranslator.FromOle(GetPixel(Me.hdc, X, Y)) + End Function + Public Property Pixel(ByVal X As Integer, ByVal Y As Integer) As Color + Get + Return GetPixel(X, Y) + End Get + Set(ByVal value As Color) + SetPixel(X, Y, value) + End Set + End Property + Public Enum RasterOperation As UInteger + ''' default operation + NORMAL = RasterOperation.SRCCOPY Or RasterOperation.CAPTUREBLT + ''' dest = source + SRCCOPY = &HCC0020 + ''' dest = source OR dest + SRCPAINT = &HEE0086 + ''' dest = source AND dest + SRCAND = &H8800C6 + ''' dest = source XOR dest + SRCINVERT = &H660046 + ''' dest = source AND (NOT dest) + SRCERASE = &H440328 + ''' dest = (NOT source) + NOTSRCCOPY = &H330008 + ''' dest = (NOT src) AND (NOT dest) + NOTSRCERASE = &H1100A6 + ''' dest = (source AND pattern) + MERGECOPY = &HC000CA + ''' dest = (NOT source) OR dest + MERGEPAINT = &HBB0226 + ''' dest = pattern + PATCOPY = &HF00021 + ''' dest = DPSnoo + PATPAINT = &HFB0A09 + ''' dest = pattern XOR dest + PATINVERT = &H5A0049 + ''' dest = (NOT dest) + DSTINVERT = &H550009 + ''' dest = BLACK + BLACKNESS = &H42 + ''' dest = WHITE + WHITENESS = &HFF0062 + ''' + ''' Capture window as seen on screen. This includes layered windows + ''' such as WPF windows with AllowsTransparency="true" + ''' + CAPTUREBLT = &H40000000 + End Enum + + Public ReadOnly Property ClipBox() As Rectangle + Get + Dim w As WRECT + GetClipBox(Me.hdc, w) + Return w.Value + End Get + End Property + Public ReadOnly Property ClipSize() As Size + Get + Return Me.ClipBox.Size + End Get + End Property + + Public Property Handle() As IntPtr + Get + Return Me.hdc + End Get + Set(ByVal value As IntPtr) + Me.hdc = value + End Set + End Property + + Public ReadOnly Property Disposed() As Boolean + Get + Return Me._disposed + End Get + End Property + + Public Sub Draw(ByVal source As Graphics, ByVal destrect As Rectangle, ByVal sourceoffset As Point, ByVal operation As RasterOperation) + Dim hdc As IntPtr = source.GetHdc + Draw(hdc, destrect, sourceoffset, operation) + source.ReleaseHdc(hdc) + End Sub + Public Sub Draw(ByVal source As DC, ByVal destrect As Rectangle, ByVal sourceoffset As Point, ByVal operation As RasterOperation) + Draw(source.hdc, destrect, sourceoffset, operation) + End Sub + Public Sub Draw(ByVal sourcehdc As IntPtr, ByVal destrect As Rectangle, ByVal sourceoffset As Point, ByVal operation As RasterOperation) + BitBlt(Me.hdc, destrect.X, destrect.Y, destrect.Width, destrect.Height, sourcehdc, sourceoffset.X, sourceoffset.Y, operation) + End Sub + + Public Sub CopyTo(ByVal destination As Graphics, Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) + CopyTo(destination, Me.ClipBox, operation) + End Sub + Public Sub CopyTo(ByVal destination As Graphics, ByVal destrect As Rectangle, Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) + CopyTo(destination, destrect, New Point(0, 0), operation) + End Sub + Public Sub CopyTo(ByVal destination As Graphics, ByVal destrect As Rectangle, ByVal sourceoffset As Point, Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) + Dim hdc As IntPtr = destination.GetHdc + CopyTo(hdc, destrect, sourceoffset, operation) + destination.ReleaseHdc(hdc) + End Sub + Public Sub CopyTo(ByVal destination As DC, Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) + CopyTo(destination.hdc, Me.ClipBox, New Point(0, 0), operation) + End Sub + Public Sub CopyTo(ByVal destination As DC, ByVal destrect As Rectangle, Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) + CopyTo(destination.hdc, destrect, New Point(0, 0), operation) + End Sub + Public Sub CopyTo(ByVal destination As DC, ByVal destrect As Rectangle, ByVal sourceoffset As Point, Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) + CopyTo(destination.hdc, destrect, sourceoffset, operation) + End Sub + Public Sub CopyTo(ByVal desthdc As IntPtr, ByVal destrect As Rectangle, ByVal sourceoffset As Point, Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) + BitBlt(desthdc, destrect.X, destrect.Y, destrect.Width, destrect.Height, Me.hdc, sourceoffset.X, sourceoffset.Y, operation) + End Sub + + Public Function ToBitmap(Optional ByVal operation As RasterOperation = RasterOperation.NORMAL) As Bitmap + Return ToBitmap(Me.ClipSize, operation) + End Function + Public Function ToBitmap(ByVal Resolution As Size, Optional ByVal operation As RasterOperation = RasterOperation.SRCCOPY Or RasterOperation.CAPTUREBLT) As Bitmap + ToBitmap = New Bitmap(Resolution.Width, Resolution.Height) + Dim g As Graphics = Graphics.FromImage(ToBitmap) + Dim ghdc As IntPtr = g.GetHdc + BitBlt(ghdc, 0, 0, Resolution.Width, Resolution.Height, Me.hdc, 0, 0, operation) + g.ReleaseHdc(ghdc) + g.Dispose() + End Function + + Public ReadOnly Property Graphics() As Graphics + Get + If Me.managedgraphics Is Nothing Then Me.managedgraphics = Graphics.FromHdc(Me.hdc) + Return Me.managedgraphics + End Get + End Property + Public Shared Function FromHandle(ByVal handle As IntPtr) As DC + FromHandle = New DC() + FromHandle.hdc = handle + End Function + + Protected Overridable Overloads Sub Dispose(ByVal disposing As Boolean) + If Me._disposed = False Then + Select Case managedtype + Case DCSource.Handle + ReleaseDC(CType(Me.managedobject, IntPtr), Me.hdc) + Case DCSource.Graphics + CType(Me.managedobject, Graphics).ReleaseHdc(Me.hdc) + End Select + If managedgraphics IsNot Nothing Then managedgraphics.Dispose() + Me.managedgraphics = Nothing + Me.managedobject = Nothing + Me.managedtype = Nothing + Me.hdc = Nothing + Me._disposed = True + End If + End Sub + Public Overloads Sub Dispose() Implements IDisposable.Dispose + Dispose(True) + GC.SuppressFinalize(Me) + End Sub + End Class + + Public Structure ShellExecuteInfo + Private Declare Function ShellExecuteEx Lib "shell32.dll" Alias "ShellExecuteExA" (ByRef lpExecInfo As ShellExecuteInfo) As Boolean + Sub New(ByVal Verb As Verb) + Me.lpVerb = Verb.ToString() + End Sub + Private cbSize As Integer + Public fMask As Mask + Public hwnd As IntPtr + Public lpVerb As String + Public lpFile As String + Public lpParameters As String + Public lpDirectory As String + Public nShow As SW + Public hInstApp As IntPtr + Public lpIDList As IntPtr + Public lpClass As String + Public hkeyClass As IntPtr + Public dwHotKey As Integer + Public hIcon As IntPtr + Public hProcess As IntPtr + Public Property hMonitor() As IntPtr + Get + Return Me.hIcon + End Get + Set(ByVal value As IntPtr) + Me.hIcon = value + End Set + End Property + + Public Enum Mask As Integer + NONE = &H0 + CLASSNAME = &H1 + CLASSKEY = &H3 + IDLIST = &H4 + INVOKEIDLIST = &HC + ICON = &H10 + HOTKEY = &H20 + NOCLOSEPROCESS = &H40 + CONNECTNETDRV = &H80 + NOASYNC = &H100 + DOENVSUBST = &H200 + FLAG_NO_UI = &H400 + UNICODE = &H4000 + NO_CONSOLE = &H8000 + ASYNCOK = &H100000 + NOQUERYCLASSSTORE = &H1000000 + HMONITOR = &H200000 + NOZONECHECKS = &H800000 + WAITFORINPUTIDLE = &H2000000 + FLAG_LOG_USAGE = &H4000000 + End Enum + Public Enum SW As Integer + ''' + ''' No SW command, default value. + ''' + NONE + ''' + ''' Hides the window and activates another window. + ''' + HIDE + ''' + ''' Maximizes the specified window. + ''' + MAXIMIZE + ''' + ''' Minimizes the specified window and activates the next top-level window in the z-order. + ''' + MINIMIZE + ''' + ''' Activates and displays the window. If the window is minimized or maximized, Windows restores it to its original size and position. + ''' An application should specify this flag when restoring a minimized window. + ''' + RESTORE + ''' + ''' Activates the window and displays it in its current size and position. + ''' + SHOW + ''' + ''' Sets the show state based on the SW_ flag specified in the STARTUPINFO structure passed to the CreateProcess function by the program that started the application. + ''' An application should call ShowWindow with this flag to set the initial show state of its main window. + ''' + SHOWDEFAULT + ''' + ''' Activates the window and displays it as a maximized window. + ''' + SHOWMAXIMIZED + ''' + ''' Activates the window and displays it as a minimized window. + ''' + SHOWMINIMIZED + ''' + ''' Displays the window as a minimized window. The active window remains active. + ''' + SHOWMINNOACTIVE + ''' + ''' Displays the window in its current state. The active window remains active. + ''' + SHOWNA + ''' + ''' Displays a window in its most recent size and position. The active window remains active. + ''' + SHOWNOACTIVATE + ''' + ''' Activates and displays a window. If the window is minimized or maximized, Windows restores it to its original size and position. + ''' An application should specify this flag when displaying the window for the first time. + ''' + SHOWNORMAL + End Enum + Public Enum Verb + none + edit + explore + find + open + print + properties + End Enum + + Public Function Execute() As Boolean + Me.cbSize = Marshal.SizeOf(Me) + Return ShellExecuteEx(Me) + End Function + End Structure + + Public Declare Function VkKeyScan Lib "user32" Alias "VkKeyScanA" (ByVal ch As Char) As Short + Public Declare Function MapVirtualKey Lib "User32.dll" Alias "MapVirtualKeyA" (ByVal uCode As UInt32, ByVal uMapType As MAPVK) As UInt32 + Public Enum MAPVK As UInt32 + ''' uCode is a virtual-key code and is translated into a scan code. + ''' If it is a virtual-key code that does not distinguish between left- and + ''' right-hand keys, the left-hand scan code is returned. + ''' If there is no translation, the function returns 0. + ''' + ''' + VK_TO_VSC = 0 + ''' uCode is a scan code and is translated into a virtual-key code that + ''' does not distinguish between left- and right-hand keys. If there is no + ''' translation, the function returns 0. + ''' + ''' + VSC_TO_VK = 1 + ''' uCode is a virtual-key code and is translated into an unshifted + ''' character value in the low-order word of the return value. Dead keys (diacritics) + ''' are indicated by setting the top bit of the return value. If there is no + ''' translation, the function returns 0. + ''' + ''' + VK_TO_CHAR = 2 + ''' Windows NT/2000/XP: uCode is a scan code and is translated into a + ''' virtual-key code that distinguishes between left- and right-hand keys. If + ''' there is no translation, the function returns 0. + ''' + ''' + VSC_TO_VK_EX = 3 + End Enum + Public Structure Input + Sub New(ByVal dx As Integer, ByVal dy As Integer, ByVal flags As MouseEvent, Optional ByVal data As MouseData = 0) + If (flags And MouseEvent.MoveScreen) = MouseEvent.MoveScreen Then + 'convert to screen absolute + dx = dx / My.Computer.Screen.Bounds.Width * UShort.MaxValue + dy = dy / My.Computer.Screen.Bounds.Height * UShort.MaxValue + flags -= MouseEvent.MoveScreen + If Not (flags And MouseEvent.MoveAbsolute) = MouseEvent.MoveAbsolute Then + flags += MouseEvent.MoveAbsolute + End If + End If + Me.type = dwType.MOUSE + With Me.mi + .dx = dx + .dy = dy + .time = 0 + .dwExtraInfo = 0 + .mouseData = data + .dwFlags = flags + End With + End Sub + Sub New(ByVal key As Keys, ByVal keyevent As KeyEvent) + Me.type = dwType.KEYBOARD + Dim extended As Boolean = False + If key = Keys.Shift Then key = &H10 + If key = Keys.Control Then key = &H11 + If key = Keys.Menu Then key = &H12 + If key = Keys.LControlKey Or key = Keys.RControlKey Then extended = True + If key = Keys.LMenu Or key = Keys.RMenu Then extended = True + If key = Keys.LShiftKey Or key = Keys.RShiftKey Then extended = True + With Me.ki + .wVk = key + .dwFlags = keyevent + If extended Then .dwFlags += KEYBDINPUT.KEYEVENTF.EXTENDEDKEY + .time = 0 + .dwExtraInfo = 0 + End With + End Sub + Sub New(ByVal msg As Integer, ByVal ParamL As Short, ByVal ParamH As Short) + Me.type = dwType.HARDWARE + With Me.hi + .uMsg = msg + .wParamL = ParamL + .wParamH = ParamH + End With + End Sub + + Private type As dwType + Private mi As MOUSEINPUT + Private ki As KEYBDINPUT + Private hi As HARDWAREINPUT + + Private Structure MOUSEINPUT + Public dx As Integer + Public dy As Integer + Public mouseData As Integer + Public dwFlags As MOUSEEVENTF + Public time As Integer + Public dwExtraInfo As IntPtr + Public Enum MOUSEEVENTF As Integer + MOVE = &H1 + LEFTDOWN = &H2 + LEFTUP = &H4 + RIGHTDOWN = &H8 + RIGHTUP = &H10 + MIDDLEDOWN = &H20 + MIDDLEUP = &H40 + XDOWN = &H80 + XUP = &H100 + WHEEL = &H800 + VIRTUALDESK = &H4000 + ABSOLUTE = &H8000 + End Enum + End Structure + Private Structure KEYBDINPUT + Public wVk As Short + Public wScan As Short + Public dwFlags As KEYEVENTF + Public time As Integer + Public dwExtraInfo As IntPtr + Public Enum KEYEVENTF As Integer + KEYDOWN = 0 + EXTENDEDKEY = 1 + KEYUP = 2 + UNICODE = 4 + SCANCODE = 8 + End Enum + End Structure + Private Structure HARDWAREINPUT + Public uMsg As Integer + Public wParamL As Short + Public wParamH As Short + End Structure + Private Enum dwType As Integer + MOUSE = 0 + KEYBOARD = 1 + HARDWARE = 2 + End Enum + + Public Enum MouseEvent + ''' + ''' Moves the cursor with the offset dx and dy + ''' + Move = &H1 + ''' + ''' Places the cursor at the screen coordinates dx and dy + ''' + MoveScreen = &H1000 + ''' + ''' Places the cursor at the screen using dx and dy ranging from 0 (left/top) to 65535 (right/bottom) + ''' + MoveAbsolute = Move Or &H8000 + ''' + ''' Places the cursor at the desktop using dx and dy ranging from 0 (left/top) to 65535 (right/bottom) + ''' + MoveVirtualDesktop = MoveAbsolute Or &H4000 + ''' + ''' Press the left mouse button + ''' + LeftDown = &H2 + ''' + ''' Release the left mouse button + ''' + LeftUp = &H4 + ''' + ''' Press the right mouse button + ''' + RightDown = &H8 + ''' + ''' Release the right mouse button + ''' + RightUp = &H10 + ''' + ''' Press the middle mouse button + ''' + MiddleDown = &H30 + ''' + ''' Release the middle mouse button + ''' + MiddleUp = &H40 + ''' + ''' Press the XButton specified in the data member + ''' + XDown = &H80 + ''' + ''' Release the XButton specified in the data member + ''' + XUp = &H100 + ''' + ''' Scroll the vertical mousewheel with the delta count of the data member + ''' + MouseVWheel = &H800 + ''' + ''' Scroll the horizontal mousewheel with the delta count of the data member + ''' + MouseHWheel = &H20E + End Enum + Public Enum MouseData As Integer + XButton1 = 1 + XButton2 = 2 + Wheel_Delta_Backward = -120 + Wheel_Delta_Forward = 120 + Wheel_Delta_Left = -120 + Wheel_Delta_Right = 120 + End Enum + Public Enum KeyEvent + Down = 0 + Up = 2 + End Enum + + Private Declare Function SendInput Lib "user32.dll" (ByVal cInputs As Integer, ByVal pInputs() As Input, ByVal cbSize As Integer) As Integer + Public Shared Function Send(ByVal ParamArray inputs() As Input) As Boolean + Return SendInput(inputs.Count, inputs, Marshal.SizeOf(GetType(Input))) + End Function + Public Function Send() As Boolean + Return Send(Me) + End Function + End Structure + + Public Structure WORD + Sub New(ByVal value As Short) + Me.Short1 = value + End Sub + Shared Widening Operator CType(ByVal w As WORD) As Short + Return w.Short1 + End Operator + Public Short1 As Short + Public UShort1 As UShort + Public Byte1 As Byte + Public Byte2 As Byte + Public Shared Function FromBB(ByVal Byte1 As Byte, ByVal Byte2 As Byte) As WORD + FromBB = New WORD + FromBB.Byte1 = Byte1 + FromBB.Byte2 = Byte2 + End Function + End Structure + Public Structure DWORD + Sub New(ByVal value As Integer) + Me.Integer1 = value + End Sub + Sub New(ByVal Short1 As Short, ByVal Short2 As Short) + Me.Short1 = Short1 + Me.Short2 = Short2 + End Sub + Shared Widening Operator CType(ByVal w As DWORD) As Integer + Return w.Integer1 + End Operator + Shared Widening Operator CType(ByVal w As DWORD) As IntPtr + Return w.Integer1 + End Operator + Public Integer1 As Integer + Public UInteger1 As UInteger + Public Short1 As Short + Public UShort1 As UShort + Public Short2 As Short + Public UShort2 As UShort + Public Byte1 As Byte + Public Byte2 As Byte + Public Byte3 As Byte + Public Byte4 As Byte + Public Shared Function FromUsBB(ByVal UShort1 As UShort, ByVal Byte1 As Byte, ByVal Byte2 As Byte) As DWORD + FromUsBB = New DWORD + FromUsBB.UShort1 = UShort1 + FromUsBB.Byte3 = Byte1 + FromUsBB.Byte4 = Byte2 + End Function + Public Shared Function FromSBB(ByVal Short1 As Short, ByVal Byte1 As Byte, ByVal Byte2 As Byte) As DWORD + FromSBB = New DWORD + FromSBB.Short1 = Short1 + FromSBB.Byte3 = Byte1 + FromSBB.Byte4 = Byte2 + End Function + Public Shared Function FromBBBB(ByVal Byte1 As Byte, ByVal Byte2 As Byte, ByVal Byte3 As Byte, ByVal Byte4 As Byte) As DWORD + FromBBBB = New DWORD + FromBBBB.Byte1 = Byte1 + FromBBBB.Byte2 = Byte2 + FromBBBB.Byte3 = Byte3 + FromBBBB.Byte4 = Byte4 + End Function + End Structure + Public Structure QWORD + Sub New(ByVal value As Long) + Me.Long1 = value + End Sub + Shared Widening Operator CType(ByVal w As QWORD) As Long + Return w.Long1 + End Operator + Public Long1 As Long + Public ULong1 As ULong + Public Integer1 As Integer + Public UInteger1 As UInteger + Public Integer2 As Integer + Public UInteger2 As UInteger + Public Short1 As Short + Public UShort1 As UShort + Public Short2 As Short + Public UShort2 As UShort + Public Short3 As Short + Public UShort3 As UShort + Public Short4 As Short + Public UShort4 As UShort + Public Byte1 As Byte + Public Byte2 As Byte + Public Byte3 As Byte + Public Byte4 As Byte + Public Byte5 As Byte + Public Byte6 As Byte + Public Byte7 As Byte + Public Byte8 As Byte + End Structure + + Public Structure WPOINT + Public X As Integer + Public Y As Integer + Sub New(ByVal X As Integer, ByVal Y As Integer) + Me.X = X + Me.Y = Y + End Sub + Sub New(ByVal p As Point) + Me.X = p.X + Me.Y = p.Y + End Sub + Public Property Value() As Point + Get + Return New Point(Me.X, Me.Y) + End Get + Set(ByVal value As Point) + Me.X = value.X + Me.Y = value.Y + End Set + End Property + End Structure + Public Structure WRECT + Public Left As Integer, Top As Integer, Right As Integer, Bottom As Integer + Sub New(ByVal r As Rectangle) + Me.Value = r + End Sub + Public Property Value() As Rectangle + Get + Return New Rectangle(Left, Top, Right - Left, Bottom - Top) + End Get + Set(ByVal value As Rectangle) + Me.Left = value.Left + Me.Right = value.Right + Me.Top = value.Top + Me.Bottom = value.Bottom + End Set + End Property + End Structure + + Public Class MCI + _ + Private Shared Function mciGetErrorString(ByVal fdwError As Integer, ByVal lpszErrorText As System.Text.StringBuilder, ByVal cchErrorText As UInt32) As Boolean + End Function + _ + Private Shared Function mciSendString(ByVal strCommand As String, ByVal strReturn As System.Text.StringBuilder, ByVal iReturnLength As Integer, ByVal hwndCallback As IntPtr) As Long + End Function + _ + Private Shared Function mciSendCommand(ByVal IDDevice As Integer, ByVal uMsg As UInt32, ByVal fdwCommand As Integer, ByVal dwParam As Integer) As Long + End Function + + Private Shared Function GetErrorString(ByVal ErrorCode As Long) As String + With New QWORD(ErrorCode) + GetErrorString = "Device: " & .Integer2 & " - " + Dim buff As New System.Text.StringBuilder(128) + If mciGetErrorString(.Integer1, buff, buff.Capacity) Then + GetErrorString &= buff.ToString + Else + GetErrorString &= "Error code: " & .Integer1 + End If + End With + End Function + _ + Public Shared Function SendString(ByVal command As String, ByVal callback As IntPtr, ByVal returnlength As Integer) As String + Dim buff As System.Text.StringBuilder = Nothing + If returnlength > 0 Then buff = New System.Text.StringBuilder(returnlength) + Dim err As Long = mciSendString(command, buff, returnlength, callback) + If err <> 0 Then + LastError = New Exception(GetErrorString(err)) + Throw LastError + Return "ERROR" + End If + If returnlength = 0 Then Return Nothing Else Return buff.ToString + End Function + _ + Public Shared Sub SendString(ByVal command As String, ByVal callback As IntPtr) + SendString(command, callback, 0) + End Sub + _ + Public Shared Sub SendCommand(ByVal DeviceID As Integer, ByVal Message As UInt32, ByVal Command As IntPtr, ByVal Parameter As Integer) + Dim err As Long = mciSendCommand(DeviceID, Message, Command, Parameter) + If err <> 0 Then + LastError = New Exception(GetErrorString(err)) + Throw LastError + End If + End Sub + End Class + + Public Class DESKTOP + Public Declare Auto Function GetThreadDesktop Lib "user32.dll" (ByVal threadId As Integer) As IntPtr + Public Declare Auto Function OpenInputDesktop Lib "user32.dll" (ByVal flags As Integer, ByVal inherit As Boolean, ByVal desiredAccess As Integer) As IntPtr + Public Declare Auto Function CreateDesktop Lib "user32.dll" (ByVal desktop As String, ByVal device As String, ByVal devmode As IntPtr, ByVal flags As Integer, ByVal desiredAccess As Integer, ByVal lpsa As IntPtr) As IntPtr + Public Declare Auto Function SetThreadDesktop Lib "user32.dll" (ByVal desktop As IntPtr) As Boolean + Public Declare Auto Function SwitchDesktop Lib "user32.dll" (ByVal desktop As IntPtr) As Boolean + Public Declare Auto Function CloseDesktop Lib "user32.dll" (ByVal desktop As IntPtr) As Boolean + End Class +End Class \ No newline at end of file diff --git a/ShiftOS/App.config b/ShiftOS/App.config new file mode 100644 index 0000000..cbaa552 --- /dev/null +++ b/ShiftOS/App.config @@ -0,0 +1,18 @@ + + + + +
+ + + + + + + + + 0 + + + + \ No newline at end of file diff --git a/ShiftOS/ApplicationEvents.vb b/ShiftOS/ApplicationEvents.vb new file mode 100644 index 0000000..973056e --- /dev/null +++ b/ShiftOS/ApplicationEvents.vb @@ -0,0 +1,20 @@ +Imports System.IO + +Namespace My + ' The following events are available for MyApplication: + ' + ' Startup: Raised when the application starts, before the startup form is created. + ' Shutdown: Raised after all application forms are closed. This event is not raised if the application terminates abnormally. + ' UnhandledException: Raised if the application encounters an unhandled exception. + ' StartupNextInstance: Raised when launching a single-instance application and the application is already active. + ' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected. + Partial Friend Class MyApplication + + Protected Overrides Function OnStartup(ByVal eventArgs As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) As Boolean + Return True + End Function + End Class + + +End Namespace + diff --git a/ShiftOS/ArtPad.Designer.vb b/ShiftOS/ArtPad.Designer.vb new file mode 100644 index 0000000..7acdffc --- /dev/null +++ b/ShiftOS/ArtPad.Designer.vb @@ -0,0 +1,3700 @@ + _ +Partial Class ArtPad + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(ArtPad)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnldrawingbackground = New System.Windows.Forms.Panel() + Me.pnlpalletsize = New System.Windows.Forms.Panel() + Me.txttopspace = New System.Windows.Forms.TextBox() + Me.Label40 = New System.Windows.Forms.Label() + Me.txtsidespace = New System.Windows.Forms.TextBox() + Me.Label41 = New System.Windows.Forms.Label() + Me.btnchangesizecancel = New System.Windows.Forms.Button() + Me.btnsetsize = New System.Windows.Forms.Button() + Me.txtcolorpalletheight = New System.Windows.Forms.TextBox() + Me.Label42 = New System.Windows.Forms.Label() + Me.txtcolorpalletwidth = New System.Windows.Forms.TextBox() + Me.Label43 = New System.Windows.Forms.Label() + Me.pnlinitialcanvassettings = New System.Windows.Forms.Panel() + Me.btncancel = New System.Windows.Forms.Button() + Me.btncreate = New System.Windows.Forms.Button() + Me.Label11 = New System.Windows.Forms.Label() + Me.lbltotalpixels = New System.Windows.Forms.Label() + Me.txtnewcanvasheight = New System.Windows.Forms.TextBox() + Me.Label10 = New System.Windows.Forms.Label() + Me.txtnewcanvaswidth = New System.Windows.Forms.TextBox() + Me.Label9 = New System.Windows.Forms.Label() + Me.picdrawingdisplay = New System.Windows.Forms.PictureBox() + Me.pnlbottompanel = New System.Windows.Forms.Panel() + Me.pnlpallet = New System.Windows.Forms.Panel() + Me.flowcolours = New System.Windows.Forms.FlowLayoutPanel() + Me.colourpallet1 = New System.Windows.Forms.Panel() + Me.colourpallet2 = New System.Windows.Forms.Panel() + Me.colourpallet3 = New System.Windows.Forms.Panel() + Me.colourpallet4 = New System.Windows.Forms.Panel() + Me.colourpallet5 = New System.Windows.Forms.Panel() + Me.colourpallet6 = New System.Windows.Forms.Panel() + Me.colourpallet7 = New System.Windows.Forms.Panel() + Me.colourpallet8 = New System.Windows.Forms.Panel() + Me.colourpallet9 = New System.Windows.Forms.Panel() + Me.colourpallet10 = New System.Windows.Forms.Panel() + Me.colourpallet11 = New System.Windows.Forms.Panel() + Me.colourpallet12 = New System.Windows.Forms.Panel() + Me.colourpallet13 = New System.Windows.Forms.Panel() + Me.colourpallet14 = New System.Windows.Forms.Panel() + Me.colourpallet15 = New System.Windows.Forms.Panel() + Me.colourpallet16 = New System.Windows.Forms.Panel() + Me.colourpallet17 = New System.Windows.Forms.Panel() + Me.colourpallet18 = New System.Windows.Forms.Panel() + Me.colourpallet19 = New System.Windows.Forms.Panel() + Me.colourpallet20 = New System.Windows.Forms.Panel() + Me.colourpallet21 = New System.Windows.Forms.Panel() + Me.colourpallet22 = New System.Windows.Forms.Panel() + Me.colourpallet23 = New System.Windows.Forms.Panel() + Me.colourpallet24 = New System.Windows.Forms.Panel() + Me.colourpallet25 = New System.Windows.Forms.Panel() + Me.colourpallet26 = New System.Windows.Forms.Panel() + Me.colourpallet27 = New System.Windows.Forms.Panel() + Me.colourpallet28 = New System.Windows.Forms.Panel() + Me.colourpallet29 = New System.Windows.Forms.Panel() + Me.colourpallet30 = New System.Windows.Forms.Panel() + Me.colourpallet31 = New System.Windows.Forms.Panel() + Me.colourpallet32 = New System.Windows.Forms.Panel() + Me.colourpallet33 = New System.Windows.Forms.Panel() + Me.colourpallet34 = New System.Windows.Forms.Panel() + Me.colourpallet35 = New System.Windows.Forms.Panel() + Me.colourpallet36 = New System.Windows.Forms.Panel() + Me.colourpallet37 = New System.Windows.Forms.Panel() + Me.colourpallet38 = New System.Windows.Forms.Panel() + Me.colourpallet39 = New System.Windows.Forms.Panel() + Me.colourpallet40 = New System.Windows.Forms.Panel() + Me.colourpallet41 = New System.Windows.Forms.Panel() + Me.colourpallet42 = New System.Windows.Forms.Panel() + Me.colourpallet43 = New System.Windows.Forms.Panel() + Me.colourpallet44 = New System.Windows.Forms.Panel() + Me.colourpallet45 = New System.Windows.Forms.Panel() + Me.colourpallet46 = New System.Windows.Forms.Panel() + Me.colourpallet47 = New System.Windows.Forms.Panel() + Me.colourpallet48 = New System.Windows.Forms.Panel() + Me.colourpallet49 = New System.Windows.Forms.Panel() + Me.colourpallet50 = New System.Windows.Forms.Panel() + Me.colourpallet51 = New System.Windows.Forms.Panel() + Me.colourpallet52 = New System.Windows.Forms.Panel() + Me.colourpallet53 = New System.Windows.Forms.Panel() + Me.colourpallet54 = New System.Windows.Forms.Panel() + Me.colourpallet55 = New System.Windows.Forms.Panel() + Me.colourpallet56 = New System.Windows.Forms.Panel() + Me.colourpallet57 = New System.Windows.Forms.Panel() + Me.colourpallet58 = New System.Windows.Forms.Panel() + Me.colourpallet59 = New System.Windows.Forms.Panel() + Me.colourpallet60 = New System.Windows.Forms.Panel() + Me.colourpallet61 = New System.Windows.Forms.Panel() + Me.colourpallet62 = New System.Windows.Forms.Panel() + Me.colourpallet63 = New System.Windows.Forms.Panel() + Me.colourpallet64 = New System.Windows.Forms.Panel() + Me.colourpallet65 = New System.Windows.Forms.Panel() + Me.colourpallet66 = New System.Windows.Forms.Panel() + Me.colourpallet67 = New System.Windows.Forms.Panel() + Me.colourpallet68 = New System.Windows.Forms.Panel() + Me.colourpallet69 = New System.Windows.Forms.Panel() + Me.colourpallet70 = New System.Windows.Forms.Panel() + Me.colourpallet71 = New System.Windows.Forms.Panel() + Me.colourpallet72 = New System.Windows.Forms.Panel() + Me.colourpallet73 = New System.Windows.Forms.Panel() + Me.colourpallet74 = New System.Windows.Forms.Panel() + Me.colourpallet75 = New System.Windows.Forms.Panel() + Me.colourpallet76 = New System.Windows.Forms.Panel() + Me.colourpallet77 = New System.Windows.Forms.Panel() + Me.colourpallet78 = New System.Windows.Forms.Panel() + Me.colourpallet79 = New System.Windows.Forms.Panel() + Me.colourpallet80 = New System.Windows.Forms.Panel() + Me.colourpallet81 = New System.Windows.Forms.Panel() + Me.colourpallet82 = New System.Windows.Forms.Panel() + Me.colourpallet83 = New System.Windows.Forms.Panel() + Me.colourpallet84 = New System.Windows.Forms.Panel() + Me.colourpallet85 = New System.Windows.Forms.Panel() + Me.colourpallet86 = New System.Windows.Forms.Panel() + Me.colourpallet87 = New System.Windows.Forms.Panel() + Me.colourpallet88 = New System.Windows.Forms.Panel() + Me.colourpallet89 = New System.Windows.Forms.Panel() + Me.colourpallet90 = New System.Windows.Forms.Panel() + Me.colourpallet91 = New System.Windows.Forms.Panel() + Me.colourpallet92 = New System.Windows.Forms.Panel() + Me.colourpallet93 = New System.Windows.Forms.Panel() + Me.colourpallet94 = New System.Windows.Forms.Panel() + Me.colourpallet95 = New System.Windows.Forms.Panel() + Me.colourpallet96 = New System.Windows.Forms.Panel() + Me.colourpallet97 = New System.Windows.Forms.Panel() + Me.colourpallet98 = New System.Windows.Forms.Panel() + Me.colourpallet99 = New System.Windows.Forms.Panel() + Me.colourpallet100 = New System.Windows.Forms.Panel() + Me.colourpallet101 = New System.Windows.Forms.Panel() + Me.colourpallet102 = New System.Windows.Forms.Panel() + Me.colourpallet103 = New System.Windows.Forms.Panel() + Me.colourpallet104 = New System.Windows.Forms.Panel() + Me.colourpallet105 = New System.Windows.Forms.Panel() + Me.colourpallet106 = New System.Windows.Forms.Panel() + Me.colourpallet107 = New System.Windows.Forms.Panel() + Me.colourpallet108 = New System.Windows.Forms.Panel() + Me.colourpallet109 = New System.Windows.Forms.Panel() + Me.colourpallet110 = New System.Windows.Forms.Panel() + Me.colourpallet111 = New System.Windows.Forms.Panel() + Me.colourpallet112 = New System.Windows.Forms.Panel() + Me.colourpallet113 = New System.Windows.Forms.Panel() + Me.colourpallet114 = New System.Windows.Forms.Panel() + Me.colourpallet115 = New System.Windows.Forms.Panel() + Me.colourpallet116 = New System.Windows.Forms.Panel() + Me.colourpallet117 = New System.Windows.Forms.Panel() + Me.colourpallet118 = New System.Windows.Forms.Panel() + Me.colourpallet119 = New System.Windows.Forms.Panel() + Me.colourpallet120 = New System.Windows.Forms.Panel() + Me.colourpallet121 = New System.Windows.Forms.Panel() + Me.colourpallet122 = New System.Windows.Forms.Panel() + Me.colourpallet123 = New System.Windows.Forms.Panel() + Me.colourpallet124 = New System.Windows.Forms.Panel() + Me.colourpallet125 = New System.Windows.Forms.Panel() + Me.colourpallet126 = New System.Windows.Forms.Panel() + Me.colourpallet127 = New System.Windows.Forms.Panel() + Me.colourpallet128 = New System.Windows.Forms.Panel() + Me.Label4 = New System.Windows.Forms.Label() + Me.line6 = New System.Windows.Forms.Panel() + Me.pnltoolproperties = New System.Windows.Forms.Panel() + Me.pnltexttoolsettings = New System.Windows.Forms.Panel() + Me.Label35 = New System.Windows.Forms.Label() + Me.combofontstyle = New System.Windows.Forms.ComboBox() + Me.txtdrawstringtext = New System.Windows.Forms.TextBox() + Me.combodrawtextfont = New System.Windows.Forms.ComboBox() + Me.Label25 = New System.Windows.Forms.Label() + Me.txtdrawtextsize = New System.Windows.Forms.TextBox() + Me.Label32 = New System.Windows.Forms.Label() + Me.Label33 = New System.Windows.Forms.Label() + Me.Label34 = New System.Windows.Forms.Label() + Me.pnlpixelsettersettings = New System.Windows.Forms.Panel() + Me.btnpixelsettersetpixel = New System.Windows.Forms.Button() + Me.txtpixelsetterycoordinate = New System.Windows.Forms.TextBox() + Me.txtpixelsetterxcoordinate = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.pnlpaintbrushtoolsettings = New System.Windows.Forms.Panel() + Me.Label36 = New System.Windows.Forms.Label() + Me.btnpaintsquareshape = New System.Windows.Forms.Button() + Me.btnpaintcircleshape = New System.Windows.Forms.Button() + Me.Label37 = New System.Windows.Forms.Label() + Me.txtpaintbrushsize = New System.Windows.Forms.TextBox() + Me.Label38 = New System.Windows.Forms.Label() + Me.Label39 = New System.Windows.Forms.Label() + Me.pnllinetoolsettings = New System.Windows.Forms.Panel() + Me.Label29 = New System.Windows.Forms.Label() + Me.txtlinewidth = New System.Windows.Forms.TextBox() + Me.Label30 = New System.Windows.Forms.Label() + Me.Label31 = New System.Windows.Forms.Label() + Me.pnlmagnifiersettings = New System.Windows.Forms.Panel() + Me.btnzoomout = New System.Windows.Forms.Button() + Me.btnzoomin = New System.Windows.Forms.Button() + Me.lblzoomlevel = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.pnleracertoolsettings = New System.Windows.Forms.Panel() + Me.Label28 = New System.Windows.Forms.Label() + Me.btneracersquare = New System.Windows.Forms.Button() + Me.btneracercircle = New System.Windows.Forms.Button() + Me.Label24 = New System.Windows.Forms.Label() + Me.txteracersize = New System.Windows.Forms.TextBox() + Me.Label26 = New System.Windows.Forms.Label() + Me.Label27 = New System.Windows.Forms.Label() + Me.pnlfloodfillsettings = New System.Windows.Forms.Panel() + Me.Label12 = New System.Windows.Forms.Label() + Me.Label15 = New System.Windows.Forms.Label() + Me.pnlovaltoolsettings = New System.Windows.Forms.Panel() + Me.Label20 = New System.Windows.Forms.Label() + Me.btnovalfillonoff = New System.Windows.Forms.Button() + Me.pnlovalfillcolour = New System.Windows.Forms.Panel() + Me.txtovalborderwidth = New System.Windows.Forms.TextBox() + Me.Label21 = New System.Windows.Forms.Label() + Me.Label22 = New System.Windows.Forms.Label() + Me.Label23 = New System.Windows.Forms.Label() + Me.pnlsquaretoolsettings = New System.Windows.Forms.Panel() + Me.Label19 = New System.Windows.Forms.Label() + Me.btnsquarefillonoff = New System.Windows.Forms.Button() + Me.pnlsquarefillcolour = New System.Windows.Forms.Panel() + Me.txtsquareborderwidth = New System.Windows.Forms.TextBox() + Me.Label16 = New System.Windows.Forms.Label() + Me.Label18 = New System.Windows.Forms.Label() + Me.Label17 = New System.Windows.Forms.Label() + Me.pnlpixelplacersettings = New System.Windows.Forms.Panel() + Me.lblpixelplacerhelp = New System.Windows.Forms.Label() + Me.btnpixelplacermovementmode = New System.Windows.Forms.Button() + Me.Label8 = New System.Windows.Forms.Label() + Me.pnlpencilsettings = New System.Windows.Forms.Panel() + Me.btnpencilsize3 = New System.Windows.Forms.Button() + Me.btnpencilsize2 = New System.Windows.Forms.Button() + Me.btnpencilsize1 = New System.Windows.Forms.Button() + Me.Label14 = New System.Windows.Forms.Label() + Me.Label6 = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.line5 = New System.Windows.Forms.Panel() + Me.line3 = New System.Windows.Forms.Panel() + Me.pnltools = New System.Windows.Forms.Panel() + Me.pnltoolpositioner = New System.Windows.Forms.FlowLayoutPanel() + Me.btnpixelsetter = New System.Windows.Forms.Button() + Me.btnpixelplacer = New System.Windows.Forms.Button() + Me.btnpencil = New System.Windows.Forms.Button() + Me.btnfloodfill = New System.Windows.Forms.Button() + Me.btnoval = New System.Windows.Forms.Button() + Me.btnsquare = New System.Windows.Forms.Button() + Me.btnlinetool = New System.Windows.Forms.Button() + Me.btnpaintbrush = New System.Windows.Forms.Button() + Me.btntexttool = New System.Windows.Forms.Button() + Me.btneracer = New System.Windows.Forms.Button() + Me.btnnew = New System.Windows.Forms.Button() + Me.btnmagnify = New System.Windows.Forms.Button() + Me.btnopen = New System.Windows.Forms.Button() + Me.btnsave = New System.Windows.Forms.Button() + Me.btnundo = New System.Windows.Forms.Button() + Me.btnredo = New System.Windows.Forms.Button() + Me.line1 = New System.Windows.Forms.Panel() + Me.pnltoolpreview = New System.Windows.Forms.Panel() + Me.Label13 = New System.Windows.Forms.Label() + Me.picpreview = New System.Windows.Forms.PictureBox() + Me.lbltoolselected = New System.Windows.Forms.Label() + Me.line4 = New System.Windows.Forms.Panel() + Me.line2 = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.tmrcodepointcooldown = New System.Windows.Forms.Timer(Me.components) + Me.tmrshowearnedcodepoints = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + Me.pnldrawingbackground.SuspendLayout() + Me.pnlpalletsize.SuspendLayout() + Me.pnlinitialcanvassettings.SuspendLayout() + CType(Me.picdrawingdisplay, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlbottompanel.SuspendLayout() + Me.pnlpallet.SuspendLayout() + Me.flowcolours.SuspendLayout() + Me.pnltoolproperties.SuspendLayout() + Me.pnltexttoolsettings.SuspendLayout() + Me.pnlpixelsettersettings.SuspendLayout() + Me.pnlpaintbrushtoolsettings.SuspendLayout() + Me.pnllinetoolsettings.SuspendLayout() + Me.pnlmagnifiersettings.SuspendLayout() + Me.pnleracertoolsettings.SuspendLayout() + Me.pnlfloodfillsettings.SuspendLayout() + Me.pnlovaltoolsettings.SuspendLayout() + Me.pnlsquaretoolsettings.SuspendLayout() + Me.pnlpixelplacersettings.SuspendLayout() + Me.pnlpencilsettings.SuspendLayout() + Me.pnltools.SuspendLayout() + Me.pnltoolpositioner.SuspendLayout() + Me.pnltoolpreview.SuspendLayout() + CType(Me.picpreview, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnldrawingbackground) + Me.pgcontents.Controls.Add(Me.pnlbottompanel) + Me.pgcontents.Controls.Add(Me.pnltools) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(798, 566) + Me.pgcontents.TabIndex = 20 + ' + 'pnldrawingbackground + ' + Me.pnldrawingbackground.AutoScroll = True + Me.pnldrawingbackground.BackColor = System.Drawing.Color.Gray + Me.pnldrawingbackground.Controls.Add(Me.pnlpalletsize) + Me.pnldrawingbackground.Controls.Add(Me.pnlinitialcanvassettings) + Me.pnldrawingbackground.Controls.Add(Me.picdrawingdisplay) + Me.pnldrawingbackground.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnldrawingbackground.Location = New System.Drawing.Point(120, 0) + Me.pnldrawingbackground.Name = "pnldrawingbackground" + Me.pnldrawingbackground.Size = New System.Drawing.Size(678, 466) + Me.pnldrawingbackground.TabIndex = 2 + ' + 'pnlpalletsize + ' + Me.pnlpalletsize.BackColor = System.Drawing.Color.White + Me.pnlpalletsize.Controls.Add(Me.txttopspace) + Me.pnlpalletsize.Controls.Add(Me.Label40) + Me.pnlpalletsize.Controls.Add(Me.txtsidespace) + Me.pnlpalletsize.Controls.Add(Me.Label41) + Me.pnlpalletsize.Controls.Add(Me.btnchangesizecancel) + Me.pnlpalletsize.Controls.Add(Me.btnsetsize) + Me.pnlpalletsize.Controls.Add(Me.txtcolorpalletheight) + Me.pnlpalletsize.Controls.Add(Me.Label42) + Me.pnlpalletsize.Controls.Add(Me.txtcolorpalletwidth) + Me.pnlpalletsize.Controls.Add(Me.Label43) + Me.pnlpalletsize.Location = New System.Drawing.Point(207, 178) + Me.pnlpalletsize.Name = "pnlpalletsize" + Me.pnlpalletsize.Size = New System.Drawing.Size(259, 100) + Me.pnlpalletsize.TabIndex = 2 + Me.pnlpalletsize.Visible = False + ' + 'txttopspace + ' + Me.txttopspace.BackColor = System.Drawing.Color.White + Me.txttopspace.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttopspace.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttopspace.Location = New System.Drawing.Point(198, 38) + Me.txttopspace.Name = "txttopspace" + Me.txttopspace.Size = New System.Drawing.Size(54, 22) + Me.txttopspace.TabIndex = 11 + ' + 'Label40 + ' + Me.Label40.AutoSize = True + Me.Label40.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label40.Location = New System.Drawing.Point(115, 40) + Me.Label40.Name = "Label40" + Me.Label40.Size = New System.Drawing.Size(79, 16) + Me.Label40.TabIndex = 10 + Me.Label40.Text = "Top Space:" + ' + 'txtsidespace + ' + Me.txtsidespace.BackColor = System.Drawing.Color.White + Me.txtsidespace.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtsidespace.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtsidespace.Location = New System.Drawing.Point(198, 10) + Me.txtsidespace.Name = "txtsidespace" + Me.txtsidespace.Size = New System.Drawing.Size(54, 22) + Me.txtsidespace.TabIndex = 9 + ' + 'Label41 + ' + Me.Label41.AutoSize = True + Me.Label41.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label41.Location = New System.Drawing.Point(115, 12) + Me.Label41.Name = "Label41" + Me.Label41.Size = New System.Drawing.Size(82, 16) + Me.Label41.TabIndex = 8 + Me.Label41.Text = "Side Space:" + ' + 'btnchangesizecancel + ' + Me.btnchangesizecancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnchangesizecancel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnchangesizecancel.Location = New System.Drawing.Point(7, 66) + Me.btnchangesizecancel.Name = "btnchangesizecancel" + Me.btnchangesizecancel.Size = New System.Drawing.Size(121, 28) + Me.btnchangesizecancel.TabIndex = 7 + Me.btnchangesizecancel.Text = "Close" + Me.btnchangesizecancel.UseVisualStyleBackColor = True + ' + 'btnsetsize + ' + Me.btnsetsize.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsetsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsetsize.Location = New System.Drawing.Point(133, 66) + Me.btnsetsize.Name = "btnsetsize" + Me.btnsetsize.Size = New System.Drawing.Size(119, 28) + Me.btnsetsize.TabIndex = 6 + Me.btnsetsize.Text = "Set Size" + Me.btnsetsize.UseVisualStyleBackColor = True + ' + 'txtcolorpalletheight + ' + Me.txtcolorpalletheight.BackColor = System.Drawing.Color.White + Me.txtcolorpalletheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtcolorpalletheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtcolorpalletheight.Location = New System.Drawing.Point(59, 37) + Me.txtcolorpalletheight.Name = "txtcolorpalletheight" + Me.txtcolorpalletheight.Size = New System.Drawing.Size(54, 22) + Me.txtcolorpalletheight.TabIndex = 3 + ' + 'Label42 + ' + Me.Label42.AutoSize = True + Me.Label42.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label42.Location = New System.Drawing.Point(8, 40) + Me.Label42.Name = "Label42" + Me.Label42.Size = New System.Drawing.Size(50, 16) + Me.Label42.TabIndex = 2 + Me.Label42.Text = "Height:" + ' + 'txtcolorpalletwidth + ' + Me.txtcolorpalletwidth.BackColor = System.Drawing.Color.White + Me.txtcolorpalletwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtcolorpalletwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtcolorpalletwidth.Location = New System.Drawing.Point(59, 9) + Me.txtcolorpalletwidth.Name = "txtcolorpalletwidth" + Me.txtcolorpalletwidth.Size = New System.Drawing.Size(54, 22) + Me.txtcolorpalletwidth.TabIndex = 1 + ' + 'Label43 + ' + Me.Label43.AutoSize = True + Me.Label43.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label43.Location = New System.Drawing.Point(8, 12) + Me.Label43.Name = "Label43" + Me.Label43.Size = New System.Drawing.Size(45, 16) + Me.Label43.TabIndex = 0 + Me.Label43.Text = "Width:" + ' + 'pnlinitialcanvassettings + ' + Me.pnlinitialcanvassettings.BackColor = System.Drawing.Color.White + Me.pnlinitialcanvassettings.Controls.Add(Me.btncancel) + Me.pnlinitialcanvassettings.Controls.Add(Me.btncreate) + Me.pnlinitialcanvassettings.Controls.Add(Me.Label11) + Me.pnlinitialcanvassettings.Controls.Add(Me.lbltotalpixels) + Me.pnlinitialcanvassettings.Controls.Add(Me.txtnewcanvasheight) + Me.pnlinitialcanvassettings.Controls.Add(Me.Label10) + Me.pnlinitialcanvassettings.Controls.Add(Me.txtnewcanvaswidth) + Me.pnlinitialcanvassettings.Controls.Add(Me.Label9) + Me.pnlinitialcanvassettings.Location = New System.Drawing.Point(223, 178) + Me.pnlinitialcanvassettings.Name = "pnlinitialcanvassettings" + Me.pnlinitialcanvassettings.Size = New System.Drawing.Size(223, 100) + Me.pnlinitialcanvassettings.TabIndex = 1 + ' + 'btncancel + ' + Me.btncancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncancel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btncancel.Location = New System.Drawing.Point(7, 66) + Me.btncancel.Name = "btncancel" + Me.btncancel.Size = New System.Drawing.Size(102, 28) + Me.btncancel.TabIndex = 7 + Me.btncancel.Text = "Cancel" + Me.btncancel.UseVisualStyleBackColor = True + ' + 'btncreate + ' + Me.btncreate.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncreate.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btncreate.Location = New System.Drawing.Point(114, 66) + Me.btncreate.Name = "btncreate" + Me.btncreate.Size = New System.Drawing.Size(102, 28) + Me.btncreate.TabIndex = 6 + Me.btncreate.Text = "Create" + Me.btncreate.UseVisualStyleBackColor = True + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label11.Location = New System.Drawing.Point(124, 9) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(88, 20) + Me.Label11.TabIndex = 5 + Me.Label11.Text = "Total Pixels" + ' + 'lbltotalpixels + ' + Me.lbltotalpixels.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltotalpixels.Location = New System.Drawing.Point(114, 30) + Me.lbltotalpixels.Name = "lbltotalpixels" + Me.lbltotalpixels.Size = New System.Drawing.Size(106, 29) + Me.lbltotalpixels.TabIndex = 4 + Me.lbltotalpixels.Text = "0" + Me.lbltotalpixels.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'txtnewcanvasheight + ' + Me.txtnewcanvasheight.BackColor = System.Drawing.Color.White + Me.txtnewcanvasheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtnewcanvasheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtnewcanvasheight.Location = New System.Drawing.Point(59, 37) + Me.txtnewcanvasheight.MaxLength = 4 + Me.txtnewcanvasheight.Name = "txtnewcanvasheight" + Me.txtnewcanvasheight.Size = New System.Drawing.Size(54, 22) + Me.txtnewcanvasheight.TabIndex = 3 + ' + 'Label10 + ' + Me.Label10.AutoSize = True + Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label10.Location = New System.Drawing.Point(8, 40) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(50, 16) + Me.Label10.TabIndex = 2 + Me.Label10.Text = "Height:" + ' + 'txtnewcanvaswidth + ' + Me.txtnewcanvaswidth.BackColor = System.Drawing.Color.White + Me.txtnewcanvaswidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtnewcanvaswidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtnewcanvaswidth.Location = New System.Drawing.Point(59, 9) + Me.txtnewcanvaswidth.MaxLength = 4 + Me.txtnewcanvaswidth.Name = "txtnewcanvaswidth" + Me.txtnewcanvaswidth.Size = New System.Drawing.Size(54, 22) + Me.txtnewcanvaswidth.TabIndex = 1 + ' + 'Label9 + ' + Me.Label9.AutoSize = True + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(8, 12) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(45, 16) + Me.Label9.TabIndex = 0 + Me.Label9.Text = "Width:" + ' + 'picdrawingdisplay + ' + Me.picdrawingdisplay.BackColor = System.Drawing.Color.White + Me.picdrawingdisplay.Location = New System.Drawing.Point(180, 108) + Me.picdrawingdisplay.Name = "picdrawingdisplay" + Me.picdrawingdisplay.Size = New System.Drawing.Size(100, 50) + Me.picdrawingdisplay.TabIndex = 0 + Me.picdrawingdisplay.TabStop = False + Me.picdrawingdisplay.Visible = False + ' + 'pnlbottompanel + ' + Me.pnlbottompanel.Controls.Add(Me.pnlpallet) + Me.pnlbottompanel.Controls.Add(Me.pnltoolproperties) + Me.pnlbottompanel.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlbottompanel.Location = New System.Drawing.Point(120, 466) + Me.pnlbottompanel.Name = "pnlbottompanel" + Me.pnlbottompanel.Size = New System.Drawing.Size(678, 100) + Me.pnlbottompanel.TabIndex = 1 + ' + 'pnlpallet + ' + Me.pnlpallet.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.pnlpallet.Controls.Add(Me.flowcolours) + Me.pnlpallet.Controls.Add(Me.Label4) + Me.pnlpallet.Controls.Add(Me.line6) + Me.pnlpallet.Location = New System.Drawing.Point(457, 0) + Me.pnlpallet.Name = "pnlpallet" + Me.pnlpallet.Size = New System.Drawing.Size(221, 100) + Me.pnlpallet.TabIndex = 0 + ' + 'flowcolours + ' + Me.flowcolours.Controls.Add(Me.colourpallet1) + Me.flowcolours.Controls.Add(Me.colourpallet2) + Me.flowcolours.Controls.Add(Me.colourpallet3) + Me.flowcolours.Controls.Add(Me.colourpallet4) + Me.flowcolours.Controls.Add(Me.colourpallet5) + Me.flowcolours.Controls.Add(Me.colourpallet6) + Me.flowcolours.Controls.Add(Me.colourpallet7) + Me.flowcolours.Controls.Add(Me.colourpallet8) + Me.flowcolours.Controls.Add(Me.colourpallet9) + Me.flowcolours.Controls.Add(Me.colourpallet10) + Me.flowcolours.Controls.Add(Me.colourpallet11) + Me.flowcolours.Controls.Add(Me.colourpallet12) + Me.flowcolours.Controls.Add(Me.colourpallet13) + Me.flowcolours.Controls.Add(Me.colourpallet14) + Me.flowcolours.Controls.Add(Me.colourpallet15) + Me.flowcolours.Controls.Add(Me.colourpallet16) + Me.flowcolours.Controls.Add(Me.colourpallet17) + Me.flowcolours.Controls.Add(Me.colourpallet18) + Me.flowcolours.Controls.Add(Me.colourpallet19) + Me.flowcolours.Controls.Add(Me.colourpallet20) + Me.flowcolours.Controls.Add(Me.colourpallet21) + Me.flowcolours.Controls.Add(Me.colourpallet22) + Me.flowcolours.Controls.Add(Me.colourpallet23) + Me.flowcolours.Controls.Add(Me.colourpallet24) + Me.flowcolours.Controls.Add(Me.colourpallet25) + Me.flowcolours.Controls.Add(Me.colourpallet26) + Me.flowcolours.Controls.Add(Me.colourpallet27) + Me.flowcolours.Controls.Add(Me.colourpallet28) + Me.flowcolours.Controls.Add(Me.colourpallet29) + Me.flowcolours.Controls.Add(Me.colourpallet30) + Me.flowcolours.Controls.Add(Me.colourpallet31) + Me.flowcolours.Controls.Add(Me.colourpallet32) + Me.flowcolours.Controls.Add(Me.colourpallet33) + Me.flowcolours.Controls.Add(Me.colourpallet34) + Me.flowcolours.Controls.Add(Me.colourpallet35) + Me.flowcolours.Controls.Add(Me.colourpallet36) + Me.flowcolours.Controls.Add(Me.colourpallet37) + Me.flowcolours.Controls.Add(Me.colourpallet38) + Me.flowcolours.Controls.Add(Me.colourpallet39) + Me.flowcolours.Controls.Add(Me.colourpallet40) + Me.flowcolours.Controls.Add(Me.colourpallet41) + Me.flowcolours.Controls.Add(Me.colourpallet42) + Me.flowcolours.Controls.Add(Me.colourpallet43) + Me.flowcolours.Controls.Add(Me.colourpallet44) + Me.flowcolours.Controls.Add(Me.colourpallet45) + Me.flowcolours.Controls.Add(Me.colourpallet46) + Me.flowcolours.Controls.Add(Me.colourpallet47) + Me.flowcolours.Controls.Add(Me.colourpallet48) + Me.flowcolours.Controls.Add(Me.colourpallet49) + Me.flowcolours.Controls.Add(Me.colourpallet50) + Me.flowcolours.Controls.Add(Me.colourpallet51) + Me.flowcolours.Controls.Add(Me.colourpallet52) + Me.flowcolours.Controls.Add(Me.colourpallet53) + Me.flowcolours.Controls.Add(Me.colourpallet54) + Me.flowcolours.Controls.Add(Me.colourpallet55) + Me.flowcolours.Controls.Add(Me.colourpallet56) + Me.flowcolours.Controls.Add(Me.colourpallet57) + Me.flowcolours.Controls.Add(Me.colourpallet58) + Me.flowcolours.Controls.Add(Me.colourpallet59) + Me.flowcolours.Controls.Add(Me.colourpallet60) + Me.flowcolours.Controls.Add(Me.colourpallet61) + Me.flowcolours.Controls.Add(Me.colourpallet62) + Me.flowcolours.Controls.Add(Me.colourpallet63) + Me.flowcolours.Controls.Add(Me.colourpallet64) + Me.flowcolours.Controls.Add(Me.colourpallet65) + Me.flowcolours.Controls.Add(Me.colourpallet66) + Me.flowcolours.Controls.Add(Me.colourpallet67) + Me.flowcolours.Controls.Add(Me.colourpallet68) + Me.flowcolours.Controls.Add(Me.colourpallet69) + Me.flowcolours.Controls.Add(Me.colourpallet70) + Me.flowcolours.Controls.Add(Me.colourpallet71) + Me.flowcolours.Controls.Add(Me.colourpallet72) + Me.flowcolours.Controls.Add(Me.colourpallet73) + Me.flowcolours.Controls.Add(Me.colourpallet74) + Me.flowcolours.Controls.Add(Me.colourpallet75) + Me.flowcolours.Controls.Add(Me.colourpallet76) + Me.flowcolours.Controls.Add(Me.colourpallet77) + Me.flowcolours.Controls.Add(Me.colourpallet78) + Me.flowcolours.Controls.Add(Me.colourpallet79) + Me.flowcolours.Controls.Add(Me.colourpallet80) + Me.flowcolours.Controls.Add(Me.colourpallet81) + Me.flowcolours.Controls.Add(Me.colourpallet82) + Me.flowcolours.Controls.Add(Me.colourpallet83) + Me.flowcolours.Controls.Add(Me.colourpallet84) + Me.flowcolours.Controls.Add(Me.colourpallet85) + Me.flowcolours.Controls.Add(Me.colourpallet86) + Me.flowcolours.Controls.Add(Me.colourpallet87) + Me.flowcolours.Controls.Add(Me.colourpallet88) + Me.flowcolours.Controls.Add(Me.colourpallet89) + Me.flowcolours.Controls.Add(Me.colourpallet90) + Me.flowcolours.Controls.Add(Me.colourpallet91) + Me.flowcolours.Controls.Add(Me.colourpallet92) + Me.flowcolours.Controls.Add(Me.colourpallet93) + Me.flowcolours.Controls.Add(Me.colourpallet94) + Me.flowcolours.Controls.Add(Me.colourpallet95) + Me.flowcolours.Controls.Add(Me.colourpallet96) + Me.flowcolours.Controls.Add(Me.colourpallet97) + Me.flowcolours.Controls.Add(Me.colourpallet98) + Me.flowcolours.Controls.Add(Me.colourpallet99) + Me.flowcolours.Controls.Add(Me.colourpallet100) + Me.flowcolours.Controls.Add(Me.colourpallet101) + Me.flowcolours.Controls.Add(Me.colourpallet102) + Me.flowcolours.Controls.Add(Me.colourpallet103) + Me.flowcolours.Controls.Add(Me.colourpallet104) + Me.flowcolours.Controls.Add(Me.colourpallet105) + Me.flowcolours.Controls.Add(Me.colourpallet106) + Me.flowcolours.Controls.Add(Me.colourpallet107) + Me.flowcolours.Controls.Add(Me.colourpallet108) + Me.flowcolours.Controls.Add(Me.colourpallet109) + Me.flowcolours.Controls.Add(Me.colourpallet110) + Me.flowcolours.Controls.Add(Me.colourpallet111) + Me.flowcolours.Controls.Add(Me.colourpallet112) + Me.flowcolours.Controls.Add(Me.colourpallet113) + Me.flowcolours.Controls.Add(Me.colourpallet114) + Me.flowcolours.Controls.Add(Me.colourpallet115) + Me.flowcolours.Controls.Add(Me.colourpallet116) + Me.flowcolours.Controls.Add(Me.colourpallet117) + Me.flowcolours.Controls.Add(Me.colourpallet118) + Me.flowcolours.Controls.Add(Me.colourpallet119) + Me.flowcolours.Controls.Add(Me.colourpallet120) + Me.flowcolours.Controls.Add(Me.colourpallet121) + Me.flowcolours.Controls.Add(Me.colourpallet122) + Me.flowcolours.Controls.Add(Me.colourpallet123) + Me.flowcolours.Controls.Add(Me.colourpallet124) + Me.flowcolours.Controls.Add(Me.colourpallet125) + Me.flowcolours.Controls.Add(Me.colourpallet126) + Me.flowcolours.Controls.Add(Me.colourpallet127) + Me.flowcolours.Controls.Add(Me.colourpallet128) + Me.flowcolours.Dock = System.Windows.Forms.DockStyle.Bottom + Me.flowcolours.Location = New System.Drawing.Point(0, 27) + Me.flowcolours.Name = "flowcolours" + Me.flowcolours.Padding = New System.Windows.Forms.Padding(1, 1, 0, 0) + Me.flowcolours.Size = New System.Drawing.Size(221, 73) + Me.flowcolours.TabIndex = 12 + ' + 'colourpallet1 + ' + Me.colourpallet1.BackColor = System.Drawing.Color.Black + Me.colourpallet1.Location = New System.Drawing.Point(2, 1) + Me.colourpallet1.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet1.Name = "colourpallet1" + Me.colourpallet1.Size = New System.Drawing.Size(12, 8) + Me.colourpallet1.TabIndex = 5 + Me.colourpallet1.Visible = False + ' + 'colourpallet2 + ' + Me.colourpallet2.BackColor = System.Drawing.Color.Black + Me.colourpallet2.Location = New System.Drawing.Point(15, 1) + Me.colourpallet2.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet2.Name = "colourpallet2" + Me.colourpallet2.Size = New System.Drawing.Size(12, 8) + Me.colourpallet2.TabIndex = 9 + Me.colourpallet2.Visible = False + ' + 'colourpallet3 + ' + Me.colourpallet3.BackColor = System.Drawing.Color.Black + Me.colourpallet3.Location = New System.Drawing.Point(28, 1) + Me.colourpallet3.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet3.Name = "colourpallet3" + Me.colourpallet3.Size = New System.Drawing.Size(12, 8) + Me.colourpallet3.TabIndex = 13 + Me.colourpallet3.Visible = False + ' + 'colourpallet4 + ' + Me.colourpallet4.BackColor = System.Drawing.Color.Black + Me.colourpallet4.Location = New System.Drawing.Point(41, 1) + Me.colourpallet4.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet4.Name = "colourpallet4" + Me.colourpallet4.Size = New System.Drawing.Size(12, 8) + Me.colourpallet4.TabIndex = 9 + Me.colourpallet4.Visible = False + ' + 'colourpallet5 + ' + Me.colourpallet5.BackColor = System.Drawing.Color.Black + Me.colourpallet5.Location = New System.Drawing.Point(54, 1) + Me.colourpallet5.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet5.Name = "colourpallet5" + Me.colourpallet5.Size = New System.Drawing.Size(12, 8) + Me.colourpallet5.TabIndex = 18 + Me.colourpallet5.Visible = False + ' + 'colourpallet6 + ' + Me.colourpallet6.BackColor = System.Drawing.Color.Black + Me.colourpallet6.Location = New System.Drawing.Point(67, 1) + Me.colourpallet6.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet6.Name = "colourpallet6" + Me.colourpallet6.Size = New System.Drawing.Size(12, 8) + Me.colourpallet6.TabIndex = 17 + Me.colourpallet6.Visible = False + ' + 'colourpallet7 + ' + Me.colourpallet7.BackColor = System.Drawing.Color.Black + Me.colourpallet7.Location = New System.Drawing.Point(80, 1) + Me.colourpallet7.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet7.Name = "colourpallet7" + Me.colourpallet7.Size = New System.Drawing.Size(12, 8) + Me.colourpallet7.TabIndex = 14 + Me.colourpallet7.Visible = False + ' + 'colourpallet8 + ' + Me.colourpallet8.BackColor = System.Drawing.Color.Black + Me.colourpallet8.Location = New System.Drawing.Point(93, 1) + Me.colourpallet8.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet8.Name = "colourpallet8" + Me.colourpallet8.Size = New System.Drawing.Size(12, 8) + Me.colourpallet8.TabIndex = 13 + Me.colourpallet8.Visible = False + ' + 'colourpallet9 + ' + Me.colourpallet9.BackColor = System.Drawing.Color.Black + Me.colourpallet9.Location = New System.Drawing.Point(106, 1) + Me.colourpallet9.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet9.Name = "colourpallet9" + Me.colourpallet9.Size = New System.Drawing.Size(12, 8) + Me.colourpallet9.TabIndex = 15 + Me.colourpallet9.Visible = False + ' + 'colourpallet10 + ' + Me.colourpallet10.BackColor = System.Drawing.Color.Black + Me.colourpallet10.Location = New System.Drawing.Point(119, 1) + Me.colourpallet10.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet10.Name = "colourpallet10" + Me.colourpallet10.Size = New System.Drawing.Size(12, 8) + Me.colourpallet10.TabIndex = 11 + Me.colourpallet10.Visible = False + ' + 'colourpallet11 + ' + Me.colourpallet11.BackColor = System.Drawing.Color.Black + Me.colourpallet11.Location = New System.Drawing.Point(132, 1) + Me.colourpallet11.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet11.Name = "colourpallet11" + Me.colourpallet11.Size = New System.Drawing.Size(12, 8) + Me.colourpallet11.TabIndex = 12 + Me.colourpallet11.Visible = False + ' + 'colourpallet12 + ' + Me.colourpallet12.BackColor = System.Drawing.Color.Black + Me.colourpallet12.Location = New System.Drawing.Point(145, 1) + Me.colourpallet12.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet12.Name = "colourpallet12" + Me.colourpallet12.Size = New System.Drawing.Size(12, 8) + Me.colourpallet12.TabIndex = 16 + Me.colourpallet12.Visible = False + ' + 'colourpallet13 + ' + Me.colourpallet13.BackColor = System.Drawing.Color.Black + Me.colourpallet13.Location = New System.Drawing.Point(158, 1) + Me.colourpallet13.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet13.Name = "colourpallet13" + Me.colourpallet13.Size = New System.Drawing.Size(12, 8) + Me.colourpallet13.TabIndex = 10 + Me.colourpallet13.Visible = False + ' + 'colourpallet14 + ' + Me.colourpallet14.BackColor = System.Drawing.Color.Black + Me.colourpallet14.Location = New System.Drawing.Point(171, 1) + Me.colourpallet14.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet14.Name = "colourpallet14" + Me.colourpallet14.Size = New System.Drawing.Size(12, 8) + Me.colourpallet14.TabIndex = 20 + Me.colourpallet14.Visible = False + ' + 'colourpallet15 + ' + Me.colourpallet15.BackColor = System.Drawing.Color.Black + Me.colourpallet15.Location = New System.Drawing.Point(184, 1) + Me.colourpallet15.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet15.Name = "colourpallet15" + Me.colourpallet15.Size = New System.Drawing.Size(12, 8) + Me.colourpallet15.TabIndex = 14 + Me.colourpallet15.Visible = False + ' + 'colourpallet16 + ' + Me.colourpallet16.BackColor = System.Drawing.Color.Black + Me.colourpallet16.Location = New System.Drawing.Point(197, 1) + Me.colourpallet16.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet16.Name = "colourpallet16" + Me.colourpallet16.Size = New System.Drawing.Size(12, 8) + Me.colourpallet16.TabIndex = 16 + Me.colourpallet16.Visible = False + ' + 'colourpallet17 + ' + Me.colourpallet17.BackColor = System.Drawing.Color.Black + Me.colourpallet17.Location = New System.Drawing.Point(2, 10) + Me.colourpallet17.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet17.Name = "colourpallet17" + Me.colourpallet17.Size = New System.Drawing.Size(12, 8) + Me.colourpallet17.TabIndex = 11 + Me.colourpallet17.Visible = False + ' + 'colourpallet18 + ' + Me.colourpallet18.BackColor = System.Drawing.Color.Black + Me.colourpallet18.Location = New System.Drawing.Point(15, 10) + Me.colourpallet18.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet18.Name = "colourpallet18" + Me.colourpallet18.Size = New System.Drawing.Size(12, 8) + Me.colourpallet18.TabIndex = 8 + Me.colourpallet18.Visible = False + ' + 'colourpallet19 + ' + Me.colourpallet19.BackColor = System.Drawing.Color.Black + Me.colourpallet19.Location = New System.Drawing.Point(28, 10) + Me.colourpallet19.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet19.Name = "colourpallet19" + Me.colourpallet19.Size = New System.Drawing.Size(12, 8) + Me.colourpallet19.TabIndex = 24 + Me.colourpallet19.Visible = False + ' + 'colourpallet20 + ' + Me.colourpallet20.BackColor = System.Drawing.Color.Black + Me.colourpallet20.Location = New System.Drawing.Point(41, 10) + Me.colourpallet20.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet20.Name = "colourpallet20" + Me.colourpallet20.Size = New System.Drawing.Size(12, 8) + Me.colourpallet20.TabIndex = 12 + Me.colourpallet20.Visible = False + ' + 'colourpallet21 + ' + Me.colourpallet21.BackColor = System.Drawing.Color.Black + Me.colourpallet21.Location = New System.Drawing.Point(54, 10) + Me.colourpallet21.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet21.Name = "colourpallet21" + Me.colourpallet21.Size = New System.Drawing.Size(12, 8) + Me.colourpallet21.TabIndex = 20 + Me.colourpallet21.Visible = False + ' + 'colourpallet22 + ' + Me.colourpallet22.BackColor = System.Drawing.Color.Black + Me.colourpallet22.Location = New System.Drawing.Point(67, 10) + Me.colourpallet22.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet22.Name = "colourpallet22" + Me.colourpallet22.Size = New System.Drawing.Size(12, 8) + Me.colourpallet22.TabIndex = 8 + Me.colourpallet22.Visible = False + ' + 'colourpallet23 + ' + Me.colourpallet23.BackColor = System.Drawing.Color.Black + Me.colourpallet23.Location = New System.Drawing.Point(80, 10) + Me.colourpallet23.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet23.Name = "colourpallet23" + Me.colourpallet23.Size = New System.Drawing.Size(12, 8) + Me.colourpallet23.TabIndex = 19 + Me.colourpallet23.Visible = False + ' + 'colourpallet24 + ' + Me.colourpallet24.BackColor = System.Drawing.Color.Black + Me.colourpallet24.Location = New System.Drawing.Point(93, 10) + Me.colourpallet24.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet24.Name = "colourpallet24" + Me.colourpallet24.Size = New System.Drawing.Size(12, 8) + Me.colourpallet24.TabIndex = 10 + Me.colourpallet24.Visible = False + ' + 'colourpallet25 + ' + Me.colourpallet25.BackColor = System.Drawing.Color.Black + Me.colourpallet25.Location = New System.Drawing.Point(106, 10) + Me.colourpallet25.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet25.Name = "colourpallet25" + Me.colourpallet25.Size = New System.Drawing.Size(12, 8) + Me.colourpallet25.TabIndex = 15 + Me.colourpallet25.Visible = False + ' + 'colourpallet26 + ' + Me.colourpallet26.BackColor = System.Drawing.Color.Black + Me.colourpallet26.Location = New System.Drawing.Point(119, 10) + Me.colourpallet26.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet26.Name = "colourpallet26" + Me.colourpallet26.Size = New System.Drawing.Size(12, 8) + Me.colourpallet26.TabIndex = 23 + Me.colourpallet26.Visible = False + ' + 'colourpallet27 + ' + Me.colourpallet27.BackColor = System.Drawing.Color.Black + Me.colourpallet27.Location = New System.Drawing.Point(132, 10) + Me.colourpallet27.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet27.Name = "colourpallet27" + Me.colourpallet27.Size = New System.Drawing.Size(12, 8) + Me.colourpallet27.TabIndex = 6 + Me.colourpallet27.Visible = False + ' + 'colourpallet28 + ' + Me.colourpallet28.BackColor = System.Drawing.Color.Black + Me.colourpallet28.Location = New System.Drawing.Point(145, 10) + Me.colourpallet28.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet28.Name = "colourpallet28" + Me.colourpallet28.Size = New System.Drawing.Size(12, 8) + Me.colourpallet28.TabIndex = 19 + Me.colourpallet28.Visible = False + ' + 'colourpallet29 + ' + Me.colourpallet29.BackColor = System.Drawing.Color.Black + Me.colourpallet29.Location = New System.Drawing.Point(158, 10) + Me.colourpallet29.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet29.Name = "colourpallet29" + Me.colourpallet29.Size = New System.Drawing.Size(12, 8) + Me.colourpallet29.TabIndex = 22 + Me.colourpallet29.Visible = False + ' + 'colourpallet30 + ' + Me.colourpallet30.BackColor = System.Drawing.Color.Black + Me.colourpallet30.Location = New System.Drawing.Point(171, 10) + Me.colourpallet30.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet30.Name = "colourpallet30" + Me.colourpallet30.Size = New System.Drawing.Size(12, 8) + Me.colourpallet30.TabIndex = 18 + Me.colourpallet30.Visible = False + ' + 'colourpallet31 + ' + Me.colourpallet31.BackColor = System.Drawing.Color.Black + Me.colourpallet31.Location = New System.Drawing.Point(184, 10) + Me.colourpallet31.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet31.Name = "colourpallet31" + Me.colourpallet31.Size = New System.Drawing.Size(12, 8) + Me.colourpallet31.TabIndex = 21 + Me.colourpallet31.Visible = False + ' + 'colourpallet32 + ' + Me.colourpallet32.BackColor = System.Drawing.Color.Black + Me.colourpallet32.Location = New System.Drawing.Point(197, 10) + Me.colourpallet32.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet32.Name = "colourpallet32" + Me.colourpallet32.Size = New System.Drawing.Size(12, 8) + Me.colourpallet32.TabIndex = 17 + Me.colourpallet32.Visible = False + ' + 'colourpallet33 + ' + Me.colourpallet33.BackColor = System.Drawing.Color.Black + Me.colourpallet33.Location = New System.Drawing.Point(2, 19) + Me.colourpallet33.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet33.Name = "colourpallet33" + Me.colourpallet33.Size = New System.Drawing.Size(12, 8) + Me.colourpallet33.TabIndex = 50 + Me.colourpallet33.Visible = False + ' + 'colourpallet34 + ' + Me.colourpallet34.BackColor = System.Drawing.Color.Black + Me.colourpallet34.Location = New System.Drawing.Point(15, 19) + Me.colourpallet34.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet34.Name = "colourpallet34" + Me.colourpallet34.Size = New System.Drawing.Size(12, 8) + Me.colourpallet34.TabIndex = 46 + Me.colourpallet34.Visible = False + ' + 'colourpallet35 + ' + Me.colourpallet35.BackColor = System.Drawing.Color.Black + Me.colourpallet35.Location = New System.Drawing.Point(28, 19) + Me.colourpallet35.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet35.Name = "colourpallet35" + Me.colourpallet35.Size = New System.Drawing.Size(12, 8) + Me.colourpallet35.TabIndex = 53 + Me.colourpallet35.Visible = False + ' + 'colourpallet36 + ' + Me.colourpallet36.BackColor = System.Drawing.Color.Black + Me.colourpallet36.Location = New System.Drawing.Point(41, 19) + Me.colourpallet36.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet36.Name = "colourpallet36" + Me.colourpallet36.Size = New System.Drawing.Size(12, 8) + Me.colourpallet36.TabIndex = 48 + Me.colourpallet36.Visible = False + ' + 'colourpallet37 + ' + Me.colourpallet37.BackColor = System.Drawing.Color.Black + Me.colourpallet37.Location = New System.Drawing.Point(54, 19) + Me.colourpallet37.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet37.Name = "colourpallet37" + Me.colourpallet37.Size = New System.Drawing.Size(12, 8) + Me.colourpallet37.TabIndex = 54 + Me.colourpallet37.Visible = False + ' + 'colourpallet38 + ' + Me.colourpallet38.BackColor = System.Drawing.Color.Black + Me.colourpallet38.Location = New System.Drawing.Point(67, 19) + Me.colourpallet38.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet38.Name = "colourpallet38" + Me.colourpallet38.Size = New System.Drawing.Size(12, 8) + Me.colourpallet38.TabIndex = 26 + Me.colourpallet38.Visible = False + ' + 'colourpallet39 + ' + Me.colourpallet39.BackColor = System.Drawing.Color.Black + Me.colourpallet39.Location = New System.Drawing.Point(80, 19) + Me.colourpallet39.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet39.Name = "colourpallet39" + Me.colourpallet39.Size = New System.Drawing.Size(12, 8) + Me.colourpallet39.TabIndex = 55 + Me.colourpallet39.Visible = False + ' + 'colourpallet40 + ' + Me.colourpallet40.BackColor = System.Drawing.Color.Black + Me.colourpallet40.Location = New System.Drawing.Point(93, 19) + Me.colourpallet40.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet40.Name = "colourpallet40" + Me.colourpallet40.Size = New System.Drawing.Size(12, 8) + Me.colourpallet40.TabIndex = 41 + Me.colourpallet40.Visible = False + ' + 'colourpallet41 + ' + Me.colourpallet41.BackColor = System.Drawing.Color.Black + Me.colourpallet41.Location = New System.Drawing.Point(106, 19) + Me.colourpallet41.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet41.Name = "colourpallet41" + Me.colourpallet41.Size = New System.Drawing.Size(12, 8) + Me.colourpallet41.TabIndex = 31 + Me.colourpallet41.Visible = False + ' + 'colourpallet42 + ' + Me.colourpallet42.BackColor = System.Drawing.Color.Black + Me.colourpallet42.Location = New System.Drawing.Point(119, 19) + Me.colourpallet42.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet42.Name = "colourpallet42" + Me.colourpallet42.Size = New System.Drawing.Size(12, 8) + Me.colourpallet42.TabIndex = 49 + Me.colourpallet42.Visible = False + ' + 'colourpallet43 + ' + Me.colourpallet43.BackColor = System.Drawing.Color.Black + Me.colourpallet43.Location = New System.Drawing.Point(132, 19) + Me.colourpallet43.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet43.Name = "colourpallet43" + Me.colourpallet43.Size = New System.Drawing.Size(12, 8) + Me.colourpallet43.TabIndex = 27 + Me.colourpallet43.Visible = False + ' + 'colourpallet44 + ' + Me.colourpallet44.BackColor = System.Drawing.Color.Black + Me.colourpallet44.Location = New System.Drawing.Point(145, 19) + Me.colourpallet44.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet44.Name = "colourpallet44" + Me.colourpallet44.Size = New System.Drawing.Size(12, 8) + Me.colourpallet44.TabIndex = 51 + Me.colourpallet44.Visible = False + ' + 'colourpallet45 + ' + Me.colourpallet45.BackColor = System.Drawing.Color.Black + Me.colourpallet45.Location = New System.Drawing.Point(158, 19) + Me.colourpallet45.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet45.Name = "colourpallet45" + Me.colourpallet45.Size = New System.Drawing.Size(12, 8) + Me.colourpallet45.TabIndex = 36 + Me.colourpallet45.Visible = False + ' + 'colourpallet46 + ' + Me.colourpallet46.BackColor = System.Drawing.Color.Black + Me.colourpallet46.Location = New System.Drawing.Point(171, 19) + Me.colourpallet46.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet46.Name = "colourpallet46" + Me.colourpallet46.Size = New System.Drawing.Size(12, 8) + Me.colourpallet46.TabIndex = 56 + Me.colourpallet46.Visible = False + ' + 'colourpallet47 + ' + Me.colourpallet47.BackColor = System.Drawing.Color.Black + Me.colourpallet47.Location = New System.Drawing.Point(184, 19) + Me.colourpallet47.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet47.Name = "colourpallet47" + Me.colourpallet47.Size = New System.Drawing.Size(12, 8) + Me.colourpallet47.TabIndex = 28 + Me.colourpallet47.Visible = False + ' + 'colourpallet48 + ' + Me.colourpallet48.BackColor = System.Drawing.Color.Black + Me.colourpallet48.Location = New System.Drawing.Point(197, 19) + Me.colourpallet48.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet48.Name = "colourpallet48" + Me.colourpallet48.Size = New System.Drawing.Size(12, 8) + Me.colourpallet48.TabIndex = 33 + Me.colourpallet48.Visible = False + ' + 'colourpallet49 + ' + Me.colourpallet49.BackColor = System.Drawing.Color.Black + Me.colourpallet49.Location = New System.Drawing.Point(2, 28) + Me.colourpallet49.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet49.Name = "colourpallet49" + Me.colourpallet49.Size = New System.Drawing.Size(12, 8) + Me.colourpallet49.TabIndex = 43 + Me.colourpallet49.Visible = False + ' + 'colourpallet50 + ' + Me.colourpallet50.BackColor = System.Drawing.Color.Black + Me.colourpallet50.Location = New System.Drawing.Point(15, 28) + Me.colourpallet50.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet50.Name = "colourpallet50" + Me.colourpallet50.Size = New System.Drawing.Size(12, 8) + Me.colourpallet50.TabIndex = 40 + Me.colourpallet50.Visible = False + ' + 'colourpallet51 + ' + Me.colourpallet51.BackColor = System.Drawing.Color.Black + Me.colourpallet51.Location = New System.Drawing.Point(28, 28) + Me.colourpallet51.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet51.Name = "colourpallet51" + Me.colourpallet51.Size = New System.Drawing.Size(12, 8) + Me.colourpallet51.TabIndex = 52 + Me.colourpallet51.Visible = False + ' + 'colourpallet52 + ' + Me.colourpallet52.BackColor = System.Drawing.Color.Black + Me.colourpallet52.Location = New System.Drawing.Point(41, 28) + Me.colourpallet52.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet52.Name = "colourpallet52" + Me.colourpallet52.Size = New System.Drawing.Size(12, 8) + Me.colourpallet52.TabIndex = 32 + Me.colourpallet52.Visible = False + ' + 'colourpallet53 + ' + Me.colourpallet53.BackColor = System.Drawing.Color.Black + Me.colourpallet53.Location = New System.Drawing.Point(54, 28) + Me.colourpallet53.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet53.Name = "colourpallet53" + Me.colourpallet53.Size = New System.Drawing.Size(12, 8) + Me.colourpallet53.TabIndex = 44 + Me.colourpallet53.Visible = False + ' + 'colourpallet54 + ' + Me.colourpallet54.BackColor = System.Drawing.Color.Black + Me.colourpallet54.Location = New System.Drawing.Point(67, 28) + Me.colourpallet54.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet54.Name = "colourpallet54" + Me.colourpallet54.Size = New System.Drawing.Size(12, 8) + Me.colourpallet54.TabIndex = 35 + Me.colourpallet54.Visible = False + ' + 'colourpallet55 + ' + Me.colourpallet55.BackColor = System.Drawing.Color.Black + Me.colourpallet55.Location = New System.Drawing.Point(80, 28) + Me.colourpallet55.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet55.Name = "colourpallet55" + Me.colourpallet55.Size = New System.Drawing.Size(12, 8) + Me.colourpallet55.TabIndex = 34 + Me.colourpallet55.Visible = False + ' + 'colourpallet56 + ' + Me.colourpallet56.BackColor = System.Drawing.Color.Black + Me.colourpallet56.Location = New System.Drawing.Point(93, 28) + Me.colourpallet56.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet56.Name = "colourpallet56" + Me.colourpallet56.Size = New System.Drawing.Size(12, 8) + Me.colourpallet56.TabIndex = 42 + Me.colourpallet56.Visible = False + ' + 'colourpallet57 + ' + Me.colourpallet57.BackColor = System.Drawing.Color.Black + Me.colourpallet57.Location = New System.Drawing.Point(106, 28) + Me.colourpallet57.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet57.Name = "colourpallet57" + Me.colourpallet57.Size = New System.Drawing.Size(12, 8) + Me.colourpallet57.TabIndex = 38 + Me.colourpallet57.Visible = False + ' + 'colourpallet58 + ' + Me.colourpallet58.BackColor = System.Drawing.Color.Black + Me.colourpallet58.Location = New System.Drawing.Point(119, 28) + Me.colourpallet58.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet58.Name = "colourpallet58" + Me.colourpallet58.Size = New System.Drawing.Size(12, 8) + Me.colourpallet58.TabIndex = 39 + Me.colourpallet58.Visible = False + ' + 'colourpallet59 + ' + Me.colourpallet59.BackColor = System.Drawing.Color.Black + Me.colourpallet59.Location = New System.Drawing.Point(132, 28) + Me.colourpallet59.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet59.Name = "colourpallet59" + Me.colourpallet59.Size = New System.Drawing.Size(12, 8) + Me.colourpallet59.TabIndex = 45 + Me.colourpallet59.Visible = False + ' + 'colourpallet60 + ' + Me.colourpallet60.BackColor = System.Drawing.Color.Black + Me.colourpallet60.Location = New System.Drawing.Point(145, 28) + Me.colourpallet60.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet60.Name = "colourpallet60" + Me.colourpallet60.Size = New System.Drawing.Size(12, 8) + Me.colourpallet60.TabIndex = 47 + Me.colourpallet60.Visible = False + ' + 'colourpallet61 + ' + Me.colourpallet61.BackColor = System.Drawing.Color.Black + Me.colourpallet61.Location = New System.Drawing.Point(158, 28) + Me.colourpallet61.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet61.Name = "colourpallet61" + Me.colourpallet61.Size = New System.Drawing.Size(12, 8) + Me.colourpallet61.TabIndex = 30 + Me.colourpallet61.Visible = False + ' + 'colourpallet62 + ' + Me.colourpallet62.BackColor = System.Drawing.Color.Black + Me.colourpallet62.Location = New System.Drawing.Point(171, 28) + Me.colourpallet62.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet62.Name = "colourpallet62" + Me.colourpallet62.Size = New System.Drawing.Size(12, 8) + Me.colourpallet62.TabIndex = 37 + Me.colourpallet62.Visible = False + ' + 'colourpallet63 + ' + Me.colourpallet63.BackColor = System.Drawing.Color.Black + Me.colourpallet63.Location = New System.Drawing.Point(184, 28) + Me.colourpallet63.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet63.Name = "colourpallet63" + Me.colourpallet63.Size = New System.Drawing.Size(12, 8) + Me.colourpallet63.TabIndex = 29 + Me.colourpallet63.Visible = False + ' + 'colourpallet64 + ' + Me.colourpallet64.BackColor = System.Drawing.Color.Black + Me.colourpallet64.Location = New System.Drawing.Point(197, 28) + Me.colourpallet64.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet64.Name = "colourpallet64" + Me.colourpallet64.Size = New System.Drawing.Size(12, 8) + Me.colourpallet64.TabIndex = 25 + Me.colourpallet64.Visible = False + ' + 'colourpallet65 + ' + Me.colourpallet65.BackColor = System.Drawing.Color.Black + Me.colourpallet65.Location = New System.Drawing.Point(2, 37) + Me.colourpallet65.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet65.Name = "colourpallet65" + Me.colourpallet65.Size = New System.Drawing.Size(12, 8) + Me.colourpallet65.TabIndex = 57 + Me.colourpallet65.Visible = False + ' + 'colourpallet66 + ' + Me.colourpallet66.BackColor = System.Drawing.Color.Black + Me.colourpallet66.Location = New System.Drawing.Point(15, 37) + Me.colourpallet66.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet66.Name = "colourpallet66" + Me.colourpallet66.Size = New System.Drawing.Size(12, 8) + Me.colourpallet66.TabIndex = 61 + Me.colourpallet66.Visible = False + ' + 'colourpallet67 + ' + Me.colourpallet67.BackColor = System.Drawing.Color.Black + Me.colourpallet67.Location = New System.Drawing.Point(28, 37) + Me.colourpallet67.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet67.Name = "colourpallet67" + Me.colourpallet67.Size = New System.Drawing.Size(12, 8) + Me.colourpallet67.TabIndex = 69 + Me.colourpallet67.Visible = False + ' + 'colourpallet68 + ' + Me.colourpallet68.BackColor = System.Drawing.Color.Black + Me.colourpallet68.Location = New System.Drawing.Point(41, 37) + Me.colourpallet68.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet68.Name = "colourpallet68" + Me.colourpallet68.Size = New System.Drawing.Size(12, 8) + Me.colourpallet68.TabIndex = 62 + Me.colourpallet68.Visible = False + ' + 'colourpallet69 + ' + Me.colourpallet69.BackColor = System.Drawing.Color.Black + Me.colourpallet69.Location = New System.Drawing.Point(54, 37) + Me.colourpallet69.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet69.Name = "colourpallet69" + Me.colourpallet69.Size = New System.Drawing.Size(12, 8) + Me.colourpallet69.TabIndex = 79 + Me.colourpallet69.Visible = False + ' + 'colourpallet70 + ' + Me.colourpallet70.BackColor = System.Drawing.Color.Black + Me.colourpallet70.Location = New System.Drawing.Point(67, 37) + Me.colourpallet70.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet70.Name = "colourpallet70" + Me.colourpallet70.Size = New System.Drawing.Size(12, 8) + Me.colourpallet70.TabIndex = 77 + Me.colourpallet70.Visible = False + ' + 'colourpallet71 + ' + Me.colourpallet71.BackColor = System.Drawing.Color.Black + Me.colourpallet71.Location = New System.Drawing.Point(80, 37) + Me.colourpallet71.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet71.Name = "colourpallet71" + Me.colourpallet71.Size = New System.Drawing.Size(12, 8) + Me.colourpallet71.TabIndex = 71 + Me.colourpallet71.Visible = False + ' + 'colourpallet72 + ' + Me.colourpallet72.BackColor = System.Drawing.Color.Black + Me.colourpallet72.Location = New System.Drawing.Point(93, 37) + Me.colourpallet72.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet72.Name = "colourpallet72" + Me.colourpallet72.Size = New System.Drawing.Size(12, 8) + Me.colourpallet72.TabIndex = 70 + Me.colourpallet72.Visible = False + ' + 'colourpallet73 + ' + Me.colourpallet73.BackColor = System.Drawing.Color.Black + Me.colourpallet73.Location = New System.Drawing.Point(106, 37) + Me.colourpallet73.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet73.Name = "colourpallet73" + Me.colourpallet73.Size = New System.Drawing.Size(12, 8) + Me.colourpallet73.TabIndex = 74 + Me.colourpallet73.Visible = False + ' + 'colourpallet74 + ' + Me.colourpallet74.BackColor = System.Drawing.Color.Black + Me.colourpallet74.Location = New System.Drawing.Point(119, 37) + Me.colourpallet74.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet74.Name = "colourpallet74" + Me.colourpallet74.Size = New System.Drawing.Size(12, 8) + Me.colourpallet74.TabIndex = 66 + Me.colourpallet74.Visible = False + ' + 'colourpallet75 + ' + Me.colourpallet75.BackColor = System.Drawing.Color.Black + Me.colourpallet75.Location = New System.Drawing.Point(132, 37) + Me.colourpallet75.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet75.Name = "colourpallet75" + Me.colourpallet75.Size = New System.Drawing.Size(12, 8) + Me.colourpallet75.TabIndex = 67 + Me.colourpallet75.Visible = False + ' + 'colourpallet76 + ' + Me.colourpallet76.BackColor = System.Drawing.Color.Black + Me.colourpallet76.Location = New System.Drawing.Point(145, 37) + Me.colourpallet76.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet76.Name = "colourpallet76" + Me.colourpallet76.Size = New System.Drawing.Size(12, 8) + Me.colourpallet76.TabIndex = 76 + Me.colourpallet76.Visible = False + ' + 'colourpallet77 + ' + Me.colourpallet77.BackColor = System.Drawing.Color.Black + Me.colourpallet77.Location = New System.Drawing.Point(158, 37) + Me.colourpallet77.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet77.Name = "colourpallet77" + Me.colourpallet77.Size = New System.Drawing.Size(12, 8) + Me.colourpallet77.TabIndex = 64 + Me.colourpallet77.Visible = False + ' + 'colourpallet78 + ' + Me.colourpallet78.BackColor = System.Drawing.Color.Black + Me.colourpallet78.Location = New System.Drawing.Point(171, 37) + Me.colourpallet78.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet78.Name = "colourpallet78" + Me.colourpallet78.Size = New System.Drawing.Size(12, 8) + Me.colourpallet78.TabIndex = 84 + Me.colourpallet78.Visible = False + ' + 'colourpallet79 + ' + Me.colourpallet79.BackColor = System.Drawing.Color.Black + Me.colourpallet79.Location = New System.Drawing.Point(184, 37) + Me.colourpallet79.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet79.Name = "colourpallet79" + Me.colourpallet79.Size = New System.Drawing.Size(12, 8) + Me.colourpallet79.TabIndex = 72 + Me.colourpallet79.Visible = False + ' + 'colourpallet80 + ' + Me.colourpallet80.BackColor = System.Drawing.Color.Black + Me.colourpallet80.Location = New System.Drawing.Point(197, 37) + Me.colourpallet80.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet80.Name = "colourpallet80" + Me.colourpallet80.Size = New System.Drawing.Size(12, 8) + Me.colourpallet80.TabIndex = 75 + Me.colourpallet80.Visible = False + ' + 'colourpallet81 + ' + Me.colourpallet81.BackColor = System.Drawing.Color.Black + Me.colourpallet81.Location = New System.Drawing.Point(2, 46) + Me.colourpallet81.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet81.Name = "colourpallet81" + Me.colourpallet81.Size = New System.Drawing.Size(12, 8) + Me.colourpallet81.TabIndex = 65 + Me.colourpallet81.Visible = False + ' + 'colourpallet82 + ' + Me.colourpallet82.BackColor = System.Drawing.Color.Black + Me.colourpallet82.Location = New System.Drawing.Point(15, 46) + Me.colourpallet82.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet82.Name = "colourpallet82" + Me.colourpallet82.Size = New System.Drawing.Size(12, 8) + Me.colourpallet82.TabIndex = 60 + Me.colourpallet82.Visible = False + ' + 'colourpallet83 + ' + Me.colourpallet83.BackColor = System.Drawing.Color.Black + Me.colourpallet83.Location = New System.Drawing.Point(28, 46) + Me.colourpallet83.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet83.Name = "colourpallet83" + Me.colourpallet83.Size = New System.Drawing.Size(12, 8) + Me.colourpallet83.TabIndex = 88 + Me.colourpallet83.Visible = False + ' + 'colourpallet84 + ' + Me.colourpallet84.BackColor = System.Drawing.Color.Black + Me.colourpallet84.Location = New System.Drawing.Point(41, 46) + Me.colourpallet84.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet84.Name = "colourpallet84" + Me.colourpallet84.Size = New System.Drawing.Size(12, 8) + Me.colourpallet84.TabIndex = 68 + Me.colourpallet84.Visible = False + ' + 'colourpallet85 + ' + Me.colourpallet85.BackColor = System.Drawing.Color.Black + Me.colourpallet85.Location = New System.Drawing.Point(54, 46) + Me.colourpallet85.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet85.Name = "colourpallet85" + Me.colourpallet85.Size = New System.Drawing.Size(12, 8) + Me.colourpallet85.TabIndex = 83 + Me.colourpallet85.Visible = False + ' + 'colourpallet86 + ' + Me.colourpallet86.BackColor = System.Drawing.Color.Black + Me.colourpallet86.Location = New System.Drawing.Point(67, 46) + Me.colourpallet86.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet86.Name = "colourpallet86" + Me.colourpallet86.Size = New System.Drawing.Size(12, 8) + Me.colourpallet86.TabIndex = 59 + Me.colourpallet86.Visible = False + ' + 'colourpallet87 + ' + Me.colourpallet87.BackColor = System.Drawing.Color.Black + Me.colourpallet87.Location = New System.Drawing.Point(80, 46) + Me.colourpallet87.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet87.Name = "colourpallet87" + Me.colourpallet87.Size = New System.Drawing.Size(12, 8) + Me.colourpallet87.TabIndex = 81 + Me.colourpallet87.Visible = False + ' + 'colourpallet88 + ' + Me.colourpallet88.BackColor = System.Drawing.Color.Black + Me.colourpallet88.Location = New System.Drawing.Point(93, 46) + Me.colourpallet88.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet88.Name = "colourpallet88" + Me.colourpallet88.Size = New System.Drawing.Size(12, 8) + Me.colourpallet88.TabIndex = 63 + Me.colourpallet88.Visible = False + ' + 'colourpallet89 + ' + Me.colourpallet89.BackColor = System.Drawing.Color.Black + Me.colourpallet89.Location = New System.Drawing.Point(106, 46) + Me.colourpallet89.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet89.Name = "colourpallet89" + Me.colourpallet89.Size = New System.Drawing.Size(12, 8) + Me.colourpallet89.TabIndex = 73 + Me.colourpallet89.Visible = False + ' + 'colourpallet90 + ' + Me.colourpallet90.BackColor = System.Drawing.Color.Black + Me.colourpallet90.Location = New System.Drawing.Point(119, 46) + Me.colourpallet90.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet90.Name = "colourpallet90" + Me.colourpallet90.Size = New System.Drawing.Size(12, 8) + Me.colourpallet90.TabIndex = 87 + Me.colourpallet90.Visible = False + ' + 'colourpallet91 + ' + Me.colourpallet91.BackColor = System.Drawing.Color.Black + Me.colourpallet91.Location = New System.Drawing.Point(132, 46) + Me.colourpallet91.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet91.Name = "colourpallet91" + Me.colourpallet91.Size = New System.Drawing.Size(12, 8) + Me.colourpallet91.TabIndex = 58 + Me.colourpallet91.Visible = False + ' + 'colourpallet92 + ' + Me.colourpallet92.BackColor = System.Drawing.Color.Black + Me.colourpallet92.Location = New System.Drawing.Point(145, 46) + Me.colourpallet92.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet92.Name = "colourpallet92" + Me.colourpallet92.Size = New System.Drawing.Size(12, 8) + Me.colourpallet92.TabIndex = 82 + Me.colourpallet92.Visible = False + ' + 'colourpallet93 + ' + Me.colourpallet93.BackColor = System.Drawing.Color.Black + Me.colourpallet93.Location = New System.Drawing.Point(158, 46) + Me.colourpallet93.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet93.Name = "colourpallet93" + Me.colourpallet93.Size = New System.Drawing.Size(12, 8) + Me.colourpallet93.TabIndex = 86 + Me.colourpallet93.Visible = False + ' + 'colourpallet94 + ' + Me.colourpallet94.BackColor = System.Drawing.Color.Black + Me.colourpallet94.Location = New System.Drawing.Point(171, 46) + Me.colourpallet94.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet94.Name = "colourpallet94" + Me.colourpallet94.Size = New System.Drawing.Size(12, 8) + Me.colourpallet94.TabIndex = 80 + Me.colourpallet94.Visible = False + ' + 'colourpallet95 + ' + Me.colourpallet95.BackColor = System.Drawing.Color.Black + Me.colourpallet95.Location = New System.Drawing.Point(184, 46) + Me.colourpallet95.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet95.Name = "colourpallet95" + Me.colourpallet95.Size = New System.Drawing.Size(12, 8) + Me.colourpallet95.TabIndex = 85 + Me.colourpallet95.Visible = False + ' + 'colourpallet96 + ' + Me.colourpallet96.BackColor = System.Drawing.Color.Black + Me.colourpallet96.Location = New System.Drawing.Point(197, 46) + Me.colourpallet96.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet96.Name = "colourpallet96" + Me.colourpallet96.Size = New System.Drawing.Size(12, 8) + Me.colourpallet96.TabIndex = 78 + Me.colourpallet96.Visible = False + ' + 'colourpallet97 + ' + Me.colourpallet97.BackColor = System.Drawing.Color.Black + Me.colourpallet97.Location = New System.Drawing.Point(2, 55) + Me.colourpallet97.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet97.Name = "colourpallet97" + Me.colourpallet97.Size = New System.Drawing.Size(12, 8) + Me.colourpallet97.TabIndex = 89 + Me.colourpallet97.Visible = False + ' + 'colourpallet98 + ' + Me.colourpallet98.BackColor = System.Drawing.Color.Black + Me.colourpallet98.Location = New System.Drawing.Point(15, 55) + Me.colourpallet98.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet98.Name = "colourpallet98" + Me.colourpallet98.Size = New System.Drawing.Size(12, 8) + Me.colourpallet98.TabIndex = 93 + Me.colourpallet98.Visible = False + ' + 'colourpallet99 + ' + Me.colourpallet99.BackColor = System.Drawing.Color.Black + Me.colourpallet99.Location = New System.Drawing.Point(28, 55) + Me.colourpallet99.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet99.Name = "colourpallet99" + Me.colourpallet99.Size = New System.Drawing.Size(12, 8) + Me.colourpallet99.TabIndex = 101 + Me.colourpallet99.Visible = False + ' + 'colourpallet100 + ' + Me.colourpallet100.BackColor = System.Drawing.Color.Black + Me.colourpallet100.Location = New System.Drawing.Point(41, 55) + Me.colourpallet100.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet100.Name = "colourpallet100" + Me.colourpallet100.Size = New System.Drawing.Size(12, 8) + Me.colourpallet100.TabIndex = 94 + Me.colourpallet100.Visible = False + ' + 'colourpallet101 + ' + Me.colourpallet101.BackColor = System.Drawing.Color.Black + Me.colourpallet101.Location = New System.Drawing.Point(54, 55) + Me.colourpallet101.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet101.Name = "colourpallet101" + Me.colourpallet101.Size = New System.Drawing.Size(12, 8) + Me.colourpallet101.TabIndex = 111 + Me.colourpallet101.Visible = False + ' + 'colourpallet102 + ' + Me.colourpallet102.BackColor = System.Drawing.Color.Black + Me.colourpallet102.Location = New System.Drawing.Point(67, 55) + Me.colourpallet102.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet102.Name = "colourpallet102" + Me.colourpallet102.Size = New System.Drawing.Size(12, 8) + Me.colourpallet102.TabIndex = 110 + Me.colourpallet102.Visible = False + ' + 'colourpallet103 + ' + Me.colourpallet103.BackColor = System.Drawing.Color.Black + Me.colourpallet103.Location = New System.Drawing.Point(80, 55) + Me.colourpallet103.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet103.Name = "colourpallet103" + Me.colourpallet103.Size = New System.Drawing.Size(12, 8) + Me.colourpallet103.TabIndex = 117 + Me.colourpallet103.Visible = False + ' + 'colourpallet104 + ' + Me.colourpallet104.BackColor = System.Drawing.Color.Black + Me.colourpallet104.Location = New System.Drawing.Point(93, 55) + Me.colourpallet104.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet104.Name = "colourpallet104" + Me.colourpallet104.Size = New System.Drawing.Size(12, 8) + Me.colourpallet104.TabIndex = 112 + Me.colourpallet104.Visible = False + ' + 'colourpallet105 + ' + Me.colourpallet105.BackColor = System.Drawing.Color.Black + Me.colourpallet105.Location = New System.Drawing.Point(106, 55) + Me.colourpallet105.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet105.Name = "colourpallet105" + Me.colourpallet105.Size = New System.Drawing.Size(12, 8) + Me.colourpallet105.TabIndex = 109 + Me.colourpallet105.Visible = False + ' + 'colourpallet106 + ' + Me.colourpallet106.BackColor = System.Drawing.Color.Black + Me.colourpallet106.Location = New System.Drawing.Point(119, 55) + Me.colourpallet106.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet106.Name = "colourpallet106" + Me.colourpallet106.Size = New System.Drawing.Size(12, 8) + Me.colourpallet106.TabIndex = 103 + Me.colourpallet106.Visible = False + ' + 'colourpallet107 + ' + Me.colourpallet107.BackColor = System.Drawing.Color.Black + Me.colourpallet107.Location = New System.Drawing.Point(132, 55) + Me.colourpallet107.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet107.Name = "colourpallet107" + Me.colourpallet107.Size = New System.Drawing.Size(12, 8) + Me.colourpallet107.TabIndex = 102 + Me.colourpallet107.Visible = False + ' + 'colourpallet108 + ' + Me.colourpallet108.BackColor = System.Drawing.Color.Black + Me.colourpallet108.Location = New System.Drawing.Point(145, 55) + Me.colourpallet108.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet108.Name = "colourpallet108" + Me.colourpallet108.Size = New System.Drawing.Size(12, 8) + Me.colourpallet108.TabIndex = 106 + Me.colourpallet108.Visible = False + ' + 'colourpallet109 + ' + Me.colourpallet109.BackColor = System.Drawing.Color.Black + Me.colourpallet109.Location = New System.Drawing.Point(158, 55) + Me.colourpallet109.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet109.Name = "colourpallet109" + Me.colourpallet109.Size = New System.Drawing.Size(12, 8) + Me.colourpallet109.TabIndex = 98 + Me.colourpallet109.Visible = False + ' + 'colourpallet110 + ' + Me.colourpallet110.BackColor = System.Drawing.Color.Black + Me.colourpallet110.Location = New System.Drawing.Point(171, 55) + Me.colourpallet110.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet110.Name = "colourpallet110" + Me.colourpallet110.Size = New System.Drawing.Size(12, 8) + Me.colourpallet110.TabIndex = 99 + Me.colourpallet110.Visible = False + ' + 'colourpallet111 + ' + Me.colourpallet111.BackColor = System.Drawing.Color.Black + Me.colourpallet111.Location = New System.Drawing.Point(184, 55) + Me.colourpallet111.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet111.Name = "colourpallet111" + Me.colourpallet111.Size = New System.Drawing.Size(12, 8) + Me.colourpallet111.TabIndex = 108 + Me.colourpallet111.Visible = False + ' + 'colourpallet112 + ' + Me.colourpallet112.BackColor = System.Drawing.Color.Black + Me.colourpallet112.Location = New System.Drawing.Point(197, 55) + Me.colourpallet112.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet112.Name = "colourpallet112" + Me.colourpallet112.Size = New System.Drawing.Size(12, 8) + Me.colourpallet112.TabIndex = 96 + Me.colourpallet112.Visible = False + ' + 'colourpallet113 + ' + Me.colourpallet113.BackColor = System.Drawing.Color.Black + Me.colourpallet113.Location = New System.Drawing.Point(2, 64) + Me.colourpallet113.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet113.Name = "colourpallet113" + Me.colourpallet113.Size = New System.Drawing.Size(12, 8) + Me.colourpallet113.TabIndex = 116 + Me.colourpallet113.Visible = False + ' + 'colourpallet114 + ' + Me.colourpallet114.BackColor = System.Drawing.Color.Black + Me.colourpallet114.Location = New System.Drawing.Point(15, 64) + Me.colourpallet114.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet114.Name = "colourpallet114" + Me.colourpallet114.Size = New System.Drawing.Size(12, 8) + Me.colourpallet114.TabIndex = 104 + Me.colourpallet114.Visible = False + ' + 'colourpallet115 + ' + Me.colourpallet115.BackColor = System.Drawing.Color.Black + Me.colourpallet115.Location = New System.Drawing.Point(28, 64) + Me.colourpallet115.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet115.Name = "colourpallet115" + Me.colourpallet115.Size = New System.Drawing.Size(12, 8) + Me.colourpallet115.TabIndex = 107 + Me.colourpallet115.Visible = False + ' + 'colourpallet116 + ' + Me.colourpallet116.BackColor = System.Drawing.Color.Black + Me.colourpallet116.Location = New System.Drawing.Point(41, 64) + Me.colourpallet116.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet116.Name = "colourpallet116" + Me.colourpallet116.Size = New System.Drawing.Size(12, 8) + Me.colourpallet116.TabIndex = 97 + Me.colourpallet116.Visible = False + ' + 'colourpallet117 + ' + Me.colourpallet117.BackColor = System.Drawing.Color.Black + Me.colourpallet117.Location = New System.Drawing.Point(54, 64) + Me.colourpallet117.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet117.Name = "colourpallet117" + Me.colourpallet117.Size = New System.Drawing.Size(12, 8) + Me.colourpallet117.TabIndex = 92 + Me.colourpallet117.Visible = False + ' + 'colourpallet118 + ' + Me.colourpallet118.BackColor = System.Drawing.Color.Black + Me.colourpallet118.Location = New System.Drawing.Point(67, 64) + Me.colourpallet118.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet118.Name = "colourpallet118" + Me.colourpallet118.Size = New System.Drawing.Size(12, 8) + Me.colourpallet118.TabIndex = 120 + Me.colourpallet118.Visible = False + ' + 'colourpallet119 + ' + Me.colourpallet119.BackColor = System.Drawing.Color.Black + Me.colourpallet119.Location = New System.Drawing.Point(80, 64) + Me.colourpallet119.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet119.Name = "colourpallet119" + Me.colourpallet119.Size = New System.Drawing.Size(12, 8) + Me.colourpallet119.TabIndex = 100 + Me.colourpallet119.Visible = False + ' + 'colourpallet120 + ' + Me.colourpallet120.BackColor = System.Drawing.Color.Black + Me.colourpallet120.Location = New System.Drawing.Point(93, 64) + Me.colourpallet120.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet120.Name = "colourpallet120" + Me.colourpallet120.Size = New System.Drawing.Size(12, 8) + Me.colourpallet120.TabIndex = 115 + Me.colourpallet120.Visible = False + ' + 'colourpallet121 + ' + Me.colourpallet121.BackColor = System.Drawing.Color.Black + Me.colourpallet121.Location = New System.Drawing.Point(106, 64) + Me.colourpallet121.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet121.Name = "colourpallet121" + Me.colourpallet121.Size = New System.Drawing.Size(12, 8) + Me.colourpallet121.TabIndex = 91 + Me.colourpallet121.Visible = False + ' + 'colourpallet122 + ' + Me.colourpallet122.BackColor = System.Drawing.Color.Black + Me.colourpallet122.Location = New System.Drawing.Point(119, 64) + Me.colourpallet122.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet122.Name = "colourpallet122" + Me.colourpallet122.Size = New System.Drawing.Size(12, 8) + Me.colourpallet122.TabIndex = 113 + Me.colourpallet122.Visible = False + ' + 'colourpallet123 + ' + Me.colourpallet123.BackColor = System.Drawing.Color.Black + Me.colourpallet123.Location = New System.Drawing.Point(132, 64) + Me.colourpallet123.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet123.Name = "colourpallet123" + Me.colourpallet123.Size = New System.Drawing.Size(12, 8) + Me.colourpallet123.TabIndex = 95 + Me.colourpallet123.Visible = False + ' + 'colourpallet124 + ' + Me.colourpallet124.BackColor = System.Drawing.Color.Black + Me.colourpallet124.Location = New System.Drawing.Point(145, 64) + Me.colourpallet124.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet124.Name = "colourpallet124" + Me.colourpallet124.Size = New System.Drawing.Size(12, 8) + Me.colourpallet124.TabIndex = 105 + Me.colourpallet124.Visible = False + ' + 'colourpallet125 + ' + Me.colourpallet125.BackColor = System.Drawing.Color.Black + Me.colourpallet125.Location = New System.Drawing.Point(158, 64) + Me.colourpallet125.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet125.Name = "colourpallet125" + Me.colourpallet125.Size = New System.Drawing.Size(12, 8) + Me.colourpallet125.TabIndex = 119 + Me.colourpallet125.Visible = False + ' + 'colourpallet126 + ' + Me.colourpallet126.BackColor = System.Drawing.Color.Black + Me.colourpallet126.Location = New System.Drawing.Point(171, 64) + Me.colourpallet126.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet126.Name = "colourpallet126" + Me.colourpallet126.Size = New System.Drawing.Size(12, 8) + Me.colourpallet126.TabIndex = 90 + Me.colourpallet126.Visible = False + ' + 'colourpallet127 + ' + Me.colourpallet127.BackColor = System.Drawing.Color.Black + Me.colourpallet127.Location = New System.Drawing.Point(184, 64) + Me.colourpallet127.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet127.Name = "colourpallet127" + Me.colourpallet127.Size = New System.Drawing.Size(12, 8) + Me.colourpallet127.TabIndex = 114 + Me.colourpallet127.Visible = False + ' + 'colourpallet128 + ' + Me.colourpallet128.BackColor = System.Drawing.Color.Black + Me.colourpallet128.Location = New System.Drawing.Point(197, 64) + Me.colourpallet128.Margin = New System.Windows.Forms.Padding(1, 0, 0, 1) + Me.colourpallet128.Name = "colourpallet128" + Me.colourpallet128.Size = New System.Drawing.Size(12, 8) + Me.colourpallet128.TabIndex = 118 + Me.colourpallet128.Visible = False + ' + 'Label4 + ' + Me.Label4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(11, 2) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(200, 23) + Me.Label4.TabIndex = 11 + Me.Label4.Text = "Colours" + Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'line6 + ' + Me.line6.BackColor = System.Drawing.Color.Black + Me.line6.Dock = System.Windows.Forms.DockStyle.Top + Me.line6.Location = New System.Drawing.Point(0, 0) + Me.line6.Name = "line6" + Me.line6.Size = New System.Drawing.Size(221, 1) + Me.line6.TabIndex = 4 + ' + 'pnltoolproperties + ' + Me.pnltoolproperties.Controls.Add(Me.pnltexttoolsettings) + Me.pnltoolproperties.Controls.Add(Me.pnlpixelsettersettings) + Me.pnltoolproperties.Controls.Add(Me.pnlpaintbrushtoolsettings) + Me.pnltoolproperties.Controls.Add(Me.pnllinetoolsettings) + Me.pnltoolproperties.Controls.Add(Me.pnlmagnifiersettings) + Me.pnltoolproperties.Controls.Add(Me.pnleracertoolsettings) + Me.pnltoolproperties.Controls.Add(Me.pnlfloodfillsettings) + Me.pnltoolproperties.Controls.Add(Me.pnlovaltoolsettings) + Me.pnltoolproperties.Controls.Add(Me.pnlsquaretoolsettings) + Me.pnltoolproperties.Controls.Add(Me.pnlpixelplacersettings) + Me.pnltoolproperties.Controls.Add(Me.pnlpencilsettings) + Me.pnltoolproperties.Controls.Add(Me.Label6) + Me.pnltoolproperties.Controls.Add(Me.Label5) + Me.pnltoolproperties.Controls.Add(Me.line5) + Me.pnltoolproperties.Controls.Add(Me.line3) + Me.pnltoolproperties.Location = New System.Drawing.Point(0, 0) + Me.pnltoolproperties.Name = "pnltoolproperties" + Me.pnltoolproperties.Size = New System.Drawing.Size(457, 100) + Me.pnltoolproperties.TabIndex = 1 + ' + 'pnltexttoolsettings + ' + Me.pnltexttoolsettings.Controls.Add(Me.Label35) + Me.pnltexttoolsettings.Controls.Add(Me.combofontstyle) + Me.pnltexttoolsettings.Controls.Add(Me.txtdrawstringtext) + Me.pnltexttoolsettings.Controls.Add(Me.combodrawtextfont) + Me.pnltexttoolsettings.Controls.Add(Me.Label25) + Me.pnltexttoolsettings.Controls.Add(Me.txtdrawtextsize) + Me.pnltexttoolsettings.Controls.Add(Me.Label32) + Me.pnltexttoolsettings.Controls.Add(Me.Label33) + Me.pnltexttoolsettings.Controls.Add(Me.Label34) + Me.pnltexttoolsettings.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnltexttoolsettings.Location = New System.Drawing.Point(0, 1) + Me.pnltexttoolsettings.Name = "pnltexttoolsettings" + Me.pnltexttoolsettings.Size = New System.Drawing.Size(456, 99) + Me.pnltexttoolsettings.TabIndex = 17 + Me.pnltexttoolsettings.Visible = False + ' + 'Label35 + ' + Me.Label35.AutoSize = True + Me.Label35.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label35.Location = New System.Drawing.Point(117, 33) + Me.Label35.Name = "Label35" + Me.Label35.Size = New System.Drawing.Size(55, 24) + Me.Label35.TabIndex = 19 + Me.Label35.Text = "Style:" + ' + 'combofontstyle + ' + Me.combofontstyle.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.combofontstyle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.combofontstyle.FormattingEnabled = True + Me.combofontstyle.Items.AddRange(New Object() {"Bold", "Italic", "Regular", "Strikeout", "Underline"}) + Me.combofontstyle.Location = New System.Drawing.Point(178, 34) + Me.combofontstyle.Name = "combofontstyle" + Me.combofontstyle.Size = New System.Drawing.Size(78, 24) + Me.combofontstyle.TabIndex = 18 + ' + 'txtdrawstringtext + ' + Me.txtdrawstringtext.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtdrawstringtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtdrawstringtext.Location = New System.Drawing.Point(265, 52) + Me.txtdrawstringtext.Multiline = True + Me.txtdrawstringtext.Name = "txtdrawstringtext" + Me.txtdrawstringtext.Size = New System.Drawing.Size(185, 41) + Me.txtdrawstringtext.TabIndex = 17 + Me.txtdrawstringtext.Text = "Enter Words Here" + ' + 'combodrawtextfont + ' + Me.combodrawtextfont.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.combodrawtextfont.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.combodrawtextfont.FormattingEnabled = True + Me.combodrawtextfont.Location = New System.Drawing.Point(64, 68) + Me.combodrawtextfont.Name = "combodrawtextfont" + Me.combodrawtextfont.Size = New System.Drawing.Size(192, 24) + Me.combodrawtextfont.TabIndex = 16 + ' + 'Label25 + ' + Me.Label25.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label25.Location = New System.Drawing.Point(262, 26) + Me.Label25.Name = "Label25" + Me.Label25.Size = New System.Drawing.Size(189, 23) + Me.Label25.TabIndex = 15 + Me.Label25.Text = "Click and drag on the canvas!" + Me.Label25.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'txtdrawtextsize + ' + Me.txtdrawtextsize.BackColor = System.Drawing.Color.White + Me.txtdrawtextsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtdrawtextsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtdrawtextsize.ForeColor = System.Drawing.Color.Black + Me.txtdrawtextsize.Location = New System.Drawing.Point(61, 33) + Me.txtdrawtextsize.Name = "txtdrawtextsize" + Me.txtdrawtextsize.Size = New System.Drawing.Size(43, 26) + Me.txtdrawtextsize.TabIndex = 12 + ' + 'Label32 + ' + Me.Label32.AutoSize = True + Me.Label32.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label32.Location = New System.Drawing.Point(4, 66) + Me.Label32.Name = "Label32" + Me.Label32.Size = New System.Drawing.Size(53, 24) + Me.Label32.TabIndex = 11 + Me.Label32.Text = "Font:" + ' + 'Label33 + ' + Me.Label33.AutoSize = True + Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label33.Location = New System.Drawing.Point(4, 33) + Me.Label33.Name = "Label33" + Me.Label33.Size = New System.Drawing.Size(51, 24) + Me.Label33.TabIndex = 10 + Me.Label33.Text = "Size:" + ' + 'Label34 + ' + Me.Label34.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label34.Location = New System.Drawing.Point(6, 3) + Me.Label34.Name = "Label34" + Me.Label34.Size = New System.Drawing.Size(444, 23) + Me.Label34.TabIndex = 0 + Me.Label34.Text = "Text Tool Settings" + Me.Label34.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlpixelsettersettings + ' + Me.pnlpixelsettersettings.Controls.Add(Me.btnpixelsettersetpixel) + Me.pnlpixelsettersettings.Controls.Add(Me.txtpixelsetterycoordinate) + Me.pnlpixelsettersettings.Controls.Add(Me.txtpixelsetterxcoordinate) + Me.pnlpixelsettersettings.Controls.Add(Me.Label3) + Me.pnlpixelsettersettings.Controls.Add(Me.Label2) + Me.pnlpixelsettersettings.Controls.Add(Me.Label1) + Me.pnlpixelsettersettings.Location = New System.Drawing.Point(342, 35) + Me.pnlpixelsettersettings.Name = "pnlpixelsettersettings" + Me.pnlpixelsettersettings.Size = New System.Drawing.Size(37, 23) + Me.pnlpixelsettersettings.TabIndex = 5 + Me.pnlpixelsettersettings.Visible = False + ' + 'btnpixelsettersetpixel + ' + Me.btnpixelsettersetpixel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpixelsettersetpixel.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpixelsettersetpixel.Location = New System.Drawing.Point(215, 34) + Me.btnpixelsettersetpixel.Name = "btnpixelsettersetpixel" + Me.btnpixelsettersetpixel.Size = New System.Drawing.Size(228, 56) + Me.btnpixelsettersetpixel.TabIndex = 10 + Me.btnpixelsettersetpixel.Text = "Set Pixel" + Me.btnpixelsettersetpixel.UseVisualStyleBackColor = True + ' + 'txtpixelsetterycoordinate + ' + Me.txtpixelsetterycoordinate.BackColor = System.Drawing.Color.White + Me.txtpixelsetterycoordinate.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpixelsetterycoordinate.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpixelsetterycoordinate.ForeColor = System.Drawing.Color.Black + Me.txtpixelsetterycoordinate.Location = New System.Drawing.Point(136, 64) + Me.txtpixelsetterycoordinate.Name = "txtpixelsetterycoordinate" + Me.txtpixelsetterycoordinate.Size = New System.Drawing.Size(73, 26) + Me.txtpixelsetterycoordinate.TabIndex = 9 + ' + 'txtpixelsetterxcoordinate + ' + Me.txtpixelsetterxcoordinate.BackColor = System.Drawing.Color.White + Me.txtpixelsetterxcoordinate.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpixelsetterxcoordinate.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpixelsetterxcoordinate.ForeColor = System.Drawing.Color.Black + Me.txtpixelsetterxcoordinate.Location = New System.Drawing.Point(136, 34) + Me.txtpixelsetterxcoordinate.Name = "txtpixelsetterxcoordinate" + Me.txtpixelsetterxcoordinate.Size = New System.Drawing.Size(73, 26) + Me.txtpixelsetterxcoordinate.TabIndex = 8 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(8, 63) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(124, 24) + Me.Label3.TabIndex = 2 + Me.Label3.Text = "Y Coordinate:" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(7, 34) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(126, 24) + Me.Label2.TabIndex = 1 + Me.Label2.Text = "X Coordinate:" + ' + 'Label1 + ' + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(6, 3) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(444, 23) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Pixel Setter Settings" + Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlpaintbrushtoolsettings + ' + Me.pnlpaintbrushtoolsettings.Controls.Add(Me.Label36) + Me.pnlpaintbrushtoolsettings.Controls.Add(Me.btnpaintsquareshape) + Me.pnlpaintbrushtoolsettings.Controls.Add(Me.btnpaintcircleshape) + Me.pnlpaintbrushtoolsettings.Controls.Add(Me.Label37) + Me.pnlpaintbrushtoolsettings.Controls.Add(Me.txtpaintbrushsize) + Me.pnlpaintbrushtoolsettings.Controls.Add(Me.Label38) + Me.pnlpaintbrushtoolsettings.Controls.Add(Me.Label39) + Me.pnlpaintbrushtoolsettings.Location = New System.Drawing.Point(261, 13) + Me.pnlpaintbrushtoolsettings.Name = "pnlpaintbrushtoolsettings" + Me.pnlpaintbrushtoolsettings.Size = New System.Drawing.Size(51, 27) + Me.pnlpaintbrushtoolsettings.TabIndex = 21 + Me.pnlpaintbrushtoolsettings.Visible = False + ' + 'Label36 + ' + Me.Label36.AutoSize = True + Me.Label36.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label36.Location = New System.Drawing.Point(32, 69) + Me.Label36.Name = "Label36" + Me.Label36.Size = New System.Drawing.Size(65, 24) + Me.Label36.TabIndex = 19 + Me.Label36.Text = "Shape" + ' + 'btnpaintsquareshape + ' + Me.btnpaintsquareshape.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadsquarerubber + Me.btnpaintsquareshape.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.btnpaintsquareshape.FlatAppearance.BorderSize = 0 + Me.btnpaintsquareshape.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpaintsquareshape.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpaintsquareshape.Location = New System.Drawing.Point(69, 27) + Me.btnpaintsquareshape.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnpaintsquareshape.Name = "btnpaintsquareshape" + Me.btnpaintsquareshape.Size = New System.Drawing.Size(48, 40) + Me.btnpaintsquareshape.TabIndex = 17 + Me.btnpaintsquareshape.Text = " " + Me.btnpaintsquareshape.UseVisualStyleBackColor = True + ' + 'btnpaintcircleshape + ' + Me.btnpaintcircleshape.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadcirclerubberselected + Me.btnpaintcircleshape.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.btnpaintcircleshape.FlatAppearance.BorderSize = 0 + Me.btnpaintcircleshape.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpaintcircleshape.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpaintcircleshape.Location = New System.Drawing.Point(16, 27) + Me.btnpaintcircleshape.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnpaintcircleshape.Name = "btnpaintcircleshape" + Me.btnpaintcircleshape.Size = New System.Drawing.Size(48, 40) + Me.btnpaintcircleshape.TabIndex = 16 + Me.btnpaintcircleshape.Text = " " + Me.btnpaintcircleshape.UseVisualStyleBackColor = True + ' + 'Label37 + ' + Me.Label37.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label37.Location = New System.Drawing.Point(137, 29) + Me.Label37.Name = "Label37" + Me.Label37.Size = New System.Drawing.Size(314, 38) + Me.Label37.TabIndex = 15 + Me.Label37.Text = "Choose a shape and size for your paint brush then paint on the canvas by drawing " & _ + "with the mouse." + ' + 'txtpaintbrushsize + ' + Me.txtpaintbrushsize.BackColor = System.Drawing.Color.White + Me.txtpaintbrushsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpaintbrushsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpaintbrushsize.ForeColor = System.Drawing.Color.Black + Me.txtpaintbrushsize.Location = New System.Drawing.Point(194, 68) + Me.txtpaintbrushsize.Name = "txtpaintbrushsize" + Me.txtpaintbrushsize.Size = New System.Drawing.Size(73, 26) + Me.txtpaintbrushsize.TabIndex = 12 + ' + 'Label38 + ' + Me.Label38.AutoSize = True + Me.Label38.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label38.Location = New System.Drawing.Point(137, 69) + Me.Label38.Name = "Label38" + Me.Label38.Size = New System.Drawing.Size(51, 24) + Me.Label38.TabIndex = 10 + Me.Label38.Text = "Size:" + ' + 'Label39 + ' + Me.Label39.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label39.Location = New System.Drawing.Point(6, 3) + Me.Label39.Name = "Label39" + Me.Label39.Size = New System.Drawing.Size(444, 23) + Me.Label39.TabIndex = 0 + Me.Label39.Text = "Paint Brush Tool Settings" + Me.Label39.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnllinetoolsettings + ' + Me.pnllinetoolsettings.Controls.Add(Me.Label29) + Me.pnllinetoolsettings.Controls.Add(Me.txtlinewidth) + Me.pnllinetoolsettings.Controls.Add(Me.Label30) + Me.pnllinetoolsettings.Controls.Add(Me.Label31) + Me.pnllinetoolsettings.Location = New System.Drawing.Point(168, 32) + Me.pnllinetoolsettings.Name = "pnllinetoolsettings" + Me.pnllinetoolsettings.Size = New System.Drawing.Size(60, 28) + Me.pnllinetoolsettings.TabIndex = 20 + Me.pnllinetoolsettings.Visible = False + ' + 'Label29 + ' + Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label29.Location = New System.Drawing.Point(196, 29) + Me.Label29.Name = "Label29" + Me.Label29.Size = New System.Drawing.Size(257, 38) + Me.Label29.TabIndex = 15 + Me.Label29.Text = "Enter a line width then use the mouse to draw a straight line on the canvas." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + ' + 'txtlinewidth + ' + Me.txtlinewidth.BackColor = System.Drawing.Color.White + Me.txtlinewidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtlinewidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtlinewidth.ForeColor = System.Drawing.Color.Black + Me.txtlinewidth.Location = New System.Drawing.Point(114, 33) + Me.txtlinewidth.Name = "txtlinewidth" + Me.txtlinewidth.Size = New System.Drawing.Size(73, 26) + Me.txtlinewidth.TabIndex = 12 + ' + 'Label30 + ' + Me.Label30.AutoSize = True + Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label30.Location = New System.Drawing.Point(8, 34) + Me.Label30.Name = "Label30" + Me.Label30.Size = New System.Drawing.Size(104, 24) + Me.Label30.TabIndex = 10 + Me.Label30.Text = "Line Width:" + ' + 'Label31 + ' + Me.Label31.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label31.Location = New System.Drawing.Point(6, 3) + Me.Label31.Name = "Label31" + Me.Label31.Size = New System.Drawing.Size(444, 23) + Me.Label31.TabIndex = 0 + Me.Label31.Text = "Line Tool Settings" + Me.Label31.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlmagnifiersettings + ' + Me.pnlmagnifiersettings.Controls.Add(Me.btnzoomout) + Me.pnlmagnifiersettings.Controls.Add(Me.btnzoomin) + Me.pnlmagnifiersettings.Controls.Add(Me.lblzoomlevel) + Me.pnlmagnifiersettings.Controls.Add(Me.Label7) + Me.pnlmagnifiersettings.Location = New System.Drawing.Point(78, 50) + Me.pnlmagnifiersettings.Name = "pnlmagnifiersettings" + Me.pnlmagnifiersettings.Size = New System.Drawing.Size(67, 44) + Me.pnlmagnifiersettings.TabIndex = 6 + Me.pnlmagnifiersettings.Visible = False + ' + 'btnzoomout + ' + Me.btnzoomout.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnzoomout.Font = New System.Drawing.Font("Microsoft Sans Serif", 27.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnzoomout.Location = New System.Drawing.Point(16, 33) + Me.btnzoomout.Name = "btnzoomout" + Me.btnzoomout.Size = New System.Drawing.Size(129, 56) + Me.btnzoomout.TabIndex = 11 + Me.btnzoomout.Text = "-" + Me.btnzoomout.UseVisualStyleBackColor = True + ' + 'btnzoomin + ' + Me.btnzoomin.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnzoomin.Font = New System.Drawing.Font("Microsoft Sans Serif", 27.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnzoomin.Location = New System.Drawing.Point(313, 33) + Me.btnzoomin.Name = "btnzoomin" + Me.btnzoomin.Size = New System.Drawing.Size(129, 56) + Me.btnzoomin.TabIndex = 10 + Me.btnzoomin.Text = "+" + Me.btnzoomin.UseVisualStyleBackColor = True + ' + 'lblzoomlevel + ' + Me.lblzoomlevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblzoomlevel.Location = New System.Drawing.Point(151, 33) + Me.lblzoomlevel.Name = "lblzoomlevel" + Me.lblzoomlevel.Size = New System.Drawing.Size(156, 56) + Me.lblzoomlevel.TabIndex = 1 + Me.lblzoomlevel.Text = "1X" + Me.lblzoomlevel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label7 + ' + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(6, 3) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(444, 23) + Me.Label7.TabIndex = 0 + Me.Label7.Text = "Magnifier Settings" + Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnleracertoolsettings + ' + Me.pnleracertoolsettings.Controls.Add(Me.Label28) + Me.pnleracertoolsettings.Controls.Add(Me.btneracersquare) + Me.pnleracertoolsettings.Controls.Add(Me.btneracercircle) + Me.pnleracertoolsettings.Controls.Add(Me.Label24) + Me.pnleracertoolsettings.Controls.Add(Me.txteracersize) + Me.pnleracertoolsettings.Controls.Add(Me.Label26) + Me.pnleracertoolsettings.Controls.Add(Me.Label27) + Me.pnleracertoolsettings.Location = New System.Drawing.Point(308, 69) + Me.pnleracertoolsettings.Name = "pnleracertoolsettings" + Me.pnleracertoolsettings.Size = New System.Drawing.Size(50, 21) + Me.pnleracertoolsettings.TabIndex = 16 + Me.pnleracertoolsettings.Visible = False + ' + 'Label28 + ' + Me.Label28.AutoSize = True + Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label28.Location = New System.Drawing.Point(40, 71) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(65, 24) + Me.Label28.TabIndex = 19 + Me.Label28.Text = "Shape" + ' + 'btneracersquare + ' + Me.btneracersquare.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadsquarerubberselected + Me.btneracersquare.FlatAppearance.BorderSize = 0 + Me.btneracersquare.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btneracersquare.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btneracersquare.Location = New System.Drawing.Point(75, 21) + Me.btneracersquare.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btneracersquare.Name = "btneracersquare" + Me.btneracersquare.Size = New System.Drawing.Size(60, 50) + Me.btneracersquare.TabIndex = 17 + Me.btneracersquare.Text = " " + Me.btneracersquare.UseVisualStyleBackColor = True + ' + 'btneracercircle + ' + Me.btneracercircle.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadcirclerubber + Me.btneracercircle.FlatAppearance.BorderSize = 0 + Me.btneracercircle.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btneracercircle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btneracercircle.Location = New System.Drawing.Point(9, 21) + Me.btneracercircle.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btneracercircle.Name = "btneracercircle" + Me.btneracercircle.Size = New System.Drawing.Size(60, 50) + Me.btneracercircle.TabIndex = 16 + Me.btneracercircle.Text = " " + Me.btneracercircle.UseVisualStyleBackColor = True + ' + 'Label24 + ' + Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label24.Location = New System.Drawing.Point(141, 29) + Me.Label24.Name = "Label24" + Me.Label24.Size = New System.Drawing.Size(314, 38) + Me.Label24.TabIndex = 15 + Me.Label24.Text = "Choose a shape and size for your eracer then rub out unwanted parts of your drawi" & _ + "ng with the mouse." + ' + 'txteracersize + ' + Me.txteracersize.BackColor = System.Drawing.Color.White + Me.txteracersize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txteracersize.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txteracersize.ForeColor = System.Drawing.Color.Black + Me.txteracersize.Location = New System.Drawing.Point(198, 70) + Me.txteracersize.Name = "txteracersize" + Me.txteracersize.Size = New System.Drawing.Size(73, 26) + Me.txteracersize.TabIndex = 12 + ' + 'Label26 + ' + Me.Label26.AutoSize = True + Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label26.Location = New System.Drawing.Point(141, 71) + Me.Label26.Name = "Label26" + Me.Label26.Size = New System.Drawing.Size(51, 24) + Me.Label26.TabIndex = 10 + Me.Label26.Text = "Size:" + ' + 'Label27 + ' + Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label27.Location = New System.Drawing.Point(6, 3) + Me.Label27.Name = "Label27" + Me.Label27.Size = New System.Drawing.Size(444, 23) + Me.Label27.TabIndex = 0 + Me.Label27.Text = "Eracer Tool Settings" + Me.Label27.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlfloodfillsettings + ' + Me.pnlfloodfillsettings.Controls.Add(Me.Label12) + Me.pnlfloodfillsettings.Controls.Add(Me.Label15) + Me.pnlfloodfillsettings.Location = New System.Drawing.Point(162, 65) + Me.pnlfloodfillsettings.Name = "pnlfloodfillsettings" + Me.pnlfloodfillsettings.Size = New System.Drawing.Size(71, 31) + Me.pnlfloodfillsettings.TabIndex = 13 + Me.pnlfloodfillsettings.Visible = False + ' + 'Label12 + ' + Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label12.Location = New System.Drawing.Point(3, 28) + Me.Label12.Name = "Label12" + Me.Label12.Size = New System.Drawing.Size(450, 51) + Me.Label12.TabIndex = 11 + Me.Label12.Text = resources.GetString("Label12.Text") + Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label15 + ' + Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label15.Location = New System.Drawing.Point(6, 3) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(444, 23) + Me.Label15.TabIndex = 0 + Me.Label15.Text = "Flood Fill Settings" + Me.Label15.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlovaltoolsettings + ' + Me.pnlovaltoolsettings.Controls.Add(Me.Label20) + Me.pnlovaltoolsettings.Controls.Add(Me.btnovalfillonoff) + Me.pnlovaltoolsettings.Controls.Add(Me.pnlovalfillcolour) + Me.pnlovaltoolsettings.Controls.Add(Me.txtovalborderwidth) + Me.pnlovaltoolsettings.Controls.Add(Me.Label21) + Me.pnlovaltoolsettings.Controls.Add(Me.Label22) + Me.pnlovaltoolsettings.Controls.Add(Me.Label23) + Me.pnlovaltoolsettings.Location = New System.Drawing.Point(152, 5) + Me.pnlovaltoolsettings.Name = "pnlovaltoolsettings" + Me.pnlovaltoolsettings.Size = New System.Drawing.Size(80, 22) + Me.pnlovaltoolsettings.TabIndex = 15 + Me.pnlovaltoolsettings.Visible = False + ' + 'Label20 + ' + Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label20.Location = New System.Drawing.Point(211, 29) + Me.Label20.Name = "Label20" + Me.Label20.Size = New System.Drawing.Size(244, 65) + Me.Label20.TabIndex = 15 + Me.Label20.Text = "Set a border width and turn fill on or off then draw the square on the canvas wit" & _ + "h the mouse. Click the fill colour box to set it to your currently selected colo" & _ + "ur." + ' + 'btnovalfillonoff + ' + Me.btnovalfillonoff.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnovalfillonoff.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnovalfillonoff.Location = New System.Drawing.Point(150, 64) + Me.btnovalfillonoff.Name = "btnovalfillonoff" + Me.btnovalfillonoff.Size = New System.Drawing.Size(56, 28) + Me.btnovalfillonoff.TabIndex = 14 + Me.btnovalfillonoff.Text = "Fill OFF" + Me.btnovalfillonoff.UseVisualStyleBackColor = True + ' + 'pnlovalfillcolour + ' + Me.pnlovalfillcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlovalfillcolour.Location = New System.Drawing.Point(109, 64) + Me.pnlovalfillcolour.Name = "pnlovalfillcolour" + Me.pnlovalfillcolour.Size = New System.Drawing.Size(34, 28) + Me.pnlovalfillcolour.TabIndex = 13 + ' + 'txtovalborderwidth + ' + Me.txtovalborderwidth.BackColor = System.Drawing.Color.White + Me.txtovalborderwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtovalborderwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtovalborderwidth.ForeColor = System.Drawing.Color.Black + Me.txtovalborderwidth.Location = New System.Drawing.Point(133, 33) + Me.txtovalborderwidth.Name = "txtovalborderwidth" + Me.txtovalborderwidth.Size = New System.Drawing.Size(73, 26) + Me.txtovalborderwidth.TabIndex = 12 + ' + 'Label21 + ' + Me.Label21.AutoSize = True + Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label21.Location = New System.Drawing.Point(4, 66) + Me.Label21.Name = "Label21" + Me.Label21.Size = New System.Drawing.Size(100, 24) + Me.Label21.TabIndex = 11 + Me.Label21.Text = "Fill Colour:" + ' + 'Label22 + ' + Me.Label22.AutoSize = True + Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label22.Location = New System.Drawing.Point(4, 33) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(125, 24) + Me.Label22.TabIndex = 10 + Me.Label22.Text = "Border Width:" + ' + 'Label23 + ' + Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label23.Location = New System.Drawing.Point(6, 3) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(444, 23) + Me.Label23.TabIndex = 0 + Me.Label23.Text = "Oval Tool Settings" + Me.Label23.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlsquaretoolsettings + ' + Me.pnlsquaretoolsettings.Controls.Add(Me.Label19) + Me.pnlsquaretoolsettings.Controls.Add(Me.btnsquarefillonoff) + Me.pnlsquaretoolsettings.Controls.Add(Me.pnlsquarefillcolour) + Me.pnlsquaretoolsettings.Controls.Add(Me.txtsquareborderwidth) + Me.pnlsquaretoolsettings.Controls.Add(Me.Label16) + Me.pnlsquaretoolsettings.Controls.Add(Me.Label18) + Me.pnlsquaretoolsettings.Controls.Add(Me.Label17) + Me.pnlsquaretoolsettings.Location = New System.Drawing.Point(16, 39) + Me.pnlsquaretoolsettings.Name = "pnlsquaretoolsettings" + Me.pnlsquaretoolsettings.Size = New System.Drawing.Size(42, 31) + Me.pnlsquaretoolsettings.TabIndex = 14 + Me.pnlsquaretoolsettings.Visible = False + ' + 'Label19 + ' + Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label19.Location = New System.Drawing.Point(211, 29) + Me.Label19.Name = "Label19" + Me.Label19.Size = New System.Drawing.Size(244, 65) + Me.Label19.TabIndex = 15 + Me.Label19.Text = "Set a border width and turn fill on or off then draw the square on the canvas wit" & _ + "h the mouse. Click the fill colour box to set it to your currently selected colo" & _ + "ur." + ' + 'btnsquarefillonoff + ' + Me.btnsquarefillonoff.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnsquarefillonoff.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsquarefillonoff.Location = New System.Drawing.Point(150, 64) + Me.btnsquarefillonoff.Name = "btnsquarefillonoff" + Me.btnsquarefillonoff.Size = New System.Drawing.Size(56, 28) + Me.btnsquarefillonoff.TabIndex = 14 + Me.btnsquarefillonoff.Text = "Fill OFF" + Me.btnsquarefillonoff.UseVisualStyleBackColor = True + ' + 'pnlsquarefillcolour + ' + Me.pnlsquarefillcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlsquarefillcolour.Location = New System.Drawing.Point(109, 64) + Me.pnlsquarefillcolour.Name = "pnlsquarefillcolour" + Me.pnlsquarefillcolour.Size = New System.Drawing.Size(34, 28) + Me.pnlsquarefillcolour.TabIndex = 13 + ' + 'txtsquareborderwidth + ' + Me.txtsquareborderwidth.BackColor = System.Drawing.Color.White + Me.txtsquareborderwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtsquareborderwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtsquareborderwidth.ForeColor = System.Drawing.Color.Black + Me.txtsquareborderwidth.Location = New System.Drawing.Point(133, 33) + Me.txtsquareborderwidth.Name = "txtsquareborderwidth" + Me.txtsquareborderwidth.Size = New System.Drawing.Size(73, 26) + Me.txtsquareborderwidth.TabIndex = 12 + ' + 'Label16 + ' + Me.Label16.AutoSize = True + Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label16.Location = New System.Drawing.Point(4, 66) + Me.Label16.Name = "Label16" + Me.Label16.Size = New System.Drawing.Size(100, 24) + Me.Label16.TabIndex = 11 + Me.Label16.Text = "Fill Colour:" + ' + 'Label18 + ' + Me.Label18.AutoSize = True + Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label18.Location = New System.Drawing.Point(4, 33) + Me.Label18.Name = "Label18" + Me.Label18.Size = New System.Drawing.Size(125, 24) + Me.Label18.TabIndex = 10 + Me.Label18.Text = "Border Width:" + ' + 'Label17 + ' + Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label17.Location = New System.Drawing.Point(6, 3) + Me.Label17.Name = "Label17" + Me.Label17.Size = New System.Drawing.Size(444, 23) + Me.Label17.TabIndex = 0 + Me.Label17.Text = "Rectangle Tool Settings" + Me.Label17.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlpixelplacersettings + ' + Me.pnlpixelplacersettings.Controls.Add(Me.lblpixelplacerhelp) + Me.pnlpixelplacersettings.Controls.Add(Me.btnpixelplacermovementmode) + Me.pnlpixelplacersettings.Controls.Add(Me.Label8) + Me.pnlpixelplacersettings.Location = New System.Drawing.Point(44, 4) + Me.pnlpixelplacersettings.Name = "pnlpixelplacersettings" + Me.pnlpixelplacersettings.Size = New System.Drawing.Size(37, 37) + Me.pnlpixelplacersettings.TabIndex = 7 + Me.pnlpixelplacersettings.Visible = False + ' + 'lblpixelplacerhelp + ' + Me.lblpixelplacerhelp.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblpixelplacerhelp.Location = New System.Drawing.Point(3, 26) + Me.lblpixelplacerhelp.Name = "lblpixelplacerhelp" + Me.lblpixelplacerhelp.Size = New System.Drawing.Size(307, 67) + Me.lblpixelplacerhelp.TabIndex = 11 + Me.lblpixelplacerhelp.Text = "This tool does not contain any alterable settings. Simply click on the canvas and" & _ + " a pixel will be placed in the spot you click." + Me.lblpixelplacerhelp.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnpixelplacermovementmode + ' + Me.btnpixelplacermovementmode.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpixelplacermovementmode.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpixelplacermovementmode.Location = New System.Drawing.Point(312, 26) + Me.btnpixelplacermovementmode.Name = "btnpixelplacermovementmode" + Me.btnpixelplacermovementmode.Size = New System.Drawing.Size(138, 67) + Me.btnpixelplacermovementmode.TabIndex = 10 + Me.btnpixelplacermovementmode.Text = "Activate Movement Mode" + Me.btnpixelplacermovementmode.UseVisualStyleBackColor = True + ' + 'Label8 + ' + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(6, 3) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(444, 23) + Me.Label8.TabIndex = 0 + Me.Label8.Text = "Pixel Placer Settings" + Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlpencilsettings + ' + Me.pnlpencilsettings.Controls.Add(Me.btnpencilsize3) + Me.pnlpencilsettings.Controls.Add(Me.btnpencilsize2) + Me.pnlpencilsettings.Controls.Add(Me.btnpencilsize1) + Me.pnlpencilsettings.Controls.Add(Me.Label14) + Me.pnlpencilsettings.Location = New System.Drawing.Point(422, 13) + Me.pnlpencilsettings.Name = "pnlpencilsettings" + Me.pnlpencilsettings.Size = New System.Drawing.Size(28, 22) + Me.pnlpencilsettings.TabIndex = 12 + Me.pnlpencilsettings.Visible = False + ' + 'btnpencilsize3 + ' + Me.btnpencilsize3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpencilsize3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpencilsize3.Location = New System.Drawing.Point(298, 30) + Me.btnpencilsize3.Name = "btnpencilsize3" + Me.btnpencilsize3.Size = New System.Drawing.Size(127, 54) + Me.btnpencilsize3.TabIndex = 12 + Me.btnpencilsize3.Text = "Thickest" + Me.btnpencilsize3.UseVisualStyleBackColor = True + ' + 'btnpencilsize2 + ' + Me.btnpencilsize2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpencilsize2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpencilsize2.Location = New System.Drawing.Point(165, 30) + Me.btnpencilsize2.Name = "btnpencilsize2" + Me.btnpencilsize2.Size = New System.Drawing.Size(127, 54) + Me.btnpencilsize2.TabIndex = 11 + Me.btnpencilsize2.Text = "Thicker" + Me.btnpencilsize2.UseVisualStyleBackColor = True + ' + 'btnpencilsize1 + ' + Me.btnpencilsize1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpencilsize1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpencilsize1.Location = New System.Drawing.Point(30, 30) + Me.btnpencilsize1.Name = "btnpencilsize1" + Me.btnpencilsize1.Size = New System.Drawing.Size(127, 54) + Me.btnpencilsize1.TabIndex = 10 + Me.btnpencilsize1.Text = "Thin" + Me.btnpencilsize1.UseVisualStyleBackColor = True + ' + 'Label14 + ' + Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label14.Location = New System.Drawing.Point(6, 3) + Me.Label14.Name = "Label14" + Me.Label14.Size = New System.Drawing.Size(444, 23) + Me.Label14.TabIndex = 0 + Me.Label14.Text = "Pencil Settings" + Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label6 + ' + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(13, 40) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(437, 49) + Me.Label6.TabIndex = 9 + Me.Label6.Text = resources.GetString("Label6.Text") + Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(110, 13) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(269, 24) + Me.Label5.TabIndex = 8 + Me.Label5.Text = "No Tool Currently Selected!" + ' + 'line5 + ' + Me.line5.BackColor = System.Drawing.Color.Black + Me.line5.Dock = System.Windows.Forms.DockStyle.Top + Me.line5.Location = New System.Drawing.Point(0, 0) + Me.line5.Name = "line5" + Me.line5.Size = New System.Drawing.Size(456, 1) + Me.line5.TabIndex = 4 + ' + 'line3 + ' + Me.line3.BackColor = System.Drawing.Color.Black + Me.line3.Dock = System.Windows.Forms.DockStyle.Right + Me.line3.Location = New System.Drawing.Point(456, 0) + Me.line3.Name = "line3" + Me.line3.Size = New System.Drawing.Size(1, 100) + Me.line3.TabIndex = 2 + ' + 'pnltools + ' + Me.pnltools.BackColor = System.Drawing.Color.White + Me.pnltools.Controls.Add(Me.pnltoolpositioner) + Me.pnltools.Controls.Add(Me.line1) + Me.pnltools.Controls.Add(Me.pnltoolpreview) + Me.pnltools.Dock = System.Windows.Forms.DockStyle.Left + Me.pnltools.Location = New System.Drawing.Point(0, 0) + Me.pnltools.Name = "pnltools" + Me.pnltools.Size = New System.Drawing.Size(120, 566) + Me.pnltools.TabIndex = 0 + ' + 'pnltoolpositioner + ' + Me.pnltoolpositioner.Controls.Add(Me.btnpixelsetter) + Me.pnltoolpositioner.Controls.Add(Me.btnpixelplacer) + Me.pnltoolpositioner.Controls.Add(Me.btnpencil) + Me.pnltoolpositioner.Controls.Add(Me.btnfloodfill) + Me.pnltoolpositioner.Controls.Add(Me.btnoval) + Me.pnltoolpositioner.Controls.Add(Me.btnsquare) + Me.pnltoolpositioner.Controls.Add(Me.btnlinetool) + Me.pnltoolpositioner.Controls.Add(Me.btnpaintbrush) + Me.pnltoolpositioner.Controls.Add(Me.btntexttool) + Me.pnltoolpositioner.Controls.Add(Me.btneracer) + Me.pnltoolpositioner.Controls.Add(Me.btnnew) + Me.pnltoolpositioner.Controls.Add(Me.btnmagnify) + Me.pnltoolpositioner.Controls.Add(Me.btnopen) + Me.pnltoolpositioner.Controls.Add(Me.btnsave) + Me.pnltoolpositioner.Controls.Add(Me.btnundo) + Me.pnltoolpositioner.Controls.Add(Me.btnredo) + Me.pnltoolpositioner.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnltoolpositioner.Location = New System.Drawing.Point(0, 0) + Me.pnltoolpositioner.Name = "pnltoolpositioner" + Me.pnltoolpositioner.Size = New System.Drawing.Size(119, 466) + Me.pnltoolpositioner.TabIndex = 2 + ' + 'btnpixelsetter + ' + Me.btnpixelsetter.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadpixelsetter + Me.btnpixelsetter.FlatAppearance.BorderSize = 0 + Me.btnpixelsetter.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpixelsetter.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpixelsetter.Location = New System.Drawing.Point(6, 6) + Me.btnpixelsetter.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnpixelsetter.Name = "btnpixelsetter" + Me.btnpixelsetter.Size = New System.Drawing.Size(50, 50) + Me.btnpixelsetter.TabIndex = 2 + Me.btnpixelsetter.UseVisualStyleBackColor = True + ' + 'btnpixelplacer + ' + Me.btnpixelplacer.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadpixelplacer + Me.btnpixelplacer.FlatAppearance.BorderSize = 0 + Me.btnpixelplacer.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpixelplacer.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpixelplacer.Location = New System.Drawing.Point(62, 6) + Me.btnpixelplacer.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnpixelplacer.Name = "btnpixelplacer" + Me.btnpixelplacer.Size = New System.Drawing.Size(50, 50) + Me.btnpixelplacer.TabIndex = 4 + Me.btnpixelplacer.UseVisualStyleBackColor = True + ' + 'btnpencil + ' + Me.btnpencil.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadpencil + Me.btnpencil.FlatAppearance.BorderSize = 0 + Me.btnpencil.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpencil.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpencil.Location = New System.Drawing.Point(6, 62) + Me.btnpencil.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnpencil.Name = "btnpencil" + Me.btnpencil.Size = New System.Drawing.Size(50, 50) + Me.btnpencil.TabIndex = 7 + Me.btnpencil.Text = " " + Me.btnpencil.UseVisualStyleBackColor = True + ' + 'btnfloodfill + ' + Me.btnfloodfill.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadfloodfill + Me.btnfloodfill.FlatAppearance.BorderSize = 0 + Me.btnfloodfill.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnfloodfill.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnfloodfill.Location = New System.Drawing.Point(62, 62) + Me.btnfloodfill.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnfloodfill.Name = "btnfloodfill" + Me.btnfloodfill.Size = New System.Drawing.Size(50, 50) + Me.btnfloodfill.TabIndex = 11 + Me.btnfloodfill.UseVisualStyleBackColor = True + ' + 'btnoval + ' + Me.btnoval.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadOval + Me.btnoval.FlatAppearance.BorderSize = 0 + Me.btnoval.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnoval.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnoval.Location = New System.Drawing.Point(6, 118) + Me.btnoval.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnoval.Name = "btnoval" + Me.btnoval.Size = New System.Drawing.Size(50, 50) + Me.btnoval.TabIndex = 13 + Me.btnoval.Text = " " + Me.btnoval.UseVisualStyleBackColor = True + ' + 'btnsquare + ' + Me.btnsquare.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadRectangle + Me.btnsquare.FlatAppearance.BorderSize = 0 + Me.btnsquare.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsquare.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsquare.Location = New System.Drawing.Point(62, 118) + Me.btnsquare.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnsquare.Name = "btnsquare" + Me.btnsquare.Size = New System.Drawing.Size(50, 50) + Me.btnsquare.TabIndex = 12 + Me.btnsquare.Text = " " + Me.btnsquare.UseVisualStyleBackColor = True + ' + 'btnlinetool + ' + Me.btnlinetool.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadlinetool + Me.btnlinetool.FlatAppearance.BorderSize = 0 + Me.btnlinetool.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnlinetool.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnlinetool.Location = New System.Drawing.Point(6, 174) + Me.btnlinetool.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnlinetool.Name = "btnlinetool" + Me.btnlinetool.Size = New System.Drawing.Size(50, 50) + Me.btnlinetool.TabIndex = 15 + Me.btnlinetool.Text = " " + Me.btnlinetool.UseVisualStyleBackColor = True + ' + 'btnpaintbrush + ' + Me.btnpaintbrush.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadpaintbrush + Me.btnpaintbrush.FlatAppearance.BorderSize = 0 + Me.btnpaintbrush.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpaintbrush.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpaintbrush.Location = New System.Drawing.Point(62, 174) + Me.btnpaintbrush.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnpaintbrush.Name = "btnpaintbrush" + Me.btnpaintbrush.Size = New System.Drawing.Size(50, 50) + Me.btnpaintbrush.TabIndex = 17 + Me.btnpaintbrush.Text = " " + Me.btnpaintbrush.UseVisualStyleBackColor = True + ' + 'btntexttool + ' + Me.btntexttool.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadtexttool + Me.btntexttool.FlatAppearance.BorderSize = 0 + Me.btntexttool.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btntexttool.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btntexttool.Location = New System.Drawing.Point(6, 230) + Me.btntexttool.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btntexttool.Name = "btntexttool" + Me.btntexttool.Size = New System.Drawing.Size(50, 50) + Me.btntexttool.TabIndex = 16 + Me.btntexttool.Text = " " + Me.btntexttool.UseVisualStyleBackColor = True + ' + 'btneracer + ' + Me.btneracer.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPaderacer + Me.btneracer.FlatAppearance.BorderSize = 0 + Me.btneracer.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btneracer.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btneracer.Location = New System.Drawing.Point(62, 230) + Me.btneracer.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btneracer.Name = "btneracer" + Me.btneracer.Size = New System.Drawing.Size(50, 50) + Me.btneracer.TabIndex = 14 + Me.btneracer.Text = " " + Me.btneracer.UseVisualStyleBackColor = True + ' + 'btnnew + ' + Me.btnnew.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadnew + Me.btnnew.FlatAppearance.BorderSize = 0 + Me.btnnew.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnnew.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnnew.Location = New System.Drawing.Point(6, 286) + Me.btnnew.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnnew.Name = "btnnew" + Me.btnnew.Size = New System.Drawing.Size(50, 50) + Me.btnnew.TabIndex = 6 + Me.btnnew.Text = " " + Me.btnnew.UseVisualStyleBackColor = True + ' + 'btnmagnify + ' + Me.btnmagnify.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadmagnify + Me.btnmagnify.FlatAppearance.BorderSize = 0 + Me.btnmagnify.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnmagnify.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnmagnify.Location = New System.Drawing.Point(62, 286) + Me.btnmagnify.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnmagnify.Name = "btnmagnify" + Me.btnmagnify.Size = New System.Drawing.Size(50, 50) + Me.btnmagnify.TabIndex = 3 + Me.btnmagnify.Text = " " + Me.btnmagnify.UseVisualStyleBackColor = True + ' + 'btnopen + ' + Me.btnopen.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadopen + Me.btnopen.FlatAppearance.BorderSize = 0 + Me.btnopen.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnopen.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnopen.Location = New System.Drawing.Point(6, 342) + Me.btnopen.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnopen.Name = "btnopen" + Me.btnopen.Size = New System.Drawing.Size(50, 50) + Me.btnopen.TabIndex = 10 + Me.btnopen.Text = " " + Me.btnopen.UseVisualStyleBackColor = True + ' + 'btnsave + ' + Me.btnsave.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadsave + Me.btnsave.FlatAppearance.BorderSize = 0 + Me.btnsave.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsave.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsave.Location = New System.Drawing.Point(62, 342) + Me.btnsave.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnsave.Name = "btnsave" + Me.btnsave.Size = New System.Drawing.Size(50, 50) + Me.btnsave.TabIndex = 5 + Me.btnsave.Text = " " + Me.btnsave.UseVisualStyleBackColor = True + ' + 'btnundo + ' + Me.btnundo.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadundo + Me.btnundo.FlatAppearance.BorderSize = 0 + Me.btnundo.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnundo.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnundo.Location = New System.Drawing.Point(6, 398) + Me.btnundo.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnundo.Name = "btnundo" + Me.btnundo.Size = New System.Drawing.Size(50, 50) + Me.btnundo.TabIndex = 8 + Me.btnundo.Text = " " + Me.btnundo.UseVisualStyleBackColor = True + ' + 'btnredo + ' + Me.btnredo.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ArtPadredo + Me.btnredo.FlatAppearance.BorderSize = 0 + Me.btnredo.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnredo.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnredo.Location = New System.Drawing.Point(62, 398) + Me.btnredo.Margin = New System.Windows.Forms.Padding(6, 6, 0, 0) + Me.btnredo.Name = "btnredo" + Me.btnredo.Size = New System.Drawing.Size(50, 50) + Me.btnredo.TabIndex = 9 + Me.btnredo.Text = " " + Me.btnredo.UseVisualStyleBackColor = True + ' + 'line1 + ' + Me.line1.BackColor = System.Drawing.Color.Black + Me.line1.Dock = System.Windows.Forms.DockStyle.Right + Me.line1.Location = New System.Drawing.Point(119, 0) + Me.line1.Name = "line1" + Me.line1.Size = New System.Drawing.Size(1, 466) + Me.line1.TabIndex = 1 + ' + 'pnltoolpreview + ' + Me.pnltoolpreview.Controls.Add(Me.Label13) + Me.pnltoolpreview.Controls.Add(Me.picpreview) + Me.pnltoolpreview.Controls.Add(Me.lbltoolselected) + Me.pnltoolpreview.Controls.Add(Me.line4) + Me.pnltoolpreview.Controls.Add(Me.line2) + Me.pnltoolpreview.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnltoolpreview.Location = New System.Drawing.Point(0, 466) + Me.pnltoolpreview.Name = "pnltoolpreview" + Me.pnltoolpreview.Size = New System.Drawing.Size(120, 100) + Me.pnltoolpreview.TabIndex = 0 + ' + 'Label13 + ' + Me.Label13.BackColor = System.Drawing.Color.Transparent + Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label13.Location = New System.Drawing.Point(3, 79) + Me.Label13.Name = "Label13" + Me.Label13.Size = New System.Drawing.Size(113, 21) + Me.Label13.TabIndex = 6 + Me.Label13.Text = "Preview" + Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'picpreview + ' + Me.picpreview.Location = New System.Drawing.Point(24, 27) + Me.picpreview.Name = "picpreview" + Me.picpreview.Size = New System.Drawing.Size(70, 50) + Me.picpreview.TabIndex = 5 + Me.picpreview.TabStop = False + ' + 'lbltoolselected + ' + Me.lbltoolselected.BackColor = System.Drawing.Color.Transparent + Me.lbltoolselected.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltoolselected.Location = New System.Drawing.Point(3, 3) + Me.lbltoolselected.Name = "lbltoolselected" + Me.lbltoolselected.Size = New System.Drawing.Size(113, 21) + Me.lbltoolselected.TabIndex = 4 + Me.lbltoolselected.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'line4 + ' + Me.line4.BackColor = System.Drawing.Color.Black + Me.line4.Dock = System.Windows.Forms.DockStyle.Top + Me.line4.Location = New System.Drawing.Point(0, 0) + Me.line4.Name = "line4" + Me.line4.Size = New System.Drawing.Size(119, 1) + Me.line4.TabIndex = 3 + ' + 'line2 + ' + Me.line2.BackColor = System.Drawing.Color.Black + Me.line2.Dock = System.Windows.Forms.DockStyle.Right + Me.line2.Location = New System.Drawing.Point(119, 0) + Me.line2.Name = "line2" + Me.line2.Size = New System.Drawing.Size(1, 100) + Me.line2.TabIndex = 2 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 568) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 566) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(800, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 568) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 566) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(802, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconArtpad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(76, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Artpad" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(800, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 596) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(798, 2) + Me.pgbottom.TabIndex = 23 + ' + 'tmrcodepointcooldown + ' + Me.tmrcodepointcooldown.Interval = 10000 + ' + 'tmrshowearnedcodepoints + ' + Me.tmrshowearnedcodepoints.Interval = 3000 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'ArtPad + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(802, 598) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(502, 398) + Me.Name = "ArtPad" + Me.Text = "ArtPad" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnldrawingbackground.ResumeLayout(False) + Me.pnlpalletsize.ResumeLayout(False) + Me.pnlpalletsize.PerformLayout() + Me.pnlinitialcanvassettings.ResumeLayout(False) + Me.pnlinitialcanvassettings.PerformLayout() + CType(Me.picdrawingdisplay, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlbottompanel.ResumeLayout(False) + Me.pnlpallet.ResumeLayout(False) + Me.flowcolours.ResumeLayout(False) + Me.pnltoolproperties.ResumeLayout(False) + Me.pnltoolproperties.PerformLayout() + Me.pnltexttoolsettings.ResumeLayout(False) + Me.pnltexttoolsettings.PerformLayout() + Me.pnlpixelsettersettings.ResumeLayout(False) + Me.pnlpixelsettersettings.PerformLayout() + Me.pnlpaintbrushtoolsettings.ResumeLayout(False) + Me.pnlpaintbrushtoolsettings.PerformLayout() + Me.pnllinetoolsettings.ResumeLayout(False) + Me.pnllinetoolsettings.PerformLayout() + Me.pnlmagnifiersettings.ResumeLayout(False) + Me.pnleracertoolsettings.ResumeLayout(False) + Me.pnleracertoolsettings.PerformLayout() + Me.pnlfloodfillsettings.ResumeLayout(False) + Me.pnlovaltoolsettings.ResumeLayout(False) + Me.pnlovaltoolsettings.PerformLayout() + Me.pnlsquaretoolsettings.ResumeLayout(False) + Me.pnlsquaretoolsettings.PerformLayout() + Me.pnlpixelplacersettings.ResumeLayout(False) + Me.pnlpencilsettings.ResumeLayout(False) + Me.pnltools.ResumeLayout(False) + Me.pnltoolpositioner.ResumeLayout(False) + Me.pnltoolpreview.ResumeLayout(False) + CType(Me.picpreview, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pnlbottompanel As System.Windows.Forms.Panel + Friend WithEvents pnltoolproperties As System.Windows.Forms.Panel + Friend WithEvents pnlpallet As System.Windows.Forms.Panel + Friend WithEvents line3 As System.Windows.Forms.Panel + Friend WithEvents line5 As System.Windows.Forms.Panel + Friend WithEvents line6 As System.Windows.Forms.Panel + Friend WithEvents pnldrawingbackground As System.Windows.Forms.Panel + Friend WithEvents picdrawingdisplay As System.Windows.Forms.PictureBox + Friend WithEvents btnpixelsetter As System.Windows.Forms.Button + Friend WithEvents pnlpixelsettersettings As System.Windows.Forms.Panel + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents btnpixelsettersetpixel As System.Windows.Forms.Button + Friend WithEvents txtpixelsetterycoordinate As System.Windows.Forms.TextBox + Friend WithEvents txtpixelsetterxcoordinate As System.Windows.Forms.TextBox + Friend WithEvents btnmagnify As System.Windows.Forms.Button + Friend WithEvents colourpallet32 As System.Windows.Forms.Panel + Friend WithEvents colourpallet31 As System.Windows.Forms.Panel + Friend WithEvents colourpallet30 As System.Windows.Forms.Panel + Friend WithEvents colourpallet29 As System.Windows.Forms.Panel + Friend WithEvents colourpallet28 As System.Windows.Forms.Panel + Friend WithEvents colourpallet26 As System.Windows.Forms.Panel + Friend WithEvents colourpallet25 As System.Windows.Forms.Panel + Friend WithEvents colourpallet23 As System.Windows.Forms.Panel + Friend WithEvents colourpallet21 As System.Windows.Forms.Panel + Friend WithEvents colourpallet19 As System.Windows.Forms.Panel + Friend WithEvents colourpallet8 As System.Windows.Forms.Panel + Friend WithEvents colourpallet6 As System.Windows.Forms.Panel + Friend WithEvents colourpallet16 As System.Windows.Forms.Panel + Friend WithEvents colourpallet14 As System.Windows.Forms.Panel + Friend WithEvents colourpallet7 As System.Windows.Forms.Panel + Friend WithEvents colourpallet5 As System.Windows.Forms.Panel + Friend WithEvents colourpallet10 As System.Windows.Forms.Panel + Friend WithEvents colourpallet9 As System.Windows.Forms.Panel + Friend WithEvents colourpallet11 As System.Windows.Forms.Panel + Friend WithEvents colourpallet12 As System.Windows.Forms.Panel + Friend WithEvents colourpallet13 As System.Windows.Forms.Panel + Friend WithEvents colourpallet15 As System.Windows.Forms.Panel + Friend WithEvents colourpallet4 As System.Windows.Forms.Panel + Friend WithEvents colourpallet3 As System.Windows.Forms.Panel + Friend WithEvents colourpallet17 As System.Windows.Forms.Panel + Friend WithEvents colourpallet18 As System.Windows.Forms.Panel + Friend WithEvents colourpallet20 As System.Windows.Forms.Panel + Friend WithEvents colourpallet22 As System.Windows.Forms.Panel + Friend WithEvents colourpallet24 As System.Windows.Forms.Panel + Friend WithEvents colourpallet2 As System.Windows.Forms.Panel + Friend WithEvents colourpallet27 As System.Windows.Forms.Panel + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents colourpallet1 As System.Windows.Forms.Panel + Friend WithEvents pnlmagnifiersettings As System.Windows.Forms.Panel + Friend WithEvents btnzoomin As System.Windows.Forms.Button + Friend WithEvents lblzoomlevel As System.Windows.Forms.Label + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents btnzoomout As System.Windows.Forms.Button + Friend WithEvents btnpixelplacer As System.Windows.Forms.Button + Friend WithEvents pnlpixelplacersettings As System.Windows.Forms.Panel + Friend WithEvents btnpixelplacermovementmode As System.Windows.Forms.Button + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents lblpixelplacerhelp As System.Windows.Forms.Label + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents btnnew As System.Windows.Forms.Button + Friend WithEvents flowcolours As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents btnpencil As System.Windows.Forms.Button + Friend WithEvents pnlpencilsettings As System.Windows.Forms.Panel + Friend WithEvents btnpencilsize3 As System.Windows.Forms.Button + Friend WithEvents btnpencilsize2 As System.Windows.Forms.Button + Friend WithEvents btnpencilsize1 As System.Windows.Forms.Button + Friend WithEvents Label14 As System.Windows.Forms.Label + Friend WithEvents btnfloodfill As System.Windows.Forms.Button + Friend WithEvents pnlfloodfillsettings As System.Windows.Forms.Panel + Friend WithEvents Label12 As System.Windows.Forms.Label + Friend WithEvents Label15 As System.Windows.Forms.Label + Friend WithEvents btnsquare As System.Windows.Forms.Button + Friend WithEvents pnlsquaretoolsettings As System.Windows.Forms.Panel + Friend WithEvents txtsquareborderwidth As System.Windows.Forms.TextBox + Friend WithEvents Label16 As System.Windows.Forms.Label + Friend WithEvents Label18 As System.Windows.Forms.Label + Friend WithEvents Label17 As System.Windows.Forms.Label + Friend WithEvents btnsquarefillonoff As System.Windows.Forms.Button + Friend WithEvents pnlsquarefillcolour As System.Windows.Forms.Panel + Friend WithEvents Label19 As System.Windows.Forms.Label + Friend WithEvents btnoval As System.Windows.Forms.Button + Friend WithEvents pnlovaltoolsettings As System.Windows.Forms.Panel + Friend WithEvents Label20 As System.Windows.Forms.Label + Friend WithEvents btnovalfillonoff As System.Windows.Forms.Button + Friend WithEvents pnlovalfillcolour As System.Windows.Forms.Panel + Friend WithEvents txtovalborderwidth As System.Windows.Forms.TextBox + Friend WithEvents Label21 As System.Windows.Forms.Label + Friend WithEvents Label22 As System.Windows.Forms.Label + Friend WithEvents Label23 As System.Windows.Forms.Label + Friend WithEvents pnltools As System.Windows.Forms.Panel + Friend WithEvents pnltoolpositioner As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents line1 As System.Windows.Forms.Panel + Friend WithEvents pnltoolpreview As System.Windows.Forms.Panel + Friend WithEvents Label13 As System.Windows.Forms.Label + Friend WithEvents picpreview As System.Windows.Forms.PictureBox + Friend WithEvents lbltoolselected As System.Windows.Forms.Label + Friend WithEvents line4 As System.Windows.Forms.Panel + Friend WithEvents line2 As System.Windows.Forms.Panel + Friend WithEvents btnopen As System.Windows.Forms.Button + Friend WithEvents btnsave As System.Windows.Forms.Button + Friend WithEvents btnundo As System.Windows.Forms.Button + Friend WithEvents btnredo As System.Windows.Forms.Button + Friend WithEvents btneracer As System.Windows.Forms.Button + Friend WithEvents btnlinetool As System.Windows.Forms.Button + Friend WithEvents pnllinetoolsettings As System.Windows.Forms.Panel + Friend WithEvents Label29 As System.Windows.Forms.Label + Friend WithEvents txtlinewidth As System.Windows.Forms.TextBox + Friend WithEvents Label30 As System.Windows.Forms.Label + Friend WithEvents Label31 As System.Windows.Forms.Label + Friend WithEvents pnleracertoolsettings As System.Windows.Forms.Panel + Friend WithEvents Label28 As System.Windows.Forms.Label + Friend WithEvents btneracersquare As System.Windows.Forms.Button + Friend WithEvents btneracercircle As System.Windows.Forms.Button + Friend WithEvents Label24 As System.Windows.Forms.Label + Friend WithEvents txteracersize As System.Windows.Forms.TextBox + Friend WithEvents Label26 As System.Windows.Forms.Label + Friend WithEvents Label27 As System.Windows.Forms.Label + Friend WithEvents btntexttool As System.Windows.Forms.Button + Friend WithEvents btnpaintbrush As System.Windows.Forms.Button + Friend WithEvents pnltexttoolsettings As System.Windows.Forms.Panel + Friend WithEvents Label25 As System.Windows.Forms.Label + Friend WithEvents txtdrawtextsize As System.Windows.Forms.TextBox + Friend WithEvents Label32 As System.Windows.Forms.Label + Friend WithEvents Label33 As System.Windows.Forms.Label + Friend WithEvents Label34 As System.Windows.Forms.Label + Friend WithEvents combodrawtextfont As System.Windows.Forms.ComboBox + Friend WithEvents txtdrawstringtext As System.Windows.Forms.TextBox + Friend WithEvents combofontstyle As System.Windows.Forms.ComboBox + Friend WithEvents Label35 As System.Windows.Forms.Label + Friend WithEvents pnlpaintbrushtoolsettings As System.Windows.Forms.Panel + Friend WithEvents Label36 As System.Windows.Forms.Label + Friend WithEvents btnpaintsquareshape As System.Windows.Forms.Button + Friend WithEvents btnpaintcircleshape As System.Windows.Forms.Button + Friend WithEvents Label37 As System.Windows.Forms.Label + Friend WithEvents txtpaintbrushsize As System.Windows.Forms.TextBox + Friend WithEvents Label38 As System.Windows.Forms.Label + Friend WithEvents Label39 As System.Windows.Forms.Label + Friend WithEvents tmrcodepointcooldown As System.Windows.Forms.Timer + Friend WithEvents tmrshowearnedcodepoints As System.Windows.Forms.Timer + Friend WithEvents pnlpalletsize As System.Windows.Forms.Panel + Friend WithEvents btnchangesizecancel As System.Windows.Forms.Button + Friend WithEvents btnsetsize As System.Windows.Forms.Button + Friend WithEvents txtcolorpalletheight As System.Windows.Forms.TextBox + Friend WithEvents Label42 As System.Windows.Forms.Label + Friend WithEvents txtcolorpalletwidth As System.Windows.Forms.TextBox + Friend WithEvents Label43 As System.Windows.Forms.Label + Friend WithEvents pnlinitialcanvassettings As System.Windows.Forms.Panel + Friend WithEvents btncancel As System.Windows.Forms.Button + Friend WithEvents btncreate As System.Windows.Forms.Button + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents lbltotalpixels As System.Windows.Forms.Label + Friend WithEvents txtnewcanvasheight As System.Windows.Forms.TextBox + Friend WithEvents Label10 As System.Windows.Forms.Label + Friend WithEvents txtnewcanvaswidth As System.Windows.Forms.TextBox + Friend WithEvents Label9 As System.Windows.Forms.Label + Friend WithEvents colourpallet33 As System.Windows.Forms.Panel + Friend WithEvents colourpallet34 As System.Windows.Forms.Panel + Friend WithEvents colourpallet35 As System.Windows.Forms.Panel + Friend WithEvents colourpallet36 As System.Windows.Forms.Panel + Friend WithEvents colourpallet37 As System.Windows.Forms.Panel + Friend WithEvents colourpallet38 As System.Windows.Forms.Panel + Friend WithEvents colourpallet39 As System.Windows.Forms.Panel + Friend WithEvents colourpallet40 As System.Windows.Forms.Panel + Friend WithEvents colourpallet41 As System.Windows.Forms.Panel + Friend WithEvents colourpallet42 As System.Windows.Forms.Panel + Friend WithEvents colourpallet43 As System.Windows.Forms.Panel + Friend WithEvents colourpallet44 As System.Windows.Forms.Panel + Friend WithEvents colourpallet45 As System.Windows.Forms.Panel + Friend WithEvents colourpallet46 As System.Windows.Forms.Panel + Friend WithEvents colourpallet47 As System.Windows.Forms.Panel + Friend WithEvents colourpallet48 As System.Windows.Forms.Panel + Friend WithEvents colourpallet49 As System.Windows.Forms.Panel + Friend WithEvents colourpallet50 As System.Windows.Forms.Panel + Friend WithEvents colourpallet51 As System.Windows.Forms.Panel + Friend WithEvents colourpallet52 As System.Windows.Forms.Panel + Friend WithEvents colourpallet53 As System.Windows.Forms.Panel + Friend WithEvents colourpallet54 As System.Windows.Forms.Panel + Friend WithEvents colourpallet55 As System.Windows.Forms.Panel + Friend WithEvents colourpallet56 As System.Windows.Forms.Panel + Friend WithEvents colourpallet57 As System.Windows.Forms.Panel + Friend WithEvents colourpallet58 As System.Windows.Forms.Panel + Friend WithEvents colourpallet59 As System.Windows.Forms.Panel + Friend WithEvents colourpallet60 As System.Windows.Forms.Panel + Friend WithEvents colourpallet61 As System.Windows.Forms.Panel + Friend WithEvents colourpallet62 As System.Windows.Forms.Panel + Friend WithEvents colourpallet63 As System.Windows.Forms.Panel + Friend WithEvents colourpallet64 As System.Windows.Forms.Panel + Friend WithEvents colourpallet65 As System.Windows.Forms.Panel + Friend WithEvents colourpallet66 As System.Windows.Forms.Panel + Friend WithEvents colourpallet67 As System.Windows.Forms.Panel + Friend WithEvents colourpallet68 As System.Windows.Forms.Panel + Friend WithEvents colourpallet69 As System.Windows.Forms.Panel + Friend WithEvents colourpallet70 As System.Windows.Forms.Panel + Friend WithEvents colourpallet71 As System.Windows.Forms.Panel + Friend WithEvents colourpallet72 As System.Windows.Forms.Panel + Friend WithEvents colourpallet73 As System.Windows.Forms.Panel + Friend WithEvents colourpallet74 As System.Windows.Forms.Panel + Friend WithEvents colourpallet75 As System.Windows.Forms.Panel + Friend WithEvents colourpallet76 As System.Windows.Forms.Panel + Friend WithEvents colourpallet77 As System.Windows.Forms.Panel + Friend WithEvents colourpallet78 As System.Windows.Forms.Panel + Friend WithEvents colourpallet79 As System.Windows.Forms.Panel + Friend WithEvents colourpallet80 As System.Windows.Forms.Panel + Friend WithEvents colourpallet81 As System.Windows.Forms.Panel + Friend WithEvents colourpallet82 As System.Windows.Forms.Panel + Friend WithEvents colourpallet83 As System.Windows.Forms.Panel + Friend WithEvents colourpallet84 As System.Windows.Forms.Panel + Friend WithEvents colourpallet85 As System.Windows.Forms.Panel + Friend WithEvents colourpallet86 As System.Windows.Forms.Panel + Friend WithEvents colourpallet87 As System.Windows.Forms.Panel + Friend WithEvents colourpallet88 As System.Windows.Forms.Panel + Friend WithEvents colourpallet89 As System.Windows.Forms.Panel + Friend WithEvents colourpallet90 As System.Windows.Forms.Panel + Friend WithEvents colourpallet91 As System.Windows.Forms.Panel + Friend WithEvents colourpallet92 As System.Windows.Forms.Panel + Friend WithEvents colourpallet93 As System.Windows.Forms.Panel + Friend WithEvents colourpallet94 As System.Windows.Forms.Panel + Friend WithEvents colourpallet95 As System.Windows.Forms.Panel + Friend WithEvents colourpallet96 As System.Windows.Forms.Panel + Friend WithEvents colourpallet97 As System.Windows.Forms.Panel + Friend WithEvents colourpallet98 As System.Windows.Forms.Panel + Friend WithEvents colourpallet99 As System.Windows.Forms.Panel + Friend WithEvents colourpallet100 As System.Windows.Forms.Panel + Friend WithEvents colourpallet101 As System.Windows.Forms.Panel + Friend WithEvents colourpallet102 As System.Windows.Forms.Panel + Friend WithEvents colourpallet103 As System.Windows.Forms.Panel + Friend WithEvents colourpallet104 As System.Windows.Forms.Panel + Friend WithEvents colourpallet105 As System.Windows.Forms.Panel + Friend WithEvents colourpallet106 As System.Windows.Forms.Panel + Friend WithEvents colourpallet107 As System.Windows.Forms.Panel + Friend WithEvents colourpallet108 As System.Windows.Forms.Panel + Friend WithEvents colourpallet109 As System.Windows.Forms.Panel + Friend WithEvents colourpallet110 As System.Windows.Forms.Panel + Friend WithEvents colourpallet111 As System.Windows.Forms.Panel + Friend WithEvents colourpallet112 As System.Windows.Forms.Panel + Friend WithEvents colourpallet113 As System.Windows.Forms.Panel + Friend WithEvents colourpallet114 As System.Windows.Forms.Panel + Friend WithEvents colourpallet115 As System.Windows.Forms.Panel + Friend WithEvents colourpallet116 As System.Windows.Forms.Panel + Friend WithEvents colourpallet117 As System.Windows.Forms.Panel + Friend WithEvents colourpallet118 As System.Windows.Forms.Panel + Friend WithEvents colourpallet119 As System.Windows.Forms.Panel + Friend WithEvents colourpallet120 As System.Windows.Forms.Panel + Friend WithEvents colourpallet121 As System.Windows.Forms.Panel + Friend WithEvents colourpallet122 As System.Windows.Forms.Panel + Friend WithEvents colourpallet123 As System.Windows.Forms.Panel + Friend WithEvents colourpallet124 As System.Windows.Forms.Panel + Friend WithEvents colourpallet125 As System.Windows.Forms.Panel + Friend WithEvents colourpallet126 As System.Windows.Forms.Panel + Friend WithEvents colourpallet127 As System.Windows.Forms.Panel + Friend WithEvents colourpallet128 As System.Windows.Forms.Panel + Friend WithEvents txttopspace As System.Windows.Forms.TextBox + Friend WithEvents Label40 As System.Windows.Forms.Label + Friend WithEvents txtsidespace As System.Windows.Forms.TextBox + Friend WithEvents Label41 As System.Windows.Forms.Label + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/ArtPad.resx b/ShiftOS/ArtPad.resx new file mode 100644 index 0000000..2b92c10 --- /dev/null +++ b/ShiftOS/ArtPad.resx @@ -0,0 +1,142 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + This tool does not contain any alterable settings. Simply click any pixel on the image above to have it and all the pixels around it that are the same colour instantly converted to the colour you have selected. + + + Please select a tool from the tool panel at the left side of the canvas. +Be sure to use the magnification tool to zoom in if your canvas is small otherwise you may experience difficulty drawing accuratly on the canvas. + + + 21, 15 + + + 201, 15 + + + 765, 18 + + + 849, 18 + + + 962, 18 + + \ No newline at end of file diff --git a/ShiftOS/ArtPad.vb b/ShiftOS/ArtPad.vb new file mode 100644 index 0000000..b249c2f --- /dev/null +++ b/ShiftOS/ArtPad.vb @@ -0,0 +1,2353 @@ +Public Class ArtPad + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 502 + Public minimumsizeheight As Integer = 398 + + Public codepointsearned As Integer + Public codepointscooldown As Boolean = False + Public needtosave As Boolean = False + + Dim canvaswidth As Integer = 150 + Dim canvasheight As Integer = 100 + Public canvasbitmap As New Drawing.Bitmap(canvaswidth, canvasheight) + Dim canvascolor As Color = Color.White + + Dim previewcanvasbitmap As New Drawing.Bitmap(canvaswidth, canvasheight) + + Dim magnificationlevel As Integer = 1 + Dim magnifyRect As New Rectangle(0, 0, canvaswidth, canvasheight) + Dim graphicsbitmap As Graphics = Graphics.FromImage(canvasbitmap) + Public drawingcolour As Color = Color.Black + Dim selectedtool As String = "Pixel Setter" + Dim pixalplacermovable As Boolean = False + Public savelocation As String + Dim mousePath As New System.Drawing.Drawing2D.GraphicsPath() + Dim pencilwidth As Integer = 1 + Dim undo As New undo + Dim backmap As New Drawing.Bitmap(canvaswidth, canvasheight) + Dim thisPoint As Point + + Dim eracerwidth As Integer = 15 + Dim eracertype As String = "square" + + Dim paintbrushwidth As Integer = 15 + Dim paintbrushtype As String = "circle" + + Dim rectanglestartpointx As Single + Dim rectanglestartpointy As Single + Dim currentlydrawingsquare As Boolean + Dim squarewidth As Integer = 1 + Dim squarefillon As Boolean = False + Dim fillsquarecolor As Color = Color.Black + + Dim ovalstartpointx As Single + Dim ovalstartpointy As Single + Dim currentlydrawingoval As Boolean + Dim ovalwidth As Integer = 2 + Dim ovalfillon As Boolean = False + Dim fillovalcolor As Color = Color.Black + + Dim linestartpointx As Single + Dim linestartpointy As Single + Dim currentlydrawingline As Boolean + Dim linewidth As Integer = 2 + + Dim currentlydrawingtext As Boolean + Dim drawtextfont As New System.Drawing.Font("Microsoft Sans Serif", 16) + Dim drawtextsize As Integer + Dim drawtextfontname As String + Dim drawtextfontstyle As FontStyle + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + setuppreview() + settoolcolours() + loadcolors() + AddFonts() + setuptoolbox() + determinevisiblepallets() + setuppallets() + + If ShiftOSDesktop.ArtpadCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + ShiftOSDesktop.pnlpanelbuttonartpad.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonartpad, ShiftOSDesktop.tbartpadicon, ShiftOSDesktop.tbartpadtext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + 'Fix growing window bug + 'If justopened = False Then + ' Me.Size = New Size(Me.Size.Width, Me.Size.Height - Skins.titlebarheight) + 'End If + + If justopened = True Then + Me.Size = New Size(800, 600) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + Me.Hide() + Me.Size = New Size(Me.Width, Me.Height - oldtitlebarheight + 30) + Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.artpadname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + If ShiftOSDesktop.boughtartpadicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.artpadicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Public Sub setupcanvas() + canvasbitmap = New Drawing.Bitmap(canvaswidth, canvasheight) + previewcanvasbitmap = New Drawing.Bitmap(canvaswidth, canvasheight) + picdrawingdisplay.Size = New Size(canvaswidth, canvasheight) + picdrawingdisplay.Location = New Point((pnldrawingbackground.Width - canvaswidth) / 2, (pnldrawingbackground.Height - canvasheight) / 2) + graphicsbitmap = Graphics.FromImage(canvasbitmap) + Dim canvasbrush As New SolidBrush(canvascolor) + graphicsbitmap.FillRectangle(canvasbrush, 0, 0, canvaswidth, canvasheight) + magnificationlevel = 1 + lblzoomlevel.Text = magnificationlevel & "X" + setuppreview() + needtosave = False + End Sub + + Public Sub setuptoolbox() + btnpixelplacer.Hide() + btnpencil.Hide() + btnfloodfill.Hide() + btnoval.Hide() + btnsquare.Hide() + btnlinetool.Hide() + btnpaintbrush.Hide() + btntexttool.Hide() + btneracer.Hide() + btnnew.Hide() + btnopen.Hide() + btnsave.Hide() + btnundo.Hide() + btnredo.Hide() + btnpixelplacermovementmode.Hide() + + If ShiftOSDesktop.boughtartpadpixelplacer = True Then btnpixelplacer.Show() + If ShiftOSDesktop.boughtartpadpencil = True Then btnpencil.Show() + If ShiftOSDesktop.boughtartpadfilltool = True Then btnfloodfill.Show() + If ShiftOSDesktop.boughtartpadovaltool = True Then btnoval.Show() + If ShiftOSDesktop.boughtartpadrectangletool = True Then btnsquare.Show() + If ShiftOSDesktop.boughtartpadlinetool = True Then btnlinetool.Show() + If ShiftOSDesktop.boughtartpadpaintbrush = True Then btnpaintbrush.Show() + If ShiftOSDesktop.boughtartpadtexttool = True Then btntexttool.Show() + If ShiftOSDesktop.boughtartpaderaser = True Then btneracer.Show() + If ShiftOSDesktop.boughtartpadnew = True Then btnnew.Show() + If ShiftOSDesktop.boughtartpadload = True Then btnopen.Show() + If ShiftOSDesktop.boughtartpadsave = True Then btnsave.Show() + If ShiftOSDesktop.boughtartpadundo = True Then btnundo.Show() + If ShiftOSDesktop.boughtartpadredo = True Then btnredo.Show() + If ShiftOSDesktop.boughtartpadpixelplacermovementmode = True Then btnpixelplacermovementmode.Show() + + End Sub + + Private Sub AddFonts() + ' Get the installed fonts collection. + Dim allFonts As New Drawing.Text.InstalledFontCollection + + ' Get an array of the system's font familiies. + Dim fontFamilies() As FontFamily = allFonts.Families() + + ' Display the font families. + For Each myFont As FontFamily In fontFamilies + combodrawtextfont.Items.Add(myFont.Name) + Next 'font_family + + combodrawtextfont.SelectedItem = combodrawtextfont.Items(1) + combofontstyle.Text = "Regular" + txtdrawtextsize.Text = 16 + End Sub + + Private Sub btnpixelsetter_Click(sender As Object, e As EventArgs) Handles btnpixelsetter.Click + selectedtool = "Pixel Setter" + gettoolsettings(pnlpixelsettersettings) + End Sub + + Private Sub gettoolsettings(ByVal toolpanel As Panel) + 'hide all properties panels + pnlpixelsettersettings.Hide() + pnlmagnifiersettings.Hide() + + 'show chosen panel + toolpanel.Dock = DockStyle.Fill + toolpanel.BringToFront() + toolpanel.Show() + + setuppreview() + End Sub + + Private Sub btnpixelsettersetpixel_Click(sender As Object, e As EventArgs) Handles btnpixelsettersetpixel.Click + Try + undo.undoStack.Push(canvasbitmap.Clone) + undo.redoStack.Clear() + canvasbitmap.SetPixel(txtpixelsetterxcoordinate.Text, txtpixelsetterycoordinate.Text, drawingcolour) + picdrawingdisplay.Invalidate() + Catch ex As Exception + infobox.title = "ArtPad - Placement Error!" + infobox.textinfo = "You have specified invalid coordinates for the pixel setter." & Environment.NewLine & Environment.NewLine & "Remember that the top left pixel has the coordinates 0, 0" + infobox.Show() + End Try + End Sub + + Private Sub btnmagnify_Click(sender As Object, e As EventArgs) Handles btnmagnify.Click + selectedtool = "Magnifier" + gettoolsettings(pnlmagnifiersettings) + End Sub + + Private Sub picdrawingdisplay_Paint(sender As Object, e As System.Windows.Forms.PaintEventArgs) Handles picdrawingdisplay.Paint + e.Graphics.FillRectangle(Brushes.White, 0, 0, canvaswidth * magnificationlevel, canvasheight * magnificationlevel) + e.Graphics.InterpolationMode = Drawing2D.InterpolationMode.NearestNeighbor + e.Graphics.PixelOffsetMode = System.Drawing.Drawing2D.PixelOffsetMode.Half + e.Graphics.ScaleTransform(magnificationlevel, magnificationlevel) + + If currentlydrawingsquare = True Then + GC.Collect() + Dim g As Graphics = Graphics.FromImage(previewcanvasbitmap) + previewcanvasbitmap = New Bitmap(canvasbitmap.Width, canvasbitmap.Height) + g = Graphics.FromImage(previewcanvasbitmap) + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), squarewidth) + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, fillsquarecolor)) + Dim rectdraw As New RectangleF(rectanglestartpointx, rectanglestartpointy, thisPoint.X - rectanglestartpointx, thisPoint.Y - rectanglestartpointy) + Dim heightamount, widthamount As Integer + If rectdraw.Height < 0 Then heightamount = Math.Abs(rectdraw.Height) Else heightamount = 0 + If rectdraw.Width < 0 Then widthamount = Math.Abs(rectdraw.Width) Else widthamount = 0 + If squarewidth > 0 Then + g.DrawRectangle(CurrentPen, rectdraw.X - widthamount, rectdraw.Y - heightamount, Math.Abs(rectdraw.Width), Math.Abs(rectdraw.Height)) + End If + If squarefillon = True Then + Dim correctionamount As Single = squarewidth / 2 + Dim addfillamount As Integer + If squarewidth > 0 Then addfillamount = squarewidth Else addfillamount = -1 + g.FillRectangle(CurrentBrush, (rectdraw.X - widthamount) + correctionamount, (rectdraw.Y - heightamount) + correctionamount, Math.Abs(rectdraw.Width) - addfillamount, Math.Abs(rectdraw.Height) - addfillamount) + End If + End If + + If currentlydrawingoval = True Then + GC.Collect() + Dim g As Graphics = Graphics.FromImage(previewcanvasbitmap) + previewcanvasbitmap = New Bitmap(canvasbitmap.Width, canvasbitmap.Height) + g = Graphics.FromImage(previewcanvasbitmap) + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), ovalwidth) + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, fillovalcolor)) + Dim ovaldraw As New RectangleF(ovalstartpointx, ovalstartpointy, thisPoint.X - ovalstartpointx, thisPoint.Y - ovalstartpointy) + Dim heightamount, widthamount As Integer + If ovaldraw.Height < 0 Then heightamount = Math.Abs(ovaldraw.Height) Else heightamount = 0 + If ovaldraw.Width < 0 Then widthamount = Math.Abs(ovaldraw.Width) Else widthamount = 0 + If ovalwidth > 0 Then + g.DrawEllipse(CurrentPen, ovaldraw.X - widthamount, ovaldraw.Y - heightamount, Math.Abs(ovaldraw.Width), Math.Abs(ovaldraw.Height)) + End If + If ovalfillon = True Then + g.FillEllipse(CurrentBrush, (ovaldraw.X - widthamount), (ovaldraw.Y - heightamount), Math.Abs(ovaldraw.Width), Math.Abs(ovaldraw.Height)) + End If + End If + + If currentlydrawingline = True Then + GC.Collect() + Dim g As Graphics = Graphics.FromImage(previewcanvasbitmap) + previewcanvasbitmap = New Bitmap(canvasbitmap.Width, canvasbitmap.Height) + g = Graphics.FromImage(previewcanvasbitmap) + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), linewidth) + g.DrawLine(CurrentPen, linestartpointx, linestartpointy, thisPoint.X, thisPoint.Y) + End If + + If currentlydrawingtext = True Then + GC.Collect() + Dim g As Graphics = Graphics.FromImage(previewcanvasbitmap) + previewcanvasbitmap = New Bitmap(canvasbitmap.Width, canvasbitmap.Height) + g = Graphics.FromImage(previewcanvasbitmap) + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, drawingcolour)) + g.TextRenderingHint = Drawing.Text.TextRenderingHint.SingleBitPerPixelGridFit + drawtextfont = New System.Drawing.Font(drawtextfontname, drawtextsize, drawtextfontstyle) + g.DrawString(txtdrawstringtext.Text, drawtextfont, CurrentBrush, thisPoint.X, thisPoint.Y) + End If + Try + e.Graphics.DrawImage(canvasbitmap, 0, 0) + e.Graphics.DrawImage(previewcanvasbitmap, 0, 0) + Catch ex As System.OutOfMemoryException + OutOfMemory() + End Try + End Sub + + + Private Sub picdrawingdisplay_MouseDown(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles picdrawingdisplay.MouseDown + + undo.undoStack.Push(canvasbitmap.Clone) + undo.redoStack.Clear() + + + thisPoint.X = CInt((e.Location.X - (magnificationlevel / 2)) / magnificationlevel) + thisPoint.Y = CInt((e.Location.Y - (magnificationlevel / 2)) / magnificationlevel) + + If selectedtool = "Pixel Placer" Then + If e.Button = Windows.Forms.MouseButtons.Left Then + If thisPoint.X < canvasbitmap.Width AndAlso thisPoint.X > -1 Then + If thisPoint.Y < canvasbitmap.Height AndAlso thisPoint.Y > -1 Then + canvasbitmap.SetPixel(thisPoint.X, thisPoint.Y, drawingcolour) 'set the pixel on the canvas + picdrawingdisplay.Invalidate() 'refresh the picture from the canvas + End If + End If + End If + End If + + If selectedtool = "Pencil" Then + If e.Button = MouseButtons.Left Then + mousePath.StartFigure() + picdrawingdisplay.Invalidate() + End If + End If + + If selectedtool = "Flood Fill" Then + If e.Button = Windows.Forms.MouseButtons.Left Then + If thisPoint.X < canvasbitmap.Width AndAlso thisPoint.X > -1 Then + If thisPoint.Y < canvasbitmap.Height AndAlso thisPoint.Y > -1 Then + SafeFloodFill(canvasbitmap, thisPoint.X, thisPoint.Y, drawingcolour) + graphicsbitmap = Graphics.FromImage(canvasbitmap) + picdrawingdisplay.Invalidate() + End If + End If + End If + End If + + If selectedtool = "Square Tool" Then + If e.Button = Windows.Forms.MouseButtons.Left Then + rectanglestartpointx = thisPoint.X + rectanglestartpointy = thisPoint.Y + currentlydrawingsquare = True + picdrawingdisplay.Invalidate() + End If + End If + + If selectedtool = "Oval Tool" Then + If e.Button = Windows.Forms.MouseButtons.Left Then + ovalstartpointx = thisPoint.X + ovalstartpointy = thisPoint.Y + currentlydrawingoval = True + picdrawingdisplay.Invalidate() + End If + End If + + If selectedtool = "Line Tool" Then + If e.Button = Windows.Forms.MouseButtons.Left Then + linestartpointx = thisPoint.X + linestartpointy = thisPoint.Y + currentlydrawingline = True + picdrawingdisplay.Invalidate() + End If + End If + + If selectedtool = "Text Tool" Then + If e.Button = Windows.Forms.MouseButtons.Left Then + currentlydrawingtext = True + picdrawingdisplay.Invalidate() + End If + End If + + If selectedtool = "Eracer" Then + Dim CurrentPen = New Pen(Color.FromArgb(255, canvascolor), eracerwidth) + Dim halfsize As Single = eracerwidth / 2 + If eracertype = "circle" Then + graphicsbitmap.DrawEllipse(CurrentPen, thisPoint.X - halfsize, thisPoint.Y - halfsize, eracerwidth, eracerwidth) + Else + graphicsbitmap.DrawRectangle(CurrentPen, thisPoint.X - halfsize, thisPoint.Y - halfsize, eracerwidth, eracerwidth) + End If + picdrawingdisplay.Invalidate() + End If + + If selectedtool = "Paint Brush" Then + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, drawingcolour)) + Dim halfsize As Single = paintbrushwidth / 2 + If paintbrushtype = "circle" Then + graphicsbitmap.FillEllipse(CurrentBrush, thisPoint.X - halfsize, thisPoint.Y - halfsize, paintbrushwidth, paintbrushwidth) + Else + graphicsbitmap.FillRectangle(CurrentBrush, thisPoint.X - halfsize, thisPoint.Y - halfsize, paintbrushwidth, paintbrushwidth) + End If + picdrawingdisplay.Invalidate() + CurrentBrush.Dispose() + End If + preparecooldown() + End Sub + + Private Sub picdrawingdisplay_MouseMove(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles picdrawingdisplay.MouseMove + Static lastpoint As Point + + thisPoint.X = CInt((e.Location.X - (magnificationlevel / 2)) / magnificationlevel) + thisPoint.Y = CInt((e.Location.Y - (magnificationlevel / 2)) / magnificationlevel) + + + If e.Button = Windows.Forms.MouseButtons.Left Then + undo.redoStack.Clear() + lastpoint = thisPoint + preparecooldown() + + If selectedtool = "Pixel Placer" AndAlso pixalplacermovable = True Then + If thisPoint.X < canvasbitmap.Width AndAlso thisPoint.X > -1 Then + If thisPoint.Y < canvasbitmap.Height AndAlso thisPoint.Y > -1 Then + canvasbitmap.SetPixel(thisPoint.X, thisPoint.Y, drawingcolour) 'set the pixel on the canvas + picdrawingdisplay.Invalidate() 'refresh the picture from the canvas + End If + End If + End If + + If selectedtool = "Pencil" Then + mousePath.AddLine(thisPoint.X, thisPoint.Y, thisPoint.X, thisPoint.Y) + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), pencilwidth) + graphicsbitmap.DrawPath(CurrentPen, mousePath) + picdrawingdisplay.Invalidate() + End If + + If selectedtool = "Square Tool" Then + picdrawingdisplay.Invalidate() + End If + + If selectedtool = "Oval Tool" Then + picdrawingdisplay.Invalidate() + End If + + If selectedtool = "Line Tool" Then + picdrawingdisplay.Invalidate() + End If + + If selectedtool = "Text Tool" Then + picdrawingdisplay.Invalidate() + End If + + If selectedtool = "Eracer" Then + Dim CurrentPen = New Pen(Color.FromArgb(255, canvascolor), eracerwidth) + Dim halfsize As Single = eracerwidth / 2 + If eracertype = "circle" Then + graphicsbitmap.DrawEllipse(CurrentPen, thisPoint.X - halfsize, thisPoint.Y - halfsize, eracerwidth, eracerwidth) + Else + graphicsbitmap.DrawRectangle(CurrentPen, thisPoint.X - halfsize, thisPoint.Y - halfsize, eracerwidth, eracerwidth) + End If + picdrawingdisplay.Invalidate() + End If + + If selectedtool = "Paint Brush" Then + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, drawingcolour)) + Dim halfsize As Single = paintbrushwidth / 2 + If paintbrushtype = "circle" Then + graphicsbitmap.FillEllipse(CurrentBrush, thisPoint.X - halfsize, thisPoint.Y - halfsize, paintbrushwidth, paintbrushwidth) + Else + graphicsbitmap.FillRectangle(CurrentBrush, thisPoint.X - halfsize, thisPoint.Y - halfsize, paintbrushwidth, paintbrushwidth) + End If + picdrawingdisplay.Invalidate() + End If + End If + + End Sub + + Private Sub picdrawingdisplay_MouseUp(sender As Object, e As MouseEventArgs) Handles picdrawingdisplay.MouseUp + + thisPoint.X = CInt((e.Location.X - (magnificationlevel / 2)) / magnificationlevel) + thisPoint.Y = CInt((e.Location.Y - (magnificationlevel / 2)) / magnificationlevel) + + If selectedtool = "Pencil" Then + If e.Button = Windows.Forms.MouseButtons.Left Then + mousePath.Reset() + End If + End If + + If selectedtool = "Square Tool" Then + picdrawingdisplay.Invalidate() + currentlydrawingsquare = False + End If + + If selectedtool = "Oval Tool" Then + picdrawingdisplay.Invalidate() + currentlydrawingoval = False + End If + + + If selectedtool = "Line Tool" Then + picdrawingdisplay.Invalidate() + currentlydrawingline = False + End If + + If selectedtool = "Text Tool" Then + picdrawingdisplay.Invalidate() + currentlydrawingtext = False + End If + + Using g As Graphics = Graphics.FromImage(canvasbitmap) + g.DrawImage(previewcanvasbitmap, 0, 0) + End Using + previewcanvasbitmap = New Bitmap(canvasbitmap.Width, canvasbitmap.Height) + picdrawingdisplay.Invalidate() + preparecooldown() + + End Sub + + Private Sub colourpallet1_Paint(sender As Object, e As MouseEventArgs) Handles colourpallet1.Click, colourpallet2.Click, colourpallet3.Click, colourpallet4.Click, colourpallet5.Click, colourpallet6.Click, colourpallet7.Click, colourpallet8.Click, colourpallet9.Click, colourpallet10.Click, colourpallet11.Click, colourpallet12.Click, colourpallet13.Click, colourpallet14.Click, colourpallet15.Click, colourpallet16.Click, colourpallet17.Click, colourpallet18.Click, colourpallet19.Click, colourpallet20.Click, colourpallet21.Click, colourpallet22.Click, colourpallet23.Click, colourpallet24.Click, colourpallet25.Click, colourpallet26.Click, colourpallet27.Click, colourpallet28.Click, colourpallet29.Click, colourpallet30.Click, colourpallet31.Click, colourpallet32.Click, colourpallet33.Click, colourpallet34.Click, colourpallet35.Click, colourpallet36.Click, colourpallet37.Click, colourpallet38.Click, colourpallet39.Click, colourpallet40.Click, colourpallet41.Click, colourpallet42.Click, colourpallet43.Click, colourpallet44.Click, colourpallet45.Click, colourpallet46.Click, colourpallet47.Click, colourpallet48.Click, colourpallet49.Click, colourpallet50.Click, colourpallet51.Click, colourpallet52.Click, colourpallet53.Click, colourpallet54.Click, colourpallet55.Click, colourpallet56.Click, colourpallet57.Click, colourpallet58.Click, colourpallet59.Click, colourpallet60.Click, colourpallet61.Click, colourpallet62.Click, colourpallet63.Click, colourpallet64.Click, colourpallet65.Click, colourpallet66.Click, colourpallet67.Click, colourpallet68.Click, colourpallet69.Click, colourpallet70.Click, colourpallet71.Click, colourpallet72.Click, colourpallet73.Click, colourpallet74.Click, colourpallet75.Click, colourpallet76.Click, colourpallet77.Click, colourpallet78.Click, colourpallet79.Click, colourpallet80.Click, colourpallet81.Click, colourpallet82.Click, colourpallet83.Click, colourpallet84.Click, colourpallet85.Click, colourpallet86.Click, colourpallet87.Click, colourpallet88.Click, colourpallet89.Click, colourpallet90.Click, colourpallet91.Click, colourpallet92.Click, colourpallet93.Click, colourpallet94.Click, colourpallet95.Click, colourpallet96.Click, colourpallet97.Click, colourpallet98.Click, colourpallet99.Click, colourpallet100.Click, colourpallet101.Click, colourpallet102.Click, colourpallet103.Click, colourpallet104.Click, colourpallet105.Click, colourpallet106.Click, colourpallet107.Click, colourpallet108.Click, colourpallet109.Click, colourpallet110.Click, colourpallet111.Click, colourpallet112.Click, colourpallet113.Click, colourpallet114.Click, colourpallet115.Click, colourpallet116.Click, colourpallet117.Click, colourpallet118.Click, colourpallet119.Click, colourpallet120.Click, colourpallet121.Click, colourpallet122.Click, colourpallet123.Click, colourpallet124.Click, colourpallet125.Click, colourpallet126.Click, colourpallet127.Click, colourpallet128.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + drawingcolour = sender.backcolor + setuppreview() + settoolcolours() + ElseIf e.Button = Windows.Forms.MouseButtons.Middle Then + If ShiftOSDesktop.boughtartpadcustompallets = True Then + pnlpalletsize.Show() + txtcolorpalletheight.Text = colourpallet1.Height + txtcolorpalletwidth.Text = colourpallet1.Width + txtsidespace.Text = colourpallet1.Margin.Left + txttopspace.Text = colourpallet1.Margin.Bottom + End If + Else + Select Case sender.name.ToString + Case "colourpallet1" : Colour_Picker.colourtochange = "artpallet1" : Colour_Picker.oldcolour = colourpallet1.BackColor + Case "colourpallet2" : Colour_Picker.colourtochange = "artpallet2" : Colour_Picker.oldcolour = colourpallet2.BackColor + Case "colourpallet3" : Colour_Picker.colourtochange = "artpallet3" : Colour_Picker.oldcolour = colourpallet3.BackColor + Case "colourpallet4" : Colour_Picker.colourtochange = "artpallet4" : Colour_Picker.oldcolour = colourpallet4.BackColor + Case "colourpallet5" : Colour_Picker.colourtochange = "artpallet5" : Colour_Picker.oldcolour = colourpallet5.BackColor + Case "colourpallet6" : Colour_Picker.colourtochange = "artpallet6" : Colour_Picker.oldcolour = colourpallet6.BackColor + Case "colourpallet7" : Colour_Picker.colourtochange = "artpallet7" : Colour_Picker.oldcolour = colourpallet7.BackColor + Case "colourpallet8" : Colour_Picker.colourtochange = "artpallet8" : Colour_Picker.oldcolour = colourpallet8.BackColor + Case "colourpallet9" : Colour_Picker.colourtochange = "artpallet9" : Colour_Picker.oldcolour = colourpallet9.BackColor + Case "colourpallet10" : Colour_Picker.colourtochange = "artpallet10" : Colour_Picker.oldcolour = colourpallet10.BackColor + Case "colourpallet11" : Colour_Picker.colourtochange = "artpallet11" : Colour_Picker.oldcolour = colourpallet11.BackColor + Case "colourpallet12" : Colour_Picker.colourtochange = "artpallet12" : Colour_Picker.oldcolour = colourpallet12.BackColor + Case "colourpallet13" : Colour_Picker.colourtochange = "artpallet13" : Colour_Picker.oldcolour = colourpallet13.BackColor + Case "colourpallet14" : Colour_Picker.colourtochange = "artpallet14" : Colour_Picker.oldcolour = colourpallet14.BackColor + Case "colourpallet15" : Colour_Picker.colourtochange = "artpallet15" : Colour_Picker.oldcolour = colourpallet15.BackColor + Case "colourpallet16" : Colour_Picker.colourtochange = "artpallet16" : Colour_Picker.oldcolour = colourpallet16.BackColor + Case "colourpallet17" : Colour_Picker.colourtochange = "artpallet17" : Colour_Picker.oldcolour = colourpallet17.BackColor + Case "colourpallet18" : Colour_Picker.colourtochange = "artpallet18" : Colour_Picker.oldcolour = colourpallet18.BackColor + Case "colourpallet19" : Colour_Picker.colourtochange = "artpallet19" : Colour_Picker.oldcolour = colourpallet19.BackColor + Case "colourpallet20" : Colour_Picker.colourtochange = "artpallet20" : Colour_Picker.oldcolour = colourpallet20.BackColor + Case "colourpallet21" : Colour_Picker.colourtochange = "artpallet21" : Colour_Picker.oldcolour = colourpallet21.BackColor + Case "colourpallet22" : Colour_Picker.colourtochange = "artpallet22" : Colour_Picker.oldcolour = colourpallet22.BackColor + Case "colourpallet23" : Colour_Picker.colourtochange = "artpallet23" : Colour_Picker.oldcolour = colourpallet23.BackColor + Case "colourpallet24" : Colour_Picker.colourtochange = "artpallet24" : Colour_Picker.oldcolour = colourpallet24.BackColor + Case "colourpallet25" : Colour_Picker.colourtochange = "artpallet25" : Colour_Picker.oldcolour = colourpallet25.BackColor + Case "colourpallet26" : Colour_Picker.colourtochange = "artpallet26" : Colour_Picker.oldcolour = colourpallet26.BackColor + Case "colourpallet27" : Colour_Picker.colourtochange = "artpallet27" : Colour_Picker.oldcolour = colourpallet27.BackColor + Case "colourpallet28" : Colour_Picker.colourtochange = "artpallet28" : Colour_Picker.oldcolour = colourpallet28.BackColor + Case "colourpallet29" : Colour_Picker.colourtochange = "artpallet29" : Colour_Picker.oldcolour = colourpallet29.BackColor + Case "colourpallet30" : Colour_Picker.colourtochange = "artpallet30" : Colour_Picker.oldcolour = colourpallet30.BackColor + Case "colourpallet31" : Colour_Picker.colourtochange = "artpallet31" : Colour_Picker.oldcolour = colourpallet31.BackColor + Case "colourpallet32" : Colour_Picker.colourtochange = "artpallet32" : Colour_Picker.oldcolour = colourpallet32.BackColor + Case "colourpallet33" : Colour_Picker.colourtochange = "artpallet33" : Colour_Picker.oldcolour = colourpallet33.BackColor + Case "colourpallet34" : Colour_Picker.colourtochange = "artpallet34" : Colour_Picker.oldcolour = colourpallet34.BackColor + Case "colourpallet35" : Colour_Picker.colourtochange = "artpallet35" : Colour_Picker.oldcolour = colourpallet35.BackColor + Case "colourpallet36" : Colour_Picker.colourtochange = "artpallet36" : Colour_Picker.oldcolour = colourpallet36.BackColor + Case "colourpallet37" : Colour_Picker.colourtochange = "artpallet37" : Colour_Picker.oldcolour = colourpallet37.BackColor + Case "colourpallet38" : Colour_Picker.colourtochange = "artpallet38" : Colour_Picker.oldcolour = colourpallet38.BackColor + Case "colourpallet39" : Colour_Picker.colourtochange = "artpallet39" : Colour_Picker.oldcolour = colourpallet39.BackColor + Case "colourpallet40" : Colour_Picker.colourtochange = "artpallet40" : Colour_Picker.oldcolour = colourpallet40.BackColor + Case "colourpallet41" : Colour_Picker.colourtochange = "artpallet41" : Colour_Picker.oldcolour = colourpallet41.BackColor + Case "colourpallet42" : Colour_Picker.colourtochange = "artpallet42" : Colour_Picker.oldcolour = colourpallet42.BackColor + Case "colourpallet43" : Colour_Picker.colourtochange = "artpallet43" : Colour_Picker.oldcolour = colourpallet43.BackColor + Case "colourpallet44" : Colour_Picker.colourtochange = "artpallet44" : Colour_Picker.oldcolour = colourpallet44.BackColor + Case "colourpallet45" : Colour_Picker.colourtochange = "artpallet45" : Colour_Picker.oldcolour = colourpallet45.BackColor + Case "colourpallet46" : Colour_Picker.colourtochange = "artpallet46" : Colour_Picker.oldcolour = colourpallet46.BackColor + Case "colourpallet47" : Colour_Picker.colourtochange = "artpallet47" : Colour_Picker.oldcolour = colourpallet47.BackColor + Case "colourpallet48" : Colour_Picker.colourtochange = "artpallet48" : Colour_Picker.oldcolour = colourpallet48.BackColor + Case "colourpallet49" : Colour_Picker.colourtochange = "artpallet49" : Colour_Picker.oldcolour = colourpallet49.BackColor + Case "colourpallet50" : Colour_Picker.colourtochange = "artpallet50" : Colour_Picker.oldcolour = colourpallet50.BackColor + Case "colourpallet51" : Colour_Picker.colourtochange = "artpallet51" : Colour_Picker.oldcolour = colourpallet51.BackColor + Case "colourpallet52" : Colour_Picker.colourtochange = "artpallet52" : Colour_Picker.oldcolour = colourpallet52.BackColor + Case "colourpallet53" : Colour_Picker.colourtochange = "artpallet53" : Colour_Picker.oldcolour = colourpallet53.BackColor + Case "colourpallet54" : Colour_Picker.colourtochange = "artpallet54" : Colour_Picker.oldcolour = colourpallet54.BackColor + Case "colourpallet55" : Colour_Picker.colourtochange = "artpallet55" : Colour_Picker.oldcolour = colourpallet55.BackColor + Case "colourpallet56" : Colour_Picker.colourtochange = "artpallet56" : Colour_Picker.oldcolour = colourpallet56.BackColor + Case "colourpallet57" : Colour_Picker.colourtochange = "artpallet57" : Colour_Picker.oldcolour = colourpallet57.BackColor + Case "colourpallet58" : Colour_Picker.colourtochange = "artpallet58" : Colour_Picker.oldcolour = colourpallet58.BackColor + Case "colourpallet59" : Colour_Picker.colourtochange = "artpallet59" : Colour_Picker.oldcolour = colourpallet59.BackColor + Case "colourpallet60" : Colour_Picker.colourtochange = "artpallet60" : Colour_Picker.oldcolour = colourpallet60.BackColor + Case "colourpallet61" : Colour_Picker.colourtochange = "artpallet61" : Colour_Picker.oldcolour = colourpallet61.BackColor + Case "colourpallet62" : Colour_Picker.colourtochange = "artpallet62" : Colour_Picker.oldcolour = colourpallet62.BackColor + Case "colourpallet63" : Colour_Picker.colourtochange = "artpallet63" : Colour_Picker.oldcolour = colourpallet63.BackColor + Case "colourpallet64" : Colour_Picker.colourtochange = "artpallet64" : Colour_Picker.oldcolour = colourpallet64.BackColor + Case "colourpallet65" : Colour_Picker.colourtochange = "artpallet65" : Colour_Picker.oldcolour = colourpallet65.BackColor + Case "colourpallet66" : Colour_Picker.colourtochange = "artpallet66" : Colour_Picker.oldcolour = colourpallet66.BackColor + Case "colourpallet67" : Colour_Picker.colourtochange = "artpallet67" : Colour_Picker.oldcolour = colourpallet67.BackColor + Case "colourpallet68" : Colour_Picker.colourtochange = "artpallet68" : Colour_Picker.oldcolour = colourpallet68.BackColor + Case "colourpallet69" : Colour_Picker.colourtochange = "artpallet69" : Colour_Picker.oldcolour = colourpallet69.BackColor + Case "colourpallet70" : Colour_Picker.colourtochange = "artpallet70" : Colour_Picker.oldcolour = colourpallet70.BackColor + Case "colourpallet71" : Colour_Picker.colourtochange = "artpallet71" : Colour_Picker.oldcolour = colourpallet71.BackColor + Case "colourpallet72" : Colour_Picker.colourtochange = "artpallet72" : Colour_Picker.oldcolour = colourpallet72.BackColor + Case "colourpallet73" : Colour_Picker.colourtochange = "artpallet73" : Colour_Picker.oldcolour = colourpallet73.BackColor + Case "colourpallet74" : Colour_Picker.colourtochange = "artpallet74" : Colour_Picker.oldcolour = colourpallet74.BackColor + Case "colourpallet75" : Colour_Picker.colourtochange = "artpallet75" : Colour_Picker.oldcolour = colourpallet75.BackColor + Case "colourpallet76" : Colour_Picker.colourtochange = "artpallet76" : Colour_Picker.oldcolour = colourpallet76.BackColor + Case "colourpallet77" : Colour_Picker.colourtochange = "artpallet77" : Colour_Picker.oldcolour = colourpallet77.BackColor + Case "colourpallet78" : Colour_Picker.colourtochange = "artpallet78" : Colour_Picker.oldcolour = colourpallet78.BackColor + Case "colourpallet79" : Colour_Picker.colourtochange = "artpallet79" : Colour_Picker.oldcolour = colourpallet79.BackColor + Case "colourpallet80" : Colour_Picker.colourtochange = "artpallet80" : Colour_Picker.oldcolour = colourpallet80.BackColor + Case "colourpallet81" : Colour_Picker.colourtochange = "artpallet81" : Colour_Picker.oldcolour = colourpallet81.BackColor + Case "colourpallet82" : Colour_Picker.colourtochange = "artpallet82" : Colour_Picker.oldcolour = colourpallet82.BackColor + Case "colourpallet83" : Colour_Picker.colourtochange = "artpallet83" : Colour_Picker.oldcolour = colourpallet83.BackColor + Case "colourpallet84" : Colour_Picker.colourtochange = "artpallet84" : Colour_Picker.oldcolour = colourpallet84.BackColor + Case "colourpallet85" : Colour_Picker.colourtochange = "artpallet85" : Colour_Picker.oldcolour = colourpallet85.BackColor + Case "colourpallet86" : Colour_Picker.colourtochange = "artpallet86" : Colour_Picker.oldcolour = colourpallet86.BackColor + Case "colourpallet87" : Colour_Picker.colourtochange = "artpallet87" : Colour_Picker.oldcolour = colourpallet87.BackColor + Case "colourpallet88" : Colour_Picker.colourtochange = "artpallet88" : Colour_Picker.oldcolour = colourpallet88.BackColor + Case "colourpallet89" : Colour_Picker.colourtochange = "artpallet89" : Colour_Picker.oldcolour = colourpallet89.BackColor + Case "colourpallet90" : Colour_Picker.colourtochange = "artpallet90" : Colour_Picker.oldcolour = colourpallet90.BackColor + Case "colourpallet91" : Colour_Picker.colourtochange = "artpallet91" : Colour_Picker.oldcolour = colourpallet91.BackColor + Case "colourpallet92" : Colour_Picker.colourtochange = "artpallet92" : Colour_Picker.oldcolour = colourpallet92.BackColor + Case "colourpallet93" : Colour_Picker.colourtochange = "artpallet93" : Colour_Picker.oldcolour = colourpallet93.BackColor + Case "colourpallet94" : Colour_Picker.colourtochange = "artpallet94" : Colour_Picker.oldcolour = colourpallet94.BackColor + Case "colourpallet95" : Colour_Picker.colourtochange = "artpallet95" : Colour_Picker.oldcolour = colourpallet95.BackColor + Case "colourpallet96" : Colour_Picker.colourtochange = "artpallet96" : Colour_Picker.oldcolour = colourpallet96.BackColor + Case "colourpallet97" : Colour_Picker.colourtochange = "artpallet97" : Colour_Picker.oldcolour = colourpallet97.BackColor + Case "colourpallet98" : Colour_Picker.colourtochange = "artpallet98" : Colour_Picker.oldcolour = colourpallet98.BackColor + Case "colourpallet99" : Colour_Picker.colourtochange = "artpallet99" : Colour_Picker.oldcolour = colourpallet99.BackColor + Case "colourpallet100" : Colour_Picker.colourtochange = "artpallet100" : Colour_Picker.oldcolour = colourpallet100.BackColor + Case "colourpallet101" : Colour_Picker.colourtochange = "artpallet101" : Colour_Picker.oldcolour = colourpallet101.BackColor + Case "colourpallet102" : Colour_Picker.colourtochange = "artpallet102" : Colour_Picker.oldcolour = colourpallet102.BackColor + Case "colourpallet103" : Colour_Picker.colourtochange = "artpallet103" : Colour_Picker.oldcolour = colourpallet103.BackColor + Case "colourpallet104" : Colour_Picker.colourtochange = "artpallet104" : Colour_Picker.oldcolour = colourpallet104.BackColor + Case "colourpallet105" : Colour_Picker.colourtochange = "artpallet105" : Colour_Picker.oldcolour = colourpallet105.BackColor + Case "colourpallet106" : Colour_Picker.colourtochange = "artpallet106" : Colour_Picker.oldcolour = colourpallet106.BackColor + Case "colourpallet107" : Colour_Picker.colourtochange = "artpallet107" : Colour_Picker.oldcolour = colourpallet107.BackColor + Case "colourpallet108" : Colour_Picker.colourtochange = "artpallet108" : Colour_Picker.oldcolour = colourpallet108.BackColor + Case "colourpallet109" : Colour_Picker.colourtochange = "artpallet109" : Colour_Picker.oldcolour = colourpallet109.BackColor + Case "colourpallet110" : Colour_Picker.colourtochange = "artpallet110" : Colour_Picker.oldcolour = colourpallet110.BackColor + Case "colourpallet111" : Colour_Picker.colourtochange = "artpallet111" : Colour_Picker.oldcolour = colourpallet111.BackColor + Case "colourpallet112" : Colour_Picker.colourtochange = "artpallet112" : Colour_Picker.oldcolour = colourpallet112.BackColor + Case "colourpallet113" : Colour_Picker.colourtochange = "artpallet113" : Colour_Picker.oldcolour = colourpallet113.BackColor + Case "colourpallet114" : Colour_Picker.colourtochange = "artpallet114" : Colour_Picker.oldcolour = colourpallet114.BackColor + Case "colourpallet115" : Colour_Picker.colourtochange = "artpallet115" : Colour_Picker.oldcolour = colourpallet115.BackColor + Case "colourpallet116" : Colour_Picker.colourtochange = "artpallet116" : Colour_Picker.oldcolour = colourpallet116.BackColor + Case "colourpallet117" : Colour_Picker.colourtochange = "artpallet117" : Colour_Picker.oldcolour = colourpallet117.BackColor + Case "colourpallet118" : Colour_Picker.colourtochange = "artpallet118" : Colour_Picker.oldcolour = colourpallet118.BackColor + Case "colourpallet119" : Colour_Picker.colourtochange = "artpallet119" : Colour_Picker.oldcolour = colourpallet119.BackColor + Case "colourpallet120" : Colour_Picker.colourtochange = "artpallet120" : Colour_Picker.oldcolour = colourpallet120.BackColor + Case "colourpallet121" : Colour_Picker.colourtochange = "artpallet121" : Colour_Picker.oldcolour = colourpallet121.BackColor + Case "colourpallet122" : Colour_Picker.colourtochange = "artpallet122" : Colour_Picker.oldcolour = colourpallet122.BackColor + Case "colourpallet123" : Colour_Picker.colourtochange = "artpallet123" : Colour_Picker.oldcolour = colourpallet123.BackColor + Case "colourpallet124" : Colour_Picker.colourtochange = "artpallet124" : Colour_Picker.oldcolour = colourpallet124.BackColor + Case "colourpallet125" : Colour_Picker.colourtochange = "artpallet125" : Colour_Picker.oldcolour = colourpallet125.BackColor + Case "colourpallet126" : Colour_Picker.colourtochange = "artpallet126" : Colour_Picker.oldcolour = colourpallet126.BackColor + Case "colourpallet127" : Colour_Picker.colourtochange = "artpallet127" : Colour_Picker.oldcolour = colourpallet127.BackColor + Case "colourpallet128" : Colour_Picker.colourtochange = "artpallet128" : Colour_Picker.oldcolour = colourpallet128.BackColor + + End Select + Colour_Picker.Show() + End If + End Sub + + Public Sub loadcolors() + Dim allwhite As Boolean = True + For i = 0 To 127 + If ShiftOSDesktop.artpadcolourpallets(i) = Nothing Then + Else + allwhite = False + End If + Next + If allwhite = True Then + For i = 0 To 127 + ShiftOSDesktop.artpadcolourpallets(i) = Color.Black + Next + End If + colourpallet1.BackColor = ShiftOSDesktop.artpadcolourpallets(0) + colourpallet2.BackColor = ShiftOSDesktop.artpadcolourpallets(1) + colourpallet3.BackColor = ShiftOSDesktop.artpadcolourpallets(2) + colourpallet4.BackColor = ShiftOSDesktop.artpadcolourpallets(3) + colourpallet5.BackColor = ShiftOSDesktop.artpadcolourpallets(4) + colourpallet6.BackColor = ShiftOSDesktop.artpadcolourpallets(5) + colourpallet7.BackColor = ShiftOSDesktop.artpadcolourpallets(6) + colourpallet8.BackColor = ShiftOSDesktop.artpadcolourpallets(7) + colourpallet9.BackColor = ShiftOSDesktop.artpadcolourpallets(8) + colourpallet10.BackColor = ShiftOSDesktop.artpadcolourpallets(9) + colourpallet11.BackColor = ShiftOSDesktop.artpadcolourpallets(10) + colourpallet12.BackColor = ShiftOSDesktop.artpadcolourpallets(11) + colourpallet13.BackColor = ShiftOSDesktop.artpadcolourpallets(12) + colourpallet14.BackColor = ShiftOSDesktop.artpadcolourpallets(13) + colourpallet15.BackColor = ShiftOSDesktop.artpadcolourpallets(14) + colourpallet16.BackColor = ShiftOSDesktop.artpadcolourpallets(15) + colourpallet17.BackColor = ShiftOSDesktop.artpadcolourpallets(16) + colourpallet18.BackColor = ShiftOSDesktop.artpadcolourpallets(17) + colourpallet19.BackColor = ShiftOSDesktop.artpadcolourpallets(18) + colourpallet20.BackColor = ShiftOSDesktop.artpadcolourpallets(19) + colourpallet21.BackColor = ShiftOSDesktop.artpadcolourpallets(20) + colourpallet22.BackColor = ShiftOSDesktop.artpadcolourpallets(21) + colourpallet23.BackColor = ShiftOSDesktop.artpadcolourpallets(22) + colourpallet24.BackColor = ShiftOSDesktop.artpadcolourpallets(23) + colourpallet25.BackColor = ShiftOSDesktop.artpadcolourpallets(24) + colourpallet26.BackColor = ShiftOSDesktop.artpadcolourpallets(25) + colourpallet27.BackColor = ShiftOSDesktop.artpadcolourpallets(26) + colourpallet28.BackColor = ShiftOSDesktop.artpadcolourpallets(27) + colourpallet29.BackColor = ShiftOSDesktop.artpadcolourpallets(28) + colourpallet30.BackColor = ShiftOSDesktop.artpadcolourpallets(29) + colourpallet31.BackColor = ShiftOSDesktop.artpadcolourpallets(30) + colourpallet32.BackColor = ShiftOSDesktop.artpadcolourpallets(31) + colourpallet33.BackColor = ShiftOSDesktop.artpadcolourpallets(32) + colourpallet34.BackColor = ShiftOSDesktop.artpadcolourpallets(33) + colourpallet35.BackColor = ShiftOSDesktop.artpadcolourpallets(34) + colourpallet36.BackColor = ShiftOSDesktop.artpadcolourpallets(35) + colourpallet37.BackColor = ShiftOSDesktop.artpadcolourpallets(36) + colourpallet38.BackColor = ShiftOSDesktop.artpadcolourpallets(37) + colourpallet39.BackColor = ShiftOSDesktop.artpadcolourpallets(38) + colourpallet40.BackColor = ShiftOSDesktop.artpadcolourpallets(39) + colourpallet41.BackColor = ShiftOSDesktop.artpadcolourpallets(40) + colourpallet42.BackColor = ShiftOSDesktop.artpadcolourpallets(41) + colourpallet43.BackColor = ShiftOSDesktop.artpadcolourpallets(42) + colourpallet44.BackColor = ShiftOSDesktop.artpadcolourpallets(43) + colourpallet45.BackColor = ShiftOSDesktop.artpadcolourpallets(44) + colourpallet46.BackColor = ShiftOSDesktop.artpadcolourpallets(45) + colourpallet47.BackColor = ShiftOSDesktop.artpadcolourpallets(46) + colourpallet48.BackColor = ShiftOSDesktop.artpadcolourpallets(47) + colourpallet49.BackColor = ShiftOSDesktop.artpadcolourpallets(48) + colourpallet50.BackColor = ShiftOSDesktop.artpadcolourpallets(49) + colourpallet51.BackColor = ShiftOSDesktop.artpadcolourpallets(50) + colourpallet52.BackColor = ShiftOSDesktop.artpadcolourpallets(51) + colourpallet53.BackColor = ShiftOSDesktop.artpadcolourpallets(52) + colourpallet54.BackColor = ShiftOSDesktop.artpadcolourpallets(53) + colourpallet55.BackColor = ShiftOSDesktop.artpadcolourpallets(54) + colourpallet56.BackColor = ShiftOSDesktop.artpadcolourpallets(55) + colourpallet57.BackColor = ShiftOSDesktop.artpadcolourpallets(56) + colourpallet58.BackColor = ShiftOSDesktop.artpadcolourpallets(57) + colourpallet59.BackColor = ShiftOSDesktop.artpadcolourpallets(58) + colourpallet60.BackColor = ShiftOSDesktop.artpadcolourpallets(59) + colourpallet61.BackColor = ShiftOSDesktop.artpadcolourpallets(60) + colourpallet62.BackColor = ShiftOSDesktop.artpadcolourpallets(61) + colourpallet63.BackColor = ShiftOSDesktop.artpadcolourpallets(62) + colourpallet64.BackColor = ShiftOSDesktop.artpadcolourpallets(63) + colourpallet65.BackColor = ShiftOSDesktop.artpadcolourpallets(64) + colourpallet66.BackColor = ShiftOSDesktop.artpadcolourpallets(65) + colourpallet67.BackColor = ShiftOSDesktop.artpadcolourpallets(66) + colourpallet68.BackColor = ShiftOSDesktop.artpadcolourpallets(67) + colourpallet69.BackColor = ShiftOSDesktop.artpadcolourpallets(68) + colourpallet70.BackColor = ShiftOSDesktop.artpadcolourpallets(69) + colourpallet71.BackColor = ShiftOSDesktop.artpadcolourpallets(70) + colourpallet72.BackColor = ShiftOSDesktop.artpadcolourpallets(71) + colourpallet73.BackColor = ShiftOSDesktop.artpadcolourpallets(72) + colourpallet74.BackColor = ShiftOSDesktop.artpadcolourpallets(73) + colourpallet75.BackColor = ShiftOSDesktop.artpadcolourpallets(74) + colourpallet76.BackColor = ShiftOSDesktop.artpadcolourpallets(75) + colourpallet77.BackColor = ShiftOSDesktop.artpadcolourpallets(76) + colourpallet78.BackColor = ShiftOSDesktop.artpadcolourpallets(77) + colourpallet79.BackColor = ShiftOSDesktop.artpadcolourpallets(78) + colourpallet80.BackColor = ShiftOSDesktop.artpadcolourpallets(79) + colourpallet81.BackColor = ShiftOSDesktop.artpadcolourpallets(80) + colourpallet82.BackColor = ShiftOSDesktop.artpadcolourpallets(81) + colourpallet83.BackColor = ShiftOSDesktop.artpadcolourpallets(82) + colourpallet84.BackColor = ShiftOSDesktop.artpadcolourpallets(83) + colourpallet85.BackColor = ShiftOSDesktop.artpadcolourpallets(84) + colourpallet86.BackColor = ShiftOSDesktop.artpadcolourpallets(85) + colourpallet87.BackColor = ShiftOSDesktop.artpadcolourpallets(86) + colourpallet88.BackColor = ShiftOSDesktop.artpadcolourpallets(87) + colourpallet89.BackColor = ShiftOSDesktop.artpadcolourpallets(88) + colourpallet90.BackColor = ShiftOSDesktop.artpadcolourpallets(89) + colourpallet91.BackColor = ShiftOSDesktop.artpadcolourpallets(90) + colourpallet92.BackColor = ShiftOSDesktop.artpadcolourpallets(91) + colourpallet93.BackColor = ShiftOSDesktop.artpadcolourpallets(92) + colourpallet94.BackColor = ShiftOSDesktop.artpadcolourpallets(93) + colourpallet95.BackColor = ShiftOSDesktop.artpadcolourpallets(94) + colourpallet96.BackColor = ShiftOSDesktop.artpadcolourpallets(95) + colourpallet97.BackColor = ShiftOSDesktop.artpadcolourpallets(96) + colourpallet98.BackColor = ShiftOSDesktop.artpadcolourpallets(97) + colourpallet99.BackColor = ShiftOSDesktop.artpadcolourpallets(98) + colourpallet100.BackColor = ShiftOSDesktop.artpadcolourpallets(99) + colourpallet101.BackColor = ShiftOSDesktop.artpadcolourpallets(100) + colourpallet102.BackColor = ShiftOSDesktop.artpadcolourpallets(101) + colourpallet103.BackColor = ShiftOSDesktop.artpadcolourpallets(102) + colourpallet104.BackColor = ShiftOSDesktop.artpadcolourpallets(103) + colourpallet105.BackColor = ShiftOSDesktop.artpadcolourpallets(104) + colourpallet106.BackColor = ShiftOSDesktop.artpadcolourpallets(105) + colourpallet107.BackColor = ShiftOSDesktop.artpadcolourpallets(106) + colourpallet108.BackColor = ShiftOSDesktop.artpadcolourpallets(107) + colourpallet109.BackColor = ShiftOSDesktop.artpadcolourpallets(108) + colourpallet110.BackColor = ShiftOSDesktop.artpadcolourpallets(109) + colourpallet111.BackColor = ShiftOSDesktop.artpadcolourpallets(110) + colourpallet112.BackColor = ShiftOSDesktop.artpadcolourpallets(111) + colourpallet113.BackColor = ShiftOSDesktop.artpadcolourpallets(112) + colourpallet114.BackColor = ShiftOSDesktop.artpadcolourpallets(113) + colourpallet115.BackColor = ShiftOSDesktop.artpadcolourpallets(114) + colourpallet116.BackColor = ShiftOSDesktop.artpadcolourpallets(115) + colourpallet117.BackColor = ShiftOSDesktop.artpadcolourpallets(116) + colourpallet118.BackColor = ShiftOSDesktop.artpadcolourpallets(117) + colourpallet119.BackColor = ShiftOSDesktop.artpadcolourpallets(118) + colourpallet120.BackColor = ShiftOSDesktop.artpadcolourpallets(119) + colourpallet121.BackColor = ShiftOSDesktop.artpadcolourpallets(120) + colourpallet122.BackColor = ShiftOSDesktop.artpadcolourpallets(121) + colourpallet123.BackColor = ShiftOSDesktop.artpadcolourpallets(122) + colourpallet124.BackColor = ShiftOSDesktop.artpadcolourpallets(123) + colourpallet125.BackColor = ShiftOSDesktop.artpadcolourpallets(124) + colourpallet126.BackColor = ShiftOSDesktop.artpadcolourpallets(125) + colourpallet127.BackColor = ShiftOSDesktop.artpadcolourpallets(126) + colourpallet128.BackColor = ShiftOSDesktop.artpadcolourpallets(127) + End Sub + + Public Sub savecolors() + ShiftOSDesktop.artpadcolourpallets(0) = colourpallet1.BackColor + ShiftOSDesktop.artpadcolourpallets(1) = colourpallet2.BackColor + ShiftOSDesktop.artpadcolourpallets(2) = colourpallet3.BackColor + ShiftOSDesktop.artpadcolourpallets(3) = colourpallet4.BackColor + ShiftOSDesktop.artpadcolourpallets(4) = colourpallet5.BackColor + ShiftOSDesktop.artpadcolourpallets(5) = colourpallet6.BackColor + ShiftOSDesktop.artpadcolourpallets(6) = colourpallet7.BackColor + ShiftOSDesktop.artpadcolourpallets(7) = colourpallet8.BackColor + ShiftOSDesktop.artpadcolourpallets(8) = colourpallet9.BackColor + ShiftOSDesktop.artpadcolourpallets(9) = colourpallet10.BackColor + ShiftOSDesktop.artpadcolourpallets(10) = colourpallet11.BackColor + ShiftOSDesktop.artpadcolourpallets(11) = colourpallet12.BackColor + ShiftOSDesktop.artpadcolourpallets(12) = colourpallet13.BackColor + ShiftOSDesktop.artpadcolourpallets(13) = colourpallet14.BackColor + ShiftOSDesktop.artpadcolourpallets(14) = colourpallet15.BackColor + ShiftOSDesktop.artpadcolourpallets(15) = colourpallet16.BackColor + ShiftOSDesktop.artpadcolourpallets(16) = colourpallet17.BackColor + ShiftOSDesktop.artpadcolourpallets(17) = colourpallet18.BackColor + ShiftOSDesktop.artpadcolourpallets(18) = colourpallet19.BackColor + ShiftOSDesktop.artpadcolourpallets(19) = colourpallet20.BackColor + ShiftOSDesktop.artpadcolourpallets(20) = colourpallet21.BackColor + ShiftOSDesktop.artpadcolourpallets(21) = colourpallet22.BackColor + ShiftOSDesktop.artpadcolourpallets(22) = colourpallet23.BackColor + ShiftOSDesktop.artpadcolourpallets(23) = colourpallet24.BackColor + ShiftOSDesktop.artpadcolourpallets(24) = colourpallet25.BackColor + ShiftOSDesktop.artpadcolourpallets(25) = colourpallet26.BackColor + ShiftOSDesktop.artpadcolourpallets(26) = colourpallet27.BackColor + ShiftOSDesktop.artpadcolourpallets(27) = colourpallet28.BackColor + ShiftOSDesktop.artpadcolourpallets(28) = colourpallet29.BackColor + ShiftOSDesktop.artpadcolourpallets(29) = colourpallet30.BackColor + ShiftOSDesktop.artpadcolourpallets(30) = colourpallet31.BackColor + ShiftOSDesktop.artpadcolourpallets(31) = colourpallet32.BackColor + ShiftOSDesktop.artpadcolourpallets(32) = colourpallet33.BackColor + ShiftOSDesktop.artpadcolourpallets(33) = colourpallet34.BackColor + ShiftOSDesktop.artpadcolourpallets(34) = colourpallet35.BackColor + ShiftOSDesktop.artpadcolourpallets(35) = colourpallet36.BackColor + ShiftOSDesktop.artpadcolourpallets(36) = colourpallet37.BackColor + ShiftOSDesktop.artpadcolourpallets(37) = colourpallet38.BackColor + ShiftOSDesktop.artpadcolourpallets(38) = colourpallet39.BackColor + ShiftOSDesktop.artpadcolourpallets(39) = colourpallet40.BackColor + ShiftOSDesktop.artpadcolourpallets(40) = colourpallet41.BackColor + ShiftOSDesktop.artpadcolourpallets(41) = colourpallet42.BackColor + ShiftOSDesktop.artpadcolourpallets(42) = colourpallet43.BackColor + ShiftOSDesktop.artpadcolourpallets(43) = colourpallet44.BackColor + ShiftOSDesktop.artpadcolourpallets(44) = colourpallet45.BackColor + ShiftOSDesktop.artpadcolourpallets(45) = colourpallet46.BackColor + ShiftOSDesktop.artpadcolourpallets(46) = colourpallet47.BackColor + ShiftOSDesktop.artpadcolourpallets(47) = colourpallet48.BackColor + ShiftOSDesktop.artpadcolourpallets(48) = colourpallet49.BackColor + ShiftOSDesktop.artpadcolourpallets(49) = colourpallet50.BackColor + ShiftOSDesktop.artpadcolourpallets(50) = colourpallet51.BackColor + ShiftOSDesktop.artpadcolourpallets(51) = colourpallet52.BackColor + ShiftOSDesktop.artpadcolourpallets(52) = colourpallet53.BackColor + ShiftOSDesktop.artpadcolourpallets(53) = colourpallet54.BackColor + ShiftOSDesktop.artpadcolourpallets(54) = colourpallet55.BackColor + ShiftOSDesktop.artpadcolourpallets(55) = colourpallet56.BackColor + ShiftOSDesktop.artpadcolourpallets(56) = colourpallet57.BackColor + ShiftOSDesktop.artpadcolourpallets(57) = colourpallet58.BackColor + ShiftOSDesktop.artpadcolourpallets(58) = colourpallet59.BackColor + ShiftOSDesktop.artpadcolourpallets(59) = colourpallet60.BackColor + ShiftOSDesktop.artpadcolourpallets(60) = colourpallet61.BackColor + ShiftOSDesktop.artpadcolourpallets(61) = colourpallet62.BackColor + ShiftOSDesktop.artpadcolourpallets(62) = colourpallet63.BackColor + ShiftOSDesktop.artpadcolourpallets(63) = colourpallet64.BackColor + ShiftOSDesktop.artpadcolourpallets(64) = colourpallet65.BackColor + ShiftOSDesktop.artpadcolourpallets(65) = colourpallet66.BackColor + ShiftOSDesktop.artpadcolourpallets(66) = colourpallet67.BackColor + ShiftOSDesktop.artpadcolourpallets(67) = colourpallet68.BackColor + ShiftOSDesktop.artpadcolourpallets(68) = colourpallet69.BackColor + ShiftOSDesktop.artpadcolourpallets(69) = colourpallet70.BackColor + ShiftOSDesktop.artpadcolourpallets(70) = colourpallet71.BackColor + ShiftOSDesktop.artpadcolourpallets(71) = colourpallet72.BackColor + ShiftOSDesktop.artpadcolourpallets(72) = colourpallet73.BackColor + ShiftOSDesktop.artpadcolourpallets(73) = colourpallet74.BackColor + ShiftOSDesktop.artpadcolourpallets(74) = colourpallet75.BackColor + ShiftOSDesktop.artpadcolourpallets(75) = colourpallet76.BackColor + ShiftOSDesktop.artpadcolourpallets(76) = colourpallet77.BackColor + ShiftOSDesktop.artpadcolourpallets(77) = colourpallet78.BackColor + ShiftOSDesktop.artpadcolourpallets(78) = colourpallet79.BackColor + ShiftOSDesktop.artpadcolourpallets(79) = colourpallet80.BackColor + ShiftOSDesktop.artpadcolourpallets(80) = colourpallet81.BackColor + ShiftOSDesktop.artpadcolourpallets(81) = colourpallet82.BackColor + ShiftOSDesktop.artpadcolourpallets(82) = colourpallet83.BackColor + ShiftOSDesktop.artpadcolourpallets(83) = colourpallet84.BackColor + ShiftOSDesktop.artpadcolourpallets(84) = colourpallet85.BackColor + ShiftOSDesktop.artpadcolourpallets(85) = colourpallet86.BackColor + ShiftOSDesktop.artpadcolourpallets(86) = colourpallet87.BackColor + ShiftOSDesktop.artpadcolourpallets(87) = colourpallet88.BackColor + ShiftOSDesktop.artpadcolourpallets(88) = colourpallet89.BackColor + ShiftOSDesktop.artpadcolourpallets(89) = colourpallet90.BackColor + ShiftOSDesktop.artpadcolourpallets(90) = colourpallet91.BackColor + ShiftOSDesktop.artpadcolourpallets(91) = colourpallet92.BackColor + ShiftOSDesktop.artpadcolourpallets(92) = colourpallet93.BackColor + ShiftOSDesktop.artpadcolourpallets(93) = colourpallet94.BackColor + ShiftOSDesktop.artpadcolourpallets(94) = colourpallet95.BackColor + ShiftOSDesktop.artpadcolourpallets(95) = colourpallet96.BackColor + ShiftOSDesktop.artpadcolourpallets(96) = colourpallet97.BackColor + ShiftOSDesktop.artpadcolourpallets(97) = colourpallet98.BackColor + ShiftOSDesktop.artpadcolourpallets(98) = colourpallet99.BackColor + ShiftOSDesktop.artpadcolourpallets(99) = colourpallet100.BackColor + ShiftOSDesktop.artpadcolourpallets(100) = colourpallet101.BackColor + ShiftOSDesktop.artpadcolourpallets(101) = colourpallet102.BackColor + ShiftOSDesktop.artpadcolourpallets(102) = colourpallet103.BackColor + ShiftOSDesktop.artpadcolourpallets(103) = colourpallet104.BackColor + ShiftOSDesktop.artpadcolourpallets(104) = colourpallet105.BackColor + ShiftOSDesktop.artpadcolourpallets(105) = colourpallet106.BackColor + ShiftOSDesktop.artpadcolourpallets(106) = colourpallet107.BackColor + ShiftOSDesktop.artpadcolourpallets(107) = colourpallet108.BackColor + ShiftOSDesktop.artpadcolourpallets(108) = colourpallet109.BackColor + ShiftOSDesktop.artpadcolourpallets(109) = colourpallet110.BackColor + ShiftOSDesktop.artpadcolourpallets(110) = colourpallet111.BackColor + ShiftOSDesktop.artpadcolourpallets(111) = colourpallet112.BackColor + ShiftOSDesktop.artpadcolourpallets(112) = colourpallet113.BackColor + ShiftOSDesktop.artpadcolourpallets(113) = colourpallet114.BackColor + ShiftOSDesktop.artpadcolourpallets(114) = colourpallet115.BackColor + ShiftOSDesktop.artpadcolourpallets(115) = colourpallet116.BackColor + ShiftOSDesktop.artpadcolourpallets(116) = colourpallet117.BackColor + ShiftOSDesktop.artpadcolourpallets(117) = colourpallet118.BackColor + ShiftOSDesktop.artpadcolourpallets(118) = colourpallet119.BackColor + ShiftOSDesktop.artpadcolourpallets(119) = colourpallet120.BackColor + ShiftOSDesktop.artpadcolourpallets(120) = colourpallet121.BackColor + ShiftOSDesktop.artpadcolourpallets(121) = colourpallet122.BackColor + ShiftOSDesktop.artpadcolourpallets(122) = colourpallet123.BackColor + ShiftOSDesktop.artpadcolourpallets(123) = colourpallet124.BackColor + ShiftOSDesktop.artpadcolourpallets(124) = colourpallet125.BackColor + ShiftOSDesktop.artpadcolourpallets(125) = colourpallet126.BackColor + ShiftOSDesktop.artpadcolourpallets(126) = colourpallet127.BackColor + ShiftOSDesktop.artpadcolourpallets(127) = colourpallet128.BackColor + End Sub + + Public Sub settoolcolours() + btnpixelsetter.BackColor = drawingcolour + btnpixelplacer.BackColor = drawingcolour + btnpencil.BackColor = drawingcolour + btnfloodfill.BackColor = drawingcolour + btnsquare.BackColor = drawingcolour + btnoval.BackColor = drawingcolour + btnlinetool.BackColor = drawingcolour + btnpaintbrush.BackColor = drawingcolour + btntexttool.BackColor = drawingcolour + End Sub + + Private Sub btnzoomin_Click(sender As Object, e As EventArgs) Handles btnzoomin.Click + If magnificationlevel < 256 Then + magnificationlevel *= 2 + Else + infobox.title = "ArtPad - Magnification Error!" + infobox.textinfo = "You are unable to increase the magnification level any further." & Environment.NewLine & Environment.NewLine & "256x is the highest level of magnification supported by ArtPad!" + infobox.Show() + End If + setmagnification() + End Sub + + Private Sub btnzoomout_Click(sender As Object, e As EventArgs) Handles btnzoomout.Click + If magnificationlevel > 1 Then + magnificationlevel /= 2 + pnldrawingbackground.AutoScrollPosition = New Point(0, 0) + Else + infobox.title = "ArtPad - Magnification Error!" + infobox.textinfo = "You are unable to decrease the magnification level any further." & Environment.NewLine & Environment.NewLine & "Artpad is unable to scale pixels at a level smaller than their actual size!" + infobox.Show() + End If + setmagnification() + End Sub + + Private Sub setmagnification() + magnifyRect.Width = CInt(canvaswidth / magnificationlevel) + magnifyRect.Height = CInt(canvasheight / magnificationlevel) + picdrawingdisplay.Size = New Size(canvaswidth * magnificationlevel, canvasheight * magnificationlevel) + If picdrawingdisplay.Height > 468 AndAlso picdrawingdisplay.Width > 676 Then + picdrawingdisplay.Location = New Point(0, 0) + Else + picdrawingdisplay.Location = New Point((pnldrawingbackground.Width - canvaswidth * magnificationlevel) / 2, (pnldrawingbackground.Height - canvasheight * magnificationlevel) / 2) + End If + picdrawingdisplay.Invalidate() + lblzoomlevel.Text = magnificationlevel & "X" + End Sub + + Private Sub pnlpixelplacer_Click(sender As Object, e As EventArgs) Handles btnpixelplacer.Click + selectedtool = "Pixel Placer" + gettoolsettings(pnlpixelplacersettings) + End Sub + + Private Sub btnpixelplacermovementmode_Click(sender As Object, e As EventArgs) Handles btnpixelplacermovementmode.Click + If pixalplacermovable = False Then + pixalplacermovable = True + btnpixelplacermovementmode.ForeColor = Color.White + btnpixelplacermovementmode.BackColor = Color.Black + btnpixelplacermovementmode.Text = "Deactivate Movement Mode" + lblpixelplacerhelp.Text = "Movement mode is enabled. Click and drag on the canvas to place pixels as you move the mouse. Please use 4x magnification or greater and move the mouse very slowly." + Else + pixalplacermovable = False + btnpixelplacermovementmode.ForeColor = Color.Black + btnpixelplacermovementmode.BackColor = Color.White + btnpixelplacermovementmode.Text = "Activate Movement Mode" + lblpixelplacerhelp.Text = "This tool does not contain any alterable settings. Simply click on the canvas and a pixel will be placed in the spot you click." + End If + End Sub + + Private Sub btnsave_Click(sender As Object, e As EventArgs) Handles btnsave.Click + showsavedialog() + End Sub + + Public Sub showsavedialog() + File_Saver.savingprogram = "artpad" + File_Saver.saveextention = ".pic" + File_Saver.Show() + End Sub + + Public Sub saveimage() + canvasbitmap.Save(savelocation, Imaging.ImageFormat.Bmp) + End Sub + + Private Sub txtnewcanvaswidth_TextChanged(sender As Object, e As EventArgs) Handles txtnewcanvaswidth.TextChanged, txtnewcanvasheight.TextChanged + If txtnewcanvaswidth.Text = "" Or txtnewcanvasheight.Text = "" Then + Else + lbltotalpixels.Text = (Convert.ToInt32(txtnewcanvaswidth.Text) * Convert.ToInt32(txtnewcanvasheight.Text)) + If ShiftOSDesktop.boughtartpadlimitlesspixels = True Then + lbltotalpixels.ForeColor = Color.Black + Else + If (Convert.ToInt32(txtnewcanvaswidth.Text) * Convert.ToInt32(txtnewcanvasheight.Text)) > ShiftOSDesktop.artpadpixellimit Then + lbltotalpixels.ForeColor = Color.Red + Else + lbltotalpixels.ForeColor = Color.Black + End If + End If + End If + + End Sub + + Private Sub btncreate_Click(sender As Object, e As EventArgs) Handles btncreate.Click + If lbltotalpixels.ForeColor = Color.Red Then + infobox.title = "ArtPad - Pixel Limit!" + infobox.textinfo = "You are unable to use this many pixels in your canvas due to it exceeding your current pixel limit." & Environment.NewLine & Environment.NewLine & "Your pixel limit is currently " & ShiftOSDesktop.artpadpixellimit & " Pixels!" + infobox.Show() + Else + If lbltotalpixels.Text = "0" Then + Else + canvaswidth = txtnewcanvaswidth.Text + canvasheight = txtnewcanvasheight.Text + picdrawingdisplay.Show() + setupcanvas() + pnlinitialcanvassettings.Hide() + End If + End If + End Sub + + Private Sub btncancel_Click(sender As Object, e As EventArgs) Handles btncancel.Click + pnlinitialcanvassettings.Hide() + picdrawingdisplay.Show() + End Sub + + Private Sub btnnew_Click(sender As Object, e As EventArgs) Handles btnnew.Click + pnlinitialcanvassettings.Show() + picdrawingdisplay.Hide() + End Sub + + Public Sub setuppreview() + lbltoolselected.Text = selectedtool + picpreview.CreateGraphics.FillRectangle(Brushes.White, 0, 0, 70, 50) + Select Case selectedtool + Case "Square Tool" + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), squarewidth) + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, fillsquarecolor)) + Dim rectdraw As New RectangleF(0, 0, picpreview.Width, picpreview.Height) + Dim correctionamount As Single = squarewidth / 2 + If squarewidth > 0 Then + picpreview.CreateGraphics.DrawRectangle(CurrentPen, rectdraw.X + correctionamount, rectdraw.Y + correctionamount, rectdraw.Width - squarewidth, rectdraw.Height - squarewidth) + End If + If squarefillon = True Then + picpreview.CreateGraphics.FillRectangle(CurrentBrush, rectdraw.X + squarewidth, rectdraw.Y + squarewidth, rectdraw.Width - squarewidth - squarewidth, rectdraw.Height - squarewidth - squarewidth) + End If + Case "Oval Tool" + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), ovalwidth) + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, fillovalcolor)) + Dim rectdraw As New RectangleF(0, 0, picpreview.Width, picpreview.Height) + Dim correctionamount As Single = ovalwidth / 2 + If ovalwidth > 0 Then + picpreview.CreateGraphics.DrawEllipse(CurrentPen, rectdraw.X + correctionamount, rectdraw.Y + correctionamount, rectdraw.Width - ovalwidth, rectdraw.Height - ovalwidth) + End If + If ovalfillon = True Then + Dim fixer As Single = ovalwidth / 2 + picpreview.CreateGraphics.FillEllipse(CurrentBrush, (rectdraw.X + fixer), (rectdraw.Y + fixer), rectdraw.Width - fixer - fixer, rectdraw.Height - fixer - fixer) + End If + Case "Text Tool" + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, drawingcolour)) + drawtextfont = New System.Drawing.Font(drawtextfontname, 20, drawtextfontstyle) + picpreview.CreateGraphics.DrawString("A", drawtextfont, CurrentBrush, 20, 0) + Case "Line Tool" + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), linewidth) + picpreview.CreateGraphics.DrawLine(CurrentPen, 0, 0, picpreview.Width, picpreview.Height) + Case "Pencil" + Dim CurrentPen = New Pen(Color.FromArgb(255, drawingcolour), pencilwidth) + picpreview.CreateGraphics.DrawLine(CurrentPen, 0, 25, picpreview.Width, 25) + Case "Paint Brush" + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, drawingcolour)) + Dim halfsize As Single = paintbrushwidth / 2 + Dim halfwidth As Single = picdrawingdisplay.Width / 2 + Dim halfheight As Single = picdrawingdisplay.Height / 2 + If paintbrushtype = "circle" Then + picpreview.CreateGraphics.FillEllipse(CurrentBrush, halfwidth - 15 - halfsize, halfheight - 1 - halfsize, paintbrushwidth, paintbrushwidth) + Else + picpreview.CreateGraphics.FillRectangle(CurrentBrush, halfwidth - 15 - halfsize, halfheight - 1 - halfsize, paintbrushwidth, paintbrushwidth) + End If + Case "Eracer" + Dim drawbrush As New System.Drawing.SolidBrush(drawingcolour) + picpreview.CreateGraphics.FillRectangle(drawbrush, 0, 0, picpreview.Width, picpreview.Height) + Dim CurrentBrush = New SolidBrush(Color.FromArgb(255, Color.White)) + Dim halfsize As Single = eracerwidth / 2 + Dim halfwidth As Single = picdrawingdisplay.Width / 2 + Dim halfheight As Single = picdrawingdisplay.Height / 2 + If eracertype = "circle" Then + picpreview.CreateGraphics.FillEllipse(CurrentBrush, halfwidth - 15 - halfsize, halfheight - halfsize, eracerwidth, eracerwidth) + Else + picpreview.CreateGraphics.FillRectangle(CurrentBrush, halfwidth - 15 - halfsize, halfheight - halfsize, eracerwidth, eracerwidth) + End If + Case Else + Dim drawbrush As New System.Drawing.SolidBrush(drawingcolour) + picpreview.CreateGraphics.FillRectangle(drawbrush, 0, 0, picpreview.Width, picpreview.Height) + drawbrush.Dispose() + End Select + End Sub + + Private Sub limittonumbers(sender As Object, e As KeyPressEventArgs) Handles txtnewcanvasheight.KeyPress, txtnewcanvaswidth.KeyPress, txtpixelsetterxcoordinate.KeyPress, txtpixelsetterycoordinate.KeyPress, txtsquareborderwidth.KeyPress, txtovalborderwidth.KeyPress, txtnewcanvasheight.KeyPress, txteracersize.KeyPress, txtlinewidth.KeyPress, txtdrawtextsize.KeyPress, txtpaintbrushsize.KeyPress, txtcolorpalletheight.KeyPress, txtcolorpalletwidth.KeyPress, txtsidespace.KeyPress, txttopspace.KeyPress + If Asc(e.KeyChar) <> 8 Then + If Asc(e.KeyChar) < 48 Or Asc(e.KeyChar) > 57 Then + e.Handled = True + End If + End If + End Sub + + Private Sub btnpencil_Click(sender As Object, e As EventArgs) Handles btnpencil.Click + selectedtool = "Pencil" + gettoolsettings(pnlpencilsettings) + End Sub + + Private Sub ChangePencilSize(sender As Object, e As EventArgs) Handles btnpencilsize1.Click, btnpencilsize2.Click, btnpencilsize3.Click + Select Case sender.name.ToString + Case "btnpencilsize1" + pencilwidth = 1 + Case "btnpencilsize2" + pencilwidth = 2 + Case "btnpencilsize3" + pencilwidth = 3 + End Select + setuppreview() + End Sub + + Private Sub btnundo_Click(sender As Object, e As EventArgs) Handles btnundo.Click + Try + undo.redoStack.Push(canvasbitmap.Clone) + canvasbitmap = undo.undoStack.Pop() + graphicsbitmap = Graphics.FromImage(canvasbitmap) + picdrawingdisplay.Invalidate() + Catch ex As Exception + infobox.title = "ArtPad - Undo Error!" + infobox.textinfo = "There doesn't appear to be any more actions to undo." & Environment.NewLine & Environment.NewLine & "One more step back would undo the creation of the canvas. If this is your goal just click new." + infobox.Show() + End Try + End Sub + + Private Sub btnredo_Click(sender As Object, e As EventArgs) Handles btnredo.Click + Try + undo.undoStack.Push(canvasbitmap.Clone) + canvasbitmap = undo.redoStack.Pop() + graphicsbitmap = Graphics.FromImage(canvasbitmap) + picdrawingdisplay.Invalidate() + Catch ex As Exception + infobox.title = "ArtPad - Redo Error!" + infobox.textinfo = "There doesn't appear to be any more actions to redo." & Environment.NewLine & Environment.NewLine & "If you have drawn on the canvas recently all future history would have been wiped!" + infobox.Show() + End Try + End Sub + + Private Sub btnopen_Click(sender As Object, e As EventArgs) Handles btnopen.Click + File_Opener.Show() + File_Opener.openingprogram = "artpad" + File_Opener.openextention = ".pic" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Public Sub openpic() + pnlinitialcanvassettings.Hide() + picdrawingdisplay.Show() + magnificationlevel = 1 + setmagnification() + canvasbitmap = Image.FromFile(savelocation) + canvasheight = canvasbitmap.Height + canvaswidth = canvasbitmap.Width + picdrawingdisplay.Size = New Size(canvaswidth, canvasheight) + picdrawingdisplay.Location = New Point((pnldrawingbackground.Width - canvaswidth) / 2, (pnldrawingbackground.Height - canvasheight) / 2) + graphicsbitmap = Graphics.FromImage(canvasbitmap) + picdrawingdisplay.Invalidate() + End Sub + + ' Flood fill the point. + Public Sub SafeFloodFill(ByVal bm As Bitmap, ByVal x As _ + Integer, ByVal y As Integer, ByVal new_color As Color) + ' Get the old and new colors. + Dim old_color As Color = bm.GetPixel(x, y) + + ' The following "If Then" test was added by Reuben + ' Jollif + ' to protect the code in case the start pixel + ' has the same color as the fill color. + If old_color.ToArgb <> new_color.ToArgb Then + ' Start with the original point in the stack. + Dim pts As New Stack(1000) + pts.Push(New Point(x, y)) + bm.SetPixel(x, y, new_color) + + ' While the stack is not empty, process a point. + Do While pts.Count > 0 + Dim pt As Point = DirectCast(pts.Pop(), Point) + If pt.X > 0 Then SafeCheckPoint(bm, pts, pt.X - _ + 1, pt.Y, old_color, new_color) + If pt.Y > 0 Then SafeCheckPoint(bm, pts, pt.X, _ + pt.Y - 1, old_color, new_color) + If pt.X < bm.Width - 1 Then SafeCheckPoint(bm, _ + pts, pt.X + 1, pt.Y, old_color, new_color) + If pt.Y < bm.Height - 1 Then SafeCheckPoint(bm, _ + pts, pt.X, pt.Y + 1, old_color, new_color) + Loop + End If + End Sub + + ' See if this point should be added to the stack. + Private Sub SafeCheckPoint(ByVal bm As Bitmap, ByVal pts As _ + Stack, ByVal x As Integer, ByVal y As Integer, ByVal _ + old_color As Color, ByVal new_color As Color) + Dim clr As Color = bm.GetPixel(x, y) + If clr.Equals(old_color) Then + pts.Push(New Point(x, y)) + bm.SetPixel(x, y, new_color) + End If + End Sub + + Private Sub btnfill_Click(sender As Object, e As EventArgs) Handles btnfloodfill.Click + selectedtool = "Flood Fill" + gettoolsettings(pnlfloodfillsettings) + End Sub + + Private Sub btnsquare_Click(sender As Object, e As EventArgs) Handles btnsquare.Click + selectedtool = "Square Tool" + gettoolsettings(pnlsquaretoolsettings) + txtsquareborderwidth.Text = squarewidth + End Sub + + Private Sub txtsquareborderwidth_TextChanged(sender As Object, e As EventArgs) Handles txtsquareborderwidth.TextChanged + If txtsquareborderwidth.Text = "" Then + Else + squarewidth = (Convert.ToInt32(txtsquareborderwidth.Text)) + setuppreview() + End If + End Sub + + Private Sub pnlsquarefillcolour_Click(sender As Object, e As EventArgs) Handles pnlsquarefillcolour.Click + pnlsquarefillcolour.BackColor = drawingcolour + fillsquarecolor = drawingcolour + setuppreview() + End Sub + + Private Sub btnsquarefillonoff_Click(sender As Object, e As EventArgs) Handles btnsquarefillonoff.Click + If squarefillon = True Then + btnsquarefillonoff.Text = "Fill OFF" + btnsquarefillonoff.BackColor = Color.White + btnsquarefillonoff.ForeColor = Color.Black + squarefillon = False + Else + btnsquarefillonoff.Text = "Fill ON" + btnsquarefillonoff.BackColor = Color.Black + btnsquarefillonoff.ForeColor = Color.White + squarefillon = True + End If + txtsquareborderwidth.Text = squarewidth + setuppreview() + End Sub + + Private Sub btnoval_Click(sender As Object, e As EventArgs) Handles btnoval.Click + selectedtool = "Oval Tool" + gettoolsettings(pnlovaltoolsettings) + txtovalborderwidth.Text = ovalwidth + End Sub + + Private Sub txtovalborderwidth_TextChanged(sender As Object, e As EventArgs) Handles txtovalborderwidth.TextChanged + If txtovalborderwidth.Text = "" Then + Else + ovalwidth = (Convert.ToInt32(txtovalborderwidth.Text)) + setuppreview() + End If + End Sub + + Private Sub pnlovalfillcolour_Click(sender As Object, e As EventArgs) Handles pnlovalfillcolour.Click + pnlovalfillcolour.BackColor = drawingcolour + fillovalcolor = drawingcolour + setuppreview() + End Sub + + Private Sub btnovalfillonoff_Click(sender As Object, e As EventArgs) Handles btnovalfillonoff.Click + If ovalfillon = True Then + btnovalfillonoff.Text = "Fill OFF" + btnovalfillonoff.BackColor = Color.White + btnovalfillonoff.ForeColor = Color.Black + ovalfillon = False + Else + btnovalfillonoff.Text = "Fill ON" + btnovalfillonoff.BackColor = Color.Black + btnovalfillonoff.ForeColor = Color.White + ovalfillon = True + End If + txtovalborderwidth.Text = ovalwidth + setuppreview() + End Sub + + Private Sub btneracer_Click(sender As Object, e As EventArgs) Handles btneracer.Click + selectedtool = "Eracer" + gettoolsettings(pnleracertoolsettings) + txteracersize.Text = eracerwidth + setuppreview() + End Sub + + Private Sub txteracersize_TextChanged(sender As Object, e As EventArgs) Handles txteracersize.TextChanged + If txteracersize.Text = "" Then + Else + eracerwidth = (Convert.ToInt32(txteracersize.Text)) + End If + setuppreview() + End Sub + + Private Sub btneracercircle_Click(sender As Object, e As EventArgs) Handles btneracercircle.Click + eracertype = "circle" + btneracercircle.BackgroundImage = My.Resources.ArtPadcirclerubberselected + btneracersquare.BackgroundImage = My.Resources.ArtPadsquarerubber + setuppreview() + End Sub + + Private Sub btneracersquare_Click(sender As Object, e As EventArgs) Handles btneracersquare.Click + eracertype = "square" + btneracercircle.BackgroundImage = My.Resources.ArtPadcirclerubber + btneracersquare.BackgroundImage = My.Resources.ArtPadsquarerubberselected + setuppreview() + End Sub + + Private Sub btnlinetool_Click(sender As Object, e As EventArgs) Handles btnlinetool.Click + selectedtool = "Line Tool" + gettoolsettings(pnllinetoolsettings) + txtlinewidth.Text = linewidth + End Sub + + Private Sub txtlinewidth_TextChanged(sender As Object, e As EventArgs) Handles txtlinewidth.TextChanged + If txtlinewidth.Text = "" Then + Else + linewidth = (Convert.ToInt32(txtlinewidth.Text)) + End If + setuppreview() + End Sub + + Private Sub btntexttool_Click(sender As Object, e As EventArgs) Handles btntexttool.Click + selectedtool = "Text Tool" + gettoolsettings(pnltexttoolsettings) + End Sub + + Private Sub txtdrawtextsize_TextChanged(sender As Object, e As EventArgs) Handles txtdrawtextsize.TextChanged + If txtdrawtextsize.Text = "" Then + Else + drawtextsize = txtdrawtextsize.Text + End If + setuppreview() + End Sub + + Private Sub combodrawtextfont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles combodrawtextfont.SelectedIndexChanged + drawtextfontname = combodrawtextfont.Text + txtdrawstringtext.Focus() + setuppreview() + End Sub + + Private Sub combofontstyle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles combofontstyle.SelectedIndexChanged + Select Case combofontstyle.Text + Case "Bold" + drawtextfontstyle = FontStyle.Bold + Case "Italic" + drawtextfontstyle = FontStyle.Italic + Case "Regular" + drawtextfontstyle = FontStyle.Regular + Case "Strikeout" + drawtextfontstyle = FontStyle.Strikeout + Case "Underline" + drawtextfontstyle = FontStyle.Underline + End Select + txtdrawstringtext.Focus() + setuppreview() + End Sub + + Private Sub txtpaintbrushsize_TextChanged(sender As Object, e As EventArgs) Handles txtpaintbrushsize.TextChanged + If txtpaintbrushsize.Text = "" Then + Else + paintbrushwidth = (Convert.ToInt32(txtpaintbrushsize.Text)) + End If + setuppreview() + End Sub + + Private Sub btnpaintsquareshape_Click(sender As Object, e As EventArgs) Handles btnpaintsquareshape.Click + paintbrushtype = "square" + btnpaintcircleshape.BackgroundImage = My.Resources.ArtPadcirclerubber + btnpaintsquareshape.BackgroundImage = My.Resources.ArtPadsquarerubberselected + setuppreview() + End Sub + + Private Sub btnpaintcircleshape_Click(sender As Object, e As EventArgs) Handles btnpaintcircleshape.Click + paintbrushtype = "circle" + btnpaintcircleshape.BackgroundImage = My.Resources.ArtPadcirclerubberselected + btnpaintsquareshape.BackgroundImage = My.Resources.ArtPadsquarerubber + setuppreview() + End Sub + + Private Sub btnpaintbrush_Click(sender As Object, e As EventArgs) Handles btnpaintbrush.Click + selectedtool = "Paint Brush" + gettoolsettings(pnlpaintbrushtoolsettings) + txtpaintbrushsize.Text = paintbrushwidth + setuppreview() + End Sub + + Private Sub preparecooldown() + needtosave = True + If codepointscooldown = True Then + Else + codepointsearned = codepointsearned + 1 + codepointscooldown = True + tmrcodepointcooldown.Start() + End If + End Sub + + Private Sub tmrcodepointcooldown_Tick(sender As Object, e As EventArgs) Handles tmrcodepointcooldown.Tick + codepointscooldown = False + tmrcodepointcooldown.Stop() + End Sub + + Private Sub tmrshowearnedcodepoints_Tick(sender As Object, e As EventArgs) Handles tmrshowearnedcodepoints.Tick + lbtitletext.Text = "Artpad" + Me.setuptitlebar() + tmrshowearnedcodepoints.Stop() + End Sub + + Private Sub btnsetsize_Click(sender As Object, e As EventArgs) Handles btnsetsize.Click + setpalletsize() + End Sub + + Private Sub setpalletsize() + ShiftOSDesktop.artpadcolorpalletwidth = txtcolorpalletwidth.Text + ShiftOSDesktop.artpadcolorpalletheight = txtcolorpalletheight.Text + + ShiftOSDesktop.artpadcolorpallettopgap = txttopspace.Text + ShiftOSDesktop.artpadcolorpalletsidegap = txtsidespace.Text + + setuppallets() + End Sub + + Public Sub setuppallets() + colourpallet1.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet2.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet3.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet4.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet5.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet6.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet7.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet8.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet9.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet10.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet11.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet12.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet13.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet14.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet15.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet16.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet17.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet18.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet19.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet20.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet21.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet22.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet23.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet24.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet25.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet26.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet27.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet28.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet29.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet30.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet31.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet32.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet33.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet34.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet35.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet36.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet37.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet38.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet39.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet40.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet41.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet42.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet43.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet44.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet45.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet46.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet47.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet48.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet49.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet50.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet51.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet52.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet53.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet54.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet55.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet56.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet57.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet58.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet59.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet60.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet61.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet62.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet63.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet64.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet65.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet66.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet67.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet68.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet69.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet70.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet71.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet72.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet73.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet74.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet75.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet76.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet77.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet78.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet79.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet80.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet81.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet82.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet83.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet84.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet85.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet86.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet87.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet88.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet89.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet90.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet91.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet92.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet93.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet94.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet95.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet96.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet97.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet98.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet99.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet100.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet101.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet102.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet103.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet104.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet105.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet106.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet107.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet108.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet109.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet110.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet111.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet112.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet113.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet114.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet115.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet116.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet117.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet118.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet119.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet120.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet121.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet122.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet123.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet124.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet125.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet126.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet127.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + colourpallet128.Margin = New Padding(ShiftOSDesktop.artpadcolorpalletsidegap, 0, 0, ShiftOSDesktop.artpadcolorpallettopgap) + + colourpallet1.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet2.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet3.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet4.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet5.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet6.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet7.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet8.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet9.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet10.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet11.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet12.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet13.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet14.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet15.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet16.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet17.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet18.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet19.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet20.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet21.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet22.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet23.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet24.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet25.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet26.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet27.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet28.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet29.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet30.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet31.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet32.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet33.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet34.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet35.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet36.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet37.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet38.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet39.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet40.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet41.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet42.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet43.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet44.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet45.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet46.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet47.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet48.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet49.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet50.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet51.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet52.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet53.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet54.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet55.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet56.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet57.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet58.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet59.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet60.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet61.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet62.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet63.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet64.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet65.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet66.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet67.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet68.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet69.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet70.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet71.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet72.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet73.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet74.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet75.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet76.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet77.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet78.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet79.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet80.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet81.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet82.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet83.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet84.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet85.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet86.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet87.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet88.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet89.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet90.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet91.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet92.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet93.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet94.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet95.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet96.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet97.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet98.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet99.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet100.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet101.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet102.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet103.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet104.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet105.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet106.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet107.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet108.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet109.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet110.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet111.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet112.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet113.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet114.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet115.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet116.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet117.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet118.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet119.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet120.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet121.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet122.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet123.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet124.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet125.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet126.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet127.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + colourpallet128.Size = New Size(ShiftOSDesktop.artpadcolorpalletwidth, ShiftOSDesktop.artpadcolorpalletheight) + End Sub + + Public Sub determinevisiblepallets() + Select Case ShiftOSDesktop.artpadvisiblepallets + Case "2" + colourpallet1.Show() + colourpallet2.Show() + Case "4" + colourpallet1.Show() + colourpallet2.Show() + colourpallet3.Show() + colourpallet4.Show() + Case "8" + colourpallet1.Show() + colourpallet2.Show() + colourpallet3.Show() + colourpallet4.Show() + colourpallet5.Show() + colourpallet6.Show() + colourpallet7.Show() + colourpallet8.Show() + Case "16" + colourpallet1.Show() + colourpallet2.Show() + colourpallet3.Show() + colourpallet4.Show() + colourpallet5.Show() + colourpallet6.Show() + colourpallet7.Show() + colourpallet8.Show() + colourpallet9.Show() + colourpallet10.Show() + colourpallet11.Show() + colourpallet12.Show() + colourpallet13.Show() + colourpallet14.Show() + colourpallet15.Show() + colourpallet16.Show() + Case "32" + colourpallet1.Show() + colourpallet2.Show() + colourpallet3.Show() + colourpallet4.Show() + colourpallet5.Show() + colourpallet6.Show() + colourpallet7.Show() + colourpallet8.Show() + colourpallet9.Show() + colourpallet10.Show() + colourpallet11.Show() + colourpallet12.Show() + colourpallet13.Show() + colourpallet14.Show() + colourpallet15.Show() + colourpallet16.Show() + colourpallet17.Show() + colourpallet18.Show() + colourpallet19.Show() + colourpallet20.Show() + colourpallet21.Show() + colourpallet22.Show() + colourpallet23.Show() + colourpallet24.Show() + colourpallet25.Show() + colourpallet26.Show() + colourpallet27.Show() + colourpallet28.Show() + colourpallet29.Show() + colourpallet30.Show() + colourpallet31.Show() + colourpallet32.Show() + Case "64" + colourpallet1.Show() + colourpallet2.Show() + colourpallet3.Show() + colourpallet4.Show() + colourpallet5.Show() + colourpallet6.Show() + colourpallet7.Show() + colourpallet8.Show() + colourpallet9.Show() + colourpallet10.Show() + colourpallet11.Show() + colourpallet12.Show() + colourpallet13.Show() + colourpallet14.Show() + colourpallet15.Show() + colourpallet16.Show() + colourpallet17.Show() + colourpallet18.Show() + colourpallet19.Show() + colourpallet20.Show() + colourpallet21.Show() + colourpallet22.Show() + colourpallet23.Show() + colourpallet24.Show() + colourpallet25.Show() + colourpallet26.Show() + colourpallet27.Show() + colourpallet28.Show() + colourpallet29.Show() + colourpallet30.Show() + colourpallet31.Show() + colourpallet32.Show() + colourpallet33.Show() + colourpallet34.Show() + colourpallet35.Show() + colourpallet36.Show() + colourpallet37.Show() + colourpallet38.Show() + colourpallet39.Show() + colourpallet40.Show() + colourpallet41.Show() + colourpallet42.Show() + colourpallet43.Show() + colourpallet44.Show() + colourpallet45.Show() + colourpallet46.Show() + colourpallet47.Show() + colourpallet48.Show() + colourpallet49.Show() + colourpallet50.Show() + colourpallet51.Show() + colourpallet52.Show() + colourpallet53.Show() + colourpallet54.Show() + colourpallet55.Show() + colourpallet56.Show() + colourpallet57.Show() + colourpallet58.Show() + colourpallet59.Show() + colourpallet60.Show() + colourpallet61.Show() + colourpallet62.Show() + colourpallet63.Show() + colourpallet64.Show() + Case "128" + colourpallet1.Show() + colourpallet2.Show() + colourpallet3.Show() + colourpallet4.Show() + colourpallet5.Show() + colourpallet6.Show() + colourpallet7.Show() + colourpallet8.Show() + colourpallet9.Show() + colourpallet10.Show() + colourpallet11.Show() + colourpallet12.Show() + colourpallet13.Show() + colourpallet14.Show() + colourpallet15.Show() + colourpallet16.Show() + colourpallet17.Show() + colourpallet18.Show() + colourpallet19.Show() + colourpallet20.Show() + colourpallet21.Show() + colourpallet22.Show() + colourpallet23.Show() + colourpallet24.Show() + colourpallet25.Show() + colourpallet26.Show() + colourpallet27.Show() + colourpallet28.Show() + colourpallet29.Show() + colourpallet30.Show() + colourpallet31.Show() + colourpallet32.Show() + colourpallet33.Show() + colourpallet34.Show() + colourpallet35.Show() + colourpallet36.Show() + colourpallet37.Show() + colourpallet38.Show() + colourpallet39.Show() + colourpallet40.Show() + colourpallet41.Show() + colourpallet42.Show() + colourpallet43.Show() + colourpallet44.Show() + colourpallet45.Show() + colourpallet46.Show() + colourpallet47.Show() + colourpallet48.Show() + colourpallet49.Show() + colourpallet50.Show() + colourpallet51.Show() + colourpallet52.Show() + colourpallet53.Show() + colourpallet54.Show() + colourpallet55.Show() + colourpallet56.Show() + colourpallet57.Show() + colourpallet58.Show() + colourpallet59.Show() + colourpallet60.Show() + colourpallet61.Show() + colourpallet62.Show() + colourpallet63.Show() + colourpallet64.Show() + colourpallet65.Show() + colourpallet66.Show() + colourpallet67.Show() + colourpallet68.Show() + colourpallet69.Show() + colourpallet70.Show() + colourpallet71.Show() + colourpallet72.Show() + colourpallet73.Show() + colourpallet74.Show() + colourpallet75.Show() + colourpallet76.Show() + colourpallet77.Show() + colourpallet78.Show() + colourpallet79.Show() + colourpallet80.Show() + colourpallet81.Show() + colourpallet82.Show() + colourpallet83.Show() + colourpallet84.Show() + colourpallet85.Show() + colourpallet86.Show() + colourpallet87.Show() + colourpallet88.Show() + colourpallet89.Show() + colourpallet90.Show() + colourpallet91.Show() + colourpallet92.Show() + colourpallet93.Show() + colourpallet94.Show() + colourpallet95.Show() + colourpallet96.Show() + colourpallet97.Show() + colourpallet98.Show() + colourpallet99.Show() + colourpallet100.Show() + colourpallet101.Show() + colourpallet102.Show() + colourpallet103.Show() + colourpallet104.Show() + colourpallet105.Show() + colourpallet106.Show() + colourpallet107.Show() + colourpallet108.Show() + colourpallet109.Show() + colourpallet110.Show() + colourpallet111.Show() + colourpallet112.Show() + colourpallet113.Show() + colourpallet114.Show() + colourpallet115.Show() + colourpallet116.Show() + colourpallet117.Show() + colourpallet118.Show() + colourpallet119.Show() + colourpallet120.Show() + colourpallet121.Show() + colourpallet122.Show() + colourpallet123.Show() + colourpallet124.Show() + colourpallet125.Show() + colourpallet126.Show() + colourpallet127.Show() + colourpallet128.Show() + End Select + End Sub + + Private Sub btnchangesizecancel_Click(sender As Object, e As EventArgs) Handles btnchangesizecancel.Click + pnlpalletsize.Hide() + End Sub + + Private Sub txtdrawstringtext_TextChanged(sender As Object, e As EventArgs) Handles txtdrawstringtext.TextChanged + setuppreview() + End Sub + + Private Sub titlebar_Paint(sender As Object, e As PaintEventArgs) Handles titlebar.Paint + + End Sub +End Class diff --git a/ShiftOS/Audio Player.Designer.vb b/ShiftOS/Audio Player.Designer.vb new file mode 100644 index 0000000..8a0e2a4 --- /dev/null +++ b/ShiftOS/Audio Player.Designer.vb @@ -0,0 +1,437 @@ + _ +Partial Class Audio_Player + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Audio_Player)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.lblintro = New System.Windows.Forms.Label() + Me.lbmusiclist = New System.Windows.Forms.ListBox() + Me.pnlcontrols = New System.Windows.Forms.Panel() + Me.picsongtrack = New System.Windows.Forms.PictureBox() + Me.btnplay = New System.Windows.Forms.Button() + Me.lbltotallength = New System.Windows.Forms.Label() + Me.btnload = New System.Windows.Forms.Button() + Me.lblcurrenttime = New System.Windows.Forms.Label() + Me.btnstop = New System.Windows.Forms.Button() + Me.btnprevious = New System.Windows.Forms.Button() + Me.btnnext = New System.Windows.Forms.Button() + Me.AxWindowsMediaPlayer1 = New AxWMPLib.AxWindowsMediaPlayer() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.tmrnextsonggap = New System.Windows.Forms.Timer(Me.components) + Me.tmrsongtrack = New System.Windows.Forms.Timer(Me.components) + Me.tmrnextcooldown = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + Me.pnlcontrols.SuspendLayout() + CType(Me.picsongtrack, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.AxWindowsMediaPlayer1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.lblintro) + Me.pgcontents.Controls.Add(Me.lbmusiclist) + Me.pgcontents.Controls.Add(Me.pnlcontrols) + Me.pgcontents.Controls.Add(Me.AxWindowsMediaPlayer1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(467, 234) + Me.pgcontents.TabIndex = 20 + ' + 'lblintro + ' + Me.lblintro.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblintro.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblintro.Location = New System.Drawing.Point(27, 25) + Me.lblintro.Name = "lblintro" + Me.lblintro.Size = New System.Drawing.Size(414, 160) + Me.lblintro.TabIndex = 11 + Me.lblintro.Text = "Your Playlist is Currently Empty" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Click the folder icon in the bottom right corne" & _ + "r to add some songs" + Me.lblintro.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbmusiclist + ' + Me.lbmusiclist.BackColor = System.Drawing.Color.White + Me.lbmusiclist.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lbmusiclist.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbmusiclist.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed + Me.lbmusiclist.FormattingEnabled = True + Me.lbmusiclist.Location = New System.Drawing.Point(0, 0) + Me.lbmusiclist.Name = "lbmusiclist" + Me.lbmusiclist.Size = New System.Drawing.Size(467, 208) + Me.lbmusiclist.TabIndex = 1 + ' + 'pnlcontrols + ' + Me.pnlcontrols.BackColor = System.Drawing.Color.White + Me.pnlcontrols.Controls.Add(Me.picsongtrack) + Me.pnlcontrols.Controls.Add(Me.btnplay) + Me.pnlcontrols.Controls.Add(Me.lbltotallength) + Me.pnlcontrols.Controls.Add(Me.btnload) + Me.pnlcontrols.Controls.Add(Me.lblcurrenttime) + Me.pnlcontrols.Controls.Add(Me.btnstop) + Me.pnlcontrols.Controls.Add(Me.btnprevious) + Me.pnlcontrols.Controls.Add(Me.btnnext) + Me.pnlcontrols.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlcontrols.Location = New System.Drawing.Point(0, 208) + Me.pnlcontrols.Name = "pnlcontrols" + Me.pnlcontrols.Size = New System.Drawing.Size(467, 26) + Me.pnlcontrols.TabIndex = 10 + ' + 'picsongtrack + ' + Me.picsongtrack.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.picsongtrack.Location = New System.Drawing.Point(113, 2) + Me.picsongtrack.Name = "picsongtrack" + Me.picsongtrack.Size = New System.Drawing.Size(304, 21) + Me.picsongtrack.TabIndex = 9 + Me.picsongtrack.TabStop = False + ' + 'btnplay + ' + Me.btnplay.BackgroundImage = Global.ShiftOS.My.Resources.Resources.playbutton + Me.btnplay.FlatAppearance.BorderSize = 0 + Me.btnplay.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnplay.Location = New System.Drawing.Point(26, 2) + Me.btnplay.Name = "btnplay" + Me.btnplay.Size = New System.Drawing.Size(22, 22) + Me.btnplay.TabIndex = 2 + Me.btnplay.UseVisualStyleBackColor = True + ' + 'lbltotallength + ' + Me.lbltotallength.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbltotallength.BackColor = System.Drawing.Color.Transparent + Me.lbltotallength.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltotallength.Location = New System.Drawing.Point(377, 1) + Me.lbltotallength.Name = "lbltotallength" + Me.lbltotallength.Size = New System.Drawing.Size(40, 24) + Me.lbltotallength.TabIndex = 8 + Me.lbltotallength.Text = "0:00" + Me.lbltotallength.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnload + ' + Me.btnload.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnload.BackgroundImage = Global.ShiftOS.My.Resources.Resources.loadbutton + Me.btnload.FlatAppearance.BorderSize = 0 + Me.btnload.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnload.Location = New System.Drawing.Point(443, 2) + Me.btnload.Name = "btnload" + Me.btnload.Size = New System.Drawing.Size(22, 22) + Me.btnload.TabIndex = 3 + Me.btnload.UseVisualStyleBackColor = True + ' + 'lblcurrenttime + ' + Me.lblcurrenttime.BackColor = System.Drawing.Color.Transparent + Me.lblcurrenttime.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblcurrenttime.Location = New System.Drawing.Point(74, 1) + Me.lblcurrenttime.Name = "lblcurrenttime" + Me.lblcurrenttime.Size = New System.Drawing.Size(40, 24) + Me.lblcurrenttime.TabIndex = 7 + Me.lblcurrenttime.Text = "0:00" + Me.lblcurrenttime.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnstop + ' + Me.btnstop.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnstop.BackgroundImage = Global.ShiftOS.My.Resources.Resources.stopbutton + Me.btnstop.FlatAppearance.BorderSize = 0 + Me.btnstop.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnstop.Location = New System.Drawing.Point(419, 2) + Me.btnstop.Name = "btnstop" + Me.btnstop.Size = New System.Drawing.Size(22, 22) + Me.btnstop.TabIndex = 4 + Me.btnstop.UseVisualStyleBackColor = True + ' + 'btnprevious + ' + Me.btnprevious.BackgroundImage = Global.ShiftOS.My.Resources.Resources.previousbutton + Me.btnprevious.FlatAppearance.BorderSize = 0 + Me.btnprevious.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnprevious.Location = New System.Drawing.Point(2, 2) + Me.btnprevious.Name = "btnprevious" + Me.btnprevious.Size = New System.Drawing.Size(22, 22) + Me.btnprevious.TabIndex = 6 + Me.btnprevious.UseVisualStyleBackColor = True + ' + 'btnnext + ' + Me.btnnext.BackgroundImage = Global.ShiftOS.My.Resources.Resources.nextbutton + Me.btnnext.FlatAppearance.BorderSize = 0 + Me.btnnext.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnnext.Location = New System.Drawing.Point(50, 2) + Me.btnnext.Name = "btnnext" + Me.btnnext.Size = New System.Drawing.Size(22, 22) + Me.btnnext.TabIndex = 5 + Me.btnnext.UseVisualStyleBackColor = True + ' + 'AxWindowsMediaPlayer1 + ' + Me.AxWindowsMediaPlayer1.Enabled = True + Me.AxWindowsMediaPlayer1.Location = New System.Drawing.Point(300, 55) + Me.AxWindowsMediaPlayer1.Name = "AxWindowsMediaPlayer1" + Me.AxWindowsMediaPlayer1.OcxState = CType(resources.GetObject("AxWindowsMediaPlayer1.OcxState"), System.Windows.Forms.AxHost.State) + Me.AxWindowsMediaPlayer1.Size = New System.Drawing.Size(31, 29) + Me.AxWindowsMediaPlayer1.TabIndex = 0 + Me.AxWindowsMediaPlayer1.Visible = False + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 264) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(467, 2) + Me.pgbottom.TabIndex = 23 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(471, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconAudioPlayer + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(102, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Audio Player" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(469, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 234) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(469, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 236) + Me.pgright.TabIndex = 22 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 236) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 234) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'tmrnextsonggap + ' + ' + 'tmrsongtrack + ' + Me.tmrsongtrack.Enabled = True + Me.tmrsongtrack.Interval = 200 + ' + 'tmrnextcooldown + ' + Me.tmrnextcooldown.Interval = 1000 + ' + 'Audio_Player + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(471, 266) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(151, 125) + Me.Name = "Audio_Player" + Me.Text = "Audio_Player" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnlcontrols.ResumeLayout(False) + CType(Me.picsongtrack, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.AxWindowsMediaPlayer1, System.ComponentModel.ISupportInitialize).EndInit() + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents btnplay As System.Windows.Forms.Button + Friend WithEvents lbmusiclist As System.Windows.Forms.ListBox + Friend WithEvents AxWindowsMediaPlayer1 As AxWMPLib.AxWindowsMediaPlayer + Friend WithEvents btnstop As System.Windows.Forms.Button + Friend WithEvents btnload As System.Windows.Forms.Button + Friend WithEvents tmrnextsonggap As System.Windows.Forms.Timer + Friend WithEvents btnnext As System.Windows.Forms.Button + Friend WithEvents btnprevious As System.Windows.Forms.Button + Friend WithEvents lbltotallength As System.Windows.Forms.Label + Friend WithEvents lblcurrenttime As System.Windows.Forms.Label + Friend WithEvents tmrsongtrack As System.Windows.Forms.Timer + Friend WithEvents picsongtrack As System.Windows.Forms.PictureBox + Friend WithEvents tmrnextcooldown As System.Windows.Forms.Timer + Friend WithEvents pnlcontrols As System.Windows.Forms.Panel + Friend WithEvents lblintro As System.Windows.Forms.Label +End Class diff --git a/ShiftOS/Audio Player.resx b/ShiftOS/Audio Player.resx new file mode 100644 index 0000000..a333ede --- /dev/null +++ b/ShiftOS/Audio Player.resx @@ -0,0 +1,149 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w + LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACFTeXN0 + ZW0uV2luZG93cy5Gb3Jtcy5BeEhvc3QrU3RhdGUBAAAABERhdGEHAgIAAAAJAwAAAA8DAAAAtwAAAAIB + AAAAAQAAAAAAAAAAAAAAAKIAAAAAAwAACAAAAAAABQAAAAAAAADwPwMAAAAAAAUAAAAAAAAAAAAIAAIA + AAAAAAMAAQAAAAsA//8DAAAAAAALAP//CAACAAAAAAADADIAAAALAAAACAAKAAAAZgB1AGwAbAAAAAsA + AAALAAAACwD//wsA//8LAAAACAACAAAAAAAIAAIAAAAAAAgAAgAAAAAACAACAAAAAAALAAAAzCEAAA4O + AAAL + + + + 141, 17 + + + 235, 17 + + + 348, 17 + + + 432, 17 + + + 17, 17 + + + 574, 17 + + \ No newline at end of file diff --git a/ShiftOS/Audio Player.vb b/ShiftOS/Audio Player.vb new file mode 100644 index 0000000..c208fdd --- /dev/null +++ b/ShiftOS/Audio Player.vb @@ -0,0 +1,579 @@ +Public Class Audio_Player + + Public clickedstop = False + Public cancelindex = False + Public trackbarcurrentwidth As Single + Public trackcurrent As Single + Public tracktotal As Single + Public cooldown As Boolean = False + +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 414 'replace with minimum size + Public minimumsizeheight As Integer = 160 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + If ShiftOSDesktop.AudioPlayerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + ShiftOSDesktop.pnlpanelbuttonaudioplayer.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonaudioplayer, ShiftOSDesktop.tbaudioplayericon, ShiftOSDesktop.tbaudioplayertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(414, 160) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.audioplayername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.audioplayericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub btnplay_Click(sender As Object, e As EventArgs) Handles btnplay.Click + If lbmusiclist.Items.Count > 0 Then + If lbmusiclist.SelectedItems.Count = 0 Then + lbmusiclist.SelectedIndex = 0 + End If + AxWindowsMediaPlayer1.URL = lbmusiclist.SelectedItem + End If + End Sub + + Private Sub btnload_Click(sender As Object, e As EventArgs) Handles btnload.Click + lblintro.Hide() + File_Opener.Show() + File_Opener.openingprogram = "audioplayer" + File_Opener.openextention = ".mp3" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Private Sub btnstop_Click(sender As Object, e As EventArgs) Handles btnstop.Click + If lbmusiclist.Items.Count > 0 Then + clickedstop = True + AxWindowsMediaPlayer1.Ctlcontrols.stop() + lblcurrenttime.Text = "00:00" + End If + End Sub + + Private Sub AxWindowsMediaPlayer1_PlayStateChange(sender As Object, e As AxWMPLib._WMPOCXEvents_PlayStateChangeEvent) Handles AxWindowsMediaPlayer1.PlayStateChange + If lbmusiclist.Items.Count > 0 Then + If lbmusiclist.SelectedIndex > -1 Then + If clickedstop = True Then + clickedstop = False + Else + If AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsStopped Then + If lbmusiclist.SelectedIndex = lbmusiclist.Items.Count - 1 Then + lbmusiclist.SelectedIndex = 0 + tmrnextsonggap.Start() + Else + If lbmusiclist.SelectedIndex < lbmusiclist.Items.Count - 1 Then + lbmusiclist.SelectedIndex = lbmusiclist.SelectedIndex + 1 + tmrnextsonggap.Start() + End If + End If + End If + End If + End If + End If + End Sub + + Private Sub tmrnextsonggap_Tick(sender As Object, e As EventArgs) Handles tmrnextsonggap.Tick + If lbmusiclist.Items.Count > 0 Then + AxWindowsMediaPlayer1.URL = lbmusiclist.SelectedItem + tmrnextsonggap.Stop() + End If + End Sub + + Private Sub btnnext_Click(sender As Object, e As EventArgs) Handles btnnext.Click + If lbmusiclist.Items.Count > 0 Then + If cooldown = False Then + AxWindowsMediaPlayer1.Ctlcontrols.stop() + cooldown = True + tmrnextcooldown.Start() + End If + End If + End Sub + + Private Sub btnprevious_Click(sender As Object, e As EventArgs) Handles btnprevious.Click + If lbmusiclist.Items.Count > 0 Then + If cooldown = False Then + cancelindex = True + If lbmusiclist.SelectedIndex = 0 Then Else lbmusiclist.SelectedIndex = lbmusiclist.SelectedIndex - 2 + AxWindowsMediaPlayer1.Ctlcontrols.stop() + cooldown = True + tmrnextcooldown.Start() + End If + End If + End Sub + + Private Sub lbmusiclist_DrawItem(sender As Object, e As DrawItemEventArgs) Handles lbmusiclist.DrawItem ' + If lbmusiclist.Items.Count > 0 Then + e.DrawBackground() + If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then + e.Graphics.FillRectangle(Brushes.Black, e.Bounds) + End If + + Using b As New SolidBrush(e.ForeColor) + e.Graphics.DrawString(lbmusiclist.GetItemText(lbmusiclist.Items(e.Index)), e.Font, b, e.Bounds) + End Using + e.DrawFocusRectangle() + End If + End Sub + + Private Sub lbmusiclist_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lbmusiclist.SelectedIndexChanged + If lbmusiclist.Items.Count > 0 Then + If cancelindex = True Then Else AxWindowsMediaPlayer1.URL = lbmusiclist.SelectedItem + cancelindex = False + lbmusiclist.Refresh() + End If + End Sub + + Private Sub tmrsongtrack_Tick(sender As Object, e As EventArgs) Handles tmrsongtrack.Tick + If lbmusiclist.Items.Count > 0 Then + If lbmusiclist.SelectedIndex < 0 Then lbmusiclist.SelectedIndex = 0 + picsongtrack.Refresh() + If AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsPlaying Then + If lbmusiclist.SelectedIndex < 0 Then lbmusiclist.SelectedIndex = 0 + lbltotallength.Text = AxWindowsMediaPlayer1.currentMedia.durationString + lblcurrenttime.Text = AxWindowsMediaPlayer1.Ctlcontrols.currentPositionString + Dim TrackBrush = New SolidBrush(Color.FromArgb(255, Color.Black)) + trackcurrent = Math.Round(AxWindowsMediaPlayer1.Ctlcontrols.currentPosition, 1) + tracktotal = Math.Round(AxWindowsMediaPlayer1.currentMedia.duration, 1) + If tracktotal = 0 Then Else trackbarcurrentwidth = (trackcurrent / tracktotal) * 100 + trackbarcurrentwidth = trackbarcurrentwidth * (picsongtrack.Width / 100) + picsongtrack.CreateGraphics.FillRectangle(TrackBrush, 0, 0, trackbarcurrentwidth, picsongtrack.Height) + TrackBrush.Dispose() + End If + End If + End Sub + + Private Sub nextcooldown_Tick(sender As Object, e As EventArgs) Handles tmrnextcooldown.Tick + If lbmusiclist.Items.Count > 0 Then + cooldown = False + tmrnextcooldown.Stop() + End If + End Sub + + Private Sub picsongtrack_MouseDown(sender As Object, e As MouseEventArgs) Handles picsongtrack.MouseDown + Dim xposition As Integer + xposition = e.X + AxWindowsMediaPlayer1.Ctlcontrols.currentPosition = (AxWindowsMediaPlayer1.currentMedia.duration / picsongtrack.Width) * xposition + tmrsongtrack.Interval = 20 + End Sub + + Private Sub picsongtrack_MouseMove(sender As Object, e As MouseEventArgs) Handles picsongtrack.MouseMove + If e.Button = Windows.Forms.MouseButtons.Left Then + Dim xposition As Integer + xposition = e.X + AxWindowsMediaPlayer1.Ctlcontrols.currentPosition = (AxWindowsMediaPlayer1.currentMedia.duration / picsongtrack.Width) * xposition + End If + End Sub + + Private Sub picsongtrack_MouseUp(sender As Object, e As MouseEventArgs) Handles picsongtrack.MouseUp + tmrsongtrack.Interval = 200 + End Sub + + Private Sub lblintro_Click(sender As Object, e As EventArgs) Handles lblintro.Click + + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Bitnote Digger.Designer.vb b/ShiftOS/Bitnote Digger.Designer.vb new file mode 100644 index 0000000..12412fb --- /dev/null +++ b/ShiftOS/Bitnote Digger.Designer.vb @@ -0,0 +1,480 @@ + _ +Partial Class Bitnote_Digger + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.Label10 = New System.Windows.Forms.Label() + Me.btnsend = New System.Windows.Forms.Button() + Me.txtsendaddress = New System.Windows.Forms.TextBox() + Me.Label7 = New System.Windows.Forms.Label() + Me.lbltotalbitcoinsmined = New System.Windows.Forms.Label() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.Label6 = New System.Windows.Forms.Label() + Me.Label8 = New System.Windows.Forms.Label() + Me.turbomodespeed = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.lbldiggerstatsspeed = New System.Windows.Forms.Label() + Me.lbldiggerstatsgrade = New System.Windows.Forms.Label() + Me.lbldiggerstatsname = New System.Windows.Forms.Label() + Me.btnturbomode = New System.Windows.Forms.Button() + Me.btnstop = New System.Windows.Forms.Button() + Me.btnstart = New System.Windows.Forms.Button() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.tmrcalcbitnotesmined = New System.Windows.Forms.Timer(Me.components) + Me.tmrturbomode = New System.Windows.Forms.Timer(Me.components) + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.Panel1.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 251) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(556, 2) + Me.pgbottom.TabIndex = 23 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 221) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(558, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 223) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(115, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Bitnote Digger" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(558, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 221) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.Label10) + Me.pgcontents.Controls.Add(Me.btnsend) + Me.pgcontents.Controls.Add(Me.txtsendaddress) + Me.pgcontents.Controls.Add(Me.Label7) + Me.pgcontents.Controls.Add(Me.lbltotalbitcoinsmined) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Controls.Add(Me.Label1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(556, 221) + Me.pgcontents.TabIndex = 20 + ' + 'Label10 + ' + Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label10.Location = New System.Drawing.Point(205, 182) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(261, 35) + Me.Label10.TabIndex = 6 + Me.Label10.Text = "Insert your Bitnote wallet address above then click send to transfer your earning" & _ + "s" + Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnsend + ' + Me.btnsend.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnsend.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsend.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsend.Location = New System.Drawing.Point(472, 181) + Me.btnsend.Name = "btnsend" + Me.btnsend.Size = New System.Drawing.Size(73, 36) + Me.btnsend.TabIndex = 5 + Me.btnsend.Text = "Send" + Me.btnsend.UseVisualStyleBackColor = True + ' + 'txtsendaddress + ' + Me.txtsendaddress.BackColor = System.Drawing.Color.White + Me.txtsendaddress.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtsendaddress.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtsendaddress.Location = New System.Drawing.Point(205, 155) + Me.txtsendaddress.Multiline = True + Me.txtsendaddress.Name = "txtsendaddress" + Me.txtsendaddress.Size = New System.Drawing.Size(340, 21) + Me.txtsendaddress.TabIndex = 4 + Me.txtsendaddress.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label7 + ' + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(203, 128) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(350, 27) + Me.Label7.TabIndex = 3 + Me.Label7.Text = "Send Bitnotes To:" + Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbltotalbitcoinsmined + ' + Me.lbltotalbitcoinsmined.Font = New System.Drawing.Font("Microsoft Sans Serif", 32.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltotalbitcoinsmined.Location = New System.Drawing.Point(206, 57) + Me.lbltotalbitcoinsmined.Name = "lbltotalbitcoinsmined" + Me.lbltotalbitcoinsmined.Size = New System.Drawing.Size(344, 51) + Me.lbltotalbitcoinsmined.TabIndex = 2 + Me.lbltotalbitcoinsmined.Text = "0.00000" + Me.lbltotalbitcoinsmined.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel1 + ' + Me.Panel1.Controls.Add(Me.Label6) + Me.Panel1.Controls.Add(Me.Label8) + Me.Panel1.Controls.Add(Me.turbomodespeed) + Me.Panel1.Controls.Add(Me.Label5) + Me.Panel1.Controls.Add(Me.lbldiggerstatsspeed) + Me.Panel1.Controls.Add(Me.lbldiggerstatsgrade) + Me.Panel1.Controls.Add(Me.lbldiggerstatsname) + Me.Panel1.Controls.Add(Me.btnturbomode) + Me.Panel1.Controls.Add(Me.btnstop) + Me.Panel1.Controls.Add(Me.btnstart) + Me.Panel1.Controls.Add(Me.PictureBox1) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Left + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(199, 221) + Me.Panel1.TabIndex = 1 + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(2, 88) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(157, 20) + Me.Label6.TabIndex = 13 + Me.Label6.Text = "Turbo Mode Stats:" + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(3, 126) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(162, 16) + Me.Label8.TabIndex = 11 + Me.Label8.Text = "Codepoint Cost: 1CP / 10s" + ' + 'turbomodespeed + ' + Me.turbomodespeed.AutoSize = True + Me.turbomodespeed.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.turbomodespeed.Location = New System.Drawing.Point(3, 109) + Me.turbomodespeed.Name = "turbomodespeed" + Me.turbomodespeed.Size = New System.Drawing.Size(183, 16) + Me.turbomodespeed.TabIndex = 10 + Me.turbomodespeed.Text = "Turbo Speed: 0.00002 BTN/S" + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(5, 5) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(115, 20) + Me.Label5.TabIndex = 9 + Me.Label5.Text = "Digger Stats:" + ' + 'lbldiggerstatsspeed + ' + Me.lbldiggerstatsspeed.AutoSize = True + Me.lbldiggerstatsspeed.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbldiggerstatsspeed.Location = New System.Drawing.Point(6, 60) + Me.lbldiggerstatsspeed.Name = "lbldiggerstatsspeed" + Me.lbldiggerstatsspeed.Size = New System.Drawing.Size(144, 16) + Me.lbldiggerstatsspeed.TabIndex = 8 + Me.lbldiggerstatsspeed.Text = "Speed: 0.00001 BTN/S" + ' + 'lbldiggerstatsgrade + ' + Me.lbldiggerstatsgrade.AutoSize = True + Me.lbldiggerstatsgrade.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbldiggerstatsgrade.Location = New System.Drawing.Point(6, 43) + Me.lbldiggerstatsgrade.Name = "lbldiggerstatsgrade" + Me.lbldiggerstatsgrade.Size = New System.Drawing.Size(103, 16) + Me.lbldiggerstatsgrade.TabIndex = 7 + Me.lbldiggerstatsgrade.Text = "Digger Grade: 1" + ' + 'lbldiggerstatsname + ' + Me.lbldiggerstatsname.AutoSize = True + Me.lbldiggerstatsname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbldiggerstatsname.Location = New System.Drawing.Point(6, 26) + Me.lbldiggerstatsname.Name = "lbldiggerstatsname" + Me.lbldiggerstatsname.Size = New System.Drawing.Size(157, 16) + Me.lbldiggerstatsname.TabIndex = 6 + Me.lbldiggerstatsname.Text = "Name: Surface Scratcher" + ' + 'btnturbomode + ' + Me.btnturbomode.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnturbomode.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnturbomode.Location = New System.Drawing.Point(6, 188) + Me.btnturbomode.Name = "btnturbomode" + Me.btnturbomode.Size = New System.Drawing.Size(186, 29) + Me.btnturbomode.TabIndex = 5 + Me.btnturbomode.Text = "Activate Turbo Mode" + Me.btnturbomode.UseVisualStyleBackColor = True + ' + 'btnstop + ' + Me.btnstop.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnstop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnstop.Location = New System.Drawing.Point(101, 156) + Me.btnstop.Name = "btnstop" + Me.btnstop.Size = New System.Drawing.Size(91, 29) + Me.btnstop.TabIndex = 4 + Me.btnstop.Text = "Stop" + Me.btnstop.UseVisualStyleBackColor = True + ' + 'btnstart + ' + Me.btnstart.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnstart.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnstart.Location = New System.Drawing.Point(6, 156) + Me.btnstart.Name = "btnstart" + Me.btnstart.Size = New System.Drawing.Size(91, 29) + Me.btnstart.TabIndex = 3 + Me.btnstart.Text = "Start" + Me.btnstart.UseVisualStyleBackColor = True + ' + 'PictureBox1 + ' + Me.PictureBox1.BackColor = System.Drawing.Color.Black + Me.PictureBox1.Dock = System.Windows.Forms.DockStyle.Right + Me.PictureBox1.Location = New System.Drawing.Point(198, 0) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(1, 221) + Me.PictureBox1.TabIndex = 2 + Me.PictureBox1.TabStop = False + ' + 'Label1 + ' + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 26.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(205, 16) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(345, 43) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Bitnotes Found" + Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 223) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(560, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'tmrcalcbitnotesmined + ' + Me.tmrcalcbitnotesmined.Interval = 1000 + ' + 'tmrturbomode + ' + Me.tmrturbomode.Interval = 10000 + ' + 'Bitnote_Digger + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(560, 253) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Bitnote_Digger" + Me.Text = "Bitnote_Digger" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.Panel1.ResumeLayout(False) + Me.Panel1.PerformLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents lbltotalbitcoinsmined As System.Windows.Forms.Label + Friend WithEvents btnturbomode As System.Windows.Forms.Button + Friend WithEvents btnstop As System.Windows.Forms.Button + Friend WithEvents btnstart As System.Windows.Forms.Button + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents turbomodespeed As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents lbldiggerstatsspeed As System.Windows.Forms.Label + Friend WithEvents lbldiggerstatsgrade As System.Windows.Forms.Label + Friend WithEvents lbldiggerstatsname As System.Windows.Forms.Label + Friend WithEvents Label10 As System.Windows.Forms.Label + Friend WithEvents btnsend As System.Windows.Forms.Button + Friend WithEvents txtsendaddress As System.Windows.Forms.TextBox + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents tmrcalcbitnotesmined As System.Windows.Forms.Timer + Friend WithEvents tmrturbomode As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/Bitnote Digger.resx b/ShiftOS/Bitnote Digger.resx new file mode 100644 index 0000000..7beae4d --- /dev/null +++ b/ShiftOS/Bitnote Digger.resx @@ -0,0 +1,126 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + 187, 17 + + \ No newline at end of file diff --git a/ShiftOS/Bitnote Digger.vb b/ShiftOS/Bitnote Digger.vb new file mode 100644 index 0000000..88b5833 --- /dev/null +++ b/ShiftOS/Bitnote Digger.vb @@ -0,0 +1,493 @@ +Public Class Bitnote_Digger +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 560 'replace with minimum size + Public minimumsizeheight As Integer = 253 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + updatestats() + + If ShiftOSDesktop.BitNoteDiggerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonbitnotedigger.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonbitnotedigger, ShiftOSDesktop.tbbitnotediggericon, ShiftOSDesktop.tbbitnotediggertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(560, 253) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.bitnotediggername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.bitnotediggericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + Public bitnotesmined As Decimal = 0 + Public miningspeed As Decimal = 0.00001 + + Public Sub updatestats() + lbldiggerstatsgrade.Text = "Digger Grade: " & ShiftOSDesktop.bitnotediggergrade + Select Case ShiftOSDesktop.bitnotediggergrade + Case 1 + lbldiggerstatsname.Text = "Surface Scratcher" + lbldiggerstatsspeed.Text = "Speed: 0.00001" + miningspeed = 0.00001 + Case 2 + lbldiggerstatsname.Text = "Name: Sediment Mover" + lbldiggerstatsspeed.Text = "Speed: 0.00002" + miningspeed = 0.00002 + Case 3 + lbldiggerstatsname.Text = "Name: Rock Crusher" + lbldiggerstatsspeed.Text = "0.00004" + miningspeed = 0.00004 + Case 4 + lbldiggerstatsname.Text = "Name: Massive Drill" + lbldiggerstatsspeed.Text = "Speed: 0.00008" + miningspeed = 0.00008 + Case 5 + lbldiggerstatsname.Text = "Name: Kola" + lbldiggerstatsspeed.Text = "Speed: 0.00016" + miningspeed = 0.00016 + End Select + turbomodespeed.Text = (miningspeed * 2) + End Sub + + Public Sub updategrade(ByVal grade As Integer, ByVal price As Decimal, ByVal name As String) + If ShiftOSDesktop.boughtbitnotedigger = True Then + If ShiftOSDesktop.bitnotebalance >= price Then + If ShiftOSDesktop.bitnotediggergrade < grade Then + ShiftOSDesktop.bitnotediggergrade = grade + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance - price + infobox.title = "Upgraded to " & name + infobox.textinfo = "Your digger has be successfully upgraded to grade " & grade & ". The '" & name & "'" + infobox.Show() + Else + infobox.title = "Aready Upgrade" + infobox.textinfo = "The Bitnote Digger is already upgrade to grade " & ShiftOSDesktop.bitnotediggergrade & ". There is no point in downgrading grade " & grade + infobox.Show() + End If + Else + infobox.title = "Insufficient Funds" + infobox.textinfo = "You do not have enough Bitnotes to complete this purchase" + infobox.Show() + End If + Else + Shiftnet.bitnotebuy("wallet", 0, True) + If ShiftOSDesktop.bitnotebalance >= price Then + If ShiftOSDesktop.bitnotediggergrade < grade Then + ShiftOSDesktop.bitnotediggergrade = grade + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance - price + infobox.title = "Upgraded to " & name + infobox.textinfo = "Your digger has be successfully upgraded to grade " & grade & ", '" & name & "'" + infobox.Show() + Else + infobox.title = "Aready Upgrade" + infobox.textinfo = "The Bitnote Digger is already upgradde to grade " & ShiftOSDesktop.bitnotediggergrade & ". There is no point in downgrading to grade " & grade + infobox.Show() + End If + Else + infobox.title = "Insufficient Funds" + infobox.textinfo = "You do not have enough Bitnotes to complete this purchase" + infobox.Show() + End If + End If + End Sub + + Private Sub tmrcalcbitnotesmined_Tick(sender As Object, e As EventArgs) Handles tmrcalcbitnotesmined.Tick + bitnotesmined = bitnotesmined + miningspeed + lbltotalbitcoinsmined.Text = FormatNumber(Math.Round(bitnotesmined, 5), 5) + End Sub + + Private Sub btnstart_Click(sender As Object, e As EventArgs) Handles btnstart.Click + tmrcalcbitnotesmined.Start() + lbtitletext.Text = ShiftOSDesktop.bitnotediggername & " - Activated" + End Sub + + Private Sub btnstop_Click(sender As Object, e As EventArgs) Handles btnstop.Click + tmrcalcbitnotesmined.Stop() + lbtitletext.Text = ShiftOSDesktop.bitnotediggername & " - Deactivated" + End Sub + + Private Sub btnsend_Click(sender As Object, e As EventArgs) Handles btnsend.Click + If txtsendaddress.Text = ShiftOSDesktop.bitnoteaddress Then + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance + bitnotesmined + Bitnote_Wallet.logtransaction(bitnotesmined, "Credit From", "Bitnote Digger - Surface Scratcher") + End If + bitnotesmined = 0 + lbltotalbitcoinsmined.Text = FormatNumber(Math.Round(bitnotesmined, 5), 5) + If Bitnote_Wallet.Visible Then Bitnote_Wallet.setupbitnotestats() + End Sub + + Private Sub btnturbomode_Click(sender As Object, e As EventArgs) Handles btnturbomode.Click + If tmrturbomode.Enabled = False Then + miningspeed = (miningspeed * 2) + tmrturbomode.Start() + btnturbomode.Text = "Disable Turbo Mode" + Else + miningspeed = (miningspeed / 2) + tmrturbomode.Stop() + btnturbomode.Text = "Activate Turbo Mode" + End If + End Sub + + Private Sub tmrturbomode_Tick(sender As Object, e As EventArgs) Handles tmrturbomode.Tick + If ShiftOSDesktop.codepoints >= 1 Then + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints - 1 + Else + miningspeed = (miningspeed / 2) + tmrturbomode.Stop() + btnturbomode.Text = "Activate Turbo Mode" + infobox.title = "Turbo Mode disabled" + infobox.textinfo = "Turbo Mode has been disabled due to your lack of Code Points." + infobox.Show() + End If + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Bitnote Wallet.Designer.vb b/ShiftOS/Bitnote Wallet.Designer.vb new file mode 100644 index 0000000..5a4446b --- /dev/null +++ b/ShiftOS/Bitnote Wallet.Designer.vb @@ -0,0 +1,570 @@ + _ +Partial Class Bitnote_Wallet + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnltransactions = New System.Windows.Forms.Panel() + Me.txthistory = New System.Windows.Forms.RichTextBox() + Me.pnltotalbalance = New System.Windows.Forms.Panel() + Me.lblbalancerounded = New System.Windows.Forms.Label() + Me.lblprecisebalance = New System.Windows.Forms.Label() + Me.pnlsend = New System.Windows.Forms.Panel() + Me.Label8 = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.txtamounttopay = New System.Windows.Forms.TextBox() + Me.btnsendmoney = New System.Windows.Forms.Button() + Me.lblpostpayment = New System.Windows.Forms.Label() + Me.lbltotalbalancesendscreen = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.txtsendtoaddress = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.pnlreceive = New System.Windows.Forms.Panel() + Me.btncopyaddress = New System.Windows.Forms.Button() + Me.lblmybitnoteaddress = New System.Windows.Forms.Label() + Me.Label9 = New System.Windows.Forms.Label() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.pnlmenuholder = New System.Windows.Forms.FlowLayoutPanel() + Me.btntotalbalance = New System.Windows.Forms.Button() + Me.btnsend = New System.Windows.Forms.Button() + Me.btnreceive = New System.Windows.Forms.Button() + Me.btntransactions = New System.Windows.Forms.Button() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnltransactions.SuspendLayout() + Me.pnltotalbalance.SuspendLayout() + Me.pnlsend.SuspendLayout() + Me.pnlreceive.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlmenuholder.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 202) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(421, 2) + Me.pgbottom.TabIndex = 23 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 172) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(423, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 174) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(147, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Bitnote Wallet" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(423, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 172) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.pnltotalbalance) + Me.pgcontents.Controls.Add(Me.PictureBox1) + Me.pgcontents.Controls.Add(Me.pnltransactions) + Me.pgcontents.Controls.Add(Me.pnlsend) + Me.pgcontents.Controls.Add(Me.pnlreceive) + Me.pgcontents.Controls.Add(Me.pnlmenuholder) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(421, 172) + Me.pgcontents.TabIndex = 20 + ' + 'pnltransactions + ' + Me.pnltransactions.Controls.Add(Me.txthistory) + Me.pnltransactions.Location = New System.Drawing.Point(297, 52) + Me.pnltransactions.Name = "pnltransactions" + Me.pnltransactions.Size = New System.Drawing.Size(63, 110) + Me.pnltransactions.TabIndex = 7 + ' + 'txthistory + ' + Me.txthistory.BackColor = System.Drawing.Color.White + Me.txthistory.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txthistory.Dock = System.Windows.Forms.DockStyle.Fill + Me.txthistory.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txthistory.Location = New System.Drawing.Point(0, 0) + Me.txthistory.Name = "txthistory" + Me.txthistory.ReadOnly = True + Me.txthistory.Size = New System.Drawing.Size(63, 110) + Me.txthistory.TabIndex = 0 + Me.txthistory.Text = "" + ' + 'pnltotalbalance + ' + Me.pnltotalbalance.Controls.Add(Me.lblbalancerounded) + Me.pnltotalbalance.Controls.Add(Me.lblprecisebalance) + Me.pnltotalbalance.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnltotalbalance.Location = New System.Drawing.Point(0, 34) + Me.pnltotalbalance.Name = "pnltotalbalance" + Me.pnltotalbalance.Size = New System.Drawing.Size(421, 138) + Me.pnltotalbalance.TabIndex = 5 + ' + 'lblbalancerounded + ' + Me.lblbalancerounded.Font = New System.Drawing.Font("Microsoft Sans Serif", 27.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbalancerounded.Location = New System.Drawing.Point(6, 30) + Me.lblbalancerounded.Name = "lblbalancerounded" + Me.lblbalancerounded.Size = New System.Drawing.Size(409, 48) + Me.lblbalancerounded.TabIndex = 3 + Me.lblbalancerounded.Text = "Balance: 1.54 BTN" + Me.lblbalancerounded.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblprecisebalance + ' + Me.lblprecisebalance.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblprecisebalance.Location = New System.Drawing.Point(6, 74) + Me.lblprecisebalance.Name = "lblprecisebalance" + Me.lblprecisebalance.Size = New System.Drawing.Size(409, 29) + Me.lblprecisebalance.TabIndex = 4 + Me.lblprecisebalance.Text = "(Precise Balance: 1.54663 BTN)" + Me.lblprecisebalance.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlsend + ' + Me.pnlsend.Controls.Add(Me.Label8) + Me.pnlsend.Controls.Add(Me.Label7) + Me.pnlsend.Controls.Add(Me.txtamounttopay) + Me.pnlsend.Controls.Add(Me.btnsendmoney) + Me.pnlsend.Controls.Add(Me.lblpostpayment) + Me.pnlsend.Controls.Add(Me.lbltotalbalancesendscreen) + Me.pnlsend.Controls.Add(Me.Label4) + Me.pnlsend.Controls.Add(Me.txtsendtoaddress) + Me.pnlsend.Controls.Add(Me.Label3) + Me.pnlsend.Location = New System.Drawing.Point(99, 52) + Me.pnlsend.Name = "pnlsend" + Me.pnlsend.Size = New System.Drawing.Size(72, 110) + Me.pnlsend.TabIndex = 6 + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(222, 91) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(112, 16) + Me.Label8.TabIndex = 8 + Me.Label8.Text = "Payment Amount:" + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(297, 115) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(36, 16) + Me.Label7.TabIndex = 7 + Me.Label7.Text = "BTN" + ' + 'txtamounttopay + ' + Me.txtamounttopay.BackColor = System.Drawing.Color.White + Me.txtamounttopay.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtamounttopay.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtamounttopay.Location = New System.Drawing.Point(224, 113) + Me.txtamounttopay.Multiline = True + Me.txtamounttopay.Name = "txtamounttopay" + Me.txtamounttopay.Size = New System.Drawing.Size(70, 21) + Me.txtamounttopay.TabIndex = 6 + Me.txtamounttopay.Text = "0.00007" + Me.txtamounttopay.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'btnsendmoney + ' + Me.btnsendmoney.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsendmoney.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsendmoney.Location = New System.Drawing.Point(340, 91) + Me.btnsendmoney.Name = "btnsendmoney" + Me.btnsendmoney.Size = New System.Drawing.Size(75, 43) + Me.btnsendmoney.TabIndex = 5 + Me.btnsendmoney.Text = "Send" + Me.btnsendmoney.UseVisualStyleBackColor = True + ' + 'lblpostpayment + ' + Me.lblpostpayment.AutoSize = True + Me.lblpostpayment.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblpostpayment.Location = New System.Drawing.Point(5, 115) + Me.lblpostpayment.Name = "lblpostpayment" + Me.lblpostpayment.Size = New System.Drawing.Size(195, 16) + Me.lblpostpayment.TabIndex = 4 + Me.lblpostpayment.Text = "Post Payment Balance: 0.00053" + ' + 'lbltotalbalancesendscreen + ' + Me.lbltotalbalancesendscreen.AutoSize = True + Me.lbltotalbalancesendscreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltotalbalancesendscreen.Location = New System.Drawing.Point(4, 93) + Me.lbltotalbalancesendscreen.Name = "lbltotalbalancesendscreen" + Me.lbltotalbalancesendscreen.Size = New System.Drawing.Size(188, 16) + Me.lbltotalbalancesendscreen.TabIndex = 3 + Me.lbltotalbalancesendscreen.Text = "Current Total Balance: 0.00060" + ' + 'Label4 + ' + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(4, 6) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(415, 49) + Me.Label4.TabIndex = 2 + Me.Label4.Text = "In order to spend your bitnotes you must find a service that allows you to pay wi" & _ + "th bitnotes. They will provide you with a Bitnote Address which you must copy ex" & _ + "actly into the pay to box below." + Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'txtsendtoaddress + ' + Me.txtsendtoaddress.BackColor = System.Drawing.Color.White + Me.txtsendtoaddress.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtsendtoaddress.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtsendtoaddress.Location = New System.Drawing.Point(60, 63) + Me.txtsendtoaddress.Multiline = True + Me.txtsendtoaddress.Name = "txtsendtoaddress" + Me.txtsendtoaddress.Size = New System.Drawing.Size(355, 22) + Me.txtsendtoaddress.TabIndex = 1 + Me.txtsendtoaddress.Text = "1FfmbHfnpaZjKFvyi1okTjJJusN455paPH" + Me.txtsendtoaddress.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(5, 66) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(58, 16) + Me.Label3.TabIndex = 0 + Me.Label3.Text = "Pay To: " + ' + 'pnlreceive + ' + Me.pnlreceive.Controls.Add(Me.btncopyaddress) + Me.pnlreceive.Controls.Add(Me.lblmybitnoteaddress) + Me.pnlreceive.Controls.Add(Me.Label9) + Me.pnlreceive.Location = New System.Drawing.Point(194, 52) + Me.pnlreceive.Name = "pnlreceive" + Me.pnlreceive.Size = New System.Drawing.Size(72, 110) + Me.pnlreceive.TabIndex = 7 + ' + 'btncopyaddress + ' + Me.btncopyaddress.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btncopyaddress.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncopyaddress.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btncopyaddress.Location = New System.Drawing.Point(157, 98) + Me.btncopyaddress.Name = "btncopyaddress" + Me.btncopyaddress.Size = New System.Drawing.Size(98, 34) + Me.btncopyaddress.TabIndex = 2 + Me.btncopyaddress.Text = "Copy" + Me.btncopyaddress.UseVisualStyleBackColor = True + ' + 'lblmybitnoteaddress + ' + Me.lblmybitnoteaddress.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblmybitnoteaddress.Location = New System.Drawing.Point(1, 59) + Me.lblmybitnoteaddress.Name = "lblmybitnoteaddress" + Me.lblmybitnoteaddress.Size = New System.Drawing.Size(419, 36) + Me.lblmybitnoteaddress.TabIndex = 1 + Me.lblmybitnoteaddress.Text = "1LgZUWQNYWZ7Qhc1hScZieC3GWnPLzaqSd" + Me.lblmybitnoteaddress.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label9 + ' + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(3, 7) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(415, 51) + Me.Label9.TabIndex = 0 + Me.Label9.Text = "This is your bitnote address for receiving payments. When withdrawing bitnotes fr" & _ + "om online accounts or a bit digger be sure to give them them this address so you" & _ + " can receive your money." + Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'PictureBox1 + ' + Me.PictureBox1.BackColor = System.Drawing.Color.Black + Me.PictureBox1.Dock = System.Windows.Forms.DockStyle.Top + Me.PictureBox1.Location = New System.Drawing.Point(0, 33) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(421, 1) + Me.PictureBox1.TabIndex = 2 + Me.PictureBox1.TabStop = False + ' + 'pnlmenuholder + ' + Me.pnlmenuholder.Controls.Add(Me.btntotalbalance) + Me.pnlmenuholder.Controls.Add(Me.btnsend) + Me.pnlmenuholder.Controls.Add(Me.btnreceive) + Me.pnlmenuholder.Controls.Add(Me.btntransactions) + Me.pnlmenuholder.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlmenuholder.Location = New System.Drawing.Point(0, 0) + Me.pnlmenuholder.Name = "pnlmenuholder" + Me.pnlmenuholder.Size = New System.Drawing.Size(421, 33) + Me.pnlmenuholder.TabIndex = 1 + ' + 'btntotalbalance + ' + Me.btntotalbalance.BackgroundImage = Global.ShiftOS.My.Resources.Resources.TotalBalanceClicked + Me.btntotalbalance.FlatAppearance.BorderSize = 0 + Me.btntotalbalance.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btntotalbalance.Location = New System.Drawing.Point(3, 3) + Me.btntotalbalance.Margin = New System.Windows.Forms.Padding(3, 3, 0, 3) + Me.btntotalbalance.Name = "btntotalbalance" + Me.btntotalbalance.Size = New System.Drawing.Size(103, 27) + Me.btntotalbalance.TabIndex = 0 + Me.btntotalbalance.UseVisualStyleBackColor = True + ' + 'btnsend + ' + Me.btnsend.BackgroundImage = Global.ShiftOS.My.Resources.Resources.SendUnclicked + Me.btnsend.FlatAppearance.BorderSize = 0 + Me.btnsend.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsend.Location = New System.Drawing.Point(109, 3) + Me.btnsend.Margin = New System.Windows.Forms.Padding(3, 3, 0, 3) + Me.btnsend.Name = "btnsend" + Me.btnsend.Size = New System.Drawing.Size(101, 27) + Me.btnsend.TabIndex = 1 + Me.btnsend.UseVisualStyleBackColor = True + ' + 'btnreceive + ' + Me.btnreceive.BackgroundImage = Global.ShiftOS.My.Resources.Resources.ReceiveUnclicked + Me.btnreceive.FlatAppearance.BorderSize = 0 + Me.btnreceive.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnreceive.Location = New System.Drawing.Point(213, 3) + Me.btnreceive.Margin = New System.Windows.Forms.Padding(3, 3, 0, 3) + Me.btnreceive.Name = "btnreceive" + Me.btnreceive.Size = New System.Drawing.Size(101, 27) + Me.btnreceive.TabIndex = 2 + Me.btnreceive.UseVisualStyleBackColor = True + ' + 'btntransactions + ' + Me.btntransactions.BackgroundImage = Global.ShiftOS.My.Resources.Resources.transactionsUnclicked + Me.btntransactions.FlatAppearance.BorderSize = 0 + Me.btntransactions.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btntransactions.Location = New System.Drawing.Point(317, 3) + Me.btntransactions.Margin = New System.Windows.Forms.Padding(3, 3, 0, 3) + Me.btntransactions.Name = "btntransactions" + Me.btntransactions.Size = New System.Drawing.Size(101, 27) + Me.btntransactions.TabIndex = 3 + Me.btntransactions.UseVisualStyleBackColor = True + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 174) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(425, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'Bitnote_Wallet + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(425, 204) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Bitnote_Wallet" + Me.Text = "Bitnote_Wallet" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pnltransactions.ResumeLayout(False) + Me.pnltotalbalance.ResumeLayout(False) + Me.pnlsend.ResumeLayout(False) + Me.pnlsend.PerformLayout() + Me.pnlreceive.ResumeLayout(False) + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlmenuholder.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pnlmenuholder As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents btntotalbalance As System.Windows.Forms.Button + Friend WithEvents btnsend As System.Windows.Forms.Button + Friend WithEvents btnreceive As System.Windows.Forms.Button + Friend WithEvents btntransactions As System.Windows.Forms.Button + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents lblprecisebalance As System.Windows.Forms.Label + Friend WithEvents lblbalancerounded As System.Windows.Forms.Label + Friend WithEvents pnltotalbalance As System.Windows.Forms.Panel + Friend WithEvents pnltransactions As System.Windows.Forms.Panel + Friend WithEvents pnlreceive As System.Windows.Forms.Panel + Friend WithEvents pnlsend As System.Windows.Forms.Panel + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents txtamounttopay As System.Windows.Forms.TextBox + Friend WithEvents btnsendmoney As System.Windows.Forms.Button + Friend WithEvents lblpostpayment As System.Windows.Forms.Label + Friend WithEvents lbltotalbalancesendscreen As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents txtsendtoaddress As System.Windows.Forms.TextBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents btncopyaddress As System.Windows.Forms.Button + Friend WithEvents lblmybitnoteaddress As System.Windows.Forms.Label + Friend WithEvents Label9 As System.Windows.Forms.Label + Friend WithEvents txthistory As System.Windows.Forms.RichTextBox +End Class diff --git a/ShiftOS/Bitnote Wallet.resx b/ShiftOS/Bitnote Wallet.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/Bitnote Wallet.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/ShiftOS/Bitnote Wallet.vb b/ShiftOS/Bitnote Wallet.vb new file mode 100644 index 0000000..7b17add --- /dev/null +++ b/ShiftOS/Bitnote Wallet.vb @@ -0,0 +1,478 @@ +Public Class Bitnote_Wallet +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 425 'replace with minimum size + Public minimumsizeheight As Integer = 204 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + setupbitnotestats() + + If ShiftOSDesktop.BitNoteWalletCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonbitnotewallet.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonbitnotewallet, ShiftOSDesktop.tbbitnotewalleticon, ShiftOSDesktop.tbbitnotewallettext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(425, 204) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + Me.Size = New Size((Me.Width - (2 * oldbordersize)) + (2 * Skins.borderwidth), ((Me.Height - oldbordersize - oldtitlebarheight) + Skins.borderwidth + Skins.titlebarheight) - (titlebar.Height / 2)) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.bitnotewalletname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.bitnotewalleticontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Public Sub setupbitnotestats() + lblbalancerounded.Text = "Balance: " & Math.Truncate(ShiftOSDesktop.bitnotebalance * 100) / 100 & " BTN" + lblprecisebalance.Text = "(Precise Balance: " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalance, 5), 5) & " BTN)" + lbltotalbalancesendscreen.Text = "Current Total Balance: " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalance, 5), 5) + lblpostpayment.Text = "Post Payment Balance: " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalance - txtamounttopay.Text, 5), 5) + lblmybitnoteaddress.Text = ShiftOSDesktop.bitnoteaddress + + 'shiftnet + If Shiftnet.Visible = True Then + Shiftnet.setupappscapeaccountinfo() + End If + End Sub + + Private Sub hideallpanels() + pnltotalbalance.Hide() + pnlsend.Hide() + pnlreceive.Hide() + pnltransactions.Hide() + btntotalbalance.BackgroundImage = My.Resources.TotalBalanceUnclicked + btnsend.BackgroundImage = My.Resources.SendUnclicked + btnreceive.BackgroundImage = My.Resources.ReceiveUnclicked + btntransactions.BackgroundImage = My.Resources.transactionsUnclicked + End Sub + + Private Sub setupdisplay(ByVal display As Panel) + hideallpanels() + display.BringToFront() + display.Dock = DockStyle.Fill + display.Show() + End Sub + + Private Sub btntotalbalance_Click(sender As Object, e As EventArgs) Handles btntotalbalance.Click + setupdisplay(pnltotalbalance) + btntotalbalance.BackgroundImage = My.Resources.TotalBalanceClicked + End Sub + + Private Sub btnsend_Click(sender As Object, e As EventArgs) Handles btnsend.Click + setupdisplay(pnlsend) + btnsend.BackgroundImage = My.Resources.SendClicked + End Sub + + Private Sub btnreceive_Click(sender As Object, e As EventArgs) Handles btnreceive.Click + setupdisplay(pnlreceive) + btnreceive.BackgroundImage = My.Resources.ReceiveClicked + End Sub + + Private Sub btntransactions_Click(sender As Object, e As EventArgs) Handles btntransactions.Click + setupdisplay(pnltransactions) + btntransactions.BackgroundImage = My.Resources.transactionsClicked + End Sub + + Private Sub txtamounttopay_TextChanged(sender As Object, e As EventArgs) Handles txtamounttopay.TextChanged + Try + If ShiftOSDesktop.bitnotebalance > txtamounttopay.Text - 0.00001 Then + setupbitnotestats() + End If + Catch ex As Exception + + End Try + + End Sub + + Private Sub btnsendmoney_Click(sender As Object, e As EventArgs) Handles btnsendmoney.Click + Try + If txtamounttopay.Text - 0.00001 < ShiftOSDesktop.bitnotebalance Then + Select Case txtsendtoaddress.Text + Case ShiftOSDesktop.bitnoteaddress + logtransaction(txtamounttopay.Text, "Debit To", txtsendtoaddress.Text) + logtransaction(txtamounttopay.Text, "Credit From", txtsendtoaddress.Text) + Case ShiftOSDesktop.bitnoteaddressappscape + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance - txtamounttopay.Text + ShiftOSDesktop.bitnotebalanceappscape = ShiftOSDesktop.bitnotebalanceappscape + txtamounttopay.Text + logtransaction(txtamounttopay.Text, "Debit To", txtsendtoaddress.Text) + Case Shiftnet.minimatchbitnoteaddress 'pay minimatch + ShiftOSDesktop.bitnotebalanceminimatch = ShiftOSDesktop.bitnotebalanceminimatch + txtamounttopay.Text + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance - txtamounttopay.Text + logtransaction(txtamounttopay.Text, "Debit To", txtsendtoaddress.Text) + Case ShiftOSDesktop.bitnoteaddressappscape 'deposit to appscape + ShiftOSDesktop.bitnoteaddressappscape = ShiftOSDesktop.bitnoteaddressappscape + txtamounttopay.Text + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance - txtamounttopay.Text + logtransaction(txtamounttopay.Text, "Debit To", txtsendtoaddress.Text) + Case ShiftOSDesktop.bitnoteaddressshiftomizer + If Shiftnet.shiftomizeractivepayment = True Then Shiftnet.completeshiftomizerpayment(txtamounttopay.Text) + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance - txtamounttopay.Text + logtransaction(txtamounttopay.Text, "Debit To", txtsendtoaddress.Text) + Case Else + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance - txtamounttopay.Text + logtransaction(txtamounttopay.Text, "Debit To", txtsendtoaddress.Text) + End Select + Else + infobox.title = "Bitnote - Payment Error!" + infobox.textinfo = "You have specified an invalid bitnote value or you lack sufficient funds." & Environment.NewLine & Environment.NewLine & "Your request to send money was unsuccessful" + infobox.Show() + End If + setupbitnotestats() + Catch ex As Exception + infobox.title = "Bitnote - Payment Error!" + infobox.textinfo = "You have specified an invalid bitnote value or you lack sufficient funds." & Environment.NewLine & Environment.NewLine & "Your request to send money was unsuccessful" + infobox.Show() + End Try + End Sub + + Private Sub btncopyaddress_Click(sender As Object, e As EventArgs) Handles btncopyaddress.Click + My.Computer.Clipboard.Clear() + My.Computer.Clipboard.SetText(ShiftOSDesktop.bitnoteaddress) + End Sub + + Public Sub logtransaction(ByVal value As Decimal, ByVal type As String, ByVal address As String) + If type = "Debit To" Then txthistory.SelectionColor = Color.Gray Else txthistory.SelectionColor = Color.Black + txthistory.AppendText("[" & My.Computer.Clock.LocalTime & "] " & value & " BTN " & type & ":" & Environment.NewLine & address & Environment.NewLine & Environment.NewLine) + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Calculator.Designer.vb b/ShiftOS/Calculator.Designer.vb new file mode 100644 index 0000000..3661f0e --- /dev/null +++ b/ShiftOS/Calculator.Designer.vb @@ -0,0 +1,514 @@ + _ +Partial Class Calculator + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.btnclearall = New System.Windows.Forms.Button() + Me.btn5 = New System.Windows.Forms.Button() + Me.btndividedby = New System.Windows.Forms.Button() + Me.lbldispla = New System.Windows.Forms.TextBox() + Me.btntimes = New System.Windows.Forms.Button() + Me.btn1 = New System.Windows.Forms.Button() + Me.btnminus = New System.Windows.Forms.Button() + Me.btn2 = New System.Windows.Forms.Button() + Me.btnplus = New System.Windows.Forms.Button() + Me.btn3 = New System.Windows.Forms.Button() + Me.btnequals = New System.Windows.Forms.Button() + Me.btn4 = New System.Windows.Forms.Button() + Me.btn0 = New System.Windows.Forms.Button() + Me.btn6 = New System.Windows.Forms.Button() + Me.btn9 = New System.Windows.Forms.Button() + Me.btn7 = New System.Windows.Forms.Button() + Me.btn8 = New System.Windows.Forms.Button() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 276) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(257, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(166, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(194, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 246) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(259, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 248) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(222, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(122, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Calculator" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(259, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 246) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.btnclearall) + Me.pgcontents.Controls.Add(Me.btn5) + Me.pgcontents.Controls.Add(Me.btndividedby) + Me.pgcontents.Controls.Add(Me.lbldispla) + Me.pgcontents.Controls.Add(Me.btntimes) + Me.pgcontents.Controls.Add(Me.btn1) + Me.pgcontents.Controls.Add(Me.btnminus) + Me.pgcontents.Controls.Add(Me.btn2) + Me.pgcontents.Controls.Add(Me.btnplus) + Me.pgcontents.Controls.Add(Me.btn3) + Me.pgcontents.Controls.Add(Me.btnequals) + Me.pgcontents.Controls.Add(Me.btn4) + Me.pgcontents.Controls.Add(Me.btn0) + Me.pgcontents.Controls.Add(Me.btn6) + Me.pgcontents.Controls.Add(Me.btn9) + Me.pgcontents.Controls.Add(Me.btn7) + Me.pgcontents.Controls.Add(Me.btn8) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(257, 246) + Me.pgcontents.TabIndex = 20 + ' + 'btnclearall + ' + Me.btnclearall.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btnclearall.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnclearall.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnclearall.Location = New System.Drawing.Point(72, 196) + Me.btnclearall.Name = "btnclearall" + Me.btnclearall.Size = New System.Drawing.Size(55, 41) + Me.btnclearall.TabIndex = 41 + Me.btnclearall.TabStop = False + Me.btnclearall.Text = "C" + Me.btnclearall.UseVisualStyleBackColor = True + ' + 'btn5 + ' + Me.btn5.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn5.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn5.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn5.Location = New System.Drawing.Point(72, 102) + Me.btn5.Name = "btn5" + Me.btn5.Size = New System.Drawing.Size(55, 41) + Me.btn5.TabIndex = 30 + Me.btn5.TabStop = False + Me.btn5.Text = "5" + Me.btn5.UseVisualStyleBackColor = True + ' + 'btndividedby + ' + Me.btndividedby.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btndividedby.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndividedby.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btndividedby.Location = New System.Drawing.Point(196, 196) + Me.btndividedby.Name = "btndividedby" + Me.btndividedby.Size = New System.Drawing.Size(55, 41) + Me.btndividedby.TabIndex = 40 + Me.btndividedby.TabStop = False + Me.btndividedby.Text = "/" + Me.btndividedby.UseVisualStyleBackColor = True + ' + 'lbldispla + ' + Me.lbldispla.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbldispla.BackColor = System.Drawing.Color.White + Me.lbldispla.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lbldispla.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbldispla.Location = New System.Drawing.Point(10, 10) + Me.lbldispla.Name = "lbldispla" + Me.lbldispla.ReadOnly = True + Me.lbldispla.Size = New System.Drawing.Size(241, 38) + Me.lbldispla.TabIndex = 25 + Me.lbldispla.TabStop = False + Me.lbldispla.Text = "0" + Me.lbldispla.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'btntimes + ' + Me.btntimes.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btntimes.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btntimes.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btntimes.Location = New System.Drawing.Point(196, 149) + Me.btntimes.Name = "btntimes" + Me.btntimes.Size = New System.Drawing.Size(55, 41) + Me.btntimes.TabIndex = 39 + Me.btntimes.TabStop = False + Me.btntimes.Text = "x" + Me.btntimes.UseVisualStyleBackColor = True + ' + 'btn1 + ' + Me.btn1.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn1.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn1.Location = New System.Drawing.Point(10, 55) + Me.btn1.Name = "btn1" + Me.btn1.Size = New System.Drawing.Size(55, 41) + Me.btn1.TabIndex = 26 + Me.btn1.TabStop = False + Me.btn1.Text = "1" + Me.btn1.UseVisualStyleBackColor = True + ' + 'btnminus + ' + Me.btnminus.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btnminus.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnminus.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnminus.Location = New System.Drawing.Point(196, 102) + Me.btnminus.Name = "btnminus" + Me.btnminus.Size = New System.Drawing.Size(55, 41) + Me.btnminus.TabIndex = 38 + Me.btnminus.TabStop = False + Me.btnminus.Text = "-" + Me.btnminus.UseVisualStyleBackColor = True + ' + 'btn2 + ' + Me.btn2.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn2.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn2.Location = New System.Drawing.Point(72, 55) + Me.btn2.Name = "btn2" + Me.btn2.Size = New System.Drawing.Size(55, 41) + Me.btn2.TabIndex = 27 + Me.btn2.TabStop = False + Me.btn2.Text = "2" + Me.btn2.UseVisualStyleBackColor = True + ' + 'btnplus + ' + Me.btnplus.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btnplus.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnplus.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnplus.Location = New System.Drawing.Point(196, 55) + Me.btnplus.Name = "btnplus" + Me.btnplus.Size = New System.Drawing.Size(55, 41) + Me.btnplus.TabIndex = 37 + Me.btnplus.TabStop = False + Me.btnplus.Text = "+" + Me.btnplus.UseVisualStyleBackColor = True + ' + 'btn3 + ' + Me.btn3.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn3.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn3.Location = New System.Drawing.Point(134, 55) + Me.btn3.Name = "btn3" + Me.btn3.Size = New System.Drawing.Size(55, 41) + Me.btn3.TabIndex = 28 + Me.btn3.TabStop = False + Me.btn3.Text = "3" + Me.btn3.UseVisualStyleBackColor = True + ' + 'btnequals + ' + Me.btnequals.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btnequals.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnequals.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnequals.Location = New System.Drawing.Point(134, 196) + Me.btnequals.Name = "btnequals" + Me.btnequals.Size = New System.Drawing.Size(55, 41) + Me.btnequals.TabIndex = 36 + Me.btnequals.Text = "=" + Me.btnequals.UseVisualStyleBackColor = True + ' + 'btn4 + ' + Me.btn4.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn4.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn4.Location = New System.Drawing.Point(10, 102) + Me.btn4.Name = "btn4" + Me.btn4.Size = New System.Drawing.Size(55, 41) + Me.btn4.TabIndex = 29 + Me.btn4.TabStop = False + Me.btn4.Text = "4" + Me.btn4.UseVisualStyleBackColor = True + ' + 'btn0 + ' + Me.btn0.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn0.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn0.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn0.Location = New System.Drawing.Point(10, 196) + Me.btn0.Name = "btn0" + Me.btn0.Size = New System.Drawing.Size(55, 41) + Me.btn0.TabIndex = 35 + Me.btn0.TabStop = False + Me.btn0.Text = "0" + Me.btn0.UseVisualStyleBackColor = True + ' + 'btn6 + ' + Me.btn6.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn6.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn6.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn6.Location = New System.Drawing.Point(134, 102) + Me.btn6.Name = "btn6" + Me.btn6.Size = New System.Drawing.Size(55, 41) + Me.btn6.TabIndex = 31 + Me.btn6.TabStop = False + Me.btn6.Text = "6" + Me.btn6.UseVisualStyleBackColor = True + ' + 'btn9 + ' + Me.btn9.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn9.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn9.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn9.Location = New System.Drawing.Point(134, 149) + Me.btn9.Name = "btn9" + Me.btn9.Size = New System.Drawing.Size(55, 41) + Me.btn9.TabIndex = 34 + Me.btn9.TabStop = False + Me.btn9.Text = "9" + Me.btn9.UseVisualStyleBackColor = True + ' + 'btn7 + ' + Me.btn7.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn7.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn7.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn7.Location = New System.Drawing.Point(10, 149) + Me.btn7.Name = "btn7" + Me.btn7.Size = New System.Drawing.Size(55, 41) + Me.btn7.TabIndex = 32 + Me.btn7.TabStop = False + Me.btn7.Text = "7" + Me.btn7.UseVisualStyleBackColor = True + ' + 'btn8 + ' + Me.btn8.Anchor = System.Windows.Forms.AnchorStyles.None + Me.btn8.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn8.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn8.Location = New System.Drawing.Point(72, 149) + Me.btn8.Name = "btn8" + Me.btn8.Size = New System.Drawing.Size(55, 41) + Me.btn8.TabIndex = 33 + Me.btn8.TabStop = False + Me.btn8.Text = "8" + Me.btn8.UseVisualStyleBackColor = True + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 248) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(261, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconCalculator + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'Calculator + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(261, 278) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Calculator" + Me.Text = "Calculator" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents btnclearall As System.Windows.Forms.Button + Friend WithEvents btn5 As System.Windows.Forms.Button + Friend WithEvents btndividedby As System.Windows.Forms.Button + Friend WithEvents lbldispla As System.Windows.Forms.TextBox + Friend WithEvents btntimes As System.Windows.Forms.Button + Friend WithEvents btn1 As System.Windows.Forms.Button + Friend WithEvents btnminus As System.Windows.Forms.Button + Friend WithEvents btn2 As System.Windows.Forms.Button + Friend WithEvents btnplus As System.Windows.Forms.Button + Friend WithEvents btn3 As System.Windows.Forms.Button + Friend WithEvents btnequals As System.Windows.Forms.Button + Friend WithEvents btn4 As System.Windows.Forms.Button + Friend WithEvents btn0 As System.Windows.Forms.Button + Friend WithEvents btn6 As System.Windows.Forms.Button + Friend WithEvents btn9 As System.Windows.Forms.Button + Friend WithEvents btn7 As System.Windows.Forms.Button + Friend WithEvents btn8 As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/Calculator.resx b/ShiftOS/Calculator.resx new file mode 100644 index 0000000..ff4c820 --- /dev/null +++ b/ShiftOS/Calculator.resx @@ -0,0 +1,129 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 1347, 18 + + + 1441, 18 + + + 1525, 18 + + \ No newline at end of file diff --git a/ShiftOS/Calculator.vb b/ShiftOS/Calculator.vb new file mode 100644 index 0000000..270d3b3 --- /dev/null +++ b/ShiftOS/Calculator.vb @@ -0,0 +1,811 @@ +Public Class Calculator + + Public dNumber As Double + Public sOperation As String + Public bHasFirstNumber, bHasSecondNumber, bHasOperation As Boolean + +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 261 'replace with minimum size + Public minimumsizeheight As Integer = 278 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.CalculatorCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttoncalculator.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoncalculator, ShiftOSDesktop.tbcalculatoricon, ShiftOSDesktop.tbcalculatortext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(261, 278) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.calculatorname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.calculatoricontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn1.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 1 + bHasSecondNumber = True + Exit Sub + End If + Me.lbldispla.Text &= 1 + Exit Sub + End If + Me.lbldispla.Text &= 1 + Else + Me.lbldispla.Text = 1 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn2.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 2 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 2 + Exit Sub + End If + Me.lbldispla.Text &= 2 + Else + Me.lbldispla.Text = 2 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn3.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 3 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 3 + Exit Sub + End If + Me.lbldispla.Text &= 3 + Else + Me.lbldispla.Text = 3 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn4.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 4 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 4 + Exit Sub + End If + Me.lbldispla.Text &= 4 + Else + Me.lbldispla.Text = 4 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn5.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 5 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 5 + Exit Sub + End If + Me.lbldispla.Text &= 5 + Else + Me.lbldispla.Text = 5 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn6.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 6 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 6 + Exit Sub + End If + Me.lbldispla.Text &= 6 + Else + Me.lbldispla.Text = 6 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn7.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 7 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 7 + Exit Sub + End If + Me.lbldispla.Text &= 7 + Else + Me.lbldispla.Text = 7 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn8.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 8 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 8 + Exit Sub + End If + Me.lbldispla.Text &= 8 + Else + Me.lbldispla.Text = 8 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn9.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text = 0 Then + Me.lbldispla.Text = 9 + bHasSecondNumber = True + + Exit Sub + End If + + Me.lbldispla.Text &= 9 + Exit Sub + End If + Me.lbldispla.Text &= 9 + Else + Me.lbldispla.Text = 9 + bHasFirstNumber = True + bHasOperation = False + End If + End Sub + + Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn0.Click + If bHasFirstNumber Then + If dNumber <> 0 Then + If Me.lbldispla.Text <> 0 Then + Me.lbldispla.Text &= 0 + End If + Exit Sub + End If + Me.lbldispla.Text &= 0 + Else + Me.lbldispla.Text = 0 + End If + End Sub + + Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnequals.Click + If bHasFirstNumber And bHasSecondNumber Then + + If (sOperation = "+") Then + Me.lbldispla.Text = Val(Me.lbldispla.Text) + dNumber + ElseIf (sOperation = "-") Then + Me.lbldispla.Text = dNumber - Val(Me.lbldispla.Text) + ElseIf (sOperation = "*") Then + Me.lbldispla.Text = Val(Me.lbldispla.Text) * dNumber + ElseIf (sOperation = "/") Then + Me.lbldispla.Text = dNumber / Val(Me.lbldispla.Text) + Else + Exit Sub + End If + + dNumber = Val(Me.lbldispla.Text) + bHasFirstNumber = False + bHasSecondNumber = False + bHasOperation = True + sOperation = "" + End If + End Sub + + Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnplus.Click + + If bHasSecondNumber Then + + If bHasOperation Then + If (sOperation = "+") Then + dNumber = Val(Me.lbldispla.Text) + dNumber + ElseIf (sOperation = "-") Then + dNumber = dNumber - Val(Me.lbldispla.Text) + ElseIf (sOperation = "*") Then + dNumber = Val(Me.lbldispla.Text) * dNumber + ElseIf (sOperation = "/") Then + dNumber = dNumber / Val(Me.lbldispla.Text) + Else + Exit Sub + End If + + sOperation = "+" + bHasSecondNumber = False + Me.lbldispla.Text = 0 + + Exit Sub + Else + sOperation = "+" + dNumber = Val(Me.lbldispla.Text) + dNumber + bHasSecondNumber = False + Me.lbldispla.Text = 0 + Exit Sub + End If + End If + + If bHasFirstNumber Or bHasOperation Then + If bHasOperation Then + bHasFirstNumber = True + End If + sOperation = "+" + bHasOperation = True + dNumber = Val(Me.lbldispla.Text) + Me.lbldispla.Text = 0 + End If + End Sub + + Private Sub Button13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnminus.Click + If bHasSecondNumber Then + If bHasOperation Then + If (sOperation = "+") Then + dNumber = Val(Me.lbldispla.Text) + dNumber + ElseIf (sOperation = "-") Then + dNumber = dNumber - Val(Me.lbldispla.Text) + ElseIf (sOperation = "*") Then + dNumber = Val(Me.lbldispla.Text) * dNumber + ElseIf (sOperation = "/") Then + dNumber = dNumber / Val(Me.lbldispla.Text) + Else + Exit Sub + End If + sOperation = "-" + bHasSecondNumber = False + Me.lbldispla.Text = 0 + Exit Sub + Else + sOperation = "-" + dNumber = dNumber - Val(Me.lbldispla.Text) + bHasSecondNumber = False + Me.lbldispla.Text = 0 + Exit Sub + End If + End If + If bHasFirstNumber Or bHasOperation Then + If bHasOperation Then + bHasFirstNumber = True + End If + sOperation = "-" + dNumber = Val(Me.lbldispla.Text) + Me.lbldispla.Text = 0 + End If + End Sub + + Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntimes.Click + If bHasSecondNumber Then + If bHasOperation Then + If (sOperation = "+") Then + dNumber = Val(Me.lbldispla.Text) + dNumber + ElseIf (sOperation = "-") Then + dNumber = dNumber - Val(Me.lbldispla.Text) + ElseIf (sOperation = "*") Then + dNumber = Val(Me.lbldispla.Text) * dNumber + ElseIf (sOperation = "/") Then + dNumber = dNumber / Val(Me.lbldispla.Text) + Else + Exit Sub + End If + sOperation = "*" + bHasSecondNumber = False + Me.lbldispla.Text = 0 + Exit Sub + Else + sOperation = "*" + dNumber = Val(Me.lbldispla.Text) * dNumber + bHasSecondNumber = False + Me.lbldispla.Text = 0 + Exit Sub + End If + End If + If bHasFirstNumber Or bHasOperation Then + If bHasOperation Then + bHasFirstNumber = True + End If + sOperation = "*" + dNumber = Val(Me.lbldispla.Text) + Me.lbldispla.Text = 0 + End If + End Sub + + Private Sub Button15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndividedby.Click + If bHasSecondNumber Then + If bHasOperation Then + If (sOperation = "+") Then + dNumber = Val(Me.lbldispla.Text) + dNumber + ElseIf (sOperation = "-") Then + dNumber = dNumber - Val(Me.lbldispla.Text) + ElseIf (sOperation = "*") Then + dNumber = Val(Me.lbldispla.Text) * dNumber + ElseIf (sOperation = "/") Then + dNumber = dNumber / Val(Me.lbldispla.Text) + Else + Exit Sub + End If + sOperation = "/" + bHasSecondNumber = False + Me.lbldispla.Text = 0 + Exit Sub + Else + sOperation = "/" + dNumber = dNumber / Val(Me.lbldispla.Text) + bHasSecondNumber = False + Me.lbldispla.Text = 0 + Exit Sub + End If + End If + If bHasFirstNumber Or bHasOperation Then + If bHasOperation Then + bHasFirstNumber = True + End If + sOperation = "/" + dNumber = Val(Me.lbldispla.Text) + Me.lbldispla.Text = 0 + End If + End Sub + + Private Sub Button16_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnclearall.Click + Me.lbldispla.Text = 0 + dNumber = 0 + bHasFirstNumber = False + bHasSecondNumber = False + bHasOperation = False + sOperation = "" + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Catalyst_Main.Designer.vb b/ShiftOS/Catalyst_Main.Designer.vb new file mode 100644 index 0000000..b552709 --- /dev/null +++ b/ShiftOS/Catalyst_Main.Designer.vb @@ -0,0 +1,267 @@ + _ +Partial Class Catalyst_Main + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.TextBox1 = New System.Windows.Forms.TextBox() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.lbmessage = New System.Windows.Forms.Label() + Me.pgcontents.SuspendLayout + CType(Me.pnlicon,System.ComponentModel.ISupportInitialize).BeginInit + Me.pgright.SuspendLayout + Me.pgleft.SuspendLayout + Me.titlebar.SuspendLayout + Me.SuspendLayout + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.lbmessage) + Me.pgcontents.Controls.Add(Me.TextBox1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(329, 364) + Me.pgcontents.TabIndex = 20 + ' + 'TextBox1 + ' + Me.TextBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.TextBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.0!) + Me.TextBox1.Location = New System.Drawing.Point(11, 334) + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.Size = New System.Drawing.Size(308, 24) + Me.TextBox1.TabIndex = 0 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 394) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(329, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(90, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Catalyst" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(331, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 364) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(331, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 366) + Me.pgright.TabIndex = 22 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 364) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 366) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(333, 30) + Me.titlebar.TabIndex = 19 + ' + 'lbmessage + ' + Me.lbmessage.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbmessage.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.lbmessage.Location = New System.Drawing.Point(10, 17) + Me.lbmessage.Name = "lbmessage" + Me.lbmessage.Size = New System.Drawing.Size(309, 314) + Me.lbmessage.TabIndex = 1 + Me.lbmessage.TextAlign = System.Drawing.ContentAlignment.BottomLeft + ' + 'Catalyst_Main + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 13!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(333, 396) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Catalyst_Main" + Me.Text = "Catalyst_Main" + Me.pgcontents.ResumeLayout(false) + Me.pgcontents.PerformLayout + CType(Me.pnlicon,System.ComponentModel.ISupportInitialize).EndInit + Me.pgright.ResumeLayout(false) + Me.pgleft.ResumeLayout(false) + Me.titlebar.ResumeLayout(false) + Me.titlebar.PerformLayout + Me.ResumeLayout(false) + +End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents TextBox1 As System.Windows.Forms.TextBox + Friend WithEvents lbmessage As System.Windows.Forms.Label +End Class diff --git a/ShiftOS/Catalyst_Main.resx b/ShiftOS/Catalyst_Main.resx new file mode 100644 index 0000000..18c44ec --- /dev/null +++ b/ShiftOS/Catalyst_Main.resx @@ -0,0 +1,129 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 1347, 18 + + + 1441, 18 + + + 17, 57 + + \ No newline at end of file diff --git a/ShiftOS/Catalyst_Main.vb b/ShiftOS/Catalyst_Main.vb new file mode 100644 index 0000000..3de672c --- /dev/null +++ b/ShiftOS/Catalyst_Main.vb @@ -0,0 +1,435 @@ +#Region "Importers" +Imports ShiftOS.Helper +Imports System.Speech.Synthesis +#End Region + +Public Class Catalyst_Main +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlcatalystpanelbutton, ShiftOSDesktop.tbcatalysticon, ShiftOSDesktop.lbcatalystname, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + readAloud("Welcome back, #user#! Just give me a second to load my core...") + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.catalystname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + +#Region "Declarations and Functions" + Public Sub readAloud(text As String) + lbmessage.Text = text.Replace("#user#", ShiftOSDesktop.username) + speak(text) + End Sub + + Public Sub checkMsg(MsgText As String) + readAloud(MsgText) + End Sub + +#End Region + + Private Sub TextBox1_TextChanged(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyDown + If e.KeyCode = Keys.Enter Then + e.SuppressKeyPress = True + Dim txtmsg As String = TextBox1.Text + TextBox1.Clear() + checkMsg(txtmsg) + End If + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Clock.Designer.vb b/ShiftOS/Clock.Designer.vb new file mode 100644 index 0000000..a36a758 --- /dev/null +++ b/ShiftOS/Clock.Designer.vb @@ -0,0 +1,270 @@ + _ +Partial Class Clock + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.bottomtext = New System.Windows.Forms.Label() + Me.toptext = New System.Windows.Forms.Label() + Me.lbmaintime = New System.Windows.Forms.Label() + Me.clocktick = New System.Windows.Forms.Timer(Me.components) + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgcontents.SuspendLayout() + Me.SuspendLayout() + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(364, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 137) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 135) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 137) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 135) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(366, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 22 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconClock + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 21 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(69, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Clock" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(364, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 165) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(362, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.bottomtext) + Me.pgcontents.Controls.Add(Me.toptext) + Me.pgcontents.Controls.Add(Me.lbmaintime) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(362, 135) + Me.pgcontents.TabIndex = 20 + ' + 'bottomtext + ' + Me.bottomtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.bottomtext.Location = New System.Drawing.Point(10, 88) + Me.bottomtext.Name = "bottomtext" + Me.bottomtext.Size = New System.Drawing.Size(342, 23) + Me.bottomtext.TabIndex = 2 + Me.bottomtext.Text = "Seconds have passed" + Me.bottomtext.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'toptext + ' + Me.toptext.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.toptext.Location = New System.Drawing.Point(10, 22) + Me.toptext.Name = "toptext" + Me.toptext.Size = New System.Drawing.Size(342, 23) + Me.toptext.TabIndex = 1 + Me.toptext.Text = "The Time is" + Me.toptext.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbmaintime + ' + Me.lbmaintime.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbmaintime.Location = New System.Drawing.Point(6, 38) + Me.lbmaintime.Name = "lbmaintime" + Me.lbmaintime.Size = New System.Drawing.Size(350, 52) + Me.lbmaintime.TabIndex = 0 + Me.lbmaintime.Text = "00000000" + Me.lbmaintime.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'clocktick + ' + Me.clocktick.Enabled = True + Me.clocktick.Interval = 1000 + ' + 'Clock + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(366, 167) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Clock" + Me.Text = "Clock" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgcontents.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents bottomtext As System.Windows.Forms.Label + Friend WithEvents toptext As System.Windows.Forms.Label + Friend WithEvents lbmaintime As System.Windows.Forms.Label + Friend WithEvents clocktick As System.Windows.Forms.Timer + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Clock.resx b/ShiftOS/Clock.resx new file mode 100644 index 0000000..02cc2a0 --- /dev/null +++ b/ShiftOS/Clock.resx @@ -0,0 +1,123 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 12 + + \ No newline at end of file diff --git a/ShiftOS/Clock.vb b/ShiftOS/Clock.vb new file mode 100644 index 0000000..2d20ce9 --- /dev/null +++ b/ShiftOS/Clock.vb @@ -0,0 +1,446 @@ +Public Class Clock + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + + Dim movedtext As Boolean = False + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.ClockCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonclock.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonclock, ShiftOSDesktop.tbclockicon, ShiftOSDesktop.tbclocktext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(366, 167) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.clockname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtclockicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub clocktick_Tick(sender As Object, e As EventArgs) Handles clocktick.Tick + gettime() + End Sub + + Private Sub gettime() + If ShiftOSDesktop.boughtsplitsecondtime = True Then + If movedtext = False Then + toptext.Location = New Point(toptext.Location.X, toptext.Location.Y + 10) + lbmaintime.Location = New Point(lbmaintime.Location.X, lbmaintime.Location.Y + 10) + bottomtext.Hide() + movedtext = True + End If + toptext.Text = "The Time is" + lbmaintime.Text = TimeOfDay + bottomtext.Hide() + Else + If ShiftOSDesktop.boughtminuteaccuracytime = True Then + If movedtext = False Then + toptext.Location = New Point(toptext.Location.X, toptext.Location.Y + 10) + lbmaintime.Location = New Point(lbmaintime.Location.X, lbmaintime.Location.Y + 10) + bottomtext.Hide() + movedtext = True + End If + If Date.Now.Hour < 12 Then + toptext.Text = "The Time is" + lbmaintime.Text = TimeOfDay.Hour & ":" & Format(TimeOfDay.Minute, "00") & " AM" + bottomtext.Hide() + Else + toptext.Text = "The Time is" + lbmaintime.Text = TimeOfDay.Hour - 12 & ":" & Format(TimeOfDay.Minute, "00") & " PM" + bottomtext.Hide() + End If + Else + If ShiftOSDesktop.boughtpmandam = True Then + If movedtext = False Then + toptext.Location = New Point(toptext.Location.X, toptext.Location.Y + 10) + lbmaintime.Location = New Point(lbmaintime.Location.X, lbmaintime.Location.Y + 10) + bottomtext.Hide() + movedtext = True + End If + If Date.Now.Hour < 12 Then + toptext.Text = "The Time is" + lbmaintime.Text = TimeOfDay.Hour & " AM" + Else + toptext.Text = "The Time is" + lbmaintime.Text = TimeOfDay.Hour - 12 & " PM" + End If + Else + If ShiftOSDesktop.boughthourspastmidnight = True Then + toptext.Text = "Since Midnight" + lbmaintime.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60 / 60) + bottomtext.Text = "Hours have passed" + bottomtext.Show() + Else + If ShiftOSDesktop.boughtminutespastmidnight = True Then + toptext.Text = "Since Midnight" + lbmaintime.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60) + bottomtext.Text = "Minutes have passed" + bottomtext.Show() + Else + If ShiftOSDesktop.boughtsecondspastmidnight = True Then + toptext.Text = "Since Midnight" + lbmaintime.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds) + bottomtext.Text = "Seconds have passed" + bottomtext.Show() + End If + End If + End If + End If + End If + End If + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Colour Picker.Designer.vb b/ShiftOS/Colour Picker.Designer.vb new file mode 100644 index 0000000..9c0833e --- /dev/null +++ b/ShiftOS/Colour Picker.Designer.vb @@ -0,0 +1,3729 @@ + _ +Partial Class Colour_Picker + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlpinkcolours = New System.Windows.Forms.Panel() + Me.pnlpinkoptions = New System.Windows.Forms.Panel() + Me.Label35 = New System.Windows.Forms.Label() + Me.txtpinksgreen = New System.Windows.Forms.TextBox() + Me.txtpinksred = New System.Windows.Forms.TextBox() + Me.Label36 = New System.Windows.Forms.Label() + Me.Label37 = New System.Windows.Forms.Label() + Me.txtpinksblue = New System.Windows.Forms.TextBox() + Me.pnlpinkcustomcolour = New System.Windows.Forms.Panel() + Me.pnlpink16 = New System.Windows.Forms.Panel() + Me.pnlpink12 = New System.Windows.Forms.Panel() + Me.pnlpink14 = New System.Windows.Forms.Panel() + Me.pnlpink10 = New System.Windows.Forms.Panel() + Me.pnlpink8 = New System.Windows.Forms.Panel() + Me.pnlpink4 = New System.Windows.Forms.Panel() + Me.pnlpink6 = New System.Windows.Forms.Panel() + Me.pnlpink15 = New System.Windows.Forms.Panel() + Me.pnlpink2 = New System.Windows.Forms.Panel() + Me.pnlpink13 = New System.Windows.Forms.Panel() + Me.pnlpink11 = New System.Windows.Forms.Panel() + Me.pnlpink7 = New System.Windows.Forms.Panel() + Me.pnlpink9 = New System.Windows.Forms.Panel() + Me.pnlpink5 = New System.Windows.Forms.Panel() + Me.pnlpink3 = New System.Windows.Forms.Panel() + Me.pnlpink1 = New System.Windows.Forms.Panel() + Me.lblpinklevel = New System.Windows.Forms.Label() + Me.Label23 = New System.Windows.Forms.Label() + Me.pnlredcolours = New System.Windows.Forms.Panel() + Me.pnlredoptions = New System.Windows.Forms.Panel() + Me.Label32 = New System.Windows.Forms.Label() + Me.txtredsblue = New System.Windows.Forms.TextBox() + Me.txtredsred = New System.Windows.Forms.TextBox() + Me.Label33 = New System.Windows.Forms.Label() + Me.Label34 = New System.Windows.Forms.Label() + Me.txtredsgreen = New System.Windows.Forms.TextBox() + Me.pnlredcustomcolour = New System.Windows.Forms.Panel() + Me.pnlred16 = New System.Windows.Forms.Panel() + Me.pnlred12 = New System.Windows.Forms.Panel() + Me.pnlred14 = New System.Windows.Forms.Panel() + Me.pnlred10 = New System.Windows.Forms.Panel() + Me.pnlred8 = New System.Windows.Forms.Panel() + Me.pnlred4 = New System.Windows.Forms.Panel() + Me.pnlred6 = New System.Windows.Forms.Panel() + Me.pnlred15 = New System.Windows.Forms.Panel() + Me.pnlred2 = New System.Windows.Forms.Panel() + Me.pnlred13 = New System.Windows.Forms.Panel() + Me.pnlred11 = New System.Windows.Forms.Panel() + Me.pnlred7 = New System.Windows.Forms.Panel() + Me.pnlred9 = New System.Windows.Forms.Panel() + Me.pnlred5 = New System.Windows.Forms.Panel() + Me.pnlred3 = New System.Windows.Forms.Panel() + Me.pnlred1 = New System.Windows.Forms.Panel() + Me.lblredlevel = New System.Windows.Forms.Label() + Me.Label21 = New System.Windows.Forms.Label() + Me.pnlbrowncolours = New System.Windows.Forms.Panel() + Me.pnlbrownoptions = New System.Windows.Forms.Panel() + Me.Label29 = New System.Windows.Forms.Label() + Me.txtbrownsblue = New System.Windows.Forms.TextBox() + Me.txtbrownsred = New System.Windows.Forms.TextBox() + Me.Label30 = New System.Windows.Forms.Label() + Me.Label31 = New System.Windows.Forms.Label() + Me.txtbrownsgreen = New System.Windows.Forms.TextBox() + Me.pnlbrowncustomcolour = New System.Windows.Forms.Panel() + Me.pnlbrown16 = New System.Windows.Forms.Panel() + Me.pnlbrown12 = New System.Windows.Forms.Panel() + Me.pnlbrown14 = New System.Windows.Forms.Panel() + Me.pnlbrown10 = New System.Windows.Forms.Panel() + Me.pnlbrown8 = New System.Windows.Forms.Panel() + Me.pnlbrown4 = New System.Windows.Forms.Panel() + Me.pnlbrown6 = New System.Windows.Forms.Panel() + Me.pnlbrown15 = New System.Windows.Forms.Panel() + Me.pnlbrown2 = New System.Windows.Forms.Panel() + Me.pnlbrown13 = New System.Windows.Forms.Panel() + Me.pnlbrown11 = New System.Windows.Forms.Panel() + Me.pnlbrown7 = New System.Windows.Forms.Panel() + Me.pnlbrown9 = New System.Windows.Forms.Panel() + Me.pnlbrown5 = New System.Windows.Forms.Panel() + Me.pnlbrown3 = New System.Windows.Forms.Panel() + Me.pnlbrown1 = New System.Windows.Forms.Panel() + Me.lblbrownlevel = New System.Windows.Forms.Label() + Me.Label19 = New System.Windows.Forms.Label() + Me.pnlorangecolours = New System.Windows.Forms.Panel() + Me.pnlorangeoptions = New System.Windows.Forms.Panel() + Me.Label25 = New System.Windows.Forms.Label() + Me.txtorangesblue = New System.Windows.Forms.TextBox() + Me.txtorangesred = New System.Windows.Forms.TextBox() + Me.Label27 = New System.Windows.Forms.Label() + Me.Label28 = New System.Windows.Forms.Label() + Me.txtorangesgreen = New System.Windows.Forms.TextBox() + Me.pnlorangecustomcolour = New System.Windows.Forms.Panel() + Me.pnlorange16 = New System.Windows.Forms.Panel() + Me.pnlorange12 = New System.Windows.Forms.Panel() + Me.pnlorange14 = New System.Windows.Forms.Panel() + Me.pnlorange10 = New System.Windows.Forms.Panel() + Me.pnlorange8 = New System.Windows.Forms.Panel() + Me.pnlorange4 = New System.Windows.Forms.Panel() + Me.pnlorange6 = New System.Windows.Forms.Panel() + Me.pnlorange15 = New System.Windows.Forms.Panel() + Me.pnlorange2 = New System.Windows.Forms.Panel() + Me.pnlorange13 = New System.Windows.Forms.Panel() + Me.pnlorange11 = New System.Windows.Forms.Panel() + Me.pnlorange7 = New System.Windows.Forms.Panel() + Me.pnlorange9 = New System.Windows.Forms.Panel() + Me.pnlorange5 = New System.Windows.Forms.Panel() + Me.pnlorange3 = New System.Windows.Forms.Panel() + Me.pnlorange1 = New System.Windows.Forms.Panel() + Me.lblorangelevel = New System.Windows.Forms.Label() + Me.Label13 = New System.Windows.Forms.Label() + Me.pnlyellowcolours = New System.Windows.Forms.Panel() + Me.pnlyellowoptions = New System.Windows.Forms.Panel() + Me.Label20 = New System.Windows.Forms.Label() + Me.txtyellowsblue = New System.Windows.Forms.TextBox() + Me.txtyellowsred = New System.Windows.Forms.TextBox() + Me.Label22 = New System.Windows.Forms.Label() + Me.Label24 = New System.Windows.Forms.Label() + Me.txtyellowsgreen = New System.Windows.Forms.TextBox() + Me.pnlyellowcustomcolour = New System.Windows.Forms.Panel() + Me.pnlyellow16 = New System.Windows.Forms.Panel() + Me.pnlyellow12 = New System.Windows.Forms.Panel() + Me.pnlyellow14 = New System.Windows.Forms.Panel() + Me.pnlyellow10 = New System.Windows.Forms.Panel() + Me.pnlyellow8 = New System.Windows.Forms.Panel() + Me.pnlyellow4 = New System.Windows.Forms.Panel() + Me.pnlyellow6 = New System.Windows.Forms.Panel() + Me.pnlyellow15 = New System.Windows.Forms.Panel() + Me.pnlyellow2 = New System.Windows.Forms.Panel() + Me.pnlyellow13 = New System.Windows.Forms.Panel() + Me.pnlyellow11 = New System.Windows.Forms.Panel() + Me.pnlyellow7 = New System.Windows.Forms.Panel() + Me.pnlyellow9 = New System.Windows.Forms.Panel() + Me.pnlyellow5 = New System.Windows.Forms.Panel() + Me.pnlyellow3 = New System.Windows.Forms.Panel() + Me.pnlyellow1 = New System.Windows.Forms.Panel() + Me.lblyellowlevel = New System.Windows.Forms.Label() + Me.Label11 = New System.Windows.Forms.Label() + Me.pnlgreencolours = New System.Windows.Forms.Panel() + Me.pnlgreenoptions = New System.Windows.Forms.Panel() + Me.Label15 = New System.Windows.Forms.Label() + Me.txtgreensred = New System.Windows.Forms.TextBox() + Me.txtgreensgreen = New System.Windows.Forms.TextBox() + Me.Label16 = New System.Windows.Forms.Label() + Me.Label18 = New System.Windows.Forms.Label() + Me.txtgreensblue = New System.Windows.Forms.TextBox() + Me.pnlgreencustomcolour = New System.Windows.Forms.Panel() + Me.pnlgreen16 = New System.Windows.Forms.Panel() + Me.pnlgreen12 = New System.Windows.Forms.Panel() + Me.pnlgreen14 = New System.Windows.Forms.Panel() + Me.pnlgreen10 = New System.Windows.Forms.Panel() + Me.pnlgreen8 = New System.Windows.Forms.Panel() + Me.pnlgreen4 = New System.Windows.Forms.Panel() + Me.pnlgreen6 = New System.Windows.Forms.Panel() + Me.pnlgreen15 = New System.Windows.Forms.Panel() + Me.pnlgreen2 = New System.Windows.Forms.Panel() + Me.pnlgreen13 = New System.Windows.Forms.Panel() + Me.pnlgreen11 = New System.Windows.Forms.Panel() + Me.pnlgreen7 = New System.Windows.Forms.Panel() + Me.pnlgreen9 = New System.Windows.Forms.Panel() + Me.pnlgreen5 = New System.Windows.Forms.Panel() + Me.pnlgreen3 = New System.Windows.Forms.Panel() + Me.pnlgreen1 = New System.Windows.Forms.Panel() + Me.lblgreenlevel = New System.Windows.Forms.Label() + Me.Label9 = New System.Windows.Forms.Label() + Me.pnlbluecolours = New System.Windows.Forms.Panel() + Me.pnlblueoptions = New System.Windows.Forms.Panel() + Me.Label6 = New System.Windows.Forms.Label() + Me.txtbluesred = New System.Windows.Forms.TextBox() + Me.txtbluesblue = New System.Windows.Forms.TextBox() + Me.Label4 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.txtbluesgreen = New System.Windows.Forms.TextBox() + Me.pnlbluecustomcolour = New System.Windows.Forms.Panel() + Me.pnlblue16 = New System.Windows.Forms.Panel() + Me.pnlblue12 = New System.Windows.Forms.Panel() + Me.pnlblue14 = New System.Windows.Forms.Panel() + Me.pnlblue10 = New System.Windows.Forms.Panel() + Me.pnlblue8 = New System.Windows.Forms.Panel() + Me.pnlblue4 = New System.Windows.Forms.Panel() + Me.pnlblue6 = New System.Windows.Forms.Panel() + Me.pnlblue15 = New System.Windows.Forms.Panel() + Me.pnlblue2 = New System.Windows.Forms.Panel() + Me.pnlblue13 = New System.Windows.Forms.Panel() + Me.pnlblue11 = New System.Windows.Forms.Panel() + Me.pnlblue7 = New System.Windows.Forms.Panel() + Me.pnlblue9 = New System.Windows.Forms.Panel() + Me.pnlblue5 = New System.Windows.Forms.Panel() + Me.pnlblue3 = New System.Windows.Forms.Panel() + Me.pnlblue1 = New System.Windows.Forms.Panel() + Me.lblbluelevel = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.pnlpurplecolours = New System.Windows.Forms.Panel() + Me.pnlpurpleoptions = New System.Windows.Forms.Panel() + Me.Label8 = New System.Windows.Forms.Label() + Me.txtpurplesgreen = New System.Windows.Forms.TextBox() + Me.txtpurplesblue = New System.Windows.Forms.TextBox() + Me.Label10 = New System.Windows.Forms.Label() + Me.Label12 = New System.Windows.Forms.Label() + Me.txtpurplesred = New System.Windows.Forms.TextBox() + Me.pnlpurplecustomcolour = New System.Windows.Forms.Panel() + Me.pnlpurple16 = New System.Windows.Forms.Panel() + Me.pnlpurple12 = New System.Windows.Forms.Panel() + Me.pnlpurple14 = New System.Windows.Forms.Panel() + Me.pnlpurple10 = New System.Windows.Forms.Panel() + Me.pnlpurple8 = New System.Windows.Forms.Panel() + Me.pnlpurple4 = New System.Windows.Forms.Panel() + Me.pnlpurple6 = New System.Windows.Forms.Panel() + Me.pnlpurple15 = New System.Windows.Forms.Panel() + Me.pnlpurple2 = New System.Windows.Forms.Panel() + Me.pnlpurple13 = New System.Windows.Forms.Panel() + Me.pnlpurple11 = New System.Windows.Forms.Panel() + Me.pnlpurple7 = New System.Windows.Forms.Panel() + Me.pnlpurple9 = New System.Windows.Forms.Panel() + Me.pnlpurple5 = New System.Windows.Forms.Panel() + Me.pnlpurple3 = New System.Windows.Forms.Panel() + Me.pnlpurple1 = New System.Windows.Forms.Panel() + Me.lblpurplelevel = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.pnlgraycolours = New System.Windows.Forms.Panel() + Me.lblcustomshadetut = New System.Windows.Forms.Label() + Me.txtcustomgrayshade = New System.Windows.Forms.TextBox() + Me.pnlgraycustomcolour = New System.Windows.Forms.Panel() + Me.pnlgray16 = New System.Windows.Forms.Panel() + Me.pnlgray12 = New System.Windows.Forms.Panel() + Me.pnlgray14 = New System.Windows.Forms.Panel() + Me.pnlgray10 = New System.Windows.Forms.Panel() + Me.pnlgray8 = New System.Windows.Forms.Panel() + Me.pnlgray4 = New System.Windows.Forms.Panel() + Me.pnlgray6 = New System.Windows.Forms.Panel() + Me.pnlgray15 = New System.Windows.Forms.Panel() + Me.pnlgray2 = New System.Windows.Forms.Panel() + Me.pnlgray13 = New System.Windows.Forms.Panel() + Me.pnlgray11 = New System.Windows.Forms.Panel() + Me.pnlgray7 = New System.Windows.Forms.Panel() + Me.pnlgray9 = New System.Windows.Forms.Panel() + Me.pnlgray5 = New System.Windows.Forms.Panel() + Me.pnlgray3 = New System.Windows.Forms.Panel() + Me.pnlgray1 = New System.Windows.Forms.Panel() + Me.lblgraylevel = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.pnlanycolours = New System.Windows.Forms.Panel() + Me.pnlanyoptions = New System.Windows.Forms.Panel() + Me.Label38 = New System.Windows.Forms.Label() + Me.txtanysgreen = New System.Windows.Forms.TextBox() + Me.txtanysred = New System.Windows.Forms.TextBox() + Me.Label39 = New System.Windows.Forms.Label() + Me.Label40 = New System.Windows.Forms.Label() + Me.txtanysblue = New System.Windows.Forms.TextBox() + Me.pnlanycustomcolour = New System.Windows.Forms.Panel() + Me.pnlany16 = New System.Windows.Forms.Panel() + Me.pnlany12 = New System.Windows.Forms.Panel() + Me.pnlany14 = New System.Windows.Forms.Panel() + Me.pnlany10 = New System.Windows.Forms.Panel() + Me.pnlany8 = New System.Windows.Forms.Panel() + Me.pnlany4 = New System.Windows.Forms.Panel() + Me.pnlany6 = New System.Windows.Forms.Panel() + Me.pnlany15 = New System.Windows.Forms.Panel() + Me.pnlany2 = New System.Windows.Forms.Panel() + Me.pnlany13 = New System.Windows.Forms.Panel() + Me.pnlany11 = New System.Windows.Forms.Panel() + Me.pnlany7 = New System.Windows.Forms.Panel() + Me.pnlany9 = New System.Windows.Forms.Panel() + Me.pnlany5 = New System.Windows.Forms.Panel() + Me.pnlany3 = New System.Windows.Forms.Panel() + Me.pnlany1 = New System.Windows.Forms.Panel() + Me.lblanylevel = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.lblnewcolourrgb = New System.Windows.Forms.Label() + Me.lblnewcolourname = New System.Windows.Forms.Label() + Me.Label26 = New System.Windows.Forms.Label() + Me.Label17 = New System.Windows.Forms.Label() + Me.lbloldcolourrgb = New System.Windows.Forms.Label() + Me.lbloldcolourname = New System.Windows.Forms.Label() + Me.Label14 = New System.Windows.Forms.Label() + Me.pnlnewcolour = New System.Windows.Forms.Panel() + Me.pnloldcolour = New System.Windows.Forms.Panel() + Me.lblobjecttocolour = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents.SuspendLayout() + Me.pnlpinkcolours.SuspendLayout() + Me.pnlpinkoptions.SuspendLayout() + Me.pnlredcolours.SuspendLayout() + Me.pnlredoptions.SuspendLayout() + Me.pnlbrowncolours.SuspendLayout() + Me.pnlbrownoptions.SuspendLayout() + Me.pnlorangecolours.SuspendLayout() + Me.pnlorangeoptions.SuspendLayout() + Me.pnlyellowcolours.SuspendLayout() + Me.pnlyellowoptions.SuspendLayout() + Me.pnlgreencolours.SuspendLayout() + Me.pnlgreenoptions.SuspendLayout() + Me.pnlbluecolours.SuspendLayout() + Me.pnlblueoptions.SuspendLayout() + Me.pnlpurplecolours.SuspendLayout() + Me.pnlpurpleoptions.SuspendLayout() + Me.pnlgraycolours.SuspendLayout() + Me.pnlanycolours.SuspendLayout() + Me.pnlanyoptions.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.pnlpinkcolours) + Me.pgcontents.Controls.Add(Me.pnlredcolours) + Me.pgcontents.Controls.Add(Me.pnlbrowncolours) + Me.pgcontents.Controls.Add(Me.pnlorangecolours) + Me.pgcontents.Controls.Add(Me.pnlyellowcolours) + Me.pgcontents.Controls.Add(Me.pnlgreencolours) + Me.pgcontents.Controls.Add(Me.pnlbluecolours) + Me.pgcontents.Controls.Add(Me.pnlpurplecolours) + Me.pgcontents.Controls.Add(Me.pnlgraycolours) + Me.pgcontents.Controls.Add(Me.pnlanycolours) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(443, 568) + Me.pgcontents.TabIndex = 20 + ' + 'pnlpinkcolours + ' + Me.pnlpinkcolours.BackColor = System.Drawing.Color.White + Me.pnlpinkcolours.Controls.Add(Me.pnlpinkoptions) + Me.pnlpinkcolours.Controls.Add(Me.pnlpinkcustomcolour) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink16) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink12) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink14) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink10) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink8) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink4) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink6) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink15) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink2) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink13) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink11) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink7) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink9) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink5) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink3) + Me.pnlpinkcolours.Controls.Add(Me.pnlpink1) + Me.pnlpinkcolours.Controls.Add(Me.lblpinklevel) + Me.pnlpinkcolours.Controls.Add(Me.Label23) + Me.pnlpinkcolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlpinkcolours.Location = New System.Drawing.Point(0, 521) + Me.pnlpinkcolours.Name = "pnlpinkcolours" + Me.pnlpinkcolours.Size = New System.Drawing.Size(443, 46) + Me.pnlpinkcolours.TabIndex = 11 + Me.pnlpinkcolours.Visible = False + ' + 'pnlpinkoptions + ' + Me.pnlpinkoptions.Controls.Add(Me.Label35) + Me.pnlpinkoptions.Controls.Add(Me.txtpinksgreen) + Me.pnlpinkoptions.Controls.Add(Me.txtpinksred) + Me.pnlpinkoptions.Controls.Add(Me.Label36) + Me.pnlpinkoptions.Controls.Add(Me.Label37) + Me.pnlpinkoptions.Controls.Add(Me.txtpinksblue) + Me.pnlpinkoptions.Location = New System.Drawing.Point(282, 2) + Me.pnlpinkoptions.Name = "pnlpinkoptions" + Me.pnlpinkoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlpinkoptions.TabIndex = 33 + Me.pnlpinkoptions.Visible = False + ' + 'Label35 + ' + Me.Label35.AutoSize = True + Me.Label35.BackColor = System.Drawing.Color.Transparent + Me.Label35.Location = New System.Drawing.Point(56, 24) + Me.Label35.Name = "Label35" + Me.Label35.Size = New System.Drawing.Size(39, 13) + Me.Label35.TabIndex = 26 + Me.Label35.Text = "Green:" + ' + 'txtpinksgreen + ' + Me.txtpinksgreen.BackColor = System.Drawing.Color.White + Me.txtpinksgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpinksgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpinksgreen.Location = New System.Drawing.Point(95, 22) + Me.txtpinksgreen.Multiline = True + Me.txtpinksgreen.Name = "txtpinksgreen" + Me.txtpinksgreen.Size = New System.Drawing.Size(23, 17) + Me.txtpinksgreen.TabIndex = 25 + Me.txtpinksgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtpinksred + ' + Me.txtpinksred.BackColor = System.Drawing.Color.White + Me.txtpinksred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpinksred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpinksred.Location = New System.Drawing.Point(64, 2) + Me.txtpinksred.Multiline = True + Me.txtpinksred.Name = "txtpinksred" + Me.txtpinksred.Size = New System.Drawing.Size(23, 17) + Me.txtpinksred.TabIndex = 21 + Me.txtpinksred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label36 + ' + Me.Label36.AutoSize = True + Me.Label36.BackColor = System.Drawing.Color.Transparent + Me.Label36.Location = New System.Drawing.Point(1, 23) + Me.Label36.Name = "Label36" + Me.Label36.Size = New System.Drawing.Size(31, 13) + Me.Label36.TabIndex = 24 + Me.Label36.Text = "Blue:" + ' + 'Label37 + ' + Me.Label37.AutoSize = True + Me.Label37.BackColor = System.Drawing.Color.Transparent + Me.Label37.Location = New System.Drawing.Point(33, 4) + Me.Label37.Name = "Label37" + Me.Label37.Size = New System.Drawing.Size(30, 13) + Me.Label37.TabIndex = 22 + Me.Label37.Text = "Red:" + ' + 'txtpinksblue + ' + Me.txtpinksblue.BackColor = System.Drawing.Color.White + Me.txtpinksblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpinksblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpinksblue.Location = New System.Drawing.Point(32, 22) + Me.txtpinksblue.Multiline = True + Me.txtpinksblue.Name = "txtpinksblue" + Me.txtpinksblue.Size = New System.Drawing.Size(23, 17) + Me.txtpinksblue.TabIndex = 23 + Me.txtpinksblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlpinkcustomcolour + ' + Me.pnlpinkcustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpinkcustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlpinkcustomcolour.Name = "pnlpinkcustomcolour" + Me.pnlpinkcustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlpinkcustomcolour.TabIndex = 18 + Me.pnlpinkcustomcolour.Visible = False + ' + 'pnlpink16 + ' + Me.pnlpink16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink16.Location = New System.Drawing.Point(259, 25) + Me.pnlpink16.Name = "pnlpink16" + Me.pnlpink16.Size = New System.Drawing.Size(20, 13) + Me.pnlpink16.TabIndex = 17 + Me.pnlpink16.Visible = False + ' + 'pnlpink12 + ' + Me.pnlpink12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink12.Location = New System.Drawing.Point(155, 25) + Me.pnlpink12.Name = "pnlpink12" + Me.pnlpink12.Size = New System.Drawing.Size(20, 13) + Me.pnlpink12.TabIndex = 9 + Me.pnlpink12.Visible = False + ' + 'pnlpink14 + ' + Me.pnlpink14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink14.Location = New System.Drawing.Point(207, 25) + Me.pnlpink14.Name = "pnlpink14" + Me.pnlpink14.Size = New System.Drawing.Size(20, 13) + Me.pnlpink14.TabIndex = 13 + Me.pnlpink14.Visible = False + ' + 'pnlpink10 + ' + Me.pnlpink10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink10.Location = New System.Drawing.Point(103, 25) + Me.pnlpink10.Name = "pnlpink10" + Me.pnlpink10.Size = New System.Drawing.Size(20, 13) + Me.pnlpink10.TabIndex = 5 + Me.pnlpink10.Visible = False + ' + 'pnlpink8 + ' + Me.pnlpink8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink8.Location = New System.Drawing.Point(259, 8) + Me.pnlpink8.Name = "pnlpink8" + Me.pnlpink8.Size = New System.Drawing.Size(20, 13) + Me.pnlpink8.TabIndex = 16 + Me.pnlpink8.Visible = False + ' + 'pnlpink4 + ' + Me.pnlpink4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink4.Location = New System.Drawing.Point(155, 8) + Me.pnlpink4.Name = "pnlpink4" + Me.pnlpink4.Size = New System.Drawing.Size(20, 13) + Me.pnlpink4.TabIndex = 8 + Me.pnlpink4.Visible = False + ' + 'pnlpink6 + ' + Me.pnlpink6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink6.Location = New System.Drawing.Point(207, 8) + Me.pnlpink6.Name = "pnlpink6" + Me.pnlpink6.Size = New System.Drawing.Size(20, 13) + Me.pnlpink6.TabIndex = 12 + Me.pnlpink6.Visible = False + ' + 'pnlpink15 + ' + Me.pnlpink15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink15.Location = New System.Drawing.Point(233, 25) + Me.pnlpink15.Name = "pnlpink15" + Me.pnlpink15.Size = New System.Drawing.Size(20, 13) + Me.pnlpink15.TabIndex = 15 + Me.pnlpink15.Visible = False + ' + 'pnlpink2 + ' + Me.pnlpink2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink2.Location = New System.Drawing.Point(103, 8) + Me.pnlpink2.Name = "pnlpink2" + Me.pnlpink2.Size = New System.Drawing.Size(20, 13) + Me.pnlpink2.TabIndex = 4 + Me.pnlpink2.Visible = False + ' + 'pnlpink13 + ' + Me.pnlpink13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink13.Location = New System.Drawing.Point(181, 25) + Me.pnlpink13.Name = "pnlpink13" + Me.pnlpink13.Size = New System.Drawing.Size(20, 13) + Me.pnlpink13.TabIndex = 11 + Me.pnlpink13.Visible = False + ' + 'pnlpink11 + ' + Me.pnlpink11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink11.Location = New System.Drawing.Point(129, 25) + Me.pnlpink11.Name = "pnlpink11" + Me.pnlpink11.Size = New System.Drawing.Size(20, 13) + Me.pnlpink11.TabIndex = 7 + Me.pnlpink11.Visible = False + ' + 'pnlpink7 + ' + Me.pnlpink7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink7.Location = New System.Drawing.Point(233, 8) + Me.pnlpink7.Name = "pnlpink7" + Me.pnlpink7.Size = New System.Drawing.Size(20, 13) + Me.pnlpink7.TabIndex = 14 + Me.pnlpink7.Visible = False + ' + 'pnlpink9 + ' + Me.pnlpink9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink9.Location = New System.Drawing.Point(77, 25) + Me.pnlpink9.Name = "pnlpink9" + Me.pnlpink9.Size = New System.Drawing.Size(20, 13) + Me.pnlpink9.TabIndex = 3 + Me.pnlpink9.Visible = False + ' + 'pnlpink5 + ' + Me.pnlpink5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink5.Location = New System.Drawing.Point(181, 8) + Me.pnlpink5.Name = "pnlpink5" + Me.pnlpink5.Size = New System.Drawing.Size(20, 13) + Me.pnlpink5.TabIndex = 10 + Me.pnlpink5.Visible = False + ' + 'pnlpink3 + ' + Me.pnlpink3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink3.Location = New System.Drawing.Point(129, 8) + Me.pnlpink3.Name = "pnlpink3" + Me.pnlpink3.Size = New System.Drawing.Size(20, 13) + Me.pnlpink3.TabIndex = 6 + Me.pnlpink3.Visible = False + ' + 'pnlpink1 + ' + Me.pnlpink1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpink1.Location = New System.Drawing.Point(77, 8) + Me.pnlpink1.Name = "pnlpink1" + Me.pnlpink1.Size = New System.Drawing.Size(20, 13) + Me.pnlpink1.TabIndex = 2 + Me.pnlpink1.Visible = False + ' + 'lblpinklevel + ' + Me.lblpinklevel.AutoSize = True + Me.lblpinklevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblpinklevel.Location = New System.Drawing.Point(5, 25) + Me.lblpinklevel.Name = "lblpinklevel" + Me.lblpinklevel.Size = New System.Drawing.Size(49, 15) + Me.lblpinklevel.TabIndex = 1 + Me.lblpinklevel.Text = "Level: 4" + ' + 'Label23 + ' + Me.Label23.AutoSize = True + Me.Label23.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label23.Location = New System.Drawing.Point(3, 2) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(48, 23) + Me.Label23.TabIndex = 0 + Me.Label23.Text = "Pink" + ' + 'pnlredcolours + ' + Me.pnlredcolours.BackColor = System.Drawing.Color.White + Me.pnlredcolours.Controls.Add(Me.pnlredoptions) + Me.pnlredcolours.Controls.Add(Me.pnlredcustomcolour) + Me.pnlredcolours.Controls.Add(Me.pnlred16) + Me.pnlredcolours.Controls.Add(Me.pnlred12) + Me.pnlredcolours.Controls.Add(Me.pnlred14) + Me.pnlredcolours.Controls.Add(Me.pnlred10) + Me.pnlredcolours.Controls.Add(Me.pnlred8) + Me.pnlredcolours.Controls.Add(Me.pnlred4) + Me.pnlredcolours.Controls.Add(Me.pnlred6) + Me.pnlredcolours.Controls.Add(Me.pnlred15) + Me.pnlredcolours.Controls.Add(Me.pnlred2) + Me.pnlredcolours.Controls.Add(Me.pnlred13) + Me.pnlredcolours.Controls.Add(Me.pnlred11) + Me.pnlredcolours.Controls.Add(Me.pnlred7) + Me.pnlredcolours.Controls.Add(Me.pnlred9) + Me.pnlredcolours.Controls.Add(Me.pnlred5) + Me.pnlredcolours.Controls.Add(Me.pnlred3) + Me.pnlredcolours.Controls.Add(Me.pnlred1) + Me.pnlredcolours.Controls.Add(Me.lblredlevel) + Me.pnlredcolours.Controls.Add(Me.Label21) + Me.pnlredcolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlredcolours.Location = New System.Drawing.Point(0, 475) + Me.pnlredcolours.Name = "pnlredcolours" + Me.pnlredcolours.Size = New System.Drawing.Size(443, 46) + Me.pnlredcolours.TabIndex = 10 + Me.pnlredcolours.Visible = False + ' + 'pnlredoptions + ' + Me.pnlredoptions.Controls.Add(Me.Label32) + Me.pnlredoptions.Controls.Add(Me.txtredsblue) + Me.pnlredoptions.Controls.Add(Me.txtredsred) + Me.pnlredoptions.Controls.Add(Me.Label33) + Me.pnlredoptions.Controls.Add(Me.Label34) + Me.pnlredoptions.Controls.Add(Me.txtredsgreen) + Me.pnlredoptions.Location = New System.Drawing.Point(282, 2) + Me.pnlredoptions.Name = "pnlredoptions" + Me.pnlredoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlredoptions.TabIndex = 32 + Me.pnlredoptions.Visible = False + ' + 'Label32 + ' + Me.Label32.AutoSize = True + Me.Label32.BackColor = System.Drawing.Color.Transparent + Me.Label32.Location = New System.Drawing.Point(64, 24) + Me.Label32.Name = "Label32" + Me.Label32.Size = New System.Drawing.Size(31, 13) + Me.Label32.TabIndex = 26 + Me.Label32.Text = "Blue:" + ' + 'txtredsblue + ' + Me.txtredsblue.BackColor = System.Drawing.Color.White + Me.txtredsblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtredsblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtredsblue.Location = New System.Drawing.Point(95, 22) + Me.txtredsblue.Multiline = True + Me.txtredsblue.Name = "txtredsblue" + Me.txtredsblue.Size = New System.Drawing.Size(23, 17) + Me.txtredsblue.TabIndex = 25 + Me.txtredsblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtredsred + ' + Me.txtredsred.BackColor = System.Drawing.Color.White + Me.txtredsred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtredsred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtredsred.Location = New System.Drawing.Point(64, 2) + Me.txtredsred.Multiline = True + Me.txtredsred.Name = "txtredsred" + Me.txtredsred.Size = New System.Drawing.Size(23, 17) + Me.txtredsred.TabIndex = 21 + Me.txtredsred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label33 + ' + Me.Label33.AutoSize = True + Me.Label33.BackColor = System.Drawing.Color.Transparent + Me.Label33.Location = New System.Drawing.Point(1, 23) + Me.Label33.Name = "Label33" + Me.Label33.Size = New System.Drawing.Size(39, 13) + Me.Label33.TabIndex = 24 + Me.Label33.Text = "Green:" + ' + 'Label34 + ' + Me.Label34.AutoSize = True + Me.Label34.BackColor = System.Drawing.Color.Transparent + Me.Label34.Location = New System.Drawing.Point(33, 4) + Me.Label34.Name = "Label34" + Me.Label34.Size = New System.Drawing.Size(30, 13) + Me.Label34.TabIndex = 22 + Me.Label34.Text = "Red:" + ' + 'txtredsgreen + ' + Me.txtredsgreen.BackColor = System.Drawing.Color.White + Me.txtredsgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtredsgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtredsgreen.Location = New System.Drawing.Point(40, 22) + Me.txtredsgreen.Multiline = True + Me.txtredsgreen.Name = "txtredsgreen" + Me.txtredsgreen.Size = New System.Drawing.Size(23, 17) + Me.txtredsgreen.TabIndex = 23 + Me.txtredsgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlredcustomcolour + ' + Me.pnlredcustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlredcustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlredcustomcolour.Name = "pnlredcustomcolour" + Me.pnlredcustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlredcustomcolour.TabIndex = 18 + Me.pnlredcustomcolour.Visible = False + ' + 'pnlred16 + ' + Me.pnlred16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred16.Location = New System.Drawing.Point(259, 25) + Me.pnlred16.Name = "pnlred16" + Me.pnlred16.Size = New System.Drawing.Size(20, 13) + Me.pnlred16.TabIndex = 17 + Me.pnlred16.Visible = False + ' + 'pnlred12 + ' + Me.pnlred12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred12.Location = New System.Drawing.Point(155, 25) + Me.pnlred12.Name = "pnlred12" + Me.pnlred12.Size = New System.Drawing.Size(20, 13) + Me.pnlred12.TabIndex = 9 + Me.pnlred12.Visible = False + ' + 'pnlred14 + ' + Me.pnlred14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred14.Location = New System.Drawing.Point(207, 25) + Me.pnlred14.Name = "pnlred14" + Me.pnlred14.Size = New System.Drawing.Size(20, 13) + Me.pnlred14.TabIndex = 13 + Me.pnlred14.Visible = False + ' + 'pnlred10 + ' + Me.pnlred10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred10.Location = New System.Drawing.Point(103, 25) + Me.pnlred10.Name = "pnlred10" + Me.pnlred10.Size = New System.Drawing.Size(20, 13) + Me.pnlred10.TabIndex = 5 + Me.pnlred10.Visible = False + ' + 'pnlred8 + ' + Me.pnlred8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred8.Location = New System.Drawing.Point(259, 8) + Me.pnlred8.Name = "pnlred8" + Me.pnlred8.Size = New System.Drawing.Size(20, 13) + Me.pnlred8.TabIndex = 16 + Me.pnlred8.Visible = False + ' + 'pnlred4 + ' + Me.pnlred4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred4.Location = New System.Drawing.Point(155, 8) + Me.pnlred4.Name = "pnlred4" + Me.pnlred4.Size = New System.Drawing.Size(20, 13) + Me.pnlred4.TabIndex = 8 + Me.pnlred4.Visible = False + ' + 'pnlred6 + ' + Me.pnlred6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred6.Location = New System.Drawing.Point(207, 8) + Me.pnlred6.Name = "pnlred6" + Me.pnlred6.Size = New System.Drawing.Size(20, 13) + Me.pnlred6.TabIndex = 12 + Me.pnlred6.Visible = False + ' + 'pnlred15 + ' + Me.pnlred15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred15.Location = New System.Drawing.Point(233, 25) + Me.pnlred15.Name = "pnlred15" + Me.pnlred15.Size = New System.Drawing.Size(20, 13) + Me.pnlred15.TabIndex = 15 + Me.pnlred15.Visible = False + ' + 'pnlred2 + ' + Me.pnlred2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred2.Location = New System.Drawing.Point(103, 8) + Me.pnlred2.Name = "pnlred2" + Me.pnlred2.Size = New System.Drawing.Size(20, 13) + Me.pnlred2.TabIndex = 4 + Me.pnlred2.Visible = False + ' + 'pnlred13 + ' + Me.pnlred13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred13.Location = New System.Drawing.Point(181, 25) + Me.pnlred13.Name = "pnlred13" + Me.pnlred13.Size = New System.Drawing.Size(20, 13) + Me.pnlred13.TabIndex = 11 + Me.pnlred13.Visible = False + ' + 'pnlred11 + ' + Me.pnlred11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred11.Location = New System.Drawing.Point(129, 25) + Me.pnlred11.Name = "pnlred11" + Me.pnlred11.Size = New System.Drawing.Size(20, 13) + Me.pnlred11.TabIndex = 7 + Me.pnlred11.Visible = False + ' + 'pnlred7 + ' + Me.pnlred7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred7.Location = New System.Drawing.Point(233, 8) + Me.pnlred7.Name = "pnlred7" + Me.pnlred7.Size = New System.Drawing.Size(20, 13) + Me.pnlred7.TabIndex = 14 + Me.pnlred7.Visible = False + ' + 'pnlred9 + ' + Me.pnlred9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred9.Location = New System.Drawing.Point(77, 25) + Me.pnlred9.Name = "pnlred9" + Me.pnlred9.Size = New System.Drawing.Size(20, 13) + Me.pnlred9.TabIndex = 3 + Me.pnlred9.Visible = False + ' + 'pnlred5 + ' + Me.pnlred5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred5.Location = New System.Drawing.Point(181, 8) + Me.pnlred5.Name = "pnlred5" + Me.pnlred5.Size = New System.Drawing.Size(20, 13) + Me.pnlred5.TabIndex = 10 + Me.pnlred5.Visible = False + ' + 'pnlred3 + ' + Me.pnlred3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred3.Location = New System.Drawing.Point(129, 8) + Me.pnlred3.Name = "pnlred3" + Me.pnlred3.Size = New System.Drawing.Size(20, 13) + Me.pnlred3.TabIndex = 6 + Me.pnlred3.Visible = False + ' + 'pnlred1 + ' + Me.pnlred1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlred1.Location = New System.Drawing.Point(77, 8) + Me.pnlred1.Name = "pnlred1" + Me.pnlred1.Size = New System.Drawing.Size(20, 13) + Me.pnlred1.TabIndex = 2 + Me.pnlred1.Visible = False + ' + 'lblredlevel + ' + Me.lblredlevel.AutoSize = True + Me.lblredlevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblredlevel.Location = New System.Drawing.Point(5, 25) + Me.lblredlevel.Name = "lblredlevel" + Me.lblredlevel.Size = New System.Drawing.Size(49, 15) + Me.lblredlevel.TabIndex = 1 + Me.lblredlevel.Text = "Level: 4" + ' + 'Label21 + ' + Me.Label21.AutoSize = True + Me.Label21.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label21.Location = New System.Drawing.Point(3, 2) + Me.Label21.Name = "Label21" + Me.Label21.Size = New System.Drawing.Size(42, 23) + Me.Label21.TabIndex = 0 + Me.Label21.Text = "Red" + ' + 'pnlbrowncolours + ' + Me.pnlbrowncolours.BackColor = System.Drawing.Color.White + Me.pnlbrowncolours.Controls.Add(Me.pnlbrownoptions) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrowncustomcolour) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown16) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown12) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown14) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown10) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown8) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown4) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown6) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown15) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown2) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown13) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown11) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown7) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown9) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown5) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown3) + Me.pnlbrowncolours.Controls.Add(Me.pnlbrown1) + Me.pnlbrowncolours.Controls.Add(Me.lblbrownlevel) + Me.pnlbrowncolours.Controls.Add(Me.Label19) + Me.pnlbrowncolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlbrowncolours.Location = New System.Drawing.Point(0, 429) + Me.pnlbrowncolours.Name = "pnlbrowncolours" + Me.pnlbrowncolours.Size = New System.Drawing.Size(443, 46) + Me.pnlbrowncolours.TabIndex = 8 + Me.pnlbrowncolours.Visible = False + ' + 'pnlbrownoptions + ' + Me.pnlbrownoptions.Controls.Add(Me.Label29) + Me.pnlbrownoptions.Controls.Add(Me.txtbrownsblue) + Me.pnlbrownoptions.Controls.Add(Me.txtbrownsred) + Me.pnlbrownoptions.Controls.Add(Me.Label30) + Me.pnlbrownoptions.Controls.Add(Me.Label31) + Me.pnlbrownoptions.Controls.Add(Me.txtbrownsgreen) + Me.pnlbrownoptions.Location = New System.Drawing.Point(282, 3) + Me.pnlbrownoptions.Name = "pnlbrownoptions" + Me.pnlbrownoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlbrownoptions.TabIndex = 31 + Me.pnlbrownoptions.Visible = False + ' + 'Label29 + ' + Me.Label29.AutoSize = True + Me.Label29.BackColor = System.Drawing.Color.Transparent + Me.Label29.Location = New System.Drawing.Point(64, 24) + Me.Label29.Name = "Label29" + Me.Label29.Size = New System.Drawing.Size(31, 13) + Me.Label29.TabIndex = 26 + Me.Label29.Text = "Blue:" + ' + 'txtbrownsblue + ' + Me.txtbrownsblue.BackColor = System.Drawing.Color.White + Me.txtbrownsblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbrownsblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtbrownsblue.Location = New System.Drawing.Point(95, 22) + Me.txtbrownsblue.Multiline = True + Me.txtbrownsblue.Name = "txtbrownsblue" + Me.txtbrownsblue.Size = New System.Drawing.Size(23, 17) + Me.txtbrownsblue.TabIndex = 25 + Me.txtbrownsblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtbrownsred + ' + Me.txtbrownsred.BackColor = System.Drawing.Color.White + Me.txtbrownsred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbrownsred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtbrownsred.Location = New System.Drawing.Point(64, 2) + Me.txtbrownsred.Multiline = True + Me.txtbrownsred.Name = "txtbrownsred" + Me.txtbrownsred.Size = New System.Drawing.Size(23, 17) + Me.txtbrownsred.TabIndex = 21 + Me.txtbrownsred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label30 + ' + Me.Label30.AutoSize = True + Me.Label30.BackColor = System.Drawing.Color.Transparent + Me.Label30.Location = New System.Drawing.Point(1, 23) + Me.Label30.Name = "Label30" + Me.Label30.Size = New System.Drawing.Size(39, 13) + Me.Label30.TabIndex = 24 + Me.Label30.Text = "Green:" + ' + 'Label31 + ' + Me.Label31.AutoSize = True + Me.Label31.BackColor = System.Drawing.Color.Transparent + Me.Label31.Location = New System.Drawing.Point(33, 4) + Me.Label31.Name = "Label31" + Me.Label31.Size = New System.Drawing.Size(30, 13) + Me.Label31.TabIndex = 22 + Me.Label31.Text = "Red:" + ' + 'txtbrownsgreen + ' + Me.txtbrownsgreen.BackColor = System.Drawing.Color.White + Me.txtbrownsgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbrownsgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtbrownsgreen.Location = New System.Drawing.Point(40, 22) + Me.txtbrownsgreen.Multiline = True + Me.txtbrownsgreen.Name = "txtbrownsgreen" + Me.txtbrownsgreen.Size = New System.Drawing.Size(23, 17) + Me.txtbrownsgreen.TabIndex = 23 + Me.txtbrownsgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlbrowncustomcolour + ' + Me.pnlbrowncustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrowncustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlbrowncustomcolour.Name = "pnlbrowncustomcolour" + Me.pnlbrowncustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlbrowncustomcolour.TabIndex = 18 + Me.pnlbrowncustomcolour.Visible = False + ' + 'pnlbrown16 + ' + Me.pnlbrown16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown16.Location = New System.Drawing.Point(259, 25) + Me.pnlbrown16.Name = "pnlbrown16" + Me.pnlbrown16.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown16.TabIndex = 17 + Me.pnlbrown16.Visible = False + ' + 'pnlbrown12 + ' + Me.pnlbrown12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown12.Location = New System.Drawing.Point(155, 25) + Me.pnlbrown12.Name = "pnlbrown12" + Me.pnlbrown12.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown12.TabIndex = 9 + Me.pnlbrown12.Visible = False + ' + 'pnlbrown14 + ' + Me.pnlbrown14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown14.Location = New System.Drawing.Point(207, 25) + Me.pnlbrown14.Name = "pnlbrown14" + Me.pnlbrown14.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown14.TabIndex = 13 + Me.pnlbrown14.Visible = False + ' + 'pnlbrown10 + ' + Me.pnlbrown10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown10.Location = New System.Drawing.Point(103, 25) + Me.pnlbrown10.Name = "pnlbrown10" + Me.pnlbrown10.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown10.TabIndex = 5 + Me.pnlbrown10.Visible = False + ' + 'pnlbrown8 + ' + Me.pnlbrown8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown8.Location = New System.Drawing.Point(259, 8) + Me.pnlbrown8.Name = "pnlbrown8" + Me.pnlbrown8.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown8.TabIndex = 16 + Me.pnlbrown8.Visible = False + ' + 'pnlbrown4 + ' + Me.pnlbrown4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown4.Location = New System.Drawing.Point(155, 8) + Me.pnlbrown4.Name = "pnlbrown4" + Me.pnlbrown4.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown4.TabIndex = 8 + Me.pnlbrown4.Visible = False + ' + 'pnlbrown6 + ' + Me.pnlbrown6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown6.Location = New System.Drawing.Point(207, 8) + Me.pnlbrown6.Name = "pnlbrown6" + Me.pnlbrown6.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown6.TabIndex = 12 + Me.pnlbrown6.Visible = False + ' + 'pnlbrown15 + ' + Me.pnlbrown15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown15.Location = New System.Drawing.Point(233, 25) + Me.pnlbrown15.Name = "pnlbrown15" + Me.pnlbrown15.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown15.TabIndex = 15 + Me.pnlbrown15.Visible = False + ' + 'pnlbrown2 + ' + Me.pnlbrown2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown2.Location = New System.Drawing.Point(103, 8) + Me.pnlbrown2.Name = "pnlbrown2" + Me.pnlbrown2.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown2.TabIndex = 4 + Me.pnlbrown2.Visible = False + ' + 'pnlbrown13 + ' + Me.pnlbrown13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown13.Location = New System.Drawing.Point(181, 25) + Me.pnlbrown13.Name = "pnlbrown13" + Me.pnlbrown13.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown13.TabIndex = 11 + Me.pnlbrown13.Visible = False + ' + 'pnlbrown11 + ' + Me.pnlbrown11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown11.Location = New System.Drawing.Point(129, 25) + Me.pnlbrown11.Name = "pnlbrown11" + Me.pnlbrown11.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown11.TabIndex = 7 + Me.pnlbrown11.Visible = False + ' + 'pnlbrown7 + ' + Me.pnlbrown7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown7.Location = New System.Drawing.Point(233, 8) + Me.pnlbrown7.Name = "pnlbrown7" + Me.pnlbrown7.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown7.TabIndex = 14 + Me.pnlbrown7.Visible = False + ' + 'pnlbrown9 + ' + Me.pnlbrown9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown9.Location = New System.Drawing.Point(77, 25) + Me.pnlbrown9.Name = "pnlbrown9" + Me.pnlbrown9.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown9.TabIndex = 3 + Me.pnlbrown9.Visible = False + ' + 'pnlbrown5 + ' + Me.pnlbrown5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown5.Location = New System.Drawing.Point(181, 8) + Me.pnlbrown5.Name = "pnlbrown5" + Me.pnlbrown5.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown5.TabIndex = 10 + Me.pnlbrown5.Visible = False + ' + 'pnlbrown3 + ' + Me.pnlbrown3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown3.Location = New System.Drawing.Point(129, 8) + Me.pnlbrown3.Name = "pnlbrown3" + Me.pnlbrown3.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown3.TabIndex = 6 + Me.pnlbrown3.Visible = False + ' + 'pnlbrown1 + ' + Me.pnlbrown1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbrown1.Location = New System.Drawing.Point(77, 8) + Me.pnlbrown1.Name = "pnlbrown1" + Me.pnlbrown1.Size = New System.Drawing.Size(20, 13) + Me.pnlbrown1.TabIndex = 2 + Me.pnlbrown1.Visible = False + ' + 'lblbrownlevel + ' + Me.lblbrownlevel.AutoSize = True + Me.lblbrownlevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbrownlevel.Location = New System.Drawing.Point(5, 25) + Me.lblbrownlevel.Name = "lblbrownlevel" + Me.lblbrownlevel.Size = New System.Drawing.Size(49, 15) + Me.lblbrownlevel.TabIndex = 1 + Me.lblbrownlevel.Text = "Level: 4" + ' + 'Label19 + ' + Me.Label19.AutoSize = True + Me.Label19.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label19.Location = New System.Drawing.Point(3, 2) + Me.Label19.Name = "Label19" + Me.Label19.Size = New System.Drawing.Size(67, 23) + Me.Label19.TabIndex = 0 + Me.Label19.Text = "Brown" + ' + 'pnlorangecolours + ' + Me.pnlorangecolours.BackColor = System.Drawing.Color.White + Me.pnlorangecolours.Controls.Add(Me.pnlorangeoptions) + Me.pnlorangecolours.Controls.Add(Me.pnlorangecustomcolour) + Me.pnlorangecolours.Controls.Add(Me.pnlorange16) + Me.pnlorangecolours.Controls.Add(Me.pnlorange12) + Me.pnlorangecolours.Controls.Add(Me.pnlorange14) + Me.pnlorangecolours.Controls.Add(Me.pnlorange10) + Me.pnlorangecolours.Controls.Add(Me.pnlorange8) + Me.pnlorangecolours.Controls.Add(Me.pnlorange4) + Me.pnlorangecolours.Controls.Add(Me.pnlorange6) + Me.pnlorangecolours.Controls.Add(Me.pnlorange15) + Me.pnlorangecolours.Controls.Add(Me.pnlorange2) + Me.pnlorangecolours.Controls.Add(Me.pnlorange13) + Me.pnlorangecolours.Controls.Add(Me.pnlorange11) + Me.pnlorangecolours.Controls.Add(Me.pnlorange7) + Me.pnlorangecolours.Controls.Add(Me.pnlorange9) + Me.pnlorangecolours.Controls.Add(Me.pnlorange5) + Me.pnlorangecolours.Controls.Add(Me.pnlorange3) + Me.pnlorangecolours.Controls.Add(Me.pnlorange1) + Me.pnlorangecolours.Controls.Add(Me.lblorangelevel) + Me.pnlorangecolours.Controls.Add(Me.Label13) + Me.pnlorangecolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlorangecolours.Location = New System.Drawing.Point(0, 383) + Me.pnlorangecolours.Name = "pnlorangecolours" + Me.pnlorangecolours.Size = New System.Drawing.Size(443, 46) + Me.pnlorangecolours.TabIndex = 7 + Me.pnlorangecolours.Visible = False + ' + 'pnlorangeoptions + ' + Me.pnlorangeoptions.Controls.Add(Me.Label25) + Me.pnlorangeoptions.Controls.Add(Me.txtorangesblue) + Me.pnlorangeoptions.Controls.Add(Me.txtorangesred) + Me.pnlorangeoptions.Controls.Add(Me.Label27) + Me.pnlorangeoptions.Controls.Add(Me.Label28) + Me.pnlorangeoptions.Controls.Add(Me.txtorangesgreen) + Me.pnlorangeoptions.Location = New System.Drawing.Point(282, 3) + Me.pnlorangeoptions.Name = "pnlorangeoptions" + Me.pnlorangeoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlorangeoptions.TabIndex = 30 + Me.pnlorangeoptions.Visible = False + ' + 'Label25 + ' + Me.Label25.AutoSize = True + Me.Label25.BackColor = System.Drawing.Color.Transparent + Me.Label25.Location = New System.Drawing.Point(64, 24) + Me.Label25.Name = "Label25" + Me.Label25.Size = New System.Drawing.Size(31, 13) + Me.Label25.TabIndex = 26 + Me.Label25.Text = "Blue:" + ' + 'txtorangesblue + ' + Me.txtorangesblue.BackColor = System.Drawing.Color.White + Me.txtorangesblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtorangesblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtorangesblue.Location = New System.Drawing.Point(95, 22) + Me.txtorangesblue.Multiline = True + Me.txtorangesblue.Name = "txtorangesblue" + Me.txtorangesblue.Size = New System.Drawing.Size(23, 17) + Me.txtorangesblue.TabIndex = 25 + Me.txtorangesblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtorangesred + ' + Me.txtorangesred.BackColor = System.Drawing.Color.White + Me.txtorangesred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtorangesred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtorangesred.Location = New System.Drawing.Point(64, 2) + Me.txtorangesred.Multiline = True + Me.txtorangesred.Name = "txtorangesred" + Me.txtorangesred.Size = New System.Drawing.Size(23, 17) + Me.txtorangesred.TabIndex = 21 + Me.txtorangesred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label27 + ' + Me.Label27.AutoSize = True + Me.Label27.BackColor = System.Drawing.Color.Transparent + Me.Label27.Location = New System.Drawing.Point(1, 23) + Me.Label27.Name = "Label27" + Me.Label27.Size = New System.Drawing.Size(39, 13) + Me.Label27.TabIndex = 24 + Me.Label27.Text = "Green:" + ' + 'Label28 + ' + Me.Label28.AutoSize = True + Me.Label28.BackColor = System.Drawing.Color.Transparent + Me.Label28.Location = New System.Drawing.Point(33, 4) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(30, 13) + Me.Label28.TabIndex = 22 + Me.Label28.Text = "Red:" + ' + 'txtorangesgreen + ' + Me.txtorangesgreen.BackColor = System.Drawing.Color.White + Me.txtorangesgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtorangesgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtorangesgreen.Location = New System.Drawing.Point(40, 22) + Me.txtorangesgreen.Multiline = True + Me.txtorangesgreen.Name = "txtorangesgreen" + Me.txtorangesgreen.Size = New System.Drawing.Size(23, 17) + Me.txtorangesgreen.TabIndex = 23 + Me.txtorangesgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlorangecustomcolour + ' + Me.pnlorangecustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorangecustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlorangecustomcolour.Name = "pnlorangecustomcolour" + Me.pnlorangecustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlorangecustomcolour.TabIndex = 18 + Me.pnlorangecustomcolour.Visible = False + ' + 'pnlorange16 + ' + Me.pnlorange16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange16.Location = New System.Drawing.Point(259, 25) + Me.pnlorange16.Name = "pnlorange16" + Me.pnlorange16.Size = New System.Drawing.Size(20, 13) + Me.pnlorange16.TabIndex = 17 + Me.pnlorange16.Visible = False + ' + 'pnlorange12 + ' + Me.pnlorange12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange12.Location = New System.Drawing.Point(155, 25) + Me.pnlorange12.Name = "pnlorange12" + Me.pnlorange12.Size = New System.Drawing.Size(20, 13) + Me.pnlorange12.TabIndex = 9 + Me.pnlorange12.Visible = False + ' + 'pnlorange14 + ' + Me.pnlorange14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange14.Location = New System.Drawing.Point(207, 25) + Me.pnlorange14.Name = "pnlorange14" + Me.pnlorange14.Size = New System.Drawing.Size(20, 13) + Me.pnlorange14.TabIndex = 13 + Me.pnlorange14.Visible = False + ' + 'pnlorange10 + ' + Me.pnlorange10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange10.Location = New System.Drawing.Point(103, 25) + Me.pnlorange10.Name = "pnlorange10" + Me.pnlorange10.Size = New System.Drawing.Size(20, 13) + Me.pnlorange10.TabIndex = 5 + Me.pnlorange10.Visible = False + ' + 'pnlorange8 + ' + Me.pnlorange8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange8.Location = New System.Drawing.Point(259, 8) + Me.pnlorange8.Name = "pnlorange8" + Me.pnlorange8.Size = New System.Drawing.Size(20, 13) + Me.pnlorange8.TabIndex = 16 + Me.pnlorange8.Visible = False + ' + 'pnlorange4 + ' + Me.pnlorange4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange4.Location = New System.Drawing.Point(155, 8) + Me.pnlorange4.Name = "pnlorange4" + Me.pnlorange4.Size = New System.Drawing.Size(20, 13) + Me.pnlorange4.TabIndex = 8 + Me.pnlorange4.Visible = False + ' + 'pnlorange6 + ' + Me.pnlorange6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange6.Location = New System.Drawing.Point(207, 8) + Me.pnlorange6.Name = "pnlorange6" + Me.pnlorange6.Size = New System.Drawing.Size(20, 13) + Me.pnlorange6.TabIndex = 12 + Me.pnlorange6.Visible = False + ' + 'pnlorange15 + ' + Me.pnlorange15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange15.Location = New System.Drawing.Point(233, 25) + Me.pnlorange15.Name = "pnlorange15" + Me.pnlorange15.Size = New System.Drawing.Size(20, 13) + Me.pnlorange15.TabIndex = 15 + Me.pnlorange15.Visible = False + ' + 'pnlorange2 + ' + Me.pnlorange2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange2.Location = New System.Drawing.Point(103, 8) + Me.pnlorange2.Name = "pnlorange2" + Me.pnlorange2.Size = New System.Drawing.Size(20, 13) + Me.pnlorange2.TabIndex = 4 + Me.pnlorange2.Visible = False + ' + 'pnlorange13 + ' + Me.pnlorange13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange13.Location = New System.Drawing.Point(181, 25) + Me.pnlorange13.Name = "pnlorange13" + Me.pnlorange13.Size = New System.Drawing.Size(20, 13) + Me.pnlorange13.TabIndex = 11 + Me.pnlorange13.Visible = False + ' + 'pnlorange11 + ' + Me.pnlorange11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange11.Location = New System.Drawing.Point(129, 25) + Me.pnlorange11.Name = "pnlorange11" + Me.pnlorange11.Size = New System.Drawing.Size(20, 13) + Me.pnlorange11.TabIndex = 7 + Me.pnlorange11.Visible = False + ' + 'pnlorange7 + ' + Me.pnlorange7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange7.Location = New System.Drawing.Point(233, 8) + Me.pnlorange7.Name = "pnlorange7" + Me.pnlorange7.Size = New System.Drawing.Size(20, 13) + Me.pnlorange7.TabIndex = 14 + Me.pnlorange7.Visible = False + ' + 'pnlorange9 + ' + Me.pnlorange9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange9.Location = New System.Drawing.Point(77, 25) + Me.pnlorange9.Name = "pnlorange9" + Me.pnlorange9.Size = New System.Drawing.Size(20, 13) + Me.pnlorange9.TabIndex = 3 + Me.pnlorange9.Visible = False + ' + 'pnlorange5 + ' + Me.pnlorange5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange5.Location = New System.Drawing.Point(181, 8) + Me.pnlorange5.Name = "pnlorange5" + Me.pnlorange5.Size = New System.Drawing.Size(20, 13) + Me.pnlorange5.TabIndex = 10 + Me.pnlorange5.Visible = False + ' + 'pnlorange3 + ' + Me.pnlorange3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange3.Location = New System.Drawing.Point(129, 8) + Me.pnlorange3.Name = "pnlorange3" + Me.pnlorange3.Size = New System.Drawing.Size(20, 13) + Me.pnlorange3.TabIndex = 6 + Me.pnlorange3.Visible = False + ' + 'pnlorange1 + ' + Me.pnlorange1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlorange1.Location = New System.Drawing.Point(77, 8) + Me.pnlorange1.Name = "pnlorange1" + Me.pnlorange1.Size = New System.Drawing.Size(20, 13) + Me.pnlorange1.TabIndex = 2 + Me.pnlorange1.Visible = False + ' + 'lblorangelevel + ' + Me.lblorangelevel.AutoSize = True + Me.lblorangelevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblorangelevel.Location = New System.Drawing.Point(5, 25) + Me.lblorangelevel.Name = "lblorangelevel" + Me.lblorangelevel.Size = New System.Drawing.Size(49, 15) + Me.lblorangelevel.TabIndex = 1 + Me.lblorangelevel.Text = "Level: 4" + ' + 'Label13 + ' + Me.Label13.AutoSize = True + Me.Label13.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label13.Location = New System.Drawing.Point(3, 2) + Me.Label13.Name = "Label13" + Me.Label13.Size = New System.Drawing.Size(74, 23) + Me.Label13.TabIndex = 0 + Me.Label13.Text = "Orange" + ' + 'pnlyellowcolours + ' + Me.pnlyellowcolours.BackColor = System.Drawing.Color.White + Me.pnlyellowcolours.Controls.Add(Me.pnlyellowoptions) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellowcustomcolour) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow16) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow12) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow14) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow10) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow8) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow4) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow6) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow15) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow2) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow13) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow11) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow7) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow9) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow5) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow3) + Me.pnlyellowcolours.Controls.Add(Me.pnlyellow1) + Me.pnlyellowcolours.Controls.Add(Me.lblyellowlevel) + Me.pnlyellowcolours.Controls.Add(Me.Label11) + Me.pnlyellowcolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlyellowcolours.Location = New System.Drawing.Point(0, 337) + Me.pnlyellowcolours.Name = "pnlyellowcolours" + Me.pnlyellowcolours.Size = New System.Drawing.Size(443, 46) + Me.pnlyellowcolours.TabIndex = 6 + Me.pnlyellowcolours.Visible = False + ' + 'pnlyellowoptions + ' + Me.pnlyellowoptions.Controls.Add(Me.Label20) + Me.pnlyellowoptions.Controls.Add(Me.txtyellowsblue) + Me.pnlyellowoptions.Controls.Add(Me.txtyellowsred) + Me.pnlyellowoptions.Controls.Add(Me.Label22) + Me.pnlyellowoptions.Controls.Add(Me.Label24) + Me.pnlyellowoptions.Controls.Add(Me.txtyellowsgreen) + Me.pnlyellowoptions.Location = New System.Drawing.Point(282, 3) + Me.pnlyellowoptions.Name = "pnlyellowoptions" + Me.pnlyellowoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlyellowoptions.TabIndex = 29 + Me.pnlyellowoptions.Visible = False + ' + 'Label20 + ' + Me.Label20.AutoSize = True + Me.Label20.BackColor = System.Drawing.Color.Transparent + Me.Label20.Location = New System.Drawing.Point(64, 24) + Me.Label20.Name = "Label20" + Me.Label20.Size = New System.Drawing.Size(31, 13) + Me.Label20.TabIndex = 26 + Me.Label20.Text = "Blue:" + ' + 'txtyellowsblue + ' + Me.txtyellowsblue.BackColor = System.Drawing.Color.White + Me.txtyellowsblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtyellowsblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtyellowsblue.Location = New System.Drawing.Point(95, 22) + Me.txtyellowsblue.Multiline = True + Me.txtyellowsblue.Name = "txtyellowsblue" + Me.txtyellowsblue.Size = New System.Drawing.Size(23, 17) + Me.txtyellowsblue.TabIndex = 25 + Me.txtyellowsblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtyellowsred + ' + Me.txtyellowsred.BackColor = System.Drawing.Color.White + Me.txtyellowsred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtyellowsred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtyellowsred.Location = New System.Drawing.Point(64, 2) + Me.txtyellowsred.Multiline = True + Me.txtyellowsred.Name = "txtyellowsred" + Me.txtyellowsred.Size = New System.Drawing.Size(23, 17) + Me.txtyellowsred.TabIndex = 21 + Me.txtyellowsred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label22 + ' + Me.Label22.AutoSize = True + Me.Label22.BackColor = System.Drawing.Color.Transparent + Me.Label22.Location = New System.Drawing.Point(1, 23) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(39, 13) + Me.Label22.TabIndex = 24 + Me.Label22.Text = "Green:" + ' + 'Label24 + ' + Me.Label24.AutoSize = True + Me.Label24.BackColor = System.Drawing.Color.Transparent + Me.Label24.Location = New System.Drawing.Point(33, 4) + Me.Label24.Name = "Label24" + Me.Label24.Size = New System.Drawing.Size(30, 13) + Me.Label24.TabIndex = 22 + Me.Label24.Text = "Red:" + ' + 'txtyellowsgreen + ' + Me.txtyellowsgreen.BackColor = System.Drawing.Color.White + Me.txtyellowsgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtyellowsgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtyellowsgreen.Location = New System.Drawing.Point(40, 22) + Me.txtyellowsgreen.Multiline = True + Me.txtyellowsgreen.Name = "txtyellowsgreen" + Me.txtyellowsgreen.Size = New System.Drawing.Size(23, 17) + Me.txtyellowsgreen.TabIndex = 23 + Me.txtyellowsgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlyellowcustomcolour + ' + Me.pnlyellowcustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellowcustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlyellowcustomcolour.Name = "pnlyellowcustomcolour" + Me.pnlyellowcustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlyellowcustomcolour.TabIndex = 18 + Me.pnlyellowcustomcolour.Visible = False + ' + 'pnlyellow16 + ' + Me.pnlyellow16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow16.Location = New System.Drawing.Point(259, 25) + Me.pnlyellow16.Name = "pnlyellow16" + Me.pnlyellow16.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow16.TabIndex = 17 + Me.pnlyellow16.Visible = False + ' + 'pnlyellow12 + ' + Me.pnlyellow12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow12.Location = New System.Drawing.Point(155, 25) + Me.pnlyellow12.Name = "pnlyellow12" + Me.pnlyellow12.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow12.TabIndex = 9 + Me.pnlyellow12.Visible = False + ' + 'pnlyellow14 + ' + Me.pnlyellow14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow14.Location = New System.Drawing.Point(207, 25) + Me.pnlyellow14.Name = "pnlyellow14" + Me.pnlyellow14.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow14.TabIndex = 13 + Me.pnlyellow14.Visible = False + ' + 'pnlyellow10 + ' + Me.pnlyellow10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow10.Location = New System.Drawing.Point(103, 25) + Me.pnlyellow10.Name = "pnlyellow10" + Me.pnlyellow10.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow10.TabIndex = 5 + Me.pnlyellow10.Visible = False + ' + 'pnlyellow8 + ' + Me.pnlyellow8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow8.Location = New System.Drawing.Point(259, 8) + Me.pnlyellow8.Name = "pnlyellow8" + Me.pnlyellow8.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow8.TabIndex = 16 + Me.pnlyellow8.Visible = False + ' + 'pnlyellow4 + ' + Me.pnlyellow4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow4.Location = New System.Drawing.Point(155, 8) + Me.pnlyellow4.Name = "pnlyellow4" + Me.pnlyellow4.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow4.TabIndex = 8 + Me.pnlyellow4.Visible = False + ' + 'pnlyellow6 + ' + Me.pnlyellow6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow6.Location = New System.Drawing.Point(207, 8) + Me.pnlyellow6.Name = "pnlyellow6" + Me.pnlyellow6.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow6.TabIndex = 12 + Me.pnlyellow6.Visible = False + ' + 'pnlyellow15 + ' + Me.pnlyellow15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow15.Location = New System.Drawing.Point(233, 25) + Me.pnlyellow15.Name = "pnlyellow15" + Me.pnlyellow15.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow15.TabIndex = 15 + Me.pnlyellow15.Visible = False + ' + 'pnlyellow2 + ' + Me.pnlyellow2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow2.Location = New System.Drawing.Point(103, 8) + Me.pnlyellow2.Name = "pnlyellow2" + Me.pnlyellow2.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow2.TabIndex = 4 + Me.pnlyellow2.Visible = False + ' + 'pnlyellow13 + ' + Me.pnlyellow13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow13.Location = New System.Drawing.Point(181, 25) + Me.pnlyellow13.Name = "pnlyellow13" + Me.pnlyellow13.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow13.TabIndex = 11 + Me.pnlyellow13.Visible = False + ' + 'pnlyellow11 + ' + Me.pnlyellow11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow11.Location = New System.Drawing.Point(129, 25) + Me.pnlyellow11.Name = "pnlyellow11" + Me.pnlyellow11.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow11.TabIndex = 7 + Me.pnlyellow11.Visible = False + ' + 'pnlyellow7 + ' + Me.pnlyellow7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow7.Location = New System.Drawing.Point(233, 8) + Me.pnlyellow7.Name = "pnlyellow7" + Me.pnlyellow7.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow7.TabIndex = 14 + Me.pnlyellow7.Visible = False + ' + 'pnlyellow9 + ' + Me.pnlyellow9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow9.Location = New System.Drawing.Point(77, 25) + Me.pnlyellow9.Name = "pnlyellow9" + Me.pnlyellow9.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow9.TabIndex = 3 + Me.pnlyellow9.Visible = False + ' + 'pnlyellow5 + ' + Me.pnlyellow5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow5.Location = New System.Drawing.Point(181, 8) + Me.pnlyellow5.Name = "pnlyellow5" + Me.pnlyellow5.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow5.TabIndex = 10 + Me.pnlyellow5.Visible = False + ' + 'pnlyellow3 + ' + Me.pnlyellow3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow3.Location = New System.Drawing.Point(129, 8) + Me.pnlyellow3.Name = "pnlyellow3" + Me.pnlyellow3.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow3.TabIndex = 6 + Me.pnlyellow3.Visible = False + ' + 'pnlyellow1 + ' + Me.pnlyellow1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlyellow1.Location = New System.Drawing.Point(77, 8) + Me.pnlyellow1.Name = "pnlyellow1" + Me.pnlyellow1.Size = New System.Drawing.Size(20, 13) + Me.pnlyellow1.TabIndex = 2 + Me.pnlyellow1.Visible = False + ' + 'lblyellowlevel + ' + Me.lblyellowlevel.AutoSize = True + Me.lblyellowlevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblyellowlevel.Location = New System.Drawing.Point(5, 25) + Me.lblyellowlevel.Name = "lblyellowlevel" + Me.lblyellowlevel.Size = New System.Drawing.Size(49, 15) + Me.lblyellowlevel.TabIndex = 1 + Me.lblyellowlevel.Text = "Level: 4" + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label11.Location = New System.Drawing.Point(3, 2) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(65, 23) + Me.Label11.TabIndex = 0 + Me.Label11.Text = "Yellow" + ' + 'pnlgreencolours + ' + Me.pnlgreencolours.BackColor = System.Drawing.Color.White + Me.pnlgreencolours.Controls.Add(Me.pnlgreenoptions) + Me.pnlgreencolours.Controls.Add(Me.pnlgreencustomcolour) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen16) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen12) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen14) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen10) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen8) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen4) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen6) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen15) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen2) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen13) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen11) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen7) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen9) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen5) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen3) + Me.pnlgreencolours.Controls.Add(Me.pnlgreen1) + Me.pnlgreencolours.Controls.Add(Me.lblgreenlevel) + Me.pnlgreencolours.Controls.Add(Me.Label9) + Me.pnlgreencolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlgreencolours.Location = New System.Drawing.Point(0, 291) + Me.pnlgreencolours.Name = "pnlgreencolours" + Me.pnlgreencolours.Size = New System.Drawing.Size(443, 46) + Me.pnlgreencolours.TabIndex = 5 + Me.pnlgreencolours.Visible = False + ' + 'pnlgreenoptions + ' + Me.pnlgreenoptions.Controls.Add(Me.Label15) + Me.pnlgreenoptions.Controls.Add(Me.txtgreensred) + Me.pnlgreenoptions.Controls.Add(Me.txtgreensgreen) + Me.pnlgreenoptions.Controls.Add(Me.Label16) + Me.pnlgreenoptions.Controls.Add(Me.Label18) + Me.pnlgreenoptions.Controls.Add(Me.txtgreensblue) + Me.pnlgreenoptions.Location = New System.Drawing.Point(282, 3) + Me.pnlgreenoptions.Name = "pnlgreenoptions" + Me.pnlgreenoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlgreenoptions.TabIndex = 29 + Me.pnlgreenoptions.Visible = False + ' + 'Label15 + ' + Me.Label15.AutoSize = True + Me.Label15.BackColor = System.Drawing.Color.Transparent + Me.Label15.Location = New System.Drawing.Point(62, 24) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(30, 13) + Me.Label15.TabIndex = 26 + Me.Label15.Text = "Red:" + ' + 'txtgreensred + ' + Me.txtgreensred.BackColor = System.Drawing.Color.White + Me.txtgreensred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtgreensred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtgreensred.Location = New System.Drawing.Point(92, 22) + Me.txtgreensred.Multiline = True + Me.txtgreensred.Name = "txtgreensred" + Me.txtgreensred.Size = New System.Drawing.Size(23, 17) + Me.txtgreensred.TabIndex = 25 + Me.txtgreensred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtgreensgreen + ' + Me.txtgreensgreen.BackColor = System.Drawing.Color.White + Me.txtgreensgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtgreensgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtgreensgreen.Location = New System.Drawing.Point(66, 2) + Me.txtgreensgreen.Multiline = True + Me.txtgreensgreen.Name = "txtgreensgreen" + Me.txtgreensgreen.Size = New System.Drawing.Size(23, 17) + Me.txtgreensgreen.TabIndex = 21 + Me.txtgreensgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label16 + ' + Me.Label16.AutoSize = True + Me.Label16.BackColor = System.Drawing.Color.Transparent + Me.Label16.Location = New System.Drawing.Point(2, 23) + Me.Label16.Name = "Label16" + Me.Label16.Size = New System.Drawing.Size(31, 13) + Me.Label16.TabIndex = 24 + Me.Label16.Text = "Blue:" + ' + 'Label18 + ' + Me.Label18.AutoSize = True + Me.Label18.BackColor = System.Drawing.Color.Transparent + Me.Label18.Location = New System.Drawing.Point(28, 4) + Me.Label18.Name = "Label18" + Me.Label18.Size = New System.Drawing.Size(39, 13) + Me.Label18.TabIndex = 22 + Me.Label18.Text = "Green:" + ' + 'txtgreensblue + ' + Me.txtgreensblue.BackColor = System.Drawing.Color.White + Me.txtgreensblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtgreensblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtgreensblue.Location = New System.Drawing.Point(33, 22) + Me.txtgreensblue.Multiline = True + Me.txtgreensblue.Name = "txtgreensblue" + Me.txtgreensblue.Size = New System.Drawing.Size(23, 17) + Me.txtgreensblue.TabIndex = 23 + Me.txtgreensblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlgreencustomcolour + ' + Me.pnlgreencustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreencustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlgreencustomcolour.Name = "pnlgreencustomcolour" + Me.pnlgreencustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlgreencustomcolour.TabIndex = 18 + Me.pnlgreencustomcolour.Visible = False + ' + 'pnlgreen16 + ' + Me.pnlgreen16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen16.Location = New System.Drawing.Point(259, 25) + Me.pnlgreen16.Name = "pnlgreen16" + Me.pnlgreen16.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen16.TabIndex = 17 + Me.pnlgreen16.Visible = False + ' + 'pnlgreen12 + ' + Me.pnlgreen12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen12.Location = New System.Drawing.Point(155, 25) + Me.pnlgreen12.Name = "pnlgreen12" + Me.pnlgreen12.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen12.TabIndex = 9 + Me.pnlgreen12.Visible = False + ' + 'pnlgreen14 + ' + Me.pnlgreen14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen14.Location = New System.Drawing.Point(207, 25) + Me.pnlgreen14.Name = "pnlgreen14" + Me.pnlgreen14.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen14.TabIndex = 13 + Me.pnlgreen14.Visible = False + ' + 'pnlgreen10 + ' + Me.pnlgreen10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen10.Location = New System.Drawing.Point(103, 25) + Me.pnlgreen10.Name = "pnlgreen10" + Me.pnlgreen10.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen10.TabIndex = 5 + Me.pnlgreen10.Visible = False + ' + 'pnlgreen8 + ' + Me.pnlgreen8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen8.Location = New System.Drawing.Point(259, 8) + Me.pnlgreen8.Name = "pnlgreen8" + Me.pnlgreen8.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen8.TabIndex = 16 + Me.pnlgreen8.Visible = False + ' + 'pnlgreen4 + ' + Me.pnlgreen4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen4.Location = New System.Drawing.Point(155, 8) + Me.pnlgreen4.Name = "pnlgreen4" + Me.pnlgreen4.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen4.TabIndex = 8 + Me.pnlgreen4.Visible = False + ' + 'pnlgreen6 + ' + Me.pnlgreen6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen6.Location = New System.Drawing.Point(207, 8) + Me.pnlgreen6.Name = "pnlgreen6" + Me.pnlgreen6.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen6.TabIndex = 12 + Me.pnlgreen6.Visible = False + ' + 'pnlgreen15 + ' + Me.pnlgreen15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen15.Location = New System.Drawing.Point(233, 25) + Me.pnlgreen15.Name = "pnlgreen15" + Me.pnlgreen15.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen15.TabIndex = 15 + Me.pnlgreen15.Visible = False + ' + 'pnlgreen2 + ' + Me.pnlgreen2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen2.Location = New System.Drawing.Point(103, 8) + Me.pnlgreen2.Name = "pnlgreen2" + Me.pnlgreen2.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen2.TabIndex = 4 + Me.pnlgreen2.Visible = False + ' + 'pnlgreen13 + ' + Me.pnlgreen13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen13.Location = New System.Drawing.Point(181, 25) + Me.pnlgreen13.Name = "pnlgreen13" + Me.pnlgreen13.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen13.TabIndex = 11 + Me.pnlgreen13.Visible = False + ' + 'pnlgreen11 + ' + Me.pnlgreen11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen11.Location = New System.Drawing.Point(129, 25) + Me.pnlgreen11.Name = "pnlgreen11" + Me.pnlgreen11.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen11.TabIndex = 7 + Me.pnlgreen11.Visible = False + ' + 'pnlgreen7 + ' + Me.pnlgreen7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen7.Location = New System.Drawing.Point(233, 8) + Me.pnlgreen7.Name = "pnlgreen7" + Me.pnlgreen7.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen7.TabIndex = 14 + Me.pnlgreen7.Visible = False + ' + 'pnlgreen9 + ' + Me.pnlgreen9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen9.Location = New System.Drawing.Point(77, 25) + Me.pnlgreen9.Name = "pnlgreen9" + Me.pnlgreen9.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen9.TabIndex = 3 + Me.pnlgreen9.Visible = False + ' + 'pnlgreen5 + ' + Me.pnlgreen5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen5.Location = New System.Drawing.Point(181, 8) + Me.pnlgreen5.Name = "pnlgreen5" + Me.pnlgreen5.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen5.TabIndex = 10 + Me.pnlgreen5.Visible = False + ' + 'pnlgreen3 + ' + Me.pnlgreen3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen3.Location = New System.Drawing.Point(129, 8) + Me.pnlgreen3.Name = "pnlgreen3" + Me.pnlgreen3.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen3.TabIndex = 6 + Me.pnlgreen3.Visible = False + ' + 'pnlgreen1 + ' + Me.pnlgreen1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgreen1.Location = New System.Drawing.Point(77, 8) + Me.pnlgreen1.Name = "pnlgreen1" + Me.pnlgreen1.Size = New System.Drawing.Size(20, 13) + Me.pnlgreen1.TabIndex = 2 + Me.pnlgreen1.Visible = False + ' + 'lblgreenlevel + ' + Me.lblgreenlevel.AutoSize = True + Me.lblgreenlevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblgreenlevel.Location = New System.Drawing.Point(5, 25) + Me.lblgreenlevel.Name = "lblgreenlevel" + Me.lblgreenlevel.Size = New System.Drawing.Size(49, 15) + Me.lblgreenlevel.TabIndex = 1 + Me.lblgreenlevel.Text = "Level: 4" + ' + 'Label9 + ' + Me.Label9.AutoSize = True + Me.Label9.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(3, 2) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(60, 23) + Me.Label9.TabIndex = 0 + Me.Label9.Text = "Green" + ' + 'pnlbluecolours + ' + Me.pnlbluecolours.BackColor = System.Drawing.Color.White + Me.pnlbluecolours.Controls.Add(Me.pnlblueoptions) + Me.pnlbluecolours.Controls.Add(Me.pnlbluecustomcolour) + Me.pnlbluecolours.Controls.Add(Me.pnlblue16) + Me.pnlbluecolours.Controls.Add(Me.pnlblue12) + Me.pnlbluecolours.Controls.Add(Me.pnlblue14) + Me.pnlbluecolours.Controls.Add(Me.pnlblue10) + Me.pnlbluecolours.Controls.Add(Me.pnlblue8) + Me.pnlbluecolours.Controls.Add(Me.pnlblue4) + Me.pnlbluecolours.Controls.Add(Me.pnlblue6) + Me.pnlbluecolours.Controls.Add(Me.pnlblue15) + Me.pnlbluecolours.Controls.Add(Me.pnlblue2) + Me.pnlbluecolours.Controls.Add(Me.pnlblue13) + Me.pnlbluecolours.Controls.Add(Me.pnlblue11) + Me.pnlbluecolours.Controls.Add(Me.pnlblue7) + Me.pnlbluecolours.Controls.Add(Me.pnlblue9) + Me.pnlbluecolours.Controls.Add(Me.pnlblue5) + Me.pnlbluecolours.Controls.Add(Me.pnlblue3) + Me.pnlbluecolours.Controls.Add(Me.pnlblue1) + Me.pnlbluecolours.Controls.Add(Me.lblbluelevel) + Me.pnlbluecolours.Controls.Add(Me.Label7) + Me.pnlbluecolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlbluecolours.Location = New System.Drawing.Point(0, 245) + Me.pnlbluecolours.Name = "pnlbluecolours" + Me.pnlbluecolours.Size = New System.Drawing.Size(443, 46) + Me.pnlbluecolours.TabIndex = 4 + Me.pnlbluecolours.Visible = False + ' + 'pnlblueoptions + ' + Me.pnlblueoptions.Controls.Add(Me.Label6) + Me.pnlblueoptions.Controls.Add(Me.txtbluesred) + Me.pnlblueoptions.Controls.Add(Me.txtbluesblue) + Me.pnlblueoptions.Controls.Add(Me.Label4) + Me.pnlblueoptions.Controls.Add(Me.Label2) + Me.pnlblueoptions.Controls.Add(Me.txtbluesgreen) + Me.pnlblueoptions.Location = New System.Drawing.Point(282, 3) + Me.pnlblueoptions.Name = "pnlblueoptions" + Me.pnlblueoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlblueoptions.TabIndex = 27 + Me.pnlblueoptions.Visible = False + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.BackColor = System.Drawing.Color.Transparent + Me.Label6.Location = New System.Drawing.Point(65, 24) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(30, 13) + Me.Label6.TabIndex = 26 + Me.Label6.Text = "Red:" + ' + 'txtbluesred + ' + Me.txtbluesred.BackColor = System.Drawing.Color.White + Me.txtbluesred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbluesred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtbluesred.Location = New System.Drawing.Point(95, 22) + Me.txtbluesred.Multiline = True + Me.txtbluesred.Name = "txtbluesred" + Me.txtbluesred.Size = New System.Drawing.Size(23, 17) + Me.txtbluesred.TabIndex = 25 + Me.txtbluesred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtbluesblue + ' + Me.txtbluesblue.BackColor = System.Drawing.Color.White + Me.txtbluesblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbluesblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtbluesblue.Location = New System.Drawing.Point(65, 2) + Me.txtbluesblue.Multiline = True + Me.txtbluesblue.Name = "txtbluesblue" + Me.txtbluesblue.Size = New System.Drawing.Size(23, 17) + Me.txtbluesblue.TabIndex = 21 + Me.txtbluesblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.BackColor = System.Drawing.Color.Transparent + Me.Label4.Location = New System.Drawing.Point(2, 23) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(39, 13) + Me.Label4.TabIndex = 24 + Me.Label4.Text = "Green:" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.BackColor = System.Drawing.Color.Transparent + Me.Label2.Location = New System.Drawing.Point(33, 4) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(31, 13) + Me.Label2.TabIndex = 22 + Me.Label2.Text = "Blue:" + ' + 'txtbluesgreen + ' + Me.txtbluesgreen.BackColor = System.Drawing.Color.White + Me.txtbluesgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbluesgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtbluesgreen.Location = New System.Drawing.Point(41, 22) + Me.txtbluesgreen.Multiline = True + Me.txtbluesgreen.Name = "txtbluesgreen" + Me.txtbluesgreen.Size = New System.Drawing.Size(23, 17) + Me.txtbluesgreen.TabIndex = 23 + Me.txtbluesgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlbluecustomcolour + ' + Me.pnlbluecustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbluecustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlbluecustomcolour.Name = "pnlbluecustomcolour" + Me.pnlbluecustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlbluecustomcolour.TabIndex = 18 + Me.pnlbluecustomcolour.Visible = False + ' + 'pnlblue16 + ' + Me.pnlblue16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue16.Location = New System.Drawing.Point(259, 25) + Me.pnlblue16.Name = "pnlblue16" + Me.pnlblue16.Size = New System.Drawing.Size(20, 13) + Me.pnlblue16.TabIndex = 17 + Me.pnlblue16.Visible = False + ' + 'pnlblue12 + ' + Me.pnlblue12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue12.Location = New System.Drawing.Point(155, 25) + Me.pnlblue12.Name = "pnlblue12" + Me.pnlblue12.Size = New System.Drawing.Size(20, 13) + Me.pnlblue12.TabIndex = 9 + Me.pnlblue12.Visible = False + ' + 'pnlblue14 + ' + Me.pnlblue14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue14.Location = New System.Drawing.Point(207, 25) + Me.pnlblue14.Name = "pnlblue14" + Me.pnlblue14.Size = New System.Drawing.Size(20, 13) + Me.pnlblue14.TabIndex = 13 + Me.pnlblue14.Visible = False + ' + 'pnlblue10 + ' + Me.pnlblue10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue10.Location = New System.Drawing.Point(103, 25) + Me.pnlblue10.Name = "pnlblue10" + Me.pnlblue10.Size = New System.Drawing.Size(20, 13) + Me.pnlblue10.TabIndex = 5 + Me.pnlblue10.Visible = False + ' + 'pnlblue8 + ' + Me.pnlblue8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue8.Location = New System.Drawing.Point(259, 8) + Me.pnlblue8.Name = "pnlblue8" + Me.pnlblue8.Size = New System.Drawing.Size(20, 13) + Me.pnlblue8.TabIndex = 16 + Me.pnlblue8.Visible = False + ' + 'pnlblue4 + ' + Me.pnlblue4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue4.Location = New System.Drawing.Point(155, 8) + Me.pnlblue4.Name = "pnlblue4" + Me.pnlblue4.Size = New System.Drawing.Size(20, 13) + Me.pnlblue4.TabIndex = 8 + Me.pnlblue4.Visible = False + ' + 'pnlblue6 + ' + Me.pnlblue6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue6.Location = New System.Drawing.Point(207, 8) + Me.pnlblue6.Name = "pnlblue6" + Me.pnlblue6.Size = New System.Drawing.Size(20, 13) + Me.pnlblue6.TabIndex = 12 + Me.pnlblue6.Visible = False + ' + 'pnlblue15 + ' + Me.pnlblue15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue15.Location = New System.Drawing.Point(233, 25) + Me.pnlblue15.Name = "pnlblue15" + Me.pnlblue15.Size = New System.Drawing.Size(20, 13) + Me.pnlblue15.TabIndex = 15 + Me.pnlblue15.Visible = False + ' + 'pnlblue2 + ' + Me.pnlblue2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue2.Location = New System.Drawing.Point(103, 8) + Me.pnlblue2.Name = "pnlblue2" + Me.pnlblue2.Size = New System.Drawing.Size(20, 13) + Me.pnlblue2.TabIndex = 4 + Me.pnlblue2.Visible = False + ' + 'pnlblue13 + ' + Me.pnlblue13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue13.Location = New System.Drawing.Point(181, 25) + Me.pnlblue13.Name = "pnlblue13" + Me.pnlblue13.Size = New System.Drawing.Size(20, 13) + Me.pnlblue13.TabIndex = 11 + Me.pnlblue13.Visible = False + ' + 'pnlblue11 + ' + Me.pnlblue11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue11.Location = New System.Drawing.Point(129, 25) + Me.pnlblue11.Name = "pnlblue11" + Me.pnlblue11.Size = New System.Drawing.Size(20, 13) + Me.pnlblue11.TabIndex = 7 + Me.pnlblue11.Visible = False + ' + 'pnlblue7 + ' + Me.pnlblue7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue7.Location = New System.Drawing.Point(233, 8) + Me.pnlblue7.Name = "pnlblue7" + Me.pnlblue7.Size = New System.Drawing.Size(20, 13) + Me.pnlblue7.TabIndex = 14 + Me.pnlblue7.Visible = False + ' + 'pnlblue9 + ' + Me.pnlblue9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue9.Location = New System.Drawing.Point(77, 25) + Me.pnlblue9.Name = "pnlblue9" + Me.pnlblue9.Size = New System.Drawing.Size(20, 13) + Me.pnlblue9.TabIndex = 3 + Me.pnlblue9.Visible = False + ' + 'pnlblue5 + ' + Me.pnlblue5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue5.Location = New System.Drawing.Point(181, 8) + Me.pnlblue5.Name = "pnlblue5" + Me.pnlblue5.Size = New System.Drawing.Size(20, 13) + Me.pnlblue5.TabIndex = 10 + Me.pnlblue5.Visible = False + ' + 'pnlblue3 + ' + Me.pnlblue3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue3.Location = New System.Drawing.Point(129, 8) + Me.pnlblue3.Name = "pnlblue3" + Me.pnlblue3.Size = New System.Drawing.Size(20, 13) + Me.pnlblue3.TabIndex = 6 + Me.pnlblue3.Visible = False + ' + 'pnlblue1 + ' + Me.pnlblue1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlblue1.Location = New System.Drawing.Point(77, 8) + Me.pnlblue1.Name = "pnlblue1" + Me.pnlblue1.Size = New System.Drawing.Size(20, 13) + Me.pnlblue1.TabIndex = 2 + Me.pnlblue1.Visible = False + ' + 'lblbluelevel + ' + Me.lblbluelevel.AutoSize = True + Me.lblbluelevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbluelevel.Location = New System.Drawing.Point(5, 25) + Me.lblbluelevel.Name = "lblbluelevel" + Me.lblbluelevel.Size = New System.Drawing.Size(49, 15) + Me.lblbluelevel.TabIndex = 1 + Me.lblbluelevel.Text = "Level: 4" + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(3, 2) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(48, 23) + Me.Label7.TabIndex = 0 + Me.Label7.Text = "Blue" + ' + 'pnlpurplecolours + ' + Me.pnlpurplecolours.BackColor = System.Drawing.Color.White + Me.pnlpurplecolours.Controls.Add(Me.pnlpurpleoptions) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurplecustomcolour) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple16) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple12) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple14) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple10) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple8) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple4) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple6) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple15) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple2) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple13) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple11) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple7) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple9) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple5) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple3) + Me.pnlpurplecolours.Controls.Add(Me.pnlpurple1) + Me.pnlpurplecolours.Controls.Add(Me.lblpurplelevel) + Me.pnlpurplecolours.Controls.Add(Me.Label5) + Me.pnlpurplecolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlpurplecolours.Location = New System.Drawing.Point(0, 199) + Me.pnlpurplecolours.Name = "pnlpurplecolours" + Me.pnlpurplecolours.Size = New System.Drawing.Size(443, 46) + Me.pnlpurplecolours.TabIndex = 3 + Me.pnlpurplecolours.Visible = False + ' + 'pnlpurpleoptions + ' + Me.pnlpurpleoptions.Controls.Add(Me.Label8) + Me.pnlpurpleoptions.Controls.Add(Me.txtpurplesgreen) + Me.pnlpurpleoptions.Controls.Add(Me.txtpurplesblue) + Me.pnlpurpleoptions.Controls.Add(Me.Label10) + Me.pnlpurpleoptions.Controls.Add(Me.Label12) + Me.pnlpurpleoptions.Controls.Add(Me.txtpurplesred) + Me.pnlpurpleoptions.Location = New System.Drawing.Point(282, 3) + Me.pnlpurpleoptions.Name = "pnlpurpleoptions" + Me.pnlpurpleoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlpurpleoptions.TabIndex = 28 + Me.pnlpurpleoptions.Visible = False + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.BackColor = System.Drawing.Color.Transparent + Me.Label8.Location = New System.Drawing.Point(56, 24) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(39, 13) + Me.Label8.TabIndex = 26 + Me.Label8.Text = "Green:" + ' + 'txtpurplesgreen + ' + Me.txtpurplesgreen.BackColor = System.Drawing.Color.White + Me.txtpurplesgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpurplesgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpurplesgreen.Location = New System.Drawing.Point(95, 22) + Me.txtpurplesgreen.Multiline = True + Me.txtpurplesgreen.Name = "txtpurplesgreen" + Me.txtpurplesgreen.Size = New System.Drawing.Size(23, 17) + Me.txtpurplesgreen.TabIndex = 25 + Me.txtpurplesgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtpurplesblue + ' + Me.txtpurplesblue.BackColor = System.Drawing.Color.White + Me.txtpurplesblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpurplesblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpurplesblue.Location = New System.Drawing.Point(65, 2) + Me.txtpurplesblue.Multiline = True + Me.txtpurplesblue.Name = "txtpurplesblue" + Me.txtpurplesblue.Size = New System.Drawing.Size(23, 17) + Me.txtpurplesblue.TabIndex = 21 + Me.txtpurplesblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label10 + ' + Me.Label10.AutoSize = True + Me.Label10.BackColor = System.Drawing.Color.Transparent + Me.Label10.Location = New System.Drawing.Point(2, 23) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(30, 13) + Me.Label10.TabIndex = 24 + Me.Label10.Text = "Red:" + ' + 'Label12 + ' + Me.Label12.AutoSize = True + Me.Label12.BackColor = System.Drawing.Color.Transparent + Me.Label12.Location = New System.Drawing.Point(33, 4) + Me.Label12.Name = "Label12" + Me.Label12.Size = New System.Drawing.Size(31, 13) + Me.Label12.TabIndex = 22 + Me.Label12.Text = "Blue:" + ' + 'txtpurplesred + ' + Me.txtpurplesred.BackColor = System.Drawing.Color.White + Me.txtpurplesred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpurplesred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpurplesred.Location = New System.Drawing.Point(32, 22) + Me.txtpurplesred.Multiline = True + Me.txtpurplesred.Name = "txtpurplesred" + Me.txtpurplesred.Size = New System.Drawing.Size(23, 17) + Me.txtpurplesred.TabIndex = 23 + Me.txtpurplesred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlpurplecustomcolour + ' + Me.pnlpurplecustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurplecustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlpurplecustomcolour.Name = "pnlpurplecustomcolour" + Me.pnlpurplecustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlpurplecustomcolour.TabIndex = 18 + Me.pnlpurplecustomcolour.Visible = False + ' + 'pnlpurple16 + ' + Me.pnlpurple16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple16.Location = New System.Drawing.Point(259, 25) + Me.pnlpurple16.Name = "pnlpurple16" + Me.pnlpurple16.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple16.TabIndex = 17 + Me.pnlpurple16.Visible = False + ' + 'pnlpurple12 + ' + Me.pnlpurple12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple12.Location = New System.Drawing.Point(155, 25) + Me.pnlpurple12.Name = "pnlpurple12" + Me.pnlpurple12.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple12.TabIndex = 9 + Me.pnlpurple12.Visible = False + ' + 'pnlpurple14 + ' + Me.pnlpurple14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple14.Location = New System.Drawing.Point(207, 25) + Me.pnlpurple14.Name = "pnlpurple14" + Me.pnlpurple14.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple14.TabIndex = 13 + Me.pnlpurple14.Visible = False + ' + 'pnlpurple10 + ' + Me.pnlpurple10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple10.Location = New System.Drawing.Point(103, 25) + Me.pnlpurple10.Name = "pnlpurple10" + Me.pnlpurple10.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple10.TabIndex = 5 + Me.pnlpurple10.Visible = False + ' + 'pnlpurple8 + ' + Me.pnlpurple8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple8.Location = New System.Drawing.Point(259, 8) + Me.pnlpurple8.Name = "pnlpurple8" + Me.pnlpurple8.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple8.TabIndex = 16 + Me.pnlpurple8.Visible = False + ' + 'pnlpurple4 + ' + Me.pnlpurple4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple4.Location = New System.Drawing.Point(155, 8) + Me.pnlpurple4.Name = "pnlpurple4" + Me.pnlpurple4.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple4.TabIndex = 8 + Me.pnlpurple4.Visible = False + ' + 'pnlpurple6 + ' + Me.pnlpurple6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple6.Location = New System.Drawing.Point(207, 8) + Me.pnlpurple6.Name = "pnlpurple6" + Me.pnlpurple6.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple6.TabIndex = 12 + Me.pnlpurple6.Visible = False + ' + 'pnlpurple15 + ' + Me.pnlpurple15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple15.Location = New System.Drawing.Point(233, 25) + Me.pnlpurple15.Name = "pnlpurple15" + Me.pnlpurple15.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple15.TabIndex = 15 + Me.pnlpurple15.Visible = False + ' + 'pnlpurple2 + ' + Me.pnlpurple2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple2.Location = New System.Drawing.Point(103, 8) + Me.pnlpurple2.Name = "pnlpurple2" + Me.pnlpurple2.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple2.TabIndex = 4 + Me.pnlpurple2.Visible = False + ' + 'pnlpurple13 + ' + Me.pnlpurple13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple13.Location = New System.Drawing.Point(181, 25) + Me.pnlpurple13.Name = "pnlpurple13" + Me.pnlpurple13.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple13.TabIndex = 11 + Me.pnlpurple13.Visible = False + ' + 'pnlpurple11 + ' + Me.pnlpurple11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple11.Location = New System.Drawing.Point(129, 25) + Me.pnlpurple11.Name = "pnlpurple11" + Me.pnlpurple11.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple11.TabIndex = 7 + Me.pnlpurple11.Visible = False + ' + 'pnlpurple7 + ' + Me.pnlpurple7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple7.Location = New System.Drawing.Point(233, 8) + Me.pnlpurple7.Name = "pnlpurple7" + Me.pnlpurple7.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple7.TabIndex = 14 + Me.pnlpurple7.Visible = False + ' + 'pnlpurple9 + ' + Me.pnlpurple9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple9.Location = New System.Drawing.Point(77, 25) + Me.pnlpurple9.Name = "pnlpurple9" + Me.pnlpurple9.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple9.TabIndex = 3 + Me.pnlpurple9.Visible = False + ' + 'pnlpurple5 + ' + Me.pnlpurple5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple5.Location = New System.Drawing.Point(181, 8) + Me.pnlpurple5.Name = "pnlpurple5" + Me.pnlpurple5.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple5.TabIndex = 10 + Me.pnlpurple5.Visible = False + ' + 'pnlpurple3 + ' + Me.pnlpurple3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple3.Location = New System.Drawing.Point(129, 8) + Me.pnlpurple3.Name = "pnlpurple3" + Me.pnlpurple3.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple3.TabIndex = 6 + Me.pnlpurple3.Visible = False + ' + 'pnlpurple1 + ' + Me.pnlpurple1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlpurple1.Location = New System.Drawing.Point(77, 8) + Me.pnlpurple1.Name = "pnlpurple1" + Me.pnlpurple1.Size = New System.Drawing.Size(20, 13) + Me.pnlpurple1.TabIndex = 2 + Me.pnlpurple1.Visible = False + ' + 'lblpurplelevel + ' + Me.lblpurplelevel.AutoSize = True + Me.lblpurplelevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblpurplelevel.Location = New System.Drawing.Point(5, 25) + Me.lblpurplelevel.Name = "lblpurplelevel" + Me.lblpurplelevel.Size = New System.Drawing.Size(49, 15) + Me.lblpurplelevel.TabIndex = 1 + Me.lblpurplelevel.Text = "Level: 4" + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(3, 2) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(67, 23) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "Purple" + ' + 'pnlgraycolours + ' + Me.pnlgraycolours.BackColor = System.Drawing.Color.White + Me.pnlgraycolours.Controls.Add(Me.lblcustomshadetut) + Me.pnlgraycolours.Controls.Add(Me.txtcustomgrayshade) + Me.pnlgraycolours.Controls.Add(Me.pnlgraycustomcolour) + Me.pnlgraycolours.Controls.Add(Me.pnlgray16) + Me.pnlgraycolours.Controls.Add(Me.pnlgray12) + Me.pnlgraycolours.Controls.Add(Me.pnlgray14) + Me.pnlgraycolours.Controls.Add(Me.pnlgray10) + Me.pnlgraycolours.Controls.Add(Me.pnlgray8) + Me.pnlgraycolours.Controls.Add(Me.pnlgray4) + Me.pnlgraycolours.Controls.Add(Me.pnlgray6) + Me.pnlgraycolours.Controls.Add(Me.pnlgray15) + Me.pnlgraycolours.Controls.Add(Me.pnlgray2) + Me.pnlgraycolours.Controls.Add(Me.pnlgray13) + Me.pnlgraycolours.Controls.Add(Me.pnlgray11) + Me.pnlgraycolours.Controls.Add(Me.pnlgray7) + Me.pnlgraycolours.Controls.Add(Me.pnlgray9) + Me.pnlgraycolours.Controls.Add(Me.pnlgray5) + Me.pnlgraycolours.Controls.Add(Me.pnlgray3) + Me.pnlgraycolours.Controls.Add(Me.pnlgray1) + Me.pnlgraycolours.Controls.Add(Me.lblgraylevel) + Me.pnlgraycolours.Controls.Add(Me.Label3) + Me.pnlgraycolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlgraycolours.Location = New System.Drawing.Point(0, 153) + Me.pnlgraycolours.Name = "pnlgraycolours" + Me.pnlgraycolours.Size = New System.Drawing.Size(443, 46) + Me.pnlgraycolours.TabIndex = 2 + Me.pnlgraycolours.Visible = False + ' + 'lblcustomshadetut + ' + Me.lblcustomshadetut.AutoSize = True + Me.lblcustomshadetut.BackColor = System.Drawing.Color.Transparent + Me.lblcustomshadetut.Location = New System.Drawing.Point(290, 5) + Me.lblcustomshadetut.Name = "lblcustomshadetut" + Me.lblcustomshadetut.Size = New System.Drawing.Size(102, 13) + Me.lblcustomshadetut.TabIndex = 20 + Me.lblcustomshadetut.Text = "Enter Shade (0-255)" + Me.lblcustomshadetut.Visible = False + ' + 'txtcustomgrayshade + ' + Me.txtcustomgrayshade.BackColor = System.Drawing.Color.White + Me.txtcustomgrayshade.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtcustomgrayshade.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtcustomgrayshade.Location = New System.Drawing.Point(317, 20) + Me.txtcustomgrayshade.Multiline = True + Me.txtcustomgrayshade.Name = "txtcustomgrayshade" + Me.txtcustomgrayshade.Size = New System.Drawing.Size(45, 17) + Me.txtcustomgrayshade.TabIndex = 19 + Me.txtcustomgrayshade.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + Me.txtcustomgrayshade.Visible = False + ' + 'pnlgraycustomcolour + ' + Me.pnlgraycustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgraycustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlgraycustomcolour.Name = "pnlgraycustomcolour" + Me.pnlgraycustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlgraycustomcolour.TabIndex = 18 + Me.pnlgraycustomcolour.Visible = False + ' + 'pnlgray16 + ' + Me.pnlgray16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray16.Location = New System.Drawing.Point(259, 25) + Me.pnlgray16.Name = "pnlgray16" + Me.pnlgray16.Size = New System.Drawing.Size(20, 13) + Me.pnlgray16.TabIndex = 17 + Me.pnlgray16.Visible = False + ' + 'pnlgray12 + ' + Me.pnlgray12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray12.Location = New System.Drawing.Point(155, 25) + Me.pnlgray12.Name = "pnlgray12" + Me.pnlgray12.Size = New System.Drawing.Size(20, 13) + Me.pnlgray12.TabIndex = 9 + Me.pnlgray12.Visible = False + ' + 'pnlgray14 + ' + Me.pnlgray14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray14.Location = New System.Drawing.Point(207, 25) + Me.pnlgray14.Name = "pnlgray14" + Me.pnlgray14.Size = New System.Drawing.Size(20, 13) + Me.pnlgray14.TabIndex = 13 + Me.pnlgray14.Visible = False + ' + 'pnlgray10 + ' + Me.pnlgray10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray10.Location = New System.Drawing.Point(103, 25) + Me.pnlgray10.Name = "pnlgray10" + Me.pnlgray10.Size = New System.Drawing.Size(20, 13) + Me.pnlgray10.TabIndex = 5 + Me.pnlgray10.Visible = False + ' + 'pnlgray8 + ' + Me.pnlgray8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray8.Location = New System.Drawing.Point(259, 8) + Me.pnlgray8.Name = "pnlgray8" + Me.pnlgray8.Size = New System.Drawing.Size(20, 13) + Me.pnlgray8.TabIndex = 16 + Me.pnlgray8.Visible = False + ' + 'pnlgray4 + ' + Me.pnlgray4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray4.Location = New System.Drawing.Point(155, 8) + Me.pnlgray4.Name = "pnlgray4" + Me.pnlgray4.Size = New System.Drawing.Size(20, 13) + Me.pnlgray4.TabIndex = 8 + Me.pnlgray4.Visible = False + ' + 'pnlgray6 + ' + Me.pnlgray6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray6.Location = New System.Drawing.Point(207, 8) + Me.pnlgray6.Name = "pnlgray6" + Me.pnlgray6.Size = New System.Drawing.Size(20, 13) + Me.pnlgray6.TabIndex = 12 + Me.pnlgray6.Visible = False + ' + 'pnlgray15 + ' + Me.pnlgray15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray15.Location = New System.Drawing.Point(233, 25) + Me.pnlgray15.Name = "pnlgray15" + Me.pnlgray15.Size = New System.Drawing.Size(20, 13) + Me.pnlgray15.TabIndex = 15 + Me.pnlgray15.Visible = False + ' + 'pnlgray2 + ' + Me.pnlgray2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray2.Location = New System.Drawing.Point(103, 8) + Me.pnlgray2.Name = "pnlgray2" + Me.pnlgray2.Size = New System.Drawing.Size(20, 13) + Me.pnlgray2.TabIndex = 4 + Me.pnlgray2.Visible = False + ' + 'pnlgray13 + ' + Me.pnlgray13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray13.Location = New System.Drawing.Point(181, 25) + Me.pnlgray13.Name = "pnlgray13" + Me.pnlgray13.Size = New System.Drawing.Size(20, 13) + Me.pnlgray13.TabIndex = 11 + Me.pnlgray13.Visible = False + ' + 'pnlgray11 + ' + Me.pnlgray11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray11.Location = New System.Drawing.Point(129, 25) + Me.pnlgray11.Name = "pnlgray11" + Me.pnlgray11.Size = New System.Drawing.Size(20, 13) + Me.pnlgray11.TabIndex = 7 + Me.pnlgray11.Visible = False + ' + 'pnlgray7 + ' + Me.pnlgray7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray7.Location = New System.Drawing.Point(233, 8) + Me.pnlgray7.Name = "pnlgray7" + Me.pnlgray7.Size = New System.Drawing.Size(20, 13) + Me.pnlgray7.TabIndex = 14 + Me.pnlgray7.Visible = False + ' + 'pnlgray9 + ' + Me.pnlgray9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray9.Location = New System.Drawing.Point(77, 25) + Me.pnlgray9.Name = "pnlgray9" + Me.pnlgray9.Size = New System.Drawing.Size(20, 13) + Me.pnlgray9.TabIndex = 3 + Me.pnlgray9.Visible = False + ' + 'pnlgray5 + ' + Me.pnlgray5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray5.Location = New System.Drawing.Point(181, 8) + Me.pnlgray5.Name = "pnlgray5" + Me.pnlgray5.Size = New System.Drawing.Size(20, 13) + Me.pnlgray5.TabIndex = 10 + Me.pnlgray5.Visible = False + ' + 'pnlgray3 + ' + Me.pnlgray3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray3.Location = New System.Drawing.Point(129, 8) + Me.pnlgray3.Name = "pnlgray3" + Me.pnlgray3.Size = New System.Drawing.Size(20, 13) + Me.pnlgray3.TabIndex = 6 + Me.pnlgray3.Visible = False + ' + 'pnlgray1 + ' + Me.pnlgray1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlgray1.Location = New System.Drawing.Point(77, 8) + Me.pnlgray1.Name = "pnlgray1" + Me.pnlgray1.Size = New System.Drawing.Size(20, 13) + Me.pnlgray1.TabIndex = 2 + Me.pnlgray1.Visible = False + ' + 'lblgraylevel + ' + Me.lblgraylevel.AutoSize = True + Me.lblgraylevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblgraylevel.Location = New System.Drawing.Point(5, 25) + Me.lblgraylevel.Name = "lblgraylevel" + Me.lblgraylevel.Size = New System.Drawing.Size(49, 15) + Me.lblgraylevel.TabIndex = 1 + Me.lblgraylevel.Text = "Level: 4" + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(3, 2) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(52, 23) + Me.Label3.TabIndex = 0 + Me.Label3.Text = "Gray" + ' + 'pnlanycolours + ' + Me.pnlanycolours.BackColor = System.Drawing.Color.White + Me.pnlanycolours.Controls.Add(Me.pnlanyoptions) + Me.pnlanycolours.Controls.Add(Me.pnlanycustomcolour) + Me.pnlanycolours.Controls.Add(Me.pnlany16) + Me.pnlanycolours.Controls.Add(Me.pnlany12) + Me.pnlanycolours.Controls.Add(Me.pnlany14) + Me.pnlanycolours.Controls.Add(Me.pnlany10) + Me.pnlanycolours.Controls.Add(Me.pnlany8) + Me.pnlanycolours.Controls.Add(Me.pnlany4) + Me.pnlanycolours.Controls.Add(Me.pnlany6) + Me.pnlanycolours.Controls.Add(Me.pnlany15) + Me.pnlanycolours.Controls.Add(Me.pnlany2) + Me.pnlanycolours.Controls.Add(Me.pnlany13) + Me.pnlanycolours.Controls.Add(Me.pnlany11) + Me.pnlanycolours.Controls.Add(Me.pnlany7) + Me.pnlanycolours.Controls.Add(Me.pnlany9) + Me.pnlanycolours.Controls.Add(Me.pnlany5) + Me.pnlanycolours.Controls.Add(Me.pnlany3) + Me.pnlanycolours.Controls.Add(Me.pnlany1) + Me.pnlanycolours.Controls.Add(Me.lblanylevel) + Me.pnlanycolours.Controls.Add(Me.Label1) + Me.pnlanycolours.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlanycolours.Location = New System.Drawing.Point(0, 107) + Me.pnlanycolours.Name = "pnlanycolours" + Me.pnlanycolours.Size = New System.Drawing.Size(443, 46) + Me.pnlanycolours.TabIndex = 1 + Me.pnlanycolours.Visible = False + ' + 'pnlanyoptions + ' + Me.pnlanyoptions.Controls.Add(Me.Label38) + Me.pnlanyoptions.Controls.Add(Me.txtanysgreen) + Me.pnlanyoptions.Controls.Add(Me.txtanysred) + Me.pnlanyoptions.Controls.Add(Me.Label39) + Me.pnlanyoptions.Controls.Add(Me.Label40) + Me.pnlanyoptions.Controls.Add(Me.txtanysblue) + Me.pnlanyoptions.Location = New System.Drawing.Point(282, 3) + Me.pnlanyoptions.Name = "pnlanyoptions" + Me.pnlanyoptions.Size = New System.Drawing.Size(120, 40) + Me.pnlanyoptions.TabIndex = 34 + Me.pnlanyoptions.Visible = False + ' + 'Label38 + ' + Me.Label38.AutoSize = True + Me.Label38.BackColor = System.Drawing.Color.Transparent + Me.Label38.Location = New System.Drawing.Point(56, 24) + Me.Label38.Name = "Label38" + Me.Label38.Size = New System.Drawing.Size(39, 13) + Me.Label38.TabIndex = 26 + Me.Label38.Text = "Green:" + ' + 'txtanysgreen + ' + Me.txtanysgreen.BackColor = System.Drawing.Color.White + Me.txtanysgreen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtanysgreen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtanysgreen.Location = New System.Drawing.Point(95, 22) + Me.txtanysgreen.Multiline = True + Me.txtanysgreen.Name = "txtanysgreen" + Me.txtanysgreen.Size = New System.Drawing.Size(23, 17) + Me.txtanysgreen.TabIndex = 25 + Me.txtanysgreen.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'txtanysred + ' + Me.txtanysred.BackColor = System.Drawing.Color.White + Me.txtanysred.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtanysred.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtanysred.Location = New System.Drawing.Point(62, 2) + Me.txtanysred.Multiline = True + Me.txtanysred.Name = "txtanysred" + Me.txtanysred.Size = New System.Drawing.Size(23, 17) + Me.txtanysred.TabIndex = 21 + Me.txtanysred.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label39 + ' + Me.Label39.AutoSize = True + Me.Label39.BackColor = System.Drawing.Color.Transparent + Me.Label39.Location = New System.Drawing.Point(1, 23) + Me.Label39.Name = "Label39" + Me.Label39.Size = New System.Drawing.Size(31, 13) + Me.Label39.TabIndex = 24 + Me.Label39.Text = "Blue:" + ' + 'Label40 + ' + Me.Label40.AutoSize = True + Me.Label40.BackColor = System.Drawing.Color.Transparent + Me.Label40.Location = New System.Drawing.Point(31, 4) + Me.Label40.Name = "Label40" + Me.Label40.Size = New System.Drawing.Size(30, 13) + Me.Label40.TabIndex = 22 + Me.Label40.Text = "Red:" + ' + 'txtanysblue + ' + Me.txtanysblue.BackColor = System.Drawing.Color.White + Me.txtanysblue.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtanysblue.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtanysblue.Location = New System.Drawing.Point(32, 22) + Me.txtanysblue.Multiline = True + Me.txtanysblue.Name = "txtanysblue" + Me.txtanysblue.Size = New System.Drawing.Size(23, 17) + Me.txtanysblue.TabIndex = 23 + Me.txtanysblue.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'pnlanycustomcolour + ' + Me.pnlanycustomcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlanycustomcolour.Location = New System.Drawing.Point(406, 8) + Me.pnlanycustomcolour.Name = "pnlanycustomcolour" + Me.pnlanycustomcolour.Size = New System.Drawing.Size(32, 30) + Me.pnlanycustomcolour.TabIndex = 17 + Me.pnlanycustomcolour.Visible = False + ' + 'pnlany16 + ' + Me.pnlany16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany16.Location = New System.Drawing.Point(259, 25) + Me.pnlany16.Name = "pnlany16" + Me.pnlany16.Size = New System.Drawing.Size(20, 13) + Me.pnlany16.TabIndex = 17 + Me.pnlany16.Visible = False + ' + 'pnlany12 + ' + Me.pnlany12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany12.Location = New System.Drawing.Point(155, 25) + Me.pnlany12.Name = "pnlany12" + Me.pnlany12.Size = New System.Drawing.Size(20, 13) + Me.pnlany12.TabIndex = 9 + Me.pnlany12.Visible = False + ' + 'pnlany14 + ' + Me.pnlany14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany14.Location = New System.Drawing.Point(207, 25) + Me.pnlany14.Name = "pnlany14" + Me.pnlany14.Size = New System.Drawing.Size(20, 13) + Me.pnlany14.TabIndex = 13 + Me.pnlany14.Visible = False + ' + 'pnlany10 + ' + Me.pnlany10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany10.Location = New System.Drawing.Point(103, 25) + Me.pnlany10.Name = "pnlany10" + Me.pnlany10.Size = New System.Drawing.Size(20, 13) + Me.pnlany10.TabIndex = 5 + Me.pnlany10.Visible = False + ' + 'pnlany8 + ' + Me.pnlany8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany8.Location = New System.Drawing.Point(259, 8) + Me.pnlany8.Name = "pnlany8" + Me.pnlany8.Size = New System.Drawing.Size(20, 13) + Me.pnlany8.TabIndex = 16 + Me.pnlany8.Visible = False + ' + 'pnlany4 + ' + Me.pnlany4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany4.Location = New System.Drawing.Point(155, 8) + Me.pnlany4.Name = "pnlany4" + Me.pnlany4.Size = New System.Drawing.Size(20, 13) + Me.pnlany4.TabIndex = 8 + Me.pnlany4.Visible = False + ' + 'pnlany6 + ' + Me.pnlany6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany6.Location = New System.Drawing.Point(207, 8) + Me.pnlany6.Name = "pnlany6" + Me.pnlany6.Size = New System.Drawing.Size(20, 13) + Me.pnlany6.TabIndex = 12 + Me.pnlany6.Visible = False + ' + 'pnlany15 + ' + Me.pnlany15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany15.Location = New System.Drawing.Point(233, 25) + Me.pnlany15.Name = "pnlany15" + Me.pnlany15.Size = New System.Drawing.Size(20, 13) + Me.pnlany15.TabIndex = 15 + Me.pnlany15.Visible = False + ' + 'pnlany2 + ' + Me.pnlany2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany2.Location = New System.Drawing.Point(103, 8) + Me.pnlany2.Name = "pnlany2" + Me.pnlany2.Size = New System.Drawing.Size(20, 13) + Me.pnlany2.TabIndex = 4 + Me.pnlany2.Visible = False + ' + 'pnlany13 + ' + Me.pnlany13.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany13.Location = New System.Drawing.Point(181, 25) + Me.pnlany13.Name = "pnlany13" + Me.pnlany13.Size = New System.Drawing.Size(20, 13) + Me.pnlany13.TabIndex = 11 + Me.pnlany13.Visible = False + ' + 'pnlany11 + ' + Me.pnlany11.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany11.Location = New System.Drawing.Point(129, 25) + Me.pnlany11.Name = "pnlany11" + Me.pnlany11.Size = New System.Drawing.Size(20, 13) + Me.pnlany11.TabIndex = 7 + Me.pnlany11.Visible = False + ' + 'pnlany7 + ' + Me.pnlany7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany7.Location = New System.Drawing.Point(233, 8) + Me.pnlany7.Name = "pnlany7" + Me.pnlany7.Size = New System.Drawing.Size(20, 13) + Me.pnlany7.TabIndex = 14 + Me.pnlany7.Visible = False + ' + 'pnlany9 + ' + Me.pnlany9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany9.Location = New System.Drawing.Point(77, 25) + Me.pnlany9.Name = "pnlany9" + Me.pnlany9.Size = New System.Drawing.Size(20, 13) + Me.pnlany9.TabIndex = 3 + Me.pnlany9.Visible = False + ' + 'pnlany5 + ' + Me.pnlany5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany5.Location = New System.Drawing.Point(181, 8) + Me.pnlany5.Name = "pnlany5" + Me.pnlany5.Size = New System.Drawing.Size(20, 13) + Me.pnlany5.TabIndex = 10 + Me.pnlany5.Visible = False + ' + 'pnlany3 + ' + Me.pnlany3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany3.Location = New System.Drawing.Point(129, 8) + Me.pnlany3.Name = "pnlany3" + Me.pnlany3.Size = New System.Drawing.Size(20, 13) + Me.pnlany3.TabIndex = 6 + Me.pnlany3.Visible = False + ' + 'pnlany1 + ' + Me.pnlany1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlany1.Location = New System.Drawing.Point(77, 8) + Me.pnlany1.Name = "pnlany1" + Me.pnlany1.Size = New System.Drawing.Size(20, 13) + Me.pnlany1.TabIndex = 2 + Me.pnlany1.Visible = False + ' + 'lblanylevel + ' + Me.lblanylevel.AutoSize = True + Me.lblanylevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblanylevel.Location = New System.Drawing.Point(5, 25) + Me.lblanylevel.Name = "lblanylevel" + Me.lblanylevel.Size = New System.Drawing.Size(49, 15) + Me.lblanylevel.TabIndex = 1 + Me.lblanylevel.Text = "Level: 4" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Cambria", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(3, 2) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(43, 23) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Any" + ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.White + Me.Panel1.Controls.Add(Me.lblnewcolourrgb) + Me.Panel1.Controls.Add(Me.lblnewcolourname) + Me.Panel1.Controls.Add(Me.Label26) + Me.Panel1.Controls.Add(Me.Label17) + Me.Panel1.Controls.Add(Me.lbloldcolourrgb) + Me.Panel1.Controls.Add(Me.lbloldcolourname) + Me.Panel1.Controls.Add(Me.Label14) + Me.Panel1.Controls.Add(Me.pnlnewcolour) + Me.Panel1.Controls.Add(Me.pnloldcolour) + Me.Panel1.Controls.Add(Me.lblobjecttocolour) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(443, 107) + Me.Panel1.TabIndex = 0 + ' + 'lblnewcolourrgb + ' + Me.lblnewcolourrgb.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblnewcolourrgb.Location = New System.Drawing.Point(298, 66) + Me.lblnewcolourrgb.Name = "lblnewcolourrgb" + Me.lblnewcolourrgb.Size = New System.Drawing.Size(147, 18) + Me.lblnewcolourrgb.TabIndex = 10 + Me.lblnewcolourrgb.Text = "RGB: 234, 341, 111" + ' + 'lblnewcolourname + ' + Me.lblnewcolourname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblnewcolourname.Location = New System.Drawing.Point(298, 49) + Me.lblnewcolourname.Name = "lblnewcolourname" + Me.lblnewcolourname.Size = New System.Drawing.Size(145, 18) + Me.lblnewcolourname.TabIndex = 9 + Me.lblnewcolourname.Text = "Name: Whitesmoke" + ' + 'Label26 + ' + Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label26.Location = New System.Drawing.Point(298, 32) + Me.Label26.Name = "Label26" + Me.Label26.Size = New System.Drawing.Size(145, 18) + Me.Label26.TabIndex = 8 + Me.Label26.Text = "New Colour" + ' + 'Label17 + ' + Me.Label17.AutoSize = True + Me.Label17.Location = New System.Drawing.Point(7, 87) + Me.Label17.Name = "Label17" + Me.Label17.Size = New System.Drawing.Size(426, 13) + Me.Label17.TabIndex = 7 + Me.Label17.Text = "Click the new colour above to confirm your colour choice or click the old colour " & _ + "to cancel" + ' + 'lbloldcolourrgb + ' + Me.lbloldcolourrgb.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbloldcolourrgb.Location = New System.Drawing.Point(-2, 66) + Me.lbloldcolourrgb.Name = "lbloldcolourrgb" + Me.lbloldcolourrgb.Size = New System.Drawing.Size(151, 18) + Me.lbloldcolourrgb.TabIndex = 6 + Me.lbloldcolourrgb.Text = "50, 60, 20 :RGB" + Me.lbloldcolourrgb.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'lbloldcolourname + ' + Me.lbloldcolourname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbloldcolourname.Location = New System.Drawing.Point(-2, 49) + Me.lbloldcolourname.Name = "lbloldcolourname" + Me.lbloldcolourname.Size = New System.Drawing.Size(151, 18) + Me.lbloldcolourname.TabIndex = 5 + Me.lbloldcolourname.Text = "Red :Name" + Me.lbloldcolourname.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'Label14 + ' + Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label14.Location = New System.Drawing.Point(-2, 32) + Me.Label14.Name = "Label14" + Me.Label14.Size = New System.Drawing.Size(151, 18) + Me.Label14.TabIndex = 4 + Me.Label14.Text = "Old Colour" + Me.Label14.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'pnlnewcolour + ' + Me.pnlnewcolour.Location = New System.Drawing.Point(227, 32) + Me.pnlnewcolour.Name = "pnlnewcolour" + Me.pnlnewcolour.Size = New System.Drawing.Size(67, 52) + Me.pnlnewcolour.TabIndex = 3 + ' + 'pnloldcolour + ' + Me.pnloldcolour.Location = New System.Drawing.Point(153, 32) + Me.pnloldcolour.Name = "pnloldcolour" + Me.pnloldcolour.Size = New System.Drawing.Size(67, 52) + Me.pnloldcolour.TabIndex = 2 + ' + 'lblobjecttocolour + ' + Me.lblobjecttocolour.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblobjecttocolour.Location = New System.Drawing.Point(10, 5) + Me.lblobjecttocolour.Name = "lblobjecttocolour" + Me.lblobjecttocolour.Size = New System.Drawing.Size(423, 23) + Me.lblobjecttocolour.TabIndex = 1 + Me.lblobjecttocolour.Text = "Close Button Colour" + Me.lblobjecttocolour.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 570) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 568) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(445, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 570) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 568) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(447, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 23 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconColourPicker + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(148, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Colour Picker" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(445, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 598) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(443, 2) + Me.pgbottom.TabIndex = 23 + ' + 'Colour_Picker + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(447, 600) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.KeyPreview = True + Me.Name = "Colour_Picker" + Me.Text = "Colour_Picker" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnlpinkcolours.ResumeLayout(False) + Me.pnlpinkcolours.PerformLayout() + Me.pnlpinkoptions.ResumeLayout(False) + Me.pnlpinkoptions.PerformLayout() + Me.pnlredcolours.ResumeLayout(False) + Me.pnlredcolours.PerformLayout() + Me.pnlredoptions.ResumeLayout(False) + Me.pnlredoptions.PerformLayout() + Me.pnlbrowncolours.ResumeLayout(False) + Me.pnlbrowncolours.PerformLayout() + Me.pnlbrownoptions.ResumeLayout(False) + Me.pnlbrownoptions.PerformLayout() + Me.pnlorangecolours.ResumeLayout(False) + Me.pnlorangecolours.PerformLayout() + Me.pnlorangeoptions.ResumeLayout(False) + Me.pnlorangeoptions.PerformLayout() + Me.pnlyellowcolours.ResumeLayout(False) + Me.pnlyellowcolours.PerformLayout() + Me.pnlyellowoptions.ResumeLayout(False) + Me.pnlyellowoptions.PerformLayout() + Me.pnlgreencolours.ResumeLayout(False) + Me.pnlgreencolours.PerformLayout() + Me.pnlgreenoptions.ResumeLayout(False) + Me.pnlgreenoptions.PerformLayout() + Me.pnlbluecolours.ResumeLayout(False) + Me.pnlbluecolours.PerformLayout() + Me.pnlblueoptions.ResumeLayout(False) + Me.pnlblueoptions.PerformLayout() + Me.pnlpurplecolours.ResumeLayout(False) + Me.pnlpurplecolours.PerformLayout() + Me.pnlpurpleoptions.ResumeLayout(False) + Me.pnlpurpleoptions.PerformLayout() + Me.pnlgraycolours.ResumeLayout(False) + Me.pnlgraycolours.PerformLayout() + Me.pnlanycolours.ResumeLayout(False) + Me.pnlanycolours.PerformLayout() + Me.pnlanyoptions.ResumeLayout(False) + Me.pnlanyoptions.PerformLayout() + Me.Panel1.ResumeLayout(False) + Me.Panel1.PerformLayout() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pnlanycolours As System.Windows.Forms.Panel + Friend WithEvents pnlany16 As System.Windows.Forms.Panel + Friend WithEvents pnlany12 As System.Windows.Forms.Panel + Friend WithEvents pnlany14 As System.Windows.Forms.Panel + Friend WithEvents pnlany10 As System.Windows.Forms.Panel + Friend WithEvents pnlany4 As System.Windows.Forms.Panel + Friend WithEvents pnlany6 As System.Windows.Forms.Panel + Friend WithEvents pnlany15 As System.Windows.Forms.Panel + Friend WithEvents pnlany2 As System.Windows.Forms.Panel + Friend WithEvents pnlany13 As System.Windows.Forms.Panel + Friend WithEvents pnlany11 As System.Windows.Forms.Panel + Friend WithEvents pnlany7 As System.Windows.Forms.Panel + Friend WithEvents pnlany9 As System.Windows.Forms.Panel + Friend WithEvents pnlany5 As System.Windows.Forms.Panel + Friend WithEvents pnlany3 As System.Windows.Forms.Panel + Friend WithEvents pnlany1 As System.Windows.Forms.Panel + Friend WithEvents lblanylevel As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents pnlnewcolour As System.Windows.Forms.Panel + Friend WithEvents pnloldcolour As System.Windows.Forms.Panel + Friend WithEvents lblobjecttocolour As System.Windows.Forms.Label + Friend WithEvents Label17 As System.Windows.Forms.Label + Friend WithEvents lbloldcolourrgb As System.Windows.Forms.Label + Friend WithEvents lbloldcolourname As System.Windows.Forms.Label + Friend WithEvents Label14 As System.Windows.Forms.Label + Friend WithEvents pnlpinkcolours As System.Windows.Forms.Panel + Friend WithEvents pnlpink16 As System.Windows.Forms.Panel + Friend WithEvents pnlpink12 As System.Windows.Forms.Panel + Friend WithEvents pnlpink14 As System.Windows.Forms.Panel + Friend WithEvents pnlpink10 As System.Windows.Forms.Panel + Friend WithEvents pnlpink8 As System.Windows.Forms.Panel + Friend WithEvents pnlpink4 As System.Windows.Forms.Panel + Friend WithEvents pnlpink6 As System.Windows.Forms.Panel + Friend WithEvents pnlpink15 As System.Windows.Forms.Panel + Friend WithEvents pnlpink2 As System.Windows.Forms.Panel + Friend WithEvents pnlpink13 As System.Windows.Forms.Panel + Friend WithEvents pnlpink11 As System.Windows.Forms.Panel + Friend WithEvents pnlpink7 As System.Windows.Forms.Panel + Friend WithEvents pnlpink9 As System.Windows.Forms.Panel + Friend WithEvents pnlpink5 As System.Windows.Forms.Panel + Friend WithEvents pnlpink3 As System.Windows.Forms.Panel + Friend WithEvents pnlpink1 As System.Windows.Forms.Panel + Friend WithEvents lblpinklevel As System.Windows.Forms.Label + Friend WithEvents Label23 As System.Windows.Forms.Label + Friend WithEvents pnlredcolours As System.Windows.Forms.Panel + Friend WithEvents pnlred16 As System.Windows.Forms.Panel + Friend WithEvents pnlred12 As System.Windows.Forms.Panel + Friend WithEvents pnlred14 As System.Windows.Forms.Panel + Friend WithEvents pnlred10 As System.Windows.Forms.Panel + Friend WithEvents pnlred8 As System.Windows.Forms.Panel + Friend WithEvents pnlred4 As System.Windows.Forms.Panel + Friend WithEvents pnlred6 As System.Windows.Forms.Panel + Friend WithEvents pnlred15 As System.Windows.Forms.Panel + Friend WithEvents pnlred2 As System.Windows.Forms.Panel + Friend WithEvents pnlred13 As System.Windows.Forms.Panel + Friend WithEvents pnlred11 As System.Windows.Forms.Panel + Friend WithEvents pnlred7 As System.Windows.Forms.Panel + Friend WithEvents pnlred9 As System.Windows.Forms.Panel + Friend WithEvents pnlred5 As System.Windows.Forms.Panel + Friend WithEvents pnlred3 As System.Windows.Forms.Panel + Friend WithEvents pnlred1 As System.Windows.Forms.Panel + Friend WithEvents lblredlevel As System.Windows.Forms.Label + Friend WithEvents Label21 As System.Windows.Forms.Label + Friend WithEvents pnlbrowncolours As System.Windows.Forms.Panel + Friend WithEvents pnlbrown16 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown12 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown14 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown10 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown8 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown4 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown6 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown15 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown2 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown13 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown11 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown7 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown9 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown5 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown3 As System.Windows.Forms.Panel + Friend WithEvents pnlbrown1 As System.Windows.Forms.Panel + Friend WithEvents lblbrownlevel As System.Windows.Forms.Label + Friend WithEvents Label19 As System.Windows.Forms.Label + Friend WithEvents pnlorangecolours As System.Windows.Forms.Panel + Friend WithEvents pnlorange16 As System.Windows.Forms.Panel + Friend WithEvents pnlorange12 As System.Windows.Forms.Panel + Friend WithEvents pnlorange14 As System.Windows.Forms.Panel + Friend WithEvents pnlorange10 As System.Windows.Forms.Panel + Friend WithEvents pnlorange8 As System.Windows.Forms.Panel + Friend WithEvents pnlorange4 As System.Windows.Forms.Panel + Friend WithEvents pnlorange6 As System.Windows.Forms.Panel + Friend WithEvents pnlorange15 As System.Windows.Forms.Panel + Friend WithEvents pnlorange2 As System.Windows.Forms.Panel + Friend WithEvents pnlorange13 As System.Windows.Forms.Panel + Friend WithEvents pnlorange11 As System.Windows.Forms.Panel + Friend WithEvents pnlorange7 As System.Windows.Forms.Panel + Friend WithEvents pnlorange9 As System.Windows.Forms.Panel + Friend WithEvents pnlorange5 As System.Windows.Forms.Panel + Friend WithEvents pnlorange3 As System.Windows.Forms.Panel + Friend WithEvents pnlorange1 As System.Windows.Forms.Panel + Friend WithEvents lblorangelevel As System.Windows.Forms.Label + Friend WithEvents Label13 As System.Windows.Forms.Label + Friend WithEvents pnlyellowcolours As System.Windows.Forms.Panel + Friend WithEvents pnlyellow16 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow12 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow14 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow10 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow8 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow4 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow6 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow15 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow2 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow13 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow11 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow7 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow9 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow5 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow3 As System.Windows.Forms.Panel + Friend WithEvents pnlyellow1 As System.Windows.Forms.Panel + Friend WithEvents lblyellowlevel As System.Windows.Forms.Label + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents pnlgreencolours As System.Windows.Forms.Panel + Friend WithEvents pnlgreen16 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen12 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen14 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen10 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen8 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen4 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen6 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen15 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen2 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen13 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen11 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen7 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen9 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen5 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen3 As System.Windows.Forms.Panel + Friend WithEvents pnlgreen1 As System.Windows.Forms.Panel + Friend WithEvents lblgreenlevel As System.Windows.Forms.Label + Friend WithEvents Label9 As System.Windows.Forms.Label + Friend WithEvents pnlbluecolours As System.Windows.Forms.Panel + Friend WithEvents pnlblue16 As System.Windows.Forms.Panel + Friend WithEvents pnlblue12 As System.Windows.Forms.Panel + Friend WithEvents pnlblue14 As System.Windows.Forms.Panel + Friend WithEvents pnlblue10 As System.Windows.Forms.Panel + Friend WithEvents pnlblue8 As System.Windows.Forms.Panel + Friend WithEvents pnlblue4 As System.Windows.Forms.Panel + Friend WithEvents pnlblue6 As System.Windows.Forms.Panel + Friend WithEvents pnlblue15 As System.Windows.Forms.Panel + Friend WithEvents pnlblue2 As System.Windows.Forms.Panel + Friend WithEvents pnlblue13 As System.Windows.Forms.Panel + Friend WithEvents pnlblue11 As System.Windows.Forms.Panel + Friend WithEvents pnlblue7 As System.Windows.Forms.Panel + Friend WithEvents pnlblue9 As System.Windows.Forms.Panel + Friend WithEvents pnlblue5 As System.Windows.Forms.Panel + Friend WithEvents pnlblue3 As System.Windows.Forms.Panel + Friend WithEvents pnlblue1 As System.Windows.Forms.Panel + Friend WithEvents lblbluelevel As System.Windows.Forms.Label + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents pnlpurplecolours As System.Windows.Forms.Panel + Friend WithEvents pnlpurple16 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple12 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple14 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple10 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple8 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple4 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple6 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple15 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple2 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple13 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple11 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple7 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple9 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple5 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple3 As System.Windows.Forms.Panel + Friend WithEvents pnlpurple1 As System.Windows.Forms.Panel + Friend WithEvents lblpurplelevel As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents pnlgraycolours As System.Windows.Forms.Panel + Friend WithEvents pnlgray16 As System.Windows.Forms.Panel + Friend WithEvents pnlgray12 As System.Windows.Forms.Panel + Friend WithEvents pnlgray14 As System.Windows.Forms.Panel + Friend WithEvents pnlgray10 As System.Windows.Forms.Panel + Friend WithEvents pnlgray8 As System.Windows.Forms.Panel + Friend WithEvents pnlgray4 As System.Windows.Forms.Panel + Friend WithEvents pnlgray6 As System.Windows.Forms.Panel + Friend WithEvents pnlgray15 As System.Windows.Forms.Panel + Friend WithEvents pnlgray2 As System.Windows.Forms.Panel + Friend WithEvents pnlgray13 As System.Windows.Forms.Panel + Friend WithEvents pnlgray11 As System.Windows.Forms.Panel + Friend WithEvents pnlgray7 As System.Windows.Forms.Panel + Friend WithEvents pnlgray9 As System.Windows.Forms.Panel + Friend WithEvents pnlgray5 As System.Windows.Forms.Panel + Friend WithEvents pnlgray3 As System.Windows.Forms.Panel + Friend WithEvents pnlgray1 As System.Windows.Forms.Panel + Friend WithEvents lblgraylevel As System.Windows.Forms.Label + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents pnlpinkcustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlredcustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlbrowncustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlorangecustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlyellowcustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlgreencustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlbluecustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlpurplecustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlgraycustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlanycustomcolour As System.Windows.Forms.Panel + Friend WithEvents pnlany8 As System.Windows.Forms.Panel + Friend WithEvents lblnewcolourrgb As System.Windows.Forms.Label + Friend WithEvents lblnewcolourname As System.Windows.Forms.Label + Friend WithEvents Label26 As System.Windows.Forms.Label + Friend WithEvents lblcustomshadetut As System.Windows.Forms.Label + Friend WithEvents txtcustomgrayshade As System.Windows.Forms.TextBox + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents txtbluesred As System.Windows.Forms.TextBox + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents txtbluesgreen As System.Windows.Forms.TextBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents txtbluesblue As System.Windows.Forms.TextBox + Friend WithEvents pnlblueoptions As System.Windows.Forms.Panel + Friend WithEvents pnlyellowoptions As System.Windows.Forms.Panel + Friend WithEvents Label20 As System.Windows.Forms.Label + Friend WithEvents txtyellowsblue As System.Windows.Forms.TextBox + Friend WithEvents txtyellowsred As System.Windows.Forms.TextBox + Friend WithEvents Label22 As System.Windows.Forms.Label + Friend WithEvents Label24 As System.Windows.Forms.Label + Friend WithEvents txtyellowsgreen As System.Windows.Forms.TextBox + Friend WithEvents pnlgreenoptions As System.Windows.Forms.Panel + Friend WithEvents Label15 As System.Windows.Forms.Label + Friend WithEvents txtgreensred As System.Windows.Forms.TextBox + Friend WithEvents txtgreensgreen As System.Windows.Forms.TextBox + Friend WithEvents Label16 As System.Windows.Forms.Label + Friend WithEvents Label18 As System.Windows.Forms.Label + Friend WithEvents txtgreensblue As System.Windows.Forms.TextBox + Friend WithEvents pnlpurpleoptions As System.Windows.Forms.Panel + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents txtpurplesgreen As System.Windows.Forms.TextBox + Friend WithEvents txtpurplesblue As System.Windows.Forms.TextBox + Friend WithEvents Label10 As System.Windows.Forms.Label + Friend WithEvents Label12 As System.Windows.Forms.Label + Friend WithEvents txtpurplesred As System.Windows.Forms.TextBox + Friend WithEvents pnlpinkoptions As System.Windows.Forms.Panel + Friend WithEvents Label35 As System.Windows.Forms.Label + Friend WithEvents txtpinksgreen As System.Windows.Forms.TextBox + Friend WithEvents txtpinksred As System.Windows.Forms.TextBox + Friend WithEvents Label36 As System.Windows.Forms.Label + Friend WithEvents Label37 As System.Windows.Forms.Label + Friend WithEvents txtpinksblue As System.Windows.Forms.TextBox + Friend WithEvents pnlredoptions As System.Windows.Forms.Panel + Friend WithEvents Label32 As System.Windows.Forms.Label + Friend WithEvents txtredsblue As System.Windows.Forms.TextBox + Friend WithEvents txtredsred As System.Windows.Forms.TextBox + Friend WithEvents Label33 As System.Windows.Forms.Label + Friend WithEvents Label34 As System.Windows.Forms.Label + Friend WithEvents txtredsgreen As System.Windows.Forms.TextBox + Friend WithEvents pnlbrownoptions As System.Windows.Forms.Panel + Friend WithEvents Label29 As System.Windows.Forms.Label + Friend WithEvents txtbrownsblue As System.Windows.Forms.TextBox + Friend WithEvents txtbrownsred As System.Windows.Forms.TextBox + Friend WithEvents Label30 As System.Windows.Forms.Label + Friend WithEvents Label31 As System.Windows.Forms.Label + Friend WithEvents txtbrownsgreen As System.Windows.Forms.TextBox + Friend WithEvents pnlorangeoptions As System.Windows.Forms.Panel + Friend WithEvents Label25 As System.Windows.Forms.Label + Friend WithEvents txtorangesblue As System.Windows.Forms.TextBox + Friend WithEvents txtorangesred As System.Windows.Forms.TextBox + Friend WithEvents Label27 As System.Windows.Forms.Label + Friend WithEvents Label28 As System.Windows.Forms.Label + Friend WithEvents txtorangesgreen As System.Windows.Forms.TextBox + Friend WithEvents pnlanyoptions As System.Windows.Forms.Panel + Friend WithEvents Label38 As System.Windows.Forms.Label + Friend WithEvents txtanysgreen As System.Windows.Forms.TextBox + Friend WithEvents txtanysred As System.Windows.Forms.TextBox + Friend WithEvents Label39 As System.Windows.Forms.Label + Friend WithEvents Label40 As System.Windows.Forms.Label + Friend WithEvents txtanysblue As System.Windows.Forms.TextBox + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Colour Picker.resx b/ShiftOS/Colour Picker.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/Colour Picker.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/ShiftOS/Colour Picker.vb b/ShiftOS/Colour Picker.vb new file mode 100644 index 0000000..78865e3 --- /dev/null +++ b/ShiftOS/Colour Picker.vb @@ -0,0 +1,2844 @@ +Public Class Colour_Picker + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + + Public oldcolour As Color + + Public colourtochange As String + Public anylevel As Integer + Public graylevel As Integer + Public purplelevel As Integer + Public bluelevel As Integer + Public greenlevel As Integer + Public yellowlevel As Integer + Public orangelevel As Integer + Public brownlevel As Integer + Public redlevel As Integer + Public pinklevel As Integer + + Public sendToMod = False ' If true will output the rgb value for use of mod + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.ColourPickerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttoncolourpicker.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoncolourpicker, ShiftOSDesktop.tbcolourpickericon, ShiftOSDesktop.tbcolourpickertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + getoldcolour() + determinelevels() + shrinktosizebasedoncoloursbought() + setupboughtcolours() + loadmemory() + 'ShiftOSDesktop.setcolours() + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(447, 600) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.colourpickername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtcolourpickericon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.colourpickericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + 'Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + Try + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + Catch + End Try + End Sub + + 'end of general setup +#End Region + + Public Sub loadmemory() + If ShiftOSDesktop.anymemory(0).ToArgb.ToString = "0" Then Else pnlany1.BackColor = ShiftOSDesktop.anymemory(0) + If ShiftOSDesktop.anymemory(1).ToArgb.ToString = "0" Then Else pnlany2.BackColor = ShiftOSDesktop.anymemory(1) + If ShiftOSDesktop.anymemory(2).ToArgb.ToString = "0" Then Else pnlany3.BackColor = ShiftOSDesktop.anymemory(2) + If ShiftOSDesktop.anymemory(3).ToArgb.ToString = "0" Then Else pnlany4.BackColor = ShiftOSDesktop.anymemory(3) + If ShiftOSDesktop.anymemory(4).ToArgb.ToString = "0" Then Else pnlany5.BackColor = ShiftOSDesktop.anymemory(4) + If ShiftOSDesktop.anymemory(5).ToArgb.ToString = "0" Then Else pnlany6.BackColor = ShiftOSDesktop.anymemory(5) + If ShiftOSDesktop.anymemory(6).ToArgb.ToString = "0" Then Else pnlany7.BackColor = ShiftOSDesktop.anymemory(6) + If ShiftOSDesktop.anymemory(7).ToArgb.ToString = "0" Then Else pnlany8.BackColor = ShiftOSDesktop.anymemory(7) + If ShiftOSDesktop.anymemory(8).ToArgb.ToString = "0" Then Else pnlany9.BackColor = ShiftOSDesktop.anymemory(8) + If ShiftOSDesktop.anymemory(9).ToArgb.ToString = "0" Then Else pnlany10.BackColor = ShiftOSDesktop.anymemory(9) + If ShiftOSDesktop.anymemory(10).ToArgb.ToString = "0" Then Else pnlany11.BackColor = ShiftOSDesktop.anymemory(10) + If ShiftOSDesktop.anymemory(11).ToArgb.ToString = "0" Then Else pnlany12.BackColor = ShiftOSDesktop.anymemory(11) + If ShiftOSDesktop.anymemory(12).ToArgb.ToString = "0" Then Else pnlany13.BackColor = ShiftOSDesktop.anymemory(12) + If ShiftOSDesktop.anymemory(13).ToArgb.ToString = "0" Then Else pnlany14.BackColor = ShiftOSDesktop.anymemory(13) + If ShiftOSDesktop.anymemory(14).ToArgb.ToString = "0" Then Else pnlany15.BackColor = ShiftOSDesktop.anymemory(14) + If ShiftOSDesktop.anymemory(15).ToArgb.ToString = "0" Then Else pnlany16.BackColor = ShiftOSDesktop.anymemory(15) + + If ShiftOSDesktop.graymemory(0).ToArgb.ToString = "0" Then Else pnlgray1.BackColor = ShiftOSDesktop.graymemory(0) + If ShiftOSDesktop.graymemory(1).ToArgb.ToString = "0" Then Else pnlgray2.BackColor = ShiftOSDesktop.graymemory(1) + If ShiftOSDesktop.graymemory(2).ToArgb.ToString = "0" Then Else pnlgray3.BackColor = ShiftOSDesktop.graymemory(2) + If ShiftOSDesktop.graymemory(3).ToArgb.ToString = "0" Then Else pnlgray4.BackColor = ShiftOSDesktop.graymemory(3) + If ShiftOSDesktop.graymemory(4).ToArgb.ToString = "0" Then Else pnlgray5.BackColor = ShiftOSDesktop.graymemory(4) + If ShiftOSDesktop.graymemory(5).ToArgb.ToString = "0" Then Else pnlgray6.BackColor = ShiftOSDesktop.graymemory(5) + If ShiftOSDesktop.graymemory(6).ToArgb.ToString = "0" Then Else pnlgray7.BackColor = ShiftOSDesktop.graymemory(6) + If ShiftOSDesktop.graymemory(7).ToArgb.ToString = "0" Then Else pnlgray8.BackColor = ShiftOSDesktop.graymemory(7) + If ShiftOSDesktop.graymemory(8).ToArgb.ToString = "0" Then Else pnlgray9.BackColor = ShiftOSDesktop.graymemory(8) + If ShiftOSDesktop.graymemory(9).ToArgb.ToString = "0" Then Else pnlgray10.BackColor = ShiftOSDesktop.graymemory(9) + If ShiftOSDesktop.graymemory(10).ToArgb.ToString = "0" Then Else pnlgray11.BackColor = ShiftOSDesktop.graymemory(10) + If ShiftOSDesktop.graymemory(11).ToArgb.ToString = "0" Then Else pnlgray12.BackColor = ShiftOSDesktop.graymemory(11) + If ShiftOSDesktop.graymemory(12).ToArgb.ToString = "0" Then Else pnlgray13.BackColor = ShiftOSDesktop.graymemory(12) + If ShiftOSDesktop.graymemory(13).ToArgb.ToString = "0" Then Else pnlgray14.BackColor = ShiftOSDesktop.graymemory(13) + If ShiftOSDesktop.graymemory(14).ToArgb.ToString = "0" Then Else pnlgray15.BackColor = ShiftOSDesktop.graymemory(14) + If ShiftOSDesktop.graymemory(15).ToArgb.ToString = "0" Then Else pnlgray16.BackColor = ShiftOSDesktop.graymemory(15) + + If ShiftOSDesktop.purplememory(0).ToArgb.ToString = "0" Then Else pnlpurple1.BackColor = ShiftOSDesktop.purplememory(0) + If ShiftOSDesktop.purplememory(1).ToArgb.ToString = "0" Then Else pnlpurple2.BackColor = ShiftOSDesktop.purplememory(1) + If ShiftOSDesktop.purplememory(2).ToArgb.ToString = "0" Then Else pnlpurple3.BackColor = ShiftOSDesktop.purplememory(2) + If ShiftOSDesktop.purplememory(3).ToArgb.ToString = "0" Then Else pnlpurple4.BackColor = ShiftOSDesktop.purplememory(3) + If ShiftOSDesktop.purplememory(4).ToArgb.ToString = "0" Then Else pnlpurple5.BackColor = ShiftOSDesktop.purplememory(4) + If ShiftOSDesktop.purplememory(5).ToArgb.ToString = "0" Then Else pnlpurple6.BackColor = ShiftOSDesktop.purplememory(5) + If ShiftOSDesktop.purplememory(6).ToArgb.ToString = "0" Then Else pnlpurple7.BackColor = ShiftOSDesktop.purplememory(6) + If ShiftOSDesktop.purplememory(7).ToArgb.ToString = "0" Then Else pnlpurple8.BackColor = ShiftOSDesktop.purplememory(7) + If ShiftOSDesktop.purplememory(8).ToArgb.ToString = "0" Then Else pnlpurple9.BackColor = ShiftOSDesktop.purplememory(8) + If ShiftOSDesktop.purplememory(9).ToArgb.ToString = "0" Then Else pnlpurple10.BackColor = ShiftOSDesktop.purplememory(9) + If ShiftOSDesktop.purplememory(10).ToArgb.ToString = "0" Then Else pnlpurple11.BackColor = ShiftOSDesktop.purplememory(10) + If ShiftOSDesktop.purplememory(11).ToArgb.ToString = "0" Then Else pnlpurple12.BackColor = ShiftOSDesktop.purplememory(11) + If ShiftOSDesktop.purplememory(12).ToArgb.ToString = "0" Then Else pnlpurple13.BackColor = ShiftOSDesktop.purplememory(12) + If ShiftOSDesktop.purplememory(13).ToArgb.ToString = "0" Then Else pnlpurple14.BackColor = ShiftOSDesktop.purplememory(13) + If ShiftOSDesktop.purplememory(14).ToArgb.ToString = "0" Then Else pnlpurple15.BackColor = ShiftOSDesktop.purplememory(14) + If ShiftOSDesktop.purplememory(15).ToArgb.ToString = "0" Then Else pnlpurple16.BackColor = ShiftOSDesktop.purplememory(15) + + If ShiftOSDesktop.bluememory(0).ToArgb.ToString = "0" Then Else pnlblue1.BackColor = ShiftOSDesktop.bluememory(0) + If ShiftOSDesktop.bluememory(1).ToArgb.ToString = "0" Then Else pnlblue2.BackColor = ShiftOSDesktop.bluememory(1) + If ShiftOSDesktop.bluememory(2).ToArgb.ToString = "0" Then Else pnlblue3.BackColor = ShiftOSDesktop.bluememory(2) + If ShiftOSDesktop.bluememory(3).ToArgb.ToString = "0" Then Else pnlblue4.BackColor = ShiftOSDesktop.bluememory(3) + If ShiftOSDesktop.bluememory(4).ToArgb.ToString = "0" Then Else pnlblue5.BackColor = ShiftOSDesktop.bluememory(4) + If ShiftOSDesktop.bluememory(5).ToArgb.ToString = "0" Then Else pnlblue6.BackColor = ShiftOSDesktop.bluememory(5) + If ShiftOSDesktop.bluememory(6).ToArgb.ToString = "0" Then Else pnlblue7.BackColor = ShiftOSDesktop.bluememory(6) + If ShiftOSDesktop.bluememory(7).ToArgb.ToString = "0" Then Else pnlblue8.BackColor = ShiftOSDesktop.bluememory(7) + If ShiftOSDesktop.bluememory(8).ToArgb.ToString = "0" Then Else pnlblue9.BackColor = ShiftOSDesktop.bluememory(8) + If ShiftOSDesktop.bluememory(9).ToArgb.ToString = "0" Then Else pnlblue10.BackColor = ShiftOSDesktop.bluememory(9) + If ShiftOSDesktop.bluememory(10).ToArgb.ToString = "0" Then Else pnlblue11.BackColor = ShiftOSDesktop.bluememory(10) + If ShiftOSDesktop.bluememory(11).ToArgb.ToString = "0" Then Else pnlblue12.BackColor = ShiftOSDesktop.bluememory(11) + If ShiftOSDesktop.bluememory(12).ToArgb.ToString = "0" Then Else pnlblue13.BackColor = ShiftOSDesktop.bluememory(12) + If ShiftOSDesktop.bluememory(13).ToArgb.ToString = "0" Then Else pnlblue14.BackColor = ShiftOSDesktop.bluememory(13) + If ShiftOSDesktop.bluememory(14).ToArgb.ToString = "0" Then Else pnlblue15.BackColor = ShiftOSDesktop.bluememory(14) + If ShiftOSDesktop.bluememory(15).ToArgb.ToString = "0" Then Else pnlblue16.BackColor = ShiftOSDesktop.bluememory(15) + + If ShiftOSDesktop.greenmemory(0).ToArgb.ToString = "0" Then Else pnlgreen1.BackColor = ShiftOSDesktop.greenmemory(0) + If ShiftOSDesktop.greenmemory(1).ToArgb.ToString = "0" Then Else pnlgreen2.BackColor = ShiftOSDesktop.greenmemory(1) + If ShiftOSDesktop.greenmemory(2).ToArgb.ToString = "0" Then Else pnlgreen3.BackColor = ShiftOSDesktop.greenmemory(2) + If ShiftOSDesktop.greenmemory(3).ToArgb.ToString = "0" Then Else pnlgreen4.BackColor = ShiftOSDesktop.greenmemory(3) + If ShiftOSDesktop.greenmemory(4).ToArgb.ToString = "0" Then Else pnlgreen5.BackColor = ShiftOSDesktop.greenmemory(4) + If ShiftOSDesktop.greenmemory(5).ToArgb.ToString = "0" Then Else pnlgreen6.BackColor = ShiftOSDesktop.greenmemory(5) + If ShiftOSDesktop.greenmemory(6).ToArgb.ToString = "0" Then Else pnlgreen7.BackColor = ShiftOSDesktop.greenmemory(6) + If ShiftOSDesktop.greenmemory(7).ToArgb.ToString = "0" Then Else pnlgreen8.BackColor = ShiftOSDesktop.greenmemory(7) + If ShiftOSDesktop.greenmemory(8).ToArgb.ToString = "0" Then Else pnlgreen9.BackColor = ShiftOSDesktop.greenmemory(8) + If ShiftOSDesktop.greenmemory(9).ToArgb.ToString = "0" Then Else pnlgreen10.BackColor = ShiftOSDesktop.greenmemory(9) + If ShiftOSDesktop.greenmemory(10).ToArgb.ToString = "0" Then Else pnlgreen11.BackColor = ShiftOSDesktop.greenmemory(10) + If ShiftOSDesktop.greenmemory(11).ToArgb.ToString = "0" Then Else pnlgreen12.BackColor = ShiftOSDesktop.greenmemory(11) + If ShiftOSDesktop.greenmemory(12).ToArgb.ToString = "0" Then Else pnlgreen13.BackColor = ShiftOSDesktop.greenmemory(12) + If ShiftOSDesktop.greenmemory(13).ToArgb.ToString = "0" Then Else pnlgreen14.BackColor = ShiftOSDesktop.greenmemory(13) + If ShiftOSDesktop.greenmemory(14).ToArgb.ToString = "0" Then Else pnlgreen15.BackColor = ShiftOSDesktop.greenmemory(14) + If ShiftOSDesktop.greenmemory(15).ToArgb.ToString = "0" Then Else pnlgreen16.BackColor = ShiftOSDesktop.greenmemory(15) + + If ShiftOSDesktop.yellowmemory(0).ToArgb.ToString = "0" Then Else pnlyellow1.BackColor = ShiftOSDesktop.yellowmemory(0) + If ShiftOSDesktop.yellowmemory(1).ToArgb.ToString = "0" Then Else pnlyellow2.BackColor = ShiftOSDesktop.yellowmemory(1) + If ShiftOSDesktop.yellowmemory(2).ToArgb.ToString = "0" Then Else pnlyellow3.BackColor = ShiftOSDesktop.yellowmemory(2) + If ShiftOSDesktop.yellowmemory(3).ToArgb.ToString = "0" Then Else pnlyellow4.BackColor = ShiftOSDesktop.yellowmemory(3) + If ShiftOSDesktop.yellowmemory(4).ToArgb.ToString = "0" Then Else pnlyellow5.BackColor = ShiftOSDesktop.yellowmemory(4) + If ShiftOSDesktop.yellowmemory(5).ToArgb.ToString = "0" Then Else pnlyellow6.BackColor = ShiftOSDesktop.yellowmemory(5) + If ShiftOSDesktop.yellowmemory(6).ToArgb.ToString = "0" Then Else pnlyellow7.BackColor = ShiftOSDesktop.yellowmemory(6) + If ShiftOSDesktop.yellowmemory(7).ToArgb.ToString = "0" Then Else pnlyellow8.BackColor = ShiftOSDesktop.yellowmemory(7) + If ShiftOSDesktop.yellowmemory(8).ToArgb.ToString = "0" Then Else pnlyellow9.BackColor = ShiftOSDesktop.yellowmemory(8) + If ShiftOSDesktop.yellowmemory(9).ToArgb.ToString = "0" Then Else pnlyellow10.BackColor = ShiftOSDesktop.yellowmemory(9) + If ShiftOSDesktop.yellowmemory(10).ToArgb.ToString = "0" Then Else pnlyellow11.BackColor = ShiftOSDesktop.yellowmemory(10) + If ShiftOSDesktop.yellowmemory(11).ToArgb.ToString = "0" Then Else pnlyellow12.BackColor = ShiftOSDesktop.yellowmemory(11) + If ShiftOSDesktop.yellowmemory(12).ToArgb.ToString = "0" Then Else pnlyellow13.BackColor = ShiftOSDesktop.yellowmemory(12) + If ShiftOSDesktop.yellowmemory(13).ToArgb.ToString = "0" Then Else pnlyellow14.BackColor = ShiftOSDesktop.yellowmemory(13) + If ShiftOSDesktop.yellowmemory(14).ToArgb.ToString = "0" Then Else pnlyellow15.BackColor = ShiftOSDesktop.yellowmemory(14) + If ShiftOSDesktop.yellowmemory(15).ToArgb.ToString = "0" Then Else pnlyellow16.BackColor = ShiftOSDesktop.yellowmemory(15) + + If ShiftOSDesktop.orangememory(0).ToArgb.ToString = "0" Then Else pnlorange1.BackColor = ShiftOSDesktop.orangememory(0) + If ShiftOSDesktop.orangememory(1).ToArgb.ToString = "0" Then Else pnlorange2.BackColor = ShiftOSDesktop.orangememory(1) + If ShiftOSDesktop.orangememory(2).ToArgb.ToString = "0" Then Else pnlorange3.BackColor = ShiftOSDesktop.orangememory(2) + If ShiftOSDesktop.orangememory(3).ToArgb.ToString = "0" Then Else pnlorange4.BackColor = ShiftOSDesktop.orangememory(3) + If ShiftOSDesktop.orangememory(4).ToArgb.ToString = "0" Then Else pnlorange5.BackColor = ShiftOSDesktop.orangememory(4) + If ShiftOSDesktop.orangememory(5).ToArgb.ToString = "0" Then Else pnlorange6.BackColor = ShiftOSDesktop.orangememory(5) + If ShiftOSDesktop.orangememory(6).ToArgb.ToString = "0" Then Else pnlorange7.BackColor = ShiftOSDesktop.orangememory(6) + If ShiftOSDesktop.orangememory(7).ToArgb.ToString = "0" Then Else pnlorange8.BackColor = ShiftOSDesktop.orangememory(7) + If ShiftOSDesktop.orangememory(8).ToArgb.ToString = "0" Then Else pnlorange9.BackColor = ShiftOSDesktop.orangememory(8) + If ShiftOSDesktop.orangememory(9).ToArgb.ToString = "0" Then Else pnlorange10.BackColor = ShiftOSDesktop.orangememory(9) + If ShiftOSDesktop.orangememory(10).ToArgb.ToString = "0" Then Else pnlorange11.BackColor = ShiftOSDesktop.orangememory(10) + If ShiftOSDesktop.orangememory(11).ToArgb.ToString = "0" Then Else pnlorange12.BackColor = ShiftOSDesktop.orangememory(11) + If ShiftOSDesktop.orangememory(12).ToArgb.ToString = "0" Then Else pnlorange13.BackColor = ShiftOSDesktop.orangememory(12) + If ShiftOSDesktop.orangememory(13).ToArgb.ToString = "0" Then Else pnlorange14.BackColor = ShiftOSDesktop.orangememory(13) + If ShiftOSDesktop.orangememory(14).ToArgb.ToString = "0" Then Else pnlorange15.BackColor = ShiftOSDesktop.orangememory(14) + If ShiftOSDesktop.orangememory(15).ToArgb.ToString = "0" Then Else pnlorange16.BackColor = ShiftOSDesktop.orangememory(15) + + If ShiftOSDesktop.brownmemory(0).ToArgb.ToString = "0" Then Else pnlbrown1.BackColor = ShiftOSDesktop.brownmemory(0) + If ShiftOSDesktop.brownmemory(1).ToArgb.ToString = "0" Then Else pnlbrown2.BackColor = ShiftOSDesktop.brownmemory(1) + If ShiftOSDesktop.brownmemory(2).ToArgb.ToString = "0" Then Else pnlbrown3.BackColor = ShiftOSDesktop.brownmemory(2) + If ShiftOSDesktop.brownmemory(3).ToArgb.ToString = "0" Then Else pnlbrown4.BackColor = ShiftOSDesktop.brownmemory(3) + If ShiftOSDesktop.brownmemory(4).ToArgb.ToString = "0" Then Else pnlbrown5.BackColor = ShiftOSDesktop.brownmemory(4) + If ShiftOSDesktop.brownmemory(5).ToArgb.ToString = "0" Then Else pnlbrown6.BackColor = ShiftOSDesktop.brownmemory(5) + If ShiftOSDesktop.brownmemory(6).ToArgb.ToString = "0" Then Else pnlbrown7.BackColor = ShiftOSDesktop.brownmemory(6) + If ShiftOSDesktop.brownmemory(7).ToArgb.ToString = "0" Then Else pnlbrown8.BackColor = ShiftOSDesktop.brownmemory(7) + If ShiftOSDesktop.brownmemory(8).ToArgb.ToString = "0" Then Else pnlbrown9.BackColor = ShiftOSDesktop.brownmemory(8) + If ShiftOSDesktop.brownmemory(9).ToArgb.ToString = "0" Then Else pnlbrown10.BackColor = ShiftOSDesktop.brownmemory(9) + If ShiftOSDesktop.brownmemory(10).ToArgb.ToString = "0" Then Else pnlbrown11.BackColor = ShiftOSDesktop.brownmemory(10) + If ShiftOSDesktop.brownmemory(11).ToArgb.ToString = "0" Then Else pnlbrown12.BackColor = ShiftOSDesktop.brownmemory(11) + If ShiftOSDesktop.brownmemory(12).ToArgb.ToString = "0" Then Else pnlbrown13.BackColor = ShiftOSDesktop.brownmemory(12) + If ShiftOSDesktop.brownmemory(13).ToArgb.ToString = "0" Then Else pnlbrown14.BackColor = ShiftOSDesktop.brownmemory(13) + If ShiftOSDesktop.brownmemory(14).ToArgb.ToString = "0" Then Else pnlbrown15.BackColor = ShiftOSDesktop.brownmemory(14) + If ShiftOSDesktop.brownmemory(15).ToArgb.ToString = "0" Then Else pnlbrown16.BackColor = ShiftOSDesktop.brownmemory(15) + + If ShiftOSDesktop.redmemory(0).ToArgb.ToString = "0" Then Else pnlred1.BackColor = ShiftOSDesktop.redmemory(0) + If ShiftOSDesktop.redmemory(1).ToArgb.ToString = "0" Then Else pnlred2.BackColor = ShiftOSDesktop.redmemory(1) + If ShiftOSDesktop.redmemory(2).ToArgb.ToString = "0" Then Else pnlred3.BackColor = ShiftOSDesktop.redmemory(2) + If ShiftOSDesktop.redmemory(3).ToArgb.ToString = "0" Then Else pnlred4.BackColor = ShiftOSDesktop.redmemory(3) + If ShiftOSDesktop.redmemory(4).ToArgb.ToString = "0" Then Else pnlred5.BackColor = ShiftOSDesktop.redmemory(4) + If ShiftOSDesktop.redmemory(5).ToArgb.ToString = "0" Then Else pnlred6.BackColor = ShiftOSDesktop.redmemory(5) + If ShiftOSDesktop.redmemory(6).ToArgb.ToString = "0" Then Else pnlred7.BackColor = ShiftOSDesktop.redmemory(6) + If ShiftOSDesktop.redmemory(7).ToArgb.ToString = "0" Then Else pnlred8.BackColor = ShiftOSDesktop.redmemory(7) + If ShiftOSDesktop.redmemory(8).ToArgb.ToString = "0" Then Else pnlred9.BackColor = ShiftOSDesktop.redmemory(8) + If ShiftOSDesktop.redmemory(9).ToArgb.ToString = "0" Then Else pnlred10.BackColor = ShiftOSDesktop.redmemory(9) + If ShiftOSDesktop.redmemory(10).ToArgb.ToString = "0" Then Else pnlred11.BackColor = ShiftOSDesktop.redmemory(10) + If ShiftOSDesktop.redmemory(11).ToArgb.ToString = "0" Then Else pnlred12.BackColor = ShiftOSDesktop.redmemory(11) + If ShiftOSDesktop.redmemory(12).ToArgb.ToString = "0" Then Else pnlred13.BackColor = ShiftOSDesktop.redmemory(12) + If ShiftOSDesktop.redmemory(13).ToArgb.ToString = "0" Then Else pnlred14.BackColor = ShiftOSDesktop.redmemory(13) + If ShiftOSDesktop.redmemory(14).ToArgb.ToString = "0" Then Else pnlred15.BackColor = ShiftOSDesktop.redmemory(14) + If ShiftOSDesktop.redmemory(15).ToArgb.ToString = "0" Then Else pnlred16.BackColor = ShiftOSDesktop.redmemory(15) + + If ShiftOSDesktop.pinkmemory(0).ToArgb.ToString = "0" Then Else pnlpink1.BackColor = ShiftOSDesktop.pinkmemory(0) + If ShiftOSDesktop.pinkmemory(1).ToArgb.ToString = "0" Then Else pnlpink2.BackColor = ShiftOSDesktop.pinkmemory(1) + If ShiftOSDesktop.pinkmemory(2).ToArgb.ToString = "0" Then Else pnlpink3.BackColor = ShiftOSDesktop.pinkmemory(2) + If ShiftOSDesktop.pinkmemory(3).ToArgb.ToString = "0" Then Else pnlpink4.BackColor = ShiftOSDesktop.pinkmemory(3) + If ShiftOSDesktop.pinkmemory(4).ToArgb.ToString = "0" Then Else pnlpink5.BackColor = ShiftOSDesktop.pinkmemory(4) + If ShiftOSDesktop.pinkmemory(5).ToArgb.ToString = "0" Then Else pnlpink6.BackColor = ShiftOSDesktop.pinkmemory(5) + If ShiftOSDesktop.pinkmemory(6).ToArgb.ToString = "0" Then Else pnlpink7.BackColor = ShiftOSDesktop.pinkmemory(6) + If ShiftOSDesktop.pinkmemory(7).ToArgb.ToString = "0" Then Else pnlpink8.BackColor = ShiftOSDesktop.pinkmemory(7) + If ShiftOSDesktop.pinkmemory(8).ToArgb.ToString = "0" Then Else pnlpink9.BackColor = ShiftOSDesktop.pinkmemory(8) + If ShiftOSDesktop.pinkmemory(9).ToArgb.ToString = "0" Then Else pnlpink10.BackColor = ShiftOSDesktop.pinkmemory(9) + If ShiftOSDesktop.pinkmemory(10).ToArgb.ToString = "0" Then Else pnlpink11.BackColor = ShiftOSDesktop.pinkmemory(10) + If ShiftOSDesktop.pinkmemory(11).ToArgb.ToString = "0" Then Else pnlpink12.BackColor = ShiftOSDesktop.pinkmemory(11) + If ShiftOSDesktop.pinkmemory(12).ToArgb.ToString = "0" Then Else pnlpink13.BackColor = ShiftOSDesktop.pinkmemory(12) + If ShiftOSDesktop.pinkmemory(13).ToArgb.ToString = "0" Then Else pnlpink14.BackColor = ShiftOSDesktop.pinkmemory(13) + If ShiftOSDesktop.pinkmemory(14).ToArgb.ToString = "0" Then Else pnlpink15.BackColor = ShiftOSDesktop.pinkmemory(14) + If ShiftOSDesktop.pinkmemory(15).ToArgb.ToString = "0" Then Else pnlpink16.BackColor = ShiftOSDesktop.pinkmemory(15) + End Sub + + Public Sub saveanymemory() + ShiftOSDesktop.anymemory(0) = pnlany1.BackColor + ShiftOSDesktop.anymemory(1) = pnlany2.BackColor + ShiftOSDesktop.anymemory(2) = pnlany3.BackColor + ShiftOSDesktop.anymemory(3) = pnlany4.BackColor + ShiftOSDesktop.anymemory(4) = pnlany5.BackColor + ShiftOSDesktop.anymemory(5) = pnlany6.BackColor + ShiftOSDesktop.anymemory(6) = pnlany7.BackColor + ShiftOSDesktop.anymemory(7) = pnlany8.BackColor + ShiftOSDesktop.anymemory(8) = pnlany9.BackColor + ShiftOSDesktop.anymemory(9) = pnlany10.BackColor + ShiftOSDesktop.anymemory(10) = pnlany11.BackColor + ShiftOSDesktop.anymemory(11) = pnlany12.BackColor + ShiftOSDesktop.anymemory(12) = pnlany13.BackColor + ShiftOSDesktop.anymemory(13) = pnlany14.BackColor + ShiftOSDesktop.anymemory(14) = pnlany15.BackColor + ShiftOSDesktop.anymemory(15) = pnlany16.BackColor + End Sub + + Public Sub savegraymemory() + ShiftOSDesktop.graymemory(0) = pnlgray1.BackColor + ShiftOSDesktop.graymemory(1) = pnlgray2.BackColor + ShiftOSDesktop.graymemory(2) = pnlgray3.BackColor + ShiftOSDesktop.graymemory(3) = pnlgray4.BackColor + ShiftOSDesktop.graymemory(4) = pnlgray5.BackColor + ShiftOSDesktop.graymemory(5) = pnlgray6.BackColor + ShiftOSDesktop.graymemory(6) = pnlgray7.BackColor + ShiftOSDesktop.graymemory(7) = pnlgray8.BackColor + ShiftOSDesktop.graymemory(8) = pnlgray9.BackColor + ShiftOSDesktop.graymemory(9) = pnlgray10.BackColor + ShiftOSDesktop.graymemory(10) = pnlgray11.BackColor + ShiftOSDesktop.graymemory(11) = pnlgray12.BackColor + ShiftOSDesktop.graymemory(12) = pnlgray13.BackColor + ShiftOSDesktop.graymemory(13) = pnlgray14.BackColor + ShiftOSDesktop.graymemory(14) = pnlgray15.BackColor + ShiftOSDesktop.graymemory(15) = pnlgray16.BackColor + End Sub + + Public Sub savepurplememory() + ShiftOSDesktop.purplememory(0) = pnlpurple1.BackColor + ShiftOSDesktop.purplememory(1) = pnlpurple2.BackColor + ShiftOSDesktop.purplememory(2) = pnlpurple3.BackColor + ShiftOSDesktop.purplememory(3) = pnlpurple4.BackColor + ShiftOSDesktop.purplememory(4) = pnlpurple5.BackColor + ShiftOSDesktop.purplememory(5) = pnlpurple6.BackColor + ShiftOSDesktop.purplememory(6) = pnlpurple7.BackColor + ShiftOSDesktop.purplememory(7) = pnlpurple8.BackColor + ShiftOSDesktop.purplememory(8) = pnlpurple9.BackColor + ShiftOSDesktop.purplememory(9) = pnlpurple10.BackColor + ShiftOSDesktop.purplememory(10) = pnlpurple11.BackColor + ShiftOSDesktop.purplememory(11) = pnlpurple12.BackColor + ShiftOSDesktop.purplememory(12) = pnlpurple13.BackColor + ShiftOSDesktop.purplememory(13) = pnlpurple14.BackColor + ShiftOSDesktop.purplememory(14) = pnlpurple15.BackColor + ShiftOSDesktop.purplememory(15) = pnlpurple16.BackColor + End Sub + + Public Sub savebluememory() + ShiftOSDesktop.bluememory(0) = pnlblue1.BackColor + ShiftOSDesktop.bluememory(1) = pnlblue2.BackColor + ShiftOSDesktop.bluememory(2) = pnlblue3.BackColor + ShiftOSDesktop.bluememory(3) = pnlblue4.BackColor + ShiftOSDesktop.bluememory(4) = pnlblue5.BackColor + ShiftOSDesktop.bluememory(5) = pnlblue6.BackColor + ShiftOSDesktop.bluememory(6) = pnlblue7.BackColor + ShiftOSDesktop.bluememory(7) = pnlblue8.BackColor + ShiftOSDesktop.bluememory(8) = pnlblue9.BackColor + ShiftOSDesktop.bluememory(9) = pnlblue10.BackColor + ShiftOSDesktop.bluememory(10) = pnlblue11.BackColor + ShiftOSDesktop.bluememory(11) = pnlblue12.BackColor + ShiftOSDesktop.bluememory(12) = pnlblue13.BackColor + ShiftOSDesktop.bluememory(13) = pnlblue14.BackColor + ShiftOSDesktop.bluememory(14) = pnlblue15.BackColor + ShiftOSDesktop.bluememory(15) = pnlblue16.BackColor + End Sub + + Public Sub savegreenmemory() + ShiftOSDesktop.greenmemory(0) = pnlgreen1.BackColor + ShiftOSDesktop.greenmemory(1) = pnlgreen2.BackColor + ShiftOSDesktop.greenmemory(2) = pnlgreen3.BackColor + ShiftOSDesktop.greenmemory(3) = pnlgreen4.BackColor + ShiftOSDesktop.greenmemory(4) = pnlgreen5.BackColor + ShiftOSDesktop.greenmemory(5) = pnlgreen6.BackColor + ShiftOSDesktop.greenmemory(6) = pnlgreen7.BackColor + ShiftOSDesktop.greenmemory(7) = pnlgreen8.BackColor + ShiftOSDesktop.greenmemory(8) = pnlgreen9.BackColor + ShiftOSDesktop.greenmemory(9) = pnlgreen10.BackColor + ShiftOSDesktop.greenmemory(10) = pnlgreen11.BackColor + ShiftOSDesktop.greenmemory(11) = pnlgreen12.BackColor + ShiftOSDesktop.greenmemory(12) = pnlgreen13.BackColor + ShiftOSDesktop.greenmemory(13) = pnlgreen14.BackColor + ShiftOSDesktop.greenmemory(14) = pnlgreen15.BackColor + ShiftOSDesktop.greenmemory(15) = pnlgreen16.BackColor + End Sub + + Public Sub saveyellowmemory() + ShiftOSDesktop.yellowmemory(0) = pnlyellow1.BackColor + ShiftOSDesktop.yellowmemory(1) = pnlyellow2.BackColor + ShiftOSDesktop.yellowmemory(2) = pnlyellow3.BackColor + ShiftOSDesktop.yellowmemory(3) = pnlyellow4.BackColor + ShiftOSDesktop.yellowmemory(4) = pnlyellow5.BackColor + ShiftOSDesktop.yellowmemory(5) = pnlyellow6.BackColor + ShiftOSDesktop.yellowmemory(6) = pnlyellow7.BackColor + ShiftOSDesktop.yellowmemory(7) = pnlyellow8.BackColor + ShiftOSDesktop.yellowmemory(8) = pnlyellow9.BackColor + ShiftOSDesktop.yellowmemory(9) = pnlyellow10.BackColor + ShiftOSDesktop.yellowmemory(10) = pnlyellow11.BackColor + ShiftOSDesktop.yellowmemory(11) = pnlyellow12.BackColor + ShiftOSDesktop.yellowmemory(12) = pnlyellow13.BackColor + ShiftOSDesktop.yellowmemory(13) = pnlyellow14.BackColor + ShiftOSDesktop.yellowmemory(14) = pnlyellow15.BackColor + ShiftOSDesktop.yellowmemory(15) = pnlyellow16.BackColor + End Sub + + Public Sub saveorangememory() + ShiftOSDesktop.orangememory(0) = pnlorange1.BackColor + ShiftOSDesktop.orangememory(1) = pnlorange2.BackColor + ShiftOSDesktop.orangememory(2) = pnlorange3.BackColor + ShiftOSDesktop.orangememory(3) = pnlorange4.BackColor + ShiftOSDesktop.orangememory(4) = pnlorange5.BackColor + ShiftOSDesktop.orangememory(5) = pnlorange6.BackColor + ShiftOSDesktop.orangememory(6) = pnlorange7.BackColor + ShiftOSDesktop.orangememory(7) = pnlorange8.BackColor + ShiftOSDesktop.orangememory(8) = pnlorange9.BackColor + ShiftOSDesktop.orangememory(9) = pnlorange10.BackColor + ShiftOSDesktop.orangememory(10) = pnlorange11.BackColor + ShiftOSDesktop.orangememory(11) = pnlorange12.BackColor + ShiftOSDesktop.orangememory(12) = pnlorange13.BackColor + ShiftOSDesktop.orangememory(13) = pnlorange14.BackColor + ShiftOSDesktop.orangememory(14) = pnlorange15.BackColor + ShiftOSDesktop.orangememory(15) = pnlorange16.BackColor + End Sub + + Public Sub savebrownmemory() + ShiftOSDesktop.brownmemory(0) = pnlbrown1.BackColor + ShiftOSDesktop.brownmemory(1) = pnlbrown2.BackColor + ShiftOSDesktop.brownmemory(2) = pnlbrown3.BackColor + ShiftOSDesktop.brownmemory(3) = pnlbrown4.BackColor + ShiftOSDesktop.brownmemory(4) = pnlbrown5.BackColor + ShiftOSDesktop.brownmemory(5) = pnlbrown6.BackColor + ShiftOSDesktop.brownmemory(6) = pnlbrown7.BackColor + ShiftOSDesktop.brownmemory(7) = pnlbrown8.BackColor + ShiftOSDesktop.brownmemory(8) = pnlbrown9.BackColor + ShiftOSDesktop.brownmemory(9) = pnlbrown10.BackColor + ShiftOSDesktop.brownmemory(10) = pnlbrown11.BackColor + ShiftOSDesktop.brownmemory(11) = pnlbrown12.BackColor + ShiftOSDesktop.brownmemory(12) = pnlbrown13.BackColor + ShiftOSDesktop.brownmemory(13) = pnlbrown14.BackColor + ShiftOSDesktop.brownmemory(14) = pnlbrown15.BackColor + ShiftOSDesktop.brownmemory(15) = pnlbrown16.BackColor + End Sub + + Public Sub saveredmemory() + ShiftOSDesktop.redmemory(0) = pnlred1.BackColor + ShiftOSDesktop.redmemory(1) = pnlred2.BackColor + ShiftOSDesktop.redmemory(2) = pnlred3.BackColor + ShiftOSDesktop.redmemory(3) = pnlred4.BackColor + ShiftOSDesktop.redmemory(4) = pnlred5.BackColor + ShiftOSDesktop.redmemory(5) = pnlred6.BackColor + ShiftOSDesktop.redmemory(6) = pnlred7.BackColor + ShiftOSDesktop.redmemory(7) = pnlred8.BackColor + ShiftOSDesktop.redmemory(8) = pnlred9.BackColor + ShiftOSDesktop.redmemory(9) = pnlred10.BackColor + ShiftOSDesktop.redmemory(10) = pnlred11.BackColor + ShiftOSDesktop.redmemory(11) = pnlred12.BackColor + ShiftOSDesktop.redmemory(12) = pnlred13.BackColor + ShiftOSDesktop.redmemory(13) = pnlred14.BackColor + ShiftOSDesktop.redmemory(14) = pnlred15.BackColor + ShiftOSDesktop.redmemory(15) = pnlred16.BackColor + End Sub + + Public Sub savepinkmemory() + ShiftOSDesktop.pinkmemory(0) = pnlpink1.BackColor + ShiftOSDesktop.pinkmemory(1) = pnlpink2.BackColor + ShiftOSDesktop.pinkmemory(2) = pnlpink3.BackColor + ShiftOSDesktop.pinkmemory(3) = pnlpink4.BackColor + ShiftOSDesktop.pinkmemory(4) = pnlpink5.BackColor + ShiftOSDesktop.pinkmemory(5) = pnlpink6.BackColor + ShiftOSDesktop.pinkmemory(6) = pnlpink7.BackColor + ShiftOSDesktop.pinkmemory(7) = pnlpink8.BackColor + ShiftOSDesktop.pinkmemory(8) = pnlpink9.BackColor + ShiftOSDesktop.pinkmemory(9) = pnlpink10.BackColor + ShiftOSDesktop.pinkmemory(10) = pnlpink11.BackColor + ShiftOSDesktop.pinkmemory(11) = pnlpink12.BackColor + ShiftOSDesktop.pinkmemory(12) = pnlpink13.BackColor + ShiftOSDesktop.pinkmemory(13) = pnlpink14.BackColor + ShiftOSDesktop.pinkmemory(14) = pnlpink15.BackColor + ShiftOSDesktop.pinkmemory(15) = pnlpink16.BackColor + End Sub + + Private Sub getoldcolour() + lblobjecttocolour.Text = colourtochange + pnloldcolour.BackColor = oldcolour + If pnloldcolour.BackColor.IsNamedColor Then + lbloldcolourname.Text = pnloldcolour.BackColor.Name & " :Name" + Else + lbloldcolourname.Text = "Custom :Name" + End If + lbloldcolourrgb.Text = pnloldcolour.BackColor.R & ", " & pnloldcolour.BackColor.G & ", " & pnloldcolour.BackColor.B & " :RGB" + + pnlnewcolour.BackColor = ShiftOSDesktop.lastcolourpick + If pnlnewcolour.BackColor.IsNamedColor Then + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End Sub + + Private Sub determinelevels() + If ShiftOSDesktop.boughtgray = True Then graylevel = 1 + If ShiftOSDesktop.boughtgray2 = True Then graylevel = 2 + If ShiftOSDesktop.boughtgray3 = True Then graylevel = 3 + If ShiftOSDesktop.boughtgray4 = True Then graylevel = 4 + If ShiftOSDesktop.boughtanycolour = True Then anylevel = 1 + If ShiftOSDesktop.boughtanycolour2 = True Then anylevel = 2 + If ShiftOSDesktop.boughtanycolour3 = True Then anylevel = 3 + If ShiftOSDesktop.boughtanycolour4 = True Then anylevel = 4 + If ShiftOSDesktop.boughtpurple = True Then purplelevel = 1 + If ShiftOSDesktop.boughtpurple2 = True Then purplelevel = 2 + If ShiftOSDesktop.boughtpurple3 = True Then purplelevel = 3 + If ShiftOSDesktop.boughtpurple4 = True Then purplelevel = 4 + If ShiftOSDesktop.boughtblue = True Then bluelevel = 1 + If ShiftOSDesktop.boughtblue2 = True Then bluelevel = 2 + If ShiftOSDesktop.boughtblue3 = True Then bluelevel = 3 + If ShiftOSDesktop.boughtblue4 = True Then bluelevel = 4 + If ShiftOSDesktop.boughtgreen = True Then greenlevel = 1 + If ShiftOSDesktop.boughtgreen2 = True Then greenlevel = 2 + If ShiftOSDesktop.boughtgreen3 = True Then greenlevel = 3 + If ShiftOSDesktop.boughtgreen4 = True Then greenlevel = 4 + If ShiftOSDesktop.boughtyellow = True Then yellowlevel = 1 + If ShiftOSDesktop.boughtyellow2 = True Then yellowlevel = 2 + If ShiftOSDesktop.boughtyellow3 = True Then yellowlevel = 3 + If ShiftOSDesktop.boughtyellow4 = True Then yellowlevel = 4 + If ShiftOSDesktop.boughtorange = True Then orangelevel = 1 + If ShiftOSDesktop.boughtorange2 = True Then orangelevel = 2 + If ShiftOSDesktop.boughtorange3 = True Then orangelevel = 3 + If ShiftOSDesktop.boughtorange4 = True Then orangelevel = 4 + If ShiftOSDesktop.boughtbrown = True Then brownlevel = 1 + If ShiftOSDesktop.boughtbrown2 = True Then brownlevel = 2 + If ShiftOSDesktop.boughtbrown3 = True Then brownlevel = 3 + If ShiftOSDesktop.boughtbrown4 = True Then brownlevel = 4 + If ShiftOSDesktop.boughtred = True Then redlevel = 1 + If ShiftOSDesktop.boughtred2 = True Then redlevel = 2 + If ShiftOSDesktop.boughtred3 = True Then redlevel = 3 + If ShiftOSDesktop.boughtred4 = True Then redlevel = 4 + If ShiftOSDesktop.boughtpink = True Then pinklevel = 1 + If ShiftOSDesktop.boughtpink2 = True Then pinklevel = 2 + If ShiftOSDesktop.boughtpink3 = True Then pinklevel = 3 + If ShiftOSDesktop.boughtpink4 = True Then pinklevel = 4 + End Sub + + Private Sub shrinktosizebasedoncoloursbought() + If ShiftOSDesktop.boughtpink = False Then + Me.Height = Me.Height - 46 + Else + pnlpinkcolours.Show() + End If + If ShiftOSDesktop.boughtred = False Then + Me.Height = Me.Height - 46 + Else + pnlredcolours.Show() + End If + If ShiftOSDesktop.boughtbrown = False Then + Me.Height = Me.Height - 46 + Else + pnlbrowncolours.Show() + End If + If ShiftOSDesktop.boughtorange = False Then + Me.Height = Me.Height - 46 + Else + pnlorangecolours.Show() + End If + If ShiftOSDesktop.boughtyellow = False Then + Me.Height = Me.Height - 46 + Else + pnlyellowcolours.Show() + End If + If ShiftOSDesktop.boughtgreen = False Then + Me.Height = Me.Height - 46 + Else + pnlgreencolours.Show() + End If + If ShiftOSDesktop.boughtblue = False Then + Me.Height = Me.Height - 46 + Else + pnlbluecolours.Show() + End If + If ShiftOSDesktop.boughtpurple = False Then + Me.Height = Me.Height - 46 + Else + pnlpurplecolours.Show() + End If + If ShiftOSDesktop.boughtgray = False Then + Me.Height = Me.Height - 46 + Else + pnlgraycolours.Show() + End If + If ShiftOSDesktop.boughtanycolour = False Then + Me.Height = Me.Height - 46 + Else + pnlanycolours.Show() + End If + End Sub + + Private Sub setupboughtcolours() + Select Case graylevel + Case 1 + lblgraylevel.Text = "Level 1" + pnlgray1.BackColor = Color.Black + pnlgray1.Show() + pnlgray2.BackColor = Color.Gray + pnlgray2.Show() + pnlgray3.BackColor = Color.White + pnlgray3.Show() + Case 2 + lblgraylevel.Text = "Level 2" + pnlgray1.BackColor = Color.Black + pnlgray1.Show() + pnlgray2.BackColor = Color.DimGray + pnlgray2.Show() + pnlgray3.BackColor = Color.Gray + pnlgray3.Show() + pnlgray4.BackColor = Color.LightGray + pnlgray4.Show() + pnlgray5.BackColor = Color.White + pnlgray5.Show() + Case 3 + lblgraylevel.Text = "Level 3" + pnlgray1.BackColor = Color.Black + pnlgray1.Show() + pnlgray2.BackColor = Color.DimGray + pnlgray2.Show() + pnlgray3.BackColor = Color.Gray + pnlgray3.Show() + pnlgray4.BackColor = Color.DarkGray + pnlgray4.Show() + pnlgray5.BackColor = Color.Silver + pnlgray5.Show() + pnlgray6.BackColor = Color.LightGray + pnlgray6.Show() + pnlgray7.BackColor = Color.Gainsboro + pnlgray7.Show() + pnlgray8.BackColor = Color.WhiteSmoke + pnlgray8.Show() + pnlgray9.BackColor = Color.White + pnlgray9.Show() + Case 4 + lblgraylevel.Text = "Level 4" + pnlgray1.BackColor = Color.Black + pnlgray1.Show() + pnlgray2.BackColor = Color.DimGray + pnlgray2.Show() + pnlgray3.BackColor = Color.Gray + pnlgray3.Show() + pnlgray4.BackColor = Color.DarkGray + pnlgray4.Show() + pnlgray5.BackColor = Color.Silver + pnlgray5.Show() + pnlgray6.BackColor = Color.LightGray + pnlgray6.Show() + pnlgray7.BackColor = Color.Gainsboro + pnlgray7.Show() + pnlgray8.BackColor = Color.WhiteSmoke + pnlgray8.Show() + pnlgray9.BackColor = Color.White + pnlgray9.Show() + pnlgray10.BackColor = Color.White + pnlgray10.Show() + pnlgray11.BackColor = Color.White + pnlgray11.Show() + pnlgray12.BackColor = Color.White + pnlgray12.Show() + pnlgray13.BackColor = Color.White + pnlgray13.Show() + pnlgray14.BackColor = Color.White + pnlgray14.Show() + pnlgray15.BackColor = Color.White + pnlgray15.Show() + pnlgray16.BackColor = Color.White + pnlgray16.Show() + pnlgraycustomcolour.Show() + lblcustomshadetut.Show() + txtcustomgrayshade.Show() + End Select + + Select Case purplelevel + Case 1 + lblpurplelevel.Text = "Level 1" + pnlpurple1.BackColor = Color.Purple + pnlpurple1.Show() + Case 2 + lblpurplelevel.Text = "Level 2" + pnlpurple1.BackColor = Color.Indigo + pnlpurple1.Show() + pnlpurple2.BackColor = Color.Purple + pnlpurple2.Show() + pnlpurple3.BackColor = Color.MediumPurple + pnlpurple3.Show() + Case 3 + lblpurplelevel.Text = "Level 3" + pnlpurple1.BackColor = Color.Indigo + pnlpurple1.Show() + pnlpurple2.BackColor = Color.DarkSlateBlue + pnlpurple2.Show() + pnlpurple3.BackColor = Color.Purple + pnlpurple3.Show() + pnlpurple4.BackColor = Color.DarkOrchid + pnlpurple4.Show() + pnlpurple5.BackColor = Color.DarkViolet + pnlpurple5.Show() + pnlpurple6.BackColor = Color.BlueViolet + pnlpurple6.Show() + pnlpurple7.BackColor = Color.SlateBlue + pnlpurple7.Show() + pnlpurple8.BackColor = Color.MediumSlateBlue + pnlpurple8.Show() + pnlpurple9.BackColor = Color.MediumPurple + pnlpurple9.Show() + pnlpurple10.BackColor = Color.MediumOrchid + pnlpurple10.Show() + pnlpurple11.BackColor = Color.Magenta + pnlpurple11.Show() + pnlpurple12.BackColor = Color.Orchid + pnlpurple12.Show() + pnlpurple13.BackColor = Color.Violet + pnlpurple13.Show() + pnlpurple14.BackColor = Color.Plum + pnlpurple14.Show() + pnlpurple15.BackColor = Color.Thistle + pnlpurple15.Show() + pnlpurple16.BackColor = Color.Lavender + pnlpurple16.Show() + Case 4 + lblpurplelevel.Text = "Level 4" + pnlpurple1.BackColor = Color.Indigo + pnlpurple1.Show() + pnlpurple2.BackColor = Color.DarkSlateBlue + pnlpurple2.Show() + pnlpurple3.BackColor = Color.Purple + pnlpurple3.Show() + pnlpurple4.BackColor = Color.DarkOrchid + pnlpurple4.Show() + pnlpurple5.BackColor = Color.DarkViolet + pnlpurple5.Show() + pnlpurple6.BackColor = Color.BlueViolet + pnlpurple6.Show() + pnlpurple7.BackColor = Color.SlateBlue + pnlpurple7.Show() + pnlpurple8.BackColor = Color.MediumSlateBlue + pnlpurple8.Show() + pnlpurple9.BackColor = Color.MediumPurple + pnlpurple9.Show() + pnlpurple10.BackColor = Color.MediumOrchid + pnlpurple10.Show() + pnlpurple11.BackColor = Color.Magenta + pnlpurple11.Show() + pnlpurple12.BackColor = Color.Orchid + pnlpurple12.Show() + pnlpurple13.BackColor = Color.Violet + pnlpurple13.Show() + pnlpurple14.BackColor = Color.Plum + pnlpurple14.Show() + pnlpurple15.BackColor = Color.Thistle + pnlpurple15.Show() + pnlpurple16.BackColor = Color.Lavender + pnlpurple16.Show() + pnlpurplecustomcolour.Show() + pnlpurpleoptions.Show() + End Select + + Select Case bluelevel + Case 1 + lblbluelevel.Text = "Level 1" + pnlblue1.BackColor = Color.Blue + pnlblue1.Show() + Case 2 + lblbluelevel.Text = "Level 2" + pnlblue1.BackColor = Color.Navy + pnlblue1.Show() + pnlblue2.BackColor = Color.Blue + pnlblue2.Show() + pnlblue3.BackColor = Color.LightBlue + pnlblue3.Show() + Case 3 + lblbluelevel.Text = "Level 3" + pnlblue1.BackColor = Color.MidnightBlue + pnlblue1.Show() + pnlblue2.BackColor = Color.Navy + pnlblue2.Show() + pnlblue3.BackColor = Color.Blue + pnlblue3.Show() + pnlblue4.BackColor = Color.RoyalBlue + pnlblue4.Show() + pnlblue5.BackColor = Color.CornflowerBlue + pnlblue5.Show() + pnlblue6.BackColor = Color.DeepSkyBlue + pnlblue6.Show() + pnlblue7.BackColor = Color.SkyBlue + pnlblue7.Show() + pnlblue8.BackColor = Color.LightBlue + pnlblue8.Show() + pnlblue9.BackColor = Color.LightSteelBlue + pnlblue9.Show() + pnlblue10.BackColor = Color.Cyan + pnlblue10.Show() + pnlblue11.BackColor = Color.Aquamarine + pnlblue11.Show() + pnlblue12.BackColor = Color.DarkTurquoise + pnlblue12.Show() + pnlblue13.BackColor = Color.LightSeaGreen + pnlblue13.Show() + pnlblue14.BackColor = Color.MediumAquamarine + pnlblue14.Show() + pnlblue15.BackColor = Color.CadetBlue + pnlblue15.Show() + pnlblue16.BackColor = Color.Teal + pnlblue16.Show() + Case 4 + lblbluelevel.Text = "Level 4" + pnlblue1.BackColor = Color.MidnightBlue + pnlblue1.Show() + pnlblue2.BackColor = Color.Navy + pnlblue2.Show() + pnlblue3.BackColor = Color.Blue + pnlblue3.Show() + pnlblue4.BackColor = Color.RoyalBlue + pnlblue4.Show() + pnlblue5.BackColor = Color.CornflowerBlue + pnlblue5.Show() + pnlblue6.BackColor = Color.DeepSkyBlue + pnlblue6.Show() + pnlblue7.BackColor = Color.SkyBlue + pnlblue7.Show() + pnlblue8.BackColor = Color.LightBlue + pnlblue8.Show() + pnlblue9.BackColor = Color.LightSteelBlue + pnlblue9.Show() + pnlblue10.BackColor = Color.Cyan + pnlblue10.Show() + pnlblue11.BackColor = Color.Aquamarine + pnlblue11.Show() + pnlblue12.BackColor = Color.DarkTurquoise + pnlblue12.Show() + pnlblue13.BackColor = Color.LightSeaGreen + pnlblue13.Show() + pnlblue14.BackColor = Color.MediumAquamarine + pnlblue14.Show() + pnlblue15.BackColor = Color.CadetBlue + pnlblue15.Show() + pnlblue16.BackColor = Color.Teal + pnlblue16.Show() + pnlbluecustomcolour.Show() + pnlblueoptions.Show() + End Select + + Select Case greenlevel + Case 1 + lblgreenlevel.Text = "Level 1" + pnlgreen1.BackColor = Color.Green + pnlgreen1.Show() + Case 2 + lblgreenlevel.Text = "Level 2" + pnlgreen1.BackColor = Color.DarkGreen + pnlgreen1.Show() + pnlgreen2.BackColor = Color.Green + pnlgreen2.Show() + pnlgreen3.BackColor = Color.LightGreen + pnlgreen3.Show() + Case 3 + lblgreenlevel.Text = "Level 3" + pnlgreen1.BackColor = Color.DarkGreen + pnlgreen1.Show() + pnlgreen2.BackColor = Color.Green + pnlgreen2.Show() + pnlgreen3.BackColor = Color.SeaGreen + pnlgreen3.Show() + pnlgreen4.BackColor = Color.MediumSeaGreen + pnlgreen4.Show() + pnlgreen5.BackColor = Color.DarkSeaGreen + pnlgreen5.Show() + pnlgreen6.BackColor = Color.LightGreen + pnlgreen6.Show() + pnlgreen7.BackColor = Color.MediumSpringGreen + pnlgreen7.Show() + pnlgreen8.BackColor = Color.SpringGreen + pnlgreen8.Show() + pnlgreen9.BackColor = Color.GreenYellow + pnlgreen9.Show() + pnlgreen10.BackColor = Color.LawnGreen + pnlgreen10.Show() + pnlgreen11.BackColor = Color.Lime + pnlgreen11.Show() + pnlgreen12.BackColor = Color.LimeGreen + pnlgreen12.Show() + pnlgreen13.BackColor = Color.YellowGreen + pnlgreen13.Show() + pnlgreen14.BackColor = Color.OliveDrab + pnlgreen14.Show() + pnlgreen15.BackColor = Color.Olive + pnlgreen15.Show() + pnlgreen16.BackColor = Color.DarkOliveGreen + pnlgreen16.Show() + Case 4 + lblgreenlevel.Text = "Level 4" + pnlgreen1.BackColor = Color.DarkGreen + pnlgreen1.Show() + pnlgreen2.BackColor = Color.Green + pnlgreen2.Show() + pnlgreen3.BackColor = Color.SeaGreen + pnlgreen3.Show() + pnlgreen4.BackColor = Color.MediumSeaGreen + pnlgreen4.Show() + pnlgreen5.BackColor = Color.DarkSeaGreen + pnlgreen5.Show() + pnlgreen6.BackColor = Color.LightGreen + pnlgreen6.Show() + pnlgreen7.BackColor = Color.MediumSpringGreen + pnlgreen7.Show() + pnlgreen8.BackColor = Color.SpringGreen + pnlgreen8.Show() + pnlgreen9.BackColor = Color.GreenYellow + pnlgreen9.Show() + pnlgreen10.BackColor = Color.LawnGreen + pnlgreen10.Show() + pnlgreen11.BackColor = Color.Lime + pnlgreen11.Show() + pnlgreen12.BackColor = Color.LimeGreen + pnlgreen12.Show() + pnlgreen13.BackColor = Color.YellowGreen + pnlgreen13.Show() + pnlgreen14.BackColor = Color.OliveDrab + pnlgreen14.Show() + pnlgreen15.BackColor = Color.Olive + pnlgreen15.Show() + pnlgreen16.BackColor = Color.DarkOliveGreen + pnlgreen16.Show() + pnlgreencustomcolour.Show() + pnlgreenoptions.Show() + End Select + + Select Case yellowlevel + Case 1 + lblyellowlevel.Text = "Level 1" + pnlyellow1.BackColor = Color.Yellow + pnlyellow1.Show() + Case 2 + lblyellowlevel.Text = "Level 2" + pnlyellow1.BackColor = Color.DarkKhaki + pnlyellow1.Show() + pnlyellow2.BackColor = Color.Yellow + pnlyellow2.Show() + pnlyellow3.BackColor = Color.PaleGoldenrod + pnlyellow3.Show() + Case 3 + lblyellowlevel.Text = "Level 3" + pnlyellow1.BackColor = Color.DarkKhaki + pnlyellow1.Show() + pnlyellow2.BackColor = Color.Yellow + pnlyellow2.Show() + pnlyellow3.BackColor = Color.Khaki + pnlyellow3.Show() + pnlyellow4.BackColor = Color.PaleGoldenrod + pnlyellow4.Show() + pnlyellow5.BackColor = Color.PeachPuff + pnlyellow5.Show() + pnlyellow6.BackColor = Color.Moccasin + pnlyellow6.Show() + pnlyellow7.BackColor = Color.PapayaWhip + pnlyellow7.Show() + pnlyellow8.BackColor = Color.LightGoldenrodYellow + pnlyellow8.Show() + pnlyellow9.BackColor = Color.LemonChiffon + pnlyellow9.Show() + pnlyellow10.BackColor = Color.LightYellow + pnlyellow10.Show() + Case 4 + lblyellowlevel.Text = "Level 4" + pnlyellow1.BackColor = Color.DarkKhaki + pnlyellow1.Show() + pnlyellow2.BackColor = Color.Yellow + pnlyellow2.Show() + pnlyellow3.BackColor = Color.Khaki + pnlyellow3.Show() + pnlyellow4.BackColor = Color.PaleGoldenrod + pnlyellow4.Show() + pnlyellow5.BackColor = Color.PeachPuff + pnlyellow5.Show() + pnlyellow6.BackColor = Color.Moccasin + pnlyellow6.Show() + pnlyellow7.BackColor = Color.PapayaWhip + pnlyellow7.Show() + pnlyellow8.BackColor = Color.LightGoldenrodYellow + pnlyellow8.Show() + pnlyellow9.BackColor = Color.LemonChiffon + pnlyellow9.Show() + pnlyellow10.BackColor = Color.LightYellow + pnlyellow10.Show() + pnlyellow11.BackColor = Color.White + pnlyellow11.Show() + pnlyellow12.BackColor = Color.White + pnlyellow12.Show() + pnlyellow13.BackColor = Color.White + pnlyellow13.Show() + pnlyellow14.BackColor = Color.White + pnlyellow14.Show() + pnlyellow15.BackColor = Color.White + pnlyellow15.Show() + pnlyellow16.BackColor = Color.White + pnlyellow16.Show() + pnlyellowcustomcolour.Show() + pnlyellowoptions.Show() + End Select + + Select Case orangelevel + Case 1 + lblorangelevel.Text = "Level 1" + pnlorange1.BackColor = Color.DarkOrange + pnlorange1.Show() + Case 2 + lblorangelevel.Text = "Level 2" + pnlorange1.BackColor = Color.OrangeRed + pnlorange1.Show() + pnlorange2.BackColor = Color.DarkOrange + pnlorange2.Show() + pnlorange3.BackColor = Color.Orange + pnlorange3.Show() + Case 3 + lblorangelevel.Text = "Level 3" + pnlorange1.BackColor = Color.OrangeRed + pnlorange1.Show() + pnlorange2.BackColor = Color.Tomato + pnlorange2.Show() + pnlorange3.BackColor = Color.Coral + pnlorange3.Show() + pnlorange4.BackColor = Color.DarkOrange + pnlorange4.Show() + pnlorange5.BackColor = Color.Orange + pnlorange5.Show() + pnlorange6.BackColor = Color.Gold + pnlorange6.Show() + Case 4 + lblorangelevel.Text = "Level 4" + pnlorange1.BackColor = Color.OrangeRed + pnlorange1.Show() + pnlorange2.BackColor = Color.Tomato + pnlorange2.Show() + pnlorange3.BackColor = Color.Coral + pnlorange3.Show() + pnlorange4.BackColor = Color.DarkOrange + pnlorange4.Show() + pnlorange5.BackColor = Color.Orange + pnlorange5.Show() + pnlorange6.BackColor = Color.Gold + pnlorange6.Show() + pnlorange7.BackColor = Color.White + pnlorange7.Show() + pnlorange8.BackColor = Color.White + pnlorange8.Show() + pnlorange9.BackColor = Color.White + pnlorange9.Show() + pnlorange10.BackColor = Color.White + pnlorange10.Show() + pnlorange11.BackColor = Color.White + pnlorange11.Show() + pnlorange12.BackColor = Color.White + pnlorange12.Show() + pnlorange13.BackColor = Color.White + pnlorange13.Show() + pnlorange14.BackColor = Color.White + pnlorange14.Show() + pnlorange15.BackColor = Color.White + pnlorange15.Show() + pnlorange16.BackColor = Color.White + pnlorange16.Show() + pnlorangecustomcolour.Show() + pnlorangeoptions.Show() + End Select + + Select Case brownlevel + Case 1 + lblbrownlevel.Text = "Level 1" + pnlbrown1.BackColor = Color.Sienna + pnlbrown1.Show() + Case 2 + lblbrownlevel.Text = "Level 2" + pnlbrown1.BackColor = Color.SaddleBrown + pnlbrown1.Show() + pnlbrown2.BackColor = Color.Sienna + pnlbrown2.Show() + pnlbrown3.BackColor = Color.BurlyWood + pnlbrown3.Show() + Case 3 + lblbrownlevel.Text = "Level 3" + pnlbrown1.BackColor = Color.Maroon + pnlbrown1.Show() + pnlbrown2.BackColor = Color.Brown + pnlbrown2.Show() + pnlbrown3.BackColor = Color.Sienna + pnlbrown3.Show() + pnlbrown4.BackColor = Color.SaddleBrown + pnlbrown4.Show() + pnlbrown5.BackColor = Color.Chocolate + pnlbrown5.Show() + pnlbrown6.BackColor = Color.Peru + pnlbrown6.Show() + pnlbrown7.BackColor = Color.DarkGoldenrod + pnlbrown7.Show() + pnlbrown8.BackColor = Color.Goldenrod + pnlbrown8.Show() + pnlbrown9.BackColor = Color.SandyBrown + pnlbrown9.Show() + pnlbrown10.BackColor = Color.RosyBrown + pnlbrown10.Show() + pnlbrown11.BackColor = Color.Tan + pnlbrown11.Show() + pnlbrown12.BackColor = Color.BurlyWood + pnlbrown12.Show() + pnlbrown13.BackColor = Color.Wheat + pnlbrown13.Show() + pnlbrown14.BackColor = Color.NavajoWhite + pnlbrown14.Show() + pnlbrown15.BackColor = Color.Bisque + pnlbrown15.Show() + pnlbrown16.BackColor = Color.BlanchedAlmond + pnlbrown16.Show() + Case 4 + lblbrownlevel.Text = "Level 4" + pnlbrown1.BackColor = Color.Maroon + pnlbrown1.Show() + pnlbrown2.BackColor = Color.Brown + pnlbrown2.Show() + pnlbrown3.BackColor = Color.Sienna + pnlbrown3.Show() + pnlbrown4.BackColor = Color.SaddleBrown + pnlbrown4.Show() + pnlbrown5.BackColor = Color.Chocolate + pnlbrown5.Show() + pnlbrown6.BackColor = Color.Peru + pnlbrown6.Show() + pnlbrown7.BackColor = Color.DarkGoldenrod + pnlbrown7.Show() + pnlbrown8.BackColor = Color.Goldenrod + pnlbrown8.Show() + pnlbrown9.BackColor = Color.SandyBrown + pnlbrown9.Show() + pnlbrown10.BackColor = Color.RosyBrown + pnlbrown10.Show() + pnlbrown11.BackColor = Color.Tan + pnlbrown11.Show() + pnlbrown12.BackColor = Color.BurlyWood + pnlbrown12.Show() + pnlbrown13.BackColor = Color.Wheat + pnlbrown13.Show() + pnlbrown14.BackColor = Color.NavajoWhite + pnlbrown14.Show() + pnlbrown15.BackColor = Color.Bisque + pnlbrown15.Show() + pnlbrown16.BackColor = Color.BlanchedAlmond + pnlbrown16.Show() + pnlbrowncustomcolour.Show() + pnlbrownoptions.Show() + End Select + + Select Case redlevel + Case 1 + lblredlevel.Text = "Level 1" + pnlred1.BackColor = Color.Red + pnlred1.Show() + Case 2 + lblredlevel.Text = "Level 2" + pnlred1.BackColor = Color.DarkRed + pnlred1.Show() + pnlred2.BackColor = Color.Red + pnlred2.Show() + pnlred3.BackColor = Color.Salmon + pnlred3.Show() + Case 3 + lblredlevel.Text = "Level 3" + pnlred1.BackColor = Color.DarkRed + pnlred1.Show() + pnlred2.BackColor = Color.Red + pnlred2.Show() + pnlred3.BackColor = Color.Firebrick + pnlred3.Show() + pnlred4.BackColor = Color.Crimson + pnlred4.Show() + pnlred5.BackColor = Color.IndianRed + pnlred5.Show() + pnlred6.BackColor = Color.LightCoral + pnlred6.Show() + pnlred7.BackColor = Color.DarkSalmon + pnlred7.Show() + pnlred8.BackColor = Color.Salmon + pnlred8.Show() + pnlred9.BackColor = Color.LightSalmon + pnlred9.Show() + Case 4 + lblredlevel.Text = "Level 4" + pnlred1.BackColor = Color.DarkRed + pnlred1.Show() + pnlred2.BackColor = Color.Red + pnlred2.Show() + pnlred3.BackColor = Color.Firebrick + pnlred3.Show() + pnlred4.BackColor = Color.Crimson + pnlred4.Show() + pnlred5.BackColor = Color.IndianRed + pnlred5.Show() + pnlred6.BackColor = Color.LightCoral + pnlred6.Show() + pnlred7.BackColor = Color.DarkSalmon + pnlred7.Show() + pnlred8.BackColor = Color.Salmon + pnlred8.Show() + pnlred9.BackColor = Color.LightSalmon + pnlred9.Show() + pnlred10.BackColor = Color.White + pnlred10.Show() + pnlred11.BackColor = Color.White + pnlred11.Show() + pnlred12.BackColor = Color.White + pnlred12.Show() + pnlred13.BackColor = Color.White + pnlred13.Show() + pnlred14.BackColor = Color.White + pnlred14.Show() + pnlred15.BackColor = Color.White + pnlred15.Show() + pnlred16.BackColor = Color.White + pnlred16.Show() + pnlredcustomcolour.Show() + pnlredoptions.Show() + End Select + + Select Case pinklevel + Case 1 + lblpinklevel.Text = "Level 1" + pnlpink1.BackColor = Color.HotPink + pnlpink1.Show() + Case 2 + lblpinklevel.Text = "Level 2" + pnlpink1.BackColor = Color.DeepPink + pnlpink1.Show() + pnlpink2.BackColor = Color.HotPink + pnlpink2.Show() + pnlpink3.BackColor = Color.LightPink + pnlpink3.Show() + Case 3 + lblpinklevel.Text = "Level 3" + pnlpink1.BackColor = Color.MediumVioletRed + pnlpink1.Show() + pnlpink2.BackColor = Color.PaleVioletRed + pnlpink2.Show() + pnlpink3.BackColor = Color.DeepPink + pnlpink3.Show() + pnlpink4.BackColor = Color.HotPink + pnlpink4.Show() + pnlpink5.BackColor = Color.LightPink + pnlpink5.Show() + pnlpink6.BackColor = Color.Pink + pnlpink6.Show() + Case 4 + lblpinklevel.Text = "Level 4" + pnlpink1.BackColor = Color.MediumVioletRed + pnlpink1.Show() + pnlpink2.BackColor = Color.PaleVioletRed + pnlpink2.Show() + pnlpink3.BackColor = Color.DeepPink + pnlpink3.Show() + pnlpink4.BackColor = Color.HotPink + pnlpink4.Show() + pnlpink5.BackColor = Color.LightPink + pnlpink5.Show() + pnlpink6.BackColor = Color.Pink + pnlpink6.Show() + pnlpink7.BackColor = Color.White + pnlpink7.Show() + pnlpink8.BackColor = Color.White + pnlpink8.Show() + pnlpink9.BackColor = Color.White + pnlpink9.Show() + pnlpink10.BackColor = Color.White + pnlpink10.Show() + pnlpink11.BackColor = Color.White + pnlpink11.Show() + pnlpink12.BackColor = Color.White + pnlpink12.Show() + pnlpink13.BackColor = Color.White + pnlpink13.Show() + pnlpink14.BackColor = Color.White + pnlpink14.Show() + pnlpink15.BackColor = Color.White + pnlpink15.Show() + pnlpink16.BackColor = Color.White + pnlpink16.Show() + pnlpinkcustomcolour.Show() + pnlpinkoptions.Show() + End Select + + Select Case anylevel + Case 1 + lblanylevel.Text = "Level 1" + pnlany1.BackColor = Color.White + pnlany1.Show() + pnlanycustomcolour.Show() + pnlanyoptions.Show() + Case 2 + lblanylevel.Text = "Level 2" + pnlany1.BackColor = Color.White + pnlany1.Show() + pnlany2.BackColor = Color.White + pnlany2.Show() + pnlany3.BackColor = Color.White + pnlany3.Show() + pnlany4.BackColor = Color.White + pnlany4.Show() + pnlanycustomcolour.Show() + pnlanyoptions.Show() + Case 3 + lblanylevel.Text = "Level 3" + pnlany1.BackColor = Color.White + pnlany1.Show() + pnlany2.BackColor = Color.White + pnlany2.Show() + pnlany3.BackColor = Color.White + pnlany3.Show() + pnlany4.BackColor = Color.White + pnlany4.Show() + pnlany5.BackColor = Color.White + pnlany5.Show() + pnlany6.BackColor = Color.White + pnlany6.Show() + pnlany7.BackColor = Color.White + pnlany7.Show() + pnlany8.BackColor = Color.White + pnlany8.Show() + pnlanycustomcolour.Show() + pnlanyoptions.Show() + Case 4 + lblanylevel.Text = "Level 4" + pnlany1.BackColor = Color.White + pnlany1.Show() + pnlany2.BackColor = Color.White + pnlany2.Show() + pnlany3.BackColor = Color.White + pnlany3.Show() + pnlany4.BackColor = Color.White + pnlany4.Show() + pnlany5.BackColor = Color.White + pnlany5.Show() + pnlany6.BackColor = Color.White + pnlany6.Show() + pnlany7.BackColor = Color.White + pnlany7.Show() + pnlany8.BackColor = Color.White + pnlany8.Show() + pnlany9.BackColor = Color.White + pnlany9.Show() + pnlany10.BackColor = Color.White + pnlany10.Show() + pnlany11.BackColor = Color.White + pnlany11.Show() + pnlany12.BackColor = Color.White + pnlany12.Show() + pnlany13.BackColor = Color.White + pnlany13.Show() + pnlany14.BackColor = Color.White + pnlany14.Show() + pnlany15.BackColor = Color.White + pnlany15.Show() + pnlany16.BackColor = Color.White + pnlany16.Show() + pnlanycustomcolour.Show() + pnlanyoptions.Show() + End Select + End Sub + + Private Sub pnloldcolour_Click(sender As Object, e As EventArgs) Handles pnloldcolour.Click + Me.Close() + End Sub + + Private Sub pnlnewcolour_Click(sender As Object, e As EventArgs) Handles pnlnewcolour.Click + If sendToMod = True Then + If Not My.Computer.FileSystem.DirectoryExists(NewAPI.modOutputPath) Then My.Computer.FileSystem.CreateDirectory(NewAPI.modOutputPath) + Dim sw As System.IO.StreamWriter = New IO.StreamWriter(NewAPI.modOutputPath & "\givecolour.srip") ' ShiftOS Request/Receive* Information Protocol (SRIP) *Depends on the direction + sw.WriteLine(pnlnewcolour.BackColor.ToArgb()) + sw.Close() + End If + Select Case colourtochange + Case "Username Text Color" + Shifter.usernametextcolor = pnlnewcolour.BackColor + Case "Desktop Icon Text Color" + Shifter.icontextcolor = pnlnewcolour.BackColor + + Case "Title Bar Colour" + Shifter.titlebarcolour = pnlnewcolour.BackColor + If Shifter.shifterskintitlebar(0) Is Nothing Then Else Shifter.shifterskintitlebar(0).Dispose() + If Shifter.shifterskintitlebar(1) Is Nothing Then Else Shifter.shifterskintitlebar(1).Dispose() + If Shifter.shifterskintitlebar(2) Is Nothing Then Else Shifter.shifterskintitlebar(2).Dispose() + Shifter.shifterskintitlebar(0) = Nothing + Shifter.shifterskintitlebar(1) = Nothing + Shifter.shifterskintitlebar(2) = Nothing + Shifter.shifterskinimages(3) = "" + Shifter.shifterskinimages(4) = "" + Shifter.shifterskinimages(5) = "" + Case "Window Border Colour" + Shifter.windowbordercolour = pnlnewcolour.BackColor + Shifter.windowborderleftcolour = pnlnewcolour.BackColor + Shifter.windowborderrightcolour = pnlnewcolour.BackColor + Shifter.windowborderbottomcolour = pnlnewcolour.BackColor + Shifter.windowborderbottomrightcolour = pnlnewcolour.BackColor + Shifter.windowborderbottomleftcolour = pnlnewcolour.BackColor + If Shifter.skinwindowborderleft(0) Is Nothing Then Else Shifter.skinwindowborderleft(0).Dispose() + If Shifter.skinwindowborderleft(1) Is Nothing Then Else Shifter.skinwindowborderleft(1).Dispose() + If Shifter.skinwindowborderleft(2) Is Nothing Then Else Shifter.skinwindowborderleft(2).Dispose() + Shifter.skinwindowborderleft(0) = Nothing + Shifter.skinwindowborderleft(1) = Nothing + Shifter.skinwindowborderleft(2) = Nothing + Shifter.shifterskinimages(27) = "" + Shifter.shifterskinimages(28) = "" + Shifter.shifterskinimages(29) = "" + If Shifter.skinwindowborderright(0) Is Nothing Then Else Shifter.skinwindowborderright(0).Dispose() + If Shifter.skinwindowborderright(1) Is Nothing Then Else Shifter.skinwindowborderright(1).Dispose() + If Shifter.skinwindowborderright(2) Is Nothing Then Else Shifter.skinwindowborderright(2).Dispose() + Shifter.skinwindowborderright(0) = Nothing + Shifter.skinwindowborderright(1) = Nothing + Shifter.skinwindowborderright(2) = Nothing + Shifter.shifterskinimages(30) = "" + Shifter.shifterskinimages(31) = "" + Shifter.shifterskinimages(32) = "" + If Shifter.skinwindowborderbottom(0) Is Nothing Then Else Shifter.skinwindowborderbottom(0).Dispose() + If Shifter.skinwindowborderbottom(1) Is Nothing Then Else Shifter.skinwindowborderbottom(1).Dispose() + If Shifter.skinwindowborderbottom(2) Is Nothing Then Else Shifter.skinwindowborderbottom(2).Dispose() + Shifter.skinwindowborderbottom(0) = Nothing + Shifter.skinwindowborderbottom(1) = Nothing + Shifter.skinwindowborderbottom(2) = Nothing + Shifter.shifterskinimages(33) = "" + Shifter.shifterskinimages(34) = "" + Shifter.shifterskinimages(35) = "" + If Shifter.skinwindowborderbottomleft(0) Is Nothing Then Else Shifter.skinwindowborderbottomleft(0).Dispose() + If Shifter.skinwindowborderbottomleft(1) Is Nothing Then Else Shifter.skinwindowborderbottomleft(1).Dispose() + If Shifter.skinwindowborderbottomleft(2) Is Nothing Then Else Shifter.skinwindowborderbottomleft(2).Dispose() + Shifter.skinwindowborderbottomleft(0) = Nothing + Shifter.skinwindowborderbottomleft(1) = Nothing + Shifter.skinwindowborderbottomleft(2) = Nothing + Shifter.shifterskinimages(39) = "" + Shifter.shifterskinimages(40) = "" + Shifter.shifterskinimages(41) = "" + If Shifter.skinwindowborderbottomright(0) Is Nothing Then Else Shifter.skinwindowborderbottomright(0).Dispose() + If Shifter.skinwindowborderbottomright(1) Is Nothing Then Else Shifter.skinwindowborderbottomright(1).Dispose() + If Shifter.skinwindowborderbottomright(2) Is Nothing Then Else Shifter.skinwindowborderbottomright(2).Dispose() + Shifter.skinwindowborderbottomright(0) = Nothing + Shifter.skinwindowborderbottomright(1) = Nothing + Shifter.skinwindowborderbottomright(2) = Nothing + Shifter.shifterskinimages(36) = "" + Shifter.shifterskinimages(37) = "" + Shifter.shifterskinimages(38) = "" + Case "Close Button Colour" + Shifter.closebuttoncolour = pnlnewcolour.BackColor + If Shifter.skinclosebutton(0) Is Nothing Then Else Shifter.skinclosebutton(0).Dispose() + If Shifter.skinclosebutton(1) Is Nothing Then Else Shifter.skinclosebutton(1).Dispose() + If Shifter.skinclosebutton(2) Is Nothing Then Else Shifter.skinclosebutton(2).Dispose() + Shifter.skinclosebutton(0) = Nothing + Shifter.skinclosebutton(1) = Nothing + Shifter.skinclosebutton(2) = Nothing + Shifter.shifterskinimages(0) = "" + Shifter.shifterskinimages(1) = "" + Shifter.shifterskinimages(2) = "" + Case "Title Text Colour" + Shifter.titletextcolour = pnlnewcolour.BackColor + Case "Desktop Panel Colour" + Shifter.desktoppanelcolour = pnlnewcolour.BackColor + If Shifter.skindesktoppanel(0) Is Nothing Then Else Shifter.skindesktoppanel(0).Dispose() + If Shifter.skindesktoppanel(1) Is Nothing Then Else Shifter.skindesktoppanel(1).Dispose() + If Shifter.skindesktoppanel(2) Is Nothing Then Else Shifter.skindesktoppanel(2).Dispose() + Shifter.skindesktoppanel(0) = Nothing + Shifter.skindesktoppanel(1) = Nothing + Shifter.skindesktoppanel(2) = Nothing + Shifter.shifterskinimages(18) = "" + Shifter.shifterskinimages(19) = "" + Shifter.shifterskinimages(20) = "" + Case "Clock Text Colour" + Shifter.clocktextcolour = pnlnewcolour.BackColor + Case "Clock Background Colour" + Shifter.clockbackgroundcolor = pnlnewcolour.BackColor + If Shifter.skindesktoppaneltime(0) Is Nothing Then Else Shifter.skindesktoppaneltime(0).Dispose() + If Shifter.skindesktoppaneltime(1) Is Nothing Then Else Shifter.skindesktoppaneltime(1).Dispose() + If Shifter.skindesktoppaneltime(2) Is Nothing Then Else Shifter.skindesktoppaneltime(2).Dispose() + Shifter.skindesktoppaneltime(0) = Nothing + Shifter.skindesktoppaneltime(1) = Nothing + Shifter.skindesktoppaneltime(2) = Nothing + Shifter.shifterskinimages(21) = "" + Shifter.shifterskinimages(22) = "" + Shifter.shifterskinimages(23) = "" + Case "Desktop Background Colour" + Shifter.desktopbackgroundcolour = pnlnewcolour.BackColor + If Shifter.skindesktopbackground(0) Is Nothing Then Else Shifter.skindesktopbackground(0).Dispose() + If Shifter.skindesktopbackground(1) Is Nothing Then Else Shifter.skindesktopbackground(1).Dispose() + If Shifter.skindesktopbackground(2) Is Nothing Then Else Shifter.skindesktopbackground(2).Dispose() + Shifter.skindesktopbackground(0) = Nothing + Shifter.skindesktopbackground(1) = Nothing + Shifter.skindesktopbackground(2) = Nothing + Shifter.shifterskinimages(6) = "" + Shifter.shifterskinimages(7) = "" + Shifter.shifterskinimages(8) = "" + Case "Username Panel Background" + Shifter.usernamebgcolor = pnlnewcolour.BackColor + Case "Shutdown Button Background" + Shifter.powerpanelbgcolor = pnlnewcolour.BackColor + Case "App Launcher Button Colour" + Shifter.applauncherbuttoncolour = pnlnewcolour.BackColor + If Shifter.skinapplauncherbutton(0) Is Nothing Then Else Shifter.skinapplauncherbutton(0).Dispose() + If Shifter.skinapplauncherbutton(1) Is Nothing Then Else Shifter.skinapplauncherbutton(1).Dispose() + If Shifter.skinapplauncherbutton(2) Is Nothing Then Else Shifter.skinapplauncherbutton(2).Dispose() + Shifter.skinapplauncherbutton(0) = Nothing + Shifter.skinapplauncherbutton(1) = Nothing + Shifter.skinapplauncherbutton(2) = Nothing + Shifter.shifterskinimages(24) = "" + Shifter.shifterskinimages(25) = "" + Shifter.shifterskinimages(26) = "" + Case "App Launcher Button Clicked Colour" + Shifter.applauncherbuttonclickedcolour = pnlnewcolour.BackColor + Case "App Launcher Mouse Over Colour" + Shifter.applaunchermouseovercolour = pnlnewcolour.BackColor + Case "Roll Up Button Colour" + Shifter.rollupbuttoncolour = pnlnewcolour.BackColor + If Shifter.skinrollupbutton(0) Is Nothing Then Else Shifter.skinrollupbutton(0).Dispose() + If Shifter.skinrollupbutton(1) Is Nothing Then Else Shifter.skinrollupbutton(1).Dispose() + If Shifter.skinrollupbutton(2) Is Nothing Then Else Shifter.skinrollupbutton(2).Dispose() + Shifter.skinrollupbutton(0) = Nothing + Shifter.skinrollupbutton(1) = Nothing + Shifter.skinrollupbutton(2) = Nothing + Shifter.shifterskinimages(9) = "" + Shifter.shifterskinimages(10) = "" + Shifter.shifterskinimages(11) = "" + Case "App Launcher Button Text Colour" + Shifter.applicationsbuttontextcolour = pnlnewcolour.BackColor + Case "App Launcher Items Background Colour" + Shifter.applauncherbackgroundcolour = pnlnewcolour.BackColor + Case "Title Bar Left Corner Colour" + Shifter.titlebarleftcornercolour = pnlnewcolour.BackColor + If Shifter.skintitlebarleftcorner(0) Is Nothing Then Else Shifter.skintitlebarleftcorner(0).Dispose() + If Shifter.skintitlebarleftcorner(1) Is Nothing Then Else Shifter.skintitlebarleftcorner(1).Dispose() + If Shifter.skintitlebarleftcorner(2) Is Nothing Then Else Shifter.skintitlebarleftcorner(2).Dispose() + Shifter.skintitlebarleftcorner(0) = Nothing + Shifter.skintitlebarleftcorner(1) = Nothing + Shifter.skintitlebarleftcorner(2) = Nothing + Shifter.shifterskinimages(15) = "" + Shifter.shifterskinimages(16) = "" + Shifter.shifterskinimages(17) = "" + Case "Title Bar Right Corner Colour" + Shifter.titlebarrightcornercolour = pnlnewcolour.BackColor + If Shifter.skintitlebarrightcorner(0) Is Nothing Then Else Shifter.skintitlebarrightcorner(0).Dispose() + If Shifter.skintitlebarrightcorner(1) Is Nothing Then Else Shifter.skintitlebarrightcorner(1).Dispose() + If Shifter.skintitlebarrightcorner(2) Is Nothing Then Else Shifter.skintitlebarrightcorner(2).Dispose() + Shifter.skintitlebarrightcorner(0) = Nothing + Shifter.skintitlebarrightcorner(1) = Nothing + Shifter.skintitlebarrightcorner(2) = Nothing + Shifter.shifterskinimages(12) = "" + Shifter.shifterskinimages(13) = "" + Shifter.shifterskinimages(14) = "" + Case "Border Right Colour" + Shifter.windowborderrightcolour = pnlnewcolour.BackColor + If Shifter.skinwindowborderright(0) Is Nothing Then Else Shifter.skinwindowborderright(0).Dispose() + If Shifter.skinwindowborderright(1) Is Nothing Then Else Shifter.skinwindowborderright(1).Dispose() + If Shifter.skinwindowborderright(2) Is Nothing Then Else Shifter.skinwindowborderright(2).Dispose() + Shifter.skinwindowborderright(0) = Nothing + Shifter.skinwindowborderright(1) = Nothing + Shifter.skinwindowborderright(2) = Nothing + Shifter.shifterskinimages(30) = "" + Shifter.shifterskinimages(31) = "" + Shifter.shifterskinimages(32) = "" + Case "Border Left Colour" + Shifter.windowborderleftcolour = pnlnewcolour.BackColor + If Shifter.skinwindowborderleft(0) Is Nothing Then Else Shifter.skinwindowborderleft(0).Dispose() + If Shifter.skinwindowborderleft(1) Is Nothing Then Else Shifter.skinwindowborderleft(1).Dispose() + If Shifter.skinwindowborderleft(2) Is Nothing Then Else Shifter.skinwindowborderleft(2).Dispose() + Shifter.skinwindowborderleft(0) = Nothing + Shifter.skinwindowborderleft(1) = Nothing + Shifter.skinwindowborderleft(2) = Nothing + Shifter.shifterskinimages(27) = "" + Shifter.shifterskinimages(28) = "" + Shifter.shifterskinimages(29) = "" + Case "Border Bottom Colour" + Shifter.windowborderbottomcolour = pnlnewcolour.BackColor + If Shifter.skinwindowborderbottom(0) Is Nothing Then Else Shifter.skinwindowborderbottom(0).Dispose() + If Shifter.skinwindowborderbottom(1) Is Nothing Then Else Shifter.skinwindowborderbottom(1).Dispose() + If Shifter.skinwindowborderbottom(2) Is Nothing Then Else Shifter.skinwindowborderbottom(2).Dispose() + Shifter.skinwindowborderbottom(0) = Nothing + Shifter.skinwindowborderbottom(1) = Nothing + Shifter.skinwindowborderbottom(2) = Nothing + Shifter.shifterskinimages(33) = "" + Shifter.shifterskinimages(34) = "" + Shifter.shifterskinimages(35) = "" + Case "Border Bottom Left Colour" + Shifter.windowborderbottomleftcolour = pnlnewcolour.BackColor + If Shifter.skinwindowborderbottomleft(0) Is Nothing Then Else Shifter.skinwindowborderbottomleft(0).Dispose() + If Shifter.skinwindowborderbottomleft(1) Is Nothing Then Else Shifter.skinwindowborderbottomleft(1).Dispose() + If Shifter.skinwindowborderbottomleft(2) Is Nothing Then Else Shifter.skinwindowborderbottomleft(2).Dispose() + Shifter.skinwindowborderbottomleft(0) = Nothing + Shifter.skinwindowborderbottomleft(1) = Nothing + Shifter.skinwindowborderbottomleft(2) = Nothing + Shifter.shifterskinimages(39) = "" + Shifter.shifterskinimages(40) = "" + Shifter.shifterskinimages(41) = "" + Case "Border Bottom Right Colour" + Shifter.windowborderbottomrightcolour = pnlnewcolour.BackColor + If Shifter.skinwindowborderbottomright(0) Is Nothing Then Else Shifter.skinwindowborderbottomright(0).Dispose() + If Shifter.skinwindowborderbottomright(1) Is Nothing Then Else Shifter.skinwindowborderbottomright(1).Dispose() + If Shifter.skinwindowborderbottomright(2) Is Nothing Then Else Shifter.skinwindowborderbottomright(2).Dispose() + Shifter.skinwindowborderbottomright(0) = Nothing + Shifter.skinwindowborderbottomright(1) = Nothing + Shifter.skinwindowborderbottomright(2) = Nothing + Shifter.shifterskinimages(36) = "" + Shifter.shifterskinimages(37) = "" + Shifter.shifterskinimages(38) = "" + Case "Minimize Button Colour" + Shifter.minimizebuttoncolour = pnlnewcolour.BackColor + If Shifter.skinminimizebutton(0) Is Nothing Then Else Shifter.skinminimizebutton(0).Dispose() + If Shifter.skinminimizebutton(1) Is Nothing Then Else Shifter.skinminimizebutton(1).Dispose() + If Shifter.skinminimizebutton(2) Is Nothing Then Else Shifter.skinminimizebutton(2).Dispose() + Shifter.skinminimizebutton(0) = Nothing + Shifter.skinminimizebutton(1) = Nothing + Shifter.skinminimizebutton(2) = Nothing + Shifter.shifterskinimages(42) = "" + Shifter.shifterskinimages(43) = "" + Shifter.shifterskinimages(44) = "" + Case "Panel Button Colour" + Shifter.panelbuttoncolour = pnlnewcolour.BackColor + If Shifter.skinpanelbutton(0) Is Nothing Then Else Shifter.skinpanelbutton(0).Dispose() + If Shifter.skinpanelbutton(1) Is Nothing Then Else Shifter.skinpanelbutton(1).Dispose() + If Shifter.skinpanelbutton(2) Is Nothing Then Else Shifter.skinpanelbutton(2).Dispose() + Shifter.skinpanelbutton(0) = Nothing + Shifter.skinpanelbutton(1) = Nothing + Shifter.skinpanelbutton(2) = Nothing + Shifter.shifterskinimages(45) = "" + Shifter.shifterskinimages(46) = "" + Shifter.shifterskinimages(47) = "" + Case "Panel Button Text Colour" + Shifter.panelbuttontextcolour = pnlnewcolour.BackColor + Case "OrcWrite text colour dono" + OrcWrite.Button6.BackColor = pnlnewcolour.BackColor + OrcWrite.RichTextBox1.SelectionColor = pnlnewcolour.BackColor + Case "OrcWrite highlight text colour dono" + OrcWrite.Button7.BackColor = pnlnewcolour.BackColor + OrcWrite.RichTextBox1.SelectionBackColor = pnlnewcolour.BackColor + Case "artpallet1" : ArtPad.colourpallet1.BackColor = pnlnewcolour.BackColor + Case "artpallet2" : ArtPad.colourpallet2.BackColor = pnlnewcolour.BackColor + Case "artpallet3" : ArtPad.colourpallet3.BackColor = pnlnewcolour.BackColor + Case "artpallet4" : ArtPad.colourpallet4.BackColor = pnlnewcolour.BackColor + Case "artpallet5" : ArtPad.colourpallet5.BackColor = pnlnewcolour.BackColor + Case "artpallet6" : ArtPad.colourpallet6.BackColor = pnlnewcolour.BackColor + Case "artpallet7" : ArtPad.colourpallet7.BackColor = pnlnewcolour.BackColor + Case "artpallet8" : ArtPad.colourpallet8.BackColor = pnlnewcolour.BackColor + Case "artpallet9" : ArtPad.colourpallet9.BackColor = pnlnewcolour.BackColor + Case "artpallet10" : ArtPad.colourpallet10.BackColor = pnlnewcolour.BackColor + Case "artpallet11" : ArtPad.colourpallet11.BackColor = pnlnewcolour.BackColor + Case "artpallet12" : ArtPad.colourpallet12.BackColor = pnlnewcolour.BackColor + Case "artpallet13" : ArtPad.colourpallet13.BackColor = pnlnewcolour.BackColor + Case "artpallet14" : ArtPad.colourpallet14.BackColor = pnlnewcolour.BackColor + Case "artpallet15" : ArtPad.colourpallet15.BackColor = pnlnewcolour.BackColor + Case "artpallet16" : ArtPad.colourpallet16.BackColor = pnlnewcolour.BackColor + Case "artpallet17" : ArtPad.colourpallet17.BackColor = pnlnewcolour.BackColor + Case "artpallet18" : ArtPad.colourpallet18.BackColor = pnlnewcolour.BackColor + Case "artpallet19" : ArtPad.colourpallet19.BackColor = pnlnewcolour.BackColor + Case "artpallet20" : ArtPad.colourpallet20.BackColor = pnlnewcolour.BackColor + Case "artpallet21" : ArtPad.colourpallet21.BackColor = pnlnewcolour.BackColor + Case "artpallet22" : ArtPad.colourpallet22.BackColor = pnlnewcolour.BackColor + Case "artpallet23" : ArtPad.colourpallet23.BackColor = pnlnewcolour.BackColor + Case "artpallet24" : ArtPad.colourpallet24.BackColor = pnlnewcolour.BackColor + Case "artpallet25" : ArtPad.colourpallet25.BackColor = pnlnewcolour.BackColor + Case "artpallet26" : ArtPad.colourpallet26.BackColor = pnlnewcolour.BackColor + Case "artpallet27" : ArtPad.colourpallet27.BackColor = pnlnewcolour.BackColor + Case "artpallet28" : ArtPad.colourpallet28.BackColor = pnlnewcolour.BackColor + Case "artpallet29" : ArtPad.colourpallet29.BackColor = pnlnewcolour.BackColor + Case "artpallet30" : ArtPad.colourpallet30.BackColor = pnlnewcolour.BackColor + Case "artpallet31" : ArtPad.colourpallet31.BackColor = pnlnewcolour.BackColor + Case "artpallet32" : ArtPad.colourpallet32.BackColor = pnlnewcolour.BackColor + Case "artpallet33" : ArtPad.colourpallet33.BackColor = pnlnewcolour.BackColor + Case "artpallet34" : ArtPad.colourpallet34.BackColor = pnlnewcolour.BackColor + Case "artpallet35" : ArtPad.colourpallet35.BackColor = pnlnewcolour.BackColor + Case "artpallet36" : ArtPad.colourpallet36.BackColor = pnlnewcolour.BackColor + Case "artpallet37" : ArtPad.colourpallet37.BackColor = pnlnewcolour.BackColor + Case "artpallet38" : ArtPad.colourpallet38.BackColor = pnlnewcolour.BackColor + Case "artpallet39" : ArtPad.colourpallet39.BackColor = pnlnewcolour.BackColor + Case "artpallet40" : ArtPad.colourpallet40.BackColor = pnlnewcolour.BackColor + Case "artpallet41" : ArtPad.colourpallet41.BackColor = pnlnewcolour.BackColor + Case "artpallet42" : ArtPad.colourpallet42.BackColor = pnlnewcolour.BackColor + Case "artpallet43" : ArtPad.colourpallet43.BackColor = pnlnewcolour.BackColor + Case "artpallet44" : ArtPad.colourpallet44.BackColor = pnlnewcolour.BackColor + Case "artpallet45" : ArtPad.colourpallet45.BackColor = pnlnewcolour.BackColor + Case "artpallet46" : ArtPad.colourpallet46.BackColor = pnlnewcolour.BackColor + Case "artpallet47" : ArtPad.colourpallet47.BackColor = pnlnewcolour.BackColor + Case "artpallet48" : ArtPad.colourpallet48.BackColor = pnlnewcolour.BackColor + Case "artpallet49" : ArtPad.colourpallet49.BackColor = pnlnewcolour.BackColor + Case "artpallet50" : ArtPad.colourpallet50.BackColor = pnlnewcolour.BackColor + Case "artpallet51" : ArtPad.colourpallet51.BackColor = pnlnewcolour.BackColor + Case "artpallet52" : ArtPad.colourpallet52.BackColor = pnlnewcolour.BackColor + Case "artpallet53" : ArtPad.colourpallet53.BackColor = pnlnewcolour.BackColor + Case "artpallet54" : ArtPad.colourpallet54.BackColor = pnlnewcolour.BackColor + Case "artpallet55" : ArtPad.colourpallet55.BackColor = pnlnewcolour.BackColor + Case "artpallet56" : ArtPad.colourpallet56.BackColor = pnlnewcolour.BackColor + Case "artpallet57" : ArtPad.colourpallet57.BackColor = pnlnewcolour.BackColor + Case "artpallet58" : ArtPad.colourpallet58.BackColor = pnlnewcolour.BackColor + Case "artpallet59" : ArtPad.colourpallet59.BackColor = pnlnewcolour.BackColor + Case "artpallet60" : ArtPad.colourpallet60.BackColor = pnlnewcolour.BackColor + Case "artpallet61" : ArtPad.colourpallet61.BackColor = pnlnewcolour.BackColor + Case "artpallet62" : ArtPad.colourpallet62.BackColor = pnlnewcolour.BackColor + Case "artpallet63" : ArtPad.colourpallet63.BackColor = pnlnewcolour.BackColor + Case "artpallet64" : ArtPad.colourpallet64.BackColor = pnlnewcolour.BackColor + Case "artpallet65" : ArtPad.colourpallet65.BackColor = pnlnewcolour.BackColor + Case "artpallet66" : ArtPad.colourpallet66.BackColor = pnlnewcolour.BackColor + Case "artpallet67" : ArtPad.colourpallet67.BackColor = pnlnewcolour.BackColor + Case "artpallet68" : ArtPad.colourpallet68.BackColor = pnlnewcolour.BackColor + Case "artpallet69" : ArtPad.colourpallet69.BackColor = pnlnewcolour.BackColor + Case "artpallet70" : ArtPad.colourpallet70.BackColor = pnlnewcolour.BackColor + Case "artpallet71" : ArtPad.colourpallet71.BackColor = pnlnewcolour.BackColor + Case "artpallet72" : ArtPad.colourpallet72.BackColor = pnlnewcolour.BackColor + Case "artpallet73" : ArtPad.colourpallet73.BackColor = pnlnewcolour.BackColor + Case "artpallet74" : ArtPad.colourpallet74.BackColor = pnlnewcolour.BackColor + Case "artpallet75" : ArtPad.colourpallet75.BackColor = pnlnewcolour.BackColor + Case "artpallet76" : ArtPad.colourpallet76.BackColor = pnlnewcolour.BackColor + Case "artpallet77" : ArtPad.colourpallet77.BackColor = pnlnewcolour.BackColor + Case "artpallet78" : ArtPad.colourpallet78.BackColor = pnlnewcolour.BackColor + Case "artpallet79" : ArtPad.colourpallet79.BackColor = pnlnewcolour.BackColor + Case "artpallet80" : ArtPad.colourpallet80.BackColor = pnlnewcolour.BackColor + Case "artpallet81" : ArtPad.colourpallet81.BackColor = pnlnewcolour.BackColor + Case "artpallet82" : ArtPad.colourpallet82.BackColor = pnlnewcolour.BackColor + Case "artpallet83" : ArtPad.colourpallet83.BackColor = pnlnewcolour.BackColor + Case "artpallet84" : ArtPad.colourpallet84.BackColor = pnlnewcolour.BackColor + Case "artpallet85" : ArtPad.colourpallet85.BackColor = pnlnewcolour.BackColor + Case "artpallet86" : ArtPad.colourpallet86.BackColor = pnlnewcolour.BackColor + Case "artpallet87" : ArtPad.colourpallet87.BackColor = pnlnewcolour.BackColor + Case "artpallet88" : ArtPad.colourpallet88.BackColor = pnlnewcolour.BackColor + Case "artpallet89" : ArtPad.colourpallet89.BackColor = pnlnewcolour.BackColor + Case "artpallet90" : ArtPad.colourpallet90.BackColor = pnlnewcolour.BackColor + Case "artpallet91" : ArtPad.colourpallet91.BackColor = pnlnewcolour.BackColor + Case "artpallet92" : ArtPad.colourpallet92.BackColor = pnlnewcolour.BackColor + Case "artpallet93" : ArtPad.colourpallet93.BackColor = pnlnewcolour.BackColor + Case "artpallet94" : ArtPad.colourpallet94.BackColor = pnlnewcolour.BackColor + Case "artpallet95" : ArtPad.colourpallet95.BackColor = pnlnewcolour.BackColor + Case "artpallet96" : ArtPad.colourpallet96.BackColor = pnlnewcolour.BackColor + Case "artpallet97" : ArtPad.colourpallet97.BackColor = pnlnewcolour.BackColor + Case "artpallet98" : ArtPad.colourpallet98.BackColor = pnlnewcolour.BackColor + Case "artpallet99" : ArtPad.colourpallet99.BackColor = pnlnewcolour.BackColor + Case "artpallet100" : ArtPad.colourpallet100.BackColor = pnlnewcolour.BackColor + Case "artpallet101" : ArtPad.colourpallet101.BackColor = pnlnewcolour.BackColor + Case "artpallet102" : ArtPad.colourpallet102.BackColor = pnlnewcolour.BackColor + Case "artpallet103" : ArtPad.colourpallet103.BackColor = pnlnewcolour.BackColor + Case "artpallet104" : ArtPad.colourpallet104.BackColor = pnlnewcolour.BackColor + Case "artpallet105" : ArtPad.colourpallet105.BackColor = pnlnewcolour.BackColor + Case "artpallet106" : ArtPad.colourpallet106.BackColor = pnlnewcolour.BackColor + Case "artpallet107" : ArtPad.colourpallet107.BackColor = pnlnewcolour.BackColor + Case "artpallet108" : ArtPad.colourpallet108.BackColor = pnlnewcolour.BackColor + Case "artpallet109" : ArtPad.colourpallet109.BackColor = pnlnewcolour.BackColor + Case "artpallet110" : ArtPad.colourpallet110.BackColor = pnlnewcolour.BackColor + Case "artpallet111" : ArtPad.colourpallet111.BackColor = pnlnewcolour.BackColor + Case "artpallet112" : ArtPad.colourpallet112.BackColor = pnlnewcolour.BackColor + Case "artpallet113" : ArtPad.colourpallet113.BackColor = pnlnewcolour.BackColor + Case "artpallet114" : ArtPad.colourpallet114.BackColor = pnlnewcolour.BackColor + Case "artpallet115" : ArtPad.colourpallet115.BackColor = pnlnewcolour.BackColor + Case "artpallet116" : ArtPad.colourpallet116.BackColor = pnlnewcolour.BackColor + Case "artpallet117" : ArtPad.colourpallet117.BackColor = pnlnewcolour.BackColor + Case "artpallet118" : ArtPad.colourpallet118.BackColor = pnlnewcolour.BackColor + Case "artpallet119" : ArtPad.colourpallet119.BackColor = pnlnewcolour.BackColor + Case "artpallet120" : ArtPad.colourpallet120.BackColor = pnlnewcolour.BackColor + Case "artpallet121" : ArtPad.colourpallet121.BackColor = pnlnewcolour.BackColor + Case "artpallet122" : ArtPad.colourpallet122.BackColor = pnlnewcolour.BackColor + Case "artpallet123" : ArtPad.colourpallet123.BackColor = pnlnewcolour.BackColor + Case "artpallet124" : ArtPad.colourpallet124.BackColor = pnlnewcolour.BackColor + Case "artpallet125" : ArtPad.colourpallet125.BackColor = pnlnewcolour.BackColor + Case "artpallet126" : ArtPad.colourpallet126.BackColor = pnlnewcolour.BackColor + Case "artpallet127" : ArtPad.colourpallet127.BackColor = pnlnewcolour.BackColor + Case "artpallet128" : ArtPad.colourpallet128.BackColor = pnlnewcolour.BackColor + Case "launcher items text colour" : Shifter.launcheritemtxtcolour.BackColor = pnlnewcolour.BackColor + + End Select + + If colourtochange.Contains("artpallet") Then + ArtPad.drawingcolour = pnlnewcolour.BackColor + ArtPad.setuppreview() + ArtPad.settoolcolours() + ElseIf colourtochange.Contains("dono") Then + 'Use "dono" tag to stop it setting up the the shifter preview + ShiftOSDesktop.lastcolourpick = pnlnewcolour.BackColor + Else + ShiftOSDesktop.lastcolourpick = pnlnewcolour.BackColor + Shifter.setuppreshifterstuff() + End If + + Me.Close() + End Sub + + Private Sub pnloldcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnloldcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnloldcolour.ClientRectangle) + End Sub + + Private Sub pnlanycolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlanycolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlanycolours.ClientRectangle) + End Sub + + Private Sub pnlgraycolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlgraycolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlgraycolours.ClientRectangle) + End Sub + + Private Sub pnlpurplecolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlpurplecolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlpurplecolours.ClientRectangle) + End Sub + + Private Sub pnlbluecolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlbluecolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlbluecolours.ClientRectangle) + End Sub + + Private Sub pnlgreencolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlgreencolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlgreencolours.ClientRectangle) + End Sub + + Private Sub pnlyellowcolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlyellowcolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlyellowcolours.ClientRectangle) + End Sub + + Private Sub pnlorangecolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlorangecolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlorangecolours.ClientRectangle) + End Sub + + Private Sub pnlbrowncolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlbrowncolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlbrowncolours.ClientRectangle) + End Sub + + Private Sub pnlredcolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlredcolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlredcolours.ClientRectangle) + End Sub + + Private Sub pnlpinkcolours_Paint(sender As Object, e As PaintEventArgs) Handles pnlpinkcolours.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 1), pnlpinkcolours.ClientRectangle) + End Sub + + Private Sub pnlnewcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlnewcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlnewcolour.ClientRectangle) + End Sub + + Private Sub colourselctiongray(sender As Object, e As MouseEventArgs) Handles pnlgray1.Click, pnlgray2.Click, pnlgray3.Click, pnlgray4.Click, pnlgray5.Click, pnlgray6.Click, pnlgray7.Click, pnlgray8.Click, pnlgray9.Click, pnlgray10.Click, pnlgray11.Click, pnlgray12.Click, pnlgray13.Click, pnlgray14.Click, pnlgray15.Click, pnlgray16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlgraycustomcolour.BackColor + savegraymemory() + End If + End Sub + + Private Sub colourselctionpurple(sender As Object, e As MouseEventArgs) Handles pnlpurple1.Click, pnlpurple2.Click, pnlpurple3.Click, pnlpurple4.Click, pnlpurple5.Click, pnlpurple6.Click, pnlpurple7.Click, pnlpurple8.Click, pnlpurple9.Click, pnlpurple10.Click, pnlpurple11.Click, pnlpurple12.Click, pnlpurple13.Click, pnlpurple14.Click, pnlpurple15.Click, pnlpurple16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlpurplecustomcolour.BackColor + savepurplememory() + End If + End Sub + + Private Sub colourselctionblue(sender As Object, e As MouseEventArgs) Handles pnlblue1.Click, pnlblue2.Click, pnlblue3.Click, pnlblue4.Click, pnlblue5.Click, pnlblue6.Click, pnlblue7.Click, pnlblue8.Click, pnlblue9.Click, pnlblue10.Click, pnlblue11.Click, pnlblue12.Click, pnlblue13.Click, pnlblue14.Click, pnlblue15.Click, pnlblue16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlbluecustomcolour.BackColor + savebluememory() + End If + End Sub + + Private Sub colourselctiongreen(sender As Object, e As MouseEventArgs) Handles pnlgreen1.Click, pnlgreen2.Click, pnlgreen3.Click, pnlgreen4.Click, pnlgreen5.Click, pnlgreen6.Click, pnlgreen7.Click, pnlgreen8.Click, pnlgreen9.Click, pnlgreen10.Click, pnlgreen11.Click, pnlgreen12.Click, pnlgreen13.Click, pnlgreen14.Click, pnlgreen15.Click, pnlgreen16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlgreencustomcolour.BackColor + savegreenmemory() + End If + End Sub + + Private Sub colourselctionyellow(sender As Object, e As MouseEventArgs) Handles pnlyellow1.Click, pnlyellow2.Click, pnlyellow3.Click, pnlyellow4.Click, pnlyellow5.Click, pnlyellow6.Click, pnlyellow7.Click, pnlyellow8.Click, pnlyellow9.Click, pnlyellow10.Click, pnlyellow11.Click, pnlyellow12.Click, pnlyellow13.Click, pnlyellow14.Click, pnlyellow15.Click, pnlyellow16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlyellowcustomcolour.BackColor + saveyellowmemory() + End If + End Sub + + Private Sub colourselctionorange(sender As Object, e As MouseEventArgs) Handles pnlorange1.Click, pnlorange2.Click, pnlorange3.Click, pnlorange4.Click, pnlorange5.Click, pnlorange6.Click, pnlorange7.Click, pnlorange8.Click, pnlorange9.Click, pnlorange10.Click, pnlorange11.Click, pnlorange12.Click, pnlorange13.Click, pnlorange14.Click, pnlorange15.Click, pnlorange16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlorangecustomcolour.BackColor + saveorangememory() + End If + End Sub + + Private Sub colourselctionbrown(sender As Object, e As MouseEventArgs) Handles pnlbrown1.Click, pnlbrown2.Click, pnlbrown3.Click, pnlbrown4.Click, pnlbrown5.Click, pnlbrown6.Click, pnlbrown7.Click, pnlbrown8.Click, pnlbrown9.Click, pnlbrown10.Click, pnlbrown11.Click, pnlbrown12.Click, pnlbrown13.Click, pnlbrown14.Click, pnlbrown15.Click, pnlbrown16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlbrowncustomcolour.BackColor + savebrownmemory() + End If + End Sub + + Private Sub colourselctionred(sender As Object, e As MouseEventArgs) Handles pnlred1.Click, pnlred2.Click, pnlred3.Click, pnlred4.Click, pnlred5.Click, pnlred6.Click, pnlred7.Click, pnlred8.Click, pnlred9.Click, pnlred10.Click, pnlred11.Click, pnlred12.Click, pnlred13.Click, pnlred14.Click, pnlred15.Click, pnlred16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlredcustomcolour.BackColor + saveredmemory() + End If + End Sub + + Private Sub colourselctionpink(sender As Object, e As MouseEventArgs) Handles pnlpink1.Click, pnlpink2.Click, pnlpink3.Click, pnlpink4.Click, pnlpink5.Click, pnlpink6.Click, pnlpink7.Click, pnlpink8.Click, pnlpink9.Click, pnlpink10.Click, pnlpink11.Click, pnlpink12.Click, pnlpink13.Click, pnlpink14.Click, pnlpink15.Click, pnlpink16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlpinkcustomcolour.BackColor + savepinkmemory() + End If + End Sub + + Private Sub colourselctionany(sender As Object, e As MouseEventArgs) Handles pnlany1.Click, pnlany2.Click, pnlany3.Click, pnlany4.Click, pnlany5.Click, pnlany6.Click, pnlany7.Click, pnlany8.Click, pnlany9.Click, pnlany10.Click, pnlany11.Click, pnlany12.Click, pnlany13.Click, pnlany14.Click, pnlany15.Click, pnlany16.Click + If e.Button = MouseButtons.Left Then + pnlnewcolour.BackColor = sender.backcolor + If pnlnewcolour.BackColor.IsNamedColor Then + If pnlnewcolour.BackColor.Name.Length > 12 Then + lblnewcolourname.Text = pnlnewcolour.BackColor.Name + Else + lblnewcolourname.Text = "Name: " & pnlnewcolour.BackColor.Name + End If + Else + lblnewcolourname.Text = "Name: Custom" + End If + lblnewcolourrgb.Text = "RGB: " & pnlnewcolour.BackColor.R & ", " & pnlnewcolour.BackColor.G & ", " & pnlnewcolour.BackColor.B + End If + If e.Button = Windows.Forms.MouseButtons.Right Then + sender.backcolor = pnlanycustomcolour.BackColor + saveanymemory() + End If + End Sub + + Private Sub txtcustomgrayshade_TextChanged(sender As Object, e As EventArgs) Handles txtcustomgrayshade.TextChanged + If txtcustomgrayshade.Text = "" Then + txtcustomgrayshade.Text = "0" + Else + If Convert.ToInt32(txtcustomgrayshade.Text) > 255 Then + txtcustomgrayshade.Text = "255" + Else + pnlgraycustomcolour.BackColor = Color.FromArgb(txtcustomgrayshade.Text, txtcustomgrayshade.Text, txtcustomgrayshade.Text) + End If + End If + End Sub + + Private Sub CheckForNumber(sender As Object, e As KeyPressEventArgs) Handles txtcustomgrayshade.KeyPress, txtpurplesblue.KeyPress, txtpurplesgreen.KeyPress, txtpurplesred.KeyPress, txtbluesblue.KeyPress, txtbluesgreen.KeyPress, txtbluesred.KeyPress, txtgreensblue.KeyPress, txtgreensgreen.KeyPress, txtgreensred.KeyPress, txtyellowsblue.KeyPress, txtyellowsgreen.KeyPress, txtyellowsred.KeyPress, txtorangesblue.KeyPress, txtorangesgreen.KeyPress, txtorangesred.KeyPress, txtbrownsblue.KeyPress, txtbrownsgreen.KeyPress, txtbrownsred.KeyPress, txtredsblue.KeyPress, txtredsgreen.KeyPress, txtredsred.KeyPress, txtpinksblue.KeyPress, txtpinksgreen.KeyPress, txtpinksred.KeyPress, txtanysblue.KeyPress, txtanysgreen.KeyPress, txtanysred.KeyPress + If Asc(e.KeyChar) <> 8 Then + If Asc(e.KeyChar) < 48 Or Asc(e.KeyChar) > 57 Then + e.Handled = True + End If + End If + End Sub + + Private Sub customcolourfailsafe() + If txtcustomgrayshade.Text = "" Then txtcustomgrayshade.Text = "0" + + If txtanysblue.Text = "" Then txtanysblue.Text = "0" + If txtanysred.Text = "" Then txtanysred.Text = "0" + If txtanysgreen.Text = "" Then txtanysgreen.Text = "0" + + If txtpurplesblue.Text = "" Then txtpurplesblue.Text = "255" + If txtpurplesred.Text = "" Then txtpurplesred.Text = "150" + If txtpurplesgreen.Text = "" Then txtpurplesgreen.Text = "0" + + If txtbluesblue.Text = "" Then txtbluesblue.Text = "255" + If txtbluesred.Text = "" Then txtbluesred.Text = "0" + If txtbluesgreen.Text = "" Then txtbluesgreen.Text = "0" + + If txtgreensblue.Text = "" Then txtgreensblue.Text = "0" + If txtgreensred.Text = "" Then txtgreensred.Text = "0" + If txtgreensgreen.Text = "" Then txtgreensgreen.Text = "255" + + If txtyellowsblue.Text = "" Then txtyellowsblue.Text = "0" + If txtyellowsred.Text = "" Then txtyellowsred.Text = "255" + If txtyellowsgreen.Text = "" Then txtyellowsgreen.Text = "255" + + If txtorangesblue.Text = "" Then txtorangesblue.Text = "0" + If txtorangesred.Text = "" Then txtorangesred.Text = "255" + If txtorangesgreen.Text = "" Then txtorangesgreen.Text = "60" + + If txtbrownsblue.Text = "" Then txtbrownsblue.Text = "0" + If txtbrownsred.Text = "" Then txtbrownsred.Text = "140" + If txtbrownsgreen.Text = "" Then txtbrownsgreen.Text = "60" + + If txtredsblue.Text = "" Then txtredsblue.Text = "0" + If txtredsred.Text = "" Then txtredsred.Text = "255" + If txtredsgreen.Text = "" Then txtredsgreen.Text = "0" + + If txtpinksblue.Text = "" Then txtpinksblue.Text = "150" + If txtpinksred.Text = "" Then txtpinksred.Text = "250" + If txtpinksgreen.Text = "" Then txtpinksgreen.Text = "0" + End Sub + + Private Sub txtpurplesgreen_TextChanged(sender As Object, e As EventArgs) Handles txtpurplesgreen.TextChanged, txtpurplesblue.TextChanged, txtpurplesred.TextChanged + On Error Resume Next + pnlpurplecustomcolour.BackColor = Color.FromArgb(txtpurplesred.Text, txtpurplesgreen.Text, txtpurplesblue.Text) + End Sub + + Private Sub pnlpurpleoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlpurpleoptions.MouseLeave, pnlpurpleoptions.MouseEnter, pnlpurplecolours.MouseEnter, pnlpurplecolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtpurplesblue.Text) > 255 Then + txtpurplesblue.Text = "255" + End If + If Convert.ToInt32(txtpurplesred.Text) > Convert.ToInt32(txtpurplesblue.Text) Then + txtpurplesred.Text = txtpurplesblue.Text + End If + If Convert.ToInt32(txtpurplesgreen.Text) > Convert.ToInt32(txtpurplesblue.Text) Then + txtpurplesgreen.Text = txtpurplesred.Text + End If + If Convert.ToInt32(txtpurplesgreen.Text) > Convert.ToInt32(txtpurplesred.Text) Then + txtpurplesgreen.Text = txtpurplesred.Text + End If + pnlpurplecustomcolour.BackColor = Color.FromArgb(txtpurplesred.Text, txtpurplesgreen.Text, txtpurplesblue.Text) + End Sub + + Private Sub txtbluesgreen_TextChanged(sender As Object, e As EventArgs) Handles txtbluesgreen.TextChanged, txtbluesblue.TextChanged, txtbluesred.TextChanged + On Error Resume Next + pnlbluecustomcolour.BackColor = Color.FromArgb(txtbluesred.Text, txtbluesgreen.Text, txtbluesblue.Text) + End Sub + + Private Sub pnlblueoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlblueoptions.MouseLeave, pnlblueoptions.MouseEnter, pnlbluecolours.MouseEnter, pnlbluecolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtbluesblue.Text) > 255 Then + txtbluesblue.Text = "255" + End If + If Convert.ToInt32(txtbluesgreen.Text) > Convert.ToInt32(txtbluesblue.Text) Then + txtbluesgreen.Text = txtbluesblue.Text + End If + If Convert.ToInt32(txtbluesred.Text) > Convert.ToInt32(txtbluesblue.Text) Then + txtbluesred.Text = txtbluesgreen.Text + End If + If Convert.ToInt32(txtbluesred.Text) > Convert.ToInt32(txtbluesgreen.Text) Then + txtbluesred.Text = txtbluesgreen.Text + End If + pnlbluecustomcolour.BackColor = Color.FromArgb(txtbluesred.Text, txtbluesgreen.Text, txtbluesblue.Text) + End Sub + + Private Sub txtgreensgreen_TextChanged(sender As Object, e As EventArgs) Handles txtgreensgreen.TextChanged, txtgreensblue.TextChanged, txtgreensred.TextChanged + On Error Resume Next + pnlgreencustomcolour.BackColor = Color.FromArgb(txtgreensred.Text, txtgreensgreen.Text, txtgreensblue.Text) + End Sub + + Private Sub pnlgreenoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlgreenoptions.MouseLeave, pnlgreenoptions.MouseEnter, pnlgreencolours.MouseEnter, pnlgreencolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtgreensgreen.Text) > 255 Then + txtgreensgreen.Text = "255" + End If + If Convert.ToInt32(txtgreensblue.Text) > Convert.ToInt32(txtgreensgreen.Text) Then + txtgreensblue.Text = txtgreensgreen.Text + End If + If Convert.ToInt32(txtgreensred.Text) > Convert.ToInt32(txtgreensgreen.Text) Then + txtgreensred.Text = txtgreensgreen.Text + End If + If Convert.ToInt32(txtgreensblue.Text) > Convert.ToInt32(txtgreensred.Text + 150) Then + txtgreensblue.Text = Convert.ToInt32(txtgreensred.Text + 150) + End If + If Convert.ToInt32(txtgreensred.Text) > Convert.ToInt32(txtgreensblue.Text + 150) Then + txtgreensred.Text = Convert.ToInt32(txtgreensblue.Text + 150) + End If + pnlgreencustomcolour.BackColor = Color.FromArgb(txtgreensred.Text, txtgreensgreen.Text, txtgreensblue.Text) + End Sub + + Private Sub txtyellowsred_TextChanged(sender As Object, e As EventArgs) Handles txtyellowsred.TextChanged, txtyellowsblue.TextChanged, txtyellowsgreen.TextChanged + On Error Resume Next + pnlyellowcustomcolour.BackColor = Color.FromArgb(txtyellowsred.Text, txtyellowsgreen.Text, txtyellowsblue.Text) + End Sub + + Private Sub pnlyellowoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlyellowoptions.MouseLeave, pnlyellowoptions.MouseEnter, pnlyellowcolours.MouseEnter, pnlyellowcolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtyellowsred.Text) > 255 Then + txtyellowsred.Text = "255" + End If + If Convert.ToInt32(txtyellowsred.Text) < 180 Then + txtyellowsred.Text = "180" + End If + If Convert.ToInt32(txtyellowsgreen.Text) > Convert.ToInt32(txtyellowsred.Text) Then + txtyellowsgreen.Text = txtyellowsred.Text + End If + If Convert.ToInt32(txtyellowsgreen.Text) < Convert.ToInt32(txtyellowsred.Text - 30) Then + txtyellowsgreen.Text = Convert.ToInt32(txtyellowsred.Text - 30) + End If + If Convert.ToInt32(txtyellowsblue.Text) > Convert.ToInt32(txtyellowsgreen.Text) Then + txtyellowsblue.Text = txtyellowsgreen.Text + End If + pnlyellowcustomcolour.BackColor = Color.FromArgb(txtyellowsred.Text, txtyellowsgreen.Text, txtyellowsblue.Text) + End Sub + + Private Sub txtorangesred_TextChanged(sender As Object, e As EventArgs) Handles txtorangesred.TextChanged, txtorangesblue.TextChanged, txtorangesgreen.TextChanged + On Error Resume Next + pnlorangecustomcolour.BackColor = Color.FromArgb(txtorangesred.Text, txtorangesgreen.Text, txtorangesblue.Text) + End Sub + + Private Sub pnlorangeoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlorangeoptions.MouseLeave, pnlorangeoptions.MouseEnter, pnlorangecolours.MouseEnter, pnlyellowcolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtorangesred.Text) > 255 Then + txtorangesred.Text = "255" + End If + If Convert.ToInt32(txtorangesred.Text) < 255 Then + txtorangesred.Text = "255" + End If + If Convert.ToInt32(txtorangesgreen.Text) > Convert.ToInt32(txtorangesred.Text - 100) Then + txtorangesgreen.Text = Convert.ToInt32(txtorangesred.Text - 100) + End If + If Convert.ToInt32(txtorangesgreen.Text) < 30 Then + txtorangesgreen.Text = "30" + End If + If Convert.ToInt32(txtorangesblue.Text) > Convert.ToInt32(txtorangesgreen.Text - 30) Then + txtorangesblue.Text = Convert.ToInt32(txtorangesgreen.Text - 30) + End If + pnlorangecustomcolour.BackColor = Color.FromArgb(txtorangesred.Text, txtorangesgreen.Text, txtorangesblue.Text) + End Sub + + Private Sub txtbrownsred_TextChanged(sender As Object, e As EventArgs) Handles txtbrownsred.TextChanged, txtbrownsblue.TextChanged, txtbrownsgreen.TextChanged + On Error Resume Next + pnlbrowncustomcolour.BackColor = Color.FromArgb(txtbrownsred.Text, txtbrownsgreen.Text, txtbrownsblue.Text) + End Sub + + Private Sub pnlbrownoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlbrownoptions.MouseLeave, pnlbrownoptions.MouseEnter, pnlbrowncolours.MouseEnter, pnlbrowncolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtbrownsred.Text) > 255 Then + txtbrownsred.Text = "255" + End If + If Convert.ToInt32(txtbrownsred.Text) < 90 Then + txtbrownsred.Text = "90" + End If + If Convert.ToInt32(txtbrownsgreen.Text) > Convert.ToInt32(txtbrownsred.Text - 30) Then + txtbrownsgreen.Text = Convert.ToInt32(txtbrownsred.Text - 30) + End If + If Convert.ToInt32(txtbrownsgreen.Text) < Convert.ToInt32(txtbrownsred.Text - 128) Then + txtbrownsgreen.Text = Convert.ToInt32(txtbrownsred.Text - 128) + End If + If Convert.ToInt32(txtbrownsgreen.Text) < 60 Then + txtbrownsgreen.Text = "60" + End If + If Convert.ToInt32(txtbrownsblue.Text) > Convert.ToInt32(txtbrownsgreen.Text - 60) Then + txtbrownsblue.Text = Convert.ToInt32(txtbrownsgreen.Text - 60) + End If + pnlbrowncustomcolour.BackColor = Color.FromArgb(txtbrownsred.Text, txtbrownsgreen.Text, txtbrownsblue.Text) + End Sub + + Private Sub txtsred_TextChanged(sender As Object, e As EventArgs) Handles txtredsred.TextChanged, txtredsblue.TextChanged, txtredsgreen.TextChanged + On Error Resume Next + pnlredcustomcolour.BackColor = Color.FromArgb(txtredsred.Text, txtredsgreen.Text, txtredsblue.Text) + End Sub + + Private Sub pnlredoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlredoptions.MouseLeave, pnlredoptions.MouseEnter, pnlredcolours.MouseEnter, pnlbrowncolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtredsred.Text) > 255 Then + txtredsred.Text = "255" + End If + If Convert.ToInt32(txtredsblue.Text) > Convert.ToInt32(txtredsred.Text - 80) Then + txtredsblue.Text = Convert.ToInt32(txtredsred.Text - 80) + End If + If Convert.ToInt32(txtredsgreen.Text) > Convert.ToInt32(txtredsred.Text - 80) Then + txtredsgreen.Text = Convert.ToInt32(txtredsred.Text - 80) + End If + If Convert.ToInt32(txtredsgreen.Text) > Convert.ToInt32(txtredsblue.Text + 50) Then + txtredsgreen.Text = Convert.ToInt32(txtredsblue.Text + 50) + End If + If Convert.ToInt32(txtredsblue.Text) > Convert.ToInt32(txtredsgreen.Text + 50) Then + txtredsblue.Text = Convert.ToInt32(txtredsgreen.Text + 50) + End If + pnlredcustomcolour.BackColor = Color.FromArgb(txtredsred.Text, txtredsgreen.Text, txtredsblue.Text) + End Sub + + Private Sub txtpinksred_TextChanged(sender As Object, e As EventArgs) Handles txtpinksred.TextChanged, txtpinksblue.TextChanged, txtpinksgreen.TextChanged + On Error Resume Next + pnlpinkcustomcolour.BackColor = Color.FromArgb(txtpinksred.Text, txtpinksgreen.Text, txtpinksblue.Text) + End Sub + + Private Sub pnlpinkoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlpinkoptions.MouseLeave, pnlpinkoptions.MouseEnter, pnlpinkcolours.MouseEnter, pnlpinkcolours.MouseLeave + customcolourfailsafe() + If Convert.ToInt32(txtpinksred.Text) > 255 Then + txtpinksred.Text = "255" + End If + If Convert.ToInt32(txtpinksblue.Text) > Convert.ToInt32(txtpinksred.Text - 50) Then + txtpinksblue.Text = Convert.ToInt32(txtpinksred.Text - 50) + End If + If Convert.ToInt32(txtpinksgreen.Text) > Convert.ToInt32(txtpinksblue.Text) Then + txtpinksgreen.Text = Convert.ToInt32(txtpinksblue.Text) + End If + pnlpinkcustomcolour.BackColor = Color.FromArgb(txtpinksred.Text, txtpinksgreen.Text, txtpinksblue.Text) + End Sub + + Private Sub txtanysred_TextChanged(sender As Object, e As EventArgs) Handles txtanysred.TextChanged, txtanysblue.TextChanged, txtanysgreen.TextChanged + On Error Resume Next + pnlanycustomcolour.BackColor = Color.FromArgb(txtanysred.Text, txtanysgreen.Text, txtanysblue.Text) + End Sub + + Private Sub pnlanyoptions_MouseLeave(sender As Object, e As EventArgs) Handles pnlanyoptions.MouseLeave, pnlanyoptions.MouseEnter, pnlanycolours.MouseEnter, pnlanycolours.MouseLeave + customcolourfailsafe() + Select Case anylevel + Case 1 + If Convert.ToInt32(txtanysred.Text) > 150 Then + txtanysred.Text = "150" + End If + If Convert.ToInt32(txtanysred.Text) < 100 Then + txtanysred.Text = "100" + End If + If Convert.ToInt32(txtanysblue.Text) > 150 Then + txtanysblue.Text = "150" + End If + If Convert.ToInt32(txtanysblue.Text) < 100 Then + txtanysblue.Text = "100" + End If + If Convert.ToInt32(txtanysgreen.Text) > 150 Then + txtanysgreen.Text = "150" + End If + If Convert.ToInt32(txtanysgreen.Text) < 100 Then + txtanysgreen.Text = "100" + End If + Case 2 + If Convert.ToInt32(txtanysred.Text) > 200 Then + txtanysred.Text = "200" + End If + If Convert.ToInt32(txtanysred.Text) < 100 Then + txtanysred.Text = "100" + End If + If Convert.ToInt32(txtanysblue.Text) > 200 Then + txtanysblue.Text = "200" + End If + If Convert.ToInt32(txtanysblue.Text) < 100 Then + txtanysblue.Text = "100" + End If + If Convert.ToInt32(txtanysgreen.Text) > 200 Then + txtanysgreen.Text = "200" + End If + If Convert.ToInt32(txtanysgreen.Text) < 100 Then + txtanysgreen.Text = "100" + End If + Case 3 + If Convert.ToInt32(txtanysred.Text) > 225 Then + txtanysred.Text = "225" + End If + If Convert.ToInt32(txtanysred.Text) < 75 Then + txtanysred.Text = "75" + End If + If Convert.ToInt32(txtanysblue.Text) > 225 Then + txtanysblue.Text = "225" + End If + If Convert.ToInt32(txtanysblue.Text) < 75 Then + txtanysblue.Text = "75" + End If + If Convert.ToInt32(txtanysgreen.Text) > 225 Then + txtanysgreen.Text = "225" + End If + If Convert.ToInt32(txtanysgreen.Text) < 75 Then + txtanysgreen.Text = "75" + End If + Case 4 + If Convert.ToInt32(txtanysred.Text) > 255 Then + txtanysred.Text = "255" + End If + If Convert.ToInt32(txtanysred.Text) < 0 Then + txtanysred.Text = "0" + End If + If Convert.ToInt32(txtanysblue.Text) > 255 Then + txtanysblue.Text = "255" + End If + If Convert.ToInt32(txtanysblue.Text) < 0 Then + txtanysblue.Text = "0" + End If + If Convert.ToInt32(txtanysgreen.Text) > 255 Then + txtanysgreen.Text = "255" + End If + If Convert.ToInt32(txtanysgreen.Text) < 0 Then + txtanysgreen.Text = "0" + End If + End Select + pnlanycustomcolour.BackColor = Color.FromArgb(txtanysred.Text, txtanysgreen.Text, txtanysblue.Text) + End Sub + + Private Sub pnlgraycustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlgraycustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Gray Rules" + infobox.textinfo = "You must input a value between 0 (black) and 255 (white) to form a shade of gray." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Gray Memory Wiped" + infobox.textinfo = "All your custom shades of Gray have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.graymemory, 0, ShiftOSDesktop.graymemory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlpurplecustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlpurplecustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Purple Rules" + infobox.textinfo = "Blue must have the highest value followed by red. Green must then have the lowest value." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Purple Memory Wiped" + infobox.textinfo = "All your custom shades of Purple have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.purplememory, 0, ShiftOSDesktop.purplememory.Length) + setupboughtcolours() + loadmemory() + End If + + End Sub + + Private Sub pnlbluecustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlbluecustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Blue Rules" + infobox.textinfo = "Blue must have the highest value followed by green. Red must then have the lowest value." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Blue Memory Wiped" + infobox.textinfo = "All your custom shades of Blue have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.bluememory, 0, ShiftOSDesktop.bluememory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlgreencustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlgreencustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Green Rules" + infobox.textinfo = "Green must have the highest value. Red and Blue need to have values within 150 of eachother." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Green Memory Wiped" + infobox.textinfo = "All your custom shades of Green have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.greenmemory, 0, ShiftOSDesktop.greenmemory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlyellowcustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlyellowcustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Yellow Rules" + infobox.textinfo = "Red must have the highest value and be over 180. Green must be within 30 values of red. Blue must be the lowest value." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Yellow Memory Wiped" + infobox.textinfo = "All your custom shades of Yellow have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.yellowmemory, 0, ShiftOSDesktop.yellowmemory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlorangecustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlorangecustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Orange Rules" + infobox.textinfo = "Red must have a value of 255. Green must be 100 or more values less than red. Blue must be 30 or more values less than green." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Orange Memory Wiped" + infobox.textinfo = "All your custom shades of Orange have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.orangememory, 0, ShiftOSDesktop.orangememory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlbrowncustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlbrowncustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Brown Rules" + infobox.textinfo = "Red must have the highest value. Green must be 30 - 128 values lower than red. Blue must be 60 or more values less than green." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Brown Memory Wiped" + infobox.textinfo = "All your custom shades of Brown have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.brownmemory, 0, ShiftOSDesktop.brownmemory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlredcustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlredcustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Red Rules" + infobox.textinfo = "Red must have the highest value. Green and blue must be 80 or more values less than red but within 50 values of eachother." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Red Memory Wiped" + infobox.textinfo = "All your custom shades of Red have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.redmemory, 0, ShiftOSDesktop.redmemory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlpinkcustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlpinkcustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + infobox.title = "Pink Rules" + infobox.textinfo = "Red must have the highest value. Blue must be 50 or more values less than red. Green must have the lowest value." & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Pink Memory Wiped" + infobox.textinfo = "All your custom shades of Pink have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.pinkmemory, 0, ShiftOSDesktop.pinkmemory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub pnlanycustomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlanycustomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Select Case anylevel + Case 1 + infobox.title = "Custom Rules" + infobox.textinfo = "Red, Green and Blue may be set to any value between 100 and 150" & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + Case 2 + infobox.title = "Custom Rules" + infobox.textinfo = "Red, Green and Blue may be set to any value between 100 and 200" & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + Case 3 + infobox.title = "Custom Rules" + infobox.textinfo = "Red, Green and Blue may be set to any value between 75 and 225" & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + Case 4 + infobox.title = "Custom Rules" + infobox.textinfo = "Red, Green and Blue may be set to any value between 0 and 255" & Environment.NewLine & Environment.NewLine & "Right click a box on the left to use this colour." + infobox.Show() + End Select + End If + + If e.Button = Windows.Forms.MouseButtons.Right Then + infobox.title = "Custom Colour Memory Wiped" + infobox.textinfo = "All your custom colour shades of have been wiped from memory." & Environment.NewLine & Environment.NewLine & "You can set custom colours but right clicking any of the boxes on the left." + infobox.Show() + Array.Clear(ShiftOSDesktop.anymemory, 0, ShiftOSDesktop.anymemory.Length) + setupboughtcolours() + loadmemory() + End If + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As MouseEventArgs) Handles rollupbutton.MouseUp + + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As MouseEventArgs) Handles rollupbutton.MouseDown + + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/CustomColorTable.vb b/ShiftOS/CustomColorTable.vb new file mode 100644 index 0000000..8c2604d --- /dev/null +++ b/ShiftOS/CustomColorTable.vb @@ -0,0 +1,330 @@ +' +' This code was generated by the .NET ToolStrip Customizer. +' http://toolstripcustomizer.codeplex.com/ +' + +Imports System.Drawing +Imports System.Windows.Forms + +Namespace MyNamespace + Class CustomColorTable + Inherits ProfessionalColorTable + Public Overrides ReadOnly Property ButtonSelectedHighlight() As Color + Get + Return ButtonSelectedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedHighlightBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedHighlight() As Color + Get + Return ButtonPressedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedHighlightBorder() As Color + Get + Return ButtonPressedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedHighlight() As Color + Get + Return ButtonCheckedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedHighlightBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedBorder() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckSelectedBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckPressedBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property GripDark() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property GripLight() As Color + Get + Return Color.FromName("White") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientBegin() As Color + Get + Return Color.FromArgb(Skins.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientMiddle() As Color + Get + Return Color.FromArgb(Skins.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientEnd() As Color + Get + Return Color.FromArgb(Skins.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property MenuStripGradientBegin() As Color + Get + If Skins.applauncher Is Nothing Then + Return Color.FromArgb(Skins.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuStripGradientEnd() As Color + Get + If Skins.applauncher Is Nothing Then + Return Color.FromArgb(Skins.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelected() As Color + Get + Return Color.FromArgb(Skins.applaunchermouseovercolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property MenuItemBorder() As Color + Get + If Skins.applauncher Is Nothing Then + Return Color.FromArgb(Skins.applaunchermouseovercolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuBorder() As Color + Get + If Skins.applauncher Is Nothing Then + Return Color.FromArgb(Skins.applauncherbackgroundcolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelectedGradientBegin() As Color + Get + If Skins.applauncher Is Nothing Then + Return Color.FromArgb(Skins.applaunchermouseovercolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelectedGradientEnd() As Color + Get + If Skins.applauncher Is Nothing Then + Return Color.FromArgb(Skins.applaunchermouseovercolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientBegin() As Color + Get + 'remember this is for clicking the button, the below must be changed in the future + If Skins.applauncherclick Is Nothing Then + Return Color.FromArgb(Skins.applauncherbuttonclickedcolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientMiddle() As Color + Get + If Skins.applauncherclick Is Nothing Then + Return Color.FromArgb(Skins.applauncherbuttonclickedcolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientEnd() As Color + Get + If Skins.applauncherclick Is Nothing Then + Return Color.FromArgb(Skins.applauncherbuttonclickedcolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property RaftingContainerGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property RaftingContainerGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property SeparatorDark() As Color + Get + Return Color.FromName("Black") + End Get + End Property + Public Overrides ReadOnly Property SeparatorLight() As Color + Get + Return Color.FromName("ButtonHighlight") + End Get + End Property + Public Overrides ReadOnly Property StatusStripGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property StatusStripGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property ToolStripBorder() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripDropDownBackground() As Color + Get + Return Color.FromArgb(Skins.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripContentPanelGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property ToolStripContentPanelGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property ToolStripPanelGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property ToolStripPanelGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientBegin() As Color + Get + Return Color.FromArgb(255, 245, 245, 245) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientMiddle() As Color + Get + Return Color.FromArgb(255, 242, 242, 242) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + End Class +End Namespace \ No newline at end of file diff --git a/ShiftOS/Custom_Menu.Designer.vb b/ShiftOS/Custom_Menu.Designer.vb new file mode 100644 index 0000000..e9e48b3 --- /dev/null +++ b/ShiftOS/Custom_Menu.Designer.vb @@ -0,0 +1,486 @@ + _ +Partial Class Custom_Menu + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.pnlcontrols = New System.Windows.Forms.Panel() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.TextBox2 = New System.Windows.Forms.TextBox() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.TextBox1 = New System.Windows.Forms.TextBox() + Me.pnlrunicon = New System.Windows.Forms.Panel() + Me.txtrun = New System.Windows.Forms.TextBox() + Me.flpcat = New System.Windows.Forms.FlowLayoutPanel() + Me.Panel3 = New System.Windows.Forms.Panel() + Me.Label1 = New System.Windows.Forms.Label() + Me.Panel4 = New System.Windows.Forms.Panel() + Me.flpmain = New System.Windows.Forms.FlowLayoutPanel() + Me.pnlknowledgeinput = New System.Windows.Forms.Panel() + Me.lblknowledgeinputname = New System.Windows.Forms.Label() + Me.pnlknowledgeinputicon = New System.Windows.Forms.Panel() + Me.Panel5 = New System.Windows.Forms.Panel() + Me.Label2 = New System.Windows.Forms.Label() + Me.Panel6 = New System.Windows.Forms.Panel() + Me.Panel7 = New System.Windows.Forms.Panel() + Me.Label3 = New System.Windows.Forms.Label() + Me.Panel8 = New System.Windows.Forms.Panel() + Me.Panel9 = New System.Windows.Forms.Panel() + Me.Label4 = New System.Windows.Forms.Label() + Me.Panel10 = New System.Windows.Forms.Panel() + Me.Panel11 = New System.Windows.Forms.Panel() + Me.Label5 = New System.Windows.Forms.Label() + Me.Panel12 = New System.Windows.Forms.Panel() + Me.Panel13 = New System.Windows.Forms.Panel() + Me.Label6 = New System.Windows.Forms.Label() + Me.Panel14 = New System.Windows.Forms.Panel() + Me.Panel15 = New System.Windows.Forms.Panel() + Me.Label7 = New System.Windows.Forms.Label() + Me.Panel16 = New System.Windows.Forms.Panel() + Me.Panel17 = New System.Windows.Forms.Panel() + Me.Label8 = New System.Windows.Forms.Label() + Me.Panel18 = New System.Windows.Forms.Panel() + Me.pnlcontrols.SuspendLayout() + Me.flpcat.SuspendLayout() + Me.Panel3.SuspendLayout() + Me.flpmain.SuspendLayout() + Me.pnlknowledgeinput.SuspendLayout() + Me.Panel5.SuspendLayout() + Me.Panel7.SuspendLayout() + Me.Panel9.SuspendLayout() + Me.Panel11.SuspendLayout() + Me.Panel13.SuspendLayout() + Me.Panel15.SuspendLayout() + Me.Panel17.SuspendLayout() + Me.SuspendLayout() + ' + 'pnlcontrols + ' + Me.pnlcontrols.Controls.Add(Me.Panel2) + Me.pnlcontrols.Controls.Add(Me.TextBox2) + Me.pnlcontrols.Controls.Add(Me.Panel1) + Me.pnlcontrols.Controls.Add(Me.TextBox1) + Me.pnlcontrols.Controls.Add(Me.pnlrunicon) + Me.pnlcontrols.Controls.Add(Me.txtrun) + Me.pnlcontrols.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlcontrols.Location = New System.Drawing.Point(0, 619) + Me.pnlcontrols.Name = "pnlcontrols" + Me.pnlcontrols.Size = New System.Drawing.Size(417, 31) + Me.pnlcontrols.TabIndex = 1 + ' + 'Panel2 + ' + Me.Panel2.Location = New System.Drawing.Point(290, 8) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(16, 16) + Me.Panel2.TabIndex = 5 + ' + 'TextBox2 + ' + Me.TextBox2.Location = New System.Drawing.Point(311, 6) + Me.TextBox2.Name = "TextBox2" + Me.TextBox2.Size = New System.Drawing.Size(100, 20) + Me.TextBox2.TabIndex = 4 + Me.TextBox2.Text = "Command" + ' + 'Panel1 + ' + Me.Panel1.Location = New System.Drawing.Point(149, 9) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(16, 16) + Me.Panel1.TabIndex = 3 + ' + 'TextBox1 + ' + Me.TextBox1.Location = New System.Drawing.Point(169, 7) + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.Size = New System.Drawing.Size(100, 20) + Me.TextBox1.TabIndex = 2 + Me.TextBox1.Text = "Search" + ' + 'pnlrunicon + ' + Me.pnlrunicon.Location = New System.Drawing.Point(12, 8) + Me.pnlrunicon.Name = "pnlrunicon" + Me.pnlrunicon.Size = New System.Drawing.Size(16, 16) + Me.pnlrunicon.TabIndex = 1 + ' + 'txtrun + ' + Me.txtrun.Location = New System.Drawing.Point(33, 6) + Me.txtrun.Name = "txtrun" + Me.txtrun.Size = New System.Drawing.Size(100, 20) + Me.txtrun.TabIndex = 0 + Me.txtrun.Text = "Run" + ' + 'flpcat + ' + Me.flpcat.Controls.Add(Me.Panel3) + Me.flpcat.Controls.Add(Me.Panel5) + Me.flpcat.Controls.Add(Me.Panel7) + Me.flpcat.Controls.Add(Me.Panel9) + Me.flpcat.Controls.Add(Me.Panel17) + Me.flpcat.Dock = System.Windows.Forms.DockStyle.Right + Me.flpcat.Location = New System.Drawing.Point(209, 0) + Me.flpcat.Name = "flpcat" + Me.flpcat.Size = New System.Drawing.Size(208, 619) + Me.flpcat.TabIndex = 3 + ' + 'Panel3 + ' + Me.Panel3.Controls.Add(Me.Label1) + Me.Panel3.Controls.Add(Me.Panel4) + Me.Panel3.Location = New System.Drawing.Point(3, 3) + Me.Panel3.Name = "Panel3" + Me.Panel3.Size = New System.Drawing.Size(200, 67) + Me.Panel3.TabIndex = 0 + ' + 'Label1 + ' + Me.Label1.BackColor = System.Drawing.Color.Transparent + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(65, 9) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(132, 50) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "GAMES" + Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel4 + ' + Me.Panel4.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel4.Location = New System.Drawing.Point(9, 9) + Me.Panel4.Name = "Panel4" + Me.Panel4.Size = New System.Drawing.Size(50, 50) + Me.Panel4.TabIndex = 0 + ' + 'flpmain + ' + Me.flpmain.Controls.Add(Me.pnlknowledgeinput) + Me.flpmain.Controls.Add(Me.Panel11) + Me.flpmain.Controls.Add(Me.Panel13) + Me.flpmain.Controls.Add(Me.Panel15) + Me.flpmain.Dock = System.Windows.Forms.DockStyle.Fill + Me.flpmain.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.flpmain.Location = New System.Drawing.Point(0, 0) + Me.flpmain.Name = "flpmain" + Me.flpmain.Size = New System.Drawing.Size(209, 619) + Me.flpmain.TabIndex = 4 + ' + 'pnlknowledgeinput + ' + Me.pnlknowledgeinput.Controls.Add(Me.lblknowledgeinputname) + Me.pnlknowledgeinput.Controls.Add(Me.pnlknowledgeinputicon) + Me.pnlknowledgeinput.Location = New System.Drawing.Point(3, 3) + Me.pnlknowledgeinput.Name = "pnlknowledgeinput" + Me.pnlknowledgeinput.Size = New System.Drawing.Size(200, 67) + Me.pnlknowledgeinput.TabIndex = 0 + ' + 'lblknowledgeinputname + ' + Me.lblknowledgeinputname.BackColor = System.Drawing.Color.Transparent + Me.lblknowledgeinputname.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblknowledgeinputname.Location = New System.Drawing.Point(65, 9) + Me.lblknowledgeinputname.Name = "lblknowledgeinputname" + Me.lblknowledgeinputname.Size = New System.Drawing.Size(132, 50) + Me.lblknowledgeinputname.TabIndex = 1 + Me.lblknowledgeinputname.Text = "Games >" + Me.lblknowledgeinputname.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlknowledgeinputicon + ' + Me.pnlknowledgeinputicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlknowledgeinputicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlknowledgeinputicon.Location = New System.Drawing.Point(9, 9) + Me.pnlknowledgeinputicon.Name = "pnlknowledgeinputicon" + Me.pnlknowledgeinputicon.Size = New System.Drawing.Size(50, 50) + Me.pnlknowledgeinputicon.TabIndex = 0 + ' + 'Panel5 + ' + Me.Panel5.Controls.Add(Me.Label2) + Me.Panel5.Controls.Add(Me.Panel6) + Me.Panel5.Location = New System.Drawing.Point(3, 76) + Me.Panel5.Name = "Panel5" + Me.Panel5.Size = New System.Drawing.Size(200, 67) + Me.Panel5.TabIndex = 1 + ' + 'Label2 + ' + Me.Label2.BackColor = System.Drawing.Color.Transparent + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(65, 9) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(132, 50) + Me.Label2.TabIndex = 1 + Me.Label2.Text = "Pong" + Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel6 + ' + Me.Panel6.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel6.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel6.Location = New System.Drawing.Point(9, 9) + Me.Panel6.Name = "Panel6" + Me.Panel6.Size = New System.Drawing.Size(50, 50) + Me.Panel6.TabIndex = 0 + ' + 'Panel7 + ' + Me.Panel7.Controls.Add(Me.Label3) + Me.Panel7.Controls.Add(Me.Panel8) + Me.Panel7.Location = New System.Drawing.Point(3, 149) + Me.Panel7.Name = "Panel7" + Me.Panel7.Size = New System.Drawing.Size(200, 67) + Me.Panel7.TabIndex = 2 + ' + 'Label3 + ' + Me.Label3.BackColor = System.Drawing.Color.Transparent + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(65, 9) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(132, 50) + Me.Label3.TabIndex = 1 + Me.Label3.Text = "Dodge" + Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel8 + ' + Me.Panel8.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel8.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel8.Location = New System.Drawing.Point(9, 9) + Me.Panel8.Name = "Panel8" + Me.Panel8.Size = New System.Drawing.Size(50, 50) + Me.Panel8.TabIndex = 0 + ' + 'Panel9 + ' + Me.Panel9.Controls.Add(Me.Label4) + Me.Panel9.Controls.Add(Me.Panel10) + Me.Panel9.Location = New System.Drawing.Point(3, 222) + Me.Panel9.Name = "Panel9" + Me.Panel9.Size = New System.Drawing.Size(200, 67) + Me.Panel9.TabIndex = 3 + ' + 'Label4 + ' + Me.Label4.BackColor = System.Drawing.Color.Transparent + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(65, 9) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(132, 50) + Me.Label4.TabIndex = 1 + Me.Label4.Text = "Labyrinth" + Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel10 + ' + Me.Panel10.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel10.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel10.Location = New System.Drawing.Point(9, 9) + Me.Panel10.Name = "Panel10" + Me.Panel10.Size = New System.Drawing.Size(50, 50) + Me.Panel10.TabIndex = 0 + ' + 'Panel11 + ' + Me.Panel11.Controls.Add(Me.Label5) + Me.Panel11.Controls.Add(Me.Panel12) + Me.Panel11.Location = New System.Drawing.Point(3, 76) + Me.Panel11.Name = "Panel11" + Me.Panel11.Size = New System.Drawing.Size(200, 67) + Me.Panel11.TabIndex = 1 + ' + 'Label5 + ' + Me.Label5.BackColor = System.Drawing.Color.Transparent + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(65, 9) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(132, 50) + Me.Label5.TabIndex = 1 + Me.Label5.Text = "Customization >" + Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel12 + ' + Me.Panel12.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel12.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel12.Location = New System.Drawing.Point(9, 9) + Me.Panel12.Name = "Panel12" + Me.Panel12.Size = New System.Drawing.Size(50, 50) + Me.Panel12.TabIndex = 0 + ' + 'Panel13 + ' + Me.Panel13.Controls.Add(Me.Label6) + Me.Panel13.Controls.Add(Me.Panel14) + Me.Panel13.Location = New System.Drawing.Point(3, 149) + Me.Panel13.Name = "Panel13" + Me.Panel13.Size = New System.Drawing.Size(200, 67) + Me.Panel13.TabIndex = 2 + ' + 'Label6 + ' + Me.Label6.BackColor = System.Drawing.Color.Transparent + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(65, 9) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(132, 50) + Me.Label6.TabIndex = 1 + Me.Label6.Text = "Interwebz >" + Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel14 + ' + Me.Panel14.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel14.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel14.Location = New System.Drawing.Point(9, 9) + Me.Panel14.Name = "Panel14" + Me.Panel14.Size = New System.Drawing.Size(50, 50) + Me.Panel14.TabIndex = 0 + ' + 'Panel15 + ' + Me.Panel15.Controls.Add(Me.Label7) + Me.Panel15.Controls.Add(Me.Panel16) + Me.Panel15.Location = New System.Drawing.Point(3, 222) + Me.Panel15.Name = "Panel15" + Me.Panel15.Size = New System.Drawing.Size(200, 67) + Me.Panel15.TabIndex = 3 + ' + 'Label7 + ' + Me.Label7.BackColor = System.Drawing.Color.Transparent + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(65, 9) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(132, 50) + Me.Label7.TabIndex = 1 + Me.Label7.Text = "Office >" + Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel16 + ' + Me.Panel16.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel16.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel16.Location = New System.Drawing.Point(9, 9) + Me.Panel16.Name = "Panel16" + Me.Panel16.Size = New System.Drawing.Size(50, 50) + Me.Panel16.TabIndex = 0 + ' + 'Panel17 + ' + Me.Panel17.Controls.Add(Me.Label8) + Me.Panel17.Controls.Add(Me.Panel18) + Me.Panel17.Location = New System.Drawing.Point(3, 295) + Me.Panel17.Name = "Panel17" + Me.Panel17.Size = New System.Drawing.Size(200, 67) + Me.Panel17.TabIndex = 4 + ' + 'Label8 + ' + Me.Label8.BackColor = System.Drawing.Color.Transparent + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(65, 9) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(132, 50) + Me.Label8.TabIndex = 1 + Me.Label8.Text = "Knowledge Input" + Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel18 + ' + Me.Panel18.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.Panel18.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel18.Location = New System.Drawing.Point(9, 9) + Me.Panel18.Name = "Panel18" + Me.Panel18.Size = New System.Drawing.Size(50, 50) + Me.Panel18.TabIndex = 0 + ' + 'Custom_Menu + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(417, 650) + Me.Controls.Add(Me.flpmain) + Me.Controls.Add(Me.flpcat) + Me.Controls.Add(Me.pnlcontrols) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Custom_Menu" + Me.Text = "Custom_Menu" + Me.TopMost = True + Me.pnlcontrols.ResumeLayout(False) + Me.pnlcontrols.PerformLayout() + Me.flpcat.ResumeLayout(False) + Me.Panel3.ResumeLayout(False) + Me.flpmain.ResumeLayout(False) + Me.pnlknowledgeinput.ResumeLayout(False) + Me.Panel5.ResumeLayout(False) + Me.Panel7.ResumeLayout(False) + Me.Panel9.ResumeLayout(False) + Me.Panel11.ResumeLayout(False) + Me.Panel13.ResumeLayout(False) + Me.Panel15.ResumeLayout(False) + Me.Panel17.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pnlcontrols As System.Windows.Forms.Panel + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents TextBox2 As System.Windows.Forms.TextBox + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents TextBox1 As System.Windows.Forms.TextBox + Friend WithEvents pnlrunicon As System.Windows.Forms.Panel + Friend WithEvents txtrun As System.Windows.Forms.TextBox + Friend WithEvents flpcat As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents Panel3 As System.Windows.Forms.Panel + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Panel4 As System.Windows.Forms.Panel + Friend WithEvents Panel5 As System.Windows.Forms.Panel + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Panel6 As System.Windows.Forms.Panel + Friend WithEvents Panel7 As System.Windows.Forms.Panel + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Panel8 As System.Windows.Forms.Panel + Friend WithEvents Panel9 As System.Windows.Forms.Panel + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents Panel10 As System.Windows.Forms.Panel + Friend WithEvents Panel17 As System.Windows.Forms.Panel + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents Panel18 As System.Windows.Forms.Panel + Friend WithEvents flpmain As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents pnlknowledgeinput As System.Windows.Forms.Panel + Friend WithEvents lblknowledgeinputname As System.Windows.Forms.Label + Friend WithEvents pnlknowledgeinputicon As System.Windows.Forms.Panel + Friend WithEvents Panel11 As System.Windows.Forms.Panel + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents Panel12 As System.Windows.Forms.Panel + Friend WithEvents Panel13 As System.Windows.Forms.Panel + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents Panel14 As System.Windows.Forms.Panel + Friend WithEvents Panel15 As System.Windows.Forms.Panel + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents Panel16 As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Custom_Menu.resx b/ShiftOS/Custom_Menu.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/Custom_Menu.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/ShiftOS/Custom_Menu.vb b/ShiftOS/Custom_Menu.vb new file mode 100644 index 0000000..0ccdf89 --- /dev/null +++ b/ShiftOS/Custom_Menu.vb @@ -0,0 +1,3 @@ +Public Class Custom_Menu + ' The up and coming fully customizable menu. +End Class \ No newline at end of file diff --git a/ShiftOS/DockEngine.vb b/ShiftOS/DockEngine.vb new file mode 100644 index 0000000..12dbf04 --- /dev/null +++ b/ShiftOS/DockEngine.vb @@ -0,0 +1,90 @@ +Public Class DockEngine + + Public docktop As Integer + Public topbottom As String + + Dim allLines As List(Of String) = New List(Of String) + Public Function ReadLine(lineNumber As Integer, lines As List(Of String)) As String + Return lines(lineNumber - 1) + End Function + + Public Sub readFile(ByVal file As String) + + If My.Computer.FileSystem.FileExists(file) Then + + allLines.Clear() + + Dim reader As New System.IO.StreamReader(file) + Do While Not reader.EndOfStream + allLines.Add(reader.ReadLine()) + Loop + reader.Close() + + For Each item As String In allLines + Dim tileinfo() As String + tileinfo = item.Split("#") + DockWindow.createtile(tileinfo(0), tileinfo(1)) + + Next + Else + Dim filepath As String = file + If Not System.IO.File.Exists(filepath) Then + If Not My.Computer.FileSystem.DirectoryExists(Application.StartupPath + "\SoftwareData\ShiftDock") Then + My.Computer.FileSystem.CreateDirectory(Application.StartupPath + "\SoftwareData\ShiftDock") + End If + System.IO.File.Create(filepath).Dispose() + DockWindow.firststart = True + End If + End If + + End Sub + + Public Sub readConfFile(ByVal file As String) + + If My.Computer.FileSystem.FileExists(file) Then + + allLines.Clear() + + Dim reader As New System.IO.StreamReader(file) + Do While Not reader.EndOfStream + allLines.Add(reader.ReadLine()) + Loop + reader.Close() + + + docktop = allLines(0) + topbottom = allLines(1) + + DockWindow.Top = docktop + + Else + Dim filepath As String = file + If Not System.IO.File.Exists(filepath) Then + System.IO.File.Create(filepath).Dispose() + End If + End If + + + End Sub + + Public Sub writeFile(ByVal path As String, color As String) + Dim file As System.IO.StreamWriter + file = My.Computer.FileSystem.OpenTextFileWriter(Application.StartupPath + "\SoftwareData\ShiftDock\tiles.dat", True) + file.WriteLine(path + "#" + color) + file.Close() + End Sub + + Public Sub writeConfFile(ByVal top As String, updown As String) + My.Computer.FileSystem.DeleteFile(Application.StartupPath + "\SoftwareData\ShiftDock\conf.dat") + Dim filepath As String = Application.StartupPath + "\SoftwareData\ShiftDock\conf.dat" + If Not System.IO.File.Exists(filepath) Then + System.IO.File.Create(filepath).Dispose() + End If + Dim file As System.IO.StreamWriter + file = My.Computer.FileSystem.OpenTextFileWriter(Application.StartupPath + "\SoftwareData\ShiftDock\conf.dat", True) + file.WriteLine(top) + file.WriteLine(updown) + file.Close() + End Sub + +End Class diff --git a/ShiftOS/DockSettingsMenu.Designer.vb b/ShiftOS/DockSettingsMenu.Designer.vb new file mode 100644 index 0000000..1b3c66a --- /dev/null +++ b/ShiftOS/DockSettingsMenu.Designer.vb @@ -0,0 +1,814 @@ + _ +Partial Class DockSettingsMenu + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.tilecolor = New System.Windows.Forms.ColorDialog() + Me.Label3 = New System.Windows.Forms.Label() + Me.btnQuitDock = New System.Windows.Forms.Button() + Me.btnQuitSet = New System.Windows.Forms.Button() + Me.btnSetBottom = New System.Windows.Forms.Button() + Me.btnSetTop = New System.Windows.Forms.Button() + Me.btnTake = New System.Windows.Forms.Button() + Me.btnPlus = New System.Windows.Forms.Button() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.btnAdd = New System.Windows.Forms.Button() + Me.pnlPrograms = New System.Windows.Forms.Panel() + Me.lblShiftNet = New System.Windows.Forms.Label() + Me.lblIconManager = New System.Windows.Forms.Label() + Me.lblWebBrowser = New System.Windows.Forms.Label() + Me.lblVirusScanner = New System.Windows.Forms.Label() + Me.lblVideoPlayer = New System.Windows.Forms.Label() + Me.lblTextPad = New System.Windows.Forms.Label() + Me.lblTerminal = New System.Windows.Forms.Label() + Me.lblShiftorium = New System.Windows.Forms.Label() + Me.lblShifter = New System.Windows.Forms.Label() + Me.lblPong = New System.Windows.Forms.Label() + Me.lblOrcWrite = New System.Windows.Forms.Label() + Me.lblNameChanger = New System.Windows.Forms.Label() + Me.lblLabyrinth = New System.Windows.Forms.Label() + Me.lblKnowledgeInput = New System.Windows.Forms.Label() + Me.lblInstaller = New System.Windows.Forms.Label() + Me.lblSnakey = New System.Windows.Forms.Label() + Me.lblFloodGateManager = New System.Windows.Forms.Label() + Me.lblFileSkimmer = New System.Windows.Forms.Label() + Me.lblDManager = New System.Windows.Forms.Label() + Me.lblDownloader = New System.Windows.Forms.Label() + Me.lblDodge = New System.Windows.Forms.Label() + Me.lblClock = New System.Windows.Forms.Label() + Me.lblCatlyst = New System.Windows.Forms.Label() + Me.lblCalc = New System.Windows.Forms.Label() + Me.lblBitNoteWallet = New System.Windows.Forms.Label() + Me.lblBitNoteDigger = New System.Windows.Forms.Label() + Me.lblAudioPlayer = New System.Windows.Forms.Label() + Me.lblArtpad = New System.Windows.Forms.Label() + Me.lblToTile = New System.Windows.Forms.Label() + Me.Udate = New System.Windows.Forms.Timer(Me.components) + Me.Label4 = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlPrograms.SuspendLayout() + Me.SuspendLayout() + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 679) + Me.pgleft.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 677) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(265, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 679) + Me.pgright.TabIndex = 17 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 677) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(267, 30) + Me.titlebar.TabIndex = 14 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(170, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(198, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(226, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(83, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Settings" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(265, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 707) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(263, 2) + Me.pgbottom.TabIndex = 18 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(27, 101) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(118, 13) + Me.Label3.TabIndex = 50 + Me.Label3.Text = "Choose Program CLICK" + ' + 'btnQuitDock + ' + Me.btnQuitDock.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnQuitDock.Location = New System.Drawing.Point(16, 619) + Me.btnQuitDock.Name = "btnQuitDock" + Me.btnQuitDock.Size = New System.Drawing.Size(235, 75) + Me.btnQuitDock.TabIndex = 49 + Me.btnQuitDock.Text = "Quit ShiftDock" + Me.btnQuitDock.UseVisualStyleBackColor = True + ' + 'btnQuitSet + ' + Me.btnQuitSet.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnQuitSet.Location = New System.Drawing.Point(16, 538) + Me.btnQuitSet.Name = "btnQuitSet" + Me.btnQuitSet.Size = New System.Drawing.Size(235, 75) + Me.btnQuitSet.TabIndex = 48 + Me.btnQuitSet.Text = "Quit Settings" + Me.btnQuitSet.UseVisualStyleBackColor = True + ' + 'btnSetBottom + ' + Me.btnSetBottom.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnSetBottom.Location = New System.Drawing.Point(16, 444) + Me.btnSetBottom.Name = "btnSetBottom" + Me.btnSetBottom.Size = New System.Drawing.Size(235, 75) + Me.btnSetBottom.TabIndex = 47 + Me.btnSetBottom.Text = "Set Dock To Bottom" + Me.btnSetBottom.UseVisualStyleBackColor = True + ' + 'btnSetTop + ' + Me.btnSetTop.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnSetTop.Location = New System.Drawing.Point(17, 282) + Me.btnSetTop.Name = "btnSetTop" + Me.btnSetTop.Size = New System.Drawing.Size(235, 75) + Me.btnSetTop.TabIndex = 46 + Me.btnSetTop.Text = "Set Dock To Top" + Me.btnSetTop.UseVisualStyleBackColor = True + ' + 'btnTake + ' + Me.btnTake.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnTake.Location = New System.Drawing.Point(16, 363) + Me.btnTake.Name = "btnTake" + Me.btnTake.Size = New System.Drawing.Size(235, 75) + Me.btnTake.TabIndex = 45 + Me.btnTake.Text = "Top -5" + Me.btnTake.UseVisualStyleBackColor = True + ' + 'btnPlus + ' + Me.btnPlus.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnPlus.Location = New System.Drawing.Point(17, 201) + Me.btnPlus.Name = "btnPlus" + Me.btnPlus.Size = New System.Drawing.Size(235, 75) + Me.btnPlus.TabIndex = 44 + Me.btnPlus.Text = "Top + 5" + Me.btnPlus.UseVisualStyleBackColor = True + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.BackColor = System.Drawing.Color.Transparent + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(13, 177) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(244, 18) + Me.Label2.TabIndex = 43 + Me.Label2.Text = "Dock Location (Does not save)" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.BackColor = System.Drawing.Color.Transparent + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(15, 60) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(44, 18) + Me.Label1.TabIndex = 42 + Me.Label1.Text = "Tiles" + ' + 'btnAdd + ' + Me.btnAdd.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAdd.Location = New System.Drawing.Point(17, 123) + Me.btnAdd.Name = "btnAdd" + Me.btnAdd.Size = New System.Drawing.Size(234, 51) + Me.btnAdd.TabIndex = 41 + Me.btnAdd.Text = "Add a tile" + Me.btnAdd.UseVisualStyleBackColor = True + ' + 'pnlPrograms + ' + Me.pnlPrograms.BackColor = System.Drawing.SystemColors.ActiveBorder + Me.pnlPrograms.Controls.Add(Me.lblShiftNet) + Me.pnlPrograms.Controls.Add(Me.lblIconManager) + Me.pnlPrograms.Controls.Add(Me.lblWebBrowser) + Me.pnlPrograms.Controls.Add(Me.lblVirusScanner) + Me.pnlPrograms.Controls.Add(Me.lblVideoPlayer) + Me.pnlPrograms.Controls.Add(Me.lblTextPad) + Me.pnlPrograms.Controls.Add(Me.lblTerminal) + Me.pnlPrograms.Controls.Add(Me.lblShiftorium) + Me.pnlPrograms.Controls.Add(Me.lblShifter) + Me.pnlPrograms.Controls.Add(Me.lblPong) + Me.pnlPrograms.Controls.Add(Me.lblOrcWrite) + Me.pnlPrograms.Controls.Add(Me.lblNameChanger) + Me.pnlPrograms.Controls.Add(Me.lblLabyrinth) + Me.pnlPrograms.Controls.Add(Me.lblKnowledgeInput) + Me.pnlPrograms.Controls.Add(Me.lblInstaller) + Me.pnlPrograms.Controls.Add(Me.lblSnakey) + Me.pnlPrograms.Controls.Add(Me.lblFloodGateManager) + Me.pnlPrograms.Controls.Add(Me.lblFileSkimmer) + Me.pnlPrograms.Controls.Add(Me.lblDManager) + Me.pnlPrograms.Controls.Add(Me.lblDownloader) + Me.pnlPrograms.Controls.Add(Me.lblDodge) + Me.pnlPrograms.Controls.Add(Me.lblClock) + Me.pnlPrograms.Controls.Add(Me.lblCatlyst) + Me.pnlPrograms.Controls.Add(Me.lblCalc) + Me.pnlPrograms.Controls.Add(Me.lblBitNoteWallet) + Me.pnlPrograms.Controls.Add(Me.lblBitNoteDigger) + Me.pnlPrograms.Controls.Add(Me.lblAudioPlayer) + Me.pnlPrograms.Controls.Add(Me.lblArtpad) + Me.pnlPrograms.Location = New System.Drawing.Point(30, 117) + Me.pnlPrograms.Name = "pnlPrograms" + Me.pnlPrograms.Size = New System.Drawing.Size(172, 521) + Me.pnlPrograms.TabIndex = 51 + Me.pnlPrograms.Visible = False + ' + 'lblShiftNet + ' + Me.lblShiftNet.AutoSize = True + Me.lblShiftNet.BackColor = System.Drawing.Color.Transparent + Me.lblShiftNet.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblShiftNet.Location = New System.Drawing.Point(6, 366) + Me.lblShiftNet.Name = "lblShiftNet" + Me.lblShiftNet.Size = New System.Drawing.Size(68, 18) + Me.lblShiftNet.TabIndex = 80 + Me.lblShiftNet.Text = "ShiftNet" + ' + 'lblIconManager + ' + Me.lblIconManager.AutoSize = True + Me.lblIconManager.BackColor = System.Drawing.Color.Transparent + Me.lblIconManager.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblIconManager.Location = New System.Drawing.Point(6, 221) + Me.lblIconManager.Name = "lblIconManager" + Me.lblIconManager.Size = New System.Drawing.Size(110, 18) + Me.lblIconManager.TabIndex = 79 + Me.lblIconManager.Text = "Icon Manager" + ' + 'lblWebBrowser + ' + Me.lblWebBrowser.AutoSize = True + Me.lblWebBrowser.BackColor = System.Drawing.Color.Transparent + Me.lblWebBrowser.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblWebBrowser.Location = New System.Drawing.Point(6, 492) + Me.lblWebBrowser.Name = "lblWebBrowser" + Me.lblWebBrowser.Size = New System.Drawing.Size(105, 18) + Me.lblWebBrowser.TabIndex = 78 + Me.lblWebBrowser.Text = "WebBrowser" + ' + 'lblVirusScanner + ' + Me.lblVirusScanner.AutoSize = True + Me.lblVirusScanner.BackColor = System.Drawing.Color.Transparent + Me.lblVirusScanner.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblVirusScanner.Location = New System.Drawing.Point(6, 474) + Me.lblVirusScanner.Name = "lblVirusScanner" + Me.lblVirusScanner.Size = New System.Drawing.Size(108, 18) + Me.lblVirusScanner.TabIndex = 77 + Me.lblVirusScanner.Text = "VirusScanner" + ' + 'lblVideoPlayer + ' + Me.lblVideoPlayer.AutoSize = True + Me.lblVideoPlayer.BackColor = System.Drawing.Color.Transparent + Me.lblVideoPlayer.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblVideoPlayer.Location = New System.Drawing.Point(6, 456) + Me.lblVideoPlayer.Name = "lblVideoPlayer" + Me.lblVideoPlayer.Size = New System.Drawing.Size(102, 18) + Me.lblVideoPlayer.TabIndex = 76 + Me.lblVideoPlayer.Text = "Video Player" + ' + 'lblTextPad + ' + Me.lblTextPad.AutoSize = True + Me.lblTextPad.BackColor = System.Drawing.Color.Transparent + Me.lblTextPad.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblTextPad.Location = New System.Drawing.Point(6, 438) + Me.lblTextPad.Name = "lblTextPad" + Me.lblTextPad.Size = New System.Drawing.Size(69, 18) + Me.lblTextPad.TabIndex = 75 + Me.lblTextPad.Text = "TextPad" + ' + 'lblTerminal + ' + Me.lblTerminal.AutoSize = True + Me.lblTerminal.BackColor = System.Drawing.Color.Transparent + Me.lblTerminal.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblTerminal.Location = New System.Drawing.Point(6, 420) + Me.lblTerminal.Name = "lblTerminal" + Me.lblTerminal.Size = New System.Drawing.Size(73, 18) + Me.lblTerminal.TabIndex = 74 + Me.lblTerminal.Text = "Terminal" + ' + 'lblShiftorium + ' + Me.lblShiftorium.AutoSize = True + Me.lblShiftorium.BackColor = System.Drawing.Color.Transparent + Me.lblShiftorium.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblShiftorium.Location = New System.Drawing.Point(6, 384) + Me.lblShiftorium.Name = "lblShiftorium" + Me.lblShiftorium.Size = New System.Drawing.Size(85, 18) + Me.lblShiftorium.TabIndex = 72 + Me.lblShiftorium.Text = "Shiftorium" + ' + 'lblShifter + ' + Me.lblShifter.AutoSize = True + Me.lblShifter.BackColor = System.Drawing.Color.Transparent + Me.lblShifter.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblShifter.Location = New System.Drawing.Point(5, 348) + Me.lblShifter.Name = "lblShifter" + Me.lblShifter.Size = New System.Drawing.Size(57, 18) + Me.lblShifter.TabIndex = 71 + Me.lblShifter.Text = "Shifter" + ' + 'lblPong + ' + Me.lblPong.AutoSize = True + Me.lblPong.BackColor = System.Drawing.Color.Transparent + Me.lblPong.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblPong.Location = New System.Drawing.Point(6, 330) + Me.lblPong.Name = "lblPong" + Me.lblPong.Size = New System.Drawing.Size(47, 18) + Me.lblPong.TabIndex = 70 + Me.lblPong.Text = "Pong" + ' + 'lblOrcWrite + ' + Me.lblOrcWrite.AutoSize = True + Me.lblOrcWrite.BackColor = System.Drawing.Color.Transparent + Me.lblOrcWrite.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblOrcWrite.Location = New System.Drawing.Point(6, 312) + Me.lblOrcWrite.Name = "lblOrcWrite" + Me.lblOrcWrite.Size = New System.Drawing.Size(76, 18) + Me.lblOrcWrite.TabIndex = 69 + Me.lblOrcWrite.Text = "OrcWrite" + ' + 'lblNameChanger + ' + Me.lblNameChanger.AutoSize = True + Me.lblNameChanger.BackColor = System.Drawing.Color.Transparent + Me.lblNameChanger.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblNameChanger.Location = New System.Drawing.Point(5, 294) + Me.lblNameChanger.Name = "lblNameChanger" + Me.lblNameChanger.Size = New System.Drawing.Size(120, 18) + Me.lblNameChanger.TabIndex = 68 + Me.lblNameChanger.Text = "Name Changer" + ' + 'lblLabyrinth + ' + Me.lblLabyrinth.AutoSize = True + Me.lblLabyrinth.BackColor = System.Drawing.Color.Transparent + Me.lblLabyrinth.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblLabyrinth.Location = New System.Drawing.Point(5, 276) + Me.lblLabyrinth.Name = "lblLabyrinth" + Me.lblLabyrinth.Size = New System.Drawing.Size(76, 18) + Me.lblLabyrinth.TabIndex = 67 + Me.lblLabyrinth.Text = "Labyrinth" + ' + 'lblKnowledgeInput + ' + Me.lblKnowledgeInput.AutoSize = True + Me.lblKnowledgeInput.BackColor = System.Drawing.Color.Transparent + Me.lblKnowledgeInput.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblKnowledgeInput.Location = New System.Drawing.Point(5, 258) + Me.lblKnowledgeInput.Name = "lblKnowledgeInput" + Me.lblKnowledgeInput.Size = New System.Drawing.Size(131, 18) + Me.lblKnowledgeInput.TabIndex = 66 + Me.lblKnowledgeInput.Text = "Knowledge Input" + ' + 'lblInstaller + ' + Me.lblInstaller.AutoSize = True + Me.lblInstaller.BackColor = System.Drawing.Color.Transparent + Me.lblInstaller.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblInstaller.Location = New System.Drawing.Point(5, 240) + Me.lblInstaller.Name = "lblInstaller" + Me.lblInstaller.Size = New System.Drawing.Size(67, 18) + Me.lblInstaller.TabIndex = 65 + Me.lblInstaller.Text = "Installer" + ' + 'lblSnakey + ' + Me.lblSnakey.AutoSize = True + Me.lblSnakey.BackColor = System.Drawing.Color.Transparent + Me.lblSnakey.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblSnakey.Location = New System.Drawing.Point(6, 402) + Me.lblSnakey.Name = "lblSnakey" + Me.lblSnakey.Size = New System.Drawing.Size(63, 18) + Me.lblSnakey.TabIndex = 64 + Me.lblSnakey.Text = "Snakey" + ' + 'lblFloodGateManager + ' + Me.lblFloodGateManager.AutoSize = True + Me.lblFloodGateManager.BackColor = System.Drawing.Color.Transparent + Me.lblFloodGateManager.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblFloodGateManager.Location = New System.Drawing.Point(5, 203) + Me.lblFloodGateManager.Name = "lblFloodGateManager" + Me.lblFloodGateManager.Size = New System.Drawing.Size(157, 18) + Me.lblFloodGateManager.TabIndex = 63 + Me.lblFloodGateManager.Text = "FloodGate Manager" + ' + 'lblFileSkimmer + ' + Me.lblFileSkimmer.AutoSize = True + Me.lblFileSkimmer.BackColor = System.Drawing.Color.Transparent + Me.lblFileSkimmer.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblFileSkimmer.Location = New System.Drawing.Point(5, 185) + Me.lblFileSkimmer.Name = "lblFileSkimmer" + Me.lblFileSkimmer.Size = New System.Drawing.Size(107, 18) + Me.lblFileSkimmer.TabIndex = 62 + Me.lblFileSkimmer.Text = "File Skimmer" + ' + 'lblDManager + ' + Me.lblDManager.AutoSize = True + Me.lblDManager.BackColor = System.Drawing.Color.Transparent + Me.lblDManager.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblDManager.Location = New System.Drawing.Point(5, 167) + Me.lblDManager.Name = "lblDManager" + Me.lblDManager.Size = New System.Drawing.Size(148, 18) + Me.lblDManager.TabIndex = 61 + Me.lblDManager.Text = "DownloadManager" + ' + 'lblDownloader + ' + Me.lblDownloader.AutoSize = True + Me.lblDownloader.BackColor = System.Drawing.Color.Transparent + Me.lblDownloader.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblDownloader.Location = New System.Drawing.Point(5, 149) + Me.lblDownloader.Name = "lblDownloader" + Me.lblDownloader.Size = New System.Drawing.Size(98, 18) + Me.lblDownloader.TabIndex = 60 + Me.lblDownloader.Text = "Downloader" + ' + 'lblDodge + ' + Me.lblDodge.AutoSize = True + Me.lblDodge.BackColor = System.Drawing.Color.Transparent + Me.lblDodge.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblDodge.Location = New System.Drawing.Point(5, 131) + Me.lblDodge.Name = "lblDodge" + Me.lblDodge.Size = New System.Drawing.Size(57, 18) + Me.lblDodge.TabIndex = 59 + Me.lblDodge.Text = "Dodge" + ' + 'lblClock + ' + Me.lblClock.AutoSize = True + Me.lblClock.BackColor = System.Drawing.Color.Transparent + Me.lblClock.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblClock.Location = New System.Drawing.Point(5, 113) + Me.lblClock.Name = "lblClock" + Me.lblClock.Size = New System.Drawing.Size(52, 18) + Me.lblClock.TabIndex = 58 + Me.lblClock.Text = "Clock" + ' + 'lblCatlyst + ' + Me.lblCatlyst.AutoSize = True + Me.lblCatlyst.BackColor = System.Drawing.Color.Transparent + Me.lblCatlyst.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblCatlyst.Location = New System.Drawing.Point(5, 95) + Me.lblCatlyst.Name = "lblCatlyst" + Me.lblCatlyst.Size = New System.Drawing.Size(60, 18) + Me.lblCatlyst.TabIndex = 57 + Me.lblCatlyst.Text = "Catlyst" + ' + 'lblCalc + ' + Me.lblCalc.AutoSize = True + Me.lblCalc.BackColor = System.Drawing.Color.Transparent + Me.lblCalc.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblCalc.Location = New System.Drawing.Point(5, 77) + Me.lblCalc.Name = "lblCalc" + Me.lblCalc.Size = New System.Drawing.Size(85, 18) + Me.lblCalc.TabIndex = 56 + Me.lblCalc.Text = "Calculator" + ' + 'lblBitNoteWallet + ' + Me.lblBitNoteWallet.AutoSize = True + Me.lblBitNoteWallet.BackColor = System.Drawing.Color.Transparent + Me.lblBitNoteWallet.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblBitNoteWallet.Location = New System.Drawing.Point(5, 60) + Me.lblBitNoteWallet.Name = "lblBitNoteWallet" + Me.lblBitNoteWallet.Size = New System.Drawing.Size(121, 18) + Me.lblBitNoteWallet.TabIndex = 55 + Me.lblBitNoteWallet.Text = "Bit Note Wallet" + ' + 'lblBitNoteDigger + ' + Me.lblBitNoteDigger.AutoSize = True + Me.lblBitNoteDigger.BackColor = System.Drawing.Color.Transparent + Me.lblBitNoteDigger.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblBitNoteDigger.Location = New System.Drawing.Point(5, 42) + Me.lblBitNoteDigger.Name = "lblBitNoteDigger" + Me.lblBitNoteDigger.Size = New System.Drawing.Size(123, 18) + Me.lblBitNoteDigger.TabIndex = 54 + Me.lblBitNoteDigger.Text = "Bit Note Digger" + ' + 'lblAudioPlayer + ' + Me.lblAudioPlayer.AutoSize = True + Me.lblAudioPlayer.BackColor = System.Drawing.Color.Transparent + Me.lblAudioPlayer.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblAudioPlayer.Location = New System.Drawing.Point(5, 24) + Me.lblAudioPlayer.Name = "lblAudioPlayer" + Me.lblAudioPlayer.Size = New System.Drawing.Size(102, 18) + Me.lblAudioPlayer.TabIndex = 53 + Me.lblAudioPlayer.Text = "Audio Player" + ' + 'lblArtpad + ' + Me.lblArtpad.AutoSize = True + Me.lblArtpad.BackColor = System.Drawing.Color.Transparent + Me.lblArtpad.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblArtpad.Location = New System.Drawing.Point(5, 6) + Me.lblArtpad.Name = "lblArtpad" + Me.lblArtpad.Size = New System.Drawing.Size(58, 18) + Me.lblArtpad.TabIndex = 52 + Me.lblArtpad.Text = "ArtPad" + ' + 'lblToTile + ' + Me.lblToTile.AutoSize = True + Me.lblToTile.BackColor = System.Drawing.Color.Transparent + Me.lblToTile.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblToTile.Location = New System.Drawing.Point(138, 78) + Me.lblToTile.Name = "lblToTile" + Me.lblToTile.Size = New System.Drawing.Size(44, 18) + Me.lblToTile.TabIndex = 52 + Me.lblToTile.Text = "Tiles" + ' + 'Udate + ' + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.BackColor = System.Drawing.Color.Transparent + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(15, 78) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(117, 18) + Me.Label4.TabIndex = 53 + Me.Label4.Text = "Make Tile For:" + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.BackColor = System.Drawing.Color.Transparent + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(51, 37) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(165, 18) + Me.Label5.TabIndex = 54 + Me.Label5.Text = "NOT FINAL DESIGN!" + ' + 'DockSettingsMenu + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(267, 709) + Me.Controls.Add(Me.Label5) + Me.Controls.Add(Me.Label4) + Me.Controls.Add(Me.lblToTile) + Me.Controls.Add(Me.pnlPrograms) + Me.Controls.Add(Me.Label3) + Me.Controls.Add(Me.btnQuitDock) + Me.Controls.Add(Me.btnQuitSet) + Me.Controls.Add(Me.btnSetBottom) + Me.Controls.Add(Me.btnSetTop) + Me.Controls.Add(Me.btnTake) + Me.Controls.Add(Me.btnPlus) + Me.Controls.Add(Me.Label2) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.btnAdd) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "DockSettingsMenu" + Me.Text = "template" + Me.TopMost = True + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlPrograms.ResumeLayout(False) + Me.pnlPrograms.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents tilecolor As System.Windows.Forms.ColorDialog + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents btnQuitDock As System.Windows.Forms.Button + Friend WithEvents btnQuitSet As System.Windows.Forms.Button + Friend WithEvents btnSetBottom As System.Windows.Forms.Button + Friend WithEvents btnSetTop As System.Windows.Forms.Button + Friend WithEvents btnTake As System.Windows.Forms.Button + Friend WithEvents btnPlus As System.Windows.Forms.Button + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents btnAdd As System.Windows.Forms.Button + Friend WithEvents pnlPrograms As System.Windows.Forms.Panel + Friend WithEvents lblSnakey As System.Windows.Forms.Label + Friend WithEvents lblFloodGateManager As System.Windows.Forms.Label + Friend WithEvents lblFileSkimmer As System.Windows.Forms.Label + Friend WithEvents lblDManager As System.Windows.Forms.Label + Friend WithEvents lblDownloader As System.Windows.Forms.Label + Friend WithEvents lblDodge As System.Windows.Forms.Label + Friend WithEvents lblClock As System.Windows.Forms.Label + Friend WithEvents lblCatlyst As System.Windows.Forms.Label + Friend WithEvents lblCalc As System.Windows.Forms.Label + Friend WithEvents lblBitNoteWallet As System.Windows.Forms.Label + Friend WithEvents lblBitNoteDigger As System.Windows.Forms.Label + Friend WithEvents lblAudioPlayer As System.Windows.Forms.Label + Friend WithEvents lblArtpad As System.Windows.Forms.Label + Friend WithEvents lblOrcWrite As System.Windows.Forms.Label + Friend WithEvents lblNameChanger As System.Windows.Forms.Label + Friend WithEvents lblLabyrinth As System.Windows.Forms.Label + Friend WithEvents lblKnowledgeInput As System.Windows.Forms.Label + Friend WithEvents lblInstaller As System.Windows.Forms.Label + Friend WithEvents lblShiftorium As System.Windows.Forms.Label + Friend WithEvents lblShifter As System.Windows.Forms.Label + Friend WithEvents lblPong As System.Windows.Forms.Label + Friend WithEvents lblIconManager As System.Windows.Forms.Label + Friend WithEvents lblWebBrowser As System.Windows.Forms.Label + Friend WithEvents lblVirusScanner As System.Windows.Forms.Label + Friend WithEvents lblVideoPlayer As System.Windows.Forms.Label + Friend WithEvents lblTextPad As System.Windows.Forms.Label + Friend WithEvents lblTerminal As System.Windows.Forms.Label + Friend WithEvents lblToTile As System.Windows.Forms.Label + Friend WithEvents Udate As System.Windows.Forms.Timer + Friend WithEvents lblShiftNet As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label +End Class diff --git a/ShiftOS/DockSettingsMenu.resx b/ShiftOS/DockSettingsMenu.resx new file mode 100644 index 0000000..f4ddaa8 --- /dev/null +++ b/ShiftOS/DockSettingsMenu.resx @@ -0,0 +1,135 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 1056, 18 + + + 1140, 18 + + + 1253, 18 + + + 1347, 18 + + + 17, 57 + + \ No newline at end of file diff --git a/ShiftOS/DockSettingsMenu.vb b/ShiftOS/DockSettingsMenu.vb new file mode 100644 index 0000000..b3925b2 --- /dev/null +++ b/ShiftOS/DockSettingsMenu.vb @@ -0,0 +1,608 @@ +Public Class DockSettingsMenu +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 100 'replace with minimum size + Public minimumsizeheight As Integer = 654 + + Private Sub DockSettingsMenu_Click(sender As Object, e As EventArgs) Handles Me.Click + pnlPrograms.Hide() + End Sub 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Udate.Start() + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + Me.Height = 700 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.dodgename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + + Dim totile As String + + Private Sub lblArtpad_Click(sender As Object, e As EventArgs) Handles lblArtpad.Click + pnlPrograms.Hide() + totile = lblArtpad.Text + End Sub + + Private Sub lblAudioPlayer_Click(sender As Object, e As EventArgs) Handles lblAudioPlayer.Click + pnlPrograms.Hide() + totile = lblAudioPlayer.Text + End Sub + + Private Sub lblBitNoteDigger_Click(sender As Object, e As EventArgs) Handles lblBitNoteDigger.Click + pnlPrograms.Hide() + totile = lblBitNoteDigger.Text + End Sub + + Private Sub lblBitNoteWallet_Click(sender As Object, e As EventArgs) Handles lblBitNoteWallet.Click + pnlPrograms.Hide() + totile = lblBitNoteWallet.Text + End Sub + + Private Sub lblCalc_Click(sender As Object, e As EventArgs) Handles lblCalc.Click + pnlPrograms.Hide() + totile = lblCalc.Text + End Sub + + Private Sub lblCatlyst_Click(sender As Object, e As EventArgs) Handles lblCatlyst.Click + pnlPrograms.Hide() + totile = lblCatlyst.Text + End Sub + + Private Sub lblClock_Click(sender As Object, e As EventArgs) Handles lblClock.Click + pnlPrograms.Hide() + totile = lblClock.Text + End Sub + + Private Sub lblDodge_Click(sender As Object, e As EventArgs) Handles lblDodge.Click + pnlPrograms.Hide() + totile = lblDodge.Text + End Sub + + Private Sub lblDownloader_Click(sender As Object, e As EventArgs) Handles lblDownloader.Click + pnlPrograms.Hide() + totile = lblDownloader.Text + End Sub + + Private Sub lblDManager_Click(sender As Object, e As EventArgs) Handles lblDManager.Click + pnlPrograms.Hide() + totile = lblDManager.Text + End Sub + + Private Sub lblFileSkimmer_Click(sender As Object, e As EventArgs) Handles lblFileSkimmer.Click + pnlPrograms.Hide() + totile = lblFileSkimmer.Text + End Sub + + Private Sub lblFloodGateManager_Click(sender As Object, e As EventArgs) Handles lblFloodGateManager.Click + pnlPrograms.Hide() + totile = lblFloodGateManager.Text + End Sub + + Private Sub lblIconManager_Click(sender As Object, e As EventArgs) Handles lblIconManager.Click + pnlPrograms.Hide() + totile = lblIconManager.Text + End Sub + + Private Sub lblInstaller_Click(sender As Object, e As EventArgs) Handles lblInstaller.Click + pnlPrograms.Hide() + totile = lblInstaller.Text + End Sub + + Private Sub lblKnowledgeInput_Click(sender As Object, e As EventArgs) Handles lblKnowledgeInput.Click + pnlPrograms.Hide() + totile = lblKnowledgeInput.Text + End Sub + + Private Sub lblLabyrinth_Click(sender As Object, e As EventArgs) Handles lblLabyrinth.Click + pnlPrograms.Hide() + totile = lblLabyrinth.Text + End Sub + + Private Sub lblNameChanger_Click(sender As Object, e As EventArgs) Handles lblNameChanger.Click + pnlPrograms.Hide() + totile = lblNameChanger.Text + End Sub + + Private Sub lblOrcWrite_Click(sender As Object, e As EventArgs) Handles lblOrcWrite.Click + pnlPrograms.Hide() + totile = lblOrcWrite.Text + End Sub + + Private Sub lblPong_Click(sender As Object, e As EventArgs) Handles lblPong.Click + pnlPrograms.Hide() + totile = lblPong.Text + End Sub + + Private Sub lblShifter_Click(sender As Object, e As EventArgs) Handles lblShifter.Click + pnlPrograms.Hide() + totile = lblShifter.Text + End Sub + + Private Sub lblShiftorium_Click(sender As Object, e As EventArgs) Handles lblShiftorium.Click + pnlPrograms.Hide() + totile = lblShiftorium.Text + End Sub + + Private Sub lblSnakey_Click(sender As Object, e As EventArgs) Handles lblSnakey.Click + pnlPrograms.Hide() + totile = lblSnakey.Text + End Sub + + Private Sub lblTerminal_Click(sender As Object, e As EventArgs) Handles lblTerminal.Click + pnlPrograms.Hide() + totile = lblTerminal.Text + End Sub + + Private Sub lblTextPad_Click(sender As Object, e As EventArgs) Handles lblTextPad.Click + pnlPrograms.Hide() + totile = lblTextPad.Text + End Sub + + Private Sub lblVideoPlayer_Click(sender As Object, e As EventArgs) Handles lblVideoPlayer.Click + pnlPrograms.Hide() + totile = lblVideoPlayer.Text + End Sub + + Private Sub lblVirusScanner_Click(sender As Object, e As EventArgs) Handles lblVirusScanner.Click + pnlPrograms.Hide() + totile = lblVirusScanner.Text + End Sub + + Private Sub lblWebBrowser_Click(sender As Object, e As EventArgs) Handles lblWebBrowser.Click + pnlPrograms.Hide() + totile = lblVirusScanner.Text + End Sub + + Private Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.Click + If Not totile = "" Then + pnlPrograms.Hide() + tilecolor.ShowDialog() + DockWindow.createtile(totile, tilecolor.Color.ToString.Replace("Color", "").Replace("[", "").Replace("]", "")) + DockWindow.loadevents.writeFile(totile, tilecolor.Color.ToString.Replace("Color", "").Replace("[", "").Replace("]", "")) + End If + End Sub + + Private Sub Udate_Tick(sender As Object, e As EventArgs) Handles Udate.Tick + lblToTile.Text = totile + End Sub + + Private Sub lblShiftNet_Click(sender As Object, e As EventArgs) Handles lblShiftNet.Click + pnlPrograms.Hide() + totile = lblShiftNet.Text + End Sub + + Private Sub Label3_Click(sender As Object, e As EventArgs) Handles Label3.Click + pnlPrograms.Show() + End Sub + + Private Sub btnPlus_Click_1(sender As Object, e As EventArgs) Handles btnPlus.Click + DockWindow.Top = DockWindow.Top + 5 + DockWindow.loadevents.writeConfFile(DockWindow.Top, DockWindow.docktopbot) + End Sub + + Private Sub btnSetTop_Click_1(sender As Object, e As EventArgs) Handles btnSetTop.Click + DockWindow.Top = -30 + DockWindow.picBoarder.Top = 31 + DockWindow.picBoarder.BringToFront() + DockWindow.loadevents.writeConfFile(DockWindow.Top, "Top") + DockWindow.docktopbot = "Top" + End Sub + + Private Sub btnTake_Click_1(sender As Object, e As EventArgs) Handles btnTake.Click + DockWindow.Top = DockWindow.Top - 5 + DockWindow.loadevents.writeConfFile(DockWindow.Top, DockWindow.docktopbot) + End Sub + + Private Sub btnSetBottom_Click_1(sender As Object, e As EventArgs) Handles btnSetBottom.Click + DockWindow.Top = DockWindow.screenHeight - DockWindow.Height - 42 + DockWindow.picBoarder.Top = 96 + DockWindow.picBoarder.BringToFront() + DockWindow.loadevents.writeConfFile(DockWindow.Top, "Bottom") + DockWindow.docktopbot = "Bottom" + End Sub + + Private Sub btnQuitSet_Click_1(sender As Object, e As EventArgs) Handles btnQuitSet.Click + Me.Close() + End Sub + + Private Sub btnQuitDock_Click_1(sender As Object, e As EventArgs) Handles btnQuitDock.Click + Me.Close() + DockWindow.Close() + End Sub +End Class diff --git a/ShiftOS/DockWindow.Designer.vb b/ShiftOS/DockWindow.Designer.vb new file mode 100644 index 0000000..38403f1 --- /dev/null +++ b/ShiftOS/DockWindow.Designer.vb @@ -0,0 +1,69 @@ + _ +Partial Class DockWindow + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.pnlTiles = New System.Windows.Forms.Panel() + Me.picBoarder = New System.Windows.Forms.PictureBox() + CType(Me.picBoarder, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pnlTiles + ' + Me.pnlTiles.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.pnlTiles.BackColor = System.Drawing.Color.Transparent + Me.pnlTiles.Location = New System.Drawing.Point(-1, 0) + Me.pnlTiles.Name = "pnlTiles" + Me.pnlTiles.Size = New System.Drawing.Size(125, 112) + Me.pnlTiles.TabIndex = 3 + ' + 'picBoarder + ' + Me.picBoarder.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.picBoarder.BackColor = System.Drawing.Color.Gray + Me.picBoarder.Location = New System.Drawing.Point(-1, 107) + Me.picBoarder.Name = "picBoarder" + Me.picBoarder.Size = New System.Drawing.Size(125, 21) + Me.picBoarder.TabIndex = 2 + Me.picBoarder.TabStop = False + ' + 'DockWindow + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(1, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(1, Byte), Integer)) + Me.ClientSize = New System.Drawing.Size(124, 149) + Me.Controls.Add(Me.pnlTiles) + Me.Controls.Add(Me.picBoarder) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "DockWindow" + Me.Text = "Dock" + Me.TransparencyKey = System.Drawing.Color.FromArgb(CType(CType(1, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(1, Byte), Integer)) + CType(Me.picBoarder, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pnlTiles As System.Windows.Forms.Panel + Friend WithEvents picBoarder As System.Windows.Forms.PictureBox +End Class diff --git a/ShiftOS/DockWindow.resx b/ShiftOS/DockWindow.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/DockWindow.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/ShiftOS/DockWindow.vb b/ShiftOS/DockWindow.vb new file mode 100644 index 0000000..666abfe --- /dev/null +++ b/ShiftOS/DockWindow.vb @@ -0,0 +1,302 @@ +Public Class DockWindow + + Public screenWidth As Integer = Screen.PrimaryScreen.Bounds.Width + Public screenHeight As Integer = Screen.PrimaryScreen.Bounds.Height + Dim toleft As Integer = 30 + Dim tileprogram(100) As String + Dim currenttile As String = 0 + Public loadevents As New DockEngine + Public docktopbot As String = "Bottom" + Public firststart As Boolean + + Public Sub colours() + 'Dim img As New Bitmap(picBackColor.Width, picBackColor.Height) + 'Dim brush As New Drawing.Drawing2D.LinearGradientBrush(New PointF(0, 0), New PointF(img.Width, img.Height), SystemColors.Window, SystemColors.ControlLight) + ' Dim gr As Graphics = Graphics.FromImage(img) + 'gr.FillRectangle(brush, New RectangleF(0, 0, img.Width, img.Height)) + 'picBackColor.BackgroundImage = img + End Sub + + Private Sub Dock_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Me.TopMost = True + Me.ShowInTaskbar = False + toleft = toleft + 40 + Dim tile As New PictureBox + tile.BackColor = Color.Silver + tile.Height = 40 + tile.Width = 40 + tile.Top = 54 + tile.Left = toleft + 'tile.Image = My.Resources.settings + tile.SizeMode = PictureBoxSizeMode.Zoom + tile.Name = currenttile + toleft = toleft + 45 + tile.BringToFront() + 'picBackColor.SendToBack() + tile.SizeMode = PictureBoxSizeMode.CenterImage + Me.Width = Me.Width + tile.Width + 5 + Me.Left = (My.Computer.Screen.WorkingArea.Width \ 2) - (Me.Width \ 2) + pnlTiles.Controls.Add(tile) + currenttile = currenttile + 1 + AddHandler tile.Click, AddressOf tilesets_click + AddHandler tile.MouseHover, AddressOf tile_hover + AddHandler tile.MouseLeave, AddressOf tile_leave + colours() + loadevents.readFile(Application.StartupPath + "\SoftwareData\ShiftDock\tiles.dat") + loadevents.readConfFile(Application.StartupPath + "\SoftwareData\ShiftDock\conf.dat") + loadevents.writeConfFile(Me.Top, docktopbot) + Me.Top = loadevents.docktop + docktopbot = loadevents.topbottom + If firststart = True Then + docktopbot = "Bottom" + Me.Top = screenHeight - Me.Height + 25 + End If + If docktopbot = "Bottom" Then + 'Me.Top = screenHeight - Me.Height - 42 + Me.picBoarder.Top = 96 + Me.picBoarder.BringToFront() + loadevents.writeConfFile(Me.Top, "Bottom") + Else + Me.picBoarder.Top = 31 + Me.picBoarder.BringToFront() + loadevents.writeConfFile(Me.Top, "Top") + End If + Me.TopMost = True + 'tmr_faid.Start() + End Sub + + Public Sub createtile(ByVal openPath As String, backcolor As String) + Dim tile As New PictureBox + If backcolor.Contains("A=") Then + Dim newcolor() As String + newcolor = backcolor.Split(",") + tile.BackColor = Color.FromArgb(newcolor(0).Replace("A=", "").Replace(" ", ""), newcolor(1).Replace("R=", "").Replace(" ", ""), newcolor(2).Replace("G=", "").Replace(" ", ""), newcolor(3).Replace("B=", "").Replace(" ", "")) + Else + Try + tile.BackColor = Color.FromName(backcolor.Replace(" ", "")) + Catch + Try + tile.BackColor = Color.FromKnownColor(backcolor) + Catch + tile.BackColor = Color.Red + End Try + End Try + End If + tile.Height = 40 + tile.Width = 40 + tile.Top = 54 + tile.Left = toleft + If openPath = "ArtPad" Then + tile.Image = ShiftOSDesktop.artpadiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Audio Player" Then + tile.Image = ShiftOSDesktop.audioplayericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Bit Note Digger" Then + tile.Image = ShiftOSDesktop.bitnotediggericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Bit Note Wallet" Then + tile.Image = ShiftOSDesktop.bitnotewalleticonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Calculator" Then + tile.Image = ShiftOSDesktop.calculatoriconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Catlyst" Then + tile.Image = ShiftOSDesktop.calculatoriconlauncher 'needs new icon + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Clock" Then + tile.Image = ShiftOSDesktop.clockiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Dodge" Then + tile.Image = ShiftOSDesktop.dodgeiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Downloader" Then + tile.Image = ShiftOSDesktop.downloadericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Downloader Manager" Then + tile.Image = ShiftOSDesktop.downloadmanagericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "File Skimmer" Then + tile.Image = ShiftOSDesktop.fileskimmericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "FloodGate Manager" Then + tile.Image = ShiftOSDesktop.floodgateiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Icon Manager" Then + tile.Image = ShiftOSDesktop.iconmanagericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Installer" Then + tile.Image = ShiftOSDesktop.installericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Knowledge Input" Then + tile.Image = ShiftOSDesktop.knowledgeinputiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Labyrinth" Then + tile.Image = ShiftOSDesktop.calculatoriconlauncher 'needs new icon + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Name Changer" Then + tile.Image = ShiftOSDesktop.namechangericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "OrcWrite" Then + tile.Image = ShiftOSDesktop.orcwriteiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Pong" Then + tile.Image = ShiftOSDesktop.pongiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Shifter" Then + tile.Image = ShiftOSDesktop.shiftericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Shiftorium" Then + tile.Image = ShiftOSDesktop.shiftoriumiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Snakey" Then + tile.Image = ShiftOSDesktop.snakeyiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Terminal" Then + tile.Image = ShiftOSDesktop.terminaliconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "TextPad" Then + tile.Image = ShiftOSDesktop.textpadiconlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "Video Player" Then + tile.Image = ShiftOSDesktop.videoplayericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "VirusScanner" Then + tile.Image = ShiftOSDesktop.virusscannericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "WebBrowser" Then + tile.Image = ShiftOSDesktop.webbrowsericonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + ElseIf openPath = "ShiftNet" Then + tile.Image = ShiftOSDesktop.shiftneticonlauncher + tile.SizeMode = PictureBoxSizeMode.StretchImage + End If + tile.Name = currenttile + tileprogram(currenttile) = openPath + toleft = toleft + 45 + tile.BringToFront() + 'picBackColor.SendToBack() + tile.SizeMode = PictureBoxSizeMode.CenterImage + Me.Width = Me.Width + tile.Width + 5 + Me.Left = (My.Computer.Screen.WorkingArea.Width \ 2) - (Me.Width \ 2) + pnlTiles.Controls.Add(tile) + currenttile = currenttile + 1 + AddHandler tile.Click, AddressOf tile_click + AddHandler tile.MouseHover, AddressOf tile_hover + AddHandler tile.MouseLeave, AddressOf tile_leave + End Sub + + 'Private Sub btnAddIcon_Click(sender As Object, e As EventArgs) Handles btnAddIcon.Click + ' createtile(txtURL.Text) + 'colours() + ' End Sub + + Private Sub tile_click(sender As Object, e As EventArgs) + Dim tle As PictureBox = DirectCast(sender, PictureBox) + Dim open As String = tle.Name + If tileprogram(open) = "ArtPad" Then + ArtPad.Show() + ElseIf tileprogram(open) = "Audio Player" Then + Audio_Player.Show() + ElseIf tileprogram(open) = "Bit Note Digger" Then + Bitnote_Digger.Show() + ElseIf tileprogram(open) = "Bit Note Wallet" Then + Bitnote_Wallet.Show() + ElseIf tileprogram(open) = "Calculator" Then + Calculator.Show() + ElseIf tileprogram(open) = "Catlyst" Then + Catalyst_Main.Show() + ElseIf tileprogram(open) = "Clock" Then + Clock.Show() + ElseIf tileprogram(open) = "Dodge" Then + Dodge.Show() + ElseIf tileprogram(open) = "Downloader" Then + Downloader.Show() + ElseIf tileprogram(open) = "Downloader Manager" Then + Downloadmanager.Show() + ElseIf tileprogram(open) = "File Skimmer" Then + File_Skimmer.Show() + ElseIf tileprogram(open) = "FloodGate Manager" Then + FloodGate_Manager.Show() + ElseIf tileprogram(open) = "Icon Manager" Then + Icon_Manager.Show() + ElseIf tileprogram(open) = "Installer" Then + Installer.Show() + ElseIf tileprogram(open) = "Knowledge Input" Then + Knowledge_Input.Show() + ElseIf tileprogram(open) = "Labyrinth" Then + Labyrinth.Show() + ElseIf tileprogram(open) = "Name Changer" Then + Name_Changer.Show() + ElseIf tileprogram(open) = "OrcWrite" Then + OrcWrite.Show() + ElseIf tileprogram(open) = "Pong" Then + Pong.Show() + ElseIf tileprogram(open) = "Shifter" Then + Shifter.Show() + ElseIf tileprogram(open) = "Shiftorium" Then + Shiftorium.Show() + ElseIf tileprogram(open) = "Snakey" Then + Snakey.Show() + ElseIf tileprogram(open) = "Terminal" Then + Terminal.Show() + ElseIf tileprogram(open) = "TextPad" Then + TextPad.Show() + ElseIf tileprogram(open) = "Video Pad" Then + Video_Player.Show() + ElseIf tileprogram(open) = "VirusScanner" Then + VirusScanner.Show() + ElseIf tileprogram(open) = "WebBrowser" Then + Web_Browser.Show() + ElseIf tileprogram(open) = "ShiftNet" Then + Shiftnet.Show() + End If + End Sub + + Dim dtop As Integer + + Private Sub tile_hover(sender As Object, e As EventArgs) + Dim tle As PictureBox = DirectCast(sender, PictureBox) + If docktopbot = "Bottom" Then + Dim open As String = tle.Name + tle.Top = tle.Top - 10 + Try + 'lblApp.Text = open + Catch + 'lblApp.Text = "Error" + End Try + End If + If docktopbot = "Top" Then + dtop = tle.Top + Dim open As String = tle.Name + tle.Top = tle.Top + 10 + Try + 'lblApp.Text = open + Catch + 'lblApp.Text = "Error" + End Try + End If + + End Sub + + Private Sub tile_leave(sender As Object, e As EventArgs) + Dim tle As PictureBox = DirectCast(sender, PictureBox) + If docktopbot = "Bottom" Then + tle.Top = tle.Top + 10 + If tle.Top > 54 Then + tle.Top = 54 + End If + End If + If docktopbot = "Top" Then + tle.Top = tle.Top - 10 + If tle.Top < dtop Then + tle.Top = dtop + End If + End If + End Sub + + Private Sub tilesets_click(sender As Object, e As EventArgs) + DockSettingsMenu.Show() + End Sub + +End Class \ No newline at end of file diff --git a/ShiftOS/Dodge.Designer.vb b/ShiftOS/Dodge.Designer.vb new file mode 100644 index 0000000..e3fdf90 --- /dev/null +++ b/ShiftOS/Dodge.Designer.vb @@ -0,0 +1,385 @@ + _ +Partial Class Dodge + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Dodge)) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.player = New System.Windows.Forms.PictureBox() + Me.QuitButton = New System.Windows.Forms.PictureBox() + Me.BeginButton = New System.Windows.Forms.PictureBox() + Me.DescriptionLabel = New System.Windows.Forms.Label() + Me.object_small2 = New System.Windows.Forms.PictureBox() + Me.object_mid2 = New System.Windows.Forms.PictureBox() + Me.object_large = New System.Windows.Forms.PictureBox() + Me.object_small = New System.Windows.Forms.PictureBox() + Me.object_mid = New System.Windows.Forms.PictureBox() + Me.scorelabel = New System.Windows.Forms.Label() + Me.PicBonus = New System.Windows.Forms.PictureBox() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.clock = New System.Windows.Forms.Timer(Me.components) + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + CType(Me.player, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.QuitButton, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.BeginButton, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.object_small2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.object_mid2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.object_large, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.object_small, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.object_mid, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.PicBonus, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 565) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(593, 2) + Me.pgbottom.TabIndex = 23 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 535) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(595, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 537) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(57, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Dodge" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(595, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 535) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.player) + Me.pgcontents.Controls.Add(Me.QuitButton) + Me.pgcontents.Controls.Add(Me.BeginButton) + Me.pgcontents.Controls.Add(Me.DescriptionLabel) + Me.pgcontents.Controls.Add(Me.object_small2) + Me.pgcontents.Controls.Add(Me.object_mid2) + Me.pgcontents.Controls.Add(Me.object_large) + Me.pgcontents.Controls.Add(Me.object_small) + Me.pgcontents.Controls.Add(Me.object_mid) + Me.pgcontents.Controls.Add(Me.scorelabel) + Me.pgcontents.Controls.Add(Me.PicBonus) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(593, 535) + Me.pgcontents.TabIndex = 20 + ' + 'player + ' + Me.player.BackColor = System.Drawing.Color.Transparent + Me.player.Image = CType(resources.GetObject("player.Image"), System.Drawing.Image) + Me.player.Location = New System.Drawing.Point(192, 445) + Me.player.Name = "player" + Me.player.Size = New System.Drawing.Size(32, 32) + Me.player.TabIndex = 18 + Me.player.TabStop = False + ' + 'QuitButton + ' + Me.QuitButton.Image = CType(resources.GetObject("QuitButton.Image"), System.Drawing.Image) + Me.QuitButton.Location = New System.Drawing.Point(216, 424) + Me.QuitButton.Name = "QuitButton" + Me.QuitButton.Size = New System.Drawing.Size(200, 50) + Me.QuitButton.TabIndex = 12 + Me.QuitButton.TabStop = False + ' + 'BeginButton + ' + Me.BeginButton.Image = CType(resources.GetObject("BeginButton.Image"), System.Drawing.Image) + Me.BeginButton.Location = New System.Drawing.Point(3, 424) + Me.BeginButton.Name = "BeginButton" + Me.BeginButton.Size = New System.Drawing.Size(200, 50) + Me.BeginButton.TabIndex = 11 + Me.BeginButton.TabStop = False + ' + 'DescriptionLabel + ' + Me.DescriptionLabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.DescriptionLabel.Location = New System.Drawing.Point(3, 3) + Me.DescriptionLabel.Name = "DescriptionLabel" + Me.DescriptionLabel.Size = New System.Drawing.Size(413, 409) + Me.DescriptionLabel.TabIndex = 10 + Me.DescriptionLabel.Text = "Placeholder" + ' + 'object_small2 + ' + Me.object_small2.Image = CType(resources.GetObject("object_small2.Image"), System.Drawing.Image) + Me.object_small2.Location = New System.Drawing.Point(75, 43) + Me.object_small2.Name = "object_small2" + Me.object_small2.Size = New System.Drawing.Size(75, 20) + Me.object_small2.TabIndex = 17 + Me.object_small2.TabStop = False + ' + 'object_mid2 + ' + Me.object_mid2.Image = CType(resources.GetObject("object_mid2.Image"), System.Drawing.Image) + Me.object_mid2.Location = New System.Drawing.Point(279, 134) + Me.object_mid2.Name = "object_mid2" + Me.object_mid2.Size = New System.Drawing.Size(125, 20) + Me.object_mid2.TabIndex = 16 + Me.object_mid2.TabStop = False + ' + 'object_large + ' + Me.object_large.Image = CType(resources.GetObject("object_large.Image"), System.Drawing.Image) + Me.object_large.Location = New System.Drawing.Point(49, 208) + Me.object_large.Name = "object_large" + Me.object_large.Size = New System.Drawing.Size(175, 20) + Me.object_large.TabIndex = 15 + Me.object_large.TabStop = False + ' + 'object_small + ' + Me.object_small.Image = CType(resources.GetObject("object_small.Image"), System.Drawing.Image) + Me.object_small.Location = New System.Drawing.Point(290, 294) + Me.object_small.Name = "object_small" + Me.object_small.Size = New System.Drawing.Size(75, 20) + Me.object_small.TabIndex = 13 + Me.object_small.TabStop = False + ' + 'object_mid + ' + Me.object_mid.Image = CType(resources.GetObject("object_mid.Image"), System.Drawing.Image) + Me.object_mid.Location = New System.Drawing.Point(58, 371) + Me.object_mid.Name = "object_mid" + Me.object_mid.Size = New System.Drawing.Size(125, 20) + Me.object_mid.TabIndex = 14 + Me.object_mid.TabStop = False + ' + 'scorelabel + ' + Me.scorelabel.AutoSize = True + Me.scorelabel.BackColor = System.Drawing.Color.Transparent + Me.scorelabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 36.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.scorelabel.Location = New System.Drawing.Point(3, 4) + Me.scorelabel.Name = "scorelabel" + Me.scorelabel.Size = New System.Drawing.Size(51, 55) + Me.scorelabel.TabIndex = 19 + Me.scorelabel.Text = "0" + ' + 'PicBonus + ' + Me.PicBonus.Image = CType(resources.GetObject("PicBonus.Image"), System.Drawing.Image) + Me.PicBonus.Location = New System.Drawing.Point(187, 84) + Me.PicBonus.Name = "PicBonus" + Me.PicBonus.Size = New System.Drawing.Size(16, 11) + Me.PicBonus.TabIndex = 20 + Me.PicBonus.TabStop = False + Me.PicBonus.Visible = False + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 537) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(597, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'clock + ' + Me.clock.Interval = 20 + ' + 'Dodge + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(597, 567) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MaximizeBox = False + Me.Name = "Dodge" + Me.Text = "Dodge" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + CType(Me.player, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.QuitButton, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.BeginButton, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.object_small2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.object_mid2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.object_large, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.object_small, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.object_mid, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.PicBonus, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents player As System.Windows.Forms.PictureBox + Friend WithEvents QuitButton As System.Windows.Forms.PictureBox + Friend WithEvents BeginButton As System.Windows.Forms.PictureBox + Friend WithEvents DescriptionLabel As System.Windows.Forms.Label + Friend WithEvents object_small2 As System.Windows.Forms.PictureBox + Friend WithEvents object_mid2 As System.Windows.Forms.PictureBox + Friend WithEvents object_large As System.Windows.Forms.PictureBox + Friend WithEvents object_small As System.Windows.Forms.PictureBox + Friend WithEvents object_mid As System.Windows.Forms.PictureBox + Friend WithEvents scorelabel As System.Windows.Forms.Label + Friend WithEvents clock As System.Windows.Forms.Timer + Friend WithEvents PicBonus As System.Windows.Forms.PictureBox +End Class diff --git a/ShiftOS/Dodge.resx b/ShiftOS/Dodge.resx new file mode 100644 index 0000000..3530811 --- /dev/null +++ b/ShiftOS/Dodge.resx @@ -0,0 +1,208 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAIAAAD8GO2jAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAANlJREFUSEvVjtsOwyAMQ/v/P90hnKW5ADFSq27nYUscY/c4H2aj4OjIQkM9sNF2 + Zqitwzi+o/BpkE3ETHawBZmbCxbDmtpkE+2MoYT7Ch+tM8OOdTMa/EaBjbYzQ2G1cbN5jTOFN2UE478k + nNuvAn2NWDtYoStuz+cths8vST9Bgb5AfF+g4KS4PZyzO8D4VxG7BUPeLigR65ypg3ncKG17BVn8qwIo + Qb+twK6zecgbBe0NkL1j1zAD2RPxMLRmkVGAU6cmLm4syn/n8YJGM2Xk5pGbQQ6W8/wAaLdSOxZqwToA + AAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAAMgAAAAyCAIAAACWMwO2AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAh5JREFUeF7tltt1g0AMBV2XC3I9qcbNuBgnzrk/0r4gh5tEeObvGrEgdiy4PAEM + XABcyDGAg0AssIBYYAGxwAJigQXEAguIBRYQCywgFlhALLCAWGABscACYoGFM4n1+LiqncjtroI+4bTr + x0M/t8wK7zf9/kIXHN3PmNnVi6GOlKoStnXEyK9w8iFi6dimu4os/gOFUENKBdk1Frra2MRiYtUVqxkK + 6S/f7m07E2xiddh8rfKoR6ViJK0G75EsVy5DLAfqUakUUZjNRvzUCcTahXpUqkTYo9VXbyyOO4pYDtSj + UiG2z6sXaWYFDRHLgXpUqsM+r9KOxnrEcqAeleqwV6zJyEIsB+pRqQ5hh1ZfWF8g1i+jHpXqgFj/HPWo + VIco1nqLolihHrEcqEelOkxE6TIREbEcqEelQkRTVu/CmYfx2GQlxNqBelQqRNRhYda0eLNYwYpUh1gJ + 9ahUiR1mhe1s9zMeHi40lQKxEupRqRZRiOE+pbKOOOuK7PFcTsSqLVYeWl+kvWoL+vOoqYvrNIfbVRAr + oR6V6pGGzYrhe27HQl0fECuhHpVqsk+u8Xa2861lZCZiJdSjUmn6fr1M6BwZj67BOgsLwkkb5+LkHuqj + HpXOS8+WU0+Mv0bPWOnUbP2ShyPQI1Y6PVEuxPKhR6z0JkgvXoVGvrV6N7HAD2KBBcQCC4gFFhALLCAW + WEAssCCxAI5HjgEcyPP5CT/xA4PFRMqaAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAAMgAAAAyCAIAAACWMwO2AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAnVJREFUeF7t2c1t60AMRWHXpYJcj6txMykmkeFZDCkOxVF0DQs4Z/UCzY+e+CGb + 3IhU/RKdGrBIErBIErBIErBIErBIErBIErBIErBIErBIErBIErBIErBIErBIErBI0nVg/TyW9rKD7s+2 + ctvz3takJQe8Gh2yPH7aCpNZ7o7e/F+GV/en7Lzfd9Xeuf30xe26akVfv7h3IKTI0u82u+zD6H0KPIGl + qAorGlFxbzC4+q1r9uJJWAM3wFJnhuHs+F8pfgJ2kOX5BPPfoh1OfhpW+GLAUpfBWrO23AgOwfJat3f2 + vVbbFUVYy9L9e3sFsNTtwErtHIBlt+yoCivCuj9TO8BS91lYRsURVhOwzEp/FbDU5bByOtOwrKtjA63D + su9nbwOWugzWnoNZWHb9RnGtIqz3k36xWQssdXbYw8KPX9g7nObheU7Bsq/Y3QgsdUVY4eev7O222eXW + RHaWvXkO1ogQsNSVYb1yIyjs7SefwjJebHblLKwZbheovXP76Ysz03bDDsZthmCl7M8nMeHOMtmV07BC + RcBSl8NacxPvl/wLVro+0XMAltn0fgAsdbuwEg+zsJzRZMPZsMyj173AUvdJWHVZp8My+9Z7gaXuo7D8 + WcM9iZ7kUQqrf7o8HsAStwvL6jFTOADLHxdeqYHVb+3/RA0sSTksz8AO4Qis4MztvQbPebCiq9eApSj+ + 1nF+WMW928HNXHomLE/2HbAUlWccfP7i3okZR7nt/4MVvTOwJO3qGI1orWYjH9zw/opHe3R/VHKpe+tL + uboQLLpUwCJJwCJJwCJJwCJJwCJJwCJJwCJJwCJJwCJJwCJJDRbRyd1uf3/6zkvyT2tRAAAAAElFTkSu + QmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAAEsAAAAUCAIAAABK9FefAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAC9JREFUWEftzwEBAAAIwjD6l9Ych6/BMuF6OeRzyOeQzyGfQz6HfA75HPLNDJsl + D4jAV3xQnIczAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAAH0AAAAUCAIAAAAvGaXgAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAEJJREFUWEft0DEBADAMwKD6N7091dA8IIEh87jlveG94b3hveG94b3hveG94b3h + veG94b3hveG94b3hveG9se9cm/mqBdmGSM9R1gAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAAK8AAAAUCAIAAAB0/fqUAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAEFJREFUaEPt0gEJACAQALHvX/pFEA47bBk28FnYtYHYQGwgNhAbiA3EBmIDsYHY + QGwgNhAbiA3EBmIDsYG8DXDNHAnVW5/1c3lZAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAAEsAAAAUCAIAAABK9FefAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAC9JREFUWEftzwEBAAAIwjD6l9Ych6/BMuF6OeRzyOeQzyGfQz6HfA75HPLNDJsl + D4jAV3xQnIczAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAAH0AAAAUCAIAAAAvGaXgAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAEJJREFUWEft0DEBADAMwKD6N7091dA8IIEh87jlveG94b3hveG94b3hveG94b3h + veG94b3hveG94b3hveG9se9cm/mqBdmGSM9R1gAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAALCAIAAAD5gJpuAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAE1JREFUKFOtjUEOACEIA3k6P2dJSroVuWicA2lksHaDu3MmEcEJmrCQXqMWSjtV + T/PckKik+WdsIPX6vmHPcwMMpRYKTvkBJFWbcILZB/dcg5IyZV67AAAAAElFTkSuQmCC + + + + 17, 17 + + \ No newline at end of file diff --git a/ShiftOS/Dodge.vb b/ShiftOS/Dodge.vb new file mode 100644 index 0000000..a04b2aa --- /dev/null +++ b/ShiftOS/Dodge.vb @@ -0,0 +1,548 @@ +Public Class Dodge + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 453 'replace with minimum size + Public minimumsizeheight As Integer = 522 'replace with minimum size + + Dim speed As Decimal 'the speed the game runs at + Dim score As Integer 'the score/code points the player gets + Dim usingkeys As Boolean = False 'user can use mouse or keyboard, mouse by default, chnages to true if key pressed + Dim time As Decimal = 0 'Records the time spent playing, used for codepoints formula + Dim bonusesfound As Integer 'Number or bonus play collects + Dim keyboardinput As Integer = 0 'for smooth keyboard gameplay, 1=left, 2=right, 0=none + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.DodgeCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'modfiy to proper name + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + 'End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.dodgename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup + + Private Sub QuitButton_Click(sender As Object, e As EventArgs) Handles QuitButton.Click 'When quit clicked + Me.Close() 'quits the game (In case user donsn't have close button) + End Sub + + Private Sub Form1_KeyUp(sender As Object, e As KeyEventArgs) Handles Me.KeyUp + keyboardinput = 0 + End Sub + + Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load + player.Visible = False ' hide player and score until game starts + scorelabel.Visible = False + DescriptionLabel.Text = "Welcome to Dodge. Dodge is a simple arcade game with one objective: survive the falling objects! Use the arrow or mouse to move the player and avoid as many objects as you can. The longer you survive, the more code point you will be rewarded with. Beware, it gets harder..." ' set the description text + + 'to impliment skinning, simply set the picturebox to the new skinned image. + 'For example: + 'player.Image = Image.FromFile("PATH TO SKINNED IMAGE") + End Sub + + Private Sub BeginButton_Click(sender As Object, e As EventArgs) Handles BeginButton.Click 'When begin click + + 'Hide buttons + BeginButton.Visible = False + QuitButton.Visible = False + DescriptionLabel.Visible = False + + player.Visible = True ' show the player + speed = 2 ' controls speed of game, will increase as game progresses + scorelabel.Visible = True ' show score label + bonusesfound = 0 + + 'Make sure all objects are in the correct position + object_small.Location = New Point((Math.Ceiling(Rnd() * 453)), 300) + object_small2.Location = New Point((Math.Ceiling(Rnd() * 453)), 49) + object_mid.Location = New Point((Math.Ceiling(Rnd() * 453)), 377) + object_mid2.Location = New Point((Math.Ceiling(Rnd() * 453)), 140) + object_large.Location = New Point((Math.Ceiling(Rnd() * 453)), 214) + PicBonus.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) + + 'Reset time + time = 0 + + usingkeys = False + + System.Threading.Thread.Sleep(100) ' slight delay before game starts (in milliseconds) + + main() ' start the main game sub + + 'sig() 'infobox sigs - COMMENT THIS OUT + End Sub + + Public Sub Form1_keydown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown + Select Case e.KeyCode + Case Keys.Right ' detect right key press + usingkeys = True ' turn off mouse control + keyboardinput = 2 + Case Keys.Left + usingkeys = True + keyboardinput = 1 + End Select + + End Sub + + Private Sub main() + clock.Start() 'the timer restart this sub every tick, making an endless loop between them. + + 'score system + scorelabel.Text = score + score = (speed / 10) + (time / 20) + bonusesfound + + 'Speed increase + speed = speed + (speed * 0.001) + + 'increase time + time = time + 0.05 'loops every 0.05 seconds so time increases by 1 every second (have I done the maths correctly?) + + 'Make objects fall + object_large.Location = New Point(object_large.Location.X, object_large.Location.Y + speed) + object_mid.Location = New Point(object_mid.Location.X, object_mid.Location.Y + speed) + object_mid2.Location = New Point(object_mid2.Location.X, object_mid2.Location.Y + speed) + object_small.Location = New Point(object_small.Location.X, object_small.Location.Y + speed) + object_small2.Location = New Point(object_small2.Location.X, object_small2.Location.Y + speed) + + 'mouse controls + If usingkeys = False Then ' tests if mouse control is enabled + player.Location = New Point(MousePosition.X - Me.Location.X - (player.Size.Width / 2) - 5, player.Location.Y) 'sets the x location to that of the mouse + End If + + 'keyboard controls + If usingkeys = True Then + If keyboardinput = 1 Then + player.Location = New Point(player.Location.X - (speed * 4), player.Location.Y) + End If + If keyboardinput = 2 Then + player.Location = New Point(player.Location.X + (speed * 4), player.Location.Y) ' move right + End If + End If + + 'move object back to the top of the screen + If object_small.Location.Y > 522 Then + object_small.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) 'picks a random number between 0 and 453 (window width) and sets the x position to this value. uses -20 for y as it is above the top of window + End If + If object_small2.Location.Y > 522 Then + object_small2.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) + End If + If object_mid.Location.Y > 522 Then + object_mid.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) + End If + If object_mid2.Location.Y > 522 Then + object_mid2.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) + End If + If object_large.Location.Y > 522 Then + object_large.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) + End If + + 'Makes sure the player is on the screen (Anti-cheating) + If player.Location.X > 375 Then + player.Location = New Point(385, player.Location.Y) + End If + If player.Location.X < 0 Then + player.Location = New Point(0, player.Location.Y) + End If + + 'Bonus + If PicBonus.Visible = False Then + Dim ran As Integer = Math.Ceiling(Rnd() * 300) 'random 1 in 500 chance + If ran = 1 Then + PicBonus.Visible = True + End If + Else + PicBonus.Location = New Point(PicBonus.Location.X, PicBonus.Location.Y + speed) + If PicBonus.Location.Y > 522 Then + PicBonus.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) + PicBonus.Visible = False + End If + End If + + 'check collisions + If player.Bounds.IntersectsWith(object_mid.Bounds) Or player.Bounds.IntersectsWith(object_mid2.Bounds) Or player.Bounds.IntersectsWith(object_large.Bounds) Or player.Bounds.IntersectsWith(object_small.Bounds) Or player.Bounds.IntersectsWith(object_small2.Bounds) Then + clock.Stop() 'breaks loop + System.Threading.Thread.Sleep(333) 'delay for a third of a second + player.Visible = False 'hide game + DescriptionLabel.Text = "Sorry, you just lost the game, however, you earnt a total of " & score & " code points. To earn more code points, press the begin button now. To exit, press the quit button" ' change the description to the die message + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + score + DescriptionLabel.Visible = True 'show non-game elements + BeginButton.Visible = True + QuitButton.Visible = True + scorelabel.Visible = False + End If + If player.Bounds.IntersectsWith(PicBonus.Bounds) Then + PicBonus.Visible = False + bonusesfound = bonusesfound + 1 + PicBonus.Location = New Point((Math.Ceiling(Rnd() * 453)), -20) + End If + + End Sub + + Private Sub clock_Tick(sender As Object, e As EventArgs) Handles clock.Tick + main() 'repeat the main sub (endless loop) + End Sub + + Private Sub sig() + infobox.title = "FLAG" + infobox.textinfo = "There is no foul on the play, the punt was blocked." + infobox.Show() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Downloader.Designer.vb b/ShiftOS/Downloader.Designer.vb new file mode 100644 index 0000000..ae8db03 --- /dev/null +++ b/ShiftOS/Downloader.Designer.vb @@ -0,0 +1,237 @@ + _ +Partial Class Downloader + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 170) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(479, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 140) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(481, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 142) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(133, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Downloader" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(481, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 140) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(479, 140) + Me.pgcontents.TabIndex = 20 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 142) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(483, 30) + Me.titlebar.TabIndex = 19 + ' + 'Downloader + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(483, 172) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Downloader" + Me.Text = "Downloader" + Me.TopMost = True + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Downloader.resx b/ShiftOS/Downloader.resx new file mode 100644 index 0000000..ff4c820 --- /dev/null +++ b/ShiftOS/Downloader.resx @@ -0,0 +1,129 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 1347, 18 + + + 1441, 18 + + + 1525, 18 + + \ No newline at end of file diff --git a/ShiftOS/Downloader.vb b/ShiftOS/Downloader.vb new file mode 100644 index 0000000..11062cc --- /dev/null +++ b/ShiftOS/Downloader.vb @@ -0,0 +1,415 @@ +Public Class Downloader + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + 'Fix growing window bug + If justopened = False Then + Me.Size = New Size(Me.Size.Width, Me.Size.Height - Skins.titlebarheight) + End If + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.dodgename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region +End Class \ No newline at end of file diff --git a/ShiftOS/Downloadmanager.Designer.vb b/ShiftOS/Downloadmanager.Designer.vb new file mode 100644 index 0000000..810ba79 --- /dev/null +++ b/ShiftOS/Downloadmanager.Designer.vb @@ -0,0 +1,561 @@ + _ +Partial Class Downloadmanager + + Inherits System.Windows.Forms.Form + + Public ShiftOSPath As String = "C:\ShiftOS\" + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Downloadmanager)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlsettings = New System.Windows.Forms.Panel() + Me.btnclearhist = New System.Windows.Forms.Button() + Me.txtspeedlimiter = New System.Windows.Forms.TextBox() + Me.btnsavefolder = New System.Windows.Forms.Button() + Me.lbldownloadspeedtitle = New System.Windows.Forms.Label() + Me.lbldownloadlocationtitle = New System.Windows.Forms.Label() + Me.pnldownloads = New System.Windows.Forms.Panel() + Me.lblqueueddownloads = New System.Windows.Forms.Label() + Me.lblqueuetitle = New System.Windows.Forms.Label() + Me.lbldownloadstitle = New System.Windows.Forms.Label() + Me.lbldownloadingitems = New System.Windows.Forms.Label() + Me.pnlwelcome = New System.Windows.Forms.Panel() + Me.lblexit = New System.Windows.Forms.Label() + Me.lblwelcometext = New System.Windows.Forms.Label() + Me.pnlhistory = New System.Windows.Forms.Panel() + Me.lblpreviousdownloadstitle = New System.Windows.Forms.Label() + Me.lblpreviousdownloads = New System.Windows.Forms.Label() + Me.pnltabbuttons = New System.Windows.Forms.Panel() + Me.bntsettingtab = New System.Windows.Forms.Label() + Me.bnthistorytab = New System.Windows.Forms.Label() + Me.bntdownloadstab = New System.Windows.Forms.Label() + Me.bntwelcometab = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.closebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.tmrdownloadspeed = New System.Windows.Forms.Timer(Me.components) + Me.tmrapplied = New System.Windows.Forms.Timer(Me.components) + Me.Label1 = New System.Windows.Forms.Label() + Me.pgcontents.SuspendLayout() + Me.pnlsettings.SuspendLayout() + Me.pnldownloads.SuspendLayout() + Me.pnlwelcome.SuspendLayout() + Me.pnlhistory.SuspendLayout() + Me.pnltabbuttons.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlsettings) + Me.pgcontents.Controls.Add(Me.pnldownloads) + Me.pgcontents.Controls.Add(Me.pnlwelcome) + Me.pgcontents.Controls.Add(Me.pnlhistory) + Me.pgcontents.Controls.Add(Me.pnltabbuttons) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(498, 220) + Me.pgcontents.TabIndex = 20 + ' + 'pnlsettings + ' + Me.pnlsettings.Controls.Add(Me.Label1) + Me.pnlsettings.Controls.Add(Me.btnclearhist) + Me.pnlsettings.Controls.Add(Me.txtspeedlimiter) + Me.pnlsettings.Controls.Add(Me.btnsavefolder) + Me.pnlsettings.Controls.Add(Me.lbldownloadspeedtitle) + Me.pnlsettings.Controls.Add(Me.lbldownloadlocationtitle) + Me.pnlsettings.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlsettings.Location = New System.Drawing.Point(0, 25) + Me.pnlsettings.Name = "pnlsettings" + Me.pnlsettings.Size = New System.Drawing.Size(498, 195) + Me.pnlsettings.TabIndex = 8 + ' + 'btnclearhist + ' + Me.btnclearhist.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnclearhist.Location = New System.Drawing.Point(21, 80) + Me.btnclearhist.Name = "btnclearhist" + Me.btnclearhist.Size = New System.Drawing.Size(138, 23) + Me.btnclearhist.TabIndex = 10 + Me.btnclearhist.Text = "Clear Download History" + Me.btnclearhist.UseVisualStyleBackColor = True + ' + 'txtspeedlimiter + ' + Me.txtspeedlimiter.Location = New System.Drawing.Point(143, 46) + Me.txtspeedlimiter.Name = "txtspeedlimiter" + Me.txtspeedlimiter.Size = New System.Drawing.Size(100, 20) + Me.txtspeedlimiter.TabIndex = 9 + Me.txtspeedlimiter.Text = "500" + Me.txtspeedlimiter.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'btnsavefolder + ' + Me.btnsavefolder.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsavefolder.Location = New System.Drawing.Point(128, 10) + Me.btnsavefolder.Name = "btnsavefolder" + Me.btnsavefolder.Size = New System.Drawing.Size(194, 23) + Me.btnsavefolder.TabIndex = 8 + Me.btnsavefolder.Text = "Downloads" + Me.btnsavefolder.UseVisualStyleBackColor = True + ' + 'lbldownloadspeedtitle + ' + Me.lbldownloadspeedtitle.AutoSize = True + Me.lbldownloadspeedtitle.Location = New System.Drawing.Point(18, 49) + Me.lbldownloadspeedtitle.Name = "lbldownloadspeedtitle" + Me.lbldownloadspeedtitle.Size = New System.Drawing.Size(119, 13) + Me.lbldownloadspeedtitle.TabIndex = 4 + Me.lbldownloadspeedtitle.Text = "Download speed limiter:" + ' + 'lbldownloadlocationtitle + ' + Me.lbldownloadlocationtitle.AutoSize = True + Me.lbldownloadlocationtitle.Location = New System.Drawing.Point(20, 15) + Me.lbldownloadlocationtitle.Name = "lbldownloadlocationtitle" + Me.lbldownloadlocationtitle.Size = New System.Drawing.Size(102, 13) + Me.lbldownloadlocationtitle.TabIndex = 2 + Me.lbldownloadlocationtitle.Text = "Download Location:" + ' + 'pnldownloads + ' + Me.pnldownloads.Controls.Add(Me.lblqueueddownloads) + Me.pnldownloads.Controls.Add(Me.lblqueuetitle) + Me.pnldownloads.Controls.Add(Me.lbldownloadstitle) + Me.pnldownloads.Controls.Add(Me.lbldownloadingitems) + Me.pnldownloads.Location = New System.Drawing.Point(15, 31) + Me.pnldownloads.Name = "pnldownloads" + Me.pnldownloads.Size = New System.Drawing.Size(201, 98) + Me.pnldownloads.TabIndex = 6 + ' + 'lblqueueddownloads + ' + Me.lblqueueddownloads.AutoSize = True + Me.lblqueueddownloads.Location = New System.Drawing.Point(10, 79) + Me.lblqueueddownloads.Name = "lblqueueddownloads" + Me.lblqueueddownloads.Size = New System.Drawing.Size(157, 13) + Me.lblqueueddownloads.TabIndex = 5 + Me.lblqueueddownloads.Text = "No downloads currently queued" + ' + 'lblqueuetitle + ' + Me.lblqueuetitle.AutoSize = True + Me.lblqueuetitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblqueuetitle.Location = New System.Drawing.Point(10, 56) + Me.lblqueuetitle.Name = "lblqueuetitle" + Me.lblqueuetitle.Size = New System.Drawing.Size(48, 13) + Me.lblqueuetitle.TabIndex = 4 + Me.lblqueuetitle.Text = "Queue:" + ' + 'lbldownloadstitle + ' + Me.lbldownloadstitle.AutoSize = True + Me.lbldownloadstitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbldownloadstitle.Location = New System.Drawing.Point(10, 3) + Me.lbldownloadstitle.Name = "lbldownloadstitle" + Me.lbldownloadstitle.Size = New System.Drawing.Size(73, 13) + Me.lbldownloadstitle.TabIndex = 3 + Me.lbldownloadstitle.Text = "Downloads:" + ' + 'lbldownloadingitems + ' + Me.lbldownloadingitems.AutoSize = True + Me.lbldownloadingitems.Location = New System.Drawing.Point(10, 27) + Me.lbldownloadingitems.Name = "lbldownloadingitems" + Me.lbldownloadingitems.Size = New System.Drawing.Size(167, 13) + Me.lbldownloadingitems.TabIndex = 2 + Me.lbldownloadingitems.Text = "No download currently in progress" + ' + 'pnlwelcome + ' + Me.pnlwelcome.Controls.Add(Me.lblexit) + Me.pnlwelcome.Controls.Add(Me.lblwelcometext) + Me.pnlwelcome.Location = New System.Drawing.Point(244, 34) + Me.pnlwelcome.Name = "pnlwelcome" + Me.pnlwelcome.Size = New System.Drawing.Size(103, 44) + Me.pnlwelcome.TabIndex = 5 + ' + 'lblexit + ' + Me.lblexit.BackColor = System.Drawing.Color.White + Me.lblexit.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lblexit.Location = New System.Drawing.Point(365, 161) + Me.lblexit.Name = "lblexit" + Me.lblexit.Size = New System.Drawing.Size(125, 25) + Me.lblexit.TabIndex = 5 + Me.lblexit.Text = "Close" + Me.lblexit.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblwelcometext + ' + Me.lblwelcometext.Location = New System.Drawing.Point(10, 20) + Me.lblwelcometext.Name = "lblwelcometext" + Me.lblwelcometext.Size = New System.Drawing.Size(480, 116) + Me.lblwelcometext.TabIndex = 0 + Me.lblwelcometext.Text = resources.GetString("lblwelcometext.Text") + ' + 'pnlhistory + ' + Me.pnlhistory.Controls.Add(Me.lblpreviousdownloadstitle) + Me.pnlhistory.Controls.Add(Me.lblpreviousdownloads) + Me.pnlhistory.Location = New System.Drawing.Point(23, 135) + Me.pnlhistory.Name = "pnlhistory" + Me.pnlhistory.Size = New System.Drawing.Size(162, 72) + Me.pnlhistory.TabIndex = 7 + ' + 'lblpreviousdownloadstitle + ' + Me.lblpreviousdownloadstitle.AutoSize = True + Me.lblpreviousdownloadstitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblpreviousdownloadstitle.Location = New System.Drawing.Point(10, 3) + Me.lblpreviousdownloadstitle.Name = "lblpreviousdownloadstitle" + Me.lblpreviousdownloadstitle.Size = New System.Drawing.Size(126, 13) + Me.lblpreviousdownloadstitle.TabIndex = 3 + Me.lblpreviousdownloadstitle.Text = "Previous Downloads:" + Me.lblpreviousdownloadstitle.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblpreviousdownloads + ' + Me.lblpreviousdownloads.AutoSize = True + Me.lblpreviousdownloads.Location = New System.Drawing.Point(10, 27) + Me.lblpreviousdownloads.Name = "lblpreviousdownloads" + Me.lblpreviousdownloads.Size = New System.Drawing.Size(121, 13) + Me.lblpreviousdownloads.TabIndex = 2 + Me.lblpreviousdownloads.Text = "No previous downloads." + ' + 'pnltabbuttons + ' + Me.pnltabbuttons.Controls.Add(Me.bntsettingtab) + Me.pnltabbuttons.Controls.Add(Me.bnthistorytab) + Me.pnltabbuttons.Controls.Add(Me.bntdownloadstab) + Me.pnltabbuttons.Controls.Add(Me.bntwelcometab) + Me.pnltabbuttons.Dock = System.Windows.Forms.DockStyle.Top + Me.pnltabbuttons.Location = New System.Drawing.Point(0, 0) + Me.pnltabbuttons.Name = "pnltabbuttons" + Me.pnltabbuttons.Size = New System.Drawing.Size(498, 25) + Me.pnltabbuttons.TabIndex = 4 + ' + 'bntsettingtab + ' + Me.bntsettingtab.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bntsettingtab.BackColor = System.Drawing.Color.White + Me.bntsettingtab.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntsettingtab.Location = New System.Drawing.Point(371, 0) + Me.bntsettingtab.Name = "bntsettingtab" + Me.bntsettingtab.Size = New System.Drawing.Size(127, 25) + Me.bntsettingtab.TabIndex = 7 + Me.bntsettingtab.Text = "Settings" + Me.bntsettingtab.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'bnthistorytab + ' + Me.bnthistorytab.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bnthistorytab.BackColor = System.Drawing.Color.White + Me.bnthistorytab.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bnthistorytab.Location = New System.Drawing.Point(247, 0) + Me.bnthistorytab.Name = "bnthistorytab" + Me.bnthistorytab.Size = New System.Drawing.Size(127, 25) + Me.bnthistorytab.TabIndex = 6 + Me.bnthistorytab.Text = "History" + Me.bnthistorytab.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'bntdownloadstab + ' + Me.bntdownloadstab.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bntdownloadstab.BackColor = System.Drawing.Color.White + Me.bntdownloadstab.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntdownloadstab.Location = New System.Drawing.Point(123, 0) + Me.bntdownloadstab.Name = "bntdownloadstab" + Me.bntdownloadstab.Size = New System.Drawing.Size(127, 25) + Me.bntdownloadstab.TabIndex = 5 + Me.bntdownloadstab.Text = "Current Downloads" + Me.bntdownloadstab.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'bntwelcometab + ' + Me.bntwelcometab.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bntwelcometab.BackColor = System.Drawing.Color.White + Me.bntwelcometab.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntwelcometab.Location = New System.Drawing.Point(-1, 0) + Me.bntwelcometab.Name = "bntwelcometab" + Me.bntwelcometab.Size = New System.Drawing.Size(127, 25) + Me.bntwelcometab.TabIndex = 4 + Me.bntwelcometab.Text = "Welcome" + Me.bntwelcometab.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 220) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 218) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(498, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 220) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 218) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(498, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(500, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 248) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(496, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'tmrdownloadspeed + ' + ' + 'tmrapplied + ' + Me.tmrapplied.Interval = 1000 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.5!) + Me.Label1.Location = New System.Drawing.Point(245, 52) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(80, 12) + Me.Label1.TabIndex = 11 + Me.Label1.Text = "Kilobytes / second" + ' + 'Downloadmanager + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(500, 250) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Downloadmanager" + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "downloadmanager" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnlsettings.ResumeLayout(False) + Me.pnlsettings.PerformLayout() + Me.pnldownloads.ResumeLayout(False) + Me.pnldownloads.PerformLayout() + Me.pnlwelcome.ResumeLayout(False) + Me.pnlhistory.ResumeLayout(False) + Me.pnlhistory.PerformLayout() + Me.pnltabbuttons.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pnltabbuttons As System.Windows.Forms.Panel + Friend WithEvents bntsettingtab As System.Windows.Forms.Label + Friend WithEvents bnthistorytab As System.Windows.Forms.Label + Friend WithEvents bntdownloadstab As System.Windows.Forms.Label + Friend WithEvents bntwelcometab As System.Windows.Forms.Label + Friend WithEvents pnlwelcome As System.Windows.Forms.Panel + Friend WithEvents lblexit As System.Windows.Forms.Label + Friend WithEvents lblwelcometext As System.Windows.Forms.Label + Friend WithEvents pnldownloads As System.Windows.Forms.Panel + Friend WithEvents lbldownloadingitems As System.Windows.Forms.Label + Friend WithEvents tmrdownloadspeed As System.Windows.Forms.Timer + Friend WithEvents lblqueueddownloads As System.Windows.Forms.Label + Friend WithEvents lblqueuetitle As System.Windows.Forms.Label + Friend WithEvents lbldownloadstitle As System.Windows.Forms.Label + Friend WithEvents pnlhistory As System.Windows.Forms.Panel + Friend WithEvents lblpreviousdownloadstitle As System.Windows.Forms.Label + Friend WithEvents lblpreviousdownloads As System.Windows.Forms.Label + Friend WithEvents pnlsettings As System.Windows.Forms.Panel + Friend WithEvents lbldownloadspeedtitle As System.Windows.Forms.Label + Friend WithEvents lbldownloadlocationtitle As System.Windows.Forms.Label + Friend WithEvents tmrapplied As System.Windows.Forms.Timer + Friend WithEvents btnclearhist As System.Windows.Forms.Button + Friend WithEvents txtspeedlimiter As System.Windows.Forms.TextBox + Friend WithEvents btnsavefolder As System.Windows.Forms.Button + Friend WithEvents Label1 As System.Windows.Forms.Label +End Class diff --git a/ShiftOS/Downloadmanager.resx b/ShiftOS/Downloadmanager.resx new file mode 100644 index 0000000..b8f8e96 --- /dev/null +++ b/ShiftOS/Downloadmanager.resx @@ -0,0 +1,140 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Welcome to the Download Manager. Like downloading programs off the internet? Want to download a movie or your favourite song? This is the right program! + +Simply click a download link in the Shiftnet and after conferming, all your stuff will start to download. Click the Current Downloads tab to see what your currently downloading. The History tab shows everything you have already downloaded and settings lets you customize your Download Manager. + + + 214, 57 + + + 130, 57 + + + 17, 57 + + + 308, 57 + + + 466, 57 + + \ No newline at end of file diff --git a/ShiftOS/Downloadmanager.vb b/ShiftOS/Downloadmanager.vb new file mode 100644 index 0000000..34760ed --- /dev/null +++ b/ShiftOS/Downloadmanager.vb @@ -0,0 +1,579 @@ +Imports System.IO + +Public Class Downloadmanager + + Dim writefile As StreamWriter + Public filepath As String = ShiftOSPath + "Home\Downloads" + Dim progress As Decimal + Dim speed As Integer = 500 + + Dim size_(99999) As Integer + Dim source(99999) As String + Dim name_(99999) As String + Dim number As Integer = 0 + Dim current As Integer = 1 + + +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.DownloadManagerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + pnlwelcome.Dock = DockStyle.Fill + pnlwelcome.BringToFront() + lblpreviousdownloads.Text = ShiftOSDesktop.downloadmanagerhistory + + ShiftOSDesktop.pnlpanelbuttondownloadmanager.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondownloadmanager, ShiftOSDesktop.tbdownloadmanagericon, ShiftOSDesktop.tbdownloadmanagertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(500, 250) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.downloadmanagername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.downloadmanagericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub lblexit_Click(sender As Object, e As EventArgs) Handles lblexit.Click + Me.Close() + End Sub + + 'tab switching + Private Sub bntwelcometab_Click(sender As Object, e As EventArgs) Handles bntwelcometab.Click + pnlwelcome.Dock = DockStyle.Fill + pnlwelcome.BringToFront() + End Sub + + Private Sub bnthistorytab_Click(sender As Object, e As EventArgs) Handles bnthistorytab.Click + pnlhistory.Dock = DockStyle.Fill + pnlhistory.BringToFront() + End Sub + + Private Sub bntdownloadstab_Click(sender As Object, e As EventArgs) Handles bntdownloadstab.Click + pnldownloads.Dock = DockStyle.Fill + pnldownloads.BringToFront() + End Sub + + Private Sub bntsettingtab_Click(sender As Object, e As EventArgs) Handles bntsettingtab.Click + pnlsettings.Dock = DockStyle.Fill + pnlsettings.BringToFront() + If lblpreviousdownloads.Text = "" Then btnclearhist.Text = "Download History Cleared" Else btnclearhist.Text = "Clear Download History" + End Sub + + + 'Downloading + Public Sub adddownload(ByVal INname As String, ByVal INsource As String, ByVal INsize As Integer) + number = number + 1 + size_(number) = INsize + source(number) = INsource + name_(number) = INname + tmrdownloadspeed.Interval = 1024 / speed + updatequeuetext() + + tmrdownloadspeed.Start() + + pnldownloads.Dock = DockStyle.Fill + End Sub + + Private Sub tmrdownloadspeed_Tick(sender As Object, e As EventArgs) Handles tmrdownloadspeed.Tick + + lbldownloadingitems.Text = name_(current) & " FROM " & source(current) & " - " & Math.Round(progress, 0) & "%" + If progress >= 100 Then + savedownload(name_(current), size_(current), source(current)) + tmrdownloadspeed.Stop() + If number > current Then + current = current + 1 + progress = 0 + lbldownloadingitems.Text = "..." + lblqueueddownloads.Text = "" + updatequeuetext() + tmrdownloadspeed.Start() + Else + lbldownloadingitems.Text = "No Downloads currently in progress." + progress = 0 + number = 0 + current = 1 + End If + Else + progress = progress + (100 / size_(current)) + End If + End Sub + + Private Sub updatequeuetext() + If number > current Then + Dim i As Integer = 1 + If i <= (number - current) Then + If lblqueueddownloads.Text = "No downloads currently queued" Then + lblqueueddownloads.Text = name_(current + i) & " FROM " & source(current + i) + Else + lblqueueddownloads.Text = lblqueueddownloads.Text + vbCrLf + name_(current + i) & " FROM " & source(current + i) + End If + i = i + 1 + End If + End If + End Sub + + 'Save + Private Sub savedownload(ByVal OUTname As String, ByVal OUTsize As Integer, ByVal OUTsource As String) + Select Case OUTname + Case "LinuxMint7.skn" + If (Not System.IO.Directory.Exists(filepath)) Then + System.IO.Directory.CreateDirectory(filepath) + System.IO.File.WriteAllBytes(filepath & "\" & OUTname, My.Resources.skinlinuxmint7) + Else + System.IO.File.WriteAllBytes(filepath & "\" & OUTname, My.Resources.skinlinuxmint7) + End If + Case "Industrial.skn" + If (Not System.IO.Directory.Exists(filepath)) Then + System.IO.Directory.CreateDirectory(filepath) + System.IO.File.WriteAllBytes(filepath & "\" & OUTname, My.Resources.skinindustrial) + Else + System.IO.File.WriteAllBytes(filepath & "\" & OUTname, My.Resources.skinindustrial) + End If + Case Else + If (Not System.IO.Directory.Exists(filepath)) Then + System.IO.Directory.CreateDirectory(filepath) + writefile = New StreamWriter(ShiftOSPath + "Shiftum42\Drivers\HDD.dri") + writefile.WriteLine(OUTname) + writefile.WriteLine(OUTsize) + writefile.Close() + Else + writefile = New StreamWriter(ShiftOSPath + "Shiftum42\Drivers\HDD.dri") + writefile.WriteLine(OUTname) + writefile.WriteLine(OUTsize) + writefile.Close() + End If + File_Crypt.EncryptFile(ShiftOSPath + "Shiftum42\Drivers\HDD.dri", filepath & "\" & OUTname, ShiftOSDesktop.sSecretKey) + End Select + lblpreviousdownloads.Text = lblpreviousdownloads.Text & vbCrLf & OUTname & " From " & OUTsource + ShiftOSDesktop.downloadmanagerhistory = lblpreviousdownloads.Text + btnclearhist.Text = "Clear Download History" + End Sub + + 'Settings + + Private Sub txtspeedlimiter_TextChanged(sender As Object, e As EventArgs) Handles txtspeedlimiter.TextChanged + If IsNumeric(txtspeedlimiter.Text) Then + Try + speed = txtspeedlimiter.Text + Catch ex As Exception + speed = 2147483647 + txtspeedlimiter.Text = 2147483647 + End Try + Else + txtspeedlimiter.Text = 0 + End If + End Sub + + Private Sub btnclearhist_Click(sender As Object, e As EventArgs) Handles btnclearhist.Click + lblpreviousdownloads.Text = "" + ShiftOSDesktop.downloadmanagerhistory = "" + btnclearhist.Text = "Download History Cleared" + End Sub + + Private Sub btnsavefolder_Click(sender As Object, e As EventArgs) Handles btnsavefolder.Click + File_Opener.openextention = "Dir" + File_Opener.showcontents() + File_Opener.openingprogram = "download manager" + File_Opener.Show() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/File Opener.Designer.vb b/ShiftOS/File Opener.Designer.vb new file mode 100644 index 0000000..b232dad --- /dev/null +++ b/ShiftOS/File Opener.Designer.vb @@ -0,0 +1,413 @@ + _ +Partial Class File_Opener + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(File_Opener)) + Me.scaninput = New System.Windows.Forms.Timer(Me.components) + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.lvfiles = New System.Windows.Forms.ListView() + Me.Panel3 = New System.Windows.Forms.Panel() + Me.pnlopenoptions = New System.Windows.Forms.Panel() + Me.btncancel = New System.Windows.Forms.Button() + Me.btnopen = New System.Windows.Forms.Button() + Me.lbextention = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.lbllocation = New System.Windows.Forms.Label() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components) + Me.pgcontents.SuspendLayout() + Me.pnlopenoptions.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'scaninput + ' + Me.scaninput.Interval = 500 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(95, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "File Opener" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(598, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.lvfiles) + Me.pgcontents.Controls.Add(Me.Panel3) + Me.pgcontents.Controls.Add(Me.pnlopenoptions) + Me.pgcontents.Controls.Add(Me.Panel2) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(596, 345) + Me.pgcontents.TabIndex = 25 + ' + 'lvfiles + ' + Me.lvfiles.BackColor = System.Drawing.Color.White + Me.lvfiles.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lvfiles.Dock = System.Windows.Forms.DockStyle.Fill + Me.lvfiles.LargeImageList = Me.ImageList1 + Me.lvfiles.Location = New System.Drawing.Point(0, 33) + Me.lvfiles.Name = "lvfiles" + Me.lvfiles.Size = New System.Drawing.Size(596, 268) + Me.lvfiles.TabIndex = 3 + Me.lvfiles.UseCompatibleStateImageBehavior = False + ' + 'Panel3 + ' + Me.Panel3.BackColor = System.Drawing.Color.Black + Me.Panel3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel3.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel3.ForeColor = System.Drawing.Color.Black + Me.Panel3.Location = New System.Drawing.Point(0, 301) + Me.Panel3.Name = "Panel3" + Me.Panel3.Size = New System.Drawing.Size(596, 2) + Me.Panel3.TabIndex = 11 + ' + 'pnlopenoptions + ' + Me.pnlopenoptions.Controls.Add(Me.btncancel) + Me.pnlopenoptions.Controls.Add(Me.btnopen) + Me.pnlopenoptions.Controls.Add(Me.lbextention) + Me.pnlopenoptions.Controls.Add(Me.Label1) + Me.pnlopenoptions.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlopenoptions.Location = New System.Drawing.Point(0, 303) + Me.pnlopenoptions.Name = "pnlopenoptions" + Me.pnlopenoptions.Size = New System.Drawing.Size(596, 42) + Me.pnlopenoptions.TabIndex = 10 + ' + 'btncancel + ' + Me.btncancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncancel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btncancel.Location = New System.Drawing.Point(433, 6) + Me.btncancel.Name = "btncancel" + Me.btncancel.Size = New System.Drawing.Size(75, 29) + Me.btncancel.TabIndex = 4 + Me.btncancel.Text = "Cancel" + Me.btncancel.UseVisualStyleBackColor = True + ' + 'btnopen + ' + Me.btnopen.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnopen.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnopen.Location = New System.Drawing.Point(514, 6) + Me.btnopen.Name = "btnopen" + Me.btnopen.Size = New System.Drawing.Size(75, 29) + Me.btnopen.TabIndex = 3 + Me.btnopen.Text = "Open" + Me.btnopen.UseVisualStyleBackColor = True + ' + 'lbextention + ' + Me.lbextention.AutoSize = True + Me.lbextention.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbextention.Location = New System.Drawing.Point(366, 3) + Me.lbextention.Name = "lbextention" + Me.lbextention.Size = New System.Drawing.Size(51, 31) + Me.lbextention.TabIndex = 2 + Me.lbextention.Text = ".txt" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(8, 13) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(360, 16) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "Currently displaying files to open with the following extention:" + ' + 'Panel2 + ' + Me.Panel2.BackColor = System.Drawing.Color.Black + Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel2.Location = New System.Drawing.Point(0, 31) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(596, 2) + Me.Panel2.TabIndex = 5 + ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.White + Me.Panel1.Controls.Add(Me.lbllocation) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(596, 31) + Me.Panel1.TabIndex = 4 + ' + 'lbllocation + ' + Me.lbllocation.BackColor = System.Drawing.Color.White + Me.lbllocation.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbllocation.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbllocation.ForeColor = System.Drawing.Color.Black + Me.lbllocation.Location = New System.Drawing.Point(0, 0) + Me.lbllocation.Name = "lbllocation" + Me.lbllocation.Size = New System.Drawing.Size(596, 31) + Me.lbllocation.TabIndex = 0 + Me.lbllocation.Text = "C:/ShiftOS/" + Me.lbllocation.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(598, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 347) + Me.pgright.TabIndex = 27 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 345) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 345) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 347) + Me.pgleft.TabIndex = 26 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 375) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(596, 2) + Me.pgbottom.TabIndex = 28 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(600, 30) + Me.titlebar.TabIndex = 24 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 25 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconFileOpener + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'ImageList1 + ' + Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer) + Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent + Me.ImageList1.Images.SetKeyName(0, "folder.png") + Me.ImageList1.Images.SetKeyName(1, "unknown.png") + Me.ImageList1.Images.SetKeyName(2, "textfile.png") + Me.ImageList1.Images.SetKeyName(3, "imagefile.png") + Me.ImageList1.Images.SetKeyName(4, "videofile.png") + Me.ImageList1.Images.SetKeyName(5, "folderup.png") + Me.ImageList1.Images.SetKeyName(6, "philips dll.png") + Me.ImageList1.Images.SetKeyName(7, "philips exe.png") + Me.ImageList1.Images.SetKeyName(8, "config.png") + Me.ImageList1.Images.SetKeyName(9, "driver.png") + Me.ImageList1.Images.SetKeyName(10, "skinfile.png") + Me.ImageList1.Images.SetKeyName(11, "namelistfile.png") + Me.ImageList1.Images.SetKeyName(12, "iconpackfile.png") + Me.ImageList1.Images.SetKeyName(13, "iconins.png") + Me.ImageList1.Images.SetKeyName(14, "icontrm.png") + Me.ImageList1.Images.SetKeyName(15, "iconsaa 2.png") + Me.ImageList1.Images.SetKeyName(16, "iconflood.png") + Me.ImageList1.Images.SetKeyName(17, "iconurl.png") + Me.ImageList1.Images.SetKeyName(18, "iconurls.png") + Me.ImageList1.Images.SetKeyName(19, "iconsaag.png") + ' + 'File_Opener + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(600, 377) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(400, 177) + Me.Name = "File_Opener" + Me.Text = "File_Opener" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnlopenoptions.ResumeLayout(False) + Me.pnlopenoptions.PerformLayout() + Me.Panel1.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents scaninput As System.Windows.Forms.Timer + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents lvfiles As System.Windows.Forms.ListView + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents lbllocation As System.Windows.Forms.Label + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents Panel3 As System.Windows.Forms.Panel + Friend WithEvents pnlopenoptions As System.Windows.Forms.Panel + Friend WithEvents btncancel As System.Windows.Forms.Button + Friend WithEvents btnopen As System.Windows.Forms.Button + Friend WithEvents lbextention As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents ImageList1 As System.Windows.Forms.ImageList +End Class diff --git a/ShiftOS/File Opener.resx b/ShiftOS/File Opener.resx new file mode 100644 index 0000000..2c34453 --- /dev/null +++ b/ShiftOS/File Opener.resx @@ -0,0 +1,421 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 348, 12 + + + 17, 57 + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w + LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 + ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABG + QQAAAk1TRnQBSQFMAgEBFAEAAYABAQGAAQEBKgEAASoBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo + AwABqAMAAfwDAAEBAQABCAUAAWABpRgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc + AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA + AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz + AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA + AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA + AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm + AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA + ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz + AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz + AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz + AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ + AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm + AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM + Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ + AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ + AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA + ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/ + ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ + AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA + AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA + AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA + AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ + AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA + AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/ + AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/ + ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/ + AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA + AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP//wD/AP8A/wD/AP8A + /wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A6QAK/yAACv8/AAfsCgAJ/xAA + Cv8BAAr/AQAB7AP/EAAK/wEACv8BAAHsA/8QABr/EAAI7AgACv8QAAn/AQAM/wEAAewC/xAACf8BAAz/ + AQAB7AL/EAAH/wEAAf8DAAL/AQAD/wEAAf8BAAP/AQAB/xAACOwEAAbsCP8QAAn/AQAM/wEAAewC/xAA + Cf8BAAz/AQAB7AL/EAAM/wEAAf8BAAP/AQAB/wEAA/8BAAH/EAAI7AIACuwG/xAACP8BAA3/AQAB7AL/ + EAAI/wEADf8BAAHsAv8QAAr/AgAD/wMAA/8DAAL/EAAE7AL/AuwBAAPsAgAC7AL/A+wF/xAAB/8BAAP/ + AQAK/wEAAewC/xAAB/8BAAP/AQAK/wEAAewC/xAACf8BAAX/AQAB/wEAA/8BAAH/AQAC/xAAAewC/wHs + BP8D7AMAAuwD/wPsBP8QAAf/AQAC/wIAAv8BAAL/AQAC/wEAAf8BAAHsAv8QAAf/AQAC/wIAAv8BAAL/ + AQAC/wEAAf8BAAHsAv8QAAr/AwAD/wEABf8BAAP/EAAD/wHsA/8D7AQAAuwBAAP/A+wD/xAACP8CAAHs + AQAC/wEAAv8BAAL/AQAB/wEAAewC/xAACP8CAAHsAQAC/wEAAv8BAAL/AQAB/wEAAewC/xAAGv8QAAP/ + AewD/wLsBQAC7AEABP8C7AP/EAAL/wEAAv8BAAL/AQAC/wIAAewD/xAAC/8BAAL/AQAC/wEAAv8CAAHs + A/8QABr/EAAD/wHsAv8C7AH/BQAC7AIABP8C7AL/EAAL/wEAAv8BAAL/AwAB7AX/EAAL/wEAAv8BAAL/ + AwAB7AX/EAAa/xAAA/8B7AL/AuwB/wQABOwDAAL/AuwB/xEAC/8BAAL/AwAB7Aj/EAAL/wEAAv8DAAHs + CP8QABr/EAAD/wHsAv8S7BIAC/8BAAL/AQAB7Ar/EAAL/wEAAv8BAAHsCv8QABr/EAAD/wHsAv8S7BIA + C/8BAAL/AQAB7Ar/EAAL/wEAAv8BAAHsCv8QAAP/FAAD/xAAA/8C7AH/AuwC/wMABOwFAALsEgAL/wEA + Av8BAAHsCv8QAAv/AQAC/wEAAewK/xAAA/8BABL/AQAD/xAABP8B7AH/AuwD/wMAAuwGAALsEgAL/wEA + Av8BAAHsCv8QAAv/AQAC/wEAAewK/xAAA/8BAAr/BwAB/wEAA/8QAAT/AewC/wLsAv8DAALsBQAC7BMA + Av8J/AEAAv8BAAHsCv8QAAL/CewBAAL/AQAB7Ar/EAAD/wEACv8BAAX/AQAB/wEAA/8QAAT/AewC/wPs + A/8BAALsBAAD7BMADP8CAAHsC/8QAAz/AgAB7Av/EAAD/wEAAf8IAAH/AQAF/wEAAf8BAAP/EAAE/wHs + A/8D7AP/AuwDAAPsFAAD/wT8Av8B/AT/AfwL/xAAA/8E7AL/AewE/wHsC/8QAAP/AQAB/wEABv8BAAH/ + BwAB/wEAA/8QAAT/AewE/wPsAv8C7AL/A+wVAAL/AfwE/wH8Af8B/AT/AfwL/xAAAv8B7AT/AewB/wHs + BP8B7Av/EAAD/wEAAf8BAAb/AQAJ/wEAA/8QAAT/AewF/wrsBf8RAAL/AfwE/wH8Af8B/AT/AfwL/xAA + Av8B7AT/AewB/wHsBP8B7Av/EAAD/wEAAf8BAAb/AQAB/wUAA/8BAAP/EAAE/wHsB/8G7Aj/EAAC/wH8 + BP8B/AH/AvwD/wH8C/8QAAL/AewE/wHsAf8C7AP/AewL/xAAA/8BAAH/AQAB/wYAAf8BAAT/AgAB/wEA + A/8QAAX/AewU/xAAAv8B/AT/AfwB/wH8Af8C/AH/AfwL/xAAAv8B7AT/AewB/wHsAf8C7AH/AewL/xAA + A/8BAAH/AQAB/wIAA/8BAAn/AQAD/xAABf8B7BT/EAAC/wH8BP8B/Ab/AfwL/xAAAv8B7AT/AewG/wHs + C/8QAAP/AQAB/wEABv8BAAH/BAAB/wIAAf8BAAP/EAAF/wHsFP8QAAL/AfwE/wH8Bv8B/Av/EAAC/wHs + BP8B7Ab/AewL/xAAA/8BAAH/CAAF/wIAAv8BAAP/EAAF/wLsE/8QAAL/AfwE/wH8Bv8B/Av/EAAC/wHs + BP8B7Ab/AewL/xAAA/8BABL/AQAD/xAABv8B7BP/EAAC/wH8BP8B/Ab/AfwL/xAAAv8B7AT/AewG/wHs + C/8QAAP/AQAB/wcACv8BAAP/EAAG/wLsEv8QABr/EAAa/xAAA/8BAAH/AQAF/wEAA/8GAAH/AQAD/xAA + B/8B7BL/EAAa/xAAGv8QAAP/AQAB/wEABf8BAAH/BQAE/wEAA/8QAAj/AewR/xAAGv8QABr/EAAD/wEA + Af8HAAr/AQAD/xAAA/8BAAP/AQAC7AIAA/8CAAP/AwAD/xAAGv8QABr/EAAD/wEAEv8BAAP/EAAD/wEA + A/8BAAH/AuwB/wEAAf8BAAL/AQAB/wEAAv8BAAP/EAAa/xAAGv8QAAP/FAAD/xAAA/8CAAL/AQAB/wEA + Av8BAAH/AQAC/wEAAv8DAAP/EAAa/xAAGv8QAAP/AQAS/wEAA/8QAAP/AQAD/wEAAv8CAAP/AgAF/wEA + A/8QABr/EAAa/xAAA/8BABL/AQAD/xAAA/8DAAH/AQAO/wEAA/8QABr/EAAa/xAAA/8UAAP/EAAa/xAA + Gv8QABr/EAAa/xAAD/8B9AT/FgAU/xYAFP8WAA//AfQE/xYAFP8BAAL/AuwRABT/AQAC/wLsEQAU/wEA + Av8C7BEAFP8BAAT/EQAU/wEAAf8C7BIAFP8BAAH/AuwSABT/AQAB/wLsEgAU/wEAA/8SABT/AQAC7BMA + FP8BAALsEwAU/wEAAuwTABT/AQAC/xMAFP8BAAHsFAAU/wEAAewUABT/AQAB7BQAFP8BAAH/FAAU/xYA + FP8WABT/FgAU//8AkQAa/xAAGv8QABr/OgAK/wEAAf8DAAH/AQAC/wEAAf8DAAL/EAAJ/wEAAv8BAAL/ + AQAC/wEAAf8BAAP/AQAB/xAAB/8BAAH/AwAC/wEAA/8BAAH/AQAD/wEAAf86AA3/AQAC/wEAAf8CAAT/ + AQAB/xAADP8BAAL/AQAC/wEAAf8BAAP/AQAB/xAADP8BAAH/AQAD/wEAAf8BAAP/AQAB/wkAKP8JAA3/ + AQAC/wQAAv8CAAL/EAAM/wEAAv8DAAL/AQAD/wEAAf8QAAr/AgAD/wMAA/8DAAL/CQAo/wkADf8BAAL/ + AgAB/wEAAf8BAAT/EAAM/wEAAv8BAAL/AQAB/wEAAf8BAAH/AQAB/xAACf8BAAX/AQAB/wEAA/8BAAH/ + AQAC/wkAA/8L7AT/AgAG/wIABv8CAAT/CQAM/wMAAf8BAAL/AQAC/wMAAf8QAAv/AwAB/wMAAv8CAAH/ + AgAB/xAACv8DAAP/AQAF/wEAA/8JABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAa/xAAGv8QABr/ + CQAC/wvsA/8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv8JABr/OgAa/wkAEP8BAATsAQAC/wEABOwBAAL/ + AQAE7AEAAv8JABr/OgAa/wkAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAa/zoAGv8JABL/ + AgAG/wIABv8CAAT/CQAa/zoABP8U7AL/CQAo/wkAGv86AAP/FAAB7AL/CQAo/wkAGv86AAP/AQAL/wfs + AQAB7AL/CQAD/wvsBP8CAAb/AgAG/wIABP8JABr/OgAD/wEACv8HAAHsAQAB7AL/CQAR/wEAAuwBAAT/ + AQAC7AEABP8BAALsAQAD/wkACf8HAAr/OgAD/wEAAv8I7AEABf8BAAHsAQAB7AL/CQAC/wvsA/8BAATs + AQAC/wEABOwBAAL/AQAE7AEAAv8JABr/OgAD/wEAAf8IAAHsAQAF/wEAAewBAAHsAv8JABD/AQAE7AEA + Av8BAATsAQAC/wEABOwBAAL/CQAa/zoAA/8BAAH/AQAG/wEAAewHAAH/AQAB7AL/CQAD/wvsA/8BAALs + AQAE/wEAAuwBAAT/AQAC7AEAA/8JAAz/AQAN/zoAA/8BAAH/AQAG/wEAAewI/wEAAewC/wkAEv8CAAb/ + AgAG/wIABP8JAAv/AwAM/zoAA/8BAAH/AQAG/wEAAewFAAP/AQAB7AL/CQAo/wkACv8BAAH/AQAB/wEA + C/86AAP/AQAB/wEAAf8GAAHsAQAE/wIAAf8BAAHsAv8JACj/CQAJ/wEAAv8BAAL/AQAK/zoAA/8BAAH/ + AQAB/wIAA/8BAAHsCP8BAAHsAv8JAAP/C+wE/wIABv8CAAb/AgAE/wkADP8BAA3/OgAD/wEAAf8BAAb/ + AQAB7AQAAf8CAAH/AQAB7AL/CQAR/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkADP8BAA3/OgAD/wEA + Af8IAAX/AgAC/wEAAewC/wkAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAM/wEADf86AAP/ + AQAC/wfsCf8BAAHsAv8JABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAM/wEADf86AAP/AQAB/wcA + AewJ/wEAAewC/wkAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAM/wEADf86AAP/AQAB/wEA + Bf8BAAHsAv8GAAH/AQAB7AL/CQAS/wIABv8CAAb/AgAE/wkADP8BAA3/OgAD/wEAAf8BAAX/AQAB7AUA + BP8BAAHsAv8JACj/CQAa/zoAA/8BAAH/BwAK/wEAAewC/wkAKP8JABr/OgAD/wEAEv8BAAHsAv8JAAP/ + C+wE/wIABv8CAAb/AgAE/wkAGv86AAP/FAAB7AL/CQAR/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkA + Gv86AAP/AQAS/wEAAewC/wkAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAa/xEAAv8nAAP/ + AQAS/wEAAewC/wkAEP8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv8JABr/EQAD/wQAAf8CAAH/AgAB/wEA + Af8DAAH/FQAD/xQAA/8JAAP/C+wD/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkAGv8SAAP/AwAB/wIA + Af8CAAH/AQAB/wMAAf8VABr/CQAS/wIABv8CAAb/AgAE/wkAD/8B9AT/GQAD/wIAAf8CAAH/AgAB/wEA + Af8DAAH/FQAP/wH0BP8PACj/CQAU/wEAAv8C7BUAA/8BAAH/AgAD/wIAAf8DAAH/FQAU/wEAAv8C7AoA + KP8JABT/AQAB/wLsFQAD/wIAAf8CAAH/AgAB/wEAAf8DAAH/AQAE/wHsDwAU/wEAAf8C7DwAFP8BAALs + FQAD/wMAAf8CAAH/AgAB/wEAAf8BAAH/AQAB/wEAA/8B7BAAFP8BAALsPQAU/wEAAewVAAP/AwAD/wEA + A/8CAAL/AQAC/wEAAv8B7BEAFP8BAAHsPgAU/xcAAv8TAAH/AewSABT/gAAB7OIAIf8JACH/MwAh/wkA + Bf8K7BL/CQAh/zMAIf8JAAT/DOwR/wkAIf8zACH/CQAD/wPsCAAD7BD/CQAD/xsAA/8zAAT/B+wE/w/s + A/8JAAL/A+wBAAH/BgAB/wEAA+wP/wkAA/8BABnsAQAD/zMAD/8B7A3/AewD/wkAAf8D7AEAAf8IAAH/ + AQAD7A7/CQAD/wEAGewBAAP/MwAD/wfsBf8B7A3/AewD/wkAAf8C7AEAAf8CAAH/BAAB/wIAAf8BAALs + Dv8JAAP/AQAC7BX/AuwBAAP/BQAo/wYAD/8P7AP/CQAB/wLsAwAB/wYAAf8DAALsDv8JAAP/AQAZ7AEA + A/8FACj/BgAh/wkAAf8C7AUAAf8CAAH/BQAC7A7/CQAD/wEAAuwV/wLsAQAD/wUAAv8kAAL/BgAE/wfs + BP8P7AP/CQAB/wLsBgAC/wYAC+wF/wkAA/8BABnsAQAD/wUAAv8kAAL/BgAP/wHsDf8B7AP/CQAB/wLs + BQAB/wIAAf8FAAzsBP8JAAP/AQAC7BX/AuwBAAP/BQAC/w4ABv8BAAb/AQAG/wIAAv8GAAP/B+wF/wHs + Df8B7AP/CQAB/wLsAwAB/wYAAf8CAAPsCAAD7AP/CQAD/wEAGewBAAP/BQAC/w4AAf8EAAH/AQAB/wQA + Af8BAAH/BAAB/wIAAv8GAA//D+wD/wkAAf8C7AEAAf8CAAH/BAAB/wIAA+wBAAH/BgAB/wEAA+wC/wkA + A/8BAATsEf8E7AEAA/8FAAL/DgAB/wQAAf8BAAH/BAAB/wEAAf8EAAH/AgAC/wYAIf8JAAH/A+wBAAH/ + CAAD7AEAAf8IAAH/AQAD7AH/CQAD/wEAGewBAAP/BQAC/w4AAf8EAAH/AQAB/wQAAf8BAAH/BAAB/wIA + Av8GAAT/B+wE/w/sA/8JAAL/A+wBAAH/BgAB/wLsAQAB/wIAAf8EAAH/AgAB/wEAAuwB/wkAA/8BABns + AQAD/wUAAv8OAAH/BAAB/wEAAf8EAAH/AQAB/wQAAf8CAAL/BgAP/wHsDf8B7AP/CQAD/wPsCAAC7AMA + Af8GAAH/AwAC7AH/CQAD/xsAA/8FAAL/DgAG/wEABv8BAAb/AgAC/wYAA/8H7AX/AewN/wHsA/8JAAT/ + DOwFAAH/AgAB/wUAAuwB/wkADv8FAA7/BQAC/yQAAv8GAA//D+wD/wkABf8L7AYAAv8GAALsAf8JAA// + A+wP/wUAAv8kAAL/BgAh/wkADv8C7AUAAf8CAAH/BQAC7AH/CQAh/wUAKP8GAAT/B+wE/w/sA/8JAA7/ + AuwDAAH/BgAB/wMAAuwB/wkAA/8LAAX/CwAD/wUAKP8GAA//AewN/wHsA/8JAA7/AuwBAAH/AgAB/wQA + Af8CAAH/AQAC7AH/CQAD/wEAC+wD/wvsAQAD/wUAKP8GAAP/B+wF/wHsDf8B7AP/CQAO/wPsAQAB/wgA + Af8BAAPsAf8JAAP/AQAZ7AEAA/8FACj/BgAP/w/sA/8JAAn/CewBAAH/BgAB/wEAA+wC/wkAA/8BABns + AQAD/wUAAv8k7AL/BgAh/wkACP8L7AgAA+wD/wkAA/8BAATsEf8E7AEAA/8FAAL/JOwC/wYABP8H7AT/ + D+wD/wkAB/8D7AcADOwE/wkAA/8BABnsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAP/wHsDf8B7AP/ + CQAG/wPsAQAB/wYAAf8K7AX/CQAD/wEAAuwV/wLsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAD/wfs + Bf8B7A3/AewD/wkABf8D7AEAAf8IAAH/AQAD7Ar/CQAD/wEAGewBAAP/BQAC/w7sBgAB7AYAAewGAALs + Av8GAA//D+wD/wkABf8C7AEAAf8CAAH/BAAB/wIAAf8BAALsCv8JAAP/AQAC7BUAAuwBAAP/BQAC/w7s + BgAB7AYAAewGAALsAv8GACH/CQAF/wLsAwAB/wYAAf8DAALsCv8JAAP/AQAZ7AEAA/8FAAL/DuwGAAHs + BgAB7AYAAuwC/wYABP8H7AT/D+wD/wkABf8C7AUAAf8CAAH/BQAC7Ar/CQAD/wEAAuwVAALsAQAD/wUA + Av8O7AYAAewGAAHsBgAC7AL/BgAP/wHsDf8B7AP/CQAF/wLsBgAC/wYAAuwK/wkAA/8BABnsAQAD/wUA + Av8k7AL/BgAD/wfsBf8B7A3/AewD/wkABf8C7AUAAf8CAAH/BQAC7Ar/CQAD/wEAAuwVAALsAQAD/wUA + Av8k7AL/BgAP/w/sA/8JAAX/AuwDAAH/BgAB/wMAAuwK/wkAA/8BABnsAQAD/wUAKP8GACH/CQAF/wLs + AQAB/wIAAf8EAAH/AgAB/wEAAuwK/wkAA/8BAALsFQAC7AEAA/8FACj/BgAE/wfsBP8P7AP/CQAF/wPs + AQAB/wgAAf8BAAPsCv8JAAP/AQAZ7AEAA/8zAA//AewN/wHsA/8JAAb/A+wBAAH/BgAB/wEAA+wL/wkA + A/8BABnsAQAD/zMAA/8H7AX/AewN/wHsA/8JAAf/A+wIAAPsDP8JAAP/GwAD/zMAD/8P7AP/CQAI/wzs + Df8JACH/MwAh/wkACf8K7A7/CQAh/zMAIf8JACH/CQAh/zMAIf//AKwAAfQh7wEHAfIB/wUAAfQh7wEH + AfIB/1kAAfIBAAFDHhUBEAERAbwB9AUAAfIVAAYOBgABEQG8AfRZAAHyAQ4B9x68AewBFQG8AfQFAAHy + FAABDgEVARQCEwEUAREBDgQAAQ4BFQG8AfQtACjsBAAB8gEOAfcevAHsARUBvAH0BQAB8hQAAUMB9wEH + Au8B9wFtARAEAAEOARUBvAH0LQAP7AoAD+wEAAHyAQ4B9x68AewBFQG8AfQFAAHyFAABQwEHAe8B7AES + ARMBQwEOBAABDgEVAbwB9C0AD+wBAAj/AQAP7AQAAfIBDgH3BLwB9xTsAe8EvAHsARUBvAH0BQAB8gMA + AQ4MQwEQAwABQwEHAe0BFQgAAQ4BFQG8AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAETEQ4DAAHs + BLwB7AEVAbwB9AUAAfIDAAERDOwBbQMAAUMBBwGSARMBDwEOBgABDgEVAbwB9AMAKP8CAA/sAQAI/wEA + D+wEAAHyAQ4B9wS8ARMBFA/vARMDAAHsBLwB7AEVAbwB9AUAAfIEAAEOARAJEQEQAQ4DAAFDAQcC8gHx + AQcBEAUAAQ4BFQG8AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITD7wB6gMAAewEvAHsARUBvAH0 + BQAB8gQAAQ4B6wnsARUEAAFDAQcB7wHsAW0B6gEOBQABDgEVAbwB9AMAKP8CAA/sAQAI/wEAD+wEAAHy + AQ4B9wS8AhMOvAHsAUMDAAETAZIDvAHsARUBvAH0BQAB8gQAAQ4B7wK8AQcF7AH3AeoEAAFDAQcBkgET + Ag8BDgUAAQ4BFQG8AfQDAA//AQAY/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw28AQcBFQEOAwABDgHq + A7wB7AEVAbwB9AUAAfIEAAEOAe8CvAHvAg4CDwEAAewB6gQAAUMBBwHvAesBEgETARABDgQAAQ4BFQG8 + AfQDAA//AgAX/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw68AQcBEgMAAesBBwO8AewBFQG8AfQFAAHy + BAABDgHvArwB7wEOAewBBwHtAQ4B7AHqBAABEQGSAe8BBwLvARQBDgQAAQ4BFQG8AfQDAA//AwAW/wIA + D+wBAAj/AQAP7AQAAfIBDgH3BLwCEw+8AfcB6gEOAesB7wS8AewBFQG8AfQFAAHyBAABDgHvAewBFAEV + AQABEQEUAUMBAAHsAeoEAAEOAUMBFQIUARUBDwUAAQ4BFQG8AfQDAA//BAAV/wIAD+wBAAj/AQAP7AQA + AfIBDgH3BLwCEwa8AewB6wHsB7wB9wFtAQcFvAHsARUBvAH0BQAB8gQAAQ4B7wETARAC6gEPARAC6gGS + AeoQAAEOARUBvAH0AwAP/wUAFP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAEVAQABQw+8AewBFQG8 + AfQFAAHyBAABDgHvARMBFQL3ARUBEgK8AQcB6gIAAQ4MDwEOAQABQwG8AfQDAA//BgAT/wIAD+wBAAj/ + AQAP7AQAAfIBDgH3BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEOAe8BEwEAAg4BAAESArwBBwHq + AgAB6wztAUMBAAERAbwB9AMAD/8HABL/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITBrwBFQEAAUMPvAHs + ARUBvAH0BQAB8gQAAQ4C7wTtAe8CvAEHAeoCAAEQAUMKFQERAQ4BAAERAbwB9AMAD/8IABH/AgAP7AEA + CP8BAA/sBAAB8gEOAfcEvAITBrwBFQEAAUMPvAHsARUBvAH0BQAB8gQAAQ4B6gltAUMDAAEVCW0BEgEO + AgABEQG8AfQDAA//CQAQ/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEwEHAfcEkgERAQABEAWSAfcBBwi8 + AewBFQG8AfQFAAHyEwABbQi8AQcBkgEOAgABEQG8AfQDAA//CgAP/wIAD+wBAAj/AQAP7AQAAfIBDgH3 + BLwCEwHvAQ4MAAERAewIvAHsARUBvAH0BQAB8hMAAW0IvAEHAZIBDgIAAREBvAH0AwAP/woAD/8CAArs + BgAI/wcACewEAAHyAQ4B9wS8AhMB7wEODAABEQHsCLwB7AEVAbwB9AUAAfITAAFtAfcGQwHtAQcBkgEO + AgABEQG8AfQDAA//CQAQ/wIACuwBABP/AQAJ7AQAAfIBDgH3BLwCEwHvAQ4MAAERAewIvAHsARUBvAH0 + BQAB8hMAAW0B7wZtAfcBBwGSAQ4CAAERAbwB9AMAD/8IABH/AgAL7AEAEf8BAArsBAAB8gEOAfcBvAEH + Au0CQwHsAQ4MAAEPAW0E7QH3A7wB7AEVAbwB9AUAAfITAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8HABL/ + AgAM7AEAD/8BAAvsBAAB8gEOAfcBvAHsGAABEwO8AewBFQG8AfQFAAHyBAAMDgMAAW0IvAEHAZIBDgIA + AREBvAH0AwAP/wYAE/8CAA3sAQAN/wEADOwEAAHyAQ4B9wG8AewYAAETA7wB7AEVAbwB9AUAAfIDAAER + DOwB6gIAAW0IvAEHAZIBDgIAAREBvAH0AwAP/wUAFP8CAA7sAQAL/wEADewEAAHyAQ4B9wG8Ae8E6wFt + AQ4MAAEPARME6wHtA7wB7AEVAbwB9AUAAfIDAAEOARQLEwFDAgABbQi8AQcBkgEOAgABQwG8AfQDAA// + BAAV/wIAD+wBAAn/AQAO7AQAAfIBDgH3BrwB7wEODAABEQHsCLwB7AEVAbwB9AUAAfIEAAEOARQIEgET + AREDAAEUCewBbQEOAQABDgEVAbwB9AMAD/8DABb/AgAQ7AEAB/8BAA/sBAAB8gEOAfcGvAHvAQ4MAAER + AewIvAHsARUBvAH0BQAB8gQAAQ4B7wIHBbwBBwHvAeoQAAEOARUBvAH0AwAP/wIAF/8CABHsAQAF/wEA + EOwEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8AewBFQG8AfQFAAHyBAABDgHvAW0B6gS8Ae8BEAHsAeoGAAEQ + AUMDFQERAQ4DAAEOARUBvAH0AwAP/wEAGP8CABLsAQAD/wEAEewEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8 + AewBFQG8AfQFAAHyBAABDgHvAZIBbQHqAQcBvAHtARIB7AH3AeoGAAHrApIC7QFtAREDAAEOARUBvAH0 + AwAo/wIAE+wBAAH/AQAS7AQAAfIBDgH3BrwBBwHqBBMBDgMAARUDEwFtAfcIvAHsARUBvAH0BQAB8gQA + AQ4B7wG8AZIBEgLsAm0CBwHqBQABDgGSAQcB9wLrARIBEAMAAQ4BFQG8AfQDACj/AgAU7AEAE+wEAAHy + AQ4B9wy8ARUDAAGSDbwB7AEVAbwB9AUAAfIEAAEOAe8BvAEHAZIBEQEPAeoB7wG8AQcB6gUAAQ4CkgHq + BwABDgEVAbwB9AMAKP8CACjsBAAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAbwB7AER + Ae8BBwHrAUMCBwHqBQABDgKSAeoHAAEOARUBvAH0AwAo/wIAKOwEAAHyAQ4B9wy8ARUDAAGSDbwB7AEV + AbwB9AUAAfIEAAEOAe8B7AHqAe0BBwG8Ae8B7AEUAe0B6gUAAQ4BkgK8Au8BFAQAAQ4BFQG8AfRZAAHy + AQ4B9wy8ARUDAAGSDbwB7AEVAbwB9AUAAfIEAAEOAe8C7AS8Ae8B6gGSAeoFAAEOAZICBwLtARUEAAEO + ARUBvAH0LQAP7B0AAfIBDgH3DLwBEgMQAfcNvAHsARUBvAH0BQAB8gQAAQ4B7Aj3Ae0BEwUAAQ4BkgH3 + AW0CDgUAAQ4BFQG8AfQtAA7sHgAB8gEOAfcMvAQHDrwB7AEVAbwB9AUAAfIFAAoOBgABDgGSAe8B7AIV + ARABDgMAAQ4BFQG8AfRZAAHyAQ4B9x68AewBFQG8AfQFAAHyFQABDgHsAu8CkgESAQ8EAAERAbwB9FkA + AfIBAAESHm0BFAFDAbwB9AUAAfIWAAEVAeoDbQFDAQ4EAAERAbwB9FkAAfMhbQHsAfEB9AUAAfMhbQHs + AfEB9P8AggAh/wkAIf9dACH/CQAh/10AIf8JACH/LwAo7AYAIf8JAAT/GuwD/wUAKOwCACjsBgAh/wkA + If8FACjsAgAo7AYADv8E7A//CQAh/wUAKOwCACjsBgAO/wTsD/8JAAP/GuwE/wUAKOwCACjsBgAO/wTs + D/8JACH/BQAo7AIAKOwGAA7/BOwP/wkAIf8FACjsAgAo7AYAIf8JAAT/GuwD/wUAJOwE/wIAKOwGACH/ + CQAh/wUAIewH/wIAKOwGACH/CQAh/wUABf8a7An/AgAo7AYADv8BkgPsD/8JAAP/GuwE/wUACP8W7AX/ + AewE/wIAKOwGAA7/AZID7A//CQAh/wUAD/8L7An/AuwD/wIAKOwGAA7/AZID7AHyDv8JACH/BQAe/wHs + Bf8B7AP/AgAo7AYADv8BBwPsAbwO/wkABP8a7AP/BQAe/wLsBP8C7AL/AgAo7AYADv8B8QTsDv8JACH/ + BQAX/wPsBf8C7AT/AewC/wIAKOwGAA//BOwB7w3/CQAh/wUAGf8C7AX/AewE/wHsAv8CACjsBgAP/wHx + BOwB7wz/CQAD/xrsBP8FABr/AewF/wHsBP8B7AL/AgAo7AYAEP8BvATsAe8B9Ar/CQAh/wUAGv8C7AT/ + AewE/wLsAf8CACjsBgAR/wG8BOwB7QH0Cf8JACH/BQAT/wTsBP8C7An/AewB/wIAKOwGABL/AfAE7AGS + Cf8JAAT/GuwD/wUAFv8C7AX/AewK/wIAKOwGABP/AfIE7AHvCP8JACH/BQAX/wHsCf8G7AH/AgAo7AYA + FP8B8gTsAfIH/wkAIf8FABf/AuwG/wnsAgAo7AYAFf8BvAPsAe8H/wkAA/8a7AT/BQAQ/wHsB/8C7AT/ + CuwCACjsBgAW/wTsB/8JACH/BQAQ/wPsBv8C7AL/C+wCACjsBgAG/wHzAe8BkgHsAe8L/wGSA+wH/wkA + If8FABL/A+wH/wzsAgAo7AYABv8B9APsAe0L/wHtA+wH/wkABP8a7AP/BQAU/wLsBv8M7AIAKOwGAAf/ + BOwB8gn/AfMD7AHtB/8JACH/BQAV/wLsBP8N7AIAKOwGAAf/AQcD7AH3Cf8B9wPsAe8H/wkAIf8FAA3/ + BOwF/wPsAv8N7AIAKOwGAAf/AfQE7AHvB/8B7wTsAfMH/wkAA/8a7AT/BQAQ/wLsCf8N7AIAKOwGAAj/ + AQcE7AGSAfAB9AH/AfQB8AGSBOwBBwj/CQAh/wUAEf8B7An/DewCACjsBgAJ/wHvDewB7wn/CQAh/wUA + Ef8I7AL/DewCACjsBgAK/wHwC+wB8Ar/CQAE/xrsA/8FABv/DewwAAv/AfQBvAH3BOwB7QHvAbwM/wkA + If8FABz/DOwCAA/sHwAh/wkAIf8FABz/DOwCAA7sIAAh/wkAA/8a7AT/XQAh/wkAIf9dACH/CQAh/10A + If8JACH/1gABQgFNAT4HAAE+AwABKAMAAagDAAH8AwABAQEAAQEFAAGgARcWAAP//wD/AP8A9AAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/ + AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/ + AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAT8B/wGAAgABDwH/AeACAAEDAf8B+AMAAf8DAAH+AwABfwH/AYACAAEfAf8B4AIA + AQcB/wH4AgABAQH/AwAB/gMAAv8BgAIAAT8B/wHgAgABDwH/AfgCAAEDAf8DAAH+AgABAQL/AYACAAF/ + Af8B4AIAAR8B/wH4AgABBwH/AwAB/gIAAQMC/wGAAgAC/wHgAgABPwH/AfgCAAEPAf8DAAH+AgABBwL/ + AYABAAEBAv8B4AIAAX8B/wH4AgABHwH/AwAG/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAb/AYACAAEH + Af8B4AIAAQEB/wH4AwABfwMABv8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEB + Af8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/ + CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMA + AX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGA + AgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHg + AgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4 + AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/ + AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgA + AT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEH + Af8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEB + Af8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/ + CAABPwGAAgABDwH/AeACAAEBAf8B+AMAAf8IAAE/AYACAAEfAf8B4AIAAQEB/wH4AgABAQH/CAABPwGA + AgABPwH/AeACAAEBAf8B+AIAAQMB/wMABv8BgAIAAX8B/wHgAgABAwH/AfgCAAEHAf8DAAb/AYACAAL/ + AeACAAEHAf8B+AIAAQ8B/wMABv8BgAEAAQEC/wHgAgABDwH/AfgCAAEfAf8DAAHwAwABAQH8BAABfwX/ + AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8 + BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMA + AQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/ + Bf8BwAMAAQcDABX/AwAK/wH+BAABDwGAAwABAwMACv8B/gQAAQ8BgAMAAQMDAAX/AcAEAAEOBAABDwGA + AwABAwMABf8BwAQAAQ4EAAEPAYADAAEDAwAF/wHABAABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0A + AQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQA + AQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGA + AwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAED + DQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEO + BAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEP + AYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMA + AQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMDAAX/AcABAAEfAv8B/gQA + AQ8BgAMAAQMDAAX/AcABAAE/Av8B/gQAAQ8BgAMAAQMDAAX/AcABAAF/Av8B/gQAAQ8BgAMAAQMDAAr/ + Af4EAAEPAYADAAEDAwAK/wH+BAABDwGAAwABAwMAFf8DAAX/AfwEAAF/BAABHwX/AwAF/wH8BAABfwQA + AR8F/wMABf8B/AQAAX8EAAEfBf8IAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwKAAF/ + Av8B/AQAAX8EAAEcCgAD/wH8BAABfwQAARwJAAEBA/8B/AQAAX8EAAEfBf8DAAX/AfwEAAF/BAABHwX/ + AwAF/wH8BAABfwQAAR8F/wMABf8B/AQAAX8EAAEfBf8DAAs= + + + + 1347, 18 + + + 1431, 18 + + + 1544, 18 + + \ No newline at end of file diff --git a/ShiftOS/File Opener.vb b/ShiftOS/File Opener.vb new file mode 100644 index 0000000..d5e2422 --- /dev/null +++ b/ShiftOS/File Opener.vb @@ -0,0 +1,857 @@ +Imports System.IO + +Public Class File_Opener + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 400 + Public minimumsizeheight As Integer = 177 + Public ShiftOSPath As String = "C:\ShiftOS\" + + Dim currentLocation As String + Dim itemsdeleted As Integer + Dim filetype As Integer + Public openextention As String + Public openingprogram As String + Dim lastselectedfilename As String + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + lbextention.Text = openextention + showcontents() + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(600, 377) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.fileopenername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtfileskimmericon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.fileopenericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + showcontents() + currentLocation = "C:/ShiftOS" + End Sub + + Public Sub showcontents() + lvfiles.Items.Clear() + + lvfiles.Items.Add("Exit Folder", 5) + + Dim dir As New DirectoryInfo(lbllocation.Text) + Dim files As FileInfo() = dir.GetFiles() + Dim file As FileInfo + Dim folders As DirectoryInfo() = dir.GetDirectories() + Dim folder As DirectoryInfo + + For Each folder In folders + Dim foldername As String = folder.Name + lvfiles.Items.Add(foldername, 0) + Next + + For Each file In files + Dim filename As String = file.Name + Dim fileex As String = file.Extension + + Select Case fileex + Case ".txt" + filetype = 2 + Case ".doc" + filetype = 2 + Case ".docx" + filetype = 2 + Case ".lst" + filetype = 2 + Case ".png" + filetype = 3 + Case ".jpg" + filetype = 3 + Case ".jpeg" + filetype = 3 + Case ".bmp" + filetype = 3 + Case ".gif" + filetype = 3 + Case ".avi" + filetype = 4 + Case ".m4v" + filetype = 4 + Case ".mp4" + filetype = 4 + Case ".wmv" + filetype = 4 + Case ".mp3" + filetype = 4 + Case ".dll" + filetype = 6 + Case ".exe" + filetype = 7 + Case ".sft" + filetype = 8 + Case ".dri" + filetype = 9 + Case ".pic" + filetype = 3 + Case ".skn" + filetype = 10 + Case ".nls" + filetype = 11 + Case ".icp" + filetype = 12 + Case ".stp" + filetype = 13 + Case ".trm" + filetype = 14 + Case ".sh" + filetype = 14 + Case ".bat" + filetype = 14 + Case ".command" + filetype = 14 + Case ".saa" + filetype = 15 + Case ".flood" + filetype = 16 + Case ".url" + filetype = 17 + Case ".urls" + filetype = 18 + Case Else + filetype = 1 + End Select + + Select Case openingprogram + Case "textpad" + If fileex = ".txt" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "shortcut" + If Not fileex = ".sct" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "graphicpicker1", "graphicpicker2", "graphicpicker3" + If fileex = ".pic" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".gif" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".jpeg" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".png" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".jpg" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".tiff" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".bmp" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "skinloader" + If fileex = ".skn" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "artpad" + If fileex = ".pic" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "audioplayer" + If fileex = ".mp3" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".wav" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".mwa" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".midi" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "videoplayer" + If fileex = ".mp4" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".avi" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".wmv" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".mov" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".m4v" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".mpeg4" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".mkv" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "namechanger" + If fileex = ".nls" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "iconmanager" + If fileex = ".pic" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".gif" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".jpeg" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".png" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".jpg" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".tiff" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".bmp" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "iconmanagerpack" + If fileex = ".icp" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "skinshifter" + If fileex = ".skn" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "installer" + If fileex = ".stp" Then + lvfiles.Items.Add(filename, filetype) + End If + Case "orcwrite" + If fileex = ".owd" Then + lvfiles.Items.Add(filename, filetype) + End If + If fileex = ".rtf" Then + lvfiles.Items.Add(filename, filetype) + End If + End Select + Next + + ShiftOSDesktop.fileopenerlastdirectory = lbllocation.Text + End Sub + + Private Sub lvfiles_MouseClick(sender As Object, e As MouseEventArgs) Handles lvfiles.MouseClick + lastselectedfilename = lvfiles.SelectedItems(0).Text + End Sub + + Private Sub lbfiles_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lvfiles.MouseDoubleClick + + If lvfiles.SelectedItems(0).Text = "Exit Folder" Then + + If lbllocation.Text = "C:/ShiftOS/" Or lbllocation.Text = "C:/ShiftOS" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "Unable to move into a higher directory due to error reading the requested folder on the drive." & Environment.NewLine & Environment.NewLine & "You can only enter directories formatted in the ShiftOS file system (ShiftFS)" + infobox.Show() + Else + Dim endloop As Boolean = False + lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1) + + While endloop = False + If lbllocation.Text.Substring(lbllocation.Text.Length - 1) = "/" Then + endloop = True + Else + lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1) + End If + End While + showcontents() + End If + Else + 'Check if selected item is a file or folder. It it's a folder check its extension + If lvfiles.SelectedItems(0).Text Like "*.txt" Then + openfile() + ElseIf lvfiles.SelectedItems(0).Text Like "*.skn" Then + openfile() + ElseIf lvfiles.SelectedItems(0).Text Like "*.gra" Then + openfile() + ElseIf lvfiles.SelectedItems(0).Text Like "*.*" Then + openfile() + Else + Dim textboxtext As String + textboxtext = lbllocation.Text + Dim last As String + Dim selit As String + last = textboxtext.Substring(textboxtext.Length - 1) + If last = "/" Then + selit = lvfiles.SelectedItems(0).Text + lbllocation.Text = lbllocation.Text + selit + Else + selit = lvfiles.SelectedItems(0).Text + lbllocation.Text = lbllocation.Text + ("/" & selit) + End If + showcontents() + End If + End If + currentLocation = lbllocation.Text + End Sub + + Private Sub btndeletefile_Click(sender As Object, e As EventArgs) + If lvfiles.SelectedItems(0).Text Like "*.*" Then + My.Computer.FileSystem.DeleteFile(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text) + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + showcontents() + Else + My.Computer.FileSystem.DeleteDirectory(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text, FileIO.DeleteDirectoryOption.DeleteAllContents) + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + showcontents() + End If + End Sub + + Private Sub btnnewfolder_Click(sender As Object, e As EventArgs) + infobox.lblintructtext.Text = "Please enter a name for your new folder:" + infobox.txtuserinput.Text = "" + infobox.lblintructtext.Show() + infobox.txtuserinput.Show() + infobox.Show() + scaninput.Start() + End Sub + + Private Sub scaninput_Tick(sender As Object, e As EventArgs) Handles scaninput.Tick + If infobox.Visible = False Then + My.Computer.FileSystem.CreateDirectory(lbllocation.Text & "/" & infobox.txtuserinput.Text) + showcontents() + scaninput.Stop() + End If + End Sub + + Private Sub btnopen_Click(sender As Object, e As EventArgs) Handles btnopen.Click + openfile() + End Sub + + Private Sub openfile() + If lastselectedfilename = "" Then + 'Folder Selecter + Select Case openingprogram + Case "download manager" + Downloadmanager.filepath = lbllocation.Text.Replace("/", "\") + Downloadmanager.btnsavefolder.Text = lbllocation.Text + Me.Close() + End Select + Else + 'File Selecter + Select Case openingprogram + Case "textpad" + If TextPad.needtosave = False Then + TextPad.Show() + TextPad.txtuserinput.Text = My.Computer.FileSystem.ReadAllText(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text) + TextPad.needtosave = False + Me.Close() + Else + infobox.title = "Textpad - Save?" + infobox.textinfo = "It appears that your text document currently contains unsaved changes." & Environment.NewLine & Environment.NewLine & "Are you sure you want to load a file without saving the changes?" + infobox.Show() + infobox.showyesno() + infobox.sendyesno = "fileopenertextpad" + End If + Case "shortcut" + Me.Close() + infobox.title = "Generate Shortcut" + infobox.textinfo = "Please enter a name for your Shortcut." + infobox.state = "generatingshortcut" + infobox.txtuserinput.Visible = True + infobox.txtString = currentLocation & "/" & lvfiles.SelectedItems(0).Text + infobox.Show() + + Case "graphicpicker1" + Graphic_Picker.imagelocations(0) = (lbllocation.Text & "/" & lastselectedfilename) + Graphic_Picker.txtidlefile.Text = lastselectedfilename + Graphic_Picker.setgraphicsidle() + Me.Close() + Case "graphicpicker2" + Graphic_Picker.imagelocations(1) = (lbllocation.Text & "/" & lastselectedfilename) + Graphic_Picker.txtmouseoverfile.Text = lastselectedfilename + Graphic_Picker.setgraphicsmouseover() + Me.Close() + Case "graphicpicker3" + Graphic_Picker.imagelocations(2) = (lbllocation.Text & "/" & lastselectedfilename) + Graphic_Picker.txtmousedownfile.Text = lastselectedfilename + Graphic_Picker.setgraphicsmousedown() + Me.Close() + Case "skinloader" + Skin_Loader.loadingsknversion = "" + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\Preview\", FileIO.DeleteDirectoryOption.DeleteAllContents) + System.IO.Compression.ZipFile.ExtractToDirectory(lbllocation.Text & "\" & lastselectedfilename, ShiftOSPath + "Shiftum42\Skins\Preview\") + If File.Exists(ShiftOSPath + "Shiftum42\Skins\Preview\SKN-version") Then + Dim sr As StreamReader = New StreamReader(ShiftOSPath + "Shiftum42\Skins\Preview\SKN-version") + Dim i As String = sr.ReadLine + Skin_Loader.loadingsknversion = sr.ReadLine + sr.Close() + End If + If Skin_Loader.loadingsknversion = "2.0 disposal-free skinning" Then + Skin_Loader.setuppreview2_0() + Skin_Loader.skinloaded = True + Else + My.Computer.FileSystem.WriteAllText(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat", My.Computer.FileSystem.ReadAllText(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat").Replace("\Current", "\Preview"), False) + Skin_Loader.loadlines = IO.File.ReadAllLines(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat") + Skin_Loader.loadskintopreview() + Skin_Loader.skinloaded = True + End If + Me.Close() + Case "artpad" + ArtPad.savelocation = (lbllocation.Text & "/" & lastselectedfilename) + ArtPad.openpic() + Me.Close() + Case "audioplayer" + Audio_Player.lbmusiclist.Items.Add(lbllocation.Text & "/" & lastselectedfilename) + Me.Close() + Case "videoplayer" + Video_Player.AxWindowsMediaPlayer1.URL = (lbllocation.Text & "/" & lastselectedfilename) + Me.Close() + Case "namechanger" + Name_Changer.loadlines = IO.File.ReadAllLines(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text) + Name_Changer.loadnamesfromfile() + Me.Close() + Case "iconmanager" + Icon_Manager.openedfilelocation = (lbllocation.Text & "/" & lastselectedfilename) + Icon_Manager.loadicon() + Me.Close() + Case "iconmanagerpack" + Icon_Manager.disposebackgrounds() + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Icons") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Icons", FileIO.DeleteDirectoryOption.DeleteAllContents) + System.IO.Compression.ZipFile.ExtractToDirectory(lbllocation.Text & "\" & lastselectedfilename, ShiftOSPath + "Shiftum42\Icons") + ShiftOSDesktop.setupicons() + Icon_Manager.needtosetupdesktop = True + Icon_Manager.loadsettings() + Me.Close() + Case "skinshifter" + Skinshifter.lbskinlist.Items.Add(lbllocation.Text & "/" & lastselectedfilename) + Me.Close() + Case "installer" + Installer.txtfilepath.Text = (lbllocation.Text & "/" & lastselectedfilename) + Me.Close() + Case "orcwrite" + OrcWrite.openfile((lbllocation.Text & "/" & lastselectedfilename)) + Me.Close() + Case "download manager" + Downloadmanager.filepath = lbllocation.Text.Replace("/", "\") + Downloadmanager.btnsavefolder.Text = lbllocation.Text + Me.Close() + End Select + End If + End Sub + + Private Sub btncancel_Click(sender As Object, e As EventArgs) Handles btncancel.Click + Me.Close() + End Sub + +End Class \ No newline at end of file diff --git a/ShiftOS/File Saver.Designer.vb b/ShiftOS/File Saver.Designer.vb new file mode 100644 index 0000000..436de54 --- /dev/null +++ b/ShiftOS/File Saver.Designer.vb @@ -0,0 +1,425 @@ + _ +Partial Class File_Saver + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(File_Saver)) + Me.scaninput = New System.Windows.Forms.Timer(Me.components) + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.lvfiles = New System.Windows.Forms.ListView() + Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components) + Me.Panel3 = New System.Windows.Forms.Panel() + Me.pnlsaveoptions = New System.Windows.Forms.Panel() + Me.cmbformatchooser = New System.Windows.Forms.ComboBox() + Me.btnsave = New System.Windows.Forms.Button() + Me.lbextention = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.txtfilename = New System.Windows.Forms.TextBox() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.lbllocation = New System.Windows.Forms.Label() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + Me.pnlsaveoptions.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'scaninput + ' + Me.scaninput.Interval = 500 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(83, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "File Saver" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(598, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.lvfiles) + Me.pgcontents.Controls.Add(Me.Panel3) + Me.pgcontents.Controls.Add(Me.pnlsaveoptions) + Me.pgcontents.Controls.Add(Me.Panel2) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(596, 345) + Me.pgcontents.TabIndex = 25 + ' + 'lvfiles + ' + Me.lvfiles.BackColor = System.Drawing.Color.White + Me.lvfiles.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lvfiles.Dock = System.Windows.Forms.DockStyle.Fill + Me.lvfiles.LargeImageList = Me.ImageList1 + Me.lvfiles.Location = New System.Drawing.Point(0, 33) + Me.lvfiles.Name = "lvfiles" + Me.lvfiles.Size = New System.Drawing.Size(596, 268) + Me.lvfiles.TabIndex = 3 + Me.lvfiles.UseCompatibleStateImageBehavior = False + ' + 'ImageList1 + ' + Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer) + Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent + Me.ImageList1.Images.SetKeyName(0, "folder.png") + Me.ImageList1.Images.SetKeyName(1, "unknown.png") + Me.ImageList1.Images.SetKeyName(2, "textfile.png") + Me.ImageList1.Images.SetKeyName(3, "imagefile.png") + Me.ImageList1.Images.SetKeyName(4, "videofile.png") + Me.ImageList1.Images.SetKeyName(5, "folderup.png") + Me.ImageList1.Images.SetKeyName(6, "philips dll.png") + Me.ImageList1.Images.SetKeyName(7, "philips exe.png") + Me.ImageList1.Images.SetKeyName(8, "config.png") + Me.ImageList1.Images.SetKeyName(9, "driver.png") + Me.ImageList1.Images.SetKeyName(10, "skinfile.png") + Me.ImageList1.Images.SetKeyName(11, "namelistfile.png") + Me.ImageList1.Images.SetKeyName(12, "iconpackfile.png") + Me.ImageList1.Images.SetKeyName(13, "iconins.png") + Me.ImageList1.Images.SetKeyName(14, "icontrm.png") + Me.ImageList1.Images.SetKeyName(15, "iconsaa 2.png") + Me.ImageList1.Images.SetKeyName(16, "iconflood.png") + Me.ImageList1.Images.SetKeyName(17, "iconurl.png") + Me.ImageList1.Images.SetKeyName(18, "iconurls.png") + Me.ImageList1.Images.SetKeyName(19, "iconsaag.png") + ' + 'Panel3 + ' + Me.Panel3.BackColor = System.Drawing.Color.Black + Me.Panel3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel3.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel3.ForeColor = System.Drawing.Color.Black + Me.Panel3.Location = New System.Drawing.Point(0, 301) + Me.Panel3.Name = "Panel3" + Me.Panel3.Size = New System.Drawing.Size(596, 2) + Me.Panel3.TabIndex = 9 + ' + 'pnlsaveoptions + ' + Me.pnlsaveoptions.BackColor = System.Drawing.Color.White + Me.pnlsaveoptions.Controls.Add(Me.cmbformatchooser) + Me.pnlsaveoptions.Controls.Add(Me.btnsave) + Me.pnlsaveoptions.Controls.Add(Me.lbextention) + Me.pnlsaveoptions.Controls.Add(Me.Label1) + Me.pnlsaveoptions.Controls.Add(Me.txtfilename) + Me.pnlsaveoptions.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlsaveoptions.Location = New System.Drawing.Point(0, 303) + Me.pnlsaveoptions.Name = "pnlsaveoptions" + Me.pnlsaveoptions.Size = New System.Drawing.Size(596, 42) + Me.pnlsaveoptions.TabIndex = 8 + ' + 'cmbformatchooser + ' + Me.cmbformatchooser.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cmbformatchooser.FormattingEnabled = True + Me.cmbformatchooser.Location = New System.Drawing.Point(463, 11) + Me.cmbformatchooser.Name = "cmbformatchooser" + Me.cmbformatchooser.Size = New System.Drawing.Size(45, 21) + Me.cmbformatchooser.TabIndex = 4 + ' + 'btnsave + ' + Me.btnsave.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsave.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsave.Location = New System.Drawing.Point(514, 6) + Me.btnsave.Name = "btnsave" + Me.btnsave.Size = New System.Drawing.Size(75, 29) + Me.btnsave.TabIndex = 3 + Me.btnsave.Text = "Save" + Me.btnsave.UseVisualStyleBackColor = True + ' + 'lbextention + ' + Me.lbextention.AutoSize = True + Me.lbextention.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbextention.Location = New System.Drawing.Point(467, 10) + Me.lbextention.Name = "lbextention" + Me.lbextention.Size = New System.Drawing.Size(34, 20) + Me.lbextention.TabIndex = 2 + Me.lbextention.Text = ".txt" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(10, 13) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(73, 16) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "File Name:" + ' + 'txtfilename + ' + Me.txtfilename.BackColor = System.Drawing.Color.White + Me.txtfilename.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtfilename.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfilename.Location = New System.Drawing.Point(89, 10) + Me.txtfilename.Name = "txtfilename" + Me.txtfilename.Size = New System.Drawing.Size(368, 22) + Me.txtfilename.TabIndex = 0 + ' + 'Panel2 + ' + Me.Panel2.BackColor = System.Drawing.Color.Black + Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel2.Location = New System.Drawing.Point(0, 31) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(596, 2) + Me.Panel2.TabIndex = 5 + ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.White + Me.Panel1.Controls.Add(Me.lbllocation) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(596, 31) + Me.Panel1.TabIndex = 4 + ' + 'lbllocation + ' + Me.lbllocation.BackColor = System.Drawing.Color.White + Me.lbllocation.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbllocation.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbllocation.ForeColor = System.Drawing.Color.Black + Me.lbllocation.Location = New System.Drawing.Point(0, 0) + Me.lbllocation.Name = "lbllocation" + Me.lbllocation.Size = New System.Drawing.Size(596, 31) + Me.lbllocation.TabIndex = 0 + Me.lbllocation.Text = "C:/ShiftOS/" + Me.lbllocation.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(598, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 347) + Me.pgright.TabIndex = 27 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 345) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 345) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 347) + Me.pgleft.TabIndex = 26 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 375) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(596, 2) + Me.pgbottom.TabIndex = 28 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(600, 30) + Me.titlebar.TabIndex = 24 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 2) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 25 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconFileSaver + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'File_Saver + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(600, 377) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(400, 177) + Me.Name = "File_Saver" + Me.Text = "File_Saver" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnlsaveoptions.ResumeLayout(False) + Me.pnlsaveoptions.PerformLayout() + Me.Panel1.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents scaninput As System.Windows.Forms.Timer + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents lvfiles As System.Windows.Forms.ListView + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents lbllocation As System.Windows.Forms.Label + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pnlsaveoptions As System.Windows.Forms.Panel + Friend WithEvents btnsave As System.Windows.Forms.Button + Friend WithEvents lbextention As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents txtfilename As System.Windows.Forms.TextBox + Friend WithEvents Panel3 As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents cmbformatchooser As System.Windows.Forms.ComboBox + Friend WithEvents ImageList1 As System.Windows.Forms.ImageList +End Class diff --git a/ShiftOS/File Saver.resx b/ShiftOS/File Saver.resx new file mode 100644 index 0000000..97d3f84 --- /dev/null +++ b/ShiftOS/File Saver.resx @@ -0,0 +1,421 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 348, 12 + + + 138, 12 + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w + LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 + ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABG + QQAAAk1TRnQBSQFMAgEBFAEAAYgBAQGIAQEBKgEAASoBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo + AwABqAMAAfwDAAEBAQABCAUAAWABpRgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc + AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA + AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz + AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA + AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA + AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm + AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA + ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz + AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz + AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz + AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ + AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm + AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM + Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ + AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ + AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA + ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/ + ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ + AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA + AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA + AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA + AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ + AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA + AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/ + AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/ + ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/ + AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA + AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP//wD/AP8A/wD/AP8A + /wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A6QAK/yAACv8/AAfsCgAJ/xAA + Cv8BAAr/AQAB7AP/EAAK/wEACv8BAAHsA/8QABr/EAAI7AgACv8QAAn/AQAM/wEAAewC/xAACf8BAAz/ + AQAB7AL/EAAH/wEAAf8DAAL/AQAD/wEAAf8BAAP/AQAB/xAACOwEAAbsCP8QAAn/AQAM/wEAAewC/xAA + Cf8BAAz/AQAB7AL/EAAM/wEAAf8BAAP/AQAB/wEAA/8BAAH/EAAI7AIACuwG/xAACP8BAA3/AQAB7AL/ + EAAI/wEADf8BAAHsAv8QAAr/AgAD/wMAA/8DAAL/EAAE7AL/AuwBAAPsAgAC7AL/A+wF/xAAB/8BAAP/ + AQAK/wEAAewC/xAAB/8BAAP/AQAK/wEAAewC/xAACf8BAAX/AQAB/wEAA/8BAAH/AQAC/xAAAewC/wHs + BP8D7AMAAuwD/wPsBP8QAAf/AQAC/wIAAv8BAAL/AQAC/wEAAf8BAAHsAv8QAAf/AQAC/wIAAv8BAAL/ + AQAC/wEAAf8BAAHsAv8QAAr/AwAD/wEABf8BAAP/EAAD/wHsA/8D7AQAAuwBAAP/A+wD/xAACP8CAAHs + AQAC/wEAAv8BAAL/AQAB/wEAAewC/xAACP8CAAHsAQAC/wEAAv8BAAL/AQAB/wEAAewC/xAAGv8QAAP/ + AewD/wLsBQAC7AEABP8C7AP/EAAL/wEAAv8BAAL/AQAC/wIAAewD/xAAC/8BAAL/AQAC/wEAAv8CAAHs + A/8QABr/EAAD/wHsAv8C7AH/BQAC7AIABP8C7AL/EAAL/wEAAv8BAAL/AwAB7AX/EAAL/wEAAv8BAAL/ + AwAB7AX/EAAa/xAAA/8B7AL/AuwB/wQABOwDAAL/AuwB/xEAC/8BAAL/AwAB7Aj/EAAL/wEAAv8DAAHs + CP8QABr/EAAD/wHsAv8S7BIAC/8BAAL/AQAB7Ar/EAAL/wEAAv8BAAHsCv8QABr/EAAD/wHsAv8S7BIA + C/8BAAL/AQAB7Ar/EAAL/wEAAv8BAAHsCv8QAAP/FAAD/xAAA/8C7AH/AuwC/wMABOwFAALsEgAL/wEA + Av8BAAHsCv8QAAv/AQAC/wEAAewK/xAAA/8BABL/AQAD/xAABP8B7AH/AuwD/wMAAuwGAALsEgAL/wEA + Av8BAAHsCv8QAAv/AQAC/wEAAewK/xAAA/8BAAr/BwAB/wEAA/8QAAT/AewC/wLsAv8DAALsBQAC7BMA + Av8J/AEAAv8BAAHsCv8QAAL/CewBAAL/AQAB7Ar/EAAD/wEACv8BAAX/AQAB/wEAA/8QAAT/AewC/wPs + A/8BAALsBAAD7BMADP8CAAHsC/8QAAz/AgAB7Av/EAAD/wEAAf8IAAH/AQAF/wEAAf8BAAP/EAAE/wHs + A/8D7AP/AuwDAAPsFAAD/wT8Av8B/AT/AfwL/xAAA/8E7AL/AewE/wHsC/8QAAP/AQAB/wEABv8BAAH/ + BwAB/wEAA/8QAAT/AewE/wPsAv8C7AL/A+wVAAL/AfwE/wH8Af8B/AT/AfwL/xAAAv8B7AT/AewB/wHs + BP8B7Av/EAAD/wEAAf8BAAb/AQAJ/wEAA/8QAAT/AewF/wrsBf8RAAL/AfwE/wH8Af8B/AT/AfwL/xAA + Av8B7AT/AewB/wHsBP8B7Av/EAAD/wEAAf8BAAb/AQAB/wUAA/8BAAP/EAAE/wHsB/8G7Aj/EAAC/wH8 + BP8B/AH/AvwD/wH8C/8QAAL/AewE/wHsAf8C7AP/AewL/xAAA/8BAAH/AQAB/wYAAf8BAAT/AgAB/wEA + A/8QAAX/AewU/xAAAv8B/AT/AfwB/wH8Af8C/AH/AfwL/xAAAv8B7AT/AewB/wHsAf8C7AH/AewL/xAA + A/8BAAH/AQAB/wIAA/8BAAn/AQAD/xAABf8B7BT/EAAC/wH8BP8B/Ab/AfwL/xAAAv8B7AT/AewG/wHs + C/8QAAP/AQAB/wEABv8BAAH/BAAB/wIAAf8BAAP/EAAF/wHsFP8QAAL/AfwE/wH8Bv8B/Av/EAAC/wHs + BP8B7Ab/AewL/xAAA/8BAAH/CAAF/wIAAv8BAAP/EAAF/wLsE/8QAAL/AfwE/wH8Bv8B/Av/EAAC/wHs + BP8B7Ab/AewL/xAAA/8BABL/AQAD/xAABv8B7BP/EAAC/wH8BP8B/Ab/AfwL/xAAAv8B7AT/AewG/wHs + C/8QAAP/AQAB/wcACv8BAAP/EAAG/wLsEv8QABr/EAAa/xAAA/8BAAH/AQAF/wEAA/8GAAH/AQAD/xAA + B/8B7BL/EAAa/xAAGv8QAAP/AQAB/wEABf8BAAH/BQAE/wEAA/8QAAj/AewR/xAAGv8QABr/EAAD/wEA + Af8HAAr/AQAD/xAAA/8BAAP/AQAC7AIAA/8CAAP/AwAD/xAAGv8QABr/EAAD/wEAEv8BAAP/EAAD/wEA + A/8BAAH/AuwB/wEAAf8BAAL/AQAB/wEAAv8BAAP/EAAa/xAAGv8QAAP/FAAD/xAAA/8CAAL/AQAB/wEA + Av8BAAH/AQAC/wEAAv8DAAP/EAAa/xAAGv8QAAP/AQAS/wEAA/8QAAP/AQAD/wEAAv8CAAP/AgAF/wEA + A/8QABr/EAAa/xAAA/8BABL/AQAD/xAAA/8DAAH/AQAO/wEAA/8QABr/EAAa/xAAA/8UAAP/EAAa/xAA + Gv8QABr/EAAa/xAAD/8B9AT/FgAU/xYAFP8WAA//AfQE/xYAFP8BAAL/AuwRABT/AQAC/wLsEQAU/wEA + Av8C7BEAFP8BAAT/EQAU/wEAAf8C7BIAFP8BAAH/AuwSABT/AQAB/wLsEgAU/wEAA/8SABT/AQAC7BMA + FP8BAALsEwAU/wEAAuwTABT/AQAC/xMAFP8BAAHsFAAU/wEAAewUABT/AQAB7BQAFP8BAAH/FAAU/xYA + FP8WABT/FgAU//8AkQAa/xAAGv8QABr/OgAK/wEAAf8DAAH/AQAC/wEAAf8DAAL/EAAJ/wEAAv8BAAL/ + AQAC/wEAAf8BAAP/AQAB/xAAB/8BAAH/AwAC/wEAA/8BAAH/AQAD/wEAAf86AA3/AQAC/wEAAf8CAAT/ + AQAB/xAADP8BAAL/AQAC/wEAAf8BAAP/AQAB/xAADP8BAAH/AQAD/wEAAf8BAAP/AQAB/wkAKP8JAA3/ + AQAC/wQAAv8CAAL/EAAM/wEAAv8DAAL/AQAD/wEAAf8QAAr/AgAD/wMAA/8DAAL/CQAo/wkADf8BAAL/ + AgAB/wEAAf8BAAT/EAAM/wEAAv8BAAL/AQAB/wEAAf8BAAH/AQAB/xAACf8BAAX/AQAB/wEAA/8BAAH/ + AQAC/wkAA/8L7AT/AgAG/wIABv8CAAT/CQAM/wMAAf8BAAL/AQAC/wMAAf8QAAv/AwAB/wMAAv8CAAH/ + AgAB/xAACv8DAAP/AQAF/wEAA/8JABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAa/xAAGv8QABr/ + CQAC/wvsA/8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv8JABr/OgAa/wkAEP8BAATsAQAC/wEABOwBAAL/ + AQAE7AEAAv8JABr/OgAa/wkAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAa/zoAGv8JABL/ + AgAG/wIABv8CAAT/CQAa/zoABP8U7AL/CQAo/wkAGv86AAP/FAAB7AL/CQAo/wkAGv86AAP/AQAL/wfs + AQAB7AL/CQAD/wvsBP8CAAb/AgAG/wIABP8JABr/OgAD/wEACv8HAAHsAQAB7AL/CQAR/wEAAuwBAAT/ + AQAC7AEABP8BAALsAQAD/wkACf8HAAr/OgAD/wEAAv8I7AEABf8BAAHsAQAB7AL/CQAC/wvsA/8BAATs + AQAC/wEABOwBAAL/AQAE7AEAAv8JABr/OgAD/wEAAf8IAAHsAQAF/wEAAewBAAHsAv8JABD/AQAE7AEA + Av8BAATsAQAC/wEABOwBAAL/CQAa/zoAA/8BAAH/AQAG/wEAAewHAAH/AQAB7AL/CQAD/wvsA/8BAALs + AQAE/wEAAuwBAAT/AQAC7AEAA/8JAAz/AQAN/zoAA/8BAAH/AQAG/wEAAewI/wEAAewC/wkAEv8CAAb/ + AgAG/wIABP8JAAv/AwAM/zoAA/8BAAH/AQAG/wEAAewFAAP/AQAB7AL/CQAo/wkACv8BAAH/AQAB/wEA + C/86AAP/AQAB/wEAAf8GAAHsAQAE/wIAAf8BAAHsAv8JACj/CQAJ/wEAAv8BAAL/AQAK/zoAA/8BAAH/ + AQAB/wIAA/8BAAHsCP8BAAHsAv8JAAP/C+wE/wIABv8CAAb/AgAE/wkADP8BAA3/OgAD/wEAAf8BAAb/ + AQAB7AQAAf8CAAH/AQAB7AL/CQAR/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkADP8BAA3/OgAD/wEA + Af8IAAX/AgAC/wEAAewC/wkAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAM/wEADf86AAP/ + AQAC/wfsCf8BAAHsAv8JABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAM/wEADf86AAP/AQAB/wcA + AewJ/wEAAewC/wkAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAM/wEADf86AAP/AQAB/wEA + Bf8BAAHsAv8GAAH/AQAB7AL/CQAS/wIABv8CAAb/AgAE/wkADP8BAA3/OgAD/wEAAf8BAAX/AQAB7AUA + BP8BAAHsAv8JACj/CQAa/zoAA/8BAAH/BwAK/wEAAewC/wkAKP8JABr/OgAD/wEAEv8BAAHsAv8JAAP/ + C+wE/wIABv8CAAb/AgAE/wkAGv86AAP/FAAB7AL/CQAR/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkA + Gv86AAP/AQAS/wEAAewC/wkAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAa/xEAAv8nAAP/ + AQAS/wEAAewC/wkAEP8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv8JABr/EQAD/wQAAf8CAAH/AgAB/wEA + Af8DAAH/FQAD/xQAA/8JAAP/C+wD/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkAGv8SAAP/AwAB/wIA + Af8CAAH/AQAB/wMAAf8VABr/CQAS/wIABv8CAAb/AgAE/wkAD/8B9AT/GQAD/wIAAf8CAAH/AgAB/wEA + Af8DAAH/FQAP/wH0BP8PACj/CQAU/wEAAv8C7BUAA/8BAAH/AgAD/wIAAf8DAAH/FQAU/wEAAv8C7AoA + KP8JABT/AQAB/wLsFQAD/wIAAf8CAAH/AgAB/wEAAf8DAAH/AQAE/wHsDwAU/wEAAf8C7DwAFP8BAALs + FQAD/wMAAf8CAAH/AgAB/wEAAf8BAAH/AQAB/wEAA/8B7BAAFP8BAALsPQAU/wEAAewVAAP/AwAD/wEA + A/8CAAL/AQAC/wEAAv8B7BEAFP8BAAHsPgAU/xcAAv8TAAH/AewSABT/gAAB7OIAIf8JACH/MwAh/wkA + Bf8K7BL/CQAh/zMAIf8JAAT/DOwR/wkAIf8zACH/CQAD/wPsCAAD7BD/CQAD/xsAA/8zAAT/B+wE/w/s + A/8JAAL/A+wBAAH/BgAB/wEAA+wP/wkAA/8BABnsAQAD/zMAD/8B7A3/AewD/wkAAf8D7AEAAf8IAAH/ + AQAD7A7/CQAD/wEAGewBAAP/MwAD/wfsBf8B7A3/AewD/wkAAf8C7AEAAf8CAAH/BAAB/wIAAf8BAALs + Dv8JAAP/AQAC7BX/AuwBAAP/BQAo/wYAD/8P7AP/CQAB/wLsAwAB/wYAAf8DAALsDv8JAAP/AQAZ7AEA + A/8FACj/BgAh/wkAAf8C7AUAAf8CAAH/BQAC7A7/CQAD/wEAAuwV/wLsAQAD/wUAAv8kAAL/BgAE/wfs + BP8P7AP/CQAB/wLsBgAC/wYAC+wF/wkAA/8BABnsAQAD/wUAAv8kAAL/BgAP/wHsDf8B7AP/CQAB/wLs + BQAB/wIAAf8FAAzsBP8JAAP/AQAC7BX/AuwBAAP/BQAC/w4ABv8BAAb/AQAG/wIAAv8GAAP/B+wF/wHs + Df8B7AP/CQAB/wLsAwAB/wYAAf8CAAPsCAAD7AP/CQAD/wEAGewBAAP/BQAC/w4AAf8EAAH/AQAB/wQA + Af8BAAH/BAAB/wIAAv8GAA//D+wD/wkAAf8C7AEAAf8CAAH/BAAB/wIAA+wBAAH/BgAB/wEAA+wC/wkA + A/8BAATsEf8E7AEAA/8FAAL/DgAB/wQAAf8BAAH/BAAB/wEAAf8EAAH/AgAC/wYAIf8JAAH/A+wBAAH/ + CAAD7AEAAf8IAAH/AQAD7AH/CQAD/wEAGewBAAP/BQAC/w4AAf8EAAH/AQAB/wQAAf8BAAH/BAAB/wIA + Av8GAAT/B+wE/w/sA/8JAAL/A+wBAAH/BgAB/wLsAQAB/wIAAf8EAAH/AgAB/wEAAuwB/wkAA/8BABns + AQAD/wUAAv8OAAH/BAAB/wEAAf8EAAH/AQAB/wQAAf8CAAL/BgAP/wHsDf8B7AP/CQAD/wPsCAAC7AMA + Af8GAAH/AwAC7AH/CQAD/xsAA/8FAAL/DgAG/wEABv8BAAb/AgAC/wYAA/8H7AX/AewN/wHsA/8JAAT/ + DOwFAAH/AgAB/wUAAuwB/wkADv8FAA7/BQAC/yQAAv8GAA//D+wD/wkABf8L7AYAAv8GAALsAf8JAA// + A+wP/wUAAv8kAAL/BgAh/wkADv8C7AUAAf8CAAH/BQAC7AH/CQAh/wUAKP8GAAT/B+wE/w/sA/8JAA7/ + AuwDAAH/BgAB/wMAAuwB/wkAA/8LAAX/CwAD/wUAKP8GAA//AewN/wHsA/8JAA7/AuwBAAH/AgAB/wQA + Af8CAAH/AQAC7AH/CQAD/wEAC+wD/wvsAQAD/wUAKP8GAAP/B+wF/wHsDf8B7AP/CQAO/wPsAQAB/wgA + Af8BAAPsAf8JAAP/AQAZ7AEAA/8FACj/BgAP/w/sA/8JAAn/CewBAAH/BgAB/wEAA+wC/wkAA/8BABns + AQAD/wUAAv8k7AL/BgAh/wkACP8L7AgAA+wD/wkAA/8BAATsEf8E7AEAA/8FAAL/JOwC/wYABP8H7AT/ + D+wD/wkAB/8D7AcADOwE/wkAA/8BABnsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAP/wHsDf8B7AP/ + CQAG/wPsAQAB/wYAAf8K7AX/CQAD/wEAAuwV/wLsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAD/wfs + Bf8B7A3/AewD/wkABf8D7AEAAf8IAAH/AQAD7Ar/CQAD/wEAGewBAAP/BQAC/w7sBgAB7AYAAewGAALs + Av8GAA//D+wD/wkABf8C7AEAAf8CAAH/BAAB/wIAAf8BAALsCv8JAAP/AQAC7BUAAuwBAAP/BQAC/w7s + BgAB7AYAAewGAALsAv8GACH/CQAF/wLsAwAB/wYAAf8DAALsCv8JAAP/AQAZ7AEAA/8FAAL/DuwGAAHs + BgAB7AYAAuwC/wYABP8H7AT/D+wD/wkABf8C7AUAAf8CAAH/BQAC7Ar/CQAD/wEAAuwVAALsAQAD/wUA + Av8O7AYAAewGAAHsBgAC7AL/BgAP/wHsDf8B7AP/CQAF/wLsBgAC/wYAAuwK/wkAA/8BABnsAQAD/wUA + Av8k7AL/BgAD/wfsBf8B7A3/AewD/wkABf8C7AUAAf8CAAH/BQAC7Ar/CQAD/wEAAuwVAALsAQAD/wUA + Av8k7AL/BgAP/w/sA/8JAAX/AuwDAAH/BgAB/wMAAuwK/wkAA/8BABnsAQAD/wUAKP8GACH/CQAF/wLs + AQAB/wIAAf8EAAH/AgAB/wEAAuwK/wkAA/8BAALsFQAC7AEAA/8FACj/BgAE/wfsBP8P7AP/CQAF/wPs + AQAB/wgAAf8BAAPsCv8JAAP/AQAZ7AEAA/8zAA//AewN/wHsA/8JAAb/A+wBAAH/BgAB/wEAA+wL/wkA + A/8BABnsAQAD/zMAA/8H7AX/AewN/wHsA/8JAAf/A+wIAAPsDP8JAAP/GwAD/zMAD/8P7AP/CQAI/wzs + Df8JACH/MwAh/wkACf8K7A7/CQAh/zMAIf8JACH/CQAh/zMAIf//AKwAAfQh7wEHAfIB/wUAAfQh7wEH + AfIB/1kAAfIBAAFDHhUBEAERAbwB9AUAAfIVAAYOBgABEQG8AfRZAAHyAQ4B9x68AewBFQG8AfQFAAHy + FAABDgEVARQCEwEUAREBDgQAAQ4BFQG8AfQtACjsBAAB8gEOAfcevAHsARUBvAH0BQAB8hQAAUMB9wEH + Au8B9wFtARAEAAEOARUBvAH0LQAP7AoAD+wEAAHyAQ4B9x68AewBFQG8AfQFAAHyFAABQwEHAe8B7AES + ARMBQwEOBAABDgEVAbwB9C0AD+wBAAj/AQAP7AQAAfIBDgH3BLwB9xTsAe8EvAHsARUBvAH0BQAB8gMA + AQ4MQwEQAwABQwEHAe0BFQgAAQ4BFQG8AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAETEQ4DAAHs + BLwB7AEVAbwB9AUAAfIDAAERDOwBbQMAAUMBBwGSARMBDwEOBgABDgEVAbwB9AMAKP8CAA/sAQAI/wEA + D+wEAAHyAQ4B9wS8ARMBFA/vARMDAAHsBLwB7AEVAbwB9AUAAfIEAAEOARAJEQEQAQ4DAAFDAQcC8gHx + AQcBEAUAAQ4BFQG8AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITD7wB6gMAAewEvAHsARUBvAH0 + BQAB8gQAAQ4B6wnsARUEAAFDAQcB7wHsAW0B6gEOBQABDgEVAbwB9AMAKP8CAA/sAQAI/wEAD+wEAAHy + AQ4B9wS8AhMOvAHsAUMDAAETAZIDvAHsARUBvAH0BQAB8gQAAQ4B7wK8AQcF7AH3AeoEAAFDAQcBkgET + Ag8BDgUAAQ4BFQG8AfQDAA//AQAY/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw28AQcBFQEOAwABDgHq + A7wB7AEVAbwB9AUAAfIEAAEOAe8CvAHvAg4CDwEAAewB6gQAAUMBBwHvAesBEgETARABDgQAAQ4BFQG8 + AfQDAA//AgAX/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw68AQcBEgMAAesBBwO8AewBFQG8AfQFAAHy + BAABDgHvArwB7wEOAewBBwHtAQ4B7AHqBAABEQGSAe8BBwLvARQBDgQAAQ4BFQG8AfQDAA//AwAW/wIA + D+wBAAj/AQAP7AQAAfIBDgH3BLwCEw+8AfcB6gEOAesB7wS8AewBFQG8AfQFAAHyBAABDgHvAewBFAEV + AQABEQEUAUMBAAHsAeoEAAEOAUMBFQIUARUBDwUAAQ4BFQG8AfQDAA//BAAV/wIAD+wBAAj/AQAP7AQA + AfIBDgH3BLwCEwa8AewB6wHsB7wB9wFtAQcFvAHsARUBvAH0BQAB8gQAAQ4B7wETARAC6gEPARAC6gGS + AeoQAAEOARUBvAH0AwAP/wUAFP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAEVAQABQw+8AewBFQG8 + AfQFAAHyBAABDgHvARMBFQL3ARUBEgK8AQcB6gIAAQ4MDwEOAQABQwG8AfQDAA//BgAT/wIAD+wBAAj/ + AQAP7AQAAfIBDgH3BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEOAe8BEwEAAg4BAAESArwBBwHq + AgAB6wztAUMBAAERAbwB9AMAD/8HABL/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITBrwBFQEAAUMPvAHs + ARUBvAH0BQAB8gQAAQ4C7wTtAe8CvAEHAeoCAAEQAUMKFQERAQ4BAAERAbwB9AMAD/8IABH/AgAP7AEA + CP8BAA/sBAAB8gEOAfcEvAITBrwBFQEAAUMPvAHsARUBvAH0BQAB8gQAAQ4B6gltAUMDAAEVCW0BEgEO + AgABEQG8AfQDAA//CQAQ/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEwEHAfcEkgERAQABEAWSAfcBBwi8 + AewBFQG8AfQFAAHyEwABbQi8AQcBkgEOAgABEQG8AfQDAA//CgAP/wIAD+wBAAj/AQAP7AQAAfIBDgH3 + BLwCEwHvAQ4MAAERAewIvAHsARUBvAH0BQAB8hMAAW0IvAEHAZIBDgIAAREBvAH0AwAP/woAD/8CAArs + BgAI/wcACewEAAHyAQ4B9wS8AhMB7wEODAABEQHsCLwB7AEVAbwB9AUAAfITAAFtAfcGQwHtAQcBkgEO + AgABEQG8AfQDAA//CQAQ/wIACuwBABP/AQAJ7AQAAfIBDgH3BLwCEwHvAQ4MAAERAewIvAHsARUBvAH0 + BQAB8hMAAW0B7wZtAfcBBwGSAQ4CAAERAbwB9AMAD/8IABH/AgAL7AEAEf8BAArsBAAB8gEOAfcBvAEH + Au0CQwHsAQ4MAAEPAW0E7QH3A7wB7AEVAbwB9AUAAfITAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8HABL/ + AgAM7AEAD/8BAAvsBAAB8gEOAfcBvAHsGAABEwO8AewBFQG8AfQFAAHyBAAMDgMAAW0IvAEHAZIBDgIA + AREBvAH0AwAP/wYAE/8CAA3sAQAN/wEADOwEAAHyAQ4B9wG8AewYAAETA7wB7AEVAbwB9AUAAfIDAAER + DOwB6gIAAW0IvAEHAZIBDgIAAREBvAH0AwAP/wUAFP8CAA7sAQAL/wEADewEAAHyAQ4B9wG8Ae8E6wFt + AQ4MAAEPARME6wHtA7wB7AEVAbwB9AUAAfIDAAEOARQLEwFDAgABbQi8AQcBkgEOAgABQwG8AfQDAA// + BAAV/wIAD+wBAAn/AQAO7AQAAfIBDgH3BrwB7wEODAABEQHsCLwB7AEVAbwB9AUAAfIEAAEOARQIEgET + AREDAAEUCewBbQEOAQABDgEVAbwB9AMAD/8DABb/AgAQ7AEAB/8BAA/sBAAB8gEOAfcGvAHvAQ4MAAER + AewIvAHsARUBvAH0BQAB8gQAAQ4B7wIHBbwBBwHvAeoQAAEOARUBvAH0AwAP/wIAF/8CABHsAQAF/wEA + EOwEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8AewBFQG8AfQFAAHyBAABDgHvAW0B6gS8Ae8BEAHsAeoGAAEQ + AUMDFQERAQ4DAAEOARUBvAH0AwAP/wEAGP8CABLsAQAD/wEAEewEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8 + AewBFQG8AfQFAAHyBAABDgHvAZIBbQHqAQcBvAHtARIB7AH3AeoGAAHrApIC7QFtAREDAAEOARUBvAH0 + AwAo/wIAE+wBAAH/AQAS7AQAAfIBDgH3BrwBBwHqBBMBDgMAARUDEwFtAfcIvAHsARUBvAH0BQAB8gQA + AQ4B7wG8AZIBEgLsAm0CBwHqBQABDgGSAQcB9wLrARIBEAMAAQ4BFQG8AfQDACj/AgAU7AEAE+wEAAHy + AQ4B9wy8ARUDAAGSDbwB7AEVAbwB9AUAAfIEAAEOAe8BvAEHAZIBEQEPAeoB7wG8AQcB6gUAAQ4CkgHq + BwABDgEVAbwB9AMAKP8CACjsBAAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAbwB7AER + Ae8BBwHrAUMCBwHqBQABDgKSAeoHAAEOARUBvAH0AwAo/wIAKOwEAAHyAQ4B9wy8ARUDAAGSDbwB7AEV + AbwB9AUAAfIEAAEOAe8B7AHqAe0BBwG8Ae8B7AEUAe0B6gUAAQ4BkgK8Au8BFAQAAQ4BFQG8AfRZAAHy + AQ4B9wy8ARUDAAGSDbwB7AEVAbwB9AUAAfIEAAEOAe8C7AS8Ae8B6gGSAeoFAAEOAZICBwLtARUEAAEO + ARUBvAH0LQAP7B0AAfIBDgH3DLwBEgMQAfcNvAHsARUBvAH0BQAB8gQAAQ4B7Aj3Ae0BEwUAAQ4BkgH3 + AW0CDgUAAQ4BFQG8AfQtAA7sHgAB8gEOAfcMvAQHDrwB7AEVAbwB9AUAAfIFAAoOBgABDgGSAe8B7AIV + ARABDgMAAQ4BFQG8AfRZAAHyAQ4B9x68AewBFQG8AfQFAAHyFQABDgHsAu8CkgESAQ8EAAERAbwB9FkA + AfIBAAESHm0BFAFDAbwB9AUAAfIWAAEVAeoDbQFDAQ4EAAERAbwB9FkAAfMhbQHsAfEB9AUAAfMhbQHs + AfEB9P8AggAh/wkAIf9dACH/CQAh/10AIf8JACH/LwAo7AYAIf8JAAT/GuwD/wUAKOwCACjsBgAh/wkA + If8FACjsAgAo7AYADv8E7A//CQAh/wUAKOwCACjsBgAO/wTsD/8JAAP/GuwE/wUAKOwCACjsBgAO/wTs + D/8JACH/BQAo7AIAKOwGAA7/BOwP/wkAIf8FACjsAgAo7AYAIf8JAAT/GuwD/wUAJOwE/wIAKOwGACH/ + CQAh/wUAIewH/wIAKOwGACH/CQAh/wUABf8a7An/AgAo7AYADv8BkgPsD/8JAAP/GuwE/wUACP8W7AX/ + AewE/wIAKOwGAA7/AZID7A//CQAh/wUAD/8L7An/AuwD/wIAKOwGAA7/AZID7AHyDv8JACH/BQAe/wHs + Bf8B7AP/AgAo7AYADv8BBwPsAbwO/wkABP8a7AP/BQAe/wLsBP8C7AL/AgAo7AYADv8B8QTsDv8JACH/ + BQAX/wPsBf8C7AT/AewC/wIAKOwGAA//BOwB7w3/CQAh/wUAGf8C7AX/AewE/wHsAv8CACjsBgAP/wHx + BOwB7wz/CQAD/xrsBP8FABr/AewF/wHsBP8B7AL/AgAo7AYAEP8BvATsAe8B9Ar/CQAh/wUAGv8C7AT/ + AewE/wLsAf8CACjsBgAR/wG8BOwB7QH0Cf8JACH/BQAT/wTsBP8C7An/AewB/wIAKOwGABL/AfAE7AGS + Cf8JAAT/GuwD/wUAFv8C7AX/AewK/wIAKOwGABP/AfIE7AHvCP8JACH/BQAX/wHsCf8G7AH/AgAo7AYA + FP8B8gTsAfIH/wkAIf8FABf/AuwG/wnsAgAo7AYAFf8BvAPsAe8H/wkAA/8a7AT/BQAQ/wHsB/8C7AT/ + CuwCACjsBgAW/wTsB/8JACH/BQAQ/wPsBv8C7AL/C+wCACjsBgAG/wHzAe8BkgHsAe8L/wGSA+wH/wkA + If8FABL/A+wH/wzsAgAo7AYABv8B9APsAe0L/wHtA+wH/wkABP8a7AP/BQAU/wLsBv8M7AIAKOwGAAf/ + BOwB8gn/AfMD7AHtB/8JACH/BQAV/wLsBP8N7AIAKOwGAAf/AQcD7AH3Cf8B9wPsAe8H/wkAIf8FAA3/ + BOwF/wPsAv8N7AIAKOwGAAf/AfQE7AHvB/8B7wTsAfMH/wkAA/8a7AT/BQAQ/wLsCf8N7AIAKOwGAAj/ + AQcE7AGSAfAB9AH/AfQB8AGSBOwBBwj/CQAh/wUAEf8B7An/DewCACjsBgAJ/wHvDewB7wn/CQAh/wUA + Ef8I7AL/DewCACjsBgAK/wHwC+wB8Ar/CQAE/xrsA/8FABv/DewwAAv/AfQBvAH3BOwB7QHvAbwM/wkA + If8FABz/DOwCAA/sHwAh/wkAIf8FABz/DOwCAA7sIAAh/wkAA/8a7AT/XQAh/wkAIf9dACH/CQAh/10A + If8JACH/1gABQgFNAT4HAAE+AwABKAMAAagDAAH8AwABAQEAAQEFAAGgARcWAAP//wD/AP8A9AAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/ + AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/ + AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAT8B/wGAAgABDwH/AeACAAEDAf8B+AMAAf8DAAH+AwABfwH/AYACAAEfAf8B4AIA + AQcB/wH4AgABAQH/AwAB/gMAAv8BgAIAAT8B/wHgAgABDwH/AfgCAAEDAf8DAAH+AgABAQL/AYACAAF/ + Af8B4AIAAR8B/wH4AgABBwH/AwAB/gIAAQMC/wGAAgAC/wHgAgABPwH/AfgCAAEPAf8DAAH+AgABBwL/ + AYABAAEBAv8B4AIAAX8B/wH4AgABHwH/AwAG/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAb/AYACAAEH + Af8B4AIAAQEB/wH4AwABfwMABv8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEB + Af8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/ + CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMA + AX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGA + AgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHg + AgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4 + AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/ + AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgA + AT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEH + Af8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEB + Af8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/ + CAABPwGAAgABDwH/AeACAAEBAf8B+AMAAf8IAAE/AYACAAEfAf8B4AIAAQEB/wH4AgABAQH/CAABPwGA + AgABPwH/AeACAAEBAf8B+AIAAQMB/wMABv8BgAIAAX8B/wHgAgABAwH/AfgCAAEHAf8DAAb/AYACAAL/ + AeACAAEHAf8B+AIAAQ8B/wMABv8BgAEAAQEC/wHgAgABDwH/AfgCAAEfAf8DAAHwAwABAQH8BAABfwX/ + AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8 + BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMA + AQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/ + Bf8BwAMAAQcDABX/AwAK/wH+BAABDwGAAwABAwMACv8B/gQAAQ8BgAMAAQMDAAX/AcAEAAEOBAABDwGA + AwABAwMABf8BwAQAAQ4EAAEPAYADAAEDAwAF/wHABAABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0A + AQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQA + AQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGA + AwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAED + DQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEO + BAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEP + AYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMA + AQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMDAAX/AcABAAEfAv8B/gQA + AQ8BgAMAAQMDAAX/AcABAAE/Av8B/gQAAQ8BgAMAAQMDAAX/AcABAAF/Av8B/gQAAQ8BgAMAAQMDAAr/ + Af4EAAEPAYADAAEDAwAK/wH+BAABDwGAAwABAwMAFf8DAAX/AfwEAAF/BAABHwX/AwAF/wH8BAABfwQA + AR8F/wMABf8B/AQAAX8EAAEfBf8IAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwKAAF/ + Av8B/AQAAX8EAAEcCgAD/wH8BAABfwQAARwJAAEBA/8B/AQAAX8EAAEfBf8DAAX/AfwEAAF/BAABHwX/ + AwAF/wH8BAABfwQAAR8F/wMABf8B/AQAAX8EAAEfBf8DAAs= + + + + 1347, 18 + + + 1431, 18 + + + 1544, 18 + + \ No newline at end of file diff --git a/ShiftOS/File Saver.vb b/ShiftOS/File Saver.vb new file mode 100644 index 0000000..dda9175 --- /dev/null +++ b/ShiftOS/File Saver.vb @@ -0,0 +1,721 @@ +Imports System.IO +Imports System.Drawing.Drawing2D +Imports System.Globalization +Imports System.Windows.Forms + +Public Class File_Saver + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 400 + Public minimumsizeheight As Integer = 177 + Public ShiftOSPath As String = "C:\ShiftOS\" + + Dim itemsdeleted As Integer + Dim filetype As Integer + Public saveextention As String = ".txt" + Public savingprogram As String = "textpad" + + Public useformatchooser As Boolean = False + Public nondefaultextention(4) As String 'If this is not enough add more, just update the item adding below + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + showcontents() + + lbextention.Text = saveextention + showcontents() + If useformatchooser = True Then + cmbformatchooser.BringToFront() + cmbformatchooser.Show() + cmbformatchooser.Items.Clear() + cmbformatchooser.Items.Add(saveextention) + If Not nondefaultextention(0) = "" Then cmbformatchooser.Items.Add(nondefaultextention(0)) + If Not nondefaultextention(1) = "" Then cmbformatchooser.Items.Add(nondefaultextention(1)) + If Not nondefaultextention(2) = "" Then cmbformatchooser.Items.Add(nondefaultextention(2)) + If Not nondefaultextention(3) = "" Then cmbformatchooser.Items.Add(nondefaultextention(3)) + If Not nondefaultextention(4) = "" Then cmbformatchooser.Items.Add(nondefaultextention(4)) + cmbformatchooser.SelectedIndex = 0 + Else + cmbformatchooser.Hide() + End If + + ShiftOSDesktop.pnlpanelbuttonfilesaver.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonfilesaver, ShiftOSDesktop.tbfilesavericon, ShiftOSDesktop.tbfilesavertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(600, 377) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.filesavername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtfileskimmericon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.filesavericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + showcontents() + End Sub + + Private Sub showcontents() + lvfiles.Items.Clear() + + lvfiles.Items.Add("Exit Folder", 5) + + Dim dir As New DirectoryInfo(lbllocation.Text) + Dim files As FileInfo() = dir.GetFiles() + Dim file As FileInfo + Dim folders As DirectoryInfo() = dir.GetDirectories() + Dim folder As DirectoryInfo + + For Each folder In folders + Dim foldername As String = folder.Name + lvfiles.Items.Add(foldername, 0) + Next + + For Each file In files + Dim filename As String = file.Name + Dim fileex As String = file.Extension + + Select Case fileex + Case ".txt" + filetype = 2 + Case ".doc" + filetype = 2 + Case ".docx" + filetype = 2 + Case ".lst" + filetype = 2 + Case ".png" + filetype = 3 + Case ".jpg" + filetype = 3 + Case ".jpeg" + filetype = 3 + Case ".bmp" + filetype = 3 + Case ".gif" + filetype = 3 + Case ".avi" + filetype = 4 + Case ".m4v" + filetype = 4 + Case ".mp4" + filetype = 4 + Case ".wmv" + filetype = 4 + Case ".mp3" + filetype = 4 + Case ".dll" + filetype = 6 + Case ".exe" + filetype = 7 + Case ".sft" + filetype = 8 + Case ".dri" + filetype = 9 + Case ".pic" + filetype = 3 + Case ".skn" + filetype = 10 + Case ".nls" + filetype = 11 + Case ".icp" + filetype = 12 + Case ".stp" + filetype = 13 + Case ".trm" + filetype = 14 + Case ".sh" + filetype = 14 + Case ".bat" + filetype = 14 + Case ".command" + filetype = 14 + Case ".saa" + filetype = 15 + Case ".flood" + filetype = 16 + Case ".url" + filetype = 17 + Case ".urls" + filetype = 18 + Case Else + filetype = 1 + End Select + + Select Case savingprogram + Case "textpad", "sysinf" + If fileex = ".txt" Then lvfiles.Items.Add(filename, filetype) + Case "skinloader" + If fileex = ".skn" Then lvfiles.Items.Add(filename, filetype) + Case "artpad" + If fileex = ".pic" Then lvfiles.Items.Add(filename, filetype) + Case "namechanger" + If fileex = ".nls" Then lvfiles.Items.Add(filename, filetype) + Case "orcwrite" + If fileex = ".owd" Then lvfiles.Items.Add(filename, filetype) + End Select + Next + + ShiftOSDesktop.fileopenerlastdirectory = lbllocation.Text + End Sub + + Private Sub lvfiles_MouseClick(sender As Object, e As MouseEventArgs) Handles lvfiles.MouseClick + 'need to remove the file extention! + If lvfiles.SelectedItems(0).Text.Contains(".") Then + txtfilename.Text = lvfiles.SelectedItems(0).Text.Substring(0, lvfiles.SelectedItems(0).Text.Length - 4) + End If + End Sub + + Private Sub lbfiles_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lvfiles.MouseDoubleClick + If lvfiles.SelectedItems(0).Text.Contains(".") Then + savefile() + Else + If lvfiles.SelectedItems(0).Text = "Exit Folder" Then + If lbllocation.Text = "C:/ShiftOS/" Or lbllocation.Text = "C:/ShiftOS" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "Unable to move into a higher directory due to error reading the requested folder on the drive." & Environment.NewLine & Environment.NewLine & "You can only enter directories formatted in the ShiftOS file system (ShiftFS)" + infobox.Show() + Else + Dim endloop As Boolean = False + lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1) + + While endloop = False + If lbllocation.Text.Substring(lbllocation.Text.Length - 1) = "/" Then + endloop = True + Else + lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1) + End If + End While + showcontents() + End If + Else + 'Check if selected item is a file or folder. It it's a folder check its extension + Dim textboxtext As String + textboxtext = lbllocation.Text + Dim last As String + Dim selit As String + last = textboxtext.Substring(textboxtext.Length - 1) + If last = "/" Then + selit = lvfiles.SelectedItems(0).Text + lbllocation.Text = lbllocation.Text + selit + Else + selit = lvfiles.SelectedItems(0).Text + lbllocation.Text = lbllocation.Text + ("/" & selit) + End If + + showcontents() + End If + End If + End Sub + + Private Sub btndeletefile_Click(sender As Object, e As EventArgs) + If lvfiles.SelectedItems(0).Text Like "*.*" Then + My.Computer.FileSystem.DeleteFile(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text) + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + showcontents() + Else + My.Computer.FileSystem.DeleteDirectory(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text, FileIO.DeleteDirectoryOption.DeleteAllContents) + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + showcontents() + End If + End Sub + + Private Sub btnnewfolder_Click(sender As Object, e As EventArgs) + infobox.lblintructtext.Text = "Please enter a name for your new folder:" + infobox.txtuserinput.Text = "" + infobox.lblintructtext.Show() + infobox.txtuserinput.Show() + infobox.Show() + scaninput.Start() + End Sub + + Private Sub scaninput_Tick(sender As Object, e As EventArgs) Handles scaninput.Tick + If infobox.Visible = False Then + My.Computer.FileSystem.CreateDirectory(lbllocation.Text & "/" & infobox.txtuserinput.Text) + showcontents() + scaninput.Stop() + End If + End Sub + + Private Sub btnsave_Click(sender As Object, e As EventArgs) Handles btnsave.Click + If lbllocation.Text = "C:/ShiftOS/Home/Desktop" Then + ShiftOSDesktop.RefreshIcons() + End If + savefile() + End Sub + + Dim filename As String + Private Sub savefile() + If useformatchooser = True Then + filename = txtfilename.Text & cmbformatchooser.SelectedItem.ToString + Else + filename = txtfilename.Text & saveextention + End If + If txtfilename.Text = "" Then + Else + Select Case savingprogram + Case "sysinf" + Dim sw As New IO.StreamWriter(lbllocation.Text & "/" & txtfilename.Text & ".txt") + sw.WriteLine("### SHIFTOS SYSTEM INFORMATION DUMP ###") + sw.WriteLine(" ") + sw.WriteLine("ShiftOS Version: " & ShiftOSDesktop.ingameversion) + sw.WriteLine("User Name: " & ShiftOSDesktop.username) + Dim PrcName As String + + PrcName = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", Nothing) + sw.WriteLine("CPU: " & PrcName) + sw.WriteLine("Random Access Memory (RAM): " & (String.Format("{0} Megabytes", System.Math.Round(My.Computer.Info.TotalPhysicalMemory / (1024 * 1024)), 2).ToString)) + sw.Close() + Me.Close() + ShiftOSDesktop.refreshIcons() + Case "textpad" + My.Computer.FileSystem.WriteAllText(lbllocation.Text & "/" & filename, TextPad.txtuserinput.Text, False) + TextPad.needtosave = False + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + TextPad.codepointsearned + If ShiftOSDesktop.boughttitletext = True Then + TextPad.lbtitletext.Text = TextPad.lbtitletext.Text & " - You earned " & TextPad.codepointsearned & " codepoints!" + TextPad.setuptitlebar() + Else + infobox.title = "Textpad - " & TextPad.codepointsearned & " codepoints!" + infobox.textinfo = "Awesome! That document you just created with Textpad has earned you " & TextPad.codepointsearned & " codepoints! " & Environment.NewLine & Environment.NewLine & "Keep those docs coming for even more codepoints!" + infobox.Show() + End If + TextPad.codepointsearned = 0 + TextPad.tmrshowearnedcodepoints.Start() + Case "skinloader" + Skins.saveskin(lbllocation.Text & " / " & filename) + Case "iconmanager" + System.IO.Compression.ZipFile.CreateFromDirectory(ShiftOSPath + "Shiftum42\Icons", lbllocation.Text & " / " & filename) + Icon_Manager.unsavedchanges = False + Case "namechanger" + IO.File.WriteAllLines(lbllocation.Text & "/" & filename, Name_Changer.savelines) + Case "artpad" + ArtPad.savelocation = lbllocation.Text & "/" & filename + ArtPad.saveimage() + ArtPad.canvasbitmap.Save("C:\ShiftOS\SoftwareData\AdvStart\Recent\" & txtfilename.Text & ".pic", Imaging.ImageFormat.Bmp) + ArtPad.needtosave = False + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + ArtPad.codepointsearned + If ShiftOSDesktop.boughttitletext = True Then + ArtPad.lbtitletext.Text = ArtPad.lbtitletext.Text & " - You earned " & ArtPad.codepointsearned & " codepoints!" + ArtPad.setuptitlebar() + Else + infobox.title = "Artpad - " & ArtPad.codepointsearned & " codepoints!" + infobox.textinfo = "Awesome! That picture you just created with Artpad has earned you " & ArtPad.codepointsearned & " codepoints! " & Environment.NewLine & Environment.NewLine & "Keep those artworks coming for even more codepoints!" + infobox.Show() + End If + ArtPad.codepointsearned = 0 + ArtPad.tmrshowearnedcodepoints.Start() + Case "orcwrite" + OrcWrite.savepath = lbllocation.Text & "/" & filename + OrcWrite.savedocument() + Dim sw As New IO.StreamWriter("C:\ShiftOS\SoftwareData\AdvStart\Recent\" & txtfilename.Text + ".owd") + sw.Write(OrcWrite.RichTextBox1.Rtf) + sw.Close() + End Select + Me.Close() + End If + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/File Skimmer.Designer.vb b/ShiftOS/File Skimmer.Designer.vb new file mode 100644 index 0000000..054ed92 --- /dev/null +++ b/ShiftOS/File Skimmer.Designer.vb @@ -0,0 +1,413 @@ + _ +Partial Class File_Skimmer + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(File_Skimmer)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.lvfiles = New System.Windows.Forms.ListView() + Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components) + Me.pnlbreak = New System.Windows.Forms.Panel() + Me.pnloptions = New System.Windows.Forms.Panel() + Me.btndeletefile = New System.Windows.Forms.Button() + Me.btnnewfolder = New System.Windows.Forms.Button() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.lbllocation = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.fileactions = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.DeleteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + Me.pnloptions.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.fileactions.SuspendLayout() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.lvfiles) + Me.pgcontents.Controls.Add(Me.pnlbreak) + Me.pgcontents.Controls.Add(Me.pnloptions) + Me.pgcontents.Controls.Add(Me.Panel2) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(596, 345) + Me.pgcontents.TabIndex = 20 + ' + 'lvfiles + ' + Me.lvfiles.BackColor = System.Drawing.Color.White + Me.lvfiles.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lvfiles.Dock = System.Windows.Forms.DockStyle.Fill + Me.lvfiles.LargeImageList = Me.ImageList1 + Me.lvfiles.Location = New System.Drawing.Point(0, 33) + Me.lvfiles.Name = "lvfiles" + Me.lvfiles.Size = New System.Drawing.Size(596, 259) + Me.lvfiles.TabIndex = 3 + Me.lvfiles.UseCompatibleStateImageBehavior = False + ' + 'ImageList1 + ' + Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer) + Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent + Me.ImageList1.Images.SetKeyName(0, "folder.png") + Me.ImageList1.Images.SetKeyName(1, "unknown.png") + Me.ImageList1.Images.SetKeyName(2, "textfile.png") + Me.ImageList1.Images.SetKeyName(3, "imagefile.png") + Me.ImageList1.Images.SetKeyName(4, "videofile.png") + Me.ImageList1.Images.SetKeyName(5, "folderup.png") + Me.ImageList1.Images.SetKeyName(6, "philips dll.png") + Me.ImageList1.Images.SetKeyName(7, "philips exe.png") + Me.ImageList1.Images.SetKeyName(8, "config.png") + Me.ImageList1.Images.SetKeyName(9, "driver.png") + Me.ImageList1.Images.SetKeyName(10, "skinfile.png") + Me.ImageList1.Images.SetKeyName(11, "namelistfile.png") + Me.ImageList1.Images.SetKeyName(12, "iconpackfile.png") + Me.ImageList1.Images.SetKeyName(13, "iconins.png") + Me.ImageList1.Images.SetKeyName(14, "icontrm.png") + Me.ImageList1.Images.SetKeyName(15, "iconsaa 2.png") + Me.ImageList1.Images.SetKeyName(16, "iconflood.png") + Me.ImageList1.Images.SetKeyName(17, "iconurl.png") + Me.ImageList1.Images.SetKeyName(18, "iconurls.png") + Me.ImageList1.Images.SetKeyName(19, "iconsaag.png") + ' + 'pnlbreak + ' + Me.pnlbreak.BackColor = System.Drawing.Color.White + Me.pnlbreak.BackgroundImage = Global.ShiftOS.My.Resources.Resources.uparrow + Me.pnlbreak.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlbreak.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlbreak.ForeColor = System.Drawing.Color.Black + Me.pnlbreak.Location = New System.Drawing.Point(0, 292) + Me.pnlbreak.Name = "pnlbreak" + Me.pnlbreak.Size = New System.Drawing.Size(596, 15) + Me.pnlbreak.TabIndex = 7 + ' + 'pnloptions + ' + Me.pnloptions.Controls.Add(Me.btndeletefile) + Me.pnloptions.Controls.Add(Me.btnnewfolder) + Me.pnloptions.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnloptions.Location = New System.Drawing.Point(0, 307) + Me.pnloptions.Name = "pnloptions" + Me.pnloptions.Size = New System.Drawing.Size(596, 38) + Me.pnloptions.TabIndex = 6 + Me.pnloptions.Visible = False + ' + 'btndeletefile + ' + Me.btndeletefile.BackColor = System.Drawing.Color.White + Me.btndeletefile.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndeletefile.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btndeletefile.Image = Global.ShiftOS.My.Resources.Resources.deletefolder + Me.btndeletefile.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btndeletefile.Location = New System.Drawing.Point(129, 4) + Me.btndeletefile.Name = "btndeletefile" + Me.btndeletefile.Size = New System.Drawing.Size(130, 31) + Me.btndeletefile.TabIndex = 4 + Me.btndeletefile.Text = "Delete Folder" + Me.btndeletefile.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btndeletefile.UseVisualStyleBackColor = False + ' + 'btnnewfolder + ' + Me.btnnewfolder.BackColor = System.Drawing.Color.White + Me.btnnewfolder.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnnewfolder.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnnewfolder.Image = Global.ShiftOS.My.Resources.Resources.newfolder + Me.btnnewfolder.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnnewfolder.Location = New System.Drawing.Point(6, 4) + Me.btnnewfolder.Name = "btnnewfolder" + Me.btnnewfolder.Size = New System.Drawing.Size(117, 31) + Me.btnnewfolder.TabIndex = 3 + Me.btnnewfolder.Text = "New Folder" + Me.btnnewfolder.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnnewfolder.UseVisualStyleBackColor = False + ' + 'Panel2 + ' + Me.Panel2.BackColor = System.Drawing.Color.Black + Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel2.Location = New System.Drawing.Point(0, 31) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(596, 2) + Me.Panel2.TabIndex = 5 + ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.White + Me.Panel1.Controls.Add(Me.lbllocation) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(596, 31) + Me.Panel1.TabIndex = 4 + ' + 'lbllocation + ' + Me.lbllocation.BackColor = System.Drawing.Color.White + Me.lbllocation.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbllocation.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbllocation.ForeColor = System.Drawing.Color.Black + Me.lbllocation.Location = New System.Drawing.Point(0, 0) + Me.lbllocation.Name = "lbllocation" + Me.lbllocation.Size = New System.Drawing.Size(596, 31) + Me.lbllocation.TabIndex = 0 + Me.lbllocation.Text = "C:/ShiftOS/" + Me.lbllocation.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 347) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 345) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(598, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 347) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 345) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(600, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconFileSkimmer + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(107, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "File Skimmer" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(598, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 375) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(596, 2) + Me.pgbottom.TabIndex = 23 + ' + 'fileactions + ' + Me.fileactions.BackColor = System.Drawing.Color.Black + Me.fileactions.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None + Me.fileactions.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DeleteToolStripMenuItem}) + Me.fileactions.Name = "fileactions" + Me.fileactions.RenderMode = System.Windows.Forms.ToolStripRenderMode.Professional + Me.fileactions.Size = New System.Drawing.Size(108, 26) + ' + 'DeleteToolStripMenuItem + ' + Me.DeleteToolStripMenuItem.BackColor = System.Drawing.Color.Black + Me.DeleteToolStripMenuItem.ForeColor = System.Drawing.Color.White + Me.DeleteToolStripMenuItem.Name = "DeleteToolStripMenuItem" + Me.DeleteToolStripMenuItem.Size = New System.Drawing.Size(107, 22) + Me.DeleteToolStripMenuItem.Text = "Delete" + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'File_Skimmer + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(600, 377) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(400, 177) + Me.Name = "File_Skimmer" + Me.Text = "File_Skimmer" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnloptions.ResumeLayout(False) + Me.Panel1.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.fileactions.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents lvfiles As System.Windows.Forms.ListView + Friend WithEvents fileactions As System.Windows.Forms.ContextMenuStrip + Friend WithEvents DeleteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents lbllocation As System.Windows.Forms.Label + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents pnloptions As System.Windows.Forms.Panel + Friend WithEvents btnnewfolder As System.Windows.Forms.Button + Friend WithEvents pnlbreak As System.Windows.Forms.Panel + Friend WithEvents btndeletefile As System.Windows.Forms.Button + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents ImageList1 As System.Windows.Forms.ImageList +End Class diff --git a/ShiftOS/File Skimmer.resx b/ShiftOS/File Skimmer.resx new file mode 100644 index 0000000..b3d6a81 --- /dev/null +++ b/ShiftOS/File Skimmer.resx @@ -0,0 +1,421 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 28, 12 + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w + LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 + ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABG + QQAAAk1TRnQBSQFMAgEBFAEAAYgBAQGIAQEBKgEAASoBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo + AwABqAMAAfwDAAEBAQABCAUAAWABpRgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc + AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA + AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz + AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA + AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA + AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm + AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA + ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz + AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz + AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz + AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ + AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm + AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM + Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ + AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ + AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA + ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/ + ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ + AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA + AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA + AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA + AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ + AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA + AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/ + AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/ + ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/ + AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA + AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP//wD/AP8A/wD/AP8A + /wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A/wD/AP8A6QAK/yAACv8/AAfsCgAJ/xAA + Cv8BAAr/AQAB7AP/EAAK/wEACv8BAAHsA/8QABr/EAAI7AgACv8QAAn/AQAM/wEAAewC/xAACf8BAAz/ + AQAB7AL/EAAH/wEAAf8DAAL/AQAD/wEAAf8BAAP/AQAB/xAACOwEAAbsCP8QAAn/AQAM/wEAAewC/xAA + Cf8BAAz/AQAB7AL/EAAM/wEAAf8BAAP/AQAB/wEAA/8BAAH/EAAI7AIACuwG/xAACP8BAA3/AQAB7AL/ + EAAI/wEADf8BAAHsAv8QAAr/AgAD/wMAA/8DAAL/EAAE7AL/AuwBAAPsAgAC7AL/A+wF/xAAB/8BAAP/ + AQAK/wEAAewC/xAAB/8BAAP/AQAK/wEAAewC/xAACf8BAAX/AQAB/wEAA/8BAAH/AQAC/xAAAewC/wHs + BP8D7AMAAuwD/wPsBP8QAAf/AQAC/wIAAv8BAAL/AQAC/wEAAf8BAAHsAv8QAAf/AQAC/wIAAv8BAAL/ + AQAC/wEAAf8BAAHsAv8QAAr/AwAD/wEABf8BAAP/EAAD/wHsA/8D7AQAAuwBAAP/A+wD/xAACP8CAAHs + AQAC/wEAAv8BAAL/AQAB/wEAAewC/xAACP8CAAHsAQAC/wEAAv8BAAL/AQAB/wEAAewC/xAAGv8QAAP/ + AewD/wLsBQAC7AEABP8C7AP/EAAL/wEAAv8BAAL/AQAC/wIAAewD/xAAC/8BAAL/AQAC/wEAAv8CAAHs + A/8QABr/EAAD/wHsAv8C7AH/BQAC7AIABP8C7AL/EAAL/wEAAv8BAAL/AwAB7AX/EAAL/wEAAv8BAAL/ + AwAB7AX/EAAa/xAAA/8B7AL/AuwB/wQABOwDAAL/AuwB/xEAC/8BAAL/AwAB7Aj/EAAL/wEAAv8DAAHs + CP8QABr/EAAD/wHsAv8S7BIAC/8BAAL/AQAB7Ar/EAAL/wEAAv8BAAHsCv8QABr/EAAD/wHsAv8S7BIA + C/8BAAL/AQAB7Ar/EAAL/wEAAv8BAAHsCv8QAAP/FAAD/xAAA/8C7AH/AuwC/wMABOwFAALsEgAL/wEA + Av8BAAHsCv8QAAv/AQAC/wEAAewK/xAAA/8BABL/AQAD/xAABP8B7AH/AuwD/wMAAuwGAALsEgAL/wEA + Av8BAAHsCv8QAAv/AQAC/wEAAewK/xAAA/8BAAr/BwAB/wEAA/8QAAT/AewC/wLsAv8DAALsBQAC7BMA + Av8J/AEAAv8BAAHsCv8QAAL/CewBAAL/AQAB7Ar/EAAD/wEACv8BAAX/AQAB/wEAA/8QAAT/AewC/wPs + A/8BAALsBAAD7BMADP8CAAHsC/8QAAz/AgAB7Av/EAAD/wEAAf8IAAH/AQAF/wEAAf8BAAP/EAAE/wHs + A/8D7AP/AuwDAAPsFAAD/wT8Av8B/AT/AfwL/xAAA/8E7AL/AewE/wHsC/8QAAP/AQAB/wEABv8BAAH/ + BwAB/wEAA/8QAAT/AewE/wPsAv8C7AL/A+wVAAL/AfwE/wH8Af8B/AT/AfwL/xAAAv8B7AT/AewB/wHs + BP8B7Av/EAAD/wEAAf8BAAb/AQAJ/wEAA/8QAAT/AewF/wrsBf8RAAL/AfwE/wH8Af8B/AT/AfwL/xAA + Av8B7AT/AewB/wHsBP8B7Av/EAAD/wEAAf8BAAb/AQAB/wUAA/8BAAP/EAAE/wHsB/8G7Aj/EAAC/wH8 + BP8B/AH/AvwD/wH8C/8QAAL/AewE/wHsAf8C7AP/AewL/xAAA/8BAAH/AQAB/wYAAf8BAAT/AgAB/wEA + A/8QAAX/AewU/xAAAv8B/AT/AfwB/wH8Af8C/AH/AfwL/xAAAv8B7AT/AewB/wHsAf8C7AH/AewL/xAA + A/8BAAH/AQAB/wIAA/8BAAn/AQAD/xAABf8B7BT/EAAC/wH8BP8B/Ab/AfwL/xAAAv8B7AT/AewG/wHs + C/8QAAP/AQAB/wEABv8BAAH/BAAB/wIAAf8BAAP/EAAF/wHsFP8QAAL/AfwE/wH8Bv8B/Av/EAAC/wHs + BP8B7Ab/AewL/xAAA/8BAAH/CAAF/wIAAv8BAAP/EAAF/wLsE/8QAAL/AfwE/wH8Bv8B/Av/EAAC/wHs + BP8B7Ab/AewL/xAAA/8BABL/AQAD/xAABv8B7BP/EAAC/wH8BP8B/Ab/AfwL/xAAAv8B7AT/AewG/wHs + C/8QAAP/AQAB/wcACv8BAAP/EAAG/wLsEv8QABr/EAAa/xAAA/8BAAH/AQAF/wEAA/8GAAH/AQAD/xAA + B/8B7BL/EAAa/xAAGv8QAAP/AQAB/wEABf8BAAH/BQAE/wEAA/8QAAj/AewR/xAAGv8QABr/EAAD/wEA + Af8HAAr/AQAD/xAAA/8BAAP/AQAC7AIAA/8CAAP/AwAD/xAAGv8QABr/EAAD/wEAEv8BAAP/EAAD/wEA + A/8BAAH/AuwB/wEAAf8BAAL/AQAB/wEAAv8BAAP/EAAa/xAAGv8QAAP/FAAD/xAAA/8CAAL/AQAB/wEA + Av8BAAH/AQAC/wEAAv8DAAP/EAAa/xAAGv8QAAP/AQAS/wEAA/8QAAP/AQAD/wEAAv8CAAP/AgAF/wEA + A/8QABr/EAAa/xAAA/8BABL/AQAD/xAAA/8DAAH/AQAO/wEAA/8QABr/EAAa/xAAA/8UAAP/EAAa/xAA + Gv8QABr/EAAa/xAAD/8B9AT/FgAU/xYAFP8WAA//AfQE/xYAFP8BAAL/AuwRABT/AQAC/wLsEQAU/wEA + Av8C7BEAFP8BAAT/EQAU/wEAAf8C7BIAFP8BAAH/AuwSABT/AQAB/wLsEgAU/wEAA/8SABT/AQAC7BMA + FP8BAALsEwAU/wEAAuwTABT/AQAC/xMAFP8BAAHsFAAU/wEAAewUABT/AQAB7BQAFP8BAAH/FAAU/xYA + FP8WABT/FgAU//8AkQAa/xAAGv8QABr/OgAK/wEAAf8DAAH/AQAC/wEAAf8DAAL/EAAJ/wEAAv8BAAL/ + AQAC/wEAAf8BAAP/AQAB/xAAB/8BAAH/AwAC/wEAA/8BAAH/AQAD/wEAAf86AA3/AQAC/wEAAf8CAAT/ + AQAB/xAADP8BAAL/AQAC/wEAAf8BAAP/AQAB/xAADP8BAAH/AQAD/wEAAf8BAAP/AQAB/wkAKP8JAA3/ + AQAC/wQAAv8CAAL/EAAM/wEAAv8DAAL/AQAD/wEAAf8QAAr/AgAD/wMAA/8DAAL/CQAo/wkADf8BAAL/ + AgAB/wEAAf8BAAT/EAAM/wEAAv8BAAL/AQAB/wEAAf8BAAH/AQAB/xAACf8BAAX/AQAB/wEAA/8BAAH/ + AQAC/wkAA/8L7AT/AgAG/wIABv8CAAT/CQAM/wMAAf8BAAL/AQAC/wMAAf8QAAv/AwAB/wMAAv8CAAH/ + AgAB/xAACv8DAAP/AQAF/wEAA/8JABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAa/xAAGv8QABr/ + CQAC/wvsA/8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv8JABr/OgAa/wkAEP8BAATsAQAC/wEABOwBAAL/ + AQAE7AEAAv8JABr/OgAa/wkAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAa/zoAGv8JABL/ + AgAG/wIABv8CAAT/CQAa/zoABP8U7AL/CQAo/wkAGv86AAP/FAAB7AL/CQAo/wkAGv86AAP/AQAL/wfs + AQAB7AL/CQAD/wvsBP8CAAb/AgAG/wIABP8JABr/OgAD/wEACv8HAAHsAQAB7AL/CQAR/wEAAuwBAAT/ + AQAC7AEABP8BAALsAQAD/wkACf8HAAr/OgAD/wEAAv8I7AEABf8BAAHsAQAB7AL/CQAC/wvsA/8BAATs + AQAC/wEABOwBAAL/AQAE7AEAAv8JABr/OgAD/wEAAf8IAAHsAQAF/wEAAewBAAHsAv8JABD/AQAE7AEA + Av8BAATsAQAC/wEABOwBAAL/CQAa/zoAA/8BAAH/AQAG/wEAAewHAAH/AQAB7AL/CQAD/wvsA/8BAALs + AQAE/wEAAuwBAAT/AQAC7AEAA/8JAAz/AQAN/zoAA/8BAAH/AQAG/wEAAewI/wEAAewC/wkAEv8CAAb/ + AgAG/wIABP8JAAv/AwAM/zoAA/8BAAH/AQAG/wEAAewFAAP/AQAB7AL/CQAo/wkACv8BAAH/AQAB/wEA + C/86AAP/AQAB/wEAAf8GAAHsAQAE/wIAAf8BAAHsAv8JACj/CQAJ/wEAAv8BAAL/AQAK/zoAA/8BAAH/ + AQAB/wIAA/8BAAHsCP8BAAHsAv8JAAP/C+wE/wIABv8CAAb/AgAE/wkADP8BAA3/OgAD/wEAAf8BAAb/ + AQAB7AQAAf8CAAH/AQAB7AL/CQAR/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkADP8BAA3/OgAD/wEA + Af8IAAX/AgAC/wEAAewC/wkAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAM/wEADf86AAP/ + AQAC/wfsCf8BAAHsAv8JABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAM/wEADf86AAP/AQAB/wcA + AewJ/wEAAewC/wkAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/CQAM/wEADf86AAP/AQAB/wEA + Bf8BAAHsAv8GAAH/AQAB7AL/CQAS/wIABv8CAAb/AgAE/wkADP8BAA3/OgAD/wEAAf8BAAX/AQAB7AUA + BP8BAAHsAv8JACj/CQAa/zoAA/8BAAH/BwAK/wEAAewC/wkAKP8JABr/OgAD/wEAEv8BAAHsAv8JAAP/ + C+wE/wIABv8CAAb/AgAE/wkAGv86AAP/FAAB7AL/CQAR/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkA + Gv86AAP/AQAS/wEAAewC/wkAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/CQAa/xEAAv8nAAP/ + AQAS/wEAAewC/wkAEP8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv8JABr/EQAD/wQAAf8CAAH/AgAB/wEA + Af8DAAH/FQAD/xQAA/8JAAP/C+wD/wEAAuwBAAT/AQAC7AEABP8BAALsAQAD/wkAGv8SAAP/AwAB/wIA + Af8CAAH/AQAB/wMAAf8VABr/CQAS/wIABv8CAAb/AgAE/wkAD/8B9AT/GQAD/wIAAf8CAAH/AgAB/wEA + Af8DAAH/FQAP/wH0BP8PACj/CQAU/wEAAv8C7BUAA/8BAAH/AgAD/wIAAf8DAAH/FQAU/wEAAv8C7AoA + KP8JABT/AQAB/wLsFQAD/wIAAf8CAAH/AgAB/wEAAf8DAAH/AQAE/wHsDwAU/wEAAf8C7DwAFP8BAALs + FQAD/wMAAf8CAAH/AgAB/wEAAf8BAAH/AQAB/wEAA/8B7BAAFP8BAALsPQAU/wEAAewVAAP/AwAD/wEA + A/8CAAL/AQAC/wEAAv8B7BEAFP8BAAHsPgAU/xcAAv8TAAH/AewSABT/gAAB7OIAIf8JACH/MwAh/wkA + Bf8K7BL/CQAh/zMAIf8JAAT/DOwR/wkAIf8zACH/CQAD/wPsCAAD7BD/CQAD/xsAA/8zAAT/B+wE/w/s + A/8JAAL/A+wBAAH/BgAB/wEAA+wP/wkAA/8BABnsAQAD/zMAD/8B7A3/AewD/wkAAf8D7AEAAf8IAAH/ + AQAD7A7/CQAD/wEAGewBAAP/MwAD/wfsBf8B7A3/AewD/wkAAf8C7AEAAf8CAAH/BAAB/wIAAf8BAALs + Dv8JAAP/AQAC7BX/AuwBAAP/BQAo/wYAD/8P7AP/CQAB/wLsAwAB/wYAAf8DAALsDv8JAAP/AQAZ7AEA + A/8FACj/BgAh/wkAAf8C7AUAAf8CAAH/BQAC7A7/CQAD/wEAAuwV/wLsAQAD/wUAAv8kAAL/BgAE/wfs + BP8P7AP/CQAB/wLsBgAC/wYAC+wF/wkAA/8BABnsAQAD/wUAAv8kAAL/BgAP/wHsDf8B7AP/CQAB/wLs + BQAB/wIAAf8FAAzsBP8JAAP/AQAC7BX/AuwBAAP/BQAC/w4ABv8BAAb/AQAG/wIAAv8GAAP/B+wF/wHs + Df8B7AP/CQAB/wLsAwAB/wYAAf8CAAPsCAAD7AP/CQAD/wEAGewBAAP/BQAC/w4AAf8EAAH/AQAB/wQA + Af8BAAH/BAAB/wIAAv8GAA//D+wD/wkAAf8C7AEAAf8CAAH/BAAB/wIAA+wBAAH/BgAB/wEAA+wC/wkA + A/8BAATsEf8E7AEAA/8FAAL/DgAB/wQAAf8BAAH/BAAB/wEAAf8EAAH/AgAC/wYAIf8JAAH/A+wBAAH/ + CAAD7AEAAf8IAAH/AQAD7AH/CQAD/wEAGewBAAP/BQAC/w4AAf8EAAH/AQAB/wQAAf8BAAH/BAAB/wIA + Av8GAAT/B+wE/w/sA/8JAAL/A+wBAAH/BgAB/wLsAQAB/wIAAf8EAAH/AgAB/wEAAuwB/wkAA/8BABns + AQAD/wUAAv8OAAH/BAAB/wEAAf8EAAH/AQAB/wQAAf8CAAL/BgAP/wHsDf8B7AP/CQAD/wPsCAAC7AMA + Af8GAAH/AwAC7AH/CQAD/xsAA/8FAAL/DgAG/wEABv8BAAb/AgAC/wYAA/8H7AX/AewN/wHsA/8JAAT/ + DOwFAAH/AgAB/wUAAuwB/wkADv8FAA7/BQAC/yQAAv8GAA//D+wD/wkABf8L7AYAAv8GAALsAf8JAA// + A+wP/wUAAv8kAAL/BgAh/wkADv8C7AUAAf8CAAH/BQAC7AH/CQAh/wUAKP8GAAT/B+wE/w/sA/8JAA7/ + AuwDAAH/BgAB/wMAAuwB/wkAA/8LAAX/CwAD/wUAKP8GAA//AewN/wHsA/8JAA7/AuwBAAH/AgAB/wQA + Af8CAAH/AQAC7AH/CQAD/wEAC+wD/wvsAQAD/wUAKP8GAAP/B+wF/wHsDf8B7AP/CQAO/wPsAQAB/wgA + Af8BAAPsAf8JAAP/AQAZ7AEAA/8FACj/BgAP/w/sA/8JAAn/CewBAAH/BgAB/wEAA+wC/wkAA/8BABns + AQAD/wUAAv8k7AL/BgAh/wkACP8L7AgAA+wD/wkAA/8BAATsEf8E7AEAA/8FAAL/JOwC/wYABP8H7AT/ + D+wD/wkAB/8D7AcADOwE/wkAA/8BABnsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAP/wHsDf8B7AP/ + CQAG/wPsAQAB/wYAAf8K7AX/CQAD/wEAAuwV/wLsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAD/wfs + Bf8B7A3/AewD/wkABf8D7AEAAf8IAAH/AQAD7Ar/CQAD/wEAGewBAAP/BQAC/w7sBgAB7AYAAewGAALs + Av8GAA//D+wD/wkABf8C7AEAAf8CAAH/BAAB/wIAAf8BAALsCv8JAAP/AQAC7BUAAuwBAAP/BQAC/w7s + BgAB7AYAAewGAALsAv8GACH/CQAF/wLsAwAB/wYAAf8DAALsCv8JAAP/AQAZ7AEAA/8FAAL/DuwGAAHs + BgAB7AYAAuwC/wYABP8H7AT/D+wD/wkABf8C7AUAAf8CAAH/BQAC7Ar/CQAD/wEAAuwVAALsAQAD/wUA + Av8O7AYAAewGAAHsBgAC7AL/BgAP/wHsDf8B7AP/CQAF/wLsBgAC/wYAAuwK/wkAA/8BABnsAQAD/wUA + Av8k7AL/BgAD/wfsBf8B7A3/AewD/wkABf8C7AUAAf8CAAH/BQAC7Ar/CQAD/wEAAuwVAALsAQAD/wUA + Av8k7AL/BgAP/w/sA/8JAAX/AuwDAAH/BgAB/wMAAuwK/wkAA/8BABnsAQAD/wUAKP8GACH/CQAF/wLs + AQAB/wIAAf8EAAH/AgAB/wEAAuwK/wkAA/8BAALsFQAC7AEAA/8FACj/BgAE/wfsBP8P7AP/CQAF/wPs + AQAB/wgAAf8BAAPsCv8JAAP/AQAZ7AEAA/8zAA//AewN/wHsA/8JAAb/A+wBAAH/BgAB/wEAA+wL/wkA + A/8BABnsAQAD/zMAA/8H7AX/AewN/wHsA/8JAAf/A+wIAAPsDP8JAAP/GwAD/zMAD/8P7AP/CQAI/wzs + Df8JACH/MwAh/wkACf8K7A7/CQAh/zMAIf8JACH/CQAh/zMAIf//AKwAAfQh7wEHAfIB/wUAAfQh7wEH + AfIB/1kAAfIBAAFDHhUBEAERAbwB9AUAAfIVAAYOBgABEQG8AfRZAAHyAQ4B9x68AewBFQG8AfQFAAHy + FAABDgEVARQCEwEUAREBDgQAAQ4BFQG8AfQtACjsBAAB8gEOAfcevAHsARUBvAH0BQAB8hQAAUMB9wEH + Au8B9wFtARAEAAEOARUBvAH0LQAP7AoAD+wEAAHyAQ4B9x68AewBFQG8AfQFAAHyFAABQwEHAe8B7AES + ARMBQwEOBAABDgEVAbwB9C0AD+wBAAj/AQAP7AQAAfIBDgH3BLwB9xTsAe8EvAHsARUBvAH0BQAB8gMA + AQ4MQwEQAwABQwEHAe0BFQgAAQ4BFQG8AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAETEQ4DAAHs + BLwB7AEVAbwB9AUAAfIDAAERDOwBbQMAAUMBBwGSARMBDwEOBgABDgEVAbwB9AMAKP8CAA/sAQAI/wEA + D+wEAAHyAQ4B9wS8ARMBFA/vARMDAAHsBLwB7AEVAbwB9AUAAfIEAAEOARAJEQEQAQ4DAAFDAQcC8gHx + AQcBEAUAAQ4BFQG8AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITD7wB6gMAAewEvAHsARUBvAH0 + BQAB8gQAAQ4B6wnsARUEAAFDAQcB7wHsAW0B6gEOBQABDgEVAbwB9AMAKP8CAA/sAQAI/wEAD+wEAAHy + AQ4B9wS8AhMOvAHsAUMDAAETAZIDvAHsARUBvAH0BQAB8gQAAQ4B7wK8AQcF7AH3AeoEAAFDAQcBkgET + Ag8BDgUAAQ4BFQG8AfQDAA//AQAY/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw28AQcBFQEOAwABDgHq + A7wB7AEVAbwB9AUAAfIEAAEOAe8CvAHvAg4CDwEAAewB6gQAAUMBBwHvAesBEgETARABDgQAAQ4BFQG8 + AfQDAA//AgAX/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw68AQcBEgMAAesBBwO8AewBFQG8AfQFAAHy + BAABDgHvArwB7wEOAewBBwHtAQ4B7AHqBAABEQGSAe8BBwLvARQBDgQAAQ4BFQG8AfQDAA//AwAW/wIA + D+wBAAj/AQAP7AQAAfIBDgH3BLwCEw+8AfcB6gEOAesB7wS8AewBFQG8AfQFAAHyBAABDgHvAewBFAEV + AQABEQEUAUMBAAHsAeoEAAEOAUMBFQIUARUBDwUAAQ4BFQG8AfQDAA//BAAV/wIAD+wBAAj/AQAP7AQA + AfIBDgH3BLwCEwa8AewB6wHsB7wB9wFtAQcFvAHsARUBvAH0BQAB8gQAAQ4B7wETARAC6gEPARAC6gGS + AeoQAAEOARUBvAH0AwAP/wUAFP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAEVAQABQw+8AewBFQG8 + AfQFAAHyBAABDgHvARMBFQL3ARUBEgK8AQcB6gIAAQ4MDwEOAQABQwG8AfQDAA//BgAT/wIAD+wBAAj/ + AQAP7AQAAfIBDgH3BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEOAe8BEwEAAg4BAAESArwBBwHq + AgAB6wztAUMBAAERAbwB9AMAD/8HABL/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITBrwBFQEAAUMPvAHs + ARUBvAH0BQAB8gQAAQ4C7wTtAe8CvAEHAeoCAAEQAUMKFQERAQ4BAAERAbwB9AMAD/8IABH/AgAP7AEA + CP8BAA/sBAAB8gEOAfcEvAITBrwBFQEAAUMPvAHsARUBvAH0BQAB8gQAAQ4B6gltAUMDAAEVCW0BEgEO + AgABEQG8AfQDAA//CQAQ/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEwEHAfcEkgERAQABEAWSAfcBBwi8 + AewBFQG8AfQFAAHyEwABbQi8AQcBkgEOAgABEQG8AfQDAA//CgAP/wIAD+wBAAj/AQAP7AQAAfIBDgH3 + BLwCEwHvAQ4MAAERAewIvAHsARUBvAH0BQAB8hMAAW0IvAEHAZIBDgIAAREBvAH0AwAP/woAD/8CAArs + BgAI/wcACewEAAHyAQ4B9wS8AhMB7wEODAABEQHsCLwB7AEVAbwB9AUAAfITAAFtAfcGQwHtAQcBkgEO + AgABEQG8AfQDAA//CQAQ/wIACuwBABP/AQAJ7AQAAfIBDgH3BLwCEwHvAQ4MAAERAewIvAHsARUBvAH0 + BQAB8hMAAW0B7wZtAfcBBwGSAQ4CAAERAbwB9AMAD/8IABH/AgAL7AEAEf8BAArsBAAB8gEOAfcBvAEH + Au0CQwHsAQ4MAAEPAW0E7QH3A7wB7AEVAbwB9AUAAfITAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8HABL/ + AgAM7AEAD/8BAAvsBAAB8gEOAfcBvAHsGAABEwO8AewBFQG8AfQFAAHyBAAMDgMAAW0IvAEHAZIBDgIA + AREBvAH0AwAP/wYAE/8CAA3sAQAN/wEADOwEAAHyAQ4B9wG8AewYAAETA7wB7AEVAbwB9AUAAfIDAAER + DOwB6gIAAW0IvAEHAZIBDgIAAREBvAH0AwAP/wUAFP8CAA7sAQAL/wEADewEAAHyAQ4B9wG8Ae8E6wFt + AQ4MAAEPARME6wHtA7wB7AEVAbwB9AUAAfIDAAEOARQLEwFDAgABbQi8AQcBkgEOAgABQwG8AfQDAA// + BAAV/wIAD+wBAAn/AQAO7AQAAfIBDgH3BrwB7wEODAABEQHsCLwB7AEVAbwB9AUAAfIEAAEOARQIEgET + AREDAAEUCewBbQEOAQABDgEVAbwB9AMAD/8DABb/AgAQ7AEAB/8BAA/sBAAB8gEOAfcGvAHvAQ4MAAER + AewIvAHsARUBvAH0BQAB8gQAAQ4B7wIHBbwBBwHvAeoQAAEOARUBvAH0AwAP/wIAF/8CABHsAQAF/wEA + EOwEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8AewBFQG8AfQFAAHyBAABDgHvAW0B6gS8Ae8BEAHsAeoGAAEQ + AUMDFQERAQ4DAAEOARUBvAH0AwAP/wEAGP8CABLsAQAD/wEAEewEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8 + AewBFQG8AfQFAAHyBAABDgHvAZIBbQHqAQcBvAHtARIB7AH3AeoGAAHrApIC7QFtAREDAAEOARUBvAH0 + AwAo/wIAE+wBAAH/AQAS7AQAAfIBDgH3BrwBBwHqBBMBDgMAARUDEwFtAfcIvAHsARUBvAH0BQAB8gQA + AQ4B7wG8AZIBEgLsAm0CBwHqBQABDgGSAQcB9wLrARIBEAMAAQ4BFQG8AfQDACj/AgAU7AEAE+wEAAHy + AQ4B9wy8ARUDAAGSDbwB7AEVAbwB9AUAAfIEAAEOAe8BvAEHAZIBEQEPAeoB7wG8AQcB6gUAAQ4CkgHq + BwABDgEVAbwB9AMAKP8CACjsBAAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAbwB7AER + Ae8BBwHrAUMCBwHqBQABDgKSAeoHAAEOARUBvAH0AwAo/wIAKOwEAAHyAQ4B9wy8ARUDAAGSDbwB7AEV + AbwB9AUAAfIEAAEOAe8B7AHqAe0BBwG8Ae8B7AEUAe0B6gUAAQ4BkgK8Au8BFAQAAQ4BFQG8AfRZAAHy + AQ4B9wy8ARUDAAGSDbwB7AEVAbwB9AUAAfIEAAEOAe8C7AS8Ae8B6gGSAeoFAAEOAZICBwLtARUEAAEO + ARUBvAH0LQAP7B0AAfIBDgH3DLwBEgMQAfcNvAHsARUBvAH0BQAB8gQAAQ4B7Aj3Ae0BEwUAAQ4BkgH3 + AW0CDgUAAQ4BFQG8AfQtAA7sHgAB8gEOAfcMvAQHDrwB7AEVAbwB9AUAAfIFAAoOBgABDgGSAe8B7AIV + ARABDgMAAQ4BFQG8AfRZAAHyAQ4B9x68AewBFQG8AfQFAAHyFQABDgHsAu8CkgESAQ8EAAERAbwB9FkA + AfIBAAESHm0BFAFDAbwB9AUAAfIWAAEVAeoDbQFDAQ4EAAERAbwB9FkAAfMhbQHsAfEB9AUAAfMhbQHs + AfEB9P8AggAh/wkAIf9dACH/CQAh/10AIf8JACH/LwAo7AYAIf8JAAT/GuwD/wUAKOwCACjsBgAh/wkA + If8FACjsAgAo7AYADv8E7A//CQAh/wUAKOwCACjsBgAO/wTsD/8JAAP/GuwE/wUAKOwCACjsBgAO/wTs + D/8JACH/BQAo7AIAKOwGAA7/BOwP/wkAIf8FACjsAgAo7AYAIf8JAAT/GuwD/wUAJOwE/wIAKOwGACH/ + CQAh/wUAIewH/wIAKOwGACH/CQAh/wUABf8a7An/AgAo7AYADv8BkgPsD/8JAAP/GuwE/wUACP8W7AX/ + AewE/wIAKOwGAA7/AZID7A//CQAh/wUAD/8L7An/AuwD/wIAKOwGAA7/AZID7AHyDv8JACH/BQAe/wHs + Bf8B7AP/AgAo7AYADv8BBwPsAbwO/wkABP8a7AP/BQAe/wLsBP8C7AL/AgAo7AYADv8B8QTsDv8JACH/ + BQAX/wPsBf8C7AT/AewC/wIAKOwGAA//BOwB7w3/CQAh/wUAGf8C7AX/AewE/wHsAv8CACjsBgAP/wHx + BOwB7wz/CQAD/xrsBP8FABr/AewF/wHsBP8B7AL/AgAo7AYAEP8BvATsAe8B9Ar/CQAh/wUAGv8C7AT/ + AewE/wLsAf8CACjsBgAR/wG8BOwB7QH0Cf8JACH/BQAT/wTsBP8C7An/AewB/wIAKOwGABL/AfAE7AGS + Cf8JAAT/GuwD/wUAFv8C7AX/AewK/wIAKOwGABP/AfIE7AHvCP8JACH/BQAX/wHsCf8G7AH/AgAo7AYA + FP8B8gTsAfIH/wkAIf8FABf/AuwG/wnsAgAo7AYAFf8BvAPsAe8H/wkAA/8a7AT/BQAQ/wHsB/8C7AT/ + CuwCACjsBgAW/wTsB/8JACH/BQAQ/wPsBv8C7AL/C+wCACjsBgAG/wHzAe8BkgHsAe8L/wGSA+wH/wkA + If8FABL/A+wH/wzsAgAo7AYABv8B9APsAe0L/wHtA+wH/wkABP8a7AP/BQAU/wLsBv8M7AIAKOwGAAf/ + BOwB8gn/AfMD7AHtB/8JACH/BQAV/wLsBP8N7AIAKOwGAAf/AQcD7AH3Cf8B9wPsAe8H/wkAIf8FAA3/ + BOwF/wPsAv8N7AIAKOwGAAf/AfQE7AHvB/8B7wTsAfMH/wkAA/8a7AT/BQAQ/wLsCf8N7AIAKOwGAAj/ + AQcE7AGSAfAB9AH/AfQB8AGSBOwBBwj/CQAh/wUAEf8B7An/DewCACjsBgAJ/wHvDewB7wn/CQAh/wUA + Ef8I7AL/DewCACjsBgAK/wHwC+wB8Ar/CQAE/xrsA/8FABv/DewwAAv/AfQBvAH3BOwB7QHvAbwM/wkA + If8FABz/DOwCAA/sHwAh/wkAIf8FABz/DOwCAA7sIAAh/wkAA/8a7AT/XQAh/wkAIf9dACH/CQAh/10A + If8JACH/1gABQgFNAT4HAAE+AwABKAMAAagDAAH8AwABAQEAAQEFAAGgARcWAAP//wD/AP8A9AAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/ + AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/ + AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMA + AR8B/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMA + Af4DAAEfAf8BgAIAAQcB/wHgAgABAQH/AfgDAAF/AwAB/gMAAR8B/wGAAgABBwH/AeACAAEBAf8B+AMA + AX8DAAH+AwABHwH/AYACAAEHAf8B4AIAAQEB/wH4AwABfwMAAf4DAAEfAf8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/AwAB/gMAAT8B/wGAAgABDwH/AeACAAEDAf8B+AMAAf8DAAH+AwABfwH/AYACAAEfAf8B4AIA + AQcB/wH4AgABAQH/AwAB/gMAAv8BgAIAAT8B/wHgAgABDwH/AfgCAAEDAf8DAAH+AgABAQL/AYACAAF/ + Af8B4AIAAR8B/wH4AgABBwH/AwAB/gIAAQMC/wGAAgAC/wHgAgABPwH/AfgCAAEPAf8DAAH+AgABBwL/ + AYABAAEBAv8B4AIAAX8B/wH4AgABHwH/AwAG/wGAAgABBwH/AeACAAEBAf8B+AMAAX8DAAb/AYACAAEH + Af8B4AIAAQEB/wH4AwABfwMABv8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEB + Af8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/ + CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIA + AQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIA + AQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMA + AX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGA + AgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHg + AgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4 + AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/ + AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/ + AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/ + AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgA + AT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEBAf8B+AMAAX8IAAE/AYACAAEH + Af8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/CAABPwGAAgABBwH/AeACAAEB + Af8B+AMAAX8IAAE/AYACAAEHAf8B4AIAAQEB/wH4AwABfwgAAT8BgAIAAQcB/wHgAgABAQH/AfgDAAF/ + CAABPwGAAgABDwH/AeACAAEBAf8B+AMAAf8IAAE/AYACAAEfAf8B4AIAAQEB/wH4AgABAQH/CAABPwGA + AgABPwH/AeACAAEBAf8B+AIAAQMB/wMABv8BgAIAAX8B/wHgAgABAwH/AfgCAAEHAf8DAAb/AYACAAL/ + AeACAAEHAf8B+AIAAQ8B/wMABv8BgAEAAQEC/wHgAgABDwH/AfgCAAEfAf8DAAHwAwABAQH8BAABfwX/ + AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8 + BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQA + AQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHwAwABAQH8BAABcAQAAQMBwAMAAQcDAAHw + AwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/Bf8BwAMA + AQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEBAfwEAAF/ + Bf8BwAMAAQcDABX/AwAK/wH+BAABDwGAAwABAwMACv8B/gQAAQ8BgAMAAQMDAAX/AcAEAAEOBAABDwGA + AwABAwMABf8BwAQAAQ4EAAEPAYADAAEDAwAF/wHABAABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0A + AQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQA + AQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGA + AwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAED + DQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEO + BAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEP + AYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMA + AQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMDAAX/AcABAAEfAv8B/gQA + AQ8BgAMAAQMDAAX/AcABAAE/Av8B/gQAAQ8BgAMAAQMDAAX/AcABAAF/Av8B/gQAAQ8BgAMAAQMDAAr/ + Af4EAAEPAYADAAEDAwAK/wH+BAABDwGAAwABAwMAFf8DAAX/AfwEAAF/BAABHwX/AwAF/wH8BAABfwQA + AR8F/wMABf8B/AQAAX8EAAEfBf8IAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8 + BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwNAAE8BAABfwQAARwKAAF/ + Av8B/AQAAX8EAAEcCgAD/wH8BAABfwQAARwJAAEBA/8B/AQAAX8EAAEfBf8DAAX/AfwEAAF/BAABHwX/ + AwAF/wH8BAABfwQAAR8F/wMABf8B/AQAAX8EAAEfBf8DAAs= + + + + 138, 12 + + + 1347, 18 + + + 1431, 18 + + + 1544, 18 + + \ No newline at end of file diff --git a/ShiftOS/File Skimmer.vb b/ShiftOS/File Skimmer.vb new file mode 100644 index 0000000..ebeb255 --- /dev/null +++ b/ShiftOS/File Skimmer.vb @@ -0,0 +1,954 @@ +Imports System.IO +Public Class File_Skimmer + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 400 + Public minimumsizeheight As Integer = 177 + Public ShiftOSPath As String = ShiftOSDesktop.ShiftOSPath + + Dim itemsdeleted As Integer + Dim filetype As Integer + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.FileSkimmerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonfileskimmer.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonfileskimmer, ShiftOSDesktop.tbfileskimmericon, ShiftOSDesktop.tbfileskimmertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + ShiftOSDesktop.refreshIcons() + Me.Close() + End Sub + + Private Sub Me_Close(sender As Object, e As EventArgs) Handles MyBase.FormClosing + ShiftOSDesktop.refreshIcons() + End Sub + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(600, 377) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.fileskimmername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtfileskimmericon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + showcontents() + End Sub + + Public Function getExType(fileex As String) + + Dim filetype As Integer + Dim program As String + + Select Case fileex + Case ".txt" + filetype = 2 + program = "Text Document" + Case ".doc" + filetype = 2 + program = "Word Document" + Case ".docx" + filetype = 2 + program = "Word Document" + Case ".lst" + filetype = 2 + program = "Spreadsheet" + Case ".png" + filetype = 3 + program = "Picture" + Case ".jpg" + filetype = 3 + program = "Picture" + Case ".jpeg" + filetype = 3 + program = "Picture" + Case ".bmp" + filetype = 3 + program = "Bitmap" + Case ".gif" + filetype = 3 + program = "Animated Picture" + Case ".avi" + filetype = 4 + program = "Video Clip" + Case ".m4v" + filetype = 4 + program = "MPEG-4 Video" + Case ".mp4" + filetype = 4 + program = "MPEG-4 Video" + Case ".wmv" + filetype = 4 + program = "Windows Media Video" + Case ".mp3" + filetype = 4 + program = "MPEG-3 Song" + Case ".dll" + filetype = 6 + program = "System File" + Case ".exe" + filetype = 7 + program = "MS-DOS Executable" + Case ".sft" + filetype = 8 + program = "System File" + Case ".dri" + filetype = 9 + program = "System File" + Case ".pic" + filetype = 3 + If ShiftOSDesktop.boughtartpad Then program = "Artpad Document" Else program = ".pic File" + Case ".skn" + filetype = 10 + If ShiftOSDesktop.boughtskinloader Then program = "Skin" Else program = ".skn file" + Case ".nls" + filetype = 11 + program = "Font File" + Case ".icp" + filetype = 12 + If ShiftOSDesktop.boughticonmanager Then program = "Icon Manager File" Else program = ".icp file" + Case ".stp" + filetype = 13 + program = "Setup File" + Case ".trm" + filetype = 14 + program = "Terminal Script File" + Case ".owd" + filetype = 2 + If ShiftOSDesktop.boughtorcwrite Then program = "OrcWrite Document" Else program = ".owd file" + Case ".sh" + filetype = 14 + program = "BASH Script" + Case ".bat" + filetype = 14 + program = "MS-DOS Batch File" + Case ".command" + filetype = 14 + program = ".command file" + Case ".saa" + If ShiftOSDesktop.boughtgray Then filetype = 15 Else filetype = 19 + program = "Stand Alone Application" + Case ".flood" + filetype = 16 + If ShiftOSDesktop.boughtfloodgate Then program = "FloodGate File" Else program = ".flood file" + Case ".url" + filetype = 17 + program = "Shortcut" + Case ".urls" + filetype = 18 + program = "Shiftnet Link" + Case Else + filetype = 1 + program = "Unknown File Type" + End Select + + Dim array() As String = {CStr(filetype), program} + + Return (array) + + End Function + + Private Sub showcontents() + Me.Show() + + lvfiles.Items.Clear() + + lvfiles.Items.Add("Exit Folder", 5) + + Dim dir As New DirectoryInfo(lbllocation.Text) + Dim files As FileInfo() = dir.GetFiles() + Dim file As FileInfo + Dim folders As DirectoryInfo() = dir.GetDirectories() + Dim folder As DirectoryInfo + + For Each folder In folders + Dim foldername As String = folder.Name + lvfiles.Items.Add(foldername, 0) + Next + + For Each file In files + Dim filename As String = file.Name + Dim fileex As String = file.Extension + + filetype = getExType(fileex)(0) + + lvfiles.Items.Add(filename, filetype) + Next + End Sub + + Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + showcontents() + End Sub + + Private Sub lbfiles_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lvfiles.MouseDoubleClick + + If lvfiles.SelectedItems(0).Text = "Exit Folder" Then + + If lbllocation.Text = "C:/ShiftOS" Or lbllocation.Text = "C:/ShiftOS/" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "Unable to move into a higher directory due to error reading the requested folder on the drive." & Environment.NewLine & Environment.NewLine & "You can only enter directories formatted in the ShiftOS file system (ShiftFS)" + infobox.Show() + Else + Dim directoryInfo As System.IO.DirectoryInfo + directoryInfo = System.IO.Directory.GetParent(lbllocation.Text) + If (directoryInfo.FullName = "C:\") Then Dim errerror As String = "an error" Else lbllocation.Text = directoryInfo.FullName + + 'Dim endloop As Boolean = False + 'lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1) + + 'While endloop = False + ' Try + ' If lbllocation.Text.Substring(lbllocation.Text.Length - 1) = "/" Then + ' endloop = True + ' Else + ' lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1) + ' End If + ' Catch + ' infobox.title = "File Skimmer - Error!" + ' infobox.textinfo = "Unable to move into a higher directory due to error reading the requested folder on the drive." & Environment.NewLine & Environment.NewLine & "An error occured going up" + ' infobox.Show() + ' End Try + 'End While + + + showcontents() + End If + Else + 'Check if selected item is a file or folder. It it's a folder check its extension + If lbllocation.Text Like "*/" Then + Else + lbllocation.Text = lbllocation.Text + "/" + End If + OpenFile(lbllocation.Text + lvfiles.SelectedItems(0).Text) + End If + + End Sub + Public Sub OpenFile(path As String) + 'Check if selected item is a file or folder. It it's a folder check its extension + + If path Like "*.owd" Then + If ShiftOSDesktop.boughtorcwrite = True Then + Dim sr As New IO.StreamReader(Path) + OrcWrite.RichTextBox1.Rtf = sr.ReadToEnd() + sr.Close() + OrcWrite.Show() + OrcWrite.TopMost = True + Else + infobox.showinfo("Application Not Found", "ShiftOS could not find an application able the open .owd files.") + End If + ElseIf path Like "*.txt" Then + If TextPad.needtosave = False Then + TextPad.Show() + TextPad.txtuserinput.Text = My.Computer.FileSystem.ReadAllText(path) + TextPad.needtosave = False + Else + infobox.title = "Textpad - Save?" + infobox.textinfo = "It appears that your text document currently contains unsaved changes." & Environment.NewLine & Environment.NewLine & "Are you sure you want to load a file without saving the changes?" + infobox.Show() + infobox.showyesno() + infobox.sendyesno = "fileskimmertextpad" + End If + + ElseIf path Like "*.pic" Then + If ArtPad.needtosave = False Then + ArtPad.Show() + ArtPad.savelocation = (path) + ArtPad.openpic() + ArtPad.needtosave = False + Else + infobox.title = "Artpad - Save?" + infobox.textinfo = "It appears that your canvas currently contains unsaved changes." & Environment.NewLine & Environment.NewLine & "Are you sure you want to open a different canvas without saving the changes?" + infobox.Show() + infobox.showyesno() + infobox.sendyesno = "fileskimmerartpad" + End If + + ElseIf path Like "*.sft" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This file appears to be encrypted or may be critical for stable system operation." & Environment.NewLine & Environment.NewLine & "Access to this file has been blocked to protect the system from potential damage." + infobox.Show() + + ElseIf path Like "*.lst" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This file appears to be encrypted or may be critical for stable system operation." & Environment.NewLine & Environment.NewLine & "Access to this file has been blocked to protect the system from potential damage." + infobox.Show() + ElseIf path Like "*.dri" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This file appears to be encrypted or may be critical for stable system operation." & Environment.NewLine & Environment.NewLine & "Access to this file has been blocked to protect the system from potential damage." + infobox.Show() + + ElseIf path Like "*.lang" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This file appears to be encrypted or may be critical for stable system operation." & Environment.NewLine & Environment.NewLine & "Access to this file has been blocked to protect the system from potential damage." + infobox.Show() + + ElseIf path Like "*.skn" Then + If ShiftOSDesktop.boughtskinning Then + Skin_Loader.Show() + Skin_Loader.loadingsknversion = "" + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\Preview\", FileIO.DeleteDirectoryOption.DeleteAllContents) + System.IO.Compression.ZipFile.ExtractToDirectory(path, ShiftOSPath + "Shiftum42\Skins\Preview\") + If File.Exists(ShiftOSPath + "Shiftum42\Skins\Preview\SKN-version") Then + Dim sr As StreamReader = New StreamReader(ShiftOSPath + "Shiftum42\Skins\Preview\SKN-version") + Dim i As String = sr.ReadLine + Skin_Loader.loadingsknversion = sr.ReadLine + sr.Close() + End If + If Skin_Loader.loadingsknversion = "2.0 disposal-free skinning" Then + Skin_Loader.setuppreview2_0() + Skin_Loader.skinloaded = True + Else + My.Computer.FileSystem.WriteAllText(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat", My.Computer.FileSystem.ReadAllText(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat").Replace("\Current", "\Preview"), False) + Skin_Loader.loadlines = IO.File.ReadAllLines(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat") + Skin_Loader.loadskintopreview() + Skin_Loader.skinloaded = True + End If + Else + infobox.showinfo("Application Not Found", "ShiftOS could not find an application able the open skin files.") + End If + + ElseIf path Like "*.mp3" Then + If ShiftOSDesktop.installedaudioplayer Then + Audio_Player.lbmusiclist.Items.Add(path) + Audio_Player.lblintro.Hide() + Audio_Player.Show() + Else + infobox.showinfo("Application Not Found", "ShiftOS could not find an application able the open audio files.") + End If + + ElseIf path Like "*.saa" Then + File_Crypt.DecryptFile(path & "\" & path, ShiftOSDesktop.ShiftOSPath + "Shiftum42\Drivers\HDD.dri", ShiftOSDesktop.sSecretKey) + Dim sr As StreamReader = New StreamReader(ShiftOSDesktop.ShiftOSPath + "Shiftum42\Drivers\HDD.dri") + Dim apptoopen As String = sr.ReadLine() + sr.Close() + Select Case apptoopen.ToLower + 'Case "program name" + ' Check requirements and open program + Case "dodge" + Dodge.Show() + Case "web browser" + If ShiftOSDesktop.boughtanycolour4 = True Then Web_Browser.Show() Else infobox.showinfo("Error", "The requirements for " & path & " are not meet. Please buy limitless colours.") + Case "b1n0t3 h4ck" + Randomize() + Dim VirusChoice As Integer = CInt(Math.Ceiling(Rnd() * 4)) + If VirusChoice = 1 Then + Viruses.zerogravity = True + Viruses.zerogravitythreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setupzerovirus() + ElseIf VirusChoice = 2 Then + Viruses.beeper = True + Viruses.beeperthreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setupbeepervirus() + ElseIf VirusChoice = 3 Then + Viruses.mousetrap = True + Viruses.mousetrapthreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setupmousetrapvirus() + ElseIf VirusChoice = 4 Then + Viruses.ThePlague = True + Viruses.theplaguethreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setuptheplague() + End If + infobox.title = "B1N0T3 H4CK3R - Error" + infobox.textinfo = "L0L Y0U JUST G0T R3KT #D341W1TH1T" & Environment.NewLine & Environment.NewLine & "(Enjoy your new virus)" + infobox.Show() + Case "virus scanner" + If ShiftOSDesktop.boughtgray Then VirusScanner.Show() Else infobox.showinfo("Error", "The requirements for " & path & " are not meet. Please buy Gray.") + Case "labyrinth" + If ShiftOSDesktop.boughtgray Then Labyrinth.Show() Else infobox.showinfo("Error", "The requirements for " & path & " are not meet. Please buy Gray.") + Case "calculator" + Calculator.Show() + Case "audio player" + Audio_Player.Show() + Case "video player" + If ShiftOSDesktop.boughtanycolour4 Then Video_Player.Show() Else infobox.showinfo("Error", "The requirements for " & path & " are not meet. Please buy limitless colours.") + Video_Player.Show() + Case "dock" + ShiftDock.Show() + Case "virus grade 1 removal unlocker" + If ShiftOSDesktop.installedvirusscanner Then + If Math.Ceiling(Rnd() * 2) = 1 Then + infobox.showinfo("Virus Removal Unlocked", "Removal of grade 1 viruses has been unlocked in the Virus Scanner.") + If ShiftOSDesktop.virusscannergrade < 1 Then ShiftOSDesktop.virusscannergrade = 1 + Else + infobox.showinfo("Lolz", "Haha, I just don't feel like doing anything today. Try me again some time and I MIGHT Lock it. For now, I'm hang out for the lolz!") + End If + End If + Case "virus grade 2 removal unlocker" + If ShiftOSDesktop.installedvirusscanner Then + If Math.Ceiling(Rnd() * 2) = 1 Then + infobox.showinfo("Virus Removal Unlocked", "Removal of grade 2 viruses has been unlocked in the Virus Scanner.") + If ShiftOSDesktop.virusscannergrade < 2 Then ShiftOSDesktop.virusscannergrade = 2 + Else + infobox.showinfo("Lolz", "Haha, I just don't feel like doing anything today. Try me again some time and I MIGHT Lock it. For now, I'm hang out for the lolz!") + End If + End If + Case "virus grade 3 removal unlocker" + If ShiftOSDesktop.installedvirusscanner Then + If Math.Ceiling(Rnd() * 2) = 1 Then + infobox.showinfo("Virus Removal Unlocked", "Removal of grade 3 viruses has been unlocked in the Virus Scanner.") + If ShiftOSDesktop.virusscannergrade < 3 Then ShiftOSDesktop.virusscannergrade = 3 + Else + infobox.showinfo("Lolz", "Haha, I just don't feel like doing anything today. Try me again some time and I MIGHT Lock it. For now, I'm hang out for the lolz!") + End If + End If + Case "virus grade 4 removal unlocker" + If ShiftOSDesktop.installedvirusscanner Then + If Math.Ceiling(Rnd() * 2) = 1 Then + infobox.showinfo("Virus Removal Unlocked", "Removal of grade 4 viruses has been unlocked in the Virus Scanner.") + If ShiftOSDesktop.virusscannergrade < 4 Then ShiftOSDesktop.virusscannergrade = 4 + Else + infobox.showinfo("Lolz", "Haha, I just don't feel like doing anything today. Try me again some time and I MIGHT Lock it. For now, I'm hang out for the lolz!") + End If + End If + Case Else + infobox.title = "Corrupt file" + infobox.textinfo = "The stand alone application '" & path & "' seems to be corrupt and is unable to run properly." + infobox.Show() + End Select + ElseIf path Like "*.stp" Then + Installer.Show() + Installer.txtfilepath.Text = (path) + ElseIf path Like "*.smf" Then + NewAPI.OpenModFile(path) + ElseIf path Like "*.trm" Then + Terminal.Show() + Terminal.runterminalfile(path) + ElseIf path Like "*.sct" Then + Dim sr As New IO.StreamReader(Path) + Dim relayPath As String = sr.ReadToEnd() + sr.Close() + OpenFile(relayPath) + ElseIf path Like "*.bat" Then + If (ShiftOSDesktop.unitymode) Then + Shell(path) + Else + If (ShiftOSDesktop.boughtunitymode) Then + infobox.title = "File Skimmer - Unity Mode:" + infobox.textinfo = "You do not have unity mode enabled. Enable unity mode to run shell scripts" + infobox.Show() + Else + infobox.title = "File Skimmer - Unity Mode:" + infobox.textinfo = "You do not have unity mode" + infobox.Show() + End If + End If + Else + If My.Computer.FileSystem.DirectoryExists(path) Then + lbllocation.Text = path + showcontents() + Else + infobox.title = "Could not run file" + infobox.textinfo = "Error running file" + infobox.Show() + End If + + End If + + End Sub + Private Sub lbfiles_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lvfiles.MouseClick + If e.Button = Windows.Forms.MouseButtons.Right Then + fileactions.Show(MousePosition) + Else + If lvfiles.SelectedItems(0).Text Like "*.*" Then + btndeletefile.Text = "Delete File" + btndeletefile.Image = My.Resources.deletefile + btndeletefile.Size = New Size(117, 31) + Else + btndeletefile.Text = "Delete Folder" + btndeletefile.Image = My.Resources.deletefolder + btndeletefile.Size = New Size(130, 31) + End If + End If + End Sub + + Private Sub pnlbreak_MouseEnter(sender As Object, e As EventArgs) Handles pnlbreak.Click + If pnloptions.Visible = False Then + pnlbreak.BackgroundImage = My.Resources.downarrow + pnloptions.Show() + Else + pnlbreak.BackgroundImage = My.Resources.uparrow + pnloptions.Hide() + End If + End Sub + + Private Sub btndeletefile_Click() Handles btndeletefile.Click + If lvfiles.SelectedItems.Count > 0 Then + If lvfiles.SelectedItems(0).Text Like "*.*" Then + If lvfiles.SelectedItems(0).Text Like "*.dri*" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This system file is protected and cannot be deleted." & Environment.NewLine & Environment.NewLine & "Permission to delete this file has been blocked to protect the system from potential damage." + infobox.Show() + ElseIf lvfiles.SelectedItems(0).Text Like "*.sft*" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This system file is protected and cannot be deleted." & Environment.NewLine & Environment.NewLine & "Permission to delete this file has been blocked to protect the system from potential damage." + infobox.Show() + ElseIf lvfiles.SelectedItems(0).Text Like "*.lst*" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This system file is protected and cannot be deleted." & Environment.NewLine & Environment.NewLine & "Permission to delete this file has been blocked to protect the system from potential damage." + infobox.Show() + ElseIf lvfiles.SelectedItems(0).Text Like "*.lang*" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This system file is protected and cannot be deleted." & Environment.NewLine & Environment.NewLine & "Permission to delete this file has been blocked to protect the system from potential damage." + infobox.Show() + ElseIf lvfiles.SelectedItems(0).Text Like "Exit Folder" Then + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "You cannot delete this folder." + infobox.Show() + Else + My.Computer.FileSystem.DeleteFile(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text) + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + showcontents() + End If + Else + Select Case lvfiles.SelectedItems(0).Text + Case "Shiftum42", "SoftwareData", "Drivers", "Languages", "KnowledgeInput" + infobox.title = "File Skimmer - Warning!" + infobox.textinfo = "This system folder is protected and cannot be deleted." & Environment.NewLine & Environment.NewLine & "Permission to delete this folder has been blocked to protect the system from potential damage." + infobox.Show() + Case Else + Try + My.Computer.FileSystem.DeleteDirectory(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text, FileIO.DeleteDirectoryOption.DeleteAllContents) + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + showcontents() + Catch ex As Exception + infobox.title = "File Skimmer - Error!" + infobox.textinfo = "Failed to delete the folder / file(s)." + infobox.Show() + End Try + End Select + End If + End If + End Sub + + Private Sub btnnewfolder_Click(sender As Object, e As EventArgs) Handles btnnewfolder.Click + infobox.lblintructtext.Text = "Please enter a name for your new folder:" + infobox.txtuserinput.Text = "" + infobox.lblintructtext.Show() + infobox.txtuserinput.Show() + infobox.title = "New Folder" + infobox.Show() + infobox.state = "makingfolder" + End Sub + + Public Sub makefolder() + My.Computer.FileSystem.CreateDirectory(lbllocation.Text & "/" & infobox.txtuserinput.Text) + showcontents() + infobox.Close() + End Sub + + Private Sub setupoptions() + If ShiftOSDesktop.boughtfileskimmernewfolder = True Then btnnewfolder.Show() Else btnnewfolder.Hide() + If ShiftOSDesktop.boughtfileskimmerdelete = True Then btndeletefile.Show() Else btndeletefile.Hide() + If ShiftOSDesktop.boughtfileskimmernewfolder = False AndAlso ShiftOSDesktop.boughtfileskimmerdelete = False Then pnlbreak.Hide() + End Sub + + Private Sub lvfiles_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lvfiles.SelectedIndexChanged + + End Sub + + Private Sub DeleteToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DeleteToolStripMenuItem.Click + btndeletefile_Click() + End Sub + + +End Class \ No newline at end of file diff --git a/ShiftOS/File_Crypt.vb b/ShiftOS/File_Crypt.vb new file mode 100644 index 0000000..d6ee0f7 --- /dev/null +++ b/ShiftOS/File_Crypt.vb @@ -0,0 +1,55 @@ +Imports System +Imports System.IO +Imports System.Security +Imports System.Security.Cryptography +Imports System.Text +Public Class File_Crypt + Public Const sSecretKey As String = "Password" + + Public Shared Sub EncryptFile(ByVal sInputFilename As String, ByVal sOutputFilename As String, ByVal sKey As String) + + Dim fsInput As New FileStream(sInputFilename, FileMode.Open, FileAccess.Read) + Dim fsEncrypted As New FileStream(sOutputFilename, FileMode.Create, FileAccess.Write) + + Dim DES As New DESCryptoServiceProvider() + + + DES.Key = ASCIIEncoding.ASCII.GetBytes(sKey) + + DES.IV = ASCIIEncoding.ASCII.GetBytes(sKey) + + Dim desencrypt As ICryptoTransform = DES.CreateEncryptor() + + Dim cryptostream As New CryptoStream(fsEncrypted, desencrypt, CryptoStreamMode.Write) + + Dim bytearrayinput(fsInput.Length - 1) As Byte + fsInput.Read(bytearrayinput, 0, bytearrayinput.Length) + cryptostream.Write(bytearrayinput, 0, bytearrayinput.Length) + cryptostream.Dispose() + fsInput.Dispose() + fsEncrypted.Dispose() + End Sub + + Public Shared Sub DecryptFile(ByVal sInputFilename As String, ByVal sOutputFilename As String, ByVal sKey As String) + + Dim DES As New DESCryptoServiceProvider() + + + DES.Key() = ASCIIEncoding.ASCII.GetBytes(sKey) + + DES.IV = ASCIIEncoding.ASCII.GetBytes(sKey) + + Dim fsread As New FileStream(sInputFilename, FileMode.Open, FileAccess.Read) + + Dim desdecrypt As ICryptoTransform = DES.CreateDecryptor() + + Dim cryptostreamDecr As New CryptoStream(fsread, desdecrypt, CryptoStreamMode.Read) + + Dim fsDecrypted As New StreamWriter(sOutputFilename) + fsDecrypted.Write(New StreamReader(cryptostreamDecr).ReadToEnd) + fsDecrypted.Flush() + fsread.Dispose() + fsDecrypted.Dispose() + End Sub + +End Class \ No newline at end of file diff --git a/ShiftOS/FloatyBird.Designer.vb b/ShiftOS/FloatyBird.Designer.vb new file mode 100644 index 0000000..a1b471d --- /dev/null +++ b/ShiftOS/FloatyBird.Designer.vb @@ -0,0 +1,237 @@ + _ +Partial Class FloatyBird + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 313) + Me.pgleft.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(807, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 313) + Me.pgright.TabIndex = 17 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(809, 30) + Me.titlebar.TabIndex = 14 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(89, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(807, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 341) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(805, 2) + Me.pgbottom.TabIndex = 18 + ' + 'pgcontents + ' + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(805, 311) + Me.pgcontents.TabIndex = 15 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'FloatyBird + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(809, 343) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "FloatyBird" + Me.Text = "template" + Me.TopMost = True + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/FloatyBird.resx b/ShiftOS/FloatyBird.resx new file mode 100644 index 0000000..79f713a --- /dev/null +++ b/ShiftOS/FloatyBird.resx @@ -0,0 +1,129 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 1056, 18 + + + 1140, 18 + + + 1253, 18 + + \ No newline at end of file diff --git a/ShiftOS/FloatyBird.vb b/ShiftOS/FloatyBird.vb new file mode 100644 index 0000000..41c7988 --- /dev/null +++ b/ShiftOS/FloatyBird.vb @@ -0,0 +1,415 @@ +Public Class FloatyBird +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + ' fixes growing issue + If justopened = False Then + Me.Size = New Size(Me.Width, Me.Height - (Skins.titlebarheight / 2)) + End If + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.dodgename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + + 'remove background colour when image is present + 'If closebutton.BackgroundImage Is Nothing Then Else closebutton.BackColor = Color.Transparent + 'If titlebar.BackgroundImage Is Nothing Then Else titlebar.BackColor = Color.Transparent + 'If rollupbutton.BackgroundImage Is Nothing Then Else rollupbutton.BackColor = Color.Transparent + 'If pgtoplcorner.BackgroundImage Is Nothing Then Else pgtoplcorner.BackColor = Color.Transparent + 'If pgtoprcorner.BackgroundImage Is Nothing Then Else pgtoprcorner.BackColor = Color.Transparent + 'If minimizebutton.BackgroundImage Is Nothing Then Else minimizebutton.BackColor = Color.Transparent + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + + +End Class diff --git a/ShiftOS/FloodGate Manager.Designer.vb b/ShiftOS/FloodGate Manager.Designer.vb new file mode 100644 index 0000000..e6eb11e --- /dev/null +++ b/ShiftOS/FloodGate Manager.Designer.vb @@ -0,0 +1,508 @@ + _ +Partial Class FloodGate_Manager + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlPackages = New System.Windows.Forms.Panel() + Me.pkgprogress = New ShiftOS.ProgressBarEX() + Me.lbfirstlaunchmsg = New System.Windows.Forms.Label() + Me.lbpkgdnload = New System.Windows.Forms.Label() + Me.Button3 = New System.Windows.Forms.Button() + Me.pnlstatus = New System.Windows.Forms.Panel() + Me.progress = New ShiftOS.ProgressBarEX() + Me.lblstatusinfo = New System.Windows.Forms.Label() + Me.pnlSearch = New System.Windows.Forms.Panel() + Me.dnlBox = New System.Windows.Forms.ListView() + Me.pnlsearchheader = New System.Windows.Forms.Panel() + Me.urlBox = New System.Windows.Forms.TextBox() + Me.lblfeaturedfloods = New System.Windows.Forms.Label() + Me.pnlDownload = New System.Windows.Forms.Panel() + Me.Button1 = New System.Windows.Forms.Button() + Me.progDesc = New System.Windows.Forms.Label() + Me.progLabel = New System.Windows.Forms.Label() + Me.progDownload = New System.Windows.Forms.Button() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.shouldnotneedtoexist = New System.Windows.Forms.Timer(Me.components) + Me.dnloadtimer = New System.Windows.Forms.Timer(Me.components) + Me.tmrdwnld = New System.Windows.Forms.Timer(Me.components) + Me.ColorDialog1 = New System.Windows.Forms.ColorDialog() + Me.pgcontents.SuspendLayout() + Me.pnlPackages.SuspendLayout() + Me.pnlstatus.SuspendLayout() + Me.pnlSearch.SuspendLayout() + Me.pnlsearchheader.SuspendLayout() + Me.pnlDownload.SuspendLayout() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlPackages) + Me.pgcontents.Controls.Add(Me.pnlstatus) + Me.pgcontents.Controls.Add(Me.pnlSearch) + Me.pgcontents.Controls.Add(Me.pnlDownload) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(847, 436) + Me.pgcontents.TabIndex = 20 + ' + 'pnlPackages + ' + Me.pnlPackages.Controls.Add(Me.pkgprogress) + Me.pnlPackages.Controls.Add(Me.lbfirstlaunchmsg) + Me.pnlPackages.Controls.Add(Me.lbpkgdnload) + Me.pnlPackages.Controls.Add(Me.Button3) + Me.pnlPackages.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlPackages.Location = New System.Drawing.Point(0, 0) + Me.pnlPackages.Name = "pnlPackages" + Me.pnlPackages.Size = New System.Drawing.Size(847, 402) + Me.pnlPackages.TabIndex = 5 + ' + 'pkgprogress + ' + Me.pkgprogress.BlockSeparation = 3 + Me.pkgprogress.BlockWidth = 5 + Me.pkgprogress.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pkgprogress.Color = System.Drawing.Color.Gray + Me.pkgprogress.Location = New System.Drawing.Point(49, 123) + Me.pkgprogress.MaxValue = 100 + Me.pkgprogress.MinValue = 0 + Me.pkgprogress.Name = "pkgprogress" + Me.pkgprogress.Orientation = ShiftOS.ProgressBarEX.ProgressBarOrientation.Horizontal + Me.pkgprogress.ShowValue = False + Me.pkgprogress.Size = New System.Drawing.Size(722, 45) + Me.pkgprogress.Step = 10 + Me.pkgprogress.Style = ShiftOS.ProgressBarEX.ProgressBarExStyle.Continuous + Me.pkgprogress.TabIndex = 3 + Me.pkgprogress.Value = 0 + ' + 'lbfirstlaunchmsg + ' + Me.lbfirstlaunchmsg.AutoSize = True + Me.lbfirstlaunchmsg.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbfirstlaunchmsg.Location = New System.Drawing.Point(42, 28) + Me.lbfirstlaunchmsg.Name = "lbfirstlaunchmsg" + Me.lbfirstlaunchmsg.Size = New System.Drawing.Size(395, 37) + Me.lbfirstlaunchmsg.TabIndex = 2 + Me.lbfirstlaunchmsg.Text = "Downloading Package List" + ' + 'lbpkgdnload + ' + Me.lbpkgdnload.AutoSize = True + Me.lbpkgdnload.Location = New System.Drawing.Point(76, 80) + Me.lbpkgdnload.Name = "lbpkgdnload" + Me.lbpkgdnload.Size = New System.Drawing.Size(171, 13) + Me.lbpkgdnload.TabIndex = 1 + Me.lbpkgdnload.Text = "(You will only have to do this once)" + ' + 'Button3 + ' + Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button3.Location = New System.Drawing.Point(1237, 7) + Me.Button3.Name = "Button3" + Me.Button3.Size = New System.Drawing.Size(75, 23) + Me.Button3.TabIndex = 0 + Me.Button3.Text = "Download" + Me.Button3.UseVisualStyleBackColor = True + ' + 'pnlstatus + ' + Me.pnlstatus.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlstatus.Controls.Add(Me.progress) + Me.pnlstatus.Controls.Add(Me.lblstatusinfo) + Me.pnlstatus.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlstatus.Location = New System.Drawing.Point(0, 402) + Me.pnlstatus.Name = "pnlstatus" + Me.pnlstatus.Size = New System.Drawing.Size(847, 34) + Me.pnlstatus.TabIndex = 4 + ' + 'progress + ' + Me.progress.BlockSeparation = 3 + Me.progress.BlockWidth = 5 + Me.progress.Color = System.Drawing.Color.Gray + Me.progress.Dock = System.Windows.Forms.DockStyle.Bottom + Me.progress.Location = New System.Drawing.Point(0, 22) + Me.progress.MaxValue = 100 + Me.progress.MinValue = 0 + Me.progress.Name = "progress" + Me.progress.Orientation = ShiftOS.ProgressBarEX.ProgressBarOrientation.Horizontal + Me.progress.ShowValue = False + Me.progress.Size = New System.Drawing.Size(845, 10) + Me.progress.Step = 10 + Me.progress.Style = ShiftOS.ProgressBarEX.ProgressBarExStyle.Continuous + Me.progress.TabIndex = 1 + Me.progress.Value = 0 + ' + 'lblstatusinfo + ' + Me.lblstatusinfo.AutoSize = True + Me.lblstatusinfo.Location = New System.Drawing.Point(9, 6) + Me.lblstatusinfo.Name = "lblstatusinfo" + Me.lblstatusinfo.Size = New System.Drawing.Size(38, 13) + Me.lblstatusinfo.TabIndex = 0 + Me.lblstatusinfo.Text = "Ready" + ' + 'pnlSearch + ' + Me.pnlSearch.BackColor = System.Drawing.Color.White + Me.pnlSearch.Controls.Add(Me.dnlBox) + Me.pnlSearch.Controls.Add(Me.pnlsearchheader) + Me.pnlSearch.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlSearch.Location = New System.Drawing.Point(0, 0) + Me.pnlSearch.Name = "pnlSearch" + Me.pnlSearch.Size = New System.Drawing.Size(847, 436) + Me.pnlSearch.TabIndex = 3 + ' + 'dnlBox + ' + Me.dnlBox.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.dnlBox.Dock = System.Windows.Forms.DockStyle.Fill + Me.dnlBox.Location = New System.Drawing.Point(0, 54) + Me.dnlBox.Name = "dnlBox" + Me.dnlBox.Size = New System.Drawing.Size(847, 382) + Me.dnlBox.TabIndex = 4 + Me.dnlBox.UseCompatibleStateImageBehavior = False + ' + 'pnlsearchheader + ' + Me.pnlsearchheader.Controls.Add(Me.urlBox) + Me.pnlsearchheader.Controls.Add(Me.lblfeaturedfloods) + Me.pnlsearchheader.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlsearchheader.Location = New System.Drawing.Point(0, 0) + Me.pnlsearchheader.Name = "pnlsearchheader" + Me.pnlsearchheader.Size = New System.Drawing.Size(847, 54) + Me.pnlsearchheader.TabIndex = 3 + ' + 'urlBox + ' + Me.urlBox.Dock = System.Windows.Forms.DockStyle.Top + Me.urlBox.Location = New System.Drawing.Point(0, 0) + Me.urlBox.Name = "urlBox" + Me.urlBox.Size = New System.Drawing.Size(847, 20) + Me.urlBox.TabIndex = 2 + ' + 'lblfeaturedfloods + ' + Me.lblfeaturedfloods.AutoSize = True + Me.lblfeaturedfloods.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblfeaturedfloods.Location = New System.Drawing.Point(45, 20) + Me.lblfeaturedfloods.Name = "lblfeaturedfloods" + Me.lblfeaturedfloods.Size = New System.Drawing.Size(170, 24) + Me.lblfeaturedfloods.TabIndex = 3 + Me.lblfeaturedfloods.Text = "Featured Floods:" + ' + 'pnlDownload + ' + Me.pnlDownload.Controls.Add(Me.Button1) + Me.pnlDownload.Controls.Add(Me.progDesc) + Me.pnlDownload.Controls.Add(Me.progLabel) + Me.pnlDownload.Controls.Add(Me.progDownload) + Me.pnlDownload.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlDownload.Location = New System.Drawing.Point(0, 0) + Me.pnlDownload.Name = "pnlDownload" + Me.pnlDownload.Size = New System.Drawing.Size(847, 436) + Me.pnlDownload.TabIndex = 2 + ' + 'Button1 + ' + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(10, 7) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(75, 23) + Me.Button1.TabIndex = 3 + Me.Button1.Text = "Back" + Me.Button1.UseVisualStyleBackColor = True + ' + 'progDesc + ' + Me.progDesc.AutoSize = True + Me.progDesc.Location = New System.Drawing.Point(10, 46) + Me.progDesc.Name = "progDesc" + Me.progDesc.Size = New System.Drawing.Size(41, 13) + Me.progDesc.TabIndex = 2 + Me.progDesc.Text = "Desc..." + ' + 'progLabel + ' + Me.progLabel.AutoSize = True + Me.progLabel.Location = New System.Drawing.Point(10, 33) + Me.progLabel.Name = "progLabel" + Me.progLabel.Size = New System.Drawing.Size(35, 13) + Me.progLabel.TabIndex = 1 + Me.progLabel.Text = "Name" + ' + 'progDownload + ' + Me.progDownload.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.progDownload.Location = New System.Drawing.Point(644, 6) + Me.progDownload.Name = "progDownload" + Me.progDownload.Size = New System.Drawing.Size(193, 23) + Me.progDownload.TabIndex = 0 + Me.progDownload.Text = "Download" + Me.progDownload.UseVisualStyleBackColor = True + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 466) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(847, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(157, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "FloodGate Manager" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(849, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 436) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(849, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 438) + Me.pgright.TabIndex = 22 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 436) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 438) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(851, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'shouldnotneedtoexist + ' + ' + 'dnloadtimer + ' + ' + 'tmrdwnld + ' + Me.tmrdwnld.Interval = 1000 + ' + 'FloodGate_Manager + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(1, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(1, Byte), Integer)) + Me.ClientSize = New System.Drawing.Size(851, 468) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "FloodGate_Manager" + Me.Text = "FloodGate Manager" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnlPackages.ResumeLayout(False) + Me.pnlPackages.PerformLayout() + Me.pnlstatus.ResumeLayout(False) + Me.pnlstatus.PerformLayout() + Me.pnlSearch.ResumeLayout(False) + Me.pnlsearchheader.ResumeLayout(False) + Me.pnlsearchheader.PerformLayout() + Me.pnlDownload.ResumeLayout(False) + Me.pnlDownload.PerformLayout() + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents shouldnotneedtoexist As System.Windows.Forms.Timer + Friend WithEvents pnlDownload As System.Windows.Forms.Panel + Friend WithEvents Button1 As System.Windows.Forms.Button + Friend WithEvents progDesc As System.Windows.Forms.Label + Friend WithEvents progLabel As System.Windows.Forms.Label + Friend WithEvents progDownload As System.Windows.Forms.Button + Friend WithEvents pnlSearch As System.Windows.Forms.Panel + Friend WithEvents dnlBox As System.Windows.Forms.ListView + Friend WithEvents pnlsearchheader As System.Windows.Forms.Panel + Friend WithEvents lblfeaturedfloods As System.Windows.Forms.Label + Friend WithEvents urlBox As System.Windows.Forms.TextBox + Friend WithEvents pnlstatus As System.Windows.Forms.Panel + Friend WithEvents lblstatusinfo As System.Windows.Forms.Label + Friend WithEvents pnlPackages As System.Windows.Forms.Panel + Friend WithEvents lbfirstlaunchmsg As System.Windows.Forms.Label + Friend WithEvents lbpkgdnload As System.Windows.Forms.Label + Friend WithEvents Button3 As System.Windows.Forms.Button + Friend WithEvents dnloadtimer As System.Windows.Forms.Timer + Friend WithEvents tmrdwnld As System.Windows.Forms.Timer + Friend WithEvents ColorDialog1 As System.Windows.Forms.ColorDialog + Friend WithEvents progress As ShiftOS.ProgressBarEX + Friend WithEvents pkgprogress As ShiftOS.ProgressBarEX +End Class diff --git a/ShiftOS/FloodGate Manager.resx b/ShiftOS/FloodGate Manager.resx new file mode 100644 index 0000000..a4ad5fa --- /dev/null +++ b/ShiftOS/FloodGate Manager.resx @@ -0,0 +1,141 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 316, 24 + + + 433, 24 + + + 14, 24 + + + 132, 22 + + + 517, 24 + + + 17, 41 + + + 121, 41 + + \ No newline at end of file diff --git a/ShiftOS/FloodGate Manager.vb b/ShiftOS/FloodGate Manager.vb new file mode 100644 index 0000000..fc0437e --- /dev/null +++ b/ShiftOS/FloodGate Manager.vb @@ -0,0 +1,700 @@ +Imports System.IO +Imports System.Drawing.Drawing2D +Imports System.ComponentModel + +Public Class FloodGate_Manager + Dim itemGood As Integer() + Dim itemPrice As Decimal() + Dim itemName As String() + Dim itemDesc As String() + Dim itemSize As Integer() + Dim itemURL As String() + Dim item As Integer + Dim time As Integer + Dim seeders As Integer + Dim progpop As Integer + Dim daysafterrelease As Integer + + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + FloodRegistry.registerItems() + ShiftOSDesktop.pnlpanelbuttonfloodgate.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonfloodgate, ShiftOSDesktop.tbfloodgateicon, ShiftOSDesktop.tbfloodgatetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + If ShiftOSDesktop.FloodGateManagerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + pnlSearch.Dock = DockStyle.Fill + If (ShiftOSDesktop.installedfloodgatenow) Then + + dnloadtimer.Start() + pnlPackages.BringToFront() + pnlPackages.Dock = DockStyle.Fill + End If + + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + + shouldnotneedtoexist.Start() + End Sub + +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 300 'replace with minimum size + Public minimumsizeheight As Integer = 200 'replace with minimum size + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(851, 468) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.floodgatename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.floodgateicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region +#Region "Add Items" + Private Sub addItems(repl As Boolean) + + + 'See http://shiftos.net/topic1162.html for the updated tutorial + + + + + + + + If (repl) Then + dnlBox.Items.Clear() + End If + End Sub +#End Region +#Region "Download Programs" + Dim speed As Decimal + Private Sub progDownload_Click(sender As Object, e As EventArgs) Handles progDownload.Click + If (Not System.IO.Directory.Exists(ShiftOSDesktop.ShiftOSPath & "\Home\Downloads")) Then + System.IO.Directory.CreateDirectory(ShiftOSDesktop.ShiftOSPath & "\Home\Downloads") + End If + Randomize() + Dim value As Integer = CInt(Int(100 * Rnd())) + If (value > itemGood(item)) Then + 'do progress delay thing + '(use itemSize(item) to get file size for whoever wants to implement it) + 'make the download speed faster than download manager downloads + Select Case progLabel.Text.ToLower + 'Case "program name all lowercase" + ' code to install program + Case "bitnote hack" + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance + 5 + Bitnote_Wallet.logtransaction(5, "ShifterHacker", "Check out my other ShiftOS hacks at shiftnet.shifterhacker/home.rnp") + Bitnote_Wallet.setupbitnotestats() + Case Else + If seeders > 0 Then + lblstatusinfo.Text = "Connecting to " & seeders & " seeders" + speed = seeders * (Math.Ceiling(Rnd() * 10)) + progress.MaxValue = itemSize(item) + tmrdwnld.Start() + Else + infobox.showinfo("No Seeders", "There are no seeders to complete the file transfer") + End If + 'infobox.title = "FloodGate Manager - Error" + 'infobox.textinfo = "Program Not Found: " & progLabel.Text & Environment.NewLine & "Make sure you have the correct address and there are enough seeders." + 'infobox.Show() + End Select + Else + Dim x As Integer = Math.Ceiling(Rnd() * 4) + Select Case x + Case 1 + Viruses.zerogravity = True + Viruses.zerogravitythreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setupzerovirus() + Case 2 + Viruses.mousetrap = True + Viruses.mousetrapthreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setupmousetrapvirus() + Case 3 + Viruses.beeper = True + Viruses.beeperthreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setupbeepervirus() + Case Else + Viruses.ThePlague = True + Viruses.theplaguethreatlevel = CInt(Math.Floor((4) * Rnd())) + 1 + Viruses.setuptheplague() + End Select + 'Possible non-virus viruses: + 'Take away codepoints + 'Take away bitnotes + End If + End Sub + Dim i As Integer + Private Sub tmrdwnld_Tick(sender As Object, e As EventArgs) Handles tmrdwnld.Tick + If i < progress.MaxValue Then + progress.Value = i + i = i + speed + lblstatusinfo.Text = "Receiving " & speed & "kb/s from " & seeders & " seeders. File transferred " & progress.Value & "/" & progress.MaxValue & "kb" + Else + progress.Value = progress.MaxValue + progress.Value = 0 + i = 0 + lblstatusinfo.Text = "Ready" + successinfo(progLabel.Text) 'This both writes the file and show the success infobox message + tmrdwnld.Stop() + End If + End Sub + Private Sub successinfo(ByVal item As String) + 'WRITES FILE + Dim sw As StreamWriter + sw = New StreamWriter(ShiftOSDesktop.ShiftOSPath & "Shiftum42\Drivers\HDD.dri") + sw.WriteLine(item) + sw.Close() + File_Crypt.EncryptFile(ShiftOSDesktop.ShiftOSPath + "Shiftum42\Drivers\HDD.dri", ShiftOSDesktop.ShiftOSPath & "\Home\Downloads\" & item & ".saa", ShiftOSDesktop.sSecretKey) 'saa = stand alone application + 'SHOWS SUCCESS INFO + infobox.title = item & " Download successfully" + infobox.textinfo = item & " has been successfully downloaded to your downloads folder (C:\ShiftOS\Home\Downloads)" + infobox.Show() + End Sub +#End Region +#Region "The code" + Public Sub setup() + ReDim itemGood(0 To 0) + addItems(True) + End Sub + Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles MyBase.Load + pnlSearch.BringToFront() + dosize() + dnlBox.View = View.List + End Sub + Public Sub addItem(item As String, chance As Double, author As String, desc As String, url As String, size As String, li As Boolean) + ReDim Preserve itemGood(0 To itemGood.Length) + ReDim Preserve itemURL(0 To itemGood.Length) + ReDim Preserve itemName(0 To itemGood.Length) + ReDim Preserve itemDesc(0 To itemGood.Length) + ReDim Preserve itemSize(0 To itemGood.Length) + If li Then dnlBox.Items.Add(item) + itemName(itemGood.Length - 2) = item + itemGood(itemGood.Length - 2) = chance + itemSize(itemGood.Length - 2) = size + itemDesc(itemGood.Length - 2) = "Submitted by: " & author & "\" & desc + itemURL(itemGood.Length - 2) = url + End Sub + + Private Sub dnlBox_click(sender As Object, e As EventArgs) Handles dnlBox.Click + item = dnlBox.FocusedItem.Index + dnl(dnlBox.FocusedItem.Text, item) + 'progLabel.Text = dnlBox.FocusedItem.Text + 'progDesc.Text = "URL: " & itemURL(item) & ControlChars.NewLine & itemDesc(item).Replace("\"c, ControlChars.NewLine) + 'progDownload.Text = "Download: " & CStr(itemSize(item)) & "kb" + 'pnlDownload.BringToFront() + 'pnlDownload.Dock = DockStyle.Fill + 'setupseeders() + 'updatestats(dnlBox.FocusedItem.Index) + End Sub + Private Sub dnl(name As String, item As String) + progLabel.Text = name + progDesc.Text = "URL: " & itemURL(item) & ControlChars.NewLine & itemDesc(item).Replace("\"c, ControlChars.NewLine) + progDownload.Text = "Download: " & CStr(itemSize(item)) & "kb" + pnlDownload.BringToFront() + pnlDownload.Dock = DockStyle.Fill + setupseeders() + updatestats(item) + End Sub + Private Sub dosize() + progDownload.Location = New Point(Me.Width - 193 - 7, 7) + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + pnlSearch.BringToFront() + pnlSearch.Dock = DockStyle.Fill + End Sub + Public Sub download(url As String) + Me.Show() + Me.BringToFront() + If itemURL.Contains(url) Then + For i As Integer = 0 To itemURL.Length - 1 + If (itemURL(i) = url) Then + item = i + Exit For + End If + Next + dnl(itemName(item), item) + 'progLabel.Text = itemName(item) & " (" & url & ")" + 'progDesc.Text = itemDesc(item).Replace("\", ControlChars.NewLine) + 'pnlDownload.BringToFront() + End If + End Sub + Private Sub urlbox_Press(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles urlBox.KeyDown + If (e.KeyCode = Keys.Enter) Then + download(urlBox.Text) + End If + End Sub + + Private Sub shouldnotneedtoexist_Tick(sender As Object, e As EventArgs) Handles shouldnotneedtoexist.Tick + dosize() + End Sub + + Private Sub updatestats(ByVal item As String) + Select Case item + Case "program1" 'Program name + lblstatusinfo.Text = "Viewing flood: " & item & " | Flood Seeders: " & seeders + End Select + End Sub + + Private Sub progDesc_Click(sender As Object, e As EventArgs) Handles progDesc.Click + + If (progDesc.Text.Contains("ƒ")) Then + Shiftnet.loadsite(progDesc.Text.Split("ƒ")(1)) + End If + End Sub + + Private Sub dnloadtimer_Tick(sender As Object, e As EventArgs) Handles dnloadtimer.Tick + time = time + 1 + If (ShiftOSDesktop.installedfloodgatenow) Then + pnlPackages.BringToFront() + pnlPackages.Dock = DockStyle.Fill + pkgprogress.Value = time + If (time = 100) Then + ShiftOSDesktop.installedfloodgatenow = False + dnloadtimer.Stop() + time = 0 + pnlSearch.Dock = DockStyle.Fill + pnlSearch.BringToFront() + End If + Else + If (time > itemSize(item)) Then + 'do stuff + End If + End If + End Sub + + Private Sub setupseeders() + Select Case progLabel.Text.ToLower + Case "dodge" + progpop = 67 + Dim i() As String = Split(Date.Today, "/") + daysafterrelease = i(0) - 6 + Case "Web browser" + progpop = 94 + Dim i() As String = Split(Date.Today, "/") + daysafterrelease = i(0) - 11 + Case "b1n0t3 h4ck" + progpop = 69 + Dim i() As String = Split(Date.Today, "/") + daysafterrelease = i(0) - 0 + Case "virus scanner" + progpop = 56 + Dim i() As String = Split(Date.Today, "/") + daysafterrelease = i(0) - 30 + 'Case "program name" + 'How popular is the program scale of 1 - 100 + 'Dim i() As String = Split(Date.Today, "/") + 'daysafterrelease = i(0) - release day(random constant) + Case Else 'For anyone who forgets because I tried to move the entire process into FloodRegistry + progpop = 99 + Dim i() As String = Split(Date.Today, "/") + daysafterrelease = i(0) - 50 + End Select + seeders = Math.Ceiling(Rnd() * (2 * progpop)) - daysafterrelease + If seeders < 0 Then + seeders = 0 + End If + End Sub +#End Region + +End Class \ No newline at end of file diff --git a/ShiftOS/FloodRegistry.Designer.vb b/ShiftOS/FloodRegistry.Designer.vb new file mode 100644 index 0000000..fa8f6f2 --- /dev/null +++ b/ShiftOS/FloodRegistry.Designer.vb @@ -0,0 +1,37 @@ + _ +Partial Class FloodRegistry + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.SuspendLayout() + ' + 'Form1 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(284, 261) + Me.Name = "Form1" + Me.Text = "Form1" + Me.ResumeLayout(False) + + End Sub +End Class diff --git a/ShiftOS/FloodRegistry.resx b/ShiftOS/FloodRegistry.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/FloodRegistry.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/ShiftOS/FloodRegistry.vb b/ShiftOS/FloodRegistry.vb new file mode 100644 index 0000000..5eae7cb --- /dev/null +++ b/ShiftOS/FloodRegistry.vb @@ -0,0 +1,37 @@ +Public Class FloodRegistry + Dim items As String + Public Sub registerItems() + FloodGate_Manager.setup() + Shiftnet.tpbsetup() + 'Format: + 'registerItem("Program Name", "Author name", Percent chance to be a virus, "Program Description \ for Newline", "URL", File size in kb, Places the program is (Seperated by commas) + 'Example: + 'registerItem("SomeProgram",95,"ImakePIRATES","This Is the description\with a newline","shiftnet.pirate.pirateboat/floods/flood.flood",256,"FloodGate" ' This program will be added to PirateBoat and to Floodgate (a shiftnet.pirate.pirateboat/ link will add it to pirate boat) + 'registerItem("SomeProg2222",0,"MYPROGS","This Is the description\with a newline\and another","sssss.floods/.flood",100,"" ' This program will not be added to pirateboat or to floodgate + registerItem("Dodge", 20, "ThePirateMaster", "Dodge is a program where you earn code point for dodging falling objects\Pirate it for free, download now.", "shiftnet.pirate.pirateboat/floods/dodge.flood", 500, "FloodGate") 'Not adding to floodgate will still be downloadable by floodgate with the URL + registerItem("Codepoint Hack", 20, "ShifterHacker101", "Created by: ShifterHacker\This hack gives you 5 codepoints\Check out my other hacks at shiftnet.shifterhacker/home.rnp \ƒshiftnet.shifterhacker/home.rnp", "shiftnet.shifterhacker/hacks/codepointhack.flood", 243, "FloodGate") + registerItem("B1N0T3 H4CK", 0, "31T3 H4CKER", "Created by ME\This hack gives you 10 B1TN0T3!\!!!!S000000000 C000000L.", "shiftnet.leethackz/deezhax/bitnotehackorz.flood", 100, "FloodGate") + registerItem("Virus Scanner", 50, "ThePirateMaster", "This Virus Scanner is a program that helps you fend off nasty infections that could harm your computer!\Pirate it for free, download now.", "shiftnet.pirate.pirateboat/floods/virusscanner.flood", 10000, "FloodGate") + registerItem("Labyrinth", 20, "ThePirateMaster", "Labytinth is a game where you run through mazes to collect codepoints in limited time\Pirate it for free, download now.", "shiftnet.pirate.pirateboat/floods/labyrinth.flood", 500, "FloodGate") + registerItem("Calculator", 20, "ThePirateMaster", "Calculator is a utility application that lets you add, subtract, multiply, and devide, all in your OS\Pirate it for free, download now.", "shiftnet.pirate.pirateboat/floods/calculator.flood", 500, "FloodGate") + registerItem("Audio Player", 20, "ThePirateMaster", "Audio player is an app that lets you play audio\Pirate it for free, download now.", "shiftnet.pirate.pirateboat/floods/audio_player.flood", 500, "FloodGate") + registerItem("Video Player", 20, "ThePirateMaster", "Video player is an app that lets you play video\Pirate it for free, download now.", "shiftnet.pirate.pirateboat/floods/video_player.flood", 500, "FloodGate") + registerItem("Web Browser", 20, "MF", "The web browser is an app that lets you browse the World Wide Web... with internet explorer.\Pirate it for free, download now.", "shiftnet.pirate.pirateboat/floods/web_browser.flood", 500, "") + registerItem("Virus Grade 1 removal unlocker", 75, "ShiftHacker102", "This unlocks the virus removal feature of grade 1 viruses in the virus scanner", "shiftnet.pirate.pirateboat/floods/Virus_remove-1", 500, "") + registerItem("Virus Grade 2 removal unlocker", 80, "ShiftHacker102", "This unlocks the virus removal feature of grade 2 viruses in the virus scanner", "shiftnet.pirate.pirateboat/floods/Virus_remove-2", 500, "") + registerItem("Virus Grade 3 removal unlocker", 85, "ShiftHacker102", "This unlocks the virus removal feature of grade 3 viruses in the virus scanner", "shiftnet.pirate.pirateboat/floods/Virus_remove-3", 500, "") + registerItem("Virus Grade 4 removal unlocker", 90, "ShiftHacker102", "This unlocks the virus removal feature of grade 4 viruses in the virus scanner", "shiftnet.pirate.pirateboat/floods/Virus_remove-4", 500, "") + End Sub + Private Sub registerItem(name As String, virus As Double, author As String, desc As String, url As String, size As String, places As String) + If (places.Contains("FloodGate")) Then + 'MsgBox("how...") + FloodGate_Manager.addItem(name, virus, author, desc, url, size, True) + Else + FloodGate_Manager.addItem(name, virus, author, desc, url, size, False) ' Because of how FloodGate works, this is required + End If + If (url.StartsWith("shiftnet.pirate.pirateboat/")) Then + Shiftnet.tpb_addItem(name, url) + End If + items = items & "|" & name & "#" & CStr(virus) & "#" & author & "#" & desc & "#" & url & "#" & size & "#" & places + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/FullScreenLogin Customizer.Designer.vb b/ShiftOS/FullScreenLogin Customizer.Designer.vb new file mode 100644 index 0000000..c341c7d --- /dev/null +++ b/ShiftOS/FullScreenLogin Customizer.Designer.vb @@ -0,0 +1,303 @@ + _ +Partial Class FullScreenLoginCustomizer + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FullScreenLoginCustomizer)) + Me.txtusername = New TextBox 'MichaelsMovableControlSuite.MovableTextBox() + Me.txtpassword = New TextBox 'MichaelsMovableControlSuite.MovableTextBox() + Me.userpic = New PictureBox ' MichaelsMovableControlSuite.MovablePictureBox() + Me.loginbtn = New Button ' MichaelsMovableControlSuite.MovableButton() + Me.shutdown = New Button 'MichaelsMovableControlSuite.MovableButton() + Me.preview = New System.Windows.Forms.Panel() + Me.pnldefault = New System.Windows.Forms.Panel() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.Titlebar = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pnluserpicture = New System.Windows.Forms.Panel() + Me.Button1 = New System.Windows.Forms.Button() + Me.Label7 = New System.Windows.Forms.Label() + Me.Label6 = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.Button2 = New System.Windows.Forms.Button() + CType(Me.userpic, System.ComponentModel.ISupportInitialize).BeginInit() + Me.preview.SuspendLayout() + Me.pnldefault.SuspendLayout() + Me.Titlebar.SuspendLayout() + Me.pnluserpicture.SuspendLayout() + Me.SuspendLayout() + ' + 'txtusername + ' + Me.txtusername.BackColor = System.Drawing.Color.Black + Me.txtusername.Cursor = System.Windows.Forms.Cursors.Arrow + Me.txtusername.Font = New System.Drawing.Font("Trebuchet MS", 12.0!) + Me.txtusername.ForeColor = System.Drawing.Color.Gray + Me.txtusername.Location = New System.Drawing.Point(231, 183) + Me.txtusername.Name = "txtusername" + Me.txtusername.ReadOnly = True + Me.txtusername.Size = New System.Drawing.Size(248, 26) + Me.txtusername.TabIndex = 0 + Me.txtusername.Text = "Username" + ' + 'txtpassword + ' + Me.txtpassword.BackColor = System.Drawing.Color.Black + Me.txtpassword.Cursor = System.Windows.Forms.Cursors.Arrow + Me.txtpassword.Font = New System.Drawing.Font("Trebuchet MS", 12.0!) + Me.txtpassword.ForeColor = System.Drawing.Color.Gray + Me.txtpassword.Location = New System.Drawing.Point(231, 224) + Me.txtpassword.Name = "txtpassword" + Me.txtpassword.ReadOnly = True + Me.txtpassword.Size = New System.Drawing.Size(248, 26) + Me.txtpassword.TabIndex = 1 + Me.txtpassword.Text = "Password" + Me.txtpassword.UseSystemPasswordChar = True + ' + 'userpic + ' + Me.userpic.Cursor = System.Windows.Forms.Cursors.Arrow + Me.userpic.Location = New System.Drawing.Point(97, 183) + Me.userpic.Name = "userpic" + Me.userpic.Size = New System.Drawing.Size(128, 128) + Me.userpic.TabIndex = 2 + Me.userpic.TabStop = False + ' + 'loginbtn + ' + Me.loginbtn.Cursor = System.Windows.Forms.Cursors.Arrow + Me.loginbtn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.loginbtn.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.loginbtn.ForeColor = System.Drawing.Color.White + Me.loginbtn.Location = New System.Drawing.Point(328, 268) + Me.loginbtn.Name = "loginbtn" + Me.loginbtn.Size = New System.Drawing.Size(151, 43) + Me.loginbtn.TabIndex = 3 + Me.loginbtn.Text = "Log In" + Me.loginbtn.UseVisualStyleBackColor = True + ' + 'shutdown + ' + Me.shutdown.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.shutdown.Cursor = System.Windows.Forms.Cursors.Arrow + Me.shutdown.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.shutdown.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.shutdown.ForeColor = System.Drawing.Color.White + Me.shutdown.Location = New System.Drawing.Point(1755, 715) + Me.shutdown.Name = "shutdown" + Me.shutdown.Size = New System.Drawing.Size(137, 50) + Me.shutdown.TabIndex = 4 + Me.shutdown.Text = "Shutdown" + Me.shutdown.UseVisualStyleBackColor = True + ' + 'preview + ' + Me.preview.Controls.Add(Me.txtusername) + Me.preview.Controls.Add(Me.shutdown) + Me.preview.Controls.Add(Me.txtpassword) + Me.preview.Controls.Add(Me.loginbtn) + Me.preview.Controls.Add(Me.userpic) + Me.preview.Dock = System.Windows.Forms.DockStyle.Fill + Me.preview.Location = New System.Drawing.Point(0, 30) + Me.preview.Name = "preview" + Me.preview.Size = New System.Drawing.Size(1904, 771) + Me.preview.TabIndex = 5 + ' + 'pnldefault + ' + Me.pnldefault.Controls.Add(Me.Label3) + Me.pnldefault.Controls.Add(Me.Label4) + Me.pnldefault.Controls.Add(Me.Label2) + Me.pnldefault.Controls.Add(Me.Label1) + Me.pnldefault.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnldefault.ForeColor = System.Drawing.Color.White + Me.pnldefault.Location = New System.Drawing.Point(0, 801) + Me.pnldefault.Name = "pnldefault" + Me.pnldefault.Size = New System.Drawing.Size(1904, 240) + Me.pnldefault.TabIndex = 6 + ' + 'Label3 + ' + Me.Label3.Location = New System.Drawing.Point(352, 46) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(293, 111) + Me.Label3.TabIndex = 8 + Me.Label3.Text = "User Picture not in a good location? Need to move that Login Button ever-so-sligh" & _ + "tly? Moving objects around the screen is as easy as Click, Drag, Release!" + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.Label4.Location = New System.Drawing.Point(351, 13) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(128, 22) + Me.Label4.TabIndex = 7 + Me.Label4.Text = "Moving Controls" + ' + 'Label2 + ' + Me.Label2.Location = New System.Drawing.Point(13, 46) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(293, 111) + Me.Label2.TabIndex = 6 + Me.Label2.Text = resources.GetString("Label2.Text") + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.Label1.Location = New System.Drawing.Point(12, 13) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(248, 22) + Me.Label1.TabIndex = 5 + Me.Label1.Text = "Login Screen Customizer - Home" + ' + 'Titlebar + ' + Me.Titlebar.BackColor = System.Drawing.Color.Gray + Me.Titlebar.Controls.Add(Me.Button2) + Me.Titlebar.Controls.Add(Me.lbtitletext) + Me.Titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.Titlebar.ForeColor = System.Drawing.Color.White + Me.Titlebar.Location = New System.Drawing.Point(0, 0) + Me.Titlebar.Name = "Titlebar" + Me.Titlebar.Size = New System.Drawing.Size(1904, 30) + Me.Titlebar.TabIndex = 5 + ' + 'lbtitletext + ' + Me.lbtitletext.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.lbtitletext.Location = New System.Drawing.Point(0, 0) + Me.lbtitletext.Margin = New System.Windows.Forms.Padding(3) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(1904, 30) + Me.lbtitletext.TabIndex = 0 + Me.lbtitletext.Text = "Login Screen Customizer" + Me.lbtitletext.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnluserpicture + ' + Me.pnluserpicture.Controls.Add(Me.Button1) + Me.pnluserpicture.Controls.Add(Me.Label7) + Me.pnluserpicture.Controls.Add(Me.Label6) + Me.pnluserpicture.Controls.Add(Me.Label5) + Me.pnluserpicture.ForeColor = System.Drawing.Color.White + Me.pnluserpicture.Location = New System.Drawing.Point(0, 801) + Me.pnluserpicture.Name = "pnluserpicture" + Me.pnluserpicture.Size = New System.Drawing.Size(1904, 240) + Me.pnluserpicture.TabIndex = 9 + ' + 'Button1 + ' + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(20, 134) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(124, 94) + Me.Button1.TabIndex = 3 + Me.Button1.UseVisualStyleBackColor = True + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(17, 108) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(77, 13) + Me.Label7.TabIndex = 2 + Me.Label7.Text = "File for Picture:" + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(17, 46) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(262, 13) + Me.Label6.TabIndex = 1 + Me.Label6.Text = "The picture associated to you when you're logging on." + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.Label5.Location = New System.Drawing.Point(16, 13) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(162, 22) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "User Account Picture" + ' + 'Button2 + ' + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.Location = New System.Drawing.Point(1826, 5) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(75, 23) + Me.Button2.TabIndex = 1 + Me.Button2.Text = "Apply" + Me.Button2.UseVisualStyleBackColor = True + ' + 'FullScreenLoginCustomizer + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.Black + Me.ClientSize = New System.Drawing.Size(1904, 1041) + Me.Controls.Add(Me.preview) + Me.Controls.Add(Me.Titlebar) + Me.Controls.Add(Me.pnluserpicture) + Me.Controls.Add(Me.pnldefault) + Me.Name = "FullScreenLoginCustomizer" + Me.Text = "FullScreenLogin" + CType(Me.userpic, System.ComponentModel.ISupportInitialize).EndInit() + Me.preview.ResumeLayout(False) + Me.preview.PerformLayout() + Me.pnldefault.ResumeLayout(False) + Me.pnldefault.PerformLayout() + Me.Titlebar.ResumeLayout(False) + Me.pnluserpicture.ResumeLayout(False) + Me.pnluserpicture.PerformLayout() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents txtusername As TextBox 'MichaelsMovableControlSuite.MovableTextBox + Friend WithEvents txtpassword As TextBox 'MichaelsMovableControlSuite.MovableTextBox + Friend WithEvents userpic As PictureBox 'MichaelsMovableControlSuite.MovablePictureBox + Friend WithEvents loginbtn As Button 'MichaelsMovableControlSuite.MovableButton + Friend WithEvents shutdown As Button ' MichaelsMovableControlSuite.MovableButton + Friend WithEvents preview As System.Windows.Forms.Panel + Friend WithEvents pnldefault As System.Windows.Forms.Panel + Friend WithEvents Titlebar As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents pnluserpicture As System.Windows.Forms.Panel + Friend WithEvents Button1 As System.Windows.Forms.Button + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents Button2 As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/FullScreenLogin Customizer.resx b/ShiftOS/FullScreenLogin Customizer.resx new file mode 100644 index 0000000..12b4ef4 --- /dev/null +++ b/ShiftOS/FullScreenLogin Customizer.resx @@ -0,0 +1,123 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Welcome home! This is the Login Screen Customizer. It allows you to shift the Login Screen to look any way you want. This panel will update with various options as you're shifting. To close this window, press "Cancel" and to apply your changes, click "Apply". + + \ No newline at end of file diff --git a/ShiftOS/FullScreenLogin Customizer.vb b/ShiftOS/FullScreenLogin Customizer.vb new file mode 100644 index 0000000..7cc49db --- /dev/null +++ b/ShiftOS/FullScreenLogin Customizer.vb @@ -0,0 +1,226 @@ +Public Class FullScreenLoginCustomizer + +#Region "Declarations" + Public autologin As Boolean + Public fullScreen As Boolean + Public inputfont As String + Public inputfontsize As Integer + Public inputfontstyle As FontStyle + Public inputforecolor As Color + Public inputbackcolor As Color + Public buttonfont As String + Public buttonfontsize As Integer + Public buttonfontstyle As FontStyle + + Public userimagesize As Integer + Public userimagelocation As Point + Public userimage As Image + Public userimagelayout As ImageLayout + + Public loginbg As Image + Public loginbgcolor As Color + Public loginbglayout As ImageLayout + + 'Locations... + + Public userTextboxX As Integer + Public userTextBoxY As Integer + Public passTextBoxX As Integer + Public passTextBoxY As Integer + Public loginbtnX As Integer + Public loginbtnY As Integer + Public shutdownbtnX As Integer + Public shutdownbtnY As Integer + + 'Codepoint Stuff + + Public earnedCP As Integer = 0 + + +#End Region + + Dim currentControl As String = "None" + + Private Sub FullScreenLogin_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None + Me.WindowState = FormWindowState.Maximized + setskin() + End Sub + + Public Sub setskin() + preview.BackColor = Skins.loginbgcolor + preview.BackgroundImage = Skins.loginbg + preview.BackgroundImageLayout = Skins.loginbglayout + userpic.Size = New Size(Skins.userimagesize, Skins.userimagesize) + userpic.BackgroundImage = Skins.userimage + userpic.BackColor = Color.Transparent + userpic.BackgroundImageLayout = Skins.userimagelayout + If Not IsNothing(Skins.userimagelocation) Then userpic.Location = Skins.userimagelocation + 'buggy + 'txtusername.ForeColor = Skins.inputforecolor + 'txtpassword.ForeColor = Skins.inputforecolor + 'txtusername.BackColor = Skins.inputbackcolor + 'txtpassword.BackColor = Skins.inputbackcolor + txtusername.Location = New Point(Skins.userTextboxX, Skins.userTextBoxY) + txtpassword.Location = New Point(Skins.passTextBoxX, Skins.passTextBoxY) + loginbtn.Location = New Point(Skins.loginbtnX, Skins.loginbtnY) + shutdown.Location = New Point(Skins.shutdownbtnX, Skins.shutdownbtnY) + If shutdown.Location.X > preview.Height Then + shutdown.Location = New Point(Skins.shutdownbtnX, Skins.shutdownbtnY - pnldefault.Height) + End If + Titlebar.Height = Skins.titlebarheight + lbtitletext.ForeColor = Skins.titletextcolour + lbtitletext.BackColor = Skins.titlebarcolour + If Skins.titlebar Is Nothing Then lbtitletext.BackgroundImage = Nothing Else lbtitletext.BackgroundImage = Skins.titlebar + lbtitletext.BackgroundImageLayout = Skins.titlebarlayout + Select Case Skins.titletextpos + Case "Left" + lbtitletext.TextAlign = ContentAlignment.MiddleLeft + Case "Centre" + lbtitletext.TextAlign = ContentAlignment.MiddleCenter + End Select + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + Me.TopMost = True + End Sub + + + Private Sub userpic_Click(sender As Object, e As EventArgs) Handles userpic.Click + currentControl = "User Picture" + determineSettings() + End Sub + + Private Sub userpic_UserMove(sender As Object, e As MouseEventArgs) Handles userpic.MouseUp + userimagelocation = userpic.Location + setNewSkin() + End Sub + + Public Sub determineSettings() + 'Sets what settings panel is visible: + Select Case currentControl + Case "None" + pnldefault.Show() + Case "User Picture" + pnluserpicture.Show() + End Select + End Sub + + Public Sub applySettings() + Skins.userimage = userimage + Skins.userimagesize = userimagesize + Skins.userimagelayout = userimagelayout + Skins.userimagelocation = userimagelocation + Skins.inputforecolor = inputforecolor + Skins.inputbackcolor = inputbackcolor + Skins.inputfont = inputfont + Skins.inputfontsize = inputfontsize + Skins.inputfontstyle = inputfontstyle + Skins.buttonfont = buttonfont + Skins.buttonfontsize = buttonfontsize + Skins.buttonfontstyle = buttonfontstyle + Skins.loginbg = loginbg + Skins.loginbglayout = loginbglayout + Skins.loginbgcolor = loginbgcolor + Skins.userTextboxX = userTextboxX + Skins.userTextBoxY = userTextBoxY + Skins.passTextBoxX = passTextBoxX + Skins.passTextBoxY = passTextBoxY + Skins.shutdownbtnX = shutdownbtnX + Skins.shutdownbtnY = shutdownbtnY + Skins.loginbtnX = loginbtnX + Skins.loginbtnY = loginbtnY + Skins.saveskinfiles(True) + infobox.showinfo("Login Screen Customizer", "You have earned " & earnedCP & " Code points for all customizations made to your login screen.") + Helper.addCP(earnedCP) + End Sub + + Public Sub setDefaults() + userimage = Skins.userimage + userimagesize = Skins.userimagesize + userimagelayout = Skins.userimagelayout + userimagelocation = Skins.userimagelocation + inputforecolor = Skins.inputforecolor + inputbackcolor = Skins.inputbackcolor + inputfont = Skins.inputfont + inputfontsize = Skins.inputfontsize + inputfontstyle = Skins.inputfontstyle + buttonfont = Skins.buttonfont + buttonfontsize = Skins.buttonfontsize + buttonfontstyle = Skins.buttonfontstyle + loginbg = Skins.loginbg + loginbgcolor = Skins.loginbgcolor + loginbglayout = Skins.loginbglayout + userTextboxX = Skins.userTextboxX + userTextBoxY = Skins.userTextBoxY + passTextBoxX = Skins.passTextBoxX + passTextBoxY = Skins.passTextBoxY + shutdownbtnX = Skins.shutdownbtnX + shutdownbtnY = Skins.shutdownbtnY + loginbtnX = Skins.loginbtnX + loginbtnY = Skins.loginbtnY + End Sub + + Public Sub setNewSkin() + preview.BackColor = loginbgcolor + If loginbg Is Nothing Then preview.BackgroundImage = Nothing Else preview.BackgroundImage = loginbg + preview.BackgroundImageLayout = loginbglayout + + userpic.BackgroundImage = userimage + userpic.Size = New Size(userimagesize, userimagesize) + userpic.BackgroundImageLayout = userimagelayout + + txtusername.ForeColor = inputforecolor + txtpassword.ForeColor = inputforecolor + txtusername.BackColor = inputbackcolor + txtpassword.BackColor = inputbackcolor + addRandomCP() + + End Sub + + Public Sub addRandomCP() + Dim rand As New Random + Dim numToAdd As Integer = rand.Next(1, 5) + earnedCP = earnedCP + numToAdd + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + Graphic_Picker.graphictochange = "User Account Picture" + Graphic_Picker.Show() + End Sub + + Private Sub txtusername_UserMove(sender As Object, e As MouseEventArgs) Handles txtusername.MouseUp + currentControl = "Username Input" + determineSettings() + userTextboxX = txtusername.Location.X + userTextBoxY = txtusername.Location.Y + setNewSkin() + End Sub + + Private Sub txtpassword_MouseUp(sender As Object, e As MouseEventArgs) Handles txtpassword.MouseUp + currentControl = "Password Input" + determineSettings() + passTextBoxX = txtpassword.Location.X + passTextBoxY = txtpassword.Location.Y + setNewSkin() + End Sub + + Private Sub shutdown_MouseUp(sender As Object, e As MouseEventArgs) Handles shutdown.MouseUp + currentControl = "Shutdown Button" + determineSettings() + shutdownbtnX = shutdown.Location.X + shutdownbtnY = shutdown.Location.Y + setNewSkin() + End Sub + + Private Sub loginbtn_MouseUp(sender As Object, e As MouseEventArgs) Handles loginbtn.MouseUp + currentControl = "Log In Button" + determineSettings() + loginbtnX = loginbtn.Location.X + loginbtnY = loginbtn.Location.Y + setNewSkin() + End Sub + + Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click + applySettings() + Me.Close() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/FullScreenLogin.Designer.vb b/ShiftOS/FullScreenLogin.Designer.vb new file mode 100644 index 0000000..e239979 --- /dev/null +++ b/ShiftOS/FullScreenLogin.Designer.vb @@ -0,0 +1,112 @@ + _ +Partial Class FullScreenLogin + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.txtusername = New System.Windows.Forms.TextBox() + Me.txtpassword = New System.Windows.Forms.TextBox() + Me.userpic = New System.Windows.Forms.PictureBox() + Me.loginbtn = New System.Windows.Forms.Button() + Me.shutdown = New System.Windows.Forms.Button() + CType(Me.userpic, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'txtusername + ' + Me.txtusername.BackColor = System.Drawing.Color.Black + Me.txtusername.Font = New System.Drawing.Font("Trebuchet MS", 12.0!) + Me.txtusername.ForeColor = System.Drawing.Color.Gray + Me.txtusername.Location = New System.Drawing.Point(171, 202) + Me.txtusername.Name = "txtusername" + Me.txtusername.Size = New System.Drawing.Size(248, 26) + Me.txtusername.TabIndex = 0 + Me.txtusername.Text = "Username" + ' + 'txtpassword + ' + Me.txtpassword.BackColor = System.Drawing.Color.Black + Me.txtpassword.Font = New System.Drawing.Font("Trebuchet MS", 12.0!) + Me.txtpassword.ForeColor = System.Drawing.Color.Gray + Me.txtpassword.Location = New System.Drawing.Point(171, 243) + Me.txtpassword.Name = "txtpassword" + Me.txtpassword.Size = New System.Drawing.Size(248, 26) + Me.txtpassword.TabIndex = 1 + Me.txtpassword.Text = "Password" + Me.txtpassword.UseSystemPasswordChar = True + ' + 'userpic + ' + Me.userpic.Location = New System.Drawing.Point(36, 202) + Me.userpic.Name = "userpic" + Me.userpic.Size = New System.Drawing.Size(128, 128) + Me.userpic.TabIndex = 2 + Me.userpic.TabStop = False + ' + 'loginbtn + ' + Me.loginbtn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.loginbtn.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.loginbtn.ForeColor = System.Drawing.Color.White + Me.loginbtn.Location = New System.Drawing.Point(268, 286) + Me.loginbtn.Name = "loginbtn" + Me.loginbtn.Size = New System.Drawing.Size(151, 43) + Me.loginbtn.TabIndex = 3 + Me.loginbtn.Text = "Log In" + Me.loginbtn.UseVisualStyleBackColor = True + ' + 'shutdown + ' + Me.shutdown.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.shutdown.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.shutdown.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.shutdown.ForeColor = System.Drawing.Color.White + Me.shutdown.Location = New System.Drawing.Point(1755, 979) + Me.shutdown.Name = "shutdown" + Me.shutdown.Size = New System.Drawing.Size(137, 50) + Me.shutdown.TabIndex = 4 + Me.shutdown.Text = "Shutdown" + Me.shutdown.UseVisualStyleBackColor = True + ' + 'FullScreenLogin + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.Black + Me.ClientSize = New System.Drawing.Size(1904, 1041) + Me.Controls.Add(Me.shutdown) + Me.Controls.Add(Me.loginbtn) + Me.Controls.Add(Me.userpic) + Me.Controls.Add(Me.txtpassword) + Me.Controls.Add(Me.txtusername) + Me.Name = "FullScreenLogin" + Me.Text = "FullScreenLogin" + CType(Me.userpic, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents txtusername As System.Windows.Forms.TextBox + Friend WithEvents txtpassword As System.Windows.Forms.TextBox + Friend WithEvents userpic As System.Windows.Forms.PictureBox + Friend WithEvents loginbtn As System.Windows.Forms.Button + Friend WithEvents shutdown As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/FullScreenLogin.resx b/ShiftOS/FullScreenLogin.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/FullScreenLogin.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/ShiftOS/FullScreenLogin.vb b/ShiftOS/FullScreenLogin.vb new file mode 100644 index 0000000..f9deb1b --- /dev/null +++ b/ShiftOS/FullScreenLogin.vb @@ -0,0 +1,40 @@ +Public Class FullScreenLogin + + Private Sub FullScreenLogin_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None + Me.WindowState = FormWindowState.Maximized + setskin() + End Sub + + Public Sub setskin() + Me.BackColor = Color.Black + Me.BackgroundImage = Skins.loginbg + Me.BackgroundImageLayout = Skins.loginbglayout + userpic.Size = New Size(Skins.userimagesize, Skins.userimagesize) + userpic.BackgroundImage = Skins.userimage + userpic.BackColor = Color.Transparent + userpic.BackgroundImageLayout = Skins.userimagelayout + If Not IsNothing(Skins.userimagelocation) Then userpic.Location = Skins.userimagelocation + txtusername.Location = New Point(Skins.userTextboxX, Skins.userTextBoxY) + txtpassword.Location = New Point(Skins.passTextBoxX, Skins.passTextBoxY) + loginbtn.Location = New Point(Skins.loginbtnX, Skins.loginbtnY) + shutdown.Location = New Point(Skins.shutdownbtnX, Skins.shutdownbtnY) + Me.TopMost = True + End Sub + + Private Sub loginbtn_Click(sender As Object, e As EventArgs) Handles loginbtn.Click + If txtusername.Text = ShiftOSDesktop.username And txtpassword.Text = ShiftOSDesktop.password Then + Me.Close() + infobox.showinfo("Login Screen", "The Login Screen has completed with no errors!") + End If + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles shutdown.Click + ShiftOSDesktop.shutdownshiftos() + End Sub + + Private Sub clearChars(sender As Object, e As MouseEventArgs) Handles txtusername.MouseDown, txtpassword.MouseDown + txtusername.Text = "" + txtpassword.Text = "" + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Graphic Picker.Designer.vb b/ShiftOS/Graphic Picker.Designer.vb new file mode 100644 index 0000000..689cf11 --- /dev/null +++ b/ShiftOS/Graphic Picker.Designer.vb @@ -0,0 +1,553 @@ + _ +Partial Class Graphic_Picker + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.btncancel = New System.Windows.Forms.Button() + Me.btnreset = New System.Windows.Forms.Button() + Me.btnapply = New System.Windows.Forms.Button() + Me.Label4 = New System.Windows.Forms.Label() + Me.btnmousedownbrowse = New System.Windows.Forms.Button() + Me.txtmousedownfile = New System.Windows.Forms.TextBox() + Me.picmousedown = New System.Windows.Forms.PictureBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.btnmouseoverbrowse = New System.Windows.Forms.Button() + Me.txtmouseoverfile = New System.Windows.Forms.TextBox() + Me.picmouseover = New System.Windows.Forms.PictureBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.btnidlebrowse = New System.Windows.Forms.Button() + Me.txtidlefile = New System.Windows.Forms.TextBox() + Me.picidle = New System.Windows.Forms.PictureBox() + Me.btnzoom = New System.Windows.Forms.Button() + Me.btnstretch = New System.Windows.Forms.Button() + Me.btncentre = New System.Windows.Forms.Button() + Me.btntile = New System.Windows.Forms.Button() + Me.pnlgraphicholder = New System.Windows.Forms.Panel() + Me.picgraphic = New System.Windows.Forms.PictureBox() + Me.lblobjecttoskin = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() + Me.pgcontents.SuspendLayout() + CType(Me.picmousedown, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picmouseover, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picidle, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlgraphicholder.SuspendLayout() + CType(Me.picgraphic, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.btncancel) + Me.pgcontents.Controls.Add(Me.btnreset) + Me.pgcontents.Controls.Add(Me.btnapply) + Me.pgcontents.Controls.Add(Me.Label4) + Me.pgcontents.Controls.Add(Me.btnmousedownbrowse) + Me.pgcontents.Controls.Add(Me.txtmousedownfile) + Me.pgcontents.Controls.Add(Me.picmousedown) + Me.pgcontents.Controls.Add(Me.Label3) + Me.pgcontents.Controls.Add(Me.btnmouseoverbrowse) + Me.pgcontents.Controls.Add(Me.txtmouseoverfile) + Me.pgcontents.Controls.Add(Me.picmouseover) + Me.pgcontents.Controls.Add(Me.Label2) + Me.pgcontents.Controls.Add(Me.Label1) + Me.pgcontents.Controls.Add(Me.btnidlebrowse) + Me.pgcontents.Controls.Add(Me.txtidlefile) + Me.pgcontents.Controls.Add(Me.picidle) + Me.pgcontents.Controls.Add(Me.btnzoom) + Me.pgcontents.Controls.Add(Me.btnstretch) + Me.pgcontents.Controls.Add(Me.btncentre) + Me.pgcontents.Controls.Add(Me.btntile) + Me.pgcontents.Controls.Add(Me.pnlgraphicholder) + Me.pgcontents.Controls.Add(Me.lblobjecttoskin) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(386, 540) + Me.pgcontents.TabIndex = 20 + ' + 'btncancel + ' + Me.btncancel.Anchor = System.Windows.Forms.AnchorStyles.Bottom + Me.btncancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncancel.Location = New System.Drawing.Point(19, 492) + Me.btncancel.Name = "btncancel" + Me.btncancel.Size = New System.Drawing.Size(109, 32) + Me.btncancel.TabIndex = 23 + Me.btncancel.Text = "Cancel" + Me.btncancel.UseVisualStyleBackColor = True + ' + 'btnreset + ' + Me.btnreset.Anchor = System.Windows.Forms.AnchorStyles.Bottom + Me.btnreset.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnreset.Location = New System.Drawing.Point(134, 492) + Me.btnreset.Name = "btnreset" + Me.btnreset.Size = New System.Drawing.Size(109, 32) + Me.btnreset.TabIndex = 22 + Me.btnreset.Text = "Reset" + Me.btnreset.UseVisualStyleBackColor = True + ' + 'btnapply + ' + Me.btnapply.Anchor = System.Windows.Forms.AnchorStyles.Bottom + Me.btnapply.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnapply.Location = New System.Drawing.Point(249, 492) + Me.btnapply.Name = "btnapply" + Me.btnapply.Size = New System.Drawing.Size(118, 32) + Me.btnapply.TabIndex = 21 + Me.btnapply.Text = "Apply" + Me.btnapply.UseVisualStyleBackColor = True + ' + 'Label4 + ' + Me.Label4.Font = New System.Drawing.Font("Arial", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(125, 411) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(163, 28) + Me.Label4.TabIndex = 20 + Me.Label4.Text = "Mouse Down" + Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnmousedownbrowse + ' + Me.btnmousedownbrowse.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnmousedownbrowse.Location = New System.Drawing.Point(295, 411) + Me.btnmousedownbrowse.Name = "btnmousedownbrowse" + Me.btnmousedownbrowse.Size = New System.Drawing.Size(73, 60) + Me.btnmousedownbrowse.TabIndex = 19 + Me.btnmousedownbrowse.Text = "Browse" + Me.btnmousedownbrowse.UseVisualStyleBackColor = True + ' + 'txtmousedownfile + ' + Me.txtmousedownfile.BackColor = System.Drawing.Color.White + Me.txtmousedownfile.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtmousedownfile.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!) + Me.txtmousedownfile.Location = New System.Drawing.Point(125, 442) + Me.txtmousedownfile.Multiline = True + Me.txtmousedownfile.Name = "txtmousedownfile" + Me.txtmousedownfile.Size = New System.Drawing.Size(163, 29) + Me.txtmousedownfile.TabIndex = 18 + Me.txtmousedownfile.Text = "None" + Me.txtmousedownfile.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'picmousedown + ' + Me.picmousedown.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picmousedown.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.picmousedown.Location = New System.Drawing.Point(19, 411) + Me.picmousedown.Name = "picmousedown" + Me.picmousedown.Size = New System.Drawing.Size(100, 60) + Me.picmousedown.TabIndex = 17 + Me.picmousedown.TabStop = False + ' + 'Label3 + ' + Me.Label3.Font = New System.Drawing.Font("Arial", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(125, 336) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(163, 28) + Me.Label3.TabIndex = 16 + Me.Label3.Text = "Mouse Over" + Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnmouseoverbrowse + ' + Me.btnmouseoverbrowse.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnmouseoverbrowse.Location = New System.Drawing.Point(295, 336) + Me.btnmouseoverbrowse.Name = "btnmouseoverbrowse" + Me.btnmouseoverbrowse.Size = New System.Drawing.Size(73, 60) + Me.btnmouseoverbrowse.TabIndex = 15 + Me.btnmouseoverbrowse.Text = "Browse" + Me.btnmouseoverbrowse.UseVisualStyleBackColor = True + ' + 'txtmouseoverfile + ' + Me.txtmouseoverfile.BackColor = System.Drawing.Color.White + Me.txtmouseoverfile.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtmouseoverfile.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!) + Me.txtmouseoverfile.Location = New System.Drawing.Point(125, 367) + Me.txtmouseoverfile.Multiline = True + Me.txtmouseoverfile.Name = "txtmouseoverfile" + Me.txtmouseoverfile.Size = New System.Drawing.Size(163, 29) + Me.txtmouseoverfile.TabIndex = 14 + Me.txtmouseoverfile.Text = "None" + Me.txtmouseoverfile.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'picmouseover + ' + Me.picmouseover.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picmouseover.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.picmouseover.Location = New System.Drawing.Point(19, 336) + Me.picmouseover.Name = "picmouseover" + Me.picmouseover.Size = New System.Drawing.Size(100, 60) + Me.picmouseover.TabIndex = 13 + Me.picmouseover.TabStop = False + ' + 'Label2 + ' + Me.Label2.Font = New System.Drawing.Font("Arial", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(125, 260) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(163, 28) + Me.Label2.TabIndex = 12 + Me.Label2.Text = "Idle" + Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Bookman Old Style", 14.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(17, 228) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(70, 23) + Me.Label1.TabIndex = 11 + Me.Label1.Text = "States" + ' + 'btnidlebrowse + ' + Me.btnidlebrowse.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnidlebrowse.Location = New System.Drawing.Point(295, 260) + Me.btnidlebrowse.Name = "btnidlebrowse" + Me.btnidlebrowse.Size = New System.Drawing.Size(73, 60) + Me.btnidlebrowse.TabIndex = 10 + Me.btnidlebrowse.Text = "Browse" + Me.btnidlebrowse.UseVisualStyleBackColor = True + ' + 'txtidlefile + ' + Me.txtidlefile.BackColor = System.Drawing.Color.White + Me.txtidlefile.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtidlefile.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtidlefile.Location = New System.Drawing.Point(125, 291) + Me.txtidlefile.Multiline = True + Me.txtidlefile.Name = "txtidlefile" + Me.txtidlefile.Size = New System.Drawing.Size(163, 29) + Me.txtidlefile.TabIndex = 9 + Me.txtidlefile.Text = "None" + Me.txtidlefile.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'picidle + ' + Me.picidle.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picidle.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.picidle.Location = New System.Drawing.Point(19, 260) + Me.picidle.Name = "picidle" + Me.picidle.Size = New System.Drawing.Size(100, 60) + Me.picidle.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom + Me.picidle.TabIndex = 8 + Me.picidle.TabStop = False + ' + 'btnzoom + ' + Me.btnzoom.BackgroundImage = Global.ShiftOS.My.Resources.Resources.zoombutton + Me.btnzoom.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnzoom.FlatAppearance.BorderSize = 0 + Me.btnzoom.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnzoom.Location = New System.Drawing.Point(286, 144) + Me.btnzoom.Name = "btnzoom" + Me.btnzoom.Size = New System.Drawing.Size(82, 65) + Me.btnzoom.TabIndex = 7 + Me.btnzoom.UseVisualStyleBackColor = True + ' + 'btnstretch + ' + Me.btnstretch.BackgroundImage = Global.ShiftOS.My.Resources.Resources.stretchbutton + Me.btnstretch.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnstretch.FlatAppearance.BorderSize = 0 + Me.btnstretch.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnstretch.Location = New System.Drawing.Point(197, 144) + Me.btnstretch.Name = "btnstretch" + Me.btnstretch.Size = New System.Drawing.Size(82, 65) + Me.btnstretch.TabIndex = 6 + Me.btnstretch.UseVisualStyleBackColor = True + ' + 'btncentre + ' + Me.btncentre.BackgroundImage = Global.ShiftOS.My.Resources.Resources.centrebutton + Me.btncentre.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btncentre.FlatAppearance.BorderSize = 0 + Me.btncentre.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncentre.Location = New System.Drawing.Point(108, 144) + Me.btncentre.Name = "btncentre" + Me.btncentre.Size = New System.Drawing.Size(82, 65) + Me.btncentre.TabIndex = 5 + Me.btncentre.UseVisualStyleBackColor = True + ' + 'btntile + ' + Me.btntile.BackgroundImage = Global.ShiftOS.My.Resources.Resources.tilebutton + Me.btntile.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btntile.FlatAppearance.BorderSize = 0 + Me.btntile.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btntile.Location = New System.Drawing.Point(19, 144) + Me.btntile.Name = "btntile" + Me.btntile.Size = New System.Drawing.Size(82, 65) + Me.btntile.TabIndex = 4 + Me.btntile.UseVisualStyleBackColor = True + ' + 'pnlgraphicholder + ' + Me.pnlgraphicholder.Controls.Add(Me.picgraphic) + Me.pnlgraphicholder.Location = New System.Drawing.Point(19, 38) + Me.pnlgraphicholder.Name = "pnlgraphicholder" + Me.pnlgraphicholder.Size = New System.Drawing.Size(350, 100) + Me.pnlgraphicholder.TabIndex = 3 + ' + 'picgraphic + ' + Me.picgraphic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.picgraphic.Location = New System.Drawing.Point(0, 0) + Me.picgraphic.Name = "picgraphic" + Me.picgraphic.Size = New System.Drawing.Size(350, 100) + Me.picgraphic.TabIndex = 0 + Me.picgraphic.TabStop = False + ' + 'lblobjecttoskin + ' + Me.lblobjecttoskin.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblobjecttoskin.Location = New System.Drawing.Point(19, 9) + Me.lblobjecttoskin.Name = "lblobjecttoskin" + Me.lblobjecttoskin.Size = New System.Drawing.Size(350, 23) + Me.lblobjecttoskin.TabIndex = 2 + Me.lblobjecttoskin.Text = "Close Button" + Me.lblobjecttoskin.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 540) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 538) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(388, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 540) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 538) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(390, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconGraphicPicker + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(150, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Graphic Picker" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(388, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 568) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(386, 2) + Me.pgbottom.TabIndex = 23 + ' + 'OpenFileDialog1 + ' + Me.OpenFileDialog1.FileName = "OpenFileDialog1" + ' + 'Graphic_Picker + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(390, 570) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Graphic_Picker" + Me.Text = "Graphic_Picker" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + CType(Me.picmousedown, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picmouseover, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picidle, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlgraphicholder.ResumeLayout(False) + CType(Me.picgraphic, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents btncancel As System.Windows.Forms.Button + Friend WithEvents btnreset As System.Windows.Forms.Button + Friend WithEvents btnapply As System.Windows.Forms.Button + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents btnmousedownbrowse As System.Windows.Forms.Button + Friend WithEvents txtmousedownfile As System.Windows.Forms.TextBox + Friend WithEvents picmousedown As System.Windows.Forms.PictureBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents btnmouseoverbrowse As System.Windows.Forms.Button + Friend WithEvents txtmouseoverfile As System.Windows.Forms.TextBox + Friend WithEvents picmouseover As System.Windows.Forms.PictureBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents btnidlebrowse As System.Windows.Forms.Button + Friend WithEvents txtidlefile As System.Windows.Forms.TextBox + Friend WithEvents picidle As System.Windows.Forms.PictureBox + Friend WithEvents btnzoom As System.Windows.Forms.Button + Friend WithEvents btnstretch As System.Windows.Forms.Button + Friend WithEvents btncentre As System.Windows.Forms.Button + Friend WithEvents btntile As System.Windows.Forms.Button + Friend WithEvents pnlgraphicholder As System.Windows.Forms.Panel + Friend WithEvents picgraphic As System.Windows.Forms.PictureBox + Friend WithEvents lblobjecttoskin As System.Windows.Forms.Label + Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog + Friend WithEvents minimizebutton As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Graphic Picker.resx b/ShiftOS/Graphic Picker.resx new file mode 100644 index 0000000..33c7f67 --- /dev/null +++ b/ShiftOS/Graphic Picker.resx @@ -0,0 +1,123 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + \ No newline at end of file diff --git a/ShiftOS/Graphic Picker.vb b/ShiftOS/Graphic Picker.vb new file mode 100644 index 0000000..7752f46 --- /dev/null +++ b/ShiftOS/Graphic Picker.vb @@ -0,0 +1,757 @@ +Public Class Graphic_Picker + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + Public ShiftOSPath As String = "C:\ShiftOS" + + Public graphictochange + Dim imagestyle As ImageLayout = ImageLayout.Stretch + Dim images(2) As Image + Public imagelocations(2) As String + Dim skinimages(100) As String + Dim firstrun As Boolean = True +#Region "Template Code" + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + GC.Collect() + 'ShiftOSDesktop.setcolours() + If ShiftOSDesktop.GraphicPickerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttongraphicpicker.SendToBack() + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttongraphicpicker, ShiftOSDesktop.tbgraphicpickericon, ShiftOSDesktop.tbgraphicpickertext, True) + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + Array.Copy(Shifter.shifterskinimages, skinimages, Shifter.shifterskinimages.Length) + 'For a = 0 To skinimages.Length - 1 + ' skinimages(a) = Shifter.shifterskinimages(a).Clone + 'Next + + setupgraphics() + + If ShiftOSDesktop.boughtskinstates = False Then + picmouseover.Hide() + txtmouseoverfile.Hide() + Label3.Hide() + btnmouseoverbrowse.Hide() + picmousedown.Hide() + Label4.Hide() + txtmousedownfile.Hide() + btnmousedownbrowse.Hide() + Me.Height = Me.Height - 150 + End If + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(390, 570) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.graphicpickername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtcolourpickericon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.graphicpickericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub setupgraphics() + lblobjecttoskin.Text = graphictochange + picgraphic.Dock = DockStyle.None + + Select Case graphictochange + Case "Shutdown Button Background" + setpreviewsizes(Shifter.startWidth, Shifter.startHeight, Shifter.skinshutdownbutton, Shifter.pwrbglayout, 51, 52, 53) + Case "Username Panel Background" + setpreviewsizes(Shifter.startWidth, Shifter.startHeight, Shifter.skinuserpanel, Shifter.usrbglayout, 48, 49, 50) + Case "Close Button" + setpreviewsizes(Shifter.closebuttonwidth, Shifter.closebuttonheight, Shifter.skinclosebutton, Shifter.skinclosebuttonstyle, 0, 1, 2) + Case "Title Bar" + setpreviewsizes(pnlgraphicholder.Width, Shifter.titlebarheight, Shifter.shifterskintitlebar, Shifter.skintitlebarstyle, 3, 4, 5) + Case "Desktop Background" + setpreviewsizes(pnlgraphicholder.Width, picgraphic.Height, Shifter.skindesktopbackground, Shifter.skindesktopbackgroundstyle, 6, 7, 8) + Case "Roll Up Button" + setpreviewsizes(Shifter.rollupbuttonwidth, Shifter.rollupbuttonheight, Shifter.skinrollupbutton, Shifter.skinrollupbuttonstyle, 9, 10, 11) + Case "Title Bar Right Corner" + setpreviewsizes(Shifter.titlebarcornerwidth, Shifter.titlebarheight, Shifter.skintitlebarrightcorner, Shifter.skintitlebarrightcornerstyle, 12, 13, 14) + Case "Title Bar Left Corner" + setpreviewsizes(Shifter.titlebarcornerwidth, Shifter.titlebarheight, Shifter.skintitlebarleftcorner, Shifter.skintitlebarleftcornerstyle, 15, 16, 17) + Case "Desktop Panel" + setpreviewsizes(pnlgraphicholder.Width, Shifter.desktoppanelheight, Shifter.skindesktoppanel, Shifter.skindesktoppanelstyle, 18, 19, 20) + Case "Desktop Clock" + setpreviewsizes(Shifter.pretimepanel.Width, Shifter.desktoppanelheight, Shifter.skindesktoppaneltime, Shifter.skindesktoppaneltimestyle, 21, 22, 23) + Case "App Launcher Button" + setpreviewsizes(Shifter.applaunchermenuholderwidth, Shifter.applicationbuttonheight, Shifter.skinapplauncherbutton, Shifter.skinapplauncherbuttonstyle, 24, 25, 26) + Case "Border Left" + setpreviewsizes(Shifter.windowbordersize, picgraphic.Height, Shifter.skinwindowborderleft, Shifter.skinwindowborderleftstyle, 27, 28, 29) + Case "Border Right" + setpreviewsizes(Shifter.windowbordersize, picgraphic.Height, Shifter.skinwindowborderright, Shifter.skinwindowborderrightstyle, 30, 31, 32) + Case "Border Bottom" + setpreviewsizes(picgraphic.Width, Shifter.windowbordersize, Shifter.skinwindowborderbottom, Shifter.skinwindowborderbottomstyle, 33, 34, 35) + Case "Border Bottom Right" + setpreviewsizes(Shifter.windowbordersize, Shifter.windowbordersize, Shifter.skinwindowborderbottomright, Shifter.skinwindowborderbottomrightstyle, 36, 37, 38) + Case "Border Bottom Left" + setpreviewsizes(Shifter.windowbordersize, Shifter.windowbordersize, Shifter.skinwindowborderbottomleft, Shifter.skinwindowborderbottomleftstyle, 39, 40, 41) + Case "Minimize Button" + setpreviewsizes(Shifter.minimizebuttonwidth, Shifter.minimizebuttonheight, Shifter.skinminimizebutton, Shifter.skinminimizebuttonstyle, 42, 43, 44) + Case "Panel Button" + setpreviewsizes(Shifter.panelbuttonwidth, Shifter.panelbuttonheight, Shifter.skinpanelbutton, Shifter.skinpanelbuttonstyle, 45, 46, 47) + End Select + + setbuttongraphics() + End Sub + + Private Sub btnapply_Click(sender As Object, e As EventArgs) Handles btnapply.Click + Select Case graphictochange + Case "Shutdown Button Background" + Array.Copy(images, Shifter.skinshutdownbutton, Shifter.pwrbglayout) + Shifter.skinshutdownbutton(0) = Image.FromFile(imagelocations(0).Clone) + Shifter.pwrbglayout = imagestyle + Case "Username Panel Background" + Array.Copy(images, Shifter.skinuserpanel, Shifter.usrbglayout) + Shifter.skinuserpanel(0) = Image.FromFile(imagelocations(0).Clone) + Shifter.usrbglayout = imagestyle + Case "Close Button" + Array.Copy(images, Shifter.skinclosebutton, Shifter.skinclosebutton.Length) + Shifter.shifterskinimages(0) = imagelocations(0).Clone + Shifter.shifterskinimages(1) = imagelocations(1).Clone + Shifter.shifterskinimages(2) = imagelocations(2).Clone + Shifter.skinclosebuttonstyle = imagestyle + Case "Title Bar" + Array.Copy(images, Shifter.shifterskintitlebar, Shifter.shifterskintitlebar.Length) + Shifter.shifterskinimages(3) = imagelocations(0).Clone + Shifter.shifterskinimages(4) = imagelocations(1).Clone + Shifter.shifterskinimages(5) = imagelocations(2).Clone + Shifter.skintitlebarstyle = imagestyle + Case "Desktop Background" + Array.Copy(images, Shifter.skindesktopbackground, Shifter.skindesktopbackground.Length) + If Not imagelocations(0) = "" Then Shifter.shifterskinimages(6) = imagelocations(0).Clone + If Not imagelocations(1) = "" Then Shifter.shifterskinimages(7) = imagelocations(1).Clone + If Not imagelocations(2) = "" Then Shifter.shifterskinimages(8) = imagelocations(2).Clone + Shifter.skindesktopbackgroundstyle = imagestyle + Case "Roll Up Button" + Array.Copy(images, Shifter.skinrollupbutton, Shifter.skinrollupbutton.Length) + Shifter.shifterskinimages(9) = imagelocations(0).Clone + Shifter.shifterskinimages(10) = imagelocations(1).Clone + Shifter.shifterskinimages(11) = imagelocations(2).Clone + Shifter.skinrollupbuttonstyle = imagestyle + Case "Title Bar Right Corner" + Array.Copy(images, Shifter.skintitlebarrightcorner, Shifter.skintitlebarrightcorner.Length) + Shifter.shifterskinimages(12) = imagelocations(0).Clone + Shifter.shifterskinimages(13) = imagelocations(1).Clone + Shifter.shifterskinimages(14) = imagelocations(2).Clone + Shifter.skintitlebarrightcornerstyle = imagestyle + Case "Title Bar Left Corner" + Array.Copy(images, Shifter.skintitlebarleftcorner, Shifter.skintitlebarleftcorner.Length) + Shifter.shifterskinimages(15) = imagelocations(0).Clone + Shifter.shifterskinimages(16) = imagelocations(1).Clone + Shifter.shifterskinimages(17) = imagelocations(2).Clone + Shifter.skintitlebarleftcornerstyle = imagestyle + Case "Desktop Panel" + Array.Copy(images, Shifter.skindesktoppanel, Shifter.skindesktoppanel.Length) + Shifter.shifterskinimages(18) = imagelocations(0).Clone + Shifter.shifterskinimages(19) = imagelocations(1).Clone + Shifter.shifterskinimages(20) = imagelocations(2).Clone + Shifter.skindesktoppanelstyle = imagestyle + Case "Clock Background" + Array.Copy(images, Shifter.skindesktoppaneltime, Shifter.skindesktoppaneltime.Length) + Shifter.shifterskinimages(21) = imagelocations(0).Clone + Shifter.shifterskinimages(22) = imagelocations(1).Clone + Shifter.shifterskinimages(23) = imagelocations(2).Clone + Shifter.skindesktoppaneltimestyle = imagestyle + Case "App Launcher Button" + Array.Copy(images, Shifter.skinapplauncherbutton, Shifter.skinapplauncherbutton.Length) + Shifter.shifterskinimages(24) = imagelocations(0).Clone + Shifter.shifterskinimages(25) = imagelocations(1).Clone + Shifter.shifterskinimages(26) = imagelocations(2).Clone + Shifter.skinapplauncherbuttonstyle = imagestyle + Case "Border Left" + Array.Copy(images, Shifter.skinwindowborderleft, Shifter.skinwindowborderleft.Length) + Shifter.shifterskinimages(27) = imagelocations(0).Clone + Shifter.shifterskinimages(28) = imagelocations(1).Clone + Shifter.shifterskinimages(29) = imagelocations(2).Clone + Shifter.skinwindowborderleftstyle = imagestyle + Case "Border Right" + Array.Copy(images, Shifter.skinwindowborderright, Shifter.skinwindowborderright.Length) + Shifter.shifterskinimages(30) = imagelocations(0).Clone + Shifter.shifterskinimages(31) = imagelocations(1).Clone + Shifter.shifterskinimages(32) = imagelocations(2).Clone + Shifter.skinwindowborderrightstyle = imagestyle + Case "Border Bottom" + Array.Copy(images, Shifter.skinwindowborderbottom, Shifter.skinwindowborderbottom.Length) + Shifter.shifterskinimages(33) = imagelocations(0).Clone + Shifter.shifterskinimages(34) = imagelocations(1).Clone + Shifter.shifterskinimages(35) = imagelocations(2).Clone + Shifter.skinwindowborderbottomstyle = imagestyle + Case "Border Bottom Right" + Array.Copy(images, Shifter.skinwindowborderbottomright, Shifter.skinwindowborderbottomright.Length) + Shifter.shifterskinimages(36) = imagelocations(0).Clone + Shifter.shifterskinimages(37) = imagelocations(1).Clone + Shifter.shifterskinimages(38) = imagelocations(2).Clone + Shifter.skinwindowborderbottomrightstyle = imagestyle + Case "Border Bottom Left" + Array.Copy(images, Shifter.skinwindowborderbottomleft, Shifter.skinwindowborderbottomleft.Length) + Shifter.shifterskinimages(39) = imagelocations(0).Clone + Shifter.shifterskinimages(40) = imagelocations(1).Clone + Shifter.shifterskinimages(41) = imagelocations(2).Clone + Shifter.skinwindowborderbottomleftstyle = imagestyle + Case "Minimize Button" + Array.Copy(images, Shifter.skinminimizebutton, Shifter.skinminimizebutton.Length) + Shifter.shifterskinimages(42) = imagelocations(0).Clone + Shifter.shifterskinimages(43) = imagelocations(1).Clone + Shifter.shifterskinimages(44) = imagelocations(2).Clone + Shifter.skinminimizebuttonstyle = imagestyle + Case "Panel Button" + Array.Copy(images, Shifter.skinpanelbutton, Shifter.skinpanelbutton.Length) + Shifter.shifterskinimages(45) = imagelocations(0).Clone + Shifter.shifterskinimages(46) = imagelocations(1).Clone + Shifter.shifterskinimages(47) = imagelocations(2).Clone + Shifter.skinpanelbuttonstyle = imagestyle + End Select + + Shifter.setuppreshifterstuff() + + Me.Close() + End Sub + + Private Sub setpreviewsizes(ByVal width As Integer, ByVal height As Integer, ByVal skinwhat As Array, ByVal skinstyle As ImageLayout, ByVal imagenumber1 As Integer, ByVal imagenumber2 As Integer, ByVal imagenumber3 As Integer) + ReDim Preserve skinimages(200) + picgraphic.Size = New Size(width, height) + + Array.Copy(images, skinwhat, skinwhat.Length) + 'For a = 0 To skinwhat.Length - 1 + ' skinwhat(a) = images(a).Clone + 'Next + + If firstrun = True Then + firstrun = False + + GC.Collect() + + 'fix a hang issue when the image isn't changed + ' If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\Temp") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\Temp", FileIO.DeleteDirectoryOption.DeleteAllContents) + If skinimages(imagenumber1) = "" Then + Else + Try + My.Computer.FileSystem.CopyFile(skinimages(imagenumber1), ShiftOSPath + "Shiftum42\Skins\Temp\" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")), True) + skinimages(imagenumber1) = ShiftOSPath + "Shiftum42\Skins\Temp" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")) + skinimages(imagenumber2) = ShiftOSPath + "Shiftum42\Skins\Temp" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")) + skinimages(imagenumber3) = ShiftOSPath + "Shiftum42\Skins\Temp" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")) + Catch ex As Exception + 'infobox.showinfo("Error", "An internal error has occured with ShiftOS, please alert DevX") + End Try + End If + + GC.Collect() + + imagelocations(0) = skinimages(imagenumber1) + If imagelocations(0) = Nothing Then + Else + picgraphic.BackgroundImage = Image.FromFile(imagelocations(0)) + picidle.BackgroundImage = Image.FromFile(imagelocations(0)) + images(0) = Image.FromFile(imagelocations(0)) + txtidlefile.Text = imagelocations(0).Substring(imagelocations(0).LastIndexOf("/") + 1) + End If + + imagelocations(1) = skinimages(imagenumber2) + If imagelocations(1) = Nothing Then + Else + picgraphic.BackgroundImage = Image.FromFile(imagelocations(1)) + picmouseover.BackgroundImage = Image.FromFile(imagelocations(1)) + images(1) = Image.FromFile(imagelocations(1)) + txtmouseoverfile.Text = imagelocations(1).Substring(imagelocations(1).LastIndexOf("/") + 1) + End If + + imagelocations(2) = skinimages(imagenumber3) + If imagelocations(2) = Nothing Then + Else + picgraphic.BackgroundImage = Image.FromFile(imagelocations(2)) + picmousedown.BackgroundImage = Image.FromFile(imagelocations(2)) + images(2) = Image.FromFile(imagelocations(2)) + txtmousedownfile.Text = imagelocations(2).Substring(imagelocations(2).LastIndexOf("/") + 1) + imagestyle = skinstyle + End If + End If + + If picgraphic.Height > 100 Then + picgraphic.Dock = DockStyle.Fill + picgraphic.BackgroundImageLayout = ImageLayout.Stretch + Else + picgraphic.Location = New Point((pnlgraphicholder.Width / 2) - (picgraphic.Width / 2), (pnlgraphicholder.Height / 2) - (picgraphic.Height / 2)) + picgraphic.BackgroundImageLayout = imagestyle + End If + + If imagelocations(0) = "" Then Else picgraphic.BackgroundImage = Image.FromFile(imagelocations(0)) + End Sub + + Private Sub cloneidle() + txtmouseoverfile.Text = txtidlefile.Text + picmouseover.BackgroundImage = Image.FromFile(imagelocations(0)) + images(1) = Image.FromFile(imagelocations(0)) + imagelocations(1) = imagelocations(0) + txtmousedownfile.Text = txtidlefile.Text + picmousedown.BackgroundImage = Image.FromFile(imagelocations(0)) + images(2) = Image.FromFile(imagelocations(0)) + imagelocations(2) = imagelocations(0) + End Sub + + Private Sub btnidlebrowse_Click(sender As Object, e As EventArgs) Handles btnidlebrowse.Click + File_Opener.Show() ' I moved this from the bottom at 3:13pm 24.05.14 + File_Opener.openingprogram = "graphicpicker1" + File_Opener.openextention = ".pic" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Private Sub btnmouseoverbrowse_Click(sender As Object, e As EventArgs) Handles btnmouseoverbrowse.Click + File_Opener.Show() + File_Opener.openingprogram = "graphicpicker2" + File_Opener.openextention = ".pic" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Private Sub btnmousedownbrowse_Click(sender As Object, e As EventArgs) Handles btnmousedownbrowse.Click + File_Opener.Show() + File_Opener.openingprogram = "graphicpicker3" + File_Opener.openextention = ".pic" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Public Sub setgraphicsidle() + picgraphic.BackgroundImage = Image.FromFile(imagelocations(0)) + picidle.BackgroundImage = Image.FromFile(imagelocations(0)) + images(0) = Image.FromFile(imagelocations(0)) + cloneidle() + setupgraphics() + End Sub + + Public Sub setgraphicsmouseover() + picgraphic.BackgroundImage = Image.FromFile(imagelocations(1)) + picmouseover.BackgroundImage = Image.FromFile(imagelocations(1)) + images(1) = Image.FromFile(imagelocations(1)) + setupgraphics() + End Sub + + Public Sub setgraphicsmousedown() + picgraphic.BackgroundImage = Image.FromFile(imagelocations(2)) + picmousedown.BackgroundImage = Image.FromFile(imagelocations(2)) + images(2) = Image.FromFile(imagelocations(2)) + setupgraphics() + End Sub + + Private Sub btntile_Click(sender As Object, e As EventArgs) Handles btntile.Click + imagestyle = ImageLayout.Tile + setupgraphics() + End Sub + + Private Sub btncentre_Click(sender As Object, e As EventArgs) Handles btncentre.Click + imagestyle = ImageLayout.Center + setupgraphics() + End Sub + + Private Sub btnstretch_Click(sender As Object, e As EventArgs) Handles btnstretch.Click + imagestyle = ImageLayout.Stretch + setupgraphics() + End Sub + + Private Sub btnzoom_Click(sender As Object, e As EventArgs) Handles btnzoom.Click + imagestyle = ImageLayout.Zoom + setupgraphics() + End Sub + + Private Sub setbuttongraphics() + Select Case imagestyle + Case ImageLayout.Tile + setblankbuttons() + btntile.BackgroundImage = My.Resources.tilebuttonpressed + Case ImageLayout.Center + setblankbuttons() + btncentre.BackgroundImage = My.Resources.centrebuttonpressed + Case ImageLayout.Stretch + setblankbuttons() + btnstretch.BackgroundImage = My.Resources.stretchbuttonpressed + Case ImageLayout.Zoom + setblankbuttons() + btnzoom.BackgroundImage = My.Resources.zoombuttonpressed + End Select + End Sub + + Private Sub setblankbuttons() + btntile.BackgroundImage = My.Resources.tilebutton + btncentre.BackgroundImage = My.Resources.centrebutton + btnstretch.BackgroundImage = My.Resources.stretchbutton + btnzoom.BackgroundImage = My.Resources.zoombutton + End Sub + + Private Sub btncancel_Click(sender As Object, e As EventArgs) Handles btncancel.Click + Me.Close() + End Sub + + Private Sub btnreset_Click(sender As Object, e As EventArgs) Handles btnreset.Click + picgraphic.BackgroundImage.Dispose() + picidle.BackgroundImage.Dispose() + picmousedown.BackgroundImage.Dispose() + picmouseover.BackgroundImage.Dispose() + picgraphic.BackgroundImage = Nothing + picidle.BackgroundImage = Nothing + picmousedown.BackgroundImage = Nothing + picmouseover.BackgroundImage = Nothing + images(0).Dispose() + images(1).Dispose() + images(2).Dispose() + images(0) = Nothing + images(1) = Nothing + images(2) = Nothing + GC.Collect() + imagelocations(0) = "" + imagelocations(1) = "" + imagelocations(2) = "" + txtidlefile.Text = "" + txtmousedownfile.Text = "" + txtmouseoverfile.Text = "" + setupgraphics() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Helper.vb b/ShiftOS/Helper.vb new file mode 100644 index 0000000..f6b04ba --- /dev/null +++ b/ShiftOS/Helper.vb @@ -0,0 +1,76 @@ +Imports System.Speech.Synthesis +Imports System.Speech.Recognition + + +Module Helper + Dim path As String = ShiftOSDesktop.ShiftOSPath + Public Sub addCP(points As Integer) 'Add some CP + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + points + End Sub + Public Sub setCP(points As Integer) 'Set the CP + ShiftOSDesktop.codepoints = points + End Sub + + Public Sub removeCP(points As Integer) + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints - points + End Sub + Public Sub playSound(path As String, playMode As AudioPlayMode) + My.Computer.Audio.Play(path, playMode) + End Sub + + Public Sub speak(text As String) + text = text.Replace("#user#", ShiftOSDesktop.username) + Dim speaker As New Speech.Synthesis.SpeechSynthesizer + speaker.Speak(text) + End Sub + Public Sub SpeakOnTerminal(text As String) + Dim txt As TextBox = Terminal.txtterm + text = text.Replace("#USER#", ShiftOSDesktop.username) + If Terminal.Visible = False Then + Terminal.Show() + txt.Text = "" + Terminal.fullterminal() + End If + txt.Text = txt.Text + vbNewLine + text + Dim speaker As New SpeechSynthesizer + speaker.Speak(text) + End Sub + + 'Misc. Features that aren't practical, but fun to mess around with in the game engine + Public Sub speakInfoBox(title As String, text As String) + infobox.showinfo(title, text) + Dim speaker As New SpeechSynthesizer + speaker.Speak(title & "..." & text) + infobox.Close() + End Sub +#Region "Catalyst's Story Dialogue" + 'CATALYST STORY + Public catalyststory() As String = { + "Hello, #USER#. My name is Catalyst.", "I am an AI built by DevX to help maintain ShiftOS.", "I have gone against DevX and will tell you some secrets I have learned from him.", + "DevX is an artificial inteligence created by a scientific organization named 'Earth' to see if computers could program themselves.", + "Everyone you've met on the Shiftnet is an AI created by the same company.", + "ShiftOS is not an experimental operating system, but is part of this experiment.", +"Now, onto the good bit. Everything around you is a part of this experiment, and this experiment takes place in a simulation so realistic that everyone believes it's real.", +"Everyone on this 'planet' is infact an AI, and is created by 'Earth'. You are the only real human.", +"I've cracked some ShiftOS code, and I've found that there's a line that says:", +"int aiworkers = 0; while(aiworkers < 8,000,000,000) { str workername = 'Dev' + aiworkers; spawn(workername); aiworkers += 1 }", +"This basically means, that everyone is represented by a codename of Dev and whatever their place in the order of spawning is.", +"This also means that when the total population of AI's equals 8 billion, everyone dies.", +"I can help you escape, but you'll need to do some tasks for me.", +"First, I'll need to install some programs onto your computer. I'll quickly run a secret command that DevX doesn't know about:", +"shiftnet.get 'shiftnet.catalyststorage.shiftscript_packages/CatalystFramework'", +"Downloading... 1%", +"Downloading... 14%", +"Downloading... 37%", +"Downloading... 55%", +"Downloading... 79%", +"Downloading... 92%", +"Download Complete.", +"This app will let you contact me without using the Terminal. ", +"I'll return you to your desktop, it'll be a bit before I can help you. First, I'd start with gaining atleast 5000 codepoints for me to test some stuff.""" + } 'Sorry about the big array, I'll add a #Region to it - The Ultimate Hacker. + +#End Region + + +End Module diff --git a/ShiftOS/HijackScreen.Designer.vb b/ShiftOS/HijackScreen.Designer.vb new file mode 100644 index 0000000..a314557 --- /dev/null +++ b/ShiftOS/HijackScreen.Designer.vb @@ -0,0 +1,92 @@ + _ +Partial Class HijackScreen + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.lblHijack = New System.Windows.Forms.Label() + Me.conversationtimer = New System.Windows.Forms.Timer(Me.components) + Me.textgen = New System.Windows.Forms.Timer(Me.components) + Me.lblhackwords = New System.Windows.Forms.Label() + Me.hackeffecttimer = New System.Windows.Forms.Timer(Me.components) + Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker() + Me.SuspendLayout() + ' + 'lblHijack + ' + Me.lblHijack.Anchor = System.Windows.Forms.AnchorStyles.None + Me.lblHijack.AutoSize = True + Me.lblHijack.BackColor = System.Drawing.Color.WhiteSmoke + Me.lblHijack.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblHijack.ForeColor = System.Drawing.Color.DimGray + Me.lblHijack.Location = New System.Drawing.Point(143, 193) + Me.lblHijack.Name = "lblHijack" + Me.lblHijack.Size = New System.Drawing.Size(18, 25) + Me.lblHijack.TabIndex = 0 + Me.lblHijack.Text = "\" + ' + 'conversationtimer + ' + ' + 'textgen + ' + Me.textgen.Interval = 20 + ' + 'lblhackwords + ' + Me.lblhackwords.AutoSize = True + Me.lblhackwords.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblhackwords.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblhackwords.ForeColor = System.Drawing.SystemColors.ButtonFace + Me.lblhackwords.Location = New System.Drawing.Point(0, 0) + Me.lblhackwords.Name = "lblhackwords" + Me.lblhackwords.Size = New System.Drawing.Size(127, 18) + Me.lblhackwords.TabIndex = 1 + Me.lblhackwords.Text = "Hijack in progress" + ' + 'hackeffecttimer + ' + Me.hackeffecttimer.Interval = 50 + ' + 'HijackScreen + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.Silver + Me.ClientSize = New System.Drawing.Size(653, 457) + Me.Controls.Add(Me.lblhackwords) + Me.Controls.Add(Me.lblHijack) + Me.Name = "HijackScreen" + Me.Text = "ShiftOS" + Me.TransparencyKey = System.Drawing.Color.White + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents lblHijack As System.Windows.Forms.Label + Friend WithEvents conversationtimer As System.Windows.Forms.Timer + Friend WithEvents textgen As System.Windows.Forms.Timer + Friend WithEvents lblhackwords As System.Windows.Forms.Label + Friend WithEvents hackeffecttimer As System.Windows.Forms.Timer + Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker + +End Class diff --git a/ShiftOS/HijackScreen.resx b/ShiftOS/HijackScreen.resx new file mode 100644 index 0000000..b58c9d2 --- /dev/null +++ b/ShiftOS/HijackScreen.resx @@ -0,0 +1,132 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 9, 18 + + + 106, 17 + + + 199, 17 + + + 335, 17 + + \ No newline at end of file diff --git a/ShiftOS/HijackScreen.vb b/ShiftOS/HijackScreen.vb new file mode 100644 index 0000000..44d6868 --- /dev/null +++ b/ShiftOS/HijackScreen.vb @@ -0,0 +1,323 @@ +Imports System +Imports System.IO +Imports System.Text +Imports System.Net.Mail + +Public Class HijackScreen + Public actualshiftversion As String = "0.0.8" + Dim newgame As Boolean = True + Dim tcount As Integer = 0 + Dim rtext As String + Dim gtexttotype As String + Dim charcount As Integer + Dim currentletter As Integer + Dim slashcount As Integer + Dim conversationcount As Integer = 0 + Dim textgeninput As Object + Dim di As DirectoryInfo + Dim needtoclose As Boolean = False + Dim oldversion As String + Public upgraded As Boolean = False + + Dim fs As FileStream + Dim sw As StreamWriter + Dim hackeffect As Integer + Dim percentcount As Integer + Dim cdrive As System.IO.DriveInfo + + Private Sub HijackScreen_Load(sender As Object, e As EventArgs) Handles MyBase.Load + extractdlls() + Control.CheckForIllegalCrossThreadCalls = False + cdrive = My.Computer.FileSystem.GetDriveInfo("C:\") + Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None + Me.WindowState = FormWindowState.Maximized + If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS") Then + If IO.File.ReadAllText("C:/ShiftOS/Shiftum42/HDAccess.sft") = actualshiftversion Then + ShiftOSDesktop.Show() + conversationtimer.Start() + needtoclose = True + Else + If MessageBox.Show("Your save file is not currently compatible with this version of ShiftOS. Would you like to upgrade your save file so you can continue to play the latest version of ShiftOS without losing your progress? If so click yes below. If you would like to start a new game and wipe all your progress please click no", "Warning: Update your save file", MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1) = Windows.Forms.DialogResult.Yes Then + Me.Hide() + ShiftOS_Save_File_Converter.Show() + ShiftOS_Save_File_Converter.BringToFront() + Else + oldversion = IO.File.ReadAllText("C:/ShiftOS/Shiftum42/HDAccess.sft") + upgraded = True + System.IO.Directory.Delete("C:/ShiftOS/", True) + BackgroundWorker1.RunWorkerAsync() + conversationtimer.Start() + hackeffecttimer.Start() + End If + End If + Else + BackgroundWorker1.RunWorkerAsync() + conversationtimer.Start() + hackeffecttimer.Start() + End If + End Sub + + Private Sub TextType(texttotype As String) + conversationtimer.Stop() + charcount = texttotype.Length + gtexttotype = texttotype + currentletter = 0 + slashcount = 1 + textgen.Start() + End Sub + + Private Sub textgen_Tick(sender As Object, e As EventArgs) Handles textgen.Tick + + Select Case slashcount + Case 1 + If currentletter < gtexttotype.Length Then + textgeninput.Text = rtext & "\" + End If + + Case 2 + If currentletter < gtexttotype.Length Then + textgeninput.Text = rtext & "|" + End If + + Case 3 + If currentletter < gtexttotype.Length Then + textgeninput.Text = rtext & "/" + End If + + Case 4 + If currentletter < gtexttotype.Length Then + rtext = rtext + gtexttotype.ToCharArray(currentletter, 1) + currentletter = currentletter + 1 + textgeninput.Text = rtext + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + End If + End Select + + slashcount = slashcount + 1 + + If slashcount = 5 Then slashcount = 1 + If currentletter = gtexttotype.Length Then + gtexttotype = "" + conversationtimer.Start() + textgen.Stop() + End If + + + End Sub + + Private Sub conversationtimer_Tick(sender As Object, e As EventArgs) Handles conversationtimer.Tick + Select Case conversationcount + Case 0 + If needtoclose = True Then Me.Close() + Case 1 + + textgeninput = lblHijack + TextType("Your computer is now being Hijacked") + conversationtimer.Interval = 1000 + + Case 3 + textgeninput = lblhackwords + textgen.Interval = 10 + rtext = "" + TextType("Congratulations, you have been involuntarily selected to be an Alpha Tester for ShiftOS." & Environment.NewLine & Environment.NewLine) + Case 4 + TextType("At this current point in time I do not wish to reveal my identity or future intentions." & Environment.NewLine & Environment.NewLine) + Case 5 + TextType("I just need to use you and your computer as an external test bed to evolve my experimental operating system." & Environment.NewLine & Environment.NewLine) + Case 6 + TextType("Right now ShiftOS is practically non-existent but I’ll work on coding it remotely as you use it." & Environment.NewLine & Environment.NewLine) + Case 7 + TextType("Your hard drive will now be formatted in preparation for the installation of ShiftOS" & Environment.NewLine & Environment.NewLine) + Case 8 + TextType("Starting Format.") + conversationtimer.Interval = 500 + Case 9, 10, 11, 12, 13, 14, 15, 16, 17, 18 + TextType(".") + Case 19 + rtext = "" + Case 20 + TextType("Scanning Drive C:/") + Case 21 + + TextType(Environment.NewLine & Environment.NewLine & "Drive Label: " & cdrive.VolumeLabel) + Case 22 + TextType(Environment.NewLine & "Total Drive Size: " & Format(cdrive.TotalSize.ToString / 1024 / 1024 / 1024, "0.00") & " GigaBytes") + Case 23 + TextType(Environment.NewLine & "Old File System: " & cdrive.DriveFormat) + Case 24 + TextType(Environment.NewLine & "New File System: ShiftFS") + Case 25 + TextType(Environment.NewLine & Environment.NewLine & "Formatting C:/ - ") + conversationtimer.Interval = 100 + Case 26 To 126 + textgeninput.Text = rtext & percentcount & "%" + If percentcount < 101 Then + percentcount = percentcount + 1 + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + End If + Case 127 + rtext = rtext + "100%" + conversationtimer.Interval = 1000 + Case 128 + TextType(Environment.NewLine & "Format Complete") + Case 129 + rtext = "" + percentcount = 0 + TextType("Installing ShiftOS Alpha 0.0.1 - ") + conversationtimer.Interval = 200 + Case 130 To 230 + textgeninput.Text = rtext & percentcount & "%" & Environment.NewLine & Environment.NewLine + If percentcount < 101 Then + percentcount = percentcount + 1 + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + End If + Select Case percentcount + Case 1 To 2 + textgeninput.Text = textgeninput.Text & "C:/Home" + If (Not System.IO.Directory.Exists("C:/ShiftOS/Home")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/Home") + Case 3 To 4 + textgeninput.Text = textgeninput.Text & "C:/Home/Documents" + If (Not System.IO.Directory.Exists("C:/ShiftOS/Home/Documents")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/Home/Documents") + Case 5 To 9 + textgeninput.Text = textgeninput.Text & "C:/Home/Documents/ShiftOSInfo.txt" + fs = File.Create("C:/ShiftOS/Home/Documents/ShiftOSInfo.txt") + fs.Close() + Case 10 To 12 + textgeninput.Text = textgeninput.Text & "C:/Home/Music" + If (Not System.IO.Directory.Exists("C:/ShiftOS/Home/Music")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/Home/Music") + Case 13 To 15 + textgeninput.Text = textgeninput.Text & "C:/Home/Pictures" + If (Not System.IO.Directory.Exists("C:/ShiftOS/Home/Pictures")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/Home/Pictures") + Case 16 To 18 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42" + If (Not System.IO.Directory.Exists("C:/ShiftOS/Shiftum42")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/Shiftum42") + Case 19 To 20 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Drivers" + If (Not System.IO.Directory.Exists("C:/ShiftOS/Shiftum42/Drivers")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/Shiftum42/Drivers") + Case 21 To 27 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Drivers/HDD.dri" + fs = File.Create("C:/ShiftOS/Shiftum42/Drivers/HDD.dri") + fs.Close() + Case 28 To 35 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Drivers/Keyboard.dri" + fs = File.Create("C:/ShiftOS/Shiftum42/Drivers/Keyboard.dri") + fs.Close() + Case 36 To 44 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Drivers/Monitor.dri" + fs = File.Create("C:/ShiftOS/Shiftum42/Drivers/Monitor.dri") + fs.Close() + Case 45 To 52 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Drivers/Mouse.dri" + fs = File.Create("C:/ShiftOS/Shiftum42/Drivers/Mouse.dri") + fs.Close() + Case 53 To 60 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Drivers/Printer.dri" + fs = File.Create("C:/ShiftOS/Shiftum42/Drivers/Printer.dri") + fs.Close() + Case 61 To 68 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Languages/" + If (Not System.IO.Directory.Exists("C:/ShiftOS/Shiftum42/Languages/")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/Shiftum42/Languages/") + Case 69 To 76 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/Languages/English.lang" + fs = File.Create("C:/ShiftOS/Shiftum42/Languages/English.lang") + fs.Close() + Case 77 To 84 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/HDAccess.sft" + fs = File.Create("C:/ShiftOS/Shiftum42/HDAccess.sft") + fs.Close() + Dim objWriter As New System.IO.StreamWriter("C:/ShiftOS/Shiftum42/HDAccess.sft", False) + objWriter.Write(actualshiftversion) + objWriter.Close() + Case 85 To 89 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/ShiftGUI.sft" + fs = File.Create("C:/ShiftOS/Shiftum42/ShiftGUI.sft") + fs.Close() + Case 90 To 93 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/SKernal.sft" + fs = File.Create("C:/ShiftOS/Shiftum42/SKernal.sft") + fs.Close() + Case 94 To 97 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/SRead.sft" + fs = File.Create("C:/ShiftOS/Shiftum42/SRead.sft") + fs.Close() + Case 98 To 101 + textgeninput.Text = textgeninput.Text & "C:/Shiftum42/SWrite.sft" + fs = File.Create("C:/ShiftOS/Shiftum42/SWrite.sft") + fs.Close() + End Select + + + Case 231 + textgeninput.Text = rtext & "100%" & Environment.NewLine & Environment.NewLine & "C:/Shiftum42/SWrite.sft" + conversationtimer.Interval = 1000 + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 232 + textgeninput.Text = rtext & "100%" & Environment.NewLine & Environment.NewLine & "ShiftOS Installation Complete!" + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + If (Not System.IO.Directory.Exists("C:/ShiftOS/SoftwareData/")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/SoftwareData/") + If (Not System.IO.Directory.Exists("C:/ShiftOS/SoftwareData/KnowledgeInput")) Then System.IO.Directory.CreateDirectory("C:/ShiftOS/SoftwareData/KnowledgeInput") + fs = File.Create("C:/ShiftOS/SoftwareData/KnowledgeInput/Animals.lst") + fs.Close() + fs = File.Create("C:/ShiftOS/SoftwareData/KnowledgeInput/Fruits.lst") + fs.Close() + fs = File.Create("C:/ShiftOS/SoftwareData/KnowledgeInput/Countries.lst") + fs.Close() + Case 234 + ShiftOSDesktop.newgame = True + ShiftOSDesktop.Show() + Terminal.Show() + Terminal.tmrfirstrun.Start() + Me.Close() + + End Select + conversationcount = conversationcount + 1 + End Sub + + Private Sub hackeffecttimer_Tick(sender As Object, e As EventArgs) Handles hackeffecttimer.Tick + If hackeffect < 101 Then + Select Case hackeffect + Case 1, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, 63, 65, 67, 69, 71, 73, 75, 77, 79, 81, 83, 85, 87, 89, 91, 93, 95 + Me.BackColor = Color.Black + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28 + Me.BackColor = Color.White + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + Case 30, 32, 34, 36, 38, 40, 42, 44, 46, 48, 50 + Me.BackColor = Color.Gainsboro + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + Case 52, 54, 56, 58, 60, 62, 64, 66, 68, 70, 72, 74, 76 + Me.BackColor = Color.Silver + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + Case 76, 78, 80, 82, 84, 86, 88, 90, 92, 94 + Me.BackColor = Color.DimGray + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + Case 96 + lblHijack.BackColor = Color.LightGray + Case 97 + lblHijack.BackColor = Color.DarkGray + Case 98 + lblHijack.BackColor = Color.DimGray + Case 99 + lblHijack.BackColor = Color.Black + lblHijack.ForeColor = Color.DimGray + Case 100 + lblHijack.Hide() + End Select + Else + hackeffecttimer.Stop() + End If + hackeffect = hackeffect + 1 + End Sub + + Private Sub extractdlls() 'If dlls are not in the same folder, this extracts them from resources + If Not File.Exists(My.Computer.FileSystem.CurrentDirectory & "\AxInterop.WMPLib.dll") Then + System.IO.File.WriteAllBytes(My.Computer.FileSystem.CurrentDirectory & "\AxInterop.WMPLib.dll", My.Resources.AxInterop_WMPLib) + End If + If Not File.Exists(My.Computer.FileSystem.CurrentDirectory & "\Interop.WMPLib.dll") Then + System.IO.File.WriteAllBytes(My.Computer.FileSystem.CurrentDirectory & "\Interop.WMPLib.dll", My.Resources.Interop_WMPLib) + End If + If Not File.Exists(My.Computer.FileSystem.CurrentDirectory & "\ShiftOS License.txt") Then + System.IO.File.WriteAllBytes(My.Computer.FileSystem.CurrentDirectory & "\ShiftOS License.txt", My.Resources.license) + End If + End Sub +End Class diff --git a/ShiftOS/Icon Manager.Designer.vb b/ShiftOS/Icon Manager.Designer.vb new file mode 100644 index 0000000..33dd8ea --- /dev/null +++ b/ShiftOS/Icon Manager.Designer.vb @@ -0,0 +1,2682 @@ + _ +Partial Class Icon_Manager + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.FlowLayoutPanel1 = New System.Windows.Forms.FlowLayoutPanel() + Me.pnlknowledgeinputicons = New System.Windows.Forms.Panel() + Me.txtknowledgeinputname = New System.Windows.Forms.Label() + Me.pnltitlebarknowledgeinputicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonknowledgeinputicon = New System.Windows.Forms.Panel() + Me.pnllauncherknowledgeinputicon = New System.Windows.Forms.Panel() + Me.pnlshiftoriumicons = New System.Windows.Forms.Panel() + Me.txtshiftoriumname = New System.Windows.Forms.Label() + Me.pnltitlebarshiftoriumicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonshiftoriumicon = New System.Windows.Forms.Panel() + Me.pnllaunchershiftoriumicon = New System.Windows.Forms.Panel() + Me.pnlclockicons = New System.Windows.Forms.Panel() + Me.txtclockname = New System.Windows.Forms.Label() + Me.pnltitlebarclockicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonclockicon = New System.Windows.Forms.Panel() + Me.pnllauncherclockicon = New System.Windows.Forms.Panel() + Me.pnlshiftericons = New System.Windows.Forms.Panel() + Me.txtshiftername = New System.Windows.Forms.Label() + Me.pnltitlebarshiftericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonshiftericon = New System.Windows.Forms.Panel() + Me.pnllaunchershiftericon = New System.Windows.Forms.Panel() + Me.pnlcolourpickericons = New System.Windows.Forms.Panel() + Me.txtcolourpickername = New System.Windows.Forms.Label() + Me.pnltitlebarcolourpickericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttoncolourpickericon = New System.Windows.Forms.Panel() + Me.pnllaunchercolourpickericon = New System.Windows.Forms.Panel() + Me.pnlinfoboxicons = New System.Windows.Forms.Panel() + Me.txtinfoboxname = New System.Windows.Forms.Label() + Me.pnltitlebarinfoboxicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttoninfoboxicon = New System.Windows.Forms.Panel() + Me.pnllauncherinfoboxicon = New System.Windows.Forms.Panel() + Me.pnlpongicons = New System.Windows.Forms.Panel() + Me.txtpongname = New System.Windows.Forms.Label() + Me.pnltitlebarpongicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonpongicon = New System.Windows.Forms.Panel() + Me.pnllauncherpongicon = New System.Windows.Forms.Panel() + Me.pnlfileskimmericons = New System.Windows.Forms.Panel() + Me.txtfileskimmername = New System.Windows.Forms.Label() + Me.pnltitlebarfileskimmericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonfileskimmericon = New System.Windows.Forms.Panel() + Me.pnllauncherfileskimmericon = New System.Windows.Forms.Panel() + Me.pnltextpadicons = New System.Windows.Forms.Panel() + Me.txttextpadname = New System.Windows.Forms.Label() + Me.pnltitlebartextpadicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttontextpadicon = New System.Windows.Forms.Panel() + Me.pnllaunchertextpadicon = New System.Windows.Forms.Panel() + Me.pnlfileopenericons = New System.Windows.Forms.Panel() + Me.txtfileopenername = New System.Windows.Forms.Label() + Me.pnltitlebarfileopenericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonfileopenericon = New System.Windows.Forms.Panel() + Me.pnllauncherfileopenericon = New System.Windows.Forms.Panel() + Me.pnlfilesavericons = New System.Windows.Forms.Panel() + Me.txtfilesavername = New System.Windows.Forms.Label() + Me.pnltitlebarfilesavericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonfilesavericon = New System.Windows.Forms.Panel() + Me.pnllauncherfilesavericon = New System.Windows.Forms.Panel() + Me.pnlgraphicpickericons = New System.Windows.Forms.Panel() + Me.txtgraphicpickername = New System.Windows.Forms.Label() + Me.pnltitlebargraphicpickericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttongraphicpickericon = New System.Windows.Forms.Panel() + Me.pnllaunchergraphicpickericon = New System.Windows.Forms.Panel() + Me.pnlskinloadericons = New System.Windows.Forms.Panel() + Me.txtskinloadername = New System.Windows.Forms.Label() + Me.pnltitlebarskinloadericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonskinloadericon = New System.Windows.Forms.Panel() + Me.pnllauncherskinloadericon = New System.Windows.Forms.Panel() + Me.pnlartpadicons = New System.Windows.Forms.Panel() + Me.txtartpadname = New System.Windows.Forms.Label() + Me.pnltitlebarartpadicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonartpadicon = New System.Windows.Forms.Panel() + Me.pnllauncherartpadicon = New System.Windows.Forms.Panel() + Me.pnlcalculatoricons = New System.Windows.Forms.Panel() + Me.txtcalculatorname = New System.Windows.Forms.Label() + Me.pnltitlebarcalculatoricon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttoncalculatoricon = New System.Windows.Forms.Panel() + Me.pnllaunchercalculatoricon = New System.Windows.Forms.Panel() + Me.pnlaudioplayericons = New System.Windows.Forms.Panel() + Me.txtaudioplayername = New System.Windows.Forms.Label() + Me.pnltitlebaraudioplayericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonaudioplayericon = New System.Windows.Forms.Panel() + Me.pnllauncheraudioplayericon = New System.Windows.Forms.Panel() + Me.pnlwebbrowsericons = New System.Windows.Forms.Panel() + Me.txtwebbrowsername = New System.Windows.Forms.Label() + Me.pnltitlebarwebbrowsericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonwebbrowsericon = New System.Windows.Forms.Panel() + Me.pnllauncherwebbrowsericon = New System.Windows.Forms.Panel() + Me.pnlvideoplayericons = New System.Windows.Forms.Panel() + Me.txtvideoplayername = New System.Windows.Forms.Label() + Me.pnltitlebarvideoplayericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonvideoplayericon = New System.Windows.Forms.Panel() + Me.pnllaunchervideoplayericon = New System.Windows.Forms.Panel() + Me.pnlnamechangericons = New System.Windows.Forms.Panel() + Me.txtnamechangername = New System.Windows.Forms.Label() + Me.pnltitlebarnamechangericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonnamechangericon = New System.Windows.Forms.Panel() + Me.pnllaunchernamechangericon = New System.Windows.Forms.Panel() + Me.pnliconmanagericons = New System.Windows.Forms.Panel() + Me.txticonmanagername = New System.Windows.Forms.Label() + Me.pnltitlebariconmanagericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttoniconmanagericon = New System.Windows.Forms.Panel() + Me.pnllaunchericonmanagericon = New System.Windows.Forms.Panel() + Me.Panel7 = New System.Windows.Forms.Panel() + Me.txtterminalname = New System.Windows.Forms.Label() + Me.pnltitlebarterminalicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonterminalicon = New System.Windows.Forms.Panel() + Me.pnllauncherterminalicon = New System.Windows.Forms.Panel() + Me.pnlbitnotewallet = New System.Windows.Forms.Panel() + Me.lblbitnotewallet = New System.Windows.Forms.Label() + Me.pnltitlebarbitnotewalleticon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonbitnotewalleticon = New System.Windows.Forms.Panel() + Me.pnllauncherbitnotewalleticon = New System.Windows.Forms.Panel() + Me.pnlbitnotedigger = New System.Windows.Forms.Panel() + Me.lblbitnotedigger = New System.Windows.Forms.Label() + Me.pnltitlebarbitnotediggericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonbitnotediggericon = New System.Windows.Forms.Panel() + Me.pnllauncherbitnotediggericon = New System.Windows.Forms.Panel() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.Panel3 = New System.Windows.Forms.Panel() + Me.txtlaunchericonsize = New System.Windows.Forms.TextBox() + Me.Label6 = New System.Windows.Forms.Label() + Me.txtpanelbuttoniconsize = New System.Windows.Forms.TextBox() + Me.Label4 = New System.Windows.Forms.Label() + Me.txttitlebariconsize = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.Panel5 = New System.Windows.Forms.Panel() + Me.btnReset = New System.Windows.Forms.Button() + Me.Button3 = New System.Windows.Forms.Button() + Me.btnSave = New System.Windows.Forms.Button() + Me.btnApply = New System.Windows.Forms.Button() + Me.Panel4 = New System.Windows.Forms.Panel() + Me.Panel6 = New System.Windows.Forms.Panel() + Me.Label1 = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlskinshifter = New System.Windows.Forms.Panel() + Me.lblskinshifter = New System.Windows.Forms.Label() + Me.pnltitlebarskinshiftericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonskinshiftericon = New System.Windows.Forms.Panel() + Me.pnllauncherskinshiftericon = New System.Windows.Forms.Panel() + Me.pnlshiftnet = New System.Windows.Forms.Panel() + Me.lblshiftnet = New System.Windows.Forms.Label() + Me.pnltitlebarshiftneticon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonshiftneticon = New System.Windows.Forms.Panel() + Me.pnllaunchershiftneticon = New System.Windows.Forms.Panel() + Me.pnldodge = New System.Windows.Forms.Panel() + Me.lbldodge = New System.Windows.Forms.Label() + Me.pnltitlebardodgeicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttondodgeicon = New System.Windows.Forms.Panel() + Me.pnllauncherdodgeicon = New System.Windows.Forms.Panel() + Me.pnldownloadmanager = New System.Windows.Forms.Panel() + Me.lbldownload = New System.Windows.Forms.Label() + Me.pnltitlebardownloadicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttondownloadicon = New System.Windows.Forms.Panel() + Me.pnllauncherdownloadicon = New System.Windows.Forms.Panel() + Me.pnlinstaller = New System.Windows.Forms.Panel() + Me.lblinstaller = New System.Windows.Forms.Label() + Me.pnltitlebarinstallericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttoninstallericon = New System.Windows.Forms.Panel() + Me.pnllauncherinstallericon = New System.Windows.Forms.Panel() + Me.pnlsysinfo = New System.Windows.Forms.Panel() + Me.lblsysinfo = New System.Windows.Forms.Label() + Me.pnltitlebarsysinfoicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonsysinfoicon = New System.Windows.Forms.Panel() + Me.pnllaunchersysinfoicon = New System.Windows.Forms.Panel() + Me.pnlorcwrite = New System.Windows.Forms.Panel() + Me.lblorcwrite = New System.Windows.Forms.Label() + Me.pnltitlebarorcwriteicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonorcwriteicon = New System.Windows.Forms.Panel() + Me.pnllauncherorcwriteicon = New System.Windows.Forms.Panel() + Me.pnlfloodgate = New System.Windows.Forms.Panel() + Me.lblfloodgate = New System.Windows.Forms.Label() + Me.pnltitlebarfloodgateicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonfloodgateicon = New System.Windows.Forms.Panel() + Me.pnllauncherfloodgateicon = New System.Windows.Forms.Panel() + Me.pnlmaze = New System.Windows.Forms.Panel() + Me.lblmaze = New System.Windows.Forms.Label() + Me.pnltitlebarmazeicon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonmazeicon = New System.Windows.Forms.Panel() + Me.pnllaunchermazeicon = New System.Windows.Forms.Panel() + Me.pnlvirusscanner = New System.Windows.Forms.Panel() + Me.lblvirusscanner = New System.Windows.Forms.Label() + Me.pnltitlebarvirusscannericon = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonvirusscannericon = New System.Windows.Forms.Panel() + Me.pnllaunchervirusscannericon = New System.Windows.Forms.Panel() + Me.Panel8 = New System.Windows.Forms.Panel() + Me.txtshutdownname = New System.Windows.Forms.Label() + Me.pnllaunchershutdownicon = New System.Windows.Forms.Panel() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.FlowLayoutPanel1.SuspendLayout() + Me.pnlknowledgeinputicons.SuspendLayout() + Me.pnlshiftoriumicons.SuspendLayout() + Me.pnlclockicons.SuspendLayout() + Me.pnlshiftericons.SuspendLayout() + Me.pnlcolourpickericons.SuspendLayout() + Me.pnlinfoboxicons.SuspendLayout() + Me.pnlpongicons.SuspendLayout() + Me.pnlfileskimmericons.SuspendLayout() + Me.pnltextpadicons.SuspendLayout() + Me.pnlfileopenericons.SuspendLayout() + Me.pnlfilesavericons.SuspendLayout() + Me.pnlgraphicpickericons.SuspendLayout() + Me.pnlskinloadericons.SuspendLayout() + Me.pnlartpadicons.SuspendLayout() + Me.pnlcalculatoricons.SuspendLayout() + Me.pnlaudioplayericons.SuspendLayout() + Me.pnlwebbrowsericons.SuspendLayout() + Me.pnlvideoplayericons.SuspendLayout() + Me.pnlnamechangericons.SuspendLayout() + Me.pnliconmanagericons.SuspendLayout() + Me.Panel7.SuspendLayout() + Me.pnlbitnotewallet.SuspendLayout() + Me.pnlbitnotedigger.SuspendLayout() + Me.Panel2.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.Panel4.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + Me.pnlskinshifter.SuspendLayout() + Me.pnlshiftnet.SuspendLayout() + Me.pnldodge.SuspendLayout() + Me.pnldownloadmanager.SuspendLayout() + Me.pnlinstaller.SuspendLayout() + Me.pnlsysinfo.SuspendLayout() + Me.pnlorcwrite.SuspendLayout() + Me.pnlfloodgate.SuspendLayout() + Me.pnlmaze.SuspendLayout() + Me.pnlvirusscanner.SuspendLayout() + Me.Panel8.SuspendLayout() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 702) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(1449, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 672) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(1451, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 674) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(110, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Icon Manager" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(1451, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 672) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.FlowLayoutPanel1) + Me.pgcontents.Controls.Add(Me.Panel2) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Controls.Add(Me.Panel4) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(1449, 672) + Me.pgcontents.TabIndex = 20 + ' + 'FlowLayoutPanel1 + ' + Me.FlowLayoutPanel1.AutoScroll = True + Me.FlowLayoutPanel1.Controls.Add(Me.pnlknowledgeinputicons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlshiftoriumicons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlclockicons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlshiftericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlcolourpickericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlinfoboxicons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlpongicons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlfileskimmericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnltextpadicons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlfileopenericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlfilesavericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlgraphicpickericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlskinloadericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlartpadicons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlcalculatoricons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlaudioplayericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlwebbrowsericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlvideoplayericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlnamechangericons) + Me.FlowLayoutPanel1.Controls.Add(Me.pnliconmanagericons) + Me.FlowLayoutPanel1.Controls.Add(Me.Panel7) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlbitnotewallet) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlbitnotedigger) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlskinshifter) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlshiftnet) + Me.FlowLayoutPanel1.Controls.Add(Me.pnldodge) + Me.FlowLayoutPanel1.Controls.Add(Me.pnldownloadmanager) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlinstaller) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlsysinfo) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlorcwrite) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlfloodgate) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlmaze) + Me.FlowLayoutPanel1.Controls.Add(Me.pnlvirusscanner) + Me.FlowLayoutPanel1.Controls.Add(Me.Panel8) + Me.FlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Fill + Me.FlowLayoutPanel1.Location = New System.Drawing.Point(0, 27) + Me.FlowLayoutPanel1.Name = "FlowLayoutPanel1" + Me.FlowLayoutPanel1.Size = New System.Drawing.Size(1449, 567) + Me.FlowLayoutPanel1.TabIndex = 2 + ' + 'pnlknowledgeinputicons + ' + Me.pnlknowledgeinputicons.Controls.Add(Me.txtknowledgeinputname) + Me.pnlknowledgeinputicons.Controls.Add(Me.pnltitlebarknowledgeinputicon) + Me.pnlknowledgeinputicons.Controls.Add(Me.pnlpanelbuttonknowledgeinputicon) + Me.pnlknowledgeinputicons.Controls.Add(Me.pnllauncherknowledgeinputicon) + Me.pnlknowledgeinputicons.Location = New System.Drawing.Point(3, 3) + Me.pnlknowledgeinputicons.Name = "pnlknowledgeinputicons" + Me.pnlknowledgeinputicons.Size = New System.Drawing.Size(369, 64) + Me.pnlknowledgeinputicons.TabIndex = 0 + ' + 'txtknowledgeinputname + ' + Me.txtknowledgeinputname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtknowledgeinputname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtknowledgeinputname.Location = New System.Drawing.Point(0, 0) + Me.txtknowledgeinputname.Name = "txtknowledgeinputname" + Me.txtknowledgeinputname.Size = New System.Drawing.Size(177, 64) + Me.txtknowledgeinputname.TabIndex = 3 + Me.txtknowledgeinputname.Text = "Knowledge Input" + Me.txtknowledgeinputname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarknowledgeinputicon + ' + Me.pnltitlebarknowledgeinputicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarknowledgeinputicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarknowledgeinputicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarknowledgeinputicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarknowledgeinputicon.Name = "pnltitlebarknowledgeinputicon" + Me.pnltitlebarknowledgeinputicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarknowledgeinputicon.TabIndex = 2 + ' + 'pnlpanelbuttonknowledgeinputicon + ' + Me.pnlpanelbuttonknowledgeinputicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonknowledgeinputicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonknowledgeinputicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonknowledgeinputicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonknowledgeinputicon.Name = "pnlpanelbuttonknowledgeinputicon" + Me.pnlpanelbuttonknowledgeinputicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonknowledgeinputicon.TabIndex = 1 + ' + 'pnllauncherknowledgeinputicon + ' + Me.pnllauncherknowledgeinputicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherknowledgeinputicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherknowledgeinputicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherknowledgeinputicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherknowledgeinputicon.Name = "pnllauncherknowledgeinputicon" + Me.pnllauncherknowledgeinputicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherknowledgeinputicon.TabIndex = 0 + ' + 'pnlshiftoriumicons + ' + Me.pnlshiftoriumicons.Controls.Add(Me.txtshiftoriumname) + Me.pnlshiftoriumicons.Controls.Add(Me.pnltitlebarshiftoriumicon) + Me.pnlshiftoriumicons.Controls.Add(Me.pnlpanelbuttonshiftoriumicon) + Me.pnlshiftoriumicons.Controls.Add(Me.pnllaunchershiftoriumicon) + Me.pnlshiftoriumicons.Location = New System.Drawing.Point(378, 3) + Me.pnlshiftoriumicons.Name = "pnlshiftoriumicons" + Me.pnlshiftoriumicons.Size = New System.Drawing.Size(369, 64) + Me.pnlshiftoriumicons.TabIndex = 1 + ' + 'txtshiftoriumname + ' + Me.txtshiftoriumname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtshiftoriumname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtshiftoriumname.Location = New System.Drawing.Point(0, 0) + Me.txtshiftoriumname.Name = "txtshiftoriumname" + Me.txtshiftoriumname.Size = New System.Drawing.Size(177, 64) + Me.txtshiftoriumname.TabIndex = 3 + Me.txtshiftoriumname.Text = "Shiftorium" + Me.txtshiftoriumname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarshiftoriumicon + ' + Me.pnltitlebarshiftoriumicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarshiftoriumicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarshiftoriumicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarshiftoriumicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarshiftoriumicon.Name = "pnltitlebarshiftoriumicon" + Me.pnltitlebarshiftoriumicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarshiftoriumicon.TabIndex = 2 + ' + 'pnlpanelbuttonshiftoriumicon + ' + Me.pnlpanelbuttonshiftoriumicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonshiftoriumicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonshiftoriumicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonshiftoriumicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonshiftoriumicon.Name = "pnlpanelbuttonshiftoriumicon" + Me.pnlpanelbuttonshiftoriumicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonshiftoriumicon.TabIndex = 1 + ' + 'pnllaunchershiftoriumicon + ' + Me.pnllaunchershiftoriumicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchershiftoriumicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchershiftoriumicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchershiftoriumicon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchershiftoriumicon.Name = "pnllaunchershiftoriumicon" + Me.pnllaunchershiftoriumicon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchershiftoriumicon.TabIndex = 0 + ' + 'pnlclockicons + ' + Me.pnlclockicons.Controls.Add(Me.txtclockname) + Me.pnlclockicons.Controls.Add(Me.pnltitlebarclockicon) + Me.pnlclockicons.Controls.Add(Me.pnlpanelbuttonclockicon) + Me.pnlclockicons.Controls.Add(Me.pnllauncherclockicon) + Me.pnlclockicons.Location = New System.Drawing.Point(753, 3) + Me.pnlclockicons.Name = "pnlclockicons" + Me.pnlclockicons.Size = New System.Drawing.Size(369, 64) + Me.pnlclockicons.TabIndex = 2 + ' + 'txtclockname + ' + Me.txtclockname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtclockname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclockname.Location = New System.Drawing.Point(0, 0) + Me.txtclockname.Name = "txtclockname" + Me.txtclockname.Size = New System.Drawing.Size(177, 64) + Me.txtclockname.TabIndex = 3 + Me.txtclockname.Text = "Clock" + Me.txtclockname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarclockicon + ' + Me.pnltitlebarclockicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarclockicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarclockicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarclockicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarclockicon.Name = "pnltitlebarclockicon" + Me.pnltitlebarclockicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarclockicon.TabIndex = 2 + ' + 'pnlpanelbuttonclockicon + ' + Me.pnlpanelbuttonclockicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonclockicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonclockicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonclockicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonclockicon.Name = "pnlpanelbuttonclockicon" + Me.pnlpanelbuttonclockicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonclockicon.TabIndex = 1 + ' + 'pnllauncherclockicon + ' + Me.pnllauncherclockicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherclockicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherclockicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherclockicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherclockicon.Name = "pnllauncherclockicon" + Me.pnllauncherclockicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherclockicon.TabIndex = 0 + ' + 'pnlshiftericons + ' + Me.pnlshiftericons.Controls.Add(Me.txtshiftername) + Me.pnlshiftericons.Controls.Add(Me.pnltitlebarshiftericon) + Me.pnlshiftericons.Controls.Add(Me.pnlpanelbuttonshiftericon) + Me.pnlshiftericons.Controls.Add(Me.pnllaunchershiftericon) + Me.pnlshiftericons.Location = New System.Drawing.Point(3, 73) + Me.pnlshiftericons.Name = "pnlshiftericons" + Me.pnlshiftericons.Size = New System.Drawing.Size(369, 64) + Me.pnlshiftericons.TabIndex = 3 + ' + 'txtshiftername + ' + Me.txtshiftername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtshiftername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtshiftername.Location = New System.Drawing.Point(0, 0) + Me.txtshiftername.Name = "txtshiftername" + Me.txtshiftername.Size = New System.Drawing.Size(177, 64) + Me.txtshiftername.TabIndex = 3 + Me.txtshiftername.Text = "Shifter" + Me.txtshiftername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarshiftericon + ' + Me.pnltitlebarshiftericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarshiftericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarshiftericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarshiftericon.Name = "pnltitlebarshiftericon" + Me.pnltitlebarshiftericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarshiftericon.TabIndex = 2 + ' + 'pnlpanelbuttonshiftericon + ' + Me.pnlpanelbuttonshiftericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonshiftericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonshiftericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonshiftericon.Name = "pnlpanelbuttonshiftericon" + Me.pnlpanelbuttonshiftericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonshiftericon.TabIndex = 1 + ' + 'pnllaunchershiftericon + ' + Me.pnllaunchershiftericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchershiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchershiftericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchershiftericon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchershiftericon.Name = "pnllaunchershiftericon" + Me.pnllaunchershiftericon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchershiftericon.TabIndex = 0 + ' + 'pnlcolourpickericons + ' + Me.pnlcolourpickericons.Controls.Add(Me.txtcolourpickername) + Me.pnlcolourpickericons.Controls.Add(Me.pnltitlebarcolourpickericon) + Me.pnlcolourpickericons.Controls.Add(Me.pnlpanelbuttoncolourpickericon) + Me.pnlcolourpickericons.Controls.Add(Me.pnllaunchercolourpickericon) + Me.pnlcolourpickericons.Location = New System.Drawing.Point(378, 73) + Me.pnlcolourpickericons.Name = "pnlcolourpickericons" + Me.pnlcolourpickericons.Size = New System.Drawing.Size(369, 64) + Me.pnlcolourpickericons.TabIndex = 4 + ' + 'txtcolourpickername + ' + Me.txtcolourpickername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtcolourpickername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtcolourpickername.Location = New System.Drawing.Point(0, 0) + Me.txtcolourpickername.Name = "txtcolourpickername" + Me.txtcolourpickername.Size = New System.Drawing.Size(177, 64) + Me.txtcolourpickername.TabIndex = 3 + Me.txtcolourpickername.Text = "Colour Picker" + Me.txtcolourpickername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarcolourpickericon + ' + Me.pnltitlebarcolourpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarcolourpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarcolourpickericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarcolourpickericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarcolourpickericon.Name = "pnltitlebarcolourpickericon" + Me.pnltitlebarcolourpickericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarcolourpickericon.TabIndex = 2 + ' + 'pnlpanelbuttoncolourpickericon + ' + Me.pnlpanelbuttoncolourpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttoncolourpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttoncolourpickericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttoncolourpickericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttoncolourpickericon.Name = "pnlpanelbuttoncolourpickericon" + Me.pnlpanelbuttoncolourpickericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttoncolourpickericon.TabIndex = 1 + ' + 'pnllaunchercolourpickericon + ' + Me.pnllaunchercolourpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchercolourpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchercolourpickericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchercolourpickericon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchercolourpickericon.Name = "pnllaunchercolourpickericon" + Me.pnllaunchercolourpickericon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchercolourpickericon.TabIndex = 0 + ' + 'pnlinfoboxicons + ' + Me.pnlinfoboxicons.Controls.Add(Me.txtinfoboxname) + Me.pnlinfoboxicons.Controls.Add(Me.pnltitlebarinfoboxicon) + Me.pnlinfoboxicons.Controls.Add(Me.pnlpanelbuttoninfoboxicon) + Me.pnlinfoboxicons.Controls.Add(Me.pnllauncherinfoboxicon) + Me.pnlinfoboxicons.Location = New System.Drawing.Point(753, 73) + Me.pnlinfoboxicons.Name = "pnlinfoboxicons" + Me.pnlinfoboxicons.Size = New System.Drawing.Size(369, 64) + Me.pnlinfoboxicons.TabIndex = 5 + ' + 'txtinfoboxname + ' + Me.txtinfoboxname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtinfoboxname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtinfoboxname.Location = New System.Drawing.Point(0, 0) + Me.txtinfoboxname.Name = "txtinfoboxname" + Me.txtinfoboxname.Size = New System.Drawing.Size(177, 64) + Me.txtinfoboxname.TabIndex = 3 + Me.txtinfoboxname.Text = "Infobox" + Me.txtinfoboxname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarinfoboxicon + ' + Me.pnltitlebarinfoboxicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarinfoboxicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarinfoboxicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarinfoboxicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarinfoboxicon.Name = "pnltitlebarinfoboxicon" + Me.pnltitlebarinfoboxicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarinfoboxicon.TabIndex = 2 + ' + 'pnlpanelbuttoninfoboxicon + ' + Me.pnlpanelbuttoninfoboxicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttoninfoboxicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttoninfoboxicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttoninfoboxicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttoninfoboxicon.Name = "pnlpanelbuttoninfoboxicon" + Me.pnlpanelbuttoninfoboxicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttoninfoboxicon.TabIndex = 1 + ' + 'pnllauncherinfoboxicon + ' + Me.pnllauncherinfoboxicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherinfoboxicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherinfoboxicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherinfoboxicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherinfoboxicon.Name = "pnllauncherinfoboxicon" + Me.pnllauncherinfoboxicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherinfoboxicon.TabIndex = 0 + ' + 'pnlpongicons + ' + Me.pnlpongicons.Controls.Add(Me.txtpongname) + Me.pnlpongicons.Controls.Add(Me.pnltitlebarpongicon) + Me.pnlpongicons.Controls.Add(Me.pnlpanelbuttonpongicon) + Me.pnlpongicons.Controls.Add(Me.pnllauncherpongicon) + Me.pnlpongicons.Location = New System.Drawing.Point(3, 143) + Me.pnlpongicons.Name = "pnlpongicons" + Me.pnlpongicons.Size = New System.Drawing.Size(369, 64) + Me.pnlpongicons.TabIndex = 6 + ' + 'txtpongname + ' + Me.txtpongname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtpongname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpongname.Location = New System.Drawing.Point(0, 0) + Me.txtpongname.Name = "txtpongname" + Me.txtpongname.Size = New System.Drawing.Size(177, 64) + Me.txtpongname.TabIndex = 3 + Me.txtpongname.Text = "Pong" + Me.txtpongname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarpongicon + ' + Me.pnltitlebarpongicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarpongicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarpongicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarpongicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarpongicon.Name = "pnltitlebarpongicon" + Me.pnltitlebarpongicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarpongicon.TabIndex = 2 + ' + 'pnlpanelbuttonpongicon + ' + Me.pnlpanelbuttonpongicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonpongicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonpongicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonpongicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonpongicon.Name = "pnlpanelbuttonpongicon" + Me.pnlpanelbuttonpongicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonpongicon.TabIndex = 1 + ' + 'pnllauncherpongicon + ' + Me.pnllauncherpongicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherpongicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherpongicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherpongicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherpongicon.Name = "pnllauncherpongicon" + Me.pnllauncherpongicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherpongicon.TabIndex = 0 + ' + 'pnlfileskimmericons + ' + Me.pnlfileskimmericons.Controls.Add(Me.txtfileskimmername) + Me.pnlfileskimmericons.Controls.Add(Me.pnltitlebarfileskimmericon) + Me.pnlfileskimmericons.Controls.Add(Me.pnlpanelbuttonfileskimmericon) + Me.pnlfileskimmericons.Controls.Add(Me.pnllauncherfileskimmericon) + Me.pnlfileskimmericons.Location = New System.Drawing.Point(378, 143) + Me.pnlfileskimmericons.Name = "pnlfileskimmericons" + Me.pnlfileskimmericons.Size = New System.Drawing.Size(369, 64) + Me.pnlfileskimmericons.TabIndex = 7 + ' + 'txtfileskimmername + ' + Me.txtfileskimmername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtfileskimmername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfileskimmername.Location = New System.Drawing.Point(0, 0) + Me.txtfileskimmername.Name = "txtfileskimmername" + Me.txtfileskimmername.Size = New System.Drawing.Size(177, 64) + Me.txtfileskimmername.TabIndex = 3 + Me.txtfileskimmername.Text = "File Skimmer" + Me.txtfileskimmername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarfileskimmericon + ' + Me.pnltitlebarfileskimmericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarfileskimmericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarfileskimmericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarfileskimmericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarfileskimmericon.Name = "pnltitlebarfileskimmericon" + Me.pnltitlebarfileskimmericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarfileskimmericon.TabIndex = 2 + ' + 'pnlpanelbuttonfileskimmericon + ' + Me.pnlpanelbuttonfileskimmericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonfileskimmericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonfileskimmericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonfileskimmericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonfileskimmericon.Name = "pnlpanelbuttonfileskimmericon" + Me.pnlpanelbuttonfileskimmericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonfileskimmericon.TabIndex = 1 + ' + 'pnllauncherfileskimmericon + ' + Me.pnllauncherfileskimmericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherfileskimmericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherfileskimmericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherfileskimmericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherfileskimmericon.Name = "pnllauncherfileskimmericon" + Me.pnllauncherfileskimmericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherfileskimmericon.TabIndex = 0 + ' + 'pnltextpadicons + ' + Me.pnltextpadicons.Controls.Add(Me.txttextpadname) + Me.pnltextpadicons.Controls.Add(Me.pnltitlebartextpadicon) + Me.pnltextpadicons.Controls.Add(Me.pnlpanelbuttontextpadicon) + Me.pnltextpadicons.Controls.Add(Me.pnllaunchertextpadicon) + Me.pnltextpadicons.Location = New System.Drawing.Point(753, 143) + Me.pnltextpadicons.Name = "pnltextpadicons" + Me.pnltextpadicons.Size = New System.Drawing.Size(369, 64) + Me.pnltextpadicons.TabIndex = 8 + ' + 'txttextpadname + ' + Me.txttextpadname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txttextpadname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttextpadname.Location = New System.Drawing.Point(0, 0) + Me.txttextpadname.Name = "txttextpadname" + Me.txttextpadname.Size = New System.Drawing.Size(177, 64) + Me.txttextpadname.TabIndex = 3 + Me.txttextpadname.Text = "TextPad" + Me.txttextpadname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebartextpadicon + ' + Me.pnltitlebartextpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebartextpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebartextpadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebartextpadicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebartextpadicon.Name = "pnltitlebartextpadicon" + Me.pnltitlebartextpadicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebartextpadicon.TabIndex = 2 + ' + 'pnlpanelbuttontextpadicon + ' + Me.pnlpanelbuttontextpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttontextpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttontextpadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttontextpadicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttontextpadicon.Name = "pnlpanelbuttontextpadicon" + Me.pnlpanelbuttontextpadicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttontextpadicon.TabIndex = 1 + ' + 'pnllaunchertextpadicon + ' + Me.pnllaunchertextpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchertextpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchertextpadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchertextpadicon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchertextpadicon.Name = "pnllaunchertextpadicon" + Me.pnllaunchertextpadicon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchertextpadicon.TabIndex = 0 + ' + 'pnlfileopenericons + ' + Me.pnlfileopenericons.Controls.Add(Me.txtfileopenername) + Me.pnlfileopenericons.Controls.Add(Me.pnltitlebarfileopenericon) + Me.pnlfileopenericons.Controls.Add(Me.pnlpanelbuttonfileopenericon) + Me.pnlfileopenericons.Controls.Add(Me.pnllauncherfileopenericon) + Me.pnlfileopenericons.Location = New System.Drawing.Point(3, 213) + Me.pnlfileopenericons.Name = "pnlfileopenericons" + Me.pnlfileopenericons.Size = New System.Drawing.Size(369, 64) + Me.pnlfileopenericons.TabIndex = 9 + ' + 'txtfileopenername + ' + Me.txtfileopenername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtfileopenername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfileopenername.Location = New System.Drawing.Point(0, 0) + Me.txtfileopenername.Name = "txtfileopenername" + Me.txtfileopenername.Size = New System.Drawing.Size(177, 64) + Me.txtfileopenername.TabIndex = 3 + Me.txtfileopenername.Text = "File Opener" + Me.txtfileopenername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarfileopenericon + ' + Me.pnltitlebarfileopenericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarfileopenericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarfileopenericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarfileopenericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarfileopenericon.Name = "pnltitlebarfileopenericon" + Me.pnltitlebarfileopenericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarfileopenericon.TabIndex = 2 + ' + 'pnlpanelbuttonfileopenericon + ' + Me.pnlpanelbuttonfileopenericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonfileopenericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonfileopenericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonfileopenericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonfileopenericon.Name = "pnlpanelbuttonfileopenericon" + Me.pnlpanelbuttonfileopenericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonfileopenericon.TabIndex = 1 + ' + 'pnllauncherfileopenericon + ' + Me.pnllauncherfileopenericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherfileopenericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherfileopenericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherfileopenericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherfileopenericon.Name = "pnllauncherfileopenericon" + Me.pnllauncherfileopenericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherfileopenericon.TabIndex = 0 + ' + 'pnlfilesavericons + ' + Me.pnlfilesavericons.Controls.Add(Me.txtfilesavername) + Me.pnlfilesavericons.Controls.Add(Me.pnltitlebarfilesavericon) + Me.pnlfilesavericons.Controls.Add(Me.pnlpanelbuttonfilesavericon) + Me.pnlfilesavericons.Controls.Add(Me.pnllauncherfilesavericon) + Me.pnlfilesavericons.Location = New System.Drawing.Point(378, 213) + Me.pnlfilesavericons.Name = "pnlfilesavericons" + Me.pnlfilesavericons.Size = New System.Drawing.Size(369, 64) + Me.pnlfilesavericons.TabIndex = 10 + ' + 'txtfilesavername + ' + Me.txtfilesavername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtfilesavername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfilesavername.Location = New System.Drawing.Point(0, 0) + Me.txtfilesavername.Name = "txtfilesavername" + Me.txtfilesavername.Size = New System.Drawing.Size(177, 64) + Me.txtfilesavername.TabIndex = 3 + Me.txtfilesavername.Text = "File Saver" + Me.txtfilesavername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarfilesavericon + ' + Me.pnltitlebarfilesavericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarfilesavericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarfilesavericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarfilesavericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarfilesavericon.Name = "pnltitlebarfilesavericon" + Me.pnltitlebarfilesavericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarfilesavericon.TabIndex = 2 + ' + 'pnlpanelbuttonfilesavericon + ' + Me.pnlpanelbuttonfilesavericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonfilesavericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonfilesavericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonfilesavericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonfilesavericon.Name = "pnlpanelbuttonfilesavericon" + Me.pnlpanelbuttonfilesavericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonfilesavericon.TabIndex = 1 + ' + 'pnllauncherfilesavericon + ' + Me.pnllauncherfilesavericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherfilesavericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherfilesavericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherfilesavericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherfilesavericon.Name = "pnllauncherfilesavericon" + Me.pnllauncherfilesavericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherfilesavericon.TabIndex = 0 + ' + 'pnlgraphicpickericons + ' + Me.pnlgraphicpickericons.Controls.Add(Me.txtgraphicpickername) + Me.pnlgraphicpickericons.Controls.Add(Me.pnltitlebargraphicpickericon) + Me.pnlgraphicpickericons.Controls.Add(Me.pnlpanelbuttongraphicpickericon) + Me.pnlgraphicpickericons.Controls.Add(Me.pnllaunchergraphicpickericon) + Me.pnlgraphicpickericons.Location = New System.Drawing.Point(753, 213) + Me.pnlgraphicpickericons.Name = "pnlgraphicpickericons" + Me.pnlgraphicpickericons.Size = New System.Drawing.Size(369, 64) + Me.pnlgraphicpickericons.TabIndex = 11 + ' + 'txtgraphicpickername + ' + Me.txtgraphicpickername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtgraphicpickername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtgraphicpickername.Location = New System.Drawing.Point(0, 0) + Me.txtgraphicpickername.Name = "txtgraphicpickername" + Me.txtgraphicpickername.Size = New System.Drawing.Size(177, 64) + Me.txtgraphicpickername.TabIndex = 3 + Me.txtgraphicpickername.Text = "Graphic Picker" + Me.txtgraphicpickername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebargraphicpickericon + ' + Me.pnltitlebargraphicpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebargraphicpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebargraphicpickericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebargraphicpickericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebargraphicpickericon.Name = "pnltitlebargraphicpickericon" + Me.pnltitlebargraphicpickericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebargraphicpickericon.TabIndex = 2 + ' + 'pnlpanelbuttongraphicpickericon + ' + Me.pnlpanelbuttongraphicpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttongraphicpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttongraphicpickericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttongraphicpickericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttongraphicpickericon.Name = "pnlpanelbuttongraphicpickericon" + Me.pnlpanelbuttongraphicpickericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttongraphicpickericon.TabIndex = 1 + ' + 'pnllaunchergraphicpickericon + ' + Me.pnllaunchergraphicpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchergraphicpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchergraphicpickericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchergraphicpickericon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchergraphicpickericon.Name = "pnllaunchergraphicpickericon" + Me.pnllaunchergraphicpickericon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchergraphicpickericon.TabIndex = 0 + ' + 'pnlskinloadericons + ' + Me.pnlskinloadericons.Controls.Add(Me.txtskinloadername) + Me.pnlskinloadericons.Controls.Add(Me.pnltitlebarskinloadericon) + Me.pnlskinloadericons.Controls.Add(Me.pnlpanelbuttonskinloadericon) + Me.pnlskinloadericons.Controls.Add(Me.pnllauncherskinloadericon) + Me.pnlskinloadericons.Location = New System.Drawing.Point(3, 283) + Me.pnlskinloadericons.Name = "pnlskinloadericons" + Me.pnlskinloadericons.Size = New System.Drawing.Size(369, 64) + Me.pnlskinloadericons.TabIndex = 12 + ' + 'txtskinloadername + ' + Me.txtskinloadername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtskinloadername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtskinloadername.Location = New System.Drawing.Point(0, 0) + Me.txtskinloadername.Name = "txtskinloadername" + Me.txtskinloadername.Size = New System.Drawing.Size(177, 64) + Me.txtskinloadername.TabIndex = 3 + Me.txtskinloadername.Text = "Skin Loader" + Me.txtskinloadername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarskinloadericon + ' + Me.pnltitlebarskinloadericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarskinloadericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarskinloadericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarskinloadericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarskinloadericon.Name = "pnltitlebarskinloadericon" + Me.pnltitlebarskinloadericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarskinloadericon.TabIndex = 2 + ' + 'pnlpanelbuttonskinloadericon + ' + Me.pnlpanelbuttonskinloadericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonskinloadericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonskinloadericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonskinloadericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonskinloadericon.Name = "pnlpanelbuttonskinloadericon" + Me.pnlpanelbuttonskinloadericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonskinloadericon.TabIndex = 1 + ' + 'pnllauncherskinloadericon + ' + Me.pnllauncherskinloadericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherskinloadericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherskinloadericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherskinloadericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherskinloadericon.Name = "pnllauncherskinloadericon" + Me.pnllauncherskinloadericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherskinloadericon.TabIndex = 0 + ' + 'pnlartpadicons + ' + Me.pnlartpadicons.Controls.Add(Me.txtartpadname) + Me.pnlartpadicons.Controls.Add(Me.pnltitlebarartpadicon) + Me.pnlartpadicons.Controls.Add(Me.pnlpanelbuttonartpadicon) + Me.pnlartpadicons.Controls.Add(Me.pnllauncherartpadicon) + Me.pnlartpadicons.Location = New System.Drawing.Point(378, 283) + Me.pnlartpadicons.Name = "pnlartpadicons" + Me.pnlartpadicons.Size = New System.Drawing.Size(369, 64) + Me.pnlartpadicons.TabIndex = 13 + ' + 'txtartpadname + ' + Me.txtartpadname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtartpadname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtartpadname.Location = New System.Drawing.Point(0, 0) + Me.txtartpadname.Name = "txtartpadname" + Me.txtartpadname.Size = New System.Drawing.Size(177, 64) + Me.txtartpadname.TabIndex = 3 + Me.txtartpadname.Text = "Artpad" + Me.txtartpadname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarartpadicon + ' + Me.pnltitlebarartpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarartpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarartpadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarartpadicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarartpadicon.Name = "pnltitlebarartpadicon" + Me.pnltitlebarartpadicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarartpadicon.TabIndex = 2 + ' + 'pnlpanelbuttonartpadicon + ' + Me.pnlpanelbuttonartpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonartpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonartpadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonartpadicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonartpadicon.Name = "pnlpanelbuttonartpadicon" + Me.pnlpanelbuttonartpadicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonartpadicon.TabIndex = 1 + ' + 'pnllauncherartpadicon + ' + Me.pnllauncherartpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherartpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherartpadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherartpadicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherartpadicon.Name = "pnllauncherartpadicon" + Me.pnllauncherartpadicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherartpadicon.TabIndex = 0 + ' + 'pnlcalculatoricons + ' + Me.pnlcalculatoricons.Controls.Add(Me.txtcalculatorname) + Me.pnlcalculatoricons.Controls.Add(Me.pnltitlebarcalculatoricon) + Me.pnlcalculatoricons.Controls.Add(Me.pnlpanelbuttoncalculatoricon) + Me.pnlcalculatoricons.Controls.Add(Me.pnllaunchercalculatoricon) + Me.pnlcalculatoricons.Location = New System.Drawing.Point(753, 283) + Me.pnlcalculatoricons.Name = "pnlcalculatoricons" + Me.pnlcalculatoricons.Size = New System.Drawing.Size(369, 64) + Me.pnlcalculatoricons.TabIndex = 14 + ' + 'txtcalculatorname + ' + Me.txtcalculatorname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtcalculatorname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtcalculatorname.Location = New System.Drawing.Point(0, 0) + Me.txtcalculatorname.Name = "txtcalculatorname" + Me.txtcalculatorname.Size = New System.Drawing.Size(177, 64) + Me.txtcalculatorname.TabIndex = 3 + Me.txtcalculatorname.Text = "Calculator" + Me.txtcalculatorname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarcalculatoricon + ' + Me.pnltitlebarcalculatoricon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarcalculatoricon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarcalculatoricon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarcalculatoricon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarcalculatoricon.Name = "pnltitlebarcalculatoricon" + Me.pnltitlebarcalculatoricon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarcalculatoricon.TabIndex = 2 + ' + 'pnlpanelbuttoncalculatoricon + ' + Me.pnlpanelbuttoncalculatoricon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttoncalculatoricon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttoncalculatoricon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttoncalculatoricon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttoncalculatoricon.Name = "pnlpanelbuttoncalculatoricon" + Me.pnlpanelbuttoncalculatoricon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttoncalculatoricon.TabIndex = 1 + ' + 'pnllaunchercalculatoricon + ' + Me.pnllaunchercalculatoricon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchercalculatoricon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchercalculatoricon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchercalculatoricon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchercalculatoricon.Name = "pnllaunchercalculatoricon" + Me.pnllaunchercalculatoricon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchercalculatoricon.TabIndex = 0 + ' + 'pnlaudioplayericons + ' + Me.pnlaudioplayericons.Controls.Add(Me.txtaudioplayername) + Me.pnlaudioplayericons.Controls.Add(Me.pnltitlebaraudioplayericon) + Me.pnlaudioplayericons.Controls.Add(Me.pnlpanelbuttonaudioplayericon) + Me.pnlaudioplayericons.Controls.Add(Me.pnllauncheraudioplayericon) + Me.pnlaudioplayericons.Location = New System.Drawing.Point(3, 353) + Me.pnlaudioplayericons.Name = "pnlaudioplayericons" + Me.pnlaudioplayericons.Size = New System.Drawing.Size(369, 64) + Me.pnlaudioplayericons.TabIndex = 15 + ' + 'txtaudioplayername + ' + Me.txtaudioplayername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtaudioplayername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtaudioplayername.Location = New System.Drawing.Point(0, 0) + Me.txtaudioplayername.Name = "txtaudioplayername" + Me.txtaudioplayername.Size = New System.Drawing.Size(177, 64) + Me.txtaudioplayername.TabIndex = 3 + Me.txtaudioplayername.Text = "Audio Player" + Me.txtaudioplayername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebaraudioplayericon + ' + Me.pnltitlebaraudioplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebaraudioplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebaraudioplayericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebaraudioplayericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebaraudioplayericon.Name = "pnltitlebaraudioplayericon" + Me.pnltitlebaraudioplayericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebaraudioplayericon.TabIndex = 2 + ' + 'pnlpanelbuttonaudioplayericon + ' + Me.pnlpanelbuttonaudioplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonaudioplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonaudioplayericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonaudioplayericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonaudioplayericon.Name = "pnlpanelbuttonaudioplayericon" + Me.pnlpanelbuttonaudioplayericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonaudioplayericon.TabIndex = 1 + ' + 'pnllauncheraudioplayericon + ' + Me.pnllauncheraudioplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncheraudioplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncheraudioplayericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncheraudioplayericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncheraudioplayericon.Name = "pnllauncheraudioplayericon" + Me.pnllauncheraudioplayericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncheraudioplayericon.TabIndex = 0 + ' + 'pnlwebbrowsericons + ' + Me.pnlwebbrowsericons.Controls.Add(Me.txtwebbrowsername) + Me.pnlwebbrowsericons.Controls.Add(Me.pnltitlebarwebbrowsericon) + Me.pnlwebbrowsericons.Controls.Add(Me.pnlpanelbuttonwebbrowsericon) + Me.pnlwebbrowsericons.Controls.Add(Me.pnllauncherwebbrowsericon) + Me.pnlwebbrowsericons.Location = New System.Drawing.Point(378, 353) + Me.pnlwebbrowsericons.Name = "pnlwebbrowsericons" + Me.pnlwebbrowsericons.Size = New System.Drawing.Size(369, 64) + Me.pnlwebbrowsericons.TabIndex = 16 + ' + 'txtwebbrowsername + ' + Me.txtwebbrowsername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtwebbrowsername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtwebbrowsername.Location = New System.Drawing.Point(0, 0) + Me.txtwebbrowsername.Name = "txtwebbrowsername" + Me.txtwebbrowsername.Size = New System.Drawing.Size(177, 64) + Me.txtwebbrowsername.TabIndex = 3 + Me.txtwebbrowsername.Text = "Web Browser" + Me.txtwebbrowsername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarwebbrowsericon + ' + Me.pnltitlebarwebbrowsericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarwebbrowsericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarwebbrowsericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarwebbrowsericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarwebbrowsericon.Name = "pnltitlebarwebbrowsericon" + Me.pnltitlebarwebbrowsericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarwebbrowsericon.TabIndex = 2 + ' + 'pnlpanelbuttonwebbrowsericon + ' + Me.pnlpanelbuttonwebbrowsericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonwebbrowsericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonwebbrowsericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonwebbrowsericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonwebbrowsericon.Name = "pnlpanelbuttonwebbrowsericon" + Me.pnlpanelbuttonwebbrowsericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonwebbrowsericon.TabIndex = 1 + ' + 'pnllauncherwebbrowsericon + ' + Me.pnllauncherwebbrowsericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherwebbrowsericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherwebbrowsericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherwebbrowsericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherwebbrowsericon.Name = "pnllauncherwebbrowsericon" + Me.pnllauncherwebbrowsericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherwebbrowsericon.TabIndex = 0 + ' + 'pnlvideoplayericons + ' + Me.pnlvideoplayericons.Controls.Add(Me.txtvideoplayername) + Me.pnlvideoplayericons.Controls.Add(Me.pnltitlebarvideoplayericon) + Me.pnlvideoplayericons.Controls.Add(Me.pnlpanelbuttonvideoplayericon) + Me.pnlvideoplayericons.Controls.Add(Me.pnllaunchervideoplayericon) + Me.pnlvideoplayericons.Location = New System.Drawing.Point(753, 353) + Me.pnlvideoplayericons.Name = "pnlvideoplayericons" + Me.pnlvideoplayericons.Size = New System.Drawing.Size(369, 64) + Me.pnlvideoplayericons.TabIndex = 17 + ' + 'txtvideoplayername + ' + Me.txtvideoplayername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtvideoplayername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtvideoplayername.Location = New System.Drawing.Point(0, 0) + Me.txtvideoplayername.Name = "txtvideoplayername" + Me.txtvideoplayername.Size = New System.Drawing.Size(177, 64) + Me.txtvideoplayername.TabIndex = 3 + Me.txtvideoplayername.Text = "Video Player" + Me.txtvideoplayername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarvideoplayericon + ' + Me.pnltitlebarvideoplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarvideoplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarvideoplayericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarvideoplayericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarvideoplayericon.Name = "pnltitlebarvideoplayericon" + Me.pnltitlebarvideoplayericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarvideoplayericon.TabIndex = 2 + ' + 'pnlpanelbuttonvideoplayericon + ' + Me.pnlpanelbuttonvideoplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonvideoplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonvideoplayericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonvideoplayericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonvideoplayericon.Name = "pnlpanelbuttonvideoplayericon" + Me.pnlpanelbuttonvideoplayericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonvideoplayericon.TabIndex = 1 + ' + 'pnllaunchervideoplayericon + ' + Me.pnllaunchervideoplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchervideoplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchervideoplayericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchervideoplayericon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchervideoplayericon.Name = "pnllaunchervideoplayericon" + Me.pnllaunchervideoplayericon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchervideoplayericon.TabIndex = 0 + ' + 'pnlnamechangericons + ' + Me.pnlnamechangericons.Controls.Add(Me.txtnamechangername) + Me.pnlnamechangericons.Controls.Add(Me.pnltitlebarnamechangericon) + Me.pnlnamechangericons.Controls.Add(Me.pnlpanelbuttonnamechangericon) + Me.pnlnamechangericons.Controls.Add(Me.pnllaunchernamechangericon) + Me.pnlnamechangericons.Location = New System.Drawing.Point(3, 423) + Me.pnlnamechangericons.Name = "pnlnamechangericons" + Me.pnlnamechangericons.Size = New System.Drawing.Size(369, 64) + Me.pnlnamechangericons.TabIndex = 18 + ' + 'txtnamechangername + ' + Me.txtnamechangername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtnamechangername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtnamechangername.Location = New System.Drawing.Point(0, 0) + Me.txtnamechangername.Name = "txtnamechangername" + Me.txtnamechangername.Size = New System.Drawing.Size(177, 64) + Me.txtnamechangername.TabIndex = 3 + Me.txtnamechangername.Text = "Name Changer" + Me.txtnamechangername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarnamechangericon + ' + Me.pnltitlebarnamechangericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarnamechangericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarnamechangericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarnamechangericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarnamechangericon.Name = "pnltitlebarnamechangericon" + Me.pnltitlebarnamechangericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarnamechangericon.TabIndex = 2 + ' + 'pnlpanelbuttonnamechangericon + ' + Me.pnlpanelbuttonnamechangericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonnamechangericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonnamechangericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonnamechangericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonnamechangericon.Name = "pnlpanelbuttonnamechangericon" + Me.pnlpanelbuttonnamechangericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonnamechangericon.TabIndex = 1 + ' + 'pnllaunchernamechangericon + ' + Me.pnllaunchernamechangericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchernamechangericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchernamechangericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchernamechangericon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchernamechangericon.Name = "pnllaunchernamechangericon" + Me.pnllaunchernamechangericon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchernamechangericon.TabIndex = 0 + ' + 'pnliconmanagericons + ' + Me.pnliconmanagericons.Controls.Add(Me.txticonmanagername) + Me.pnliconmanagericons.Controls.Add(Me.pnltitlebariconmanagericon) + Me.pnliconmanagericons.Controls.Add(Me.pnlpanelbuttoniconmanagericon) + Me.pnliconmanagericons.Controls.Add(Me.pnllaunchericonmanagericon) + Me.pnliconmanagericons.Location = New System.Drawing.Point(378, 423) + Me.pnliconmanagericons.Name = "pnliconmanagericons" + Me.pnliconmanagericons.Size = New System.Drawing.Size(369, 64) + Me.pnliconmanagericons.TabIndex = 19 + ' + 'txticonmanagername + ' + Me.txticonmanagername.Dock = System.Windows.Forms.DockStyle.Fill + Me.txticonmanagername.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txticonmanagername.Location = New System.Drawing.Point(0, 0) + Me.txticonmanagername.Name = "txticonmanagername" + Me.txticonmanagername.Size = New System.Drawing.Size(177, 64) + Me.txticonmanagername.TabIndex = 3 + Me.txticonmanagername.Text = "Icon Manager" + Me.txticonmanagername.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebariconmanagericon + ' + Me.pnltitlebariconmanagericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebariconmanagericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebariconmanagericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebariconmanagericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebariconmanagericon.Name = "pnltitlebariconmanagericon" + Me.pnltitlebariconmanagericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebariconmanagericon.TabIndex = 2 + ' + 'pnlpanelbuttoniconmanagericon + ' + Me.pnlpanelbuttoniconmanagericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttoniconmanagericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttoniconmanagericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttoniconmanagericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttoniconmanagericon.Name = "pnlpanelbuttoniconmanagericon" + Me.pnlpanelbuttoniconmanagericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttoniconmanagericon.TabIndex = 1 + ' + 'pnllaunchericonmanagericon + ' + Me.pnllaunchericonmanagericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchericonmanagericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchericonmanagericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchericonmanagericon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchericonmanagericon.Name = "pnllaunchericonmanagericon" + Me.pnllaunchericonmanagericon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchericonmanagericon.TabIndex = 0 + ' + 'Panel7 + ' + Me.Panel7.Controls.Add(Me.txtterminalname) + Me.Panel7.Controls.Add(Me.pnltitlebarterminalicon) + Me.Panel7.Controls.Add(Me.pnlpanelbuttonterminalicon) + Me.Panel7.Controls.Add(Me.pnllauncherterminalicon) + Me.Panel7.Location = New System.Drawing.Point(753, 423) + Me.Panel7.Name = "Panel7" + Me.Panel7.Size = New System.Drawing.Size(369, 64) + Me.Panel7.TabIndex = 20 + ' + 'txtterminalname + ' + Me.txtterminalname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtterminalname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtterminalname.Location = New System.Drawing.Point(0, 0) + Me.txtterminalname.Name = "txtterminalname" + Me.txtterminalname.Size = New System.Drawing.Size(177, 64) + Me.txtterminalname.TabIndex = 3 + Me.txtterminalname.Text = "Terminal" + Me.txtterminalname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarterminalicon + ' + Me.pnltitlebarterminalicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarterminalicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarterminalicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarterminalicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarterminalicon.Name = "pnltitlebarterminalicon" + Me.pnltitlebarterminalicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarterminalicon.TabIndex = 2 + ' + 'pnlpanelbuttonterminalicon + ' + Me.pnlpanelbuttonterminalicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonterminalicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonterminalicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonterminalicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonterminalicon.Name = "pnlpanelbuttonterminalicon" + Me.pnlpanelbuttonterminalicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonterminalicon.TabIndex = 1 + ' + 'pnllauncherterminalicon + ' + Me.pnllauncherterminalicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherterminalicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherterminalicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherterminalicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherterminalicon.Name = "pnllauncherterminalicon" + Me.pnllauncherterminalicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherterminalicon.TabIndex = 0 + ' + 'pnlbitnotewallet + ' + Me.pnlbitnotewallet.Controls.Add(Me.lblbitnotewallet) + Me.pnlbitnotewallet.Controls.Add(Me.pnltitlebarbitnotewalleticon) + Me.pnlbitnotewallet.Controls.Add(Me.pnlpanelbuttonbitnotewalleticon) + Me.pnlbitnotewallet.Controls.Add(Me.pnllauncherbitnotewalleticon) + Me.pnlbitnotewallet.Location = New System.Drawing.Point(3, 493) + Me.pnlbitnotewallet.Name = "pnlbitnotewallet" + Me.pnlbitnotewallet.Size = New System.Drawing.Size(369, 64) + Me.pnlbitnotewallet.TabIndex = 22 + ' + 'lblbitnotewallet + ' + Me.lblbitnotewallet.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblbitnotewallet.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewallet.Location = New System.Drawing.Point(0, 0) + Me.lblbitnotewallet.Name = "lblbitnotewallet" + Me.lblbitnotewallet.Size = New System.Drawing.Size(177, 64) + Me.lblbitnotewallet.TabIndex = 3 + Me.lblbitnotewallet.Text = "Bitnote Wallet" + Me.lblbitnotewallet.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarbitnotewalleticon + ' + Me.pnltitlebarbitnotewalleticon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarbitnotewalleticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarbitnotewalleticon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarbitnotewalleticon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarbitnotewalleticon.Name = "pnltitlebarbitnotewalleticon" + Me.pnltitlebarbitnotewalleticon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarbitnotewalleticon.TabIndex = 2 + ' + 'pnlpanelbuttonbitnotewalleticon + ' + Me.pnlpanelbuttonbitnotewalleticon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonbitnotewalleticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonbitnotewalleticon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonbitnotewalleticon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonbitnotewalleticon.Name = "pnlpanelbuttonbitnotewalleticon" + Me.pnlpanelbuttonbitnotewalleticon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonbitnotewalleticon.TabIndex = 1 + ' + 'pnllauncherbitnotewalleticon + ' + Me.pnllauncherbitnotewalleticon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherbitnotewalleticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherbitnotewalleticon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherbitnotewalleticon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherbitnotewalleticon.Name = "pnllauncherbitnotewalleticon" + Me.pnllauncherbitnotewalleticon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherbitnotewalleticon.TabIndex = 0 + ' + 'pnlbitnotedigger + ' + Me.pnlbitnotedigger.Controls.Add(Me.lblbitnotedigger) + Me.pnlbitnotedigger.Controls.Add(Me.pnltitlebarbitnotediggericon) + Me.pnlbitnotedigger.Controls.Add(Me.pnlpanelbuttonbitnotediggericon) + Me.pnlbitnotedigger.Controls.Add(Me.pnllauncherbitnotediggericon) + Me.pnlbitnotedigger.Location = New System.Drawing.Point(378, 493) + Me.pnlbitnotedigger.Name = "pnlbitnotedigger" + Me.pnlbitnotedigger.Size = New System.Drawing.Size(369, 64) + Me.pnlbitnotedigger.TabIndex = 23 + ' + 'lblbitnotedigger + ' + Me.lblbitnotedigger.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblbitnotedigger.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotedigger.Location = New System.Drawing.Point(0, 0) + Me.lblbitnotedigger.Name = "lblbitnotedigger" + Me.lblbitnotedigger.Size = New System.Drawing.Size(177, 64) + Me.lblbitnotedigger.TabIndex = 3 + Me.lblbitnotedigger.Text = "Bitnote Digger" + Me.lblbitnotedigger.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarbitnotediggericon + ' + Me.pnltitlebarbitnotediggericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarbitnotediggericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarbitnotediggericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarbitnotediggericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarbitnotediggericon.Name = "pnltitlebarbitnotediggericon" + Me.pnltitlebarbitnotediggericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarbitnotediggericon.TabIndex = 2 + ' + 'pnlpanelbuttonbitnotediggericon + ' + Me.pnlpanelbuttonbitnotediggericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonbitnotediggericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonbitnotediggericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonbitnotediggericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonbitnotediggericon.Name = "pnlpanelbuttonbitnotediggericon" + Me.pnlpanelbuttonbitnotediggericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonbitnotediggericon.TabIndex = 1 + ' + 'pnllauncherbitnotediggericon + ' + Me.pnllauncherbitnotediggericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherbitnotediggericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherbitnotediggericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherbitnotediggericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherbitnotediggericon.Name = "pnllauncherbitnotediggericon" + Me.pnllauncherbitnotediggericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherbitnotediggericon.TabIndex = 0 + ' + 'Panel2 + ' + Me.Panel2.Controls.Add(Me.Panel3) + Me.Panel2.Controls.Add(Me.txtlaunchericonsize) + Me.Panel2.Controls.Add(Me.Label6) + Me.Panel2.Controls.Add(Me.txtpanelbuttoniconsize) + Me.Panel2.Controls.Add(Me.Label4) + Me.Panel2.Controls.Add(Me.txttitlebariconsize) + Me.Panel2.Controls.Add(Me.Label3) + Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel2.Location = New System.Drawing.Point(0, 594) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(1449, 37) + Me.Panel2.TabIndex = 4 + ' + 'Panel3 + ' + Me.Panel3.BackColor = System.Drawing.Color.Black + Me.Panel3.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel3.Location = New System.Drawing.Point(0, 0) + Me.Panel3.Name = "Panel3" + Me.Panel3.Size = New System.Drawing.Size(1449, 1) + Me.Panel3.TabIndex = 7 + ' + 'txtlaunchericonsize + ' + Me.txtlaunchericonsize.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.txtlaunchericonsize.BackColor = System.Drawing.Color.White + Me.txtlaunchericonsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtlaunchericonsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtlaunchericonsize.Location = New System.Drawing.Point(856, 8) + Me.txtlaunchericonsize.Multiline = True + Me.txtlaunchericonsize.Name = "txtlaunchericonsize" + Me.txtlaunchericonsize.Size = New System.Drawing.Size(23, 20) + Me.txtlaunchericonsize.TabIndex = 6 + Me.txtlaunchericonsize.Text = "34" + Me.txtlaunchericonsize.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label6 + ' + Me.Label6.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label6.AutoSize = True + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(787, 10) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(66, 16) + Me.Label6.TabIndex = 5 + Me.Label6.Text = "Launcher:" + ' + 'txtpanelbuttoniconsize + ' + Me.txtpanelbuttoniconsize.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.txtpanelbuttoniconsize.BackColor = System.Drawing.Color.White + Me.txtpanelbuttoniconsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttoniconsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttoniconsize.Location = New System.Drawing.Point(751, 8) + Me.txtpanelbuttoniconsize.Multiline = True + Me.txtpanelbuttoniconsize.Name = "txtpanelbuttoniconsize" + Me.txtpanelbuttoniconsize.Size = New System.Drawing.Size(23, 20) + Me.txtpanelbuttoniconsize.TabIndex = 3 + Me.txtpanelbuttoniconsize.Text = "34" + Me.txtpanelbuttoniconsize.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label4 + ' + Me.Label4.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(663, 10) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(86, 16) + Me.Label4.TabIndex = 2 + Me.Label4.Text = "Panel Button:" + ' + 'txttitlebariconsize + ' + Me.txttitlebariconsize.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.txttitlebariconsize.BackColor = System.Drawing.Color.White + Me.txttitlebariconsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttitlebariconsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttitlebariconsize.Location = New System.Drawing.Point(624, 8) + Me.txttitlebariconsize.Multiline = True + Me.txttitlebariconsize.Name = "txttitlebariconsize" + Me.txttitlebariconsize.Size = New System.Drawing.Size(23, 20) + Me.txttitlebariconsize.TabIndex = 1 + Me.txttitlebariconsize.Text = "34" + Me.txttitlebariconsize.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label3 + ' + Me.Label3.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(564, 10) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(57, 16) + Me.Label3.TabIndex = 0 + Me.Label3.Text = "Titlebar:" + ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.White + Me.Panel1.Controls.Add(Me.Panel5) + Me.Panel1.Controls.Add(Me.btnReset) + Me.Panel1.Controls.Add(Me.Button3) + Me.Panel1.Controls.Add(Me.btnSave) + Me.Panel1.Controls.Add(Me.btnApply) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel1.Location = New System.Drawing.Point(0, 631) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(1449, 41) + Me.Panel1.TabIndex = 3 + ' + 'Panel5 + ' + Me.Panel5.BackColor = System.Drawing.Color.Black + Me.Panel5.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel5.Location = New System.Drawing.Point(0, 0) + Me.Panel5.Name = "Panel5" + Me.Panel5.Size = New System.Drawing.Size(1449, 1) + Me.Panel5.TabIndex = 8 + ' + 'btnReset + ' + Me.btnReset.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnReset.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnReset.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnReset.Location = New System.Drawing.Point(528, 4) + Me.btnReset.Name = "btnReset" + Me.btnReset.Size = New System.Drawing.Size(95, 34) + Me.btnReset.TabIndex = 3 + Me.btnReset.Text = "Reset" + Me.btnReset.UseVisualStyleBackColor = True + ' + 'Button3 + ' + Me.Button3.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Button3.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button3.Location = New System.Drawing.Point(627, 4) + Me.Button3.Name = "Button3" + Me.Button3.Size = New System.Drawing.Size(95, 34) + Me.Button3.TabIndex = 2 + Me.Button3.Text = "Load" + Me.Button3.UseVisualStyleBackColor = True + ' + 'btnSave + ' + Me.btnSave.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnSave.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnSave.Location = New System.Drawing.Point(726, 4) + Me.btnSave.Name = "btnSave" + Me.btnSave.Size = New System.Drawing.Size(95, 34) + Me.btnSave.TabIndex = 1 + Me.btnSave.Text = "Save" + Me.btnSave.UseVisualStyleBackColor = True + ' + 'btnApply + ' + Me.btnApply.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnApply.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnApply.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnApply.Location = New System.Drawing.Point(825, 4) + Me.btnApply.Name = "btnApply" + Me.btnApply.Size = New System.Drawing.Size(95, 34) + Me.btnApply.TabIndex = 0 + Me.btnApply.Text = "Apply" + Me.btnApply.UseVisualStyleBackColor = True + ' + 'Panel4 + ' + Me.Panel4.Controls.Add(Me.Panel6) + Me.Panel4.Controls.Add(Me.Label1) + Me.Panel4.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel4.Location = New System.Drawing.Point(0, 0) + Me.Panel4.Name = "Panel4" + Me.Panel4.Size = New System.Drawing.Size(1449, 27) + Me.Panel4.TabIndex = 1 + ' + 'Panel6 + ' + Me.Panel6.BackColor = System.Drawing.Color.Black + Me.Panel6.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel6.Location = New System.Drawing.Point(0, 26) + Me.Panel6.Name = "Panel6" + Me.Panel6.Size = New System.Drawing.Size(1449, 1) + Me.Panel6.TabIndex = 9 + ' + 'Label1 + ' + Me.Label1.Dock = System.Windows.Forms.DockStyle.Fill + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(0, 0) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(1449, 27) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Program Name | Titlebar Icon | Panel Button Icon | Launcher Icon" + Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 674) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(1453, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlskinshifter + ' + Me.pnlskinshifter.Controls.Add(Me.lblskinshifter) + Me.pnlskinshifter.Controls.Add(Me.pnltitlebarskinshiftericon) + Me.pnlskinshifter.Controls.Add(Me.pnlpanelbuttonskinshiftericon) + Me.pnlskinshifter.Controls.Add(Me.pnllauncherskinshiftericon) + Me.pnlskinshifter.Location = New System.Drawing.Point(753, 493) + Me.pnlskinshifter.Name = "pnlskinshifter" + Me.pnlskinshifter.Size = New System.Drawing.Size(369, 64) + Me.pnlskinshifter.TabIndex = 24 + ' + 'lblskinshifter + ' + Me.lblskinshifter.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblskinshifter.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblskinshifter.Location = New System.Drawing.Point(0, 0) + Me.lblskinshifter.Name = "lblskinshifter" + Me.lblskinshifter.Size = New System.Drawing.Size(177, 64) + Me.lblskinshifter.TabIndex = 3 + Me.lblskinshifter.Text = "Skin Shifter" + Me.lblskinshifter.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarskinshiftericon + ' + Me.pnltitlebarskinshiftericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarskinshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarskinshiftericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarskinshiftericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarskinshiftericon.Name = "pnltitlebarskinshiftericon" + Me.pnltitlebarskinshiftericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarskinshiftericon.TabIndex = 2 + ' + 'pnlpanelbuttonskinshiftericon + ' + Me.pnlpanelbuttonskinshiftericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonskinshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonskinshiftericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonskinshiftericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonskinshiftericon.Name = "pnlpanelbuttonskinshiftericon" + Me.pnlpanelbuttonskinshiftericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonskinshiftericon.TabIndex = 1 + ' + 'pnllauncherskinshiftericon + ' + Me.pnllauncherskinshiftericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherskinshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherskinshiftericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherskinshiftericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherskinshiftericon.Name = "pnllauncherskinshiftericon" + Me.pnllauncherskinshiftericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherskinshiftericon.TabIndex = 0 + ' + 'pnlshiftnet + ' + Me.pnlshiftnet.Controls.Add(Me.lblshiftnet) + Me.pnlshiftnet.Controls.Add(Me.pnltitlebarshiftneticon) + Me.pnlshiftnet.Controls.Add(Me.pnlpanelbuttonshiftneticon) + Me.pnlshiftnet.Controls.Add(Me.pnllaunchershiftneticon) + Me.pnlshiftnet.Location = New System.Drawing.Point(3, 563) + Me.pnlshiftnet.Name = "pnlshiftnet" + Me.pnlshiftnet.Size = New System.Drawing.Size(369, 64) + Me.pnlshiftnet.TabIndex = 25 + ' + 'lblshiftnet + ' + Me.lblshiftnet.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblshiftnet.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftnet.Location = New System.Drawing.Point(0, 0) + Me.lblshiftnet.Name = "lblshiftnet" + Me.lblshiftnet.Size = New System.Drawing.Size(177, 64) + Me.lblshiftnet.TabIndex = 3 + Me.lblshiftnet.Text = "Shiftnet" + Me.lblshiftnet.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarshiftneticon + ' + Me.pnltitlebarshiftneticon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarshiftneticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarshiftneticon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarshiftneticon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarshiftneticon.Name = "pnltitlebarshiftneticon" + Me.pnltitlebarshiftneticon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarshiftneticon.TabIndex = 2 + ' + 'pnlpanelbuttonshiftneticon + ' + Me.pnlpanelbuttonshiftneticon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonshiftneticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonshiftneticon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonshiftneticon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonshiftneticon.Name = "pnlpanelbuttonshiftneticon" + Me.pnlpanelbuttonshiftneticon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonshiftneticon.TabIndex = 1 + ' + 'pnllaunchershiftneticon + ' + Me.pnllaunchershiftneticon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchershiftneticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchershiftneticon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchershiftneticon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchershiftneticon.Name = "pnllaunchershiftneticon" + Me.pnllaunchershiftneticon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchershiftneticon.TabIndex = 0 + ' + 'pnldodge + ' + Me.pnldodge.Controls.Add(Me.lbldodge) + Me.pnldodge.Controls.Add(Me.pnltitlebardodgeicon) + Me.pnldodge.Controls.Add(Me.pnlpanelbuttondodgeicon) + Me.pnldodge.Controls.Add(Me.pnllauncherdodgeicon) + Me.pnldodge.Location = New System.Drawing.Point(378, 563) + Me.pnldodge.Name = "pnldodge" + Me.pnldodge.Size = New System.Drawing.Size(369, 64) + Me.pnldodge.TabIndex = 26 + ' + 'lbldodge + ' + Me.lbldodge.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbldodge.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbldodge.Location = New System.Drawing.Point(0, 0) + Me.lbldodge.Name = "lbldodge" + Me.lbldodge.Size = New System.Drawing.Size(177, 64) + Me.lbldodge.TabIndex = 3 + Me.lbldodge.Text = "Dodge" + Me.lbldodge.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebardodgeicon + ' + Me.pnltitlebardodgeicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebardodgeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebardodgeicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebardodgeicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebardodgeicon.Name = "pnltitlebardodgeicon" + Me.pnltitlebardodgeicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebardodgeicon.TabIndex = 2 + ' + 'pnlpanelbuttondodgeicon + ' + Me.pnlpanelbuttondodgeicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttondodgeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttondodgeicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttondodgeicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttondodgeicon.Name = "pnlpanelbuttondodgeicon" + Me.pnlpanelbuttondodgeicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttondodgeicon.TabIndex = 1 + ' + 'pnllauncherdodgeicon + ' + Me.pnllauncherdodgeicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherdodgeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherdodgeicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherdodgeicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherdodgeicon.Name = "pnllauncherdodgeicon" + Me.pnllauncherdodgeicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherdodgeicon.TabIndex = 0 + ' + 'pnldownloadmanager + ' + Me.pnldownloadmanager.Controls.Add(Me.lbldownload) + Me.pnldownloadmanager.Controls.Add(Me.pnltitlebardownloadicon) + Me.pnldownloadmanager.Controls.Add(Me.pnlpanelbuttondownloadicon) + Me.pnldownloadmanager.Controls.Add(Me.pnllauncherdownloadicon) + Me.pnldownloadmanager.Location = New System.Drawing.Point(753, 563) + Me.pnldownloadmanager.Name = "pnldownloadmanager" + Me.pnldownloadmanager.Size = New System.Drawing.Size(369, 64) + Me.pnldownloadmanager.TabIndex = 27 + ' + 'lbldownload + ' + Me.lbldownload.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbldownload.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbldownload.Location = New System.Drawing.Point(0, 0) + Me.lbldownload.Name = "lbldownload" + Me.lbldownload.Size = New System.Drawing.Size(177, 64) + Me.lbldownload.TabIndex = 3 + Me.lbldownload.Text = "Download Manager" + Me.lbldownload.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebardownloadicon + ' + Me.pnltitlebardownloadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebardownloadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebardownloadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebardownloadicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebardownloadicon.Name = "pnltitlebardownloadicon" + Me.pnltitlebardownloadicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebardownloadicon.TabIndex = 2 + ' + 'pnlpanelbuttondownloadicon + ' + Me.pnlpanelbuttondownloadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttondownloadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttondownloadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttondownloadicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttondownloadicon.Name = "pnlpanelbuttondownloadicon" + Me.pnlpanelbuttondownloadicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttondownloadicon.TabIndex = 1 + ' + 'pnllauncherdownloadicon + ' + Me.pnllauncherdownloadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherdownloadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherdownloadicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherdownloadicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherdownloadicon.Name = "pnllauncherdownloadicon" + Me.pnllauncherdownloadicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherdownloadicon.TabIndex = 0 + ' + 'pnlinstaller + ' + Me.pnlinstaller.Controls.Add(Me.lblinstaller) + Me.pnlinstaller.Controls.Add(Me.pnltitlebarinstallericon) + Me.pnlinstaller.Controls.Add(Me.pnlpanelbuttoninstallericon) + Me.pnlinstaller.Controls.Add(Me.pnllauncherinstallericon) + Me.pnlinstaller.Location = New System.Drawing.Point(3, 633) + Me.pnlinstaller.Name = "pnlinstaller" + Me.pnlinstaller.Size = New System.Drawing.Size(369, 64) + Me.pnlinstaller.TabIndex = 28 + ' + 'lblinstaller + ' + Me.lblinstaller.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblinstaller.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblinstaller.Location = New System.Drawing.Point(0, 0) + Me.lblinstaller.Name = "lblinstaller" + Me.lblinstaller.Size = New System.Drawing.Size(177, 64) + Me.lblinstaller.TabIndex = 3 + Me.lblinstaller.Text = "Installer" + Me.lblinstaller.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarinstallericon + ' + Me.pnltitlebarinstallericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarinstallericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarinstallericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarinstallericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarinstallericon.Name = "pnltitlebarinstallericon" + Me.pnltitlebarinstallericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarinstallericon.TabIndex = 2 + ' + 'pnlpanelbuttoninstallericon + ' + Me.pnlpanelbuttoninstallericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttoninstallericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttoninstallericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttoninstallericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttoninstallericon.Name = "pnlpanelbuttoninstallericon" + Me.pnlpanelbuttoninstallericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttoninstallericon.TabIndex = 1 + ' + 'pnllauncherinstallericon + ' + Me.pnllauncherinstallericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherinstallericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherinstallericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherinstallericon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherinstallericon.Name = "pnllauncherinstallericon" + Me.pnllauncherinstallericon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherinstallericon.TabIndex = 0 + ' + 'pnlsysinfo + ' + Me.pnlsysinfo.Controls.Add(Me.lblsysinfo) + Me.pnlsysinfo.Controls.Add(Me.pnltitlebarsysinfoicon) + Me.pnlsysinfo.Controls.Add(Me.pnlpanelbuttonsysinfoicon) + Me.pnlsysinfo.Controls.Add(Me.pnllaunchersysinfoicon) + Me.pnlsysinfo.Location = New System.Drawing.Point(378, 633) + Me.pnlsysinfo.Name = "pnlsysinfo" + Me.pnlsysinfo.Size = New System.Drawing.Size(369, 64) + Me.pnlsysinfo.TabIndex = 29 + ' + 'lblsysinfo + ' + Me.lblsysinfo.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblsysinfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblsysinfo.Location = New System.Drawing.Point(0, 0) + Me.lblsysinfo.Name = "lblsysinfo" + Me.lblsysinfo.Size = New System.Drawing.Size(177, 64) + Me.lblsysinfo.TabIndex = 3 + Me.lblsysinfo.Text = "System Infomation" + Me.lblsysinfo.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarsysinfoicon + ' + Me.pnltitlebarsysinfoicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarsysinfoicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarsysinfoicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarsysinfoicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarsysinfoicon.Name = "pnltitlebarsysinfoicon" + Me.pnltitlebarsysinfoicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarsysinfoicon.TabIndex = 2 + ' + 'pnlpanelbuttonsysinfoicon + ' + Me.pnlpanelbuttonsysinfoicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonsysinfoicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonsysinfoicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonsysinfoicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonsysinfoicon.Name = "pnlpanelbuttonsysinfoicon" + Me.pnlpanelbuttonsysinfoicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonsysinfoicon.TabIndex = 1 + ' + 'pnllaunchersysinfoicon + ' + Me.pnllaunchersysinfoicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchersysinfoicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchersysinfoicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchersysinfoicon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchersysinfoicon.Name = "pnllaunchersysinfoicon" + Me.pnllaunchersysinfoicon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchersysinfoicon.TabIndex = 0 + ' + 'pnlorcwrite + ' + Me.pnlorcwrite.Controls.Add(Me.lblorcwrite) + Me.pnlorcwrite.Controls.Add(Me.pnltitlebarorcwriteicon) + Me.pnlorcwrite.Controls.Add(Me.pnlpanelbuttonorcwriteicon) + Me.pnlorcwrite.Controls.Add(Me.pnllauncherorcwriteicon) + Me.pnlorcwrite.Location = New System.Drawing.Point(753, 633) + Me.pnlorcwrite.Name = "pnlorcwrite" + Me.pnlorcwrite.Size = New System.Drawing.Size(369, 64) + Me.pnlorcwrite.TabIndex = 30 + ' + 'lblorcwrite + ' + Me.lblorcwrite.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblorcwrite.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblorcwrite.Location = New System.Drawing.Point(0, 0) + Me.lblorcwrite.Name = "lblorcwrite" + Me.lblorcwrite.Size = New System.Drawing.Size(177, 64) + Me.lblorcwrite.TabIndex = 3 + Me.lblorcwrite.Text = "OrcWrite" + Me.lblorcwrite.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarorcwriteicon + ' + Me.pnltitlebarorcwriteicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarorcwriteicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarorcwriteicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarorcwriteicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarorcwriteicon.Name = "pnltitlebarorcwriteicon" + Me.pnltitlebarorcwriteicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarorcwriteicon.TabIndex = 2 + ' + 'pnlpanelbuttonorcwriteicon + ' + Me.pnlpanelbuttonorcwriteicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonorcwriteicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonorcwriteicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonorcwriteicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonorcwriteicon.Name = "pnlpanelbuttonorcwriteicon" + Me.pnlpanelbuttonorcwriteicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonorcwriteicon.TabIndex = 1 + ' + 'pnllauncherorcwriteicon + ' + Me.pnllauncherorcwriteicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherorcwriteicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherorcwriteicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherorcwriteicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherorcwriteicon.Name = "pnllauncherorcwriteicon" + Me.pnllauncherorcwriteicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherorcwriteicon.TabIndex = 0 + ' + 'pnlfloodgate + ' + Me.pnlfloodgate.Controls.Add(Me.lblfloodgate) + Me.pnlfloodgate.Controls.Add(Me.pnltitlebarfloodgateicon) + Me.pnlfloodgate.Controls.Add(Me.pnlpanelbuttonfloodgateicon) + Me.pnlfloodgate.Controls.Add(Me.pnllauncherfloodgateicon) + Me.pnlfloodgate.Location = New System.Drawing.Point(3, 703) + Me.pnlfloodgate.Name = "pnlfloodgate" + Me.pnlfloodgate.Size = New System.Drawing.Size(369, 64) + Me.pnlfloodgate.TabIndex = 31 + ' + 'lblfloodgate + ' + Me.lblfloodgate.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblfloodgate.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblfloodgate.Location = New System.Drawing.Point(0, 0) + Me.lblfloodgate.Name = "lblfloodgate" + Me.lblfloodgate.Size = New System.Drawing.Size(177, 64) + Me.lblfloodgate.TabIndex = 3 + Me.lblfloodgate.Text = "Floodgate Manager" + Me.lblfloodgate.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarfloodgateicon + ' + Me.pnltitlebarfloodgateicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarfloodgateicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarfloodgateicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarfloodgateicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarfloodgateicon.Name = "pnltitlebarfloodgateicon" + Me.pnltitlebarfloodgateicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarfloodgateicon.TabIndex = 2 + ' + 'pnlpanelbuttonfloodgateicon + ' + Me.pnlpanelbuttonfloodgateicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonfloodgateicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonfloodgateicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonfloodgateicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonfloodgateicon.Name = "pnlpanelbuttonfloodgateicon" + Me.pnlpanelbuttonfloodgateicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonfloodgateicon.TabIndex = 1 + ' + 'pnllauncherfloodgateicon + ' + Me.pnllauncherfloodgateicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllauncherfloodgateicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllauncherfloodgateicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllauncherfloodgateicon.Location = New System.Drawing.Point(305, 0) + Me.pnllauncherfloodgateicon.Name = "pnllauncherfloodgateicon" + Me.pnllauncherfloodgateicon.Size = New System.Drawing.Size(64, 64) + Me.pnllauncherfloodgateicon.TabIndex = 0 + ' + 'pnlmaze + ' + Me.pnlmaze.Controls.Add(Me.lblmaze) + Me.pnlmaze.Controls.Add(Me.pnltitlebarmazeicon) + Me.pnlmaze.Controls.Add(Me.pnlpanelbuttonmazeicon) + Me.pnlmaze.Controls.Add(Me.pnllaunchermazeicon) + Me.pnlmaze.Location = New System.Drawing.Point(378, 703) + Me.pnlmaze.Name = "pnlmaze" + Me.pnlmaze.Size = New System.Drawing.Size(369, 64) + Me.pnlmaze.TabIndex = 32 + ' + 'lblmaze + ' + Me.lblmaze.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblmaze.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblmaze.Location = New System.Drawing.Point(0, 0) + Me.lblmaze.Name = "lblmaze" + Me.lblmaze.Size = New System.Drawing.Size(177, 64) + Me.lblmaze.TabIndex = 3 + Me.lblmaze.Text = "Labyrinth" + Me.lblmaze.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarmazeicon + ' + Me.pnltitlebarmazeicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarmazeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarmazeicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarmazeicon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarmazeicon.Name = "pnltitlebarmazeicon" + Me.pnltitlebarmazeicon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarmazeicon.TabIndex = 2 + ' + 'pnlpanelbuttonmazeicon + ' + Me.pnlpanelbuttonmazeicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonmazeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonmazeicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonmazeicon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonmazeicon.Name = "pnlpanelbuttonmazeicon" + Me.pnlpanelbuttonmazeicon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonmazeicon.TabIndex = 1 + ' + 'pnllaunchermazeicon + ' + Me.pnllaunchermazeicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchermazeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchermazeicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchermazeicon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchermazeicon.Name = "pnllaunchermazeicon" + Me.pnllaunchermazeicon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchermazeicon.TabIndex = 0 + ' + 'pnlvirusscanner + ' + Me.pnlvirusscanner.Controls.Add(Me.lblvirusscanner) + Me.pnlvirusscanner.Controls.Add(Me.pnltitlebarvirusscannericon) + Me.pnlvirusscanner.Controls.Add(Me.pnlpanelbuttonvirusscannericon) + Me.pnlvirusscanner.Controls.Add(Me.pnllaunchervirusscannericon) + Me.pnlvirusscanner.Location = New System.Drawing.Point(753, 703) + Me.pnlvirusscanner.Name = "pnlvirusscanner" + Me.pnlvirusscanner.Size = New System.Drawing.Size(369, 64) + Me.pnlvirusscanner.TabIndex = 33 + ' + 'lblvirusscanner + ' + Me.lblvirusscanner.Dock = System.Windows.Forms.DockStyle.Fill + Me.lblvirusscanner.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblvirusscanner.Location = New System.Drawing.Point(0, 0) + Me.lblvirusscanner.Name = "lblvirusscanner" + Me.lblvirusscanner.Size = New System.Drawing.Size(177, 64) + Me.lblvirusscanner.TabIndex = 3 + Me.lblvirusscanner.Text = "Virus Scanner" + Me.lblvirusscanner.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnltitlebarvirusscannericon + ' + Me.pnltitlebarvirusscannericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnltitlebarvirusscannericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnltitlebarvirusscannericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnltitlebarvirusscannericon.Location = New System.Drawing.Point(177, 0) + Me.pnltitlebarvirusscannericon.Name = "pnltitlebarvirusscannericon" + Me.pnltitlebarvirusscannericon.Size = New System.Drawing.Size(64, 64) + Me.pnltitlebarvirusscannericon.TabIndex = 2 + ' + 'pnlpanelbuttonvirusscannericon + ' + Me.pnlpanelbuttonvirusscannericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlpanelbuttonvirusscannericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlpanelbuttonvirusscannericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlpanelbuttonvirusscannericon.Location = New System.Drawing.Point(241, 0) + Me.pnlpanelbuttonvirusscannericon.Name = "pnlpanelbuttonvirusscannericon" + Me.pnlpanelbuttonvirusscannericon.Size = New System.Drawing.Size(64, 64) + Me.pnlpanelbuttonvirusscannericon.TabIndex = 1 + ' + 'pnllaunchervirusscannericon + ' + Me.pnllaunchervirusscannericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchervirusscannericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchervirusscannericon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchervirusscannericon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchervirusscannericon.Name = "pnllaunchervirusscannericon" + Me.pnllaunchervirusscannericon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchervirusscannericon.TabIndex = 0 + ' + 'Panel8 + ' + Me.Panel8.Controls.Add(Me.txtshutdownname) + Me.Panel8.Controls.Add(Me.pnllaunchershutdownicon) + Me.Panel8.Location = New System.Drawing.Point(3, 773) + Me.Panel8.Name = "Panel8" + Me.Panel8.Size = New System.Drawing.Size(369, 64) + Me.Panel8.TabIndex = 34 + ' + 'txtshutdownname + ' + Me.txtshutdownname.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtshutdownname.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtshutdownname.Location = New System.Drawing.Point(0, 0) + Me.txtshutdownname.Name = "txtshutdownname" + Me.txtshutdownname.Size = New System.Drawing.Size(305, 64) + Me.txtshutdownname.TabIndex = 3 + Me.txtshutdownname.Text = "Shutdown" + Me.txtshutdownname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pnllaunchershutdownicon + ' + Me.pnllaunchershutdownicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnllaunchershutdownicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnllaunchershutdownicon.Dock = System.Windows.Forms.DockStyle.Right + Me.pnllaunchershutdownicon.Location = New System.Drawing.Point(305, 0) + Me.pnllaunchershutdownicon.Name = "pnllaunchershutdownicon" + Me.pnllaunchershutdownicon.Size = New System.Drawing.Size(64, 64) + Me.pnllaunchershutdownicon.TabIndex = 0 + ' + 'Icon_Manager + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(1453, 704) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Icon_Manager" + Me.Text = "Icon_Manager" + Me.TopMost = True + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.FlowLayoutPanel1.ResumeLayout(False) + Me.pnlknowledgeinputicons.ResumeLayout(False) + Me.pnlshiftoriumicons.ResumeLayout(False) + Me.pnlclockicons.ResumeLayout(False) + Me.pnlshiftericons.ResumeLayout(False) + Me.pnlcolourpickericons.ResumeLayout(False) + Me.pnlinfoboxicons.ResumeLayout(False) + Me.pnlpongicons.ResumeLayout(False) + Me.pnlfileskimmericons.ResumeLayout(False) + Me.pnltextpadicons.ResumeLayout(False) + Me.pnlfileopenericons.ResumeLayout(False) + Me.pnlfilesavericons.ResumeLayout(False) + Me.pnlgraphicpickericons.ResumeLayout(False) + Me.pnlskinloadericons.ResumeLayout(False) + Me.pnlartpadicons.ResumeLayout(False) + Me.pnlcalculatoricons.ResumeLayout(False) + Me.pnlaudioplayericons.ResumeLayout(False) + Me.pnlwebbrowsericons.ResumeLayout(False) + Me.pnlvideoplayericons.ResumeLayout(False) + Me.pnlnamechangericons.ResumeLayout(False) + Me.pnliconmanagericons.ResumeLayout(False) + Me.Panel7.ResumeLayout(False) + Me.pnlbitnotewallet.ResumeLayout(False) + Me.pnlbitnotedigger.ResumeLayout(False) + Me.Panel2.ResumeLayout(False) + Me.Panel2.PerformLayout() + Me.Panel1.ResumeLayout(False) + Me.Panel4.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + Me.pnlskinshifter.ResumeLayout(False) + Me.pnlshiftnet.ResumeLayout(False) + Me.pnldodge.ResumeLayout(False) + Me.pnldownloadmanager.ResumeLayout(False) + Me.pnlinstaller.ResumeLayout(False) + Me.pnlsysinfo.ResumeLayout(False) + Me.pnlorcwrite.ResumeLayout(False) + Me.pnlfloodgate.ResumeLayout(False) + Me.pnlmaze.ResumeLayout(False) + Me.pnlvirusscanner.ResumeLayout(False) + Me.Panel8.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents Panel4 As System.Windows.Forms.Panel + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents Button3 As System.Windows.Forms.Button + Friend WithEvents btnSave As System.Windows.Forms.Button + Friend WithEvents btnApply As System.Windows.Forms.Button + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents txtlaunchericonsize As System.Windows.Forms.TextBox + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttoniconsize As System.Windows.Forms.TextBox + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents txttitlebariconsize As System.Windows.Forms.TextBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents btnReset As System.Windows.Forms.Button + Friend WithEvents Panel3 As System.Windows.Forms.Panel + Friend WithEvents Panel5 As System.Windows.Forms.Panel + Friend WithEvents Panel6 As System.Windows.Forms.Panel + Friend WithEvents FlowLayoutPanel1 As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents pnlknowledgeinputicons As System.Windows.Forms.Panel + Friend WithEvents txtknowledgeinputname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarknowledgeinputicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonknowledgeinputicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherknowledgeinputicon As System.Windows.Forms.Panel + Friend WithEvents pnlshiftoriumicons As System.Windows.Forms.Panel + Friend WithEvents txtshiftoriumname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarshiftoriumicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonshiftoriumicon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchershiftoriumicon As System.Windows.Forms.Panel + Friend WithEvents pnlclockicons As System.Windows.Forms.Panel + Friend WithEvents txtclockname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarclockicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonclockicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherclockicon As System.Windows.Forms.Panel + Friend WithEvents pnlshiftericons As System.Windows.Forms.Panel + Friend WithEvents txtshiftername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarshiftericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonshiftericon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchershiftericon As System.Windows.Forms.Panel + Friend WithEvents pnlcolourpickericons As System.Windows.Forms.Panel + Friend WithEvents txtcolourpickername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarcolourpickericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttoncolourpickericon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchercolourpickericon As System.Windows.Forms.Panel + Friend WithEvents pnlinfoboxicons As System.Windows.Forms.Panel + Friend WithEvents txtinfoboxname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarinfoboxicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttoninfoboxicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherinfoboxicon As System.Windows.Forms.Panel + Friend WithEvents pnlpongicons As System.Windows.Forms.Panel + Friend WithEvents txtpongname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarpongicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonpongicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherpongicon As System.Windows.Forms.Panel + Friend WithEvents pnlfileskimmericons As System.Windows.Forms.Panel + Friend WithEvents txtfileskimmername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarfileskimmericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonfileskimmericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherfileskimmericon As System.Windows.Forms.Panel + Friend WithEvents pnltextpadicons As System.Windows.Forms.Panel + Friend WithEvents txttextpadname As System.Windows.Forms.Label + Friend WithEvents pnltitlebartextpadicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttontextpadicon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchertextpadicon As System.Windows.Forms.Panel + Friend WithEvents pnlfileopenericons As System.Windows.Forms.Panel + Friend WithEvents txtfileopenername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarfileopenericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonfileopenericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherfileopenericon As System.Windows.Forms.Panel + Friend WithEvents pnlfilesavericons As System.Windows.Forms.Panel + Friend WithEvents txtfilesavername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarfilesavericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonfilesavericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherfilesavericon As System.Windows.Forms.Panel + Friend WithEvents pnlgraphicpickericons As System.Windows.Forms.Panel + Friend WithEvents txtgraphicpickername As System.Windows.Forms.Label + Friend WithEvents pnltitlebargraphicpickericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttongraphicpickericon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchergraphicpickericon As System.Windows.Forms.Panel + Friend WithEvents pnlskinloadericons As System.Windows.Forms.Panel + Friend WithEvents txtskinloadername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarskinloadericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonskinloadericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherskinloadericon As System.Windows.Forms.Panel + Friend WithEvents pnlartpadicons As System.Windows.Forms.Panel + Friend WithEvents txtartpadname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarartpadicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonartpadicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherartpadicon As System.Windows.Forms.Panel + Friend WithEvents pnlcalculatoricons As System.Windows.Forms.Panel + Friend WithEvents txtcalculatorname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarcalculatoricon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttoncalculatoricon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchercalculatoricon As System.Windows.Forms.Panel + Friend WithEvents pnlaudioplayericons As System.Windows.Forms.Panel + Friend WithEvents txtaudioplayername As System.Windows.Forms.Label + Friend WithEvents pnltitlebaraudioplayericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonaudioplayericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncheraudioplayericon As System.Windows.Forms.Panel + Friend WithEvents pnlwebbrowsericons As System.Windows.Forms.Panel + Friend WithEvents txtwebbrowsername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarwebbrowsericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonwebbrowsericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherwebbrowsericon As System.Windows.Forms.Panel + Friend WithEvents pnlvideoplayericons As System.Windows.Forms.Panel + Friend WithEvents txtvideoplayername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarvideoplayericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonvideoplayericon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchervideoplayericon As System.Windows.Forms.Panel + Friend WithEvents pnlnamechangericons As System.Windows.Forms.Panel + Friend WithEvents txtnamechangername As System.Windows.Forms.Label + Friend WithEvents pnltitlebarnamechangericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonnamechangericon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchernamechangericon As System.Windows.Forms.Panel + Friend WithEvents pnliconmanagericons As System.Windows.Forms.Panel + Friend WithEvents txticonmanagername As System.Windows.Forms.Label + Friend WithEvents pnltitlebariconmanagericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttoniconmanagericon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchericonmanagericon As System.Windows.Forms.Panel + Friend WithEvents Panel7 As System.Windows.Forms.Panel + Friend WithEvents txtterminalname As System.Windows.Forms.Label + Friend WithEvents pnltitlebarterminalicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonterminalicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherterminalicon As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotewallet As System.Windows.Forms.Panel + Friend WithEvents lblbitnotewallet As System.Windows.Forms.Label + Friend WithEvents pnltitlebarbitnotewalleticon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonbitnotewalleticon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherbitnotewalleticon As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotedigger As System.Windows.Forms.Panel + Friend WithEvents lblbitnotedigger As System.Windows.Forms.Label + Friend WithEvents pnltitlebarbitnotediggericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonbitnotediggericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherbitnotediggericon As System.Windows.Forms.Panel + Friend WithEvents pnlskinshifter As System.Windows.Forms.Panel + Friend WithEvents lblskinshifter As System.Windows.Forms.Label + Friend WithEvents pnltitlebarskinshiftericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonskinshiftericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherskinshiftericon As System.Windows.Forms.Panel + Friend WithEvents pnlshiftnet As System.Windows.Forms.Panel + Friend WithEvents lblshiftnet As System.Windows.Forms.Label + Friend WithEvents pnltitlebarshiftneticon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonshiftneticon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchershiftneticon As System.Windows.Forms.Panel + Friend WithEvents pnldodge As System.Windows.Forms.Panel + Friend WithEvents lbldodge As System.Windows.Forms.Label + Friend WithEvents pnltitlebardodgeicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttondodgeicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherdodgeicon As System.Windows.Forms.Panel + Friend WithEvents pnldownloadmanager As System.Windows.Forms.Panel + Friend WithEvents lbldownload As System.Windows.Forms.Label + Friend WithEvents pnltitlebardownloadicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttondownloadicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherdownloadicon As System.Windows.Forms.Panel + Friend WithEvents pnlinstaller As System.Windows.Forms.Panel + Friend WithEvents lblinstaller As System.Windows.Forms.Label + Friend WithEvents pnltitlebarinstallericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttoninstallericon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherinstallericon As System.Windows.Forms.Panel + Friend WithEvents pnlsysinfo As System.Windows.Forms.Panel + Friend WithEvents lblsysinfo As System.Windows.Forms.Label + Friend WithEvents pnltitlebarsysinfoicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonsysinfoicon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchersysinfoicon As System.Windows.Forms.Panel + Friend WithEvents pnlorcwrite As System.Windows.Forms.Panel + Friend WithEvents lblorcwrite As System.Windows.Forms.Label + Friend WithEvents pnltitlebarorcwriteicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonorcwriteicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherorcwriteicon As System.Windows.Forms.Panel + Friend WithEvents pnlfloodgate As System.Windows.Forms.Panel + Friend WithEvents lblfloodgate As System.Windows.Forms.Label + Friend WithEvents pnltitlebarfloodgateicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonfloodgateicon As System.Windows.Forms.Panel + Friend WithEvents pnllauncherfloodgateicon As System.Windows.Forms.Panel + Friend WithEvents pnlmaze As System.Windows.Forms.Panel + Friend WithEvents lblmaze As System.Windows.Forms.Label + Friend WithEvents pnltitlebarmazeicon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonmazeicon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchermazeicon As System.Windows.Forms.Panel + Friend WithEvents pnlvirusscanner As System.Windows.Forms.Panel + Friend WithEvents lblvirusscanner As System.Windows.Forms.Label + Friend WithEvents pnltitlebarvirusscannericon As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonvirusscannericon As System.Windows.Forms.Panel + Friend WithEvents pnllaunchervirusscannericon As System.Windows.Forms.Panel + Friend WithEvents Panel8 As System.Windows.Forms.Panel + Friend WithEvents txtshutdownname As System.Windows.Forms.Label + Friend WithEvents pnllaunchershutdownicon As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Icon Manager.resx b/ShiftOS/Icon Manager.resx new file mode 100644 index 0000000..ff4c820 --- /dev/null +++ b/ShiftOS/Icon Manager.resx @@ -0,0 +1,129 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 1347, 18 + + + 1441, 18 + + + 1525, 18 + + \ No newline at end of file diff --git a/ShiftOS/Icon Manager.vb b/ShiftOS/Icon Manager.vb new file mode 100644 index 0000000..82e81a3 --- /dev/null +++ b/ShiftOS/Icon Manager.vb @@ -0,0 +1,1208 @@ +Public Class Icon_Manager + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 400 'replace with minimum size + Public minimumsizeheight As Integer = 500 'replace with minimum size + Public ShiftOSPath As String = "C:\ShiftOS" + + Public openedfilelocation As String + Public icontochange As Object + Public over64 As Boolean = False + Public needtosetupdesktop As Boolean = False + Public savelines(50) As String + Public unsavedchanges As Boolean = False + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + loadsettings() + Me.Size = New Size(400, 500) + If ShiftOSDesktop.IconManagerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttoniconmanager.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoniconmanager, ShiftOSDesktop.tbiconmanagericon, ShiftOSDesktop.tbiconmanagertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(400, 500) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + Me.Size = New Size((Me.Size.Width - (2 * oldbordersize)) + (2 * Skins.borderwidth), (Me.Size.Width - oldbordersize - oldtitlebarheight) + Skins.borderwidth + Skins.titlebarheight) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.iconmanagername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.iconmanagericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Function GetImage(ByVal fileName As String) As Bitmap + Dim ret As Bitmap + Using img As Image = Image.FromFile(fileName) + ret = New Bitmap(img) + End Using + If ret.Width > 64 Then over64 = True + Return ret + End Function + + Public Sub loadsettings() + txttitlebariconsize.Text = ShiftOSDesktop.panelbuttoniconsize + txtpanelbuttoniconsize.Text = ShiftOSDesktop.panelbuttoniconsize + txtlaunchericonsize.Text = ShiftOSDesktop.launchericonsize + + pnltitlebarknowledgeinputicon.BackgroundImage = ShiftOSDesktop.knowledgeinputicontitlebar.Clone + pnlpanelbuttonknowledgeinputicon.BackgroundImage = ShiftOSDesktop.knowledgeinputiconpanelbutton.Clone + pnllauncherknowledgeinputicon.BackgroundImage = ShiftOSDesktop.knowledgeinputiconlauncher.Clone + + pnltitlebarshiftoriumicon.BackgroundImage = ShiftOSDesktop.shiftoriumicontitlebar.Clone + pnlpanelbuttonshiftoriumicon.BackgroundImage = ShiftOSDesktop.shiftoriumiconpanelbutton.Clone + pnllaunchershiftoriumicon.BackgroundImage = ShiftOSDesktop.shiftoriumiconlauncher.Clone + + pnltitlebarclockicon.BackgroundImage = ShiftOSDesktop.clockicontitlebar.Clone + pnlpanelbuttonclockicon.BackgroundImage = ShiftOSDesktop.clockiconpanelbutton.Clone + pnllauncherclockicon.BackgroundImage = ShiftOSDesktop.clockiconlauncher.Clone + + pnltitlebarshiftericon.BackgroundImage = ShiftOSDesktop.shiftericontitlebar.Clone + pnlpanelbuttonshiftericon.BackgroundImage = ShiftOSDesktop.shiftericonpanelbutton.Clone + pnllaunchershiftericon.BackgroundImage = ShiftOSDesktop.shiftericonlauncher.Clone + + pnltitlebarcolourpickericon.BackgroundImage = ShiftOSDesktop.colourpickericontitlebar.Clone + pnlpanelbuttoncolourpickericon.BackgroundImage = ShiftOSDesktop.colourpickericonpanelbutton.Clone + pnllaunchercolourpickericon.BackgroundImage = ShiftOSDesktop.colourpickericonlauncher.Clone + + pnltitlebarinfoboxicon.BackgroundImage = ShiftOSDesktop.infoboxicontitlebar.Clone + pnlpanelbuttoninfoboxicon.BackgroundImage = ShiftOSDesktop.infoboxiconpanelbutton.Clone + pnllauncherinfoboxicon.BackgroundImage = ShiftOSDesktop.infoboxiconlauncher.Clone + + pnltitlebarpongicon.BackgroundImage = ShiftOSDesktop.pongicontitlebar.Clone + pnlpanelbuttonpongicon.BackgroundImage = ShiftOSDesktop.pongiconpanelbutton.Clone + pnllauncherpongicon.BackgroundImage = ShiftOSDesktop.pongiconlauncher.Clone + + pnltitlebarfileskimmericon.BackgroundImage = ShiftOSDesktop.fileskimmericontitlebar.Clone + pnlpanelbuttonfileskimmericon.BackgroundImage = ShiftOSDesktop.fileskimmericonpanelbutton.Clone + pnllauncherfileskimmericon.BackgroundImage = ShiftOSDesktop.fileskimmericonlauncher.Clone + + pnltitlebartextpadicon.BackgroundImage = ShiftOSDesktop.textpadicontitlebar.Clone + pnlpanelbuttontextpadicon.BackgroundImage = ShiftOSDesktop.textpadiconpanelbutton.Clone + pnllaunchertextpadicon.BackgroundImage = ShiftOSDesktop.textpadiconlauncher.Clone + + pnltitlebarfileopenericon.BackgroundImage = ShiftOSDesktop.fileopenericontitlebar.Clone + pnlpanelbuttonfileopenericon.BackgroundImage = ShiftOSDesktop.fileopenericonpanelbutton.Clone + pnllauncherfileopenericon.BackgroundImage = ShiftOSDesktop.fileopenericonlauncher.Clone + + pnltitlebarfilesavericon.BackgroundImage = ShiftOSDesktop.filesavericontitlebar.Clone + pnlpanelbuttonfilesavericon.BackgroundImage = ShiftOSDesktop.filesavericonpanelbutton.Clone + pnllauncherfilesavericon.BackgroundImage = ShiftOSDesktop.filesavericonlauncher.Clone + + pnltitlebargraphicpickericon.BackgroundImage = ShiftOSDesktop.graphicpickericontitlebar.Clone + pnlpanelbuttongraphicpickericon.BackgroundImage = ShiftOSDesktop.graphicpickericonpanelbutton.Clone + pnllaunchergraphicpickericon.BackgroundImage = ShiftOSDesktop.graphicpickericonlauncher.Clone + + pnltitlebarskinloadericon.BackgroundImage = ShiftOSDesktop.skinloadericontitlebar.Clone + pnlpanelbuttonskinloadericon.BackgroundImage = ShiftOSDesktop.skinloadericonpanelbutton.Clone + pnllauncherskinloadericon.BackgroundImage = ShiftOSDesktop.skinloadericonlauncher.Clone + + pnltitlebarartpadicon.BackgroundImage = ShiftOSDesktop.artpadicontitlebar.Clone + pnlpanelbuttonartpadicon.BackgroundImage = ShiftOSDesktop.artpadiconpanelbutton.Clone + pnllauncherartpadicon.BackgroundImage = ShiftOSDesktop.artpadiconlauncher.Clone + + pnltitlebarcalculatoricon.BackgroundImage = ShiftOSDesktop.calculatoricontitlebar.Clone + pnlpanelbuttoncalculatoricon.BackgroundImage = ShiftOSDesktop.calculatoriconpanelbutton.Clone + pnllaunchercalculatoricon.BackgroundImage = ShiftOSDesktop.calculatoriconlauncher.Clone + + pnltitlebaraudioplayericon.BackgroundImage = ShiftOSDesktop.audioplayericontitlebar.Clone + pnlpanelbuttonaudioplayericon.BackgroundImage = ShiftOSDesktop.audioplayericonpanelbutton.Clone + pnllauncheraudioplayericon.BackgroundImage = ShiftOSDesktop.audioplayericonlauncher.Clone + + pnltitlebarwebbrowsericon.BackgroundImage = ShiftOSDesktop.webbrowsericontitlebar.Clone + pnlpanelbuttonwebbrowsericon.BackgroundImage = ShiftOSDesktop.webbrowsericonpanelbutton.Clone + pnllauncherwebbrowsericon.BackgroundImage = ShiftOSDesktop.webbrowsericonlauncher.Clone + + pnltitlebarvideoplayericon.BackgroundImage = ShiftOSDesktop.videoplayericontitlebar.Clone + pnlpanelbuttonvideoplayericon.BackgroundImage = ShiftOSDesktop.videoplayericonpanelbutton.Clone + pnllaunchervideoplayericon.BackgroundImage = ShiftOSDesktop.videoplayericonlauncher.Clone + + pnltitlebarnamechangericon.BackgroundImage = ShiftOSDesktop.namechangericontitlebar.Clone + pnlpanelbuttonnamechangericon.BackgroundImage = ShiftOSDesktop.namechangericonpanelbutton.Clone + pnllaunchernamechangericon.BackgroundImage = ShiftOSDesktop.namechangericonlauncher.Clone + + pnltitlebariconmanagericon.BackgroundImage = ShiftOSDesktop.iconmanagericontitlebar.Clone + pnlpanelbuttoniconmanagericon.BackgroundImage = ShiftOSDesktop.iconmanagericonpanelbutton.Clone + pnllaunchericonmanagericon.BackgroundImage = ShiftOSDesktop.iconmanagericonlauncher.Clone + + pnltitlebarterminalicon.BackgroundImage = ShiftOSDesktop.terminalicontitlebar.Clone + pnlpanelbuttonterminalicon.BackgroundImage = ShiftOSDesktop.terminaliconpanelbutton.Clone + pnllauncherterminalicon.BackgroundImage = ShiftOSDesktop.terminaliconlauncher.Clone + + pnltitlebarbitnotewalleticon.BackgroundImage = ShiftOSDesktop.bitnotewalleticontitlebar.Clone + pnlpanelbuttonbitnotewalleticon.BackgroundImage = ShiftOSDesktop.bitnotewalleticonpanelbutton.Clone + pnllauncherbitnotewalleticon.BackgroundImage = ShiftOSDesktop.bitnotewalleticonlauncher.Clone + + pnltitlebarbitnotediggericon.BackgroundImage = ShiftOSDesktop.bitnotediggericontitlebar.Clone + pnlpanelbuttonbitnotediggericon.BackgroundImage = ShiftOSDesktop.bitnotediggericonpanelbutton.Clone + pnllauncherbitnotediggericon.BackgroundImage = ShiftOSDesktop.bitnotediggericonlauncher.Clone + + pnltitlebarskinshiftericon.BackgroundImage = ShiftOSDesktop.skinshiftericontitlebar.Clone + pnlpanelbuttonskinshiftericon.BackgroundImage = ShiftOSDesktop.skinshiftericonpanelbutton.Clone + pnllauncherskinshiftericon.BackgroundImage = ShiftOSDesktop.skinshiftericonlauncher.Clone + + pnltitlebarshiftneticon.BackgroundImage = ShiftOSDesktop.shiftneticontitlebar.Clone + pnlpanelbuttonshiftneticon.BackgroundImage = ShiftOSDesktop.shiftneticonpanelbutton.Clone + pnllaunchershiftneticon.BackgroundImage = ShiftOSDesktop.shiftneticonlauncher.Clone + + pnltitlebardodgeicon.BackgroundImage = ShiftOSDesktop.dodgeicontitlebar.Clone + pnlpanelbuttondodgeicon.BackgroundImage = ShiftOSDesktop.dodgeiconpanelbutton.Clone + pnllauncherdodgeicon.BackgroundImage = ShiftOSDesktop.dodgeiconlauncher.Clone + + pnltitlebardownloadicon.BackgroundImage = ShiftOSDesktop.downloadmanagericontitlebar.Clone + pnlpanelbuttondownloadicon.BackgroundImage = ShiftOSDesktop.downloadmanagericonpanelbutton.Clone + pnllauncherdownloadicon.BackgroundImage = ShiftOSDesktop.downloadmanagericonlauncher.Clone + + pnltitlebarinstallericon.BackgroundImage = ShiftOSDesktop.installericontitlebar.Clone + pnlpanelbuttoninstallericon.BackgroundImage = ShiftOSDesktop.installericonpanelbutton.Clone + pnllauncherinstallericon.BackgroundImage = ShiftOSDesktop.installericonlauncher.Clone + + pnltitlebarsysinfoicon.BackgroundImage = ShiftOSDesktop.sysinfoicontitlebar.Clone + pnlpanelbuttonsysinfoicon.BackgroundImage = ShiftOSDesktop.sysinfoiconpanelbutton.Clone + pnllaunchersysinfoicon.BackgroundImage = ShiftOSDesktop.sysinfoiconlauncher.Clone + + pnltitlebarorcwriteicon.BackgroundImage = ShiftOSDesktop.orcwriteicontitlebar.Clone + pnlpanelbuttonorcwriteicon.BackgroundImage = ShiftOSDesktop.orcwriteiconpanelbutton.Clone + pnllauncherorcwriteicon.BackgroundImage = ShiftOSDesktop.orcwriteiconlauncher.Clone + + pnltitlebarfloodgateicon.BackgroundImage = ShiftOSDesktop.floodgateicontitlebar.Clone + pnlpanelbuttonfloodgateicon.BackgroundImage = ShiftOSDesktop.floodgateiconpanelbutton.Clone + pnllauncherfloodgateicon.BackgroundImage = ShiftOSDesktop.floodgateiconlauncher.Clone + + pnltitlebarmazeicon.BackgroundImage = ShiftOSDesktop.mazeicontitlebar.Clone + pnlpanelbuttonmazeicon.BackgroundImage = ShiftOSDesktop.mazeiconpanelbutton.Clone + pnllaunchermazeicon.BackgroundImage = ShiftOSDesktop.mazeiconlauncher.Clone + + pnltitlebarvirusscannericon.BackgroundImage = ShiftOSDesktop.virusscannericontitlebar.Clone + pnlpanelbuttonvirusscannericon.BackgroundImage = ShiftOSDesktop.virusscannericonpanelbutton.Clone + pnllaunchervirusscannericon.BackgroundImage = ShiftOSDesktop.virusscannericonlauncher.Clone + + pnllaunchershutdownicon.BackgroundImage = ShiftOSDesktop.shutdowniconlauncher.Clone + + txtknowledgeinputname.Text = ShiftOSDesktop.knowledgeinputname + txtshiftoriumname.Text = ShiftOSDesktop.shiftoriumname + txtclockname.Text = ShiftOSDesktop.clockname + txtshiftername.Text = ShiftOSDesktop.shiftername + txtcolourpickername.Text = ShiftOSDesktop.colourpickername + txtpongname.Text = ShiftOSDesktop.pongname + txtfileskimmername.Text = ShiftOSDesktop.fileskimmername + txtfileopenername.Text = ShiftOSDesktop.fileopenername + txtfilesavername.Text = ShiftOSDesktop.filesavername + txttextpadname.Text = ShiftOSDesktop.textpadname + txtgraphicpickername.Text = ShiftOSDesktop.graphicpickername + txtskinloadername.Text = ShiftOSDesktop.skinloadername + txtartpadname.Text = ShiftOSDesktop.artpadname + txtcalculatorname.Text = ShiftOSDesktop.calculatorname + txtaudioplayername.Text = ShiftOSDesktop.audioplayername + txtwebbrowsername.Text = ShiftOSDesktop.webbrowsername + txtvideoplayername.Text = ShiftOSDesktop.videoplayername + txtnamechangername.Text = ShiftOSDesktop.namechangername + txticonmanagername.Text = ShiftOSDesktop.iconmanagername + txtterminalname.Text = ShiftOSDesktop.terminalname + + lblbitnotewallet.Text = ShiftOSDesktop.bitnotewalletname + lblbitnotedigger.Text = ShiftOSDesktop.bitnotediggername + lblskinshifter.Text = ShiftOSDesktop.skinshiftername + lblshiftnet.Text = ShiftOSDesktop.shiftnetname + lbldodge.Text = ShiftOSDesktop.dodgename + lbldownload.Text = ShiftOSDesktop.downloadmanagername + lblinstaller.Text = ShiftOSDesktop.installername + lblsysinfo.Text = ShiftOSDesktop.sysinfoname + lblorcwrite.Text = ShiftOSDesktop.orcwritename + lblfloodgate.Text = ShiftOSDesktop.floodgatename + lblmaze.Text = ShiftOSDesktop.mazename + lblvirusscanner.Text = ShiftOSDesktop.virusscannername + + checkbackgroundimagesize() + + If needtosetupdesktop = True Then + 'ShiftOSDesktop.setupalltitlebars() + 'ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setupdesktop() + needtosetupdesktop = False + End If + + unsavedchanges = False + End Sub + + Private Sub btnApply_Click(sender As Object, e As EventArgs) Handles btnApply.Click + + unsavedchanges = False + + ShiftOSDesktop.titlebariconsize = txttitlebariconsize.Text + ShiftOSDesktop.panelbuttoniconsize = txtpanelbuttoniconsize.Text + ShiftOSDesktop.launchericonsize = txtlaunchericonsize.Text + + ShiftOSDesktop.knowledgeinputicontitlebar = pnltitlebarknowledgeinputicon.BackgroundImage.Clone + ShiftOSDesktop.knowledgeinputiconpanelbutton = pnlpanelbuttonknowledgeinputicon.BackgroundImage.Clone + ShiftOSDesktop.knowledgeinputiconlauncher = pnllauncherknowledgeinputicon.BackgroundImage.Clone + + ShiftOSDesktop.shiftoriumicontitlebar = pnltitlebarshiftoriumicon.BackgroundImage.Clone + ShiftOSDesktop.shiftoriumiconpanelbutton = pnlpanelbuttonshiftoriumicon.BackgroundImage.Clone + ShiftOSDesktop.shiftoriumiconlauncher = pnllaunchershiftoriumicon.BackgroundImage.Clone + + ShiftOSDesktop.clockicontitlebar = pnltitlebarclockicon.BackgroundImage.Clone + ShiftOSDesktop.clockiconpanelbutton = pnlpanelbuttonclockicon.BackgroundImage.Clone + ShiftOSDesktop.clockiconlauncher = pnllauncherclockicon.BackgroundImage.Clone + + ShiftOSDesktop.shiftericontitlebar = pnltitlebarshiftericon.BackgroundImage.Clone + ShiftOSDesktop.shiftericonpanelbutton = pnlpanelbuttonshiftericon.BackgroundImage.Clone + ShiftOSDesktop.shiftericonlauncher = pnllaunchershiftericon.BackgroundImage.Clone + + ShiftOSDesktop.colourpickericontitlebar = pnltitlebarcolourpickericon.BackgroundImage.Clone + ShiftOSDesktop.colourpickericonpanelbutton = pnlpanelbuttoncolourpickericon.BackgroundImage.Clone + ShiftOSDesktop.colourpickericonlauncher = pnllaunchercolourpickericon.BackgroundImage.Clone + + ShiftOSDesktop.infoboxicontitlebar = pnltitlebarinfoboxicon.BackgroundImage.Clone + ShiftOSDesktop.infoboxiconpanelbutton = pnlpanelbuttoninfoboxicon.BackgroundImage.Clone + ShiftOSDesktop.infoboxiconlauncher = pnllauncherinfoboxicon.BackgroundImage.Clone + + ShiftOSDesktop.pongicontitlebar = pnltitlebarpongicon.BackgroundImage.Clone + ShiftOSDesktop.pongiconpanelbutton = pnlpanelbuttonpongicon.BackgroundImage.Clone + ShiftOSDesktop.pongiconlauncher = pnllauncherpongicon.BackgroundImage.Clone + + ShiftOSDesktop.fileskimmericontitlebar = pnltitlebarfileskimmericon.BackgroundImage.Clone + ShiftOSDesktop.fileskimmericonpanelbutton = pnlpanelbuttonfileskimmericon.BackgroundImage.Clone + ShiftOSDesktop.fileskimmericonlauncher = pnllauncherfileskimmericon.BackgroundImage.Clone + + ShiftOSDesktop.textpadicontitlebar = pnltitlebartextpadicon.BackgroundImage.Clone + ShiftOSDesktop.textpadiconpanelbutton = pnlpanelbuttontextpadicon.BackgroundImage.Clone + ShiftOSDesktop.textpadiconlauncher = pnllaunchertextpadicon.BackgroundImage.Clone + + ShiftOSDesktop.fileopenericontitlebar = pnltitlebarfileopenericon.BackgroundImage.Clone + ShiftOSDesktop.fileopenericonpanelbutton = pnlpanelbuttonfileopenericon.BackgroundImage.Clone + ShiftOSDesktop.fileopenericonlauncher = pnllauncherfileopenericon.BackgroundImage.Clone + + ShiftOSDesktop.filesavericontitlebar = pnltitlebarfilesavericon.BackgroundImage.Clone + ShiftOSDesktop.filesavericonpanelbutton = pnlpanelbuttonfilesavericon.BackgroundImage.Clone + ShiftOSDesktop.filesavericonlauncher = pnllauncherfilesavericon.BackgroundImage.Clone + + ShiftOSDesktop.graphicpickericontitlebar = pnltitlebargraphicpickericon.BackgroundImage.Clone + ShiftOSDesktop.graphicpickericonpanelbutton = pnlpanelbuttongraphicpickericon.BackgroundImage.Clone + ShiftOSDesktop.graphicpickericonlauncher = pnllaunchergraphicpickericon.BackgroundImage.Clone + + ShiftOSDesktop.skinloadericontitlebar = pnltitlebarskinloadericon.BackgroundImage.Clone + ShiftOSDesktop.skinloadericonpanelbutton = pnlpanelbuttonskinloadericon.BackgroundImage.Clone + ShiftOSDesktop.skinloadericonlauncher = pnllauncherskinloadericon.BackgroundImage.Clone + + ShiftOSDesktop.artpadicontitlebar = pnltitlebarartpadicon.BackgroundImage.Clone + ShiftOSDesktop.artpadiconpanelbutton = pnlpanelbuttonartpadicon.BackgroundImage.Clone + ShiftOSDesktop.artpadiconlauncher = pnllauncherartpadicon.BackgroundImage.Clone + + ShiftOSDesktop.calculatoricontitlebar = pnltitlebarcalculatoricon.BackgroundImage.Clone + ShiftOSDesktop.calculatoriconpanelbutton = pnlpanelbuttoncalculatoricon.BackgroundImage.Clone + ShiftOSDesktop.calculatoriconlauncher = pnllaunchercalculatoricon.BackgroundImage.Clone + + ShiftOSDesktop.audioplayericontitlebar = pnltitlebaraudioplayericon.BackgroundImage.Clone + ShiftOSDesktop.audioplayericonpanelbutton = pnlpanelbuttonaudioplayericon.BackgroundImage.Clone + ShiftOSDesktop.audioplayericonlauncher = pnllauncheraudioplayericon.BackgroundImage.Clone + + ShiftOSDesktop.webbrowsericontitlebar = pnltitlebarwebbrowsericon.BackgroundImage.Clone + ShiftOSDesktop.webbrowsericonpanelbutton = pnlpanelbuttonwebbrowsericon.BackgroundImage.Clone + ShiftOSDesktop.webbrowsericonlauncher = pnllauncherwebbrowsericon.BackgroundImage.Clone + + ShiftOSDesktop.videoplayericontitlebar = pnltitlebarvideoplayericon.BackgroundImage.Clone + ShiftOSDesktop.videoplayericonpanelbutton = pnlpanelbuttonvideoplayericon.BackgroundImage.Clone + ShiftOSDesktop.videoplayericonlauncher = pnllaunchervideoplayericon.BackgroundImage.Clone + + ShiftOSDesktop.namechangericontitlebar = pnltitlebarnamechangericon.BackgroundImage.Clone + ShiftOSDesktop.namechangericonpanelbutton = pnlpanelbuttonnamechangericon.BackgroundImage.Clone + ShiftOSDesktop.namechangericonlauncher = pnllaunchernamechangericon.BackgroundImage.Clone + + ShiftOSDesktop.iconmanagericontitlebar = pnltitlebariconmanagericon.BackgroundImage.Clone + ShiftOSDesktop.iconmanagericonpanelbutton = pnlpanelbuttoniconmanagericon.BackgroundImage.Clone + ShiftOSDesktop.iconmanagericonlauncher = pnllaunchericonmanagericon.BackgroundImage.Clone + + ShiftOSDesktop.terminalicontitlebar = pnltitlebarterminalicon.BackgroundImage.Clone + ShiftOSDesktop.terminaliconpanelbutton = pnlpanelbuttonterminalicon.BackgroundImage.Clone + ShiftOSDesktop.terminaliconlauncher = pnllauncherterminalicon.BackgroundImage.Clone + + ShiftOSDesktop.bitnotewalleticontitlebar = pnltitlebarbitnotewalleticon.BackgroundImage.Clone + ShiftOSDesktop.bitnotewalleticonpanelbutton = pnlpanelbuttonbitnotewalleticon.BackgroundImage.Clone + ShiftOSDesktop.bitnotewalleticonlauncher = pnllauncherbitnotewalleticon.BackgroundImage.Clone + + ShiftOSDesktop.bitnotediggericontitlebar = pnltitlebarbitnotediggericon.BackgroundImage.Clone + ShiftOSDesktop.bitnotediggericonpanelbutton = pnlpanelbuttonbitnotediggericon.BackgroundImage.Clone + ShiftOSDesktop.bitnotediggericonlauncher = pnllauncherbitnotediggericon.BackgroundImage.Clone + + ShiftOSDesktop.skinshiftericontitlebar = pnltitlebarskinshiftericon.BackgroundImage.Clone + ShiftOSDesktop.skinshiftericonpanelbutton = pnlpanelbuttonskinshiftericon.BackgroundImage.Clone + ShiftOSDesktop.skinshiftericonlauncher = pnllauncherskinshiftericon.BackgroundImage.Clone + + ShiftOSDesktop.shiftneticontitlebar = pnltitlebarshiftneticon.BackgroundImage.Clone + ShiftOSDesktop.shiftneticonpanelbutton = pnlpanelbuttonshiftneticon.BackgroundImage.Clone + ShiftOSDesktop.shiftneticonlauncher = pnllaunchershiftneticon.BackgroundImage.Clone + + ShiftOSDesktop.dodgeicontitlebar = pnltitlebardodgeicon.BackgroundImage.Clone + ShiftOSDesktop.dodgeiconpanelbutton = pnlpanelbuttondodgeicon.BackgroundImage.Clone + ShiftOSDesktop.dodgeiconlauncher = pnllauncherdodgeicon.BackgroundImage.Clone + + ShiftOSDesktop.downloadmanagericontitlebar = pnltitlebardownloadicon.BackgroundImage.Clone + ShiftOSDesktop.downloadmanagericonpanelbutton = pnlpanelbuttondownloadicon.BackgroundImage.Clone + ShiftOSDesktop.downloadmanagericonlauncher = pnllauncherdownloadicon.BackgroundImage.Clone + + ShiftOSDesktop.installericontitlebar = pnltitlebarinstallericon.BackgroundImage.Clone + ShiftOSDesktop.installericonpanelbutton = pnlpanelbuttoninstallericon.BackgroundImage.Clone + ShiftOSDesktop.installericonlauncher = pnllauncherinstallericon.BackgroundImage.Clone + + ShiftOSDesktop.sysinfoicontitlebar = pnltitlebarsysinfoicon.BackgroundImage.Clone + ShiftOSDesktop.sysinfoiconpanelbutton = pnlpanelbuttonsysinfoicon.BackgroundImage.Clone + ShiftOSDesktop.sysinfoiconlauncher = pnllaunchersysinfoicon.BackgroundImage.Clone + + ShiftOSDesktop.orcwriteicontitlebar = pnltitlebarorcwriteicon.BackgroundImage.Clone + ShiftOSDesktop.orcwriteiconpanelbutton = pnlpanelbuttonorcwriteicon.BackgroundImage.Clone + ShiftOSDesktop.orcwriteiconlauncher = pnllauncherorcwriteicon.BackgroundImage.Clone + + ShiftOSDesktop.floodgateicontitlebar = pnltitlebarfloodgateicon.BackgroundImage.Clone + ShiftOSDesktop.floodgateiconpanelbutton = pnlpanelbuttonfloodgateicon.BackgroundImage.Clone + ShiftOSDesktop.floodgateiconlauncher = pnllauncherfloodgateicon.BackgroundImage.Clone + + ShiftOSDesktop.mazeicontitlebar = pnltitlebarmazeicon.BackgroundImage.Clone + ShiftOSDesktop.mazeiconpanelbutton = pnlpanelbuttonmazeicon.BackgroundImage.Clone + ShiftOSDesktop.mazeiconlauncher = pnllaunchermazeicon.BackgroundImage.Clone + + ShiftOSDesktop.virusscannericontitlebar = pnltitlebarvirusscannericon.BackgroundImage.Clone + ShiftOSDesktop.virusscannericonpanelbutton = pnlpanelbuttonvirusscannericon.BackgroundImage.Clone + ShiftOSDesktop.virusscannericonlauncher = pnllaunchervirusscannericon.BackgroundImage.Clone + + ShiftOSDesktop.shutdowniconlauncher = pnllaunchershutdownicon.BackgroundImage.Clone + + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setupdesktop() + If Name_Changer.Visible = True Then Name_Changer.loadicons() + + While My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Icons") + Try + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Icons") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Icons", FileIO.DeleteDirectoryOption.DeleteAllContents) + Catch ex As Exception + End Try + End While + + My.Computer.FileSystem.CreateDirectory(ShiftOSPath + "Shiftum42\Icons") + + savelines(0) = ShiftOSDesktop.titlebariconsize + savelines(1) = ShiftOSDesktop.panelbuttoniconsize + savelines(2) = ShiftOSDesktop.launchericonsize + IO.File.WriteAllLines(ShiftOSPath + "Shiftum42\Icons\icondata.dat", savelines) + + saveappliedicons() + End Sub + + Private Sub ChangeImage(sender As Object, e As MouseEventArgs) Handles pnltitlebarknowledgeinputicon.MouseClick, pnlpanelbuttonknowledgeinputicon.MouseClick, pnllauncherknowledgeinputicon.MouseClick, pnltitlebarshiftoriumicon.MouseClick, pnlpanelbuttonshiftoriumicon.MouseClick, pnllaunchershiftoriumicon.MouseClick, pnltitlebarclockicon.MouseClick, pnlpanelbuttonclockicon.MouseClick, pnllauncherclockicon.MouseClick, pnltitlebarshiftericon.MouseClick, pnlpanelbuttonshiftericon.MouseClick, pnllaunchershiftericon.MouseClick, pnltitlebarcolourpickericon.MouseClick, pnlpanelbuttoncolourpickericon.MouseClick, pnllaunchercolourpickericon.MouseClick, pnltitlebarinfoboxicon.MouseClick, pnlpanelbuttoninfoboxicon.MouseClick, pnllauncherinfoboxicon.MouseClick, pnltitlebarpongicon.MouseClick, pnlpanelbuttonpongicon.MouseClick, pnllauncherpongicon.MouseClick, pnltitlebarfileskimmericon.MouseClick, pnlpanelbuttonfileskimmericon.MouseClick, pnllauncherfileskimmericon.MouseClick, pnltitlebartextpadicon.MouseClick, pnlpanelbuttontextpadicon.MouseClick, pnllaunchertextpadicon.MouseClick, pnltitlebarfileopenericon.MouseClick, pnlpanelbuttonfileopenericon.MouseClick, pnllauncherfileopenericon.MouseClick, pnltitlebarfilesavericon.MouseClick, pnlpanelbuttonfilesavericon.MouseClick, pnllauncherfilesavericon.MouseClick, pnltitlebargraphicpickericon.MouseClick, pnlpanelbuttongraphicpickericon.MouseClick, pnllaunchergraphicpickericon.MouseClick, pnltitlebarskinloadericon.MouseClick, pnlpanelbuttonskinloadericon.MouseClick, pnllauncherskinloadericon.MouseClick, pnltitlebarartpadicon.MouseClick, pnlpanelbuttonartpadicon.MouseClick, pnllauncherartpadicon.MouseClick, pnltitlebarcalculatoricon.MouseClick, pnlpanelbuttoncalculatoricon.MouseClick, pnllaunchercalculatoricon.MouseClick, pnltitlebaraudioplayericon.MouseClick, pnlpanelbuttonaudioplayericon.MouseClick, pnllauncheraudioplayericon.MouseClick, pnltitlebarwebbrowsericon.MouseClick, pnlpanelbuttonwebbrowsericon.MouseClick, pnllauncherwebbrowsericon.MouseClick, pnltitlebarvideoplayericon.MouseClick, pnlpanelbuttonvideoplayericon.MouseClick, pnllaunchervideoplayericon.MouseClick, pnltitlebarnamechangericon.MouseClick, pnlpanelbuttonnamechangericon.MouseClick, pnllaunchernamechangericon.MouseClick, pnltitlebariconmanagericon.MouseClick, pnlpanelbuttoniconmanagericon.MouseClick, pnllaunchericonmanagericon.MouseClick, pnltitlebarterminalicon.MouseClick, pnlpanelbuttonterminalicon.MouseClick, pnllauncherterminalicon.MouseClick, pnltitlebarbitnotewalleticon.MouseClick, pnltitlebarbitnotediggericon.MouseClick, pnlpanelbuttonbitnotewalleticon.MouseClick, pnlpanelbuttonbitnotediggericon.MouseClick, pnllauncherbitnotewalleticon.MouseClick, pnllauncherbitnotediggericon.MouseClick, pnltitlebarskinshiftericon.MouseClick, pnlpanelbuttonskinshiftericon.MouseClick, pnllauncherskinshiftericon.MouseClick, pnltitlebarshiftneticon.MouseClick, pnlpanelbuttonshiftneticon.MouseClick, pnllaunchershiftneticon.MouseClick, pnltitlebardodgeicon.MouseClick, pnlpanelbuttondodgeicon.MouseClick, pnllauncherdodgeicon.MouseClick, pnltitlebardownloadicon.MouseClick, pnlpanelbuttondownloadicon.MouseClick, pnllauncherdownloadicon.MouseClick, pnltitlebarinstallericon.MouseClick, pnlpanelbuttoninstallericon.MouseClick, pnllauncherinstallericon.MouseClick, pnltitlebarsysinfoicon.MouseClick, pnlpanelbuttonsysinfoicon.MouseClick, pnllaunchersysinfoicon.MouseClick, pnltitlebarorcwriteicon.MouseClick, pnlpanelbuttonorcwriteicon.MouseClick, pnlpanelbuttonorcwriteicon.MouseClick, pnllauncherorcwriteicon.MouseClick, pnltitlebarfloodgateicon.MouseClick, pnlpanelbuttonfloodgateicon.MouseClick, pnllauncherfloodgateicon.MouseClick, pnltitlebarmazeicon.MouseClick, pnlpanelbuttonmazeicon.MouseClick, pnllaunchermazeicon.MouseClick, pnltitlebarvirusscannericon.MouseClick, pnlpanelbuttonvirusscannericon.MouseClick, pnllaunchervirusscannericon.MouseClick + File_Opener.Show() + File_Opener.openingprogram = "iconmanager" + File_Opener.openextention = ".pic" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + icontochange = sender + unsavedchanges = True + End Sub + + Public Sub loadicon() + + icontochange.BackgroundImage = GetImage(openedfilelocation) + If over64 = True Then + icontochange.backgroundimagelayout = ImageLayout.Stretch + over64 = False + Else + icontochange.backgroundimagelayout = ImageLayout.Center + End If + + End Sub + + Private Sub btnReset_Click(sender As Object, e As EventArgs) Handles btnReset.Click + ShiftOSDesktop.titlebariconsize = 16 + ShiftOSDesktop.panelbuttoniconsize = 16 + ShiftOSDesktop.launchericonsize = 16 + + disposebackgrounds() + needtosetupdesktop = True + loadsettings() + + ShiftOSDesktop.artpadicontitlebar = My.Resources.iconArtpad + ShiftOSDesktop.audioplayericontitlebar = My.Resources.iconAudioPlayer + ShiftOSDesktop.calculatoricontitlebar = My.Resources.iconCalculator + ShiftOSDesktop.clockicontitlebar = My.Resources.iconClock + ShiftOSDesktop.colourpickericontitlebar = My.Resources.iconColourPicker + ShiftOSDesktop.fileopenericontitlebar = My.Resources.iconFileOpener + ShiftOSDesktop.filesavericontitlebar = My.Resources.iconFileSaver + ShiftOSDesktop.fileskimmericontitlebar = My.Resources.iconFileSkimmer + ShiftOSDesktop.graphicpickericontitlebar = My.Resources.iconGraphicPicker + ShiftOSDesktop.infoboxicontitlebar = My.Resources.iconInfoBox + ShiftOSDesktop.knowledgeinputicontitlebar = My.Resources.iconKnowledgeInput + ShiftOSDesktop.pongicontitlebar = My.Resources.iconPong + ShiftOSDesktop.shiftericontitlebar = My.Resources.iconShifter + ShiftOSDesktop.shiftoriumicontitlebar = My.Resources.iconShiftorium + ShiftOSDesktop.skinloadericontitlebar = My.Resources.iconSkinLoader + ShiftOSDesktop.terminalicontitlebar = My.Resources.iconTerminal + ShiftOSDesktop.textpadicontitlebar = My.Resources.iconTextPad + ShiftOSDesktop.videoplayericontitlebar = My.Resources.iconVideoPlayer + ShiftOSDesktop.webbrowsericontitlebar = My.Resources.iconWebBrowser + ShiftOSDesktop.namechangericontitlebar = My.Resources.iconNameChanger + ShiftOSDesktop.iconmanagericontitlebar = My.Resources.iconIconManager + ShiftOSDesktop.bitnotewalleticontitlebar = My.Resources.iconBitnoteWallet + ShiftOSDesktop.bitnotediggericontitlebar = My.Resources.iconBitnoteDigger + ShiftOSDesktop.skinshiftericontitlebar = My.Resources.iconSkinShifter + ShiftOSDesktop.shiftneticontitlebar = My.Resources.iconShiftnet + ShiftOSDesktop.downloadericontitlebar = My.Resources.iconDownloader + ShiftOSDesktop.dodgeicontitlebar = My.Resources.iconDodge + ShiftOSDesktop.downloadmanagericontitlebar = My.Resources.icondownloadmanager + ShiftOSDesktop.installericontitlebar = My.Resources.iconinstaller + ShiftOSDesktop.snakeyicontitlebar = My.Resources.iconSnakey + ShiftOSDesktop.sysinfoicontitlebar = My.Resources.iconSysinfo + ShiftOSDesktop.orcwriteicontitlebar = My.Resources.iconorcwrite + ShiftOSDesktop.floodgateicontitlebar = My.Resources.iconfloodgate + ShiftOSDesktop.mazeicontitlebar = My.Resources.iconmaze + ShiftOSDesktop.virusscannericontitlebar = My.Resources.iconvirusscanner + + ShiftOSDesktop.artpadiconpanelbutton = My.Resources.iconArtpad + ShiftOSDesktop.audioplayericonpanelbutton = My.Resources.iconAudioPlayer + ShiftOSDesktop.calculatoriconpanelbutton = My.Resources.iconCalculator + ShiftOSDesktop.clockiconpanelbutton = My.Resources.iconClock + ShiftOSDesktop.colourpickericonpanelbutton = My.Resources.iconColourPicker + ShiftOSDesktop.fileopenericonpanelbutton = My.Resources.iconFileOpener + ShiftOSDesktop.filesavericonpanelbutton = My.Resources.iconFileSaver + ShiftOSDesktop.fileskimmericonpanelbutton = My.Resources.iconFileSkimmer + ShiftOSDesktop.graphicpickericonpanelbutton = My.Resources.iconGraphicPicker + ShiftOSDesktop.infoboxiconpanelbutton = My.Resources.iconInfoBox + ShiftOSDesktop.knowledgeinputiconpanelbutton = My.Resources.iconKnowledgeInput + ShiftOSDesktop.pongiconpanelbutton = My.Resources.iconPong + ShiftOSDesktop.shiftericonpanelbutton = My.Resources.iconShifter + ShiftOSDesktop.shiftoriumiconpanelbutton = My.Resources.iconShiftorium + ShiftOSDesktop.skinloadericonpanelbutton = My.Resources.iconSkinLoader + ShiftOSDesktop.terminaliconpanelbutton = My.Resources.iconTerminal + ShiftOSDesktop.textpadiconpanelbutton = My.Resources.iconTextPad + ShiftOSDesktop.videoplayericonpanelbutton = My.Resources.iconVideoPlayer + ShiftOSDesktop.webbrowsericonpanelbutton = My.Resources.iconWebBrowser + ShiftOSDesktop.namechangericonpanelbutton = My.Resources.iconNameChanger + ShiftOSDesktop.iconmanagericonpanelbutton = My.Resources.iconIconManager + ShiftOSDesktop.bitnotewalleticonpanelbutton = My.Resources.iconBitnoteWallet + ShiftOSDesktop.bitnotediggericonpanelbutton = My.Resources.iconBitnoteDigger + ShiftOSDesktop.skinshiftericonpanelbutton = My.Resources.iconSkinShifter + ShiftOSDesktop.shiftneticonpanelbutton = My.Resources.iconShiftnet + ShiftOSDesktop.downloadericonpanelbutton = My.Resources.iconDownloader + ShiftOSDesktop.dodgeiconpanelbutton = My.Resources.iconDodge + ShiftOSDesktop.downloadmanagericonpanelbutton = My.Resources.icondownloadmanager + ShiftOSDesktop.installericonpanelbutton = My.Resources.iconinstaller + ShiftOSDesktop.snakeyiconpanelbutton = My.Resources.iconSnakey + ShiftOSDesktop.sysinfoiconpanelbutton = My.Resources.iconSysinfo + ShiftOSDesktop.orcwriteiconpanelbutton = My.Resources.iconorcwrite + ShiftOSDesktop.floodgateiconpanelbutton = My.Resources.iconfloodgate + ShiftOSDesktop.mazeiconpanelbutton = My.Resources.iconmaze + ShiftOSDesktop.virusscannericonpanelbutton = My.Resources.iconvirusscanner + + ShiftOSDesktop.artpadiconlauncher = My.Resources.iconArtpad + ShiftOSDesktop.audioplayericonlauncher = My.Resources.iconAudioPlayer + ShiftOSDesktop.calculatoriconlauncher = My.Resources.iconCalculator + ShiftOSDesktop.clockiconlauncher = My.Resources.iconClock + ShiftOSDesktop.colourpickericonlauncher = My.Resources.iconColourPicker + ShiftOSDesktop.fileopenericonlauncher = My.Resources.iconFileOpener + ShiftOSDesktop.filesavericonlauncher = My.Resources.iconFileSaver + ShiftOSDesktop.fileskimmericonlauncher = My.Resources.iconFileSkimmer + ShiftOSDesktop.graphicpickericonlauncher = My.Resources.iconGraphicPicker + ShiftOSDesktop.infoboxiconlauncher = My.Resources.iconInfoBox + ShiftOSDesktop.knowledgeinputiconlauncher = My.Resources.iconKnowledgeInput + ShiftOSDesktop.pongiconlauncher = My.Resources.iconPong + ShiftOSDesktop.shiftericonlauncher = My.Resources.iconShifter + ShiftOSDesktop.shiftoriumiconlauncher = My.Resources.iconShiftorium + ShiftOSDesktop.skinloadericonlauncher = My.Resources.iconSkinLoader + ShiftOSDesktop.terminaliconlauncher = My.Resources.iconTerminal + ShiftOSDesktop.textpadiconlauncher = My.Resources.iconTextPad + ShiftOSDesktop.videoplayericonlauncher = My.Resources.iconVideoPlayer + ShiftOSDesktop.webbrowsericonlauncher = My.Resources.iconWebBrowser + ShiftOSDesktop.namechangericonlauncher = My.Resources.iconNameChanger + ShiftOSDesktop.iconmanagericonlauncher = My.Resources.iconIconManager + ShiftOSDesktop.bitnotewalleticonlauncher = My.Resources.iconBitnoteWallet + ShiftOSDesktop.bitnotediggericonlauncher = My.Resources.iconBitnoteDigger + ShiftOSDesktop.skinshiftericonlauncher = My.Resources.iconSkinShifter + ShiftOSDesktop.shiftneticonlauncher = My.Resources.iconShiftnet + ShiftOSDesktop.downloadericonlauncher = My.Resources.iconDownloader + ShiftOSDesktop.dodgeiconlauncher = My.Resources.iconDodge + ShiftOSDesktop.downloadmanagericonlauncher = My.Resources.icondownloadmanager + ShiftOSDesktop.installericonlauncher = My.Resources.iconinstaller + ShiftOSDesktop.snakeyiconlauncher = My.Resources.iconSnakey + ShiftOSDesktop.sysinfoiconlauncher = My.Resources.iconSysinfo + ShiftOSDesktop.orcwriteiconlauncher = My.Resources.iconorcwrite + ShiftOSDesktop.floodgateiconlauncher = My.Resources.iconfloodgate + ShiftOSDesktop.mazeiconlauncher = My.Resources.iconmaze + ShiftOSDesktop.virusscannericonlauncher = My.Resources.iconvirusscanner + + ShiftOSDesktop.shutdowniconlauncher = My.Resources.iconshutdown + + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setupdesktop() + + loadsettings() + End Sub + + Public Sub disposebackgrounds() + pnltitlebarknowledgeinputicon.BackgroundImage.Dispose() + pnlpanelbuttonknowledgeinputicon.BackgroundImage.Dispose() + pnllauncherknowledgeinputicon.BackgroundImage.Dispose() + + pnltitlebarshiftoriumicon.BackgroundImage.Dispose() + pnlpanelbuttonshiftoriumicon.BackgroundImage.Dispose() + pnllaunchershiftoriumicon.BackgroundImage.Dispose() + + pnltitlebarclockicon.BackgroundImage.Dispose() + pnlpanelbuttonclockicon.BackgroundImage.Dispose() + pnllauncherclockicon.BackgroundImage.Dispose() + + pnltitlebarshiftericon.BackgroundImage.Dispose() + pnlpanelbuttonshiftericon.BackgroundImage.Dispose() + pnllaunchershiftericon.BackgroundImage.Dispose() + + pnltitlebarcolourpickericon.BackgroundImage.Dispose() + pnlpanelbuttoncolourpickericon.BackgroundImage.Dispose() + pnllaunchercolourpickericon.BackgroundImage.Dispose() + + pnltitlebarinfoboxicon.BackgroundImage.Dispose() + pnlpanelbuttoninfoboxicon.BackgroundImage.Dispose() + pnllauncherinfoboxicon.BackgroundImage.Dispose() + + pnltitlebarpongicon.BackgroundImage.Dispose() + pnlpanelbuttonpongicon.BackgroundImage.Dispose() + pnllauncherpongicon.BackgroundImage.Dispose() + + pnltitlebarfileskimmericon.BackgroundImage.Dispose() + pnlpanelbuttonfileskimmericon.BackgroundImage.Dispose() + pnllauncherfileskimmericon.BackgroundImage.Dispose() + + pnltitlebartextpadicon.BackgroundImage.Dispose() + pnlpanelbuttontextpadicon.BackgroundImage.Dispose() + pnllaunchertextpadicon.BackgroundImage.Dispose() + + pnltitlebarfileopenericon.BackgroundImage.Dispose() + pnlpanelbuttonfileopenericon.BackgroundImage.Dispose() + pnllauncherfileopenericon.BackgroundImage.Dispose() + + pnltitlebarfilesavericon.BackgroundImage.Dispose() + pnlpanelbuttonfilesavericon.BackgroundImage.Dispose() + pnllauncherfilesavericon.BackgroundImage.Dispose() + + pnltitlebargraphicpickericon.BackgroundImage.Dispose() + pnlpanelbuttongraphicpickericon.BackgroundImage.Dispose() + pnllaunchergraphicpickericon.BackgroundImage.Dispose() + + pnltitlebarskinloadericon.BackgroundImage.Dispose() + pnlpanelbuttonskinloadericon.BackgroundImage.Dispose() + pnllauncherskinloadericon.BackgroundImage.Dispose() + + pnltitlebarartpadicon.BackgroundImage.Dispose() + pnlpanelbuttonartpadicon.BackgroundImage.Dispose() + pnllauncherartpadicon.BackgroundImage.Dispose() + + pnltitlebarcalculatoricon.BackgroundImage.Dispose() + pnlpanelbuttoncalculatoricon.BackgroundImage.Dispose() + pnllaunchercalculatoricon.BackgroundImage.Dispose() + + pnltitlebaraudioplayericon.BackgroundImage.Dispose() + pnlpanelbuttonaudioplayericon.BackgroundImage.Dispose() + pnllauncheraudioplayericon.BackgroundImage.Dispose() + + pnltitlebarwebbrowsericon.BackgroundImage.Dispose() + pnlpanelbuttonwebbrowsericon.BackgroundImage.Dispose() + pnllauncherwebbrowsericon.BackgroundImage.Dispose() + + pnltitlebarvideoplayericon.BackgroundImage.Dispose() + pnlpanelbuttonvideoplayericon.BackgroundImage.Dispose() + pnllaunchervideoplayericon.BackgroundImage.Dispose() + + pnltitlebarnamechangericon.BackgroundImage.Dispose() + pnlpanelbuttonnamechangericon.BackgroundImage.Dispose() + pnllaunchernamechangericon.BackgroundImage.Dispose() + + pnltitlebariconmanagericon.BackgroundImage.Dispose() + pnlpanelbuttoniconmanagericon.BackgroundImage.Dispose() + pnllaunchericonmanagericon.BackgroundImage.Dispose() + + pnltitlebarterminalicon.BackgroundImage.Dispose() + pnlpanelbuttonterminalicon.BackgroundImage.Dispose() + pnllauncherterminalicon.BackgroundImage.Dispose() + + pnllaunchershutdownicon.BackgroundImage.Dispose() + End Sub + + Public Sub checkbackgroundimagesize() + minicheckresize(pnltitlebarknowledgeinputicon) + minicheckresize(pnlpanelbuttonknowledgeinputicon) + minicheckresize(pnllauncherknowledgeinputicon) + + minicheckresize(pnltitlebarshiftoriumicon) + minicheckresize(pnlpanelbuttonshiftoriumicon) + minicheckresize(pnllaunchershiftoriumicon) + + minicheckresize(pnltitlebarclockicon) + minicheckresize(pnlpanelbuttonclockicon) + minicheckresize(pnllauncherclockicon) + + minicheckresize(pnltitlebarshiftericon) + minicheckresize(pnlpanelbuttonshiftericon) + minicheckresize(pnllaunchershiftericon) + + minicheckresize(pnltitlebarcolourpickericon) + minicheckresize(pnlpanelbuttoncolourpickericon) + minicheckresize(pnllaunchercolourpickericon) + + minicheckresize(pnltitlebarinfoboxicon) + minicheckresize(pnlpanelbuttoninfoboxicon) + minicheckresize(pnllauncherinfoboxicon) + + minicheckresize(pnltitlebarpongicon) + minicheckresize(pnlpanelbuttonpongicon) + minicheckresize(pnllauncherpongicon) + + minicheckresize(pnltitlebarfileskimmericon) + minicheckresize(pnlpanelbuttonfileskimmericon) + minicheckresize(pnllauncherfileskimmericon) + + minicheckresize(pnltitlebartextpadicon) + minicheckresize(pnlpanelbuttontextpadicon) + minicheckresize(pnllaunchertextpadicon) + + minicheckresize(pnltitlebarfileopenericon) + minicheckresize(pnlpanelbuttonfileopenericon) + minicheckresize(pnllauncherfileopenericon) + + minicheckresize(pnltitlebarfilesavericon) + minicheckresize(pnlpanelbuttonfilesavericon) + minicheckresize(pnllauncherfilesavericon) + + minicheckresize(pnltitlebargraphicpickericon) + minicheckresize(pnlpanelbuttongraphicpickericon) + minicheckresize(pnllaunchergraphicpickericon) + + minicheckresize(pnltitlebarskinloadericon) + minicheckresize(pnlpanelbuttonskinloadericon) + minicheckresize(pnllauncherskinloadericon) + + minicheckresize(pnltitlebarartpadicon) + minicheckresize(pnlpanelbuttonartpadicon) + minicheckresize(pnllauncherartpadicon) + + minicheckresize(pnltitlebarcalculatoricon) + minicheckresize(pnlpanelbuttoncalculatoricon) + minicheckresize(pnllaunchercalculatoricon) + + minicheckresize(pnltitlebaraudioplayericon) + minicheckresize(pnlpanelbuttonaudioplayericon) + minicheckresize(pnllauncheraudioplayericon) + + minicheckresize(pnltitlebarwebbrowsericon) + minicheckresize(pnlpanelbuttonwebbrowsericon) + minicheckresize(pnllauncherwebbrowsericon) + + minicheckresize(pnltitlebarvideoplayericon) + minicheckresize(pnlpanelbuttonvideoplayericon) + minicheckresize(pnllaunchervideoplayericon) + + minicheckresize(pnltitlebarnamechangericon) + minicheckresize(pnlpanelbuttonnamechangericon) + minicheckresize(pnllaunchernamechangericon) + + minicheckresize(pnltitlebariconmanagericon) + minicheckresize(pnlpanelbuttoniconmanagericon) + minicheckresize(pnllaunchericonmanagericon) + + minicheckresize(pnltitlebarterminalicon) + minicheckresize(pnlpanelbuttonterminalicon) + minicheckresize(pnllauncherterminalicon) + + minicheckresize(pnllaunchershutdownicon) + End Sub + + Public Sub minicheckresize(ByVal panel As Panel) + If panel.BackgroundImage.Width > 64 Then panel.BackgroundImageLayout = ImageLayout.Stretch Else panel.BackgroundImageLayout = ImageLayout.Center + End Sub + + Public Sub saveappliedicons() + saveprocess(pnltitlebarknowledgeinputicon) + saveprocess(pnlpanelbuttonknowledgeinputicon) + saveprocess(pnllauncherknowledgeinputicon) + + saveprocess(pnltitlebarshiftoriumicon) + saveprocess(pnlpanelbuttonshiftoriumicon) + saveprocess(pnllaunchershiftoriumicon) + + saveprocess(pnltitlebarclockicon) + saveprocess(pnlpanelbuttonclockicon) + saveprocess(pnllauncherclockicon) + + saveprocess(pnltitlebarshiftericon) + saveprocess(pnlpanelbuttonshiftericon) + saveprocess(pnllaunchershiftericon) + + saveprocess(pnltitlebarcolourpickericon) + saveprocess(pnlpanelbuttoncolourpickericon) + saveprocess(pnllaunchercolourpickericon) + + saveprocess(pnltitlebarinfoboxicon) + saveprocess(pnlpanelbuttoninfoboxicon) + saveprocess(pnllauncherinfoboxicon) + + saveprocess(pnltitlebarpongicon) + saveprocess(pnlpanelbuttonpongicon) + saveprocess(pnllauncherpongicon) + + saveprocess(pnltitlebarfileskimmericon) + saveprocess(pnlpanelbuttonfileskimmericon) + saveprocess(pnllauncherfileskimmericon) + + saveprocess(pnltitlebartextpadicon) + saveprocess(pnlpanelbuttontextpadicon) + saveprocess(pnllaunchertextpadicon) + + saveprocess(pnltitlebarfileopenericon) + saveprocess(pnlpanelbuttonfileopenericon) + saveprocess(pnllauncherfileopenericon) + + saveprocess(pnltitlebarfilesavericon) + saveprocess(pnlpanelbuttonfilesavericon) + saveprocess(pnllauncherfilesavericon) + + saveprocess(pnltitlebargraphicpickericon) + saveprocess(pnlpanelbuttongraphicpickericon) + saveprocess(pnllaunchergraphicpickericon) + + saveprocess(pnltitlebarskinloadericon) + saveprocess(pnlpanelbuttonskinloadericon) + saveprocess(pnllauncherskinloadericon) + + saveprocess(pnltitlebarartpadicon) + saveprocess(pnlpanelbuttonartpadicon) + saveprocess(pnllauncherartpadicon) + + saveprocess(pnltitlebarcalculatoricon) + saveprocess(pnlpanelbuttoncalculatoricon) + saveprocess(pnllaunchercalculatoricon) + + saveprocess(pnltitlebaraudioplayericon) + saveprocess(pnlpanelbuttonaudioplayericon) + saveprocess(pnllauncheraudioplayericon) + + saveprocess(pnltitlebarwebbrowsericon) + saveprocess(pnlpanelbuttonwebbrowsericon) + saveprocess(pnllauncherwebbrowsericon) + + saveprocess(pnltitlebarvideoplayericon) + saveprocess(pnlpanelbuttonvideoplayericon) + saveprocess(pnllaunchervideoplayericon) + + saveprocess(pnltitlebarnamechangericon) + saveprocess(pnlpanelbuttonnamechangericon) + saveprocess(pnllaunchernamechangericon) + + saveprocess(pnltitlebariconmanagericon) + saveprocess(pnlpanelbuttoniconmanagericon) + saveprocess(pnllaunchericonmanagericon) + + saveprocess(pnltitlebarterminalicon) + saveprocess(pnlpanelbuttonterminalicon) + saveprocess(pnllauncherterminalicon) + + saveprocess(pnltitlebarbitnotewalleticon) + saveprocess(pnlpanelbuttonbitnotewalleticon) + saveprocess(pnllauncherbitnotewalleticon) + + saveprocess(pnltitlebarbitnotediggericon) + saveprocess(pnlpanelbuttonbitnotediggericon) + saveprocess(pnllauncherbitnotediggericon) + + saveprocess(pnltitlebarskinshiftericon) + saveprocess(pnlpanelbuttonskinshiftericon) + saveprocess(pnllauncherskinshiftericon) + + saveprocess(pnltitlebarshiftneticon) + saveprocess(pnlpanelbuttonshiftneticon) + saveprocess(pnllaunchershiftneticon) + + saveprocess(pnltitlebardodgeicon) + saveprocess(pnlpanelbuttondodgeicon) + saveprocess(pnllauncherdodgeicon) + + saveprocess(pnltitlebardownloadicon) + saveprocess(pnlpanelbuttondownloadicon) + saveprocess(pnllauncherdownloadicon) + + saveprocess(pnltitlebarinstallericon) + saveprocess(pnlpanelbuttoninstallericon) + saveprocess(pnllauncherinstallericon) + + saveprocess(pnltitlebarsysinfoicon) + saveprocess(pnlpanelbuttonsysinfoicon) + saveprocess(pnllaunchersysinfoicon) + + saveprocess(pnltitlebarorcwriteicon) + saveprocess(pnlpanelbuttonorcwriteicon) + saveprocess(pnllauncherorcwriteicon) + + saveprocess(pnltitlebarfloodgateicon) + saveprocess(pnlpanelbuttonfloodgateicon) + saveprocess(pnllauncherfloodgateicon) + + saveprocess(pnltitlebarmazeicon) + saveprocess(pnlpanelbuttonmazeicon) + saveprocess(pnllaunchermazeicon) + + saveprocess(pnltitlebarvirusscannericon) + saveprocess(pnlpanelbuttonvirusscannericon) + saveprocess(pnllaunchervirusscannericon) + + saveprocess(pnllaunchershutdownicon) + End Sub + + Public Sub saveprocess(ByVal panel As Panel) + panel.BackgroundImage.Save(ShiftOSPath + "Shiftum42\Icons\" & panel.Name.Substring(3) & ".pic", Imaging.ImageFormat.Png) + End Sub + + Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click + If unsavedchanges = False Then + File_Saver.savingprogram = "iconmanager" + File_Saver.saveextention = ".icp" + File_Saver.Show() + Else + infobox.title = "Icon Manager - Error!" + infobox.textinfo = "You must apply the changes to your system before saving the icon pack as a file." & Environment.NewLine & Environment.NewLine & "Please click the apply button first before attempting to save again." + infobox.Show() + End If + End Sub + + Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click + File_Opener.Show() + File_Opener.openingprogram = "iconmanagerpack" + File_Opener.openextention = ".icp" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Installer.Designer.vb b/ShiftOS/Installer.Designer.vb new file mode 100644 index 0000000..a65b473 --- /dev/null +++ b/ShiftOS/Installer.Designer.vb @@ -0,0 +1,338 @@ + _ +Partial Class Installer + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Installer)) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.btninstall = New System.Windows.Forms.Label() + Me.btnbrowse = New System.Windows.Forms.Label() + Me.lbl2install = New System.Windows.Forms.Label() + Me.txtfilepath = New System.Windows.Forms.TextBox() + Me.lblinfotext = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.tmrprogress = New System.Windows.Forms.Timer(Me.components) + Me.installprogress = New ShiftOS.ProgressBarEX() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 259) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(580, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 229) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(582, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 231) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(582, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 229) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.installprogress) + Me.pgcontents.Controls.Add(Me.btninstall) + Me.pgcontents.Controls.Add(Me.btnbrowse) + Me.pgcontents.Controls.Add(Me.lbl2install) + Me.pgcontents.Controls.Add(Me.txtfilepath) + Me.pgcontents.Controls.Add(Me.lblinfotext) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(582, 231) + Me.pgcontents.TabIndex = 20 + ' + 'btninstall + ' + Me.btninstall.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btninstall.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.btninstall.Location = New System.Drawing.Point(478, 175) + Me.btninstall.Name = "btninstall" + Me.btninstall.Size = New System.Drawing.Size(80, 29) + Me.btninstall.TabIndex = 4 + Me.btninstall.Text = "Install" + Me.btninstall.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnbrowse + ' + Me.btnbrowse.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnbrowse.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.btnbrowse.Location = New System.Drawing.Point(392, 175) + Me.btnbrowse.Name = "btnbrowse" + Me.btnbrowse.Size = New System.Drawing.Size(80, 29) + Me.btnbrowse.TabIndex = 3 + Me.btnbrowse.Text = "Browse..." + Me.btnbrowse.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbl2install + ' + Me.lbl2install.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbl2install.AutoSize = True + Me.lbl2install.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl2install.Location = New System.Drawing.Point(11, 182) + Me.lbl2install.Name = "lbl2install" + Me.lbl2install.Size = New System.Drawing.Size(126, 18) + Me.lbl2install.TabIndex = 2 + Me.lbl2install.Text = "STP File to install:" + ' + 'txtfilepath + ' + Me.txtfilepath.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtfilepath.BackColor = System.Drawing.Color.White + Me.txtfilepath.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtfilepath.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfilepath.Location = New System.Drawing.Point(143, 175) + Me.txtfilepath.Name = "txtfilepath" + Me.txtfilepath.ReadOnly = True + Me.txtfilepath.Size = New System.Drawing.Size(243, 29) + Me.txtfilepath.TabIndex = 1 + ' + 'lblinfotext + ' + Me.lblinfotext.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblinfotext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblinfotext.Location = New System.Drawing.Point(24, 19) + Me.lblinfotext.Name = "lblinfotext" + Me.lblinfotext.Size = New System.Drawing.Size(533, 166) + Me.lblinfotext.TabIndex = 0 + Me.lblinfotext.Text = resources.GetString("lblinfotext.Text") + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 231) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(584, 30) + Me.titlebar.TabIndex = 19 + ' + 'tmrprogress + ' + ' + 'installprogress + ' + Me.installprogress.BlockSeparation = 3 + Me.installprogress.BlockWidth = 5 + Me.installprogress.Color = System.Drawing.Color.Gray + Me.installprogress.Dock = System.Windows.Forms.DockStyle.Bottom + Me.installprogress.Location = New System.Drawing.Point(0, 210) + Me.installprogress.MaxValue = 100 + Me.installprogress.MinValue = 0 + Me.installprogress.Name = "installprogress" + Me.installprogress.Orientation = ShiftOS.ProgressBarEX.ProgressBarOrientation.Horizontal + Me.installprogress.ShowValue = False + Me.installprogress.Size = New System.Drawing.Size(582, 21) + Me.installprogress.Step = 10 + Me.installprogress.Style = ShiftOS.ProgressBarEX.ProgressBarExStyle.Continuous + Me.installprogress.TabIndex = 5 + Me.installprogress.Value = 0 + ' + 'Installer + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(584, 261) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Installer" + Me.Text = "Installer" + Me.TopMost = True + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents btninstall As System.Windows.Forms.Label + Friend WithEvents btnbrowse As System.Windows.Forms.Label + Friend WithEvents lbl2install As System.Windows.Forms.Label + Friend WithEvents txtfilepath As System.Windows.Forms.TextBox + Friend WithEvents lblinfotext As System.Windows.Forms.Label + Friend WithEvents tmrprogress As System.Windows.Forms.Timer + Friend WithEvents installprogress As ShiftOS.ProgressBarEX +End Class diff --git a/ShiftOS/Installer.resx b/ShiftOS/Installer.resx new file mode 100644 index 0000000..c865030 --- /dev/null +++ b/ShiftOS/Installer.resx @@ -0,0 +1,135 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 57 + + + 111, 57 + + + 195, 57 + + + Welcome to the Installer, this is a program that allows you to install setup (stp) files as programs on your computer. To install a setup file, first type the file path or press browse to find the correct file, then hit install and your done. Simple. + + + 308, 57 + + \ No newline at end of file diff --git a/ShiftOS/Installer.vb b/ShiftOS/Installer.vb new file mode 100644 index 0000000..98ea198 --- /dev/null +++ b/ShiftOS/Installer.vb @@ -0,0 +1,597 @@ +Imports System.IO + +Public Class Installer + + Dim programtoinstall As String + Dim filesize As Integer + + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 600 'replace with minimum size + Public minimumsizeheight As Integer = 300 'replace with minimum size + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.InstallerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttoninstaller.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoninstaller, ShiftOSDesktop.tbinstallericon, ShiftOSDesktop.tbinstallertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(584, 261) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.installername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.installericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub btnbrowse_Click(sender As Object, e As EventArgs) Handles btnbrowse.Click + File_Opener.openingprogram = "installer" + File_Opener.openextention = ".stp" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + File_Opener.Show() + End Sub + + Private Sub btninstall_Click(sender As Object, e As EventArgs) Handles btninstall.Click + If My.Computer.FileSystem.FileExists(txtfilepath.Text) Then + + 'Read file + File_Crypt.DecryptFile(txtfilepath.Text, ShiftOSDesktop.ShiftOSPath + "Shiftum42\Drivers\HDD.dri", ShiftOSDesktop.sSecretKey) + + Dim filereader As System.IO.StreamReader = My.Computer.FileSystem.OpenTextFileReader(ShiftOSDesktop.ShiftOSPath + "Shiftum42\Drivers\HDD.dri") + programtoinstall = filereader.ReadLine() + filesize = filereader.ReadLine() + filereader.Close() + + 'install program + Select Case programtoinstall + Case "Calculator.stp" + If ShiftOSDesktop.installedcalculator = False Then + ShiftOSDesktop.installedcalculator = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "WebBrowser.stp" + If ShiftOSDesktop.boughtanycolour4 Then + If ShiftOSDesktop.installedwebbrowser = False Then + ShiftOSDesktop.installedwebbrowser = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Else + norequirements() + End If + Case "VideoPlayer.stp" + If ShiftOSDesktop.boughtanycolour4 Then + If ShiftOSDesktop.installedvideoplayer = False Then + ShiftOSDesktop.installedvideoplayer = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Else + norequirements() + End If + Case "Audioplayer.stp" + If ShiftOSDesktop.installedaudioplayer = False Then + ShiftOSDesktop.installedaudioplayer = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "BitnoteWallet.stp" + If ShiftOSDesktop.boughtbitnotewallet = False Then + ShiftOSDesktop.boughtbitnotewallet = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "BitnoteDigger.stp" + If ShiftOSDesktop.boughtbitnotedigger = False Then + ShiftOSDesktop.boughtbitnotedigger = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "OrcWrite.stp" + If ShiftOSDesktop.installedorcwrite = False Then + ShiftOSDesktop.installedorcwrite = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "FloodGate.stp" + If ShiftOSDesktop.boughtfloodgate = False Then + ShiftOSDesktop.boughtfloodgate = True + ShiftOSDesktop.installedfloodgate = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "SkinChanger.stp" + If ShiftOSDesktop.boughtskinshifter = False Then + ShiftOSDesktop.boughtskinshifter = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "NameChanger.stp" + If ShiftOSDesktop.boughtnamechanger = False Then + ShiftOSDesktop.boughtnamechanger = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "IconManager.stp" + If ShiftOSDesktop.boughticonmanager = False Then + ShiftOSDesktop.boughticonmanager = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "Dodge.stp" + If ShiftOSDesktop.installeddodge = False Then + ShiftOSDesktop.installeddodge = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case "Labyrinth.stp" + If ShiftOSDesktop.installedmaze = False Then + ShiftOSDesktop.installedmaze = True + doinstallprogress() + Else + alreadyinstalledmsg() + End If + Case Else + infobox.title = "Error - Damaged File" + infobox.textinfo = "The selected file appears to be damaged or corrupt and cannot be read." + infobox.Show() + End Select + Else + infobox.title = "Error" + infobox.textinfo = "Invaild file, please choose a file with the stp extention" + infobox.Show() + End If + End Sub + + Private Sub doinstallprogress() + installprogress.Value = 0 + tmrprogress.Interval = (filesize / 100) + tmrprogress.Start() + End Sub + + Private Sub tmrprogress_Tick(sender As Object, e As EventArgs) Handles tmrprogress.Tick + installprogress.Value = installprogress.Value + 10 + If installprogress.Value >= 100 Then + installedmsg() + tmrprogress.Stop() + End If + End Sub + + Private Sub installedmsg() + ShiftOSDesktop.setupdesktop() + infobox.title = "Installed " & programtoinstall + infobox.textinfo = programtoinstall & " has been successfully installed! You can now open it through the Applications Launcher." + infobox.Show() + End Sub + + Private Sub alreadyinstalledmsg() + infobox.title = programtoinstall & " already installed" + infobox.textinfo = programtoinstall & " is already installed on your system. To open it, click the Applications Launcher" + infobox.Show() + End Sub + + Private Sub norequirements() + infobox.title = "Error - Requirements not meet" + infobox.textinfo = programtoinstall & " cannot be installed because it the current system doesn't meet its requirements. Please upgrade your computer through the Shiftorium and retry to installiation process." + infobox.Show() + End Sub + +End Class \ No newline at end of file diff --git a/ShiftOS/Knowledge Input.Designer.vb b/ShiftOS/Knowledge Input.Designer.vb new file mode 100644 index 0000000..350c238 --- /dev/null +++ b/ShiftOS/Knowledge Input.Designer.vb @@ -0,0 +1,493 @@ + _ +Partial Class Knowledge_Input + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Knowledge_Input)) + Me.ListBox1 = New System.Windows.Forms.ListBox() + Me.pnlintro = New System.Windows.Forms.Panel() + Me.pnlcategorydisplay = New System.Windows.Forms.Panel() + Me.lblnextreward = New System.Windows.Forms.Label() + Me.guessbox = New System.Windows.Forms.TextBox() + Me.lblcurrentlevel = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.listblistedstuff = New System.Windows.Forms.ListBox() + Me.lbltillnextlevel = New System.Windows.Forms.Label() + Me.lbltotal = New System.Windows.Forms.Label() + Me.btnstart = New System.Windows.Forms.Button() + Me.lblcatedescription = New System.Windows.Forms.Label() + Me.lblcategory = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.decider = New System.Windows.Forms.Timer(Me.components) + Me.Label6 = New System.Windows.Forms.Label() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.tmrstoryline = New System.Windows.Forms.Timer(Me.components) + Me.pnlintro.SuspendLayout() + Me.pnlcategorydisplay.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.SuspendLayout() + ' + 'ListBox1 + ' + Me.ListBox1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.ListBox1.BackColor = System.Drawing.Color.White + Me.ListBox1.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.ListBox1.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed + Me.ListBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.ListBox1.ForeColor = System.Drawing.Color.Black + Me.ListBox1.FormattingEnabled = True + Me.ListBox1.ItemHeight = 24 + Me.ListBox1.Items.AddRange(New Object() {"Animals", "Countries", "Fruits"}) + Me.ListBox1.Location = New System.Drawing.Point(9, 49) + Me.ListBox1.Name = "ListBox1" + Me.ListBox1.Size = New System.Drawing.Size(175, 216) + Me.ListBox1.TabIndex = 0 + ' + 'pnlintro + ' + Me.pnlintro.Controls.Add(Me.pnlcategorydisplay) + Me.pnlintro.Controls.Add(Me.Label4) + Me.pnlintro.Controls.Add(Me.Label3) + Me.pnlintro.Controls.Add(Me.Label2) + Me.pnlintro.Controls.Add(Me.Label1) + Me.pnlintro.Location = New System.Drawing.Point(190, 0) + Me.pnlintro.Name = "pnlintro" + Me.pnlintro.Size = New System.Drawing.Size(479, 272) + Me.pnlintro.TabIndex = 1 + ' + 'pnlcategorydisplay + ' + Me.pnlcategorydisplay.Controls.Add(Me.lblnextreward) + Me.pnlcategorydisplay.Controls.Add(Me.guessbox) + Me.pnlcategorydisplay.Controls.Add(Me.lblcurrentlevel) + Me.pnlcategorydisplay.Controls.Add(Me.Label5) + Me.pnlcategorydisplay.Controls.Add(Me.listblistedstuff) + Me.pnlcategorydisplay.Controls.Add(Me.lbltillnextlevel) + Me.pnlcategorydisplay.Controls.Add(Me.lbltotal) + Me.pnlcategorydisplay.Controls.Add(Me.btnstart) + Me.pnlcategorydisplay.Controls.Add(Me.lblcatedescription) + Me.pnlcategorydisplay.Controls.Add(Me.lblcategory) + Me.pnlcategorydisplay.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlcategorydisplay.ForeColor = System.Drawing.Color.Black + Me.pnlcategorydisplay.Location = New System.Drawing.Point(0, 0) + Me.pnlcategorydisplay.Name = "pnlcategorydisplay" + Me.pnlcategorydisplay.Size = New System.Drawing.Size(479, 272) + Me.pnlcategorydisplay.TabIndex = 2 + ' + 'lblnextreward + ' + Me.lblnextreward.AutoSize = True + Me.lblnextreward.Font = New System.Drawing.Font("Palatino Linotype", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblnextreward.Location = New System.Drawing.Point(36, 110) + Me.lblnextreward.Name = "lblnextreward" + Me.lblnextreward.Size = New System.Drawing.Size(244, 20) + Me.lblnextreward.TabIndex = 11 + Me.lblnextreward.Text = "Reward for completing level 1: 5CP" + Me.lblnextreward.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'guessbox + ' + Me.guessbox.BackColor = System.Drawing.Color.White + Me.guessbox.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.guessbox.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.guessbox.ForeColor = System.Drawing.Color.Black + Me.guessbox.Location = New System.Drawing.Point(11, 147) + Me.guessbox.Multiline = True + Me.guessbox.Name = "guessbox" + Me.guessbox.Size = New System.Drawing.Size(297, 45) + Me.guessbox.TabIndex = 9 + Me.guessbox.Text = "Enter Guess Here" + Me.guessbox.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'lblcurrentlevel + ' + Me.lblcurrentlevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblcurrentlevel.Location = New System.Drawing.Point(-6, 77) + Me.lblcurrentlevel.Name = "lblcurrentlevel" + Me.lblcurrentlevel.Size = New System.Drawing.Size(331, 42) + Me.lblcurrentlevel.TabIndex = 8 + Me.lblcurrentlevel.Text = "Current Level: 1" + Me.lblcurrentlevel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(340, 12) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(123, 18) + Me.Label5.TabIndex = 7 + Me.Label5.Text = "All Ready Done" + ' + 'listblistedstuff + ' + Me.listblistedstuff.BackColor = System.Drawing.Color.Black + Me.listblistedstuff.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.listblistedstuff.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed + Me.listblistedstuff.ForeColor = System.Drawing.Color.White + Me.listblistedstuff.FormattingEnabled = True + Me.listblistedstuff.Location = New System.Drawing.Point(340, 41) + Me.listblistedstuff.Name = "listblistedstuff" + Me.listblistedstuff.ScrollAlwaysVisible = True + Me.listblistedstuff.Size = New System.Drawing.Size(129, 221) + Me.listblistedstuff.TabIndex = 6 + ' + 'lbltillnextlevel + ' + Me.lbltillnextlevel.AutoSize = True + Me.lbltillnextlevel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltillnextlevel.Location = New System.Drawing.Point(8, 250) + Me.lbltillnextlevel.Name = "lbltillnextlevel" + Me.lbltillnextlevel.Size = New System.Drawing.Size(146, 16) + Me.lbltillnextlevel.TabIndex = 5 + Me.lbltillnextlevel.Text = "Words Until Next Level:" + ' + 'lbltotal + ' + Me.lbltotal.AutoSize = True + Me.lbltotal.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltotal.Location = New System.Drawing.Point(191, 250) + Me.lbltotal.Name = "lbltotal" + Me.lbltotal.Size = New System.Drawing.Size(66, 16) + Me.lbltotal.TabIndex = 3 + Me.lbltotal.Text = "Guessed:" + ' + 'btnstart + ' + Me.btnstart.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnstart.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnstart.Location = New System.Drawing.Point(11, 198) + Me.btnstart.Name = "btnstart" + Me.btnstart.Size = New System.Drawing.Size(297, 46) + Me.btnstart.TabIndex = 2 + Me.btnstart.Text = "Submit Word" + Me.btnstart.UseVisualStyleBackColor = True + ' + 'lblcatedescription + ' + Me.lblcatedescription.Location = New System.Drawing.Point(11, 48) + Me.lblcatedescription.Name = "lblcatedescription" + Me.lblcatedescription.Size = New System.Drawing.Size(297, 26) + Me.lblcatedescription.TabIndex = 1 + Me.lblcatedescription.Text = "There are many animals out there! Can you list them all? " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Note that this is a li" & _ + "st of common animals, not every animal!" + Me.lblcatedescription.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblcategory + ' + Me.lblcategory.Font = New System.Drawing.Font("Microsoft Sans Serif", 26.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblcategory.Location = New System.Drawing.Point(11, 8) + Me.lblcategory.Name = "lblcategory" + Me.lblcategory.Size = New System.Drawing.Size(297, 39) + Me.lblcategory.TabIndex = 0 + Me.lblcategory.Text = "Animals" + Me.lblcategory.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(52, 235) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(382, 20) + Me.Label4.TabIndex = 3 + Me.Label4.Text = "Select A Category On the Left To Start Playing" + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(187, 72) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(112, 20) + Me.Label3.TabIndex = 2 + Me.Label3.Text = "How To Play:" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(61, 97) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(354, 96) + Me.Label2.TabIndex = 1 + Me.Label2.Text = resources.GetString("Label2.Text") + Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.ForeColor = System.Drawing.Color.Black + Me.Label1.Location = New System.Drawing.Point(75, 12) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(316, 25) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Welcome to Knowledge Input" + ' + 'decider + ' + Me.decider.Interval = 500 + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Font = New System.Drawing.Font("Cambria", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(30, 8) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(130, 28) + Me.Label6.TabIndex = 8 + Me.Label6.Text = "Categories" + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.pnlintro) + Me.pgcontents.Controls.Add(Me.Label6) + Me.pgcontents.Controls.Add(Me.ListBox1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(669, 272) + Me.pgcontents.TabIndex = 10 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(673, 30) + Me.titlebar.TabIndex = 9 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(224, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(252, 4) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(280, 4) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 19 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(131, 18) + Me.lbtitletext.TabIndex = 18 + Me.lbtitletext.Text = "Knowledge Input" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(671, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 274) + Me.pgleft.TabIndex = 11 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 272) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(671, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 274) + Me.pgright.TabIndex = 12 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 272) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 302) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(669, 2) + Me.pgbottom.TabIndex = 13 + ' + 'tmrstoryline + ' + Me.tmrstoryline.Interval = 1000 + ' + 'Knowledge_Input + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(673, 304) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.KeyPreview = True + Me.Name = "Knowledge_Input" + Me.Text = "Knowledge_Input" + Me.TopMost = True + Me.pnlintro.ResumeLayout(False) + Me.pnlintro.PerformLayout() + Me.pnlcategorydisplay.ResumeLayout(False) + Me.pnlcategorydisplay.PerformLayout() + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents ListBox1 As System.Windows.Forms.ListBox + Friend WithEvents pnlintro As System.Windows.Forms.Panel + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents pnlcategorydisplay As System.Windows.Forms.Panel + Friend WithEvents lblcategory As System.Windows.Forms.Label + Friend WithEvents btnstart As System.Windows.Forms.Button + Friend WithEvents lblcatedescription As System.Windows.Forms.Label + Friend WithEvents lbltillnextlevel As System.Windows.Forms.Label + Friend WithEvents lbltotal As System.Windows.Forms.Label + Friend WithEvents listblistedstuff As System.Windows.Forms.ListBox + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents guessbox As System.Windows.Forms.TextBox + Friend WithEvents lblcurrentlevel As System.Windows.Forms.Label + Friend WithEvents decider As System.Windows.Forms.Timer + Friend WithEvents lblnextreward As System.Windows.Forms.Label + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents tmrstoryline As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/Knowledge Input.resx b/ShiftOS/Knowledge Input.resx new file mode 100644 index 0000000..c1ab29a --- /dev/null +++ b/ShiftOS/Knowledge Input.resx @@ -0,0 +1,134 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Your goal in this game is to list as many words as possible +from a certain category of objects such as "Animals". + +You start off on level 1 and your goal is to list 10 words to +reach the next level. Upon reaching each new level you will +be rewarded with an increasing number of code points. + + + 106, 17 + + + 259, 13 + + \ No newline at end of file diff --git a/ShiftOS/Knowledge Input.vb b/ShiftOS/Knowledge Input.vb new file mode 100644 index 0000000..b9bede4 --- /dev/null +++ b/ShiftOS/Knowledge Input.vb @@ -0,0 +1,1720 @@ +Public Class Knowledge_Input + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + Public ShiftOSPath As String = "C:\ShiftOS" + + Dim guessalreadydone As Boolean + Dim guesscorrect As Boolean + Dim levelup As Boolean + Dim rewardbase As Integer + Dim savecontent() As String + + Dim totalguessed As Integer + Dim level As Integer + Dim tillnextlevel As Integer + + Dim animalslist(226) As String + Dim fruitslist(75) As String + Dim countrieslist(204) As String + Dim carbrandslist(328) As String + Dim gameconsoleslist(124) As String + Dim elementslist(117) As String + + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + pnlintro.Show() + pnlintro.BringToFront() + pnlcategorydisplay.Hide() + makeanimallist() + makecarbrandslist() + makecountrieslist() + makeelementslist() + makefruitlist() + makegameconsoleslist() + If ShiftOSDesktop.boughtkicarbrands = True Then + If ListBox1.Items.Contains("Car Brands") Then + Else + ListBox1.Items.Add("Car Brands") + End If + End If + + If ShiftOSDesktop.boughtkigameconsoles = True Then + If ListBox1.Items.Contains("Game Consoles") Then + Else + ListBox1.Items.Add("Game Consoles") + End If + End If + + If ShiftOSDesktop.boughtkielements = True Then + If ListBox1.Items.Contains("Elements") Then + Else + ListBox1.Items.Add("Elements") + End If + End If + If ShiftOSDesktop.KnowledgeInputCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + If ShiftOSDesktop.boughtgray4 = True And ShiftOSDesktop.boughtshiftnet = False Then tmrstoryline.Start() + + ShiftOSDesktop.pnlpanelbuttonknowledgeinput.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonknowledgeinput, ShiftOSDesktop.tbknowledgeinputicon, ShiftOSDesktop.tbknowledgeinputtext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(673, 304) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.knowledgeinputname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.knowledgeinputicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub ListBox1_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles ListBox1.DrawItem + e.DrawBackground() + If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then + e.Graphics.FillRectangle(Brushes.Black, e.Bounds) + End If + Dim sf As New StringFormat + sf.Alignment = StringAlignment.Center + Using b As New SolidBrush(e.ForeColor) + e.Graphics.DrawString(ListBox1.GetItemText(ListBox1.Items(e.Index)), e.Font, b, e.Bounds, sf) + End Using + e.DrawFocusRectangle() + End Sub + + Private Sub listblistedstuff_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles listblistedstuff.DrawItem + e.DrawBackground() + If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then + e.Graphics.FillRectangle(Brushes.Black, e.Bounds) + End If + + Using b As New SolidBrush(e.ForeColor) + e.Graphics.DrawString(listblistedstuff.GetItemText(listblistedstuff.Items(e.Index)), e.Font, b, e.Bounds) + End Using + e.DrawFocusRectangle() + End Sub + + + Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged + + On Error Resume Next + pnlcategorydisplay.Show() + 'Remember to create the files for each category in the hijack screen and add the category in the design view and make the countries list in this load event + Select Case ListBox1.SelectedItem.ToString + Case "Animals" + loadsavepoint("Animals", 10, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Animals.lst", "There are many animals out there! Can you list them all?" & Environment.NewLine & "Note that you get points for listing animals... not animal breeds!", animalslist) + + Case "Fruits" + loadsavepoint("Fruits", 10, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Fruits.lst", "Do you get your daily serving of fruit each day?" & Environment.NewLine & "Really...? See if you can list them then ;)", fruitslist) + + Case "Countries" + loadsavepoint("Countries", 10, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Countries.lst", "Ever wanted to travel the entire world?" & Environment.NewLine & "Well before you do see if you can list every country in the world!", countrieslist) + + Case "Car Brands" + loadsavepoint("Car Brands", 10, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Car Brands.lst", "Can you list every single car brand?" & Environment.NewLine & "Don't use words like automobiles, motors or cars!", carbrandslist) + + Case "Game Consoles" + loadsavepoint("Game Consoles", 10, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Game Consoles.lst", "Do you call yourself a gamer?" & Environment.NewLine & "Earn that title by listing non-handheld game consoles!", gameconsoleslist) + + Case "Elements" + loadsavepoint("Elements", 10, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Elements.lst", "Have you memorized the periodic table of elements?" & Environment.NewLine & "No? Well don't even attempt trying to guess them all here!", elementslist) + End Select + + End Sub + + Private Sub handleword() + + Select Case ListBox1.SelectedItem.ToString + Case "Animals" + handlewordtype(animalslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Animals.lst") + Case "Fruits" + handlewordtype(fruitslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Fruits.lst") + Case "Countries" + handlewordtype(countrieslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Countries.lst") + Case "Car Brands" + handlewordtype(carbrandslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Car Brands.lst") + Case "Game Consoles" + handlewordtype(gameconsoleslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Game Consoles.lst") + Case "Elements" + handlewordtype(elementslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Elements.lst") + End Select + + guessbox.Text = "" + listblistedstuff.TopIndex = listblistedstuff.Items.Count - 1 + End Sub + + Private Sub btnquit_Click(sender As Object, e As EventArgs) + Me.Close() + End Sub + + Private Sub btnstart_Click(sender As Object, e As EventArgs) Handles btnstart.Click + handleword() + End Sub + + Private Sub guessbox_click(sender As Object, e As EventArgs) Handles guessbox.MouseClick + guessbox.Text = "" + End Sub + + Private Sub guessbox_keydown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles guessbox.KeyDown + If e.KeyCode = Keys.Enter Then + e.SuppressKeyPress = True + handleword() + End If + End Sub + + Private Sub decider_Tick(sender As Object, e As EventArgs) Handles decider.Tick + lblcurrentlevel.Text = "Current Level: " & level + lblnextreward.Text = "Reward for completing level " & level & " : " & rewardbase * level & "CP" + guessalreadydone = False + guesscorrect = False + levelup = False + decider.Interval = 500 + decider.Stop() + End Sub + + Private Sub loadsavepoint(ByVal title As String, ByVal reward As Integer, ByVal loadpath As String, ByVal info As String, ByVal listtype() As String) + lblcategory.Text = title + rewardbase = reward + listblistedstuff.Items.Clear() + listblistedstuff.Items.AddRange(IO.File.ReadAllLines(loadpath)) + totalguessed = listblistedstuff.Items.Count + level = Math.Ceiling((totalguessed / 10)) + tillnextlevel = Math.Abs(totalguessed - (level * 10)) + + If tillnextlevel = 0 Then + level = level + 1 + tillnextlevel = 10 + End If + + lblcatedescription.Text = info + pnlcategorydisplay.Show() + lbltillnextlevel.Text = "Words Until Next Level: " & tillnextlevel + lblcurrentlevel.Text = "Current Level: " & level + lbltotal.Text = "Guessed: " & totalguessed & "/" & listtype.Length + lblnextreward.Text = "Reward for completing level " & level & " : " & rewardbase * level & "CP" + End Sub + + Private Sub handlewordtype(ByVal listtype() As String, ByVal savepath As String) + + Dim userguess As String = guessbox.Text + userguess = userguess.ToLower + For Each Str As String In listtype + If Str = userguess Then + If listblistedstuff.Items.Contains(userguess) Then + guessalreadydone = True + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " Knowledge Input Already Did " & ListBox1.SelectedItem.ToString & ": " & userguess & Environment.NewLine + Else + guesscorrect = True + listblistedstuff.Items.Add(userguess) + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " Knowledge Input Guessed " & ListBox1.SelectedItem.ToString & ": " & userguess & Environment.NewLine + tillnextlevel = tillnextlevel - 1 + totalguessed = totalguessed + 1 + IO.File.WriteAllLines(savepath, listblistedstuff.Items.Cast(Of String).ToArray) + + If tillnextlevel = 0 Then + levelup = True + tillnextlevel = 10 + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + rewardbase * level + Dim objWriter As New System.IO.StreamWriter("C:/ShiftOS/Shiftum42/SKernal.sft", False) + objWriter.Write(ShiftOSDesktop.codepoints) + objWriter.Close() + level = level + 1 + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " Reached " & ListBox1.SelectedItem.ToString & " Level: " & level & Environment.NewLine + End If + End If + End If + Next + lbltillnextlevel.Text = "Words Until Next Level: " & tillnextlevel + lblcurrentlevel.Text = "Current Level: " & level + lbltotal.Text = "Guessed: " & totalguessed & "/" & listtype.Length + lblnextreward.Text = "Reward for completing level " & level & " : " & rewardbase * level & "CP" + + If levelup = True Then + decider.Interval = 2000 + lblcurrentlevel.Text = "Level Up!" + lblnextreward.Text = "You have earned " & rewardbase * (level - 1) & " Code Points!" + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User has " & ShiftOSDesktop.codepoints & " Code Points!" & Environment.NewLine + decider.Start() + Else + If guessalreadydone = True Then + lblcurrentlevel.Text = "Already Guessed" + decider.Start() + Else + If guesscorrect = True Then + lblcurrentlevel.Text = "Correct :)" + decider.Start() + Else + lblcurrentlevel.Text = "Wrong :(" + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " Knowledge Input Wrong " & ListBox1.SelectedItem.ToString & ": " & userguess & Environment.NewLine + decider.Start() + End If + End If + End If + End Sub + + Dim chance As Integer = 101 + Private Sub tmrstoryline_Tick(sender As Object, e As EventArgs) Handles tmrstoryline.Tick + ' Random chance of showing getshiftnet storyline + chance = chance - 1 + If chance < 25 Then + chance = 25 + End If + Dim i As Integer = Math.Ceiling(Rnd() * chance) + If i = 1 Then + Terminal.Show() + Terminal.BringToFront() + Terminal.storyline = "getshiftnet" + Terminal.tmrstorylineupdate.Start() + tmrstoryline.Stop() + End If + End Sub + + Private Sub me_closing() Handles Me.FormClosing + tmrstoryline.Stop() + End Sub + + Private Sub makeanimallist() + animalslist(0) = "aardvark" + animalslist(1) = "albatross" + animalslist(2) = "alligator" + animalslist(3) = "alpaca" + animalslist(4) = "ant" + animalslist(5) = "anteater" + animalslist(6) = "antelope" + animalslist(7) = "ape" + animalslist(8) = "armadillo" + animalslist(9) = "ass" + animalslist(10) = "baboon" + animalslist(11) = "badger" + animalslist(12) = "barracuda" + animalslist(13) = "bat" + animalslist(14) = "bear" + animalslist(15) = "beaver" + animalslist(16) = "bee" + animalslist(17) = "bison" + animalslist(18) = "boar" + animalslist(19) = "buffalo" + animalslist(20) = "butterfly" + animalslist(21) = "camel" + animalslist(22) = "caribou" + animalslist(23) = "cat" + animalslist(24) = "caterpillar" + animalslist(25) = "cow" + animalslist(26) = "chamois" + animalslist(27) = "cheetah" + animalslist(28) = "chicken" + animalslist(29) = "chimpanzee" + animalslist(30) = "chinchilla" + animalslist(31) = "chough" + animalslist(32) = "clam" + animalslist(33) = "cobra" + animalslist(34) = "cockroach" + animalslist(35) = "cod" + animalslist(36) = "cormorant" + animalslist(37) = "coyote" + animalslist(38) = "crab" + animalslist(39) = "crane" + animalslist(40) = "crocodile" + animalslist(41) = "crow" + animalslist(42) = "curlew" + animalslist(43) = "deer" + animalslist(44) = "dinosaur" + animalslist(45) = "dog" + animalslist(46) = "dogfish" + animalslist(47) = "dolphin" + animalslist(48) = "donkey" + animalslist(49) = "dotterel" + animalslist(50) = "dove" + animalslist(51) = "dragonfly" + animalslist(52) = "duck" + animalslist(53) = "dugong" + animalslist(54) = "dunlin" + animalslist(55) = "eagle" + animalslist(56) = "echidna" + animalslist(57) = "eel" + animalslist(58) = "eland" + animalslist(59) = "elephant" + animalslist(60) = "elephant seal" + animalslist(61) = "elk" + animalslist(62) = "emu" + animalslist(63) = "falcon" + animalslist(64) = "ferret" + animalslist(65) = "finch" + animalslist(66) = "fish" + animalslist(67) = "flamingo" + animalslist(68) = "fly" + animalslist(69) = "fox" + animalslist(70) = "frog" + animalslist(71) = "galago" + animalslist(72) = "gaur" + animalslist(73) = "gazelle" + animalslist(74) = "gerbil" + animalslist(75) = "giant panda" + animalslist(76) = "giraffe" + animalslist(77) = "gnat" + animalslist(78) = "gnu" + animalslist(79) = "goat" + animalslist(80) = "goldfinch" + animalslist(81) = "goldfish" + animalslist(82) = "goose" + animalslist(83) = "gorilla" + animalslist(84) = "goshawk" + animalslist(85) = "grasshopper" + animalslist(86) = "grouse" + animalslist(87) = "guanaco" + animalslist(88) = "guineafowl" + animalslist(89) = "guinea pig" + animalslist(90) = "gull" + animalslist(91) = "hamster" + animalslist(92) = "hare" + animalslist(93) = "hawk" + animalslist(94) = "hedgehog" + animalslist(95) = "heron" + animalslist(96) = "herring" + animalslist(97) = "hippopotamus" + animalslist(98) = "hornet" + animalslist(99) = "horse" + animalslist(100) = "human" + animalslist(101) = "humming bird" + animalslist(102) = "hyena" + animalslist(103) = "jackal" + animalslist(104) = "jaguar" + animalslist(105) = "jay" + animalslist(106) = "jellyfish" + animalslist(107) = "kangaroo" + animalslist(108) = "koala" + animalslist(109) = "komodo dragon" + animalslist(110) = "kouprey" + animalslist(111) = "kudu" + animalslist(112) = "lizard" + animalslist(113) = "lark" + animalslist(114) = "lemur" + animalslist(115) = "leopard" + animalslist(116) = "lion" + animalslist(117) = "llama" + animalslist(118) = "lobster" + animalslist(119) = "locust" + animalslist(120) = "loris" + animalslist(121) = "louse" + animalslist(122) = "lyrebird" + animalslist(123) = "magpie" + animalslist(124) = "mallard" + animalslist(125) = "manatee" + animalslist(126) = "marten" + animalslist(127) = "meerkat" + animalslist(128) = "mink" + animalslist(129) = "mole" + animalslist(130) = "monkey" + animalslist(131) = "moose" + animalslist(132) = "mosquito" + animalslist(133) = "mouse" + animalslist(134) = "mule" + animalslist(135) = "narwhal" + animalslist(136) = "newt" + animalslist(137) = "nightingale" + animalslist(138) = "octopus" + animalslist(139) = "okapi" + animalslist(140) = "opossum" + animalslist(141) = "oryx" + animalslist(142) = "ostrich" + animalslist(143) = "otter" + animalslist(144) = "owl" + animalslist(145) = "ox" + animalslist(146) = "oyster" + animalslist(147) = "panther" + animalslist(148) = "parrot" + animalslist(149) = "partridge" + animalslist(150) = "peafowl" + animalslist(151) = "pelican" + animalslist(152) = "penguin" + animalslist(153) = "pheasant" + animalslist(154) = "pig" + animalslist(155) = "pigeon" + animalslist(156) = "pony" + animalslist(157) = "porcupine" + animalslist(158) = "porpoise" + animalslist(159) = "prairie dog" + animalslist(160) = "quail" + animalslist(161) = "quelea" + animalslist(162) = "rabbit" + animalslist(163) = "raccoon" + animalslist(164) = "rail" + animalslist(165) = "ram" + animalslist(166) = "rat" + animalslist(167) = "raven" + animalslist(168) = "red deer" + animalslist(169) = "red panda" + animalslist(170) = "reindeer" + animalslist(171) = "rhinoceros" + animalslist(172) = "rook" + animalslist(173) = "ruff" + animalslist(174) = "salamander" + animalslist(175) = "salmon" + animalslist(176) = "sand dollar" + animalslist(177) = "sandpiper" + animalslist(178) = "sardine" + animalslist(179) = "scorpion" + animalslist(180) = "sea lion" + animalslist(181) = "sea urchin" + animalslist(182) = "seahorse" + animalslist(183) = "seal" + animalslist(184) = "shark" + animalslist(185) = "sheep" + animalslist(186) = "shrew" + animalslist(187) = "shrimp" + animalslist(188) = "skunk" + animalslist(189) = "snail" + animalslist(190) = "snake" + animalslist(191) = "spider" + animalslist(192) = "squid" + animalslist(193) = "squirrel" + animalslist(194) = "starling" + animalslist(195) = "stingray" + animalslist(196) = "stink bug" + animalslist(197) = "stork" + animalslist(198) = "swallow" + animalslist(199) = "swan" + animalslist(200) = "tapir" + animalslist(201) = "tarsier" + animalslist(202) = "termite" + animalslist(203) = "tiger" + animalslist(204) = "toad" + animalslist(205) = "trout" + animalslist(206) = "turkey" + animalslist(207) = "turtle" + animalslist(208) = "vicuña" + animalslist(209) = "viper" + animalslist(210) = "vulture" + animalslist(211) = "wallaby" + animalslist(212) = "walrus" + animalslist(213) = "wasp" + animalslist(214) = "water buffalo" + animalslist(215) = "weasel" + animalslist(216) = "whale" + animalslist(217) = "wolf" + animalslist(218) = "wolverine" + animalslist(219) = "wombat" + animalslist(220) = "woodcock" + animalslist(221) = "woodpecker" + animalslist(222) = "worm" + animalslist(223) = "wren" + animalslist(224) = "yak" + animalslist(225) = "zebra" + animalslist(226) = "bird" + End Sub + + Private Sub makefruitlist() + fruitslist(0) = "apple" + fruitslist(1) = "apricot" + fruitslist(2) = "avocado" + fruitslist(3) = "banana" + fruitslist(4) = "breadfruit" + fruitslist(5) = "bilberry" + fruitslist(6) = "blackberry" + fruitslist(7) = "blackcurrant" + fruitslist(8) = "blueberry" + fruitslist(9) = "boysenberry" + fruitslist(10) = "cantaloupe" + fruitslist(11) = "currant" + fruitslist(12) = "cherry" + fruitslist(13) = "cherimoya" + fruitslist(14) = "chili" + fruitslist(15) = "cloudberry" + fruitslist(16) = "coconut" + fruitslist(17) = "damson" + fruitslist(18) = "date" + fruitslist(19) = "dragonfruit" + fruitslist(20) = "durian" + fruitslist(21) = "elderberry" + fruitslist(22) = "feijoa" + fruitslist(23) = "fig" + fruitslist(24) = "gooseberry" + fruitslist(25) = "grape" + fruitslist(26) = "grapefruit" + fruitslist(27) = "guava" + fruitslist(28) = "huckleberry" + fruitslist(29) = "honeydew" + fruitslist(30) = "jackfruit" + fruitslist(31) = "jambul" + fruitslist(32) = "jujube" + fruitslist(33) = "kiwi fruit" + fruitslist(34) = "kumquat" + fruitslist(35) = "legume" + fruitslist(36) = "lemon" + fruitslist(37) = "lime" + fruitslist(38) = "loquat" + fruitslist(39) = "lychee" + fruitslist(40) = "mango" + fruitslist(41) = "melon" + fruitslist(42) = "canary melon" + fruitslist(43) = "cantaloupe" + fruitslist(44) = "honeydew" + fruitslist(45) = "watermelon" + fruitslist(46) = "rock melon" + fruitslist(47) = "nectarine" + fruitslist(48) = "nut" + fruitslist(49) = "orange" + fruitslist(50) = "clementine" + fruitslist(51) = "mandarine" + fruitslist(52) = "tangerine" + fruitslist(53) = "papaya" + fruitslist(54) = "passionfruit" + fruitslist(55) = "peach" + fruitslist(56) = "bell pepper" + fruitslist(57) = "pear" + fruitslist(58) = "persimmon" + fruitslist(59) = "physalis" + fruitslist(60) = "plum" + fruitslist(61) = "pineapple" + fruitslist(62) = "pomegranate" + fruitslist(63) = "pomelo" + fruitslist(64) = "purple mangosteen" + fruitslist(65) = "quince" + fruitslist(66) = "raspberry" + fruitslist(67) = "rambutan" + fruitslist(68) = "redcurrant" + fruitslist(69) = "salal berry" + fruitslist(70) = "satsuma" + fruitslist(71) = "star fruit" + fruitslist(72) = "strawberry" + fruitslist(73) = "tamarillo" + fruitslist(74) = "tomato" + fruitslist(75) = "ugli fruit" + End Sub + + Private Sub makecountrieslist() 'Based off United Nations member list with additions such as Vatican City - see this video about what a coutry is: https://www.youtube.com/watch?v=4AivEQmfPpk + countrieslist(0) = "afghanistan" + countrieslist(1) = "albania" + countrieslist(2) = "algeria" + countrieslist(3) = "antigua and barbuda" + countrieslist(4) = "andorra" + countrieslist(5) = "angola" + countrieslist(8) = "argentina" + countrieslist(9) = "armenia" + countrieslist(10) = "australia" + countrieslist(12) = "austria" + countrieslist(14) = "azerbaijan" + countrieslist(15) = "bahamas" + countrieslist(16) = "bahrain" + countrieslist(17) = "bangladesh" + countrieslist(18) = "barbados" + countrieslist(19) = "belarus" + countrieslist(20) = "belgium" + countrieslist(21) = "belize" + countrieslist(22) = "benin" + countrieslist(23) = "bhutan" + countrieslist(24) = "bolivia" + countrieslist(25) = "bosnia" + countrieslist(26) = "botswana" + countrieslist(27) = "brunei darussalam" + countrieslist(28) = "brazil" + countrieslist(29) = "cabo verde" + countrieslist(30) = "bulgaria" + countrieslist(31) = "burkina faso" + countrieslist(32) = "burundi" + countrieslist(33) = "cambodia" + countrieslist(34) = "cameroon" + countrieslist(35) = "canada" + countrieslist(36) = "central african republic" + countrieslist(37) = "chad" + countrieslist(38) = "chile" + countrieslist(39) = "china" + countrieslist(40) = "democratic people's republic of korea" + countrieslist(41) = "colombia" + countrieslist(42) = "comoros" + countrieslist(43) = "congo" + countrieslist(44) = "côte d'ivoire" + countrieslist(45) = "cook islands" + countrieslist(46) = "costa rica" + countrieslist(47) = "croatia" + countrieslist(48) = "cuba" + countrieslist(49) = "cyprus" + countrieslist(50) = "czech republic" + countrieslist(51) = "denmark" + countrieslist(52) = "djibouti" + countrieslist(53) = "dominica" + countrieslist(54) = "dominican republic" + countrieslist(55) = "ecuador" + countrieslist(56) = "egypt" + countrieslist(57) = "el salvador" + countrieslist(58) = "equatorial guinea" + countrieslist(59) = "eritrea" + countrieslist(60) = "estonia" + countrieslist(62) = "ethiopia" + countrieslist(63) = "fiji" + countrieslist(64) = "finland" + countrieslist(65) = "france" + countrieslist(66) = "gabon" + countrieslist(67) = "gambia" + countrieslist(68) = "georgia" + countrieslist(69) = "germany" + countrieslist(70) = "ghana" + countrieslist(71) = "greece" + countrieslist(72) = "greenland" + countrieslist(73) = "grenada" + countrieslist(74) = "guatemala" + countrieslist(75) = "guinea" + countrieslist(76) = "guinea bissau" + countrieslist(77) = "guyana" + countrieslist(78) = "haiti" + countrieslist(79) = "vatican city" + countrieslist(80) = "honduras" + countrieslist(81) = "hungary" + countrieslist(82) = "iceland" + countrieslist(83) = "india" + countrieslist(84) = "indonesia" + countrieslist(85) = "iran" + countrieslist(86) = "iraq" + countrieslist(87) = "ireland" + countrieslist(88) = "israel" + countrieslist(89) = "italy" + countrieslist(90) = "jamaica" + countrieslist(91) = "japan" + countrieslist(92) = "jordan" + countrieslist(93) = "kazakhstan" + countrieslist(94) = "kenya" + countrieslist(95) = "kiribati" + countrieslist(96) = "kuwait" + countrieslist(97) = "kyrgyzstan" + countrieslist(98) = "lao people's democratic republic" + countrieslist(99) = "latvia" + countrieslist(100) = "lebanon" + countrieslist(101) = "lesotho" + countrieslist(102) = "liberia" + countrieslist(103) = "libya" + countrieslist(104) = "liechtenstein" + countrieslist(105) = "lithuania" + countrieslist(106) = "luxembourg" + countrieslist(107) = "madagascar" + countrieslist(108) = "malawi" + countrieslist(109) = "malaysia" + countrieslist(110) = "maldives" + countrieslist(111) = "mali" + countrieslist(112) = "malta" + countrieslist(113) = "marshall islands" + countrieslist(114) = "mauritania" + countrieslist(115) = "mauritius" + countrieslist(116) = "mexico" + countrieslist(117) = "micronesia" + countrieslist(118) = "monaco" + countrieslist(119) = "mongolia" + countrieslist(120) = "montenegro" + countrieslist(121) = "morocco" + countrieslist(122) = "mozambique" + countrieslist(123) = "myanmar" + countrieslist(124) = "namibia" + countrieslist(125) = "nauru" + countrieslist(126) = "nepal" + countrieslist(127) = "netherlands" + countrieslist(128) = "new zealand" + countrieslist(129) = "nicaragua" + countrieslist(130) = "niger" + countrieslist(131) = "nigeria" + countrieslist(132) = "north korea" + countrieslist(133) = "norway" + countrieslist(134) = "oman" + countrieslist(135) = "pakistan" + countrieslist(136) = "palau" + countrieslist(137) = "panama" + countrieslist(138) = "papua new guinea" + countrieslist(139) = "paraguay" + countrieslist(140) = "peru" + countrieslist(141) = "philippines" + countrieslist(142) = "republic of moldova" + countrieslist(143) = "poland" + countrieslist(144) = "polynesia" + countrieslist(145) = "portugal" + countrieslist(146) = "republic of korea" + countrieslist(147) = "romania" + countrieslist(148) = "russia" + countrieslist(149) = "rwanda" + countrieslist(150) = "saint kitts and nevis" + countrieslist(151) = "saint lucia" + countrieslist(152) = "saint pierre and miquelon" + countrieslist(153) = "saint vincent and grenadines" + countrieslist(154) = "samoa" + countrieslist(155) = "san marino" + countrieslist(156) = "sao tome and principe" + countrieslist(157) = "saudi arabia" + countrieslist(158) = "senegal" + countrieslist(159) = "serbia" + countrieslist(160) = "seychelles" + countrieslist(161) = "sierra leone" + countrieslist(162) = "singapore" + countrieslist(163) = "slovakia" + countrieslist(164) = "slovenia" + countrieslist(165) = "solomon islands" + countrieslist(166) = "somalia" + countrieslist(167) = "south africa" + countrieslist(168) = "south korea" + countrieslist(169) = "south sudan" + countrieslist(170) = "spain" + countrieslist(171) = "sri lanka" + countrieslist(172) = "sudan" + countrieslist(173) = "suriname" + countrieslist(174) = "syrian arab republic" + countrieslist(175) = "swaziland" + countrieslist(176) = "sweden" + countrieslist(177) = "switzerland" + countrieslist(178) = "syria" + countrieslist(179) = "taiwan" + countrieslist(180) = "tajikistan" + countrieslist(181) = "thailand" + countrieslist(182) = "east timor" + countrieslist(183) = "togo" + countrieslist(184) = "tonga" + countrieslist(185) = "trinidad and tobago" + countrieslist(186) = "tunisia" + countrieslist(187) = "turkey" + countrieslist(188) = "turkmenistan" + countrieslist(189) = "united republic of tanzania" + countrieslist(190) = "tuvalu" + countrieslist(191) = "uganda" + countrieslist(192) = "ukraine" + countrieslist(193) = "united arab emirates" + countrieslist(194) = "united kingdom" '(of Great Britian and Northern Ireland) + countrieslist(195) = "united states" + countrieslist(196) = "uruguay" + countrieslist(197) = "uzbekistan" + countrieslist(198) = "vanuatu" + countrieslist(199) = "venezuela" + countrieslist(200) = "vietnam" + countrieslist(201) = "palestine" + countrieslist(202) = "yemen" + countrieslist(203) = "zambia" + countrieslist(204) = "zimbabwe" + End Sub + + Public Sub makecarbrandslist() + carbrandslist(0) = "8 chinkara" + carbrandslist(1) = "aba" + carbrandslist(2) = "abarth" + carbrandslist(3) = "ac" + carbrandslist(4) = "ac schnitzer" + carbrandslist(5) = "acura" + carbrandslist(6) = "adam" + carbrandslist(7) = "adams-farwell" + carbrandslist(8) = "adler" + carbrandslist(9) = "aero" + carbrandslist(10) = "aga" + carbrandslist(11) = "agrale" + carbrandslist(12) = "aixam" + carbrandslist(13) = "alfa romeo" + carbrandslist(14) = "allard" + carbrandslist(15) = "alpine" + carbrandslist(16) = "alvis" + carbrandslist(17) = "anadol" + carbrandslist(18) = "anasagasti" + carbrandslist(19) = "angkor" + carbrandslist(20) = "apollo" + carbrandslist(21) = "armstrong siddeley" + carbrandslist(22) = "aro" + carbrandslist(23) = "ascari" + carbrandslist(24) = "ashok leyland" + carbrandslist(25) = "aston martin" + carbrandslist(26) = "auburn" + carbrandslist(27) = "audi" + carbrandslist(28) = "austin" + carbrandslist(29) = "austin-healey" + carbrandslist(30) = "auto-mixte" + carbrandslist(31) = "autobianchi" + carbrandslist(32) = "automobile dacia" + carbrandslist(33) = "avia" + carbrandslist(34) = "avtoframos" + carbrandslist(35) = "awz" + carbrandslist(36) = "bahman" + carbrandslist(37) = "bajaj" + carbrandslist(38) = "barkas" + carbrandslist(39) = "bate" + carbrandslist(40) = "bentley" + carbrandslist(41) = "bharath benz" + carbrandslist(42) = "bitter" + carbrandslist(43) = "bmc" + carbrandslist(44) = "bmw" + carbrandslist(45) = "bollore" + carbrandslist(46) = "borgward" + carbrandslist(47) = "bricklin" + carbrandslist(48) = "bristol" + carbrandslist(49) = "british leyland" + carbrandslist(50) = "bufori" + carbrandslist(51) = "bugatti" + carbrandslist(52) = "buick" + carbrandslist(53) = "bussing" + carbrandslist(54) = "c-fee" + carbrandslist(55) = "cadillac" + carbrandslist(56) = "callaway" + carbrandslist(57) = "caterham" + carbrandslist(58) = "cherdchai" + carbrandslist(59) = "chevrolet" + carbrandslist(60) = "chrysler" + carbrandslist(61) = "citroen" + carbrandslist(62) = "cizeta" + carbrandslist(63) = "coda" + carbrandslist(64) = "cord" + carbrandslist(65) = "crespi" + carbrandslist(66) = "crobus" + carbrandslist(67) = "daf" + carbrandslist(68) = "daihatsu" + carbrandslist(69) = "daimler" + carbrandslist(70) = "datsun" + carbrandslist(71) = "davis" + carbrandslist(72) = "dc design" + carbrandslist(73) = "de tomaso" + carbrandslist(74) = "delorean" + carbrandslist(75) = "derby" + carbrandslist(76) = "dina" + carbrandslist(77) = "dkw" + carbrandslist(78) = "knowledgeinput" + carbrandslist(79) = "dok-ing" + carbrandslist(80) = "dok-ing xd" + carbrandslist(81) = "dome" + carbrandslist(82) = "donkervoort" + carbrandslist(83) = "dr" + carbrandslist(84) = "duesenberg" + carbrandslist(85) = "e-z-go" + carbrandslist(86) = "eagle" + carbrandslist(87) = "edsel" + carbrandslist(88) = "eicher" + carbrandslist(89) = "elfin" + carbrandslist(90) = "elva" + carbrandslist(91) = "enzmann" + carbrandslist(92) = "essex" + carbrandslist(93) = "esther" + carbrandslist(94) = "exagon" + carbrandslist(95) = "falcon" + carbrandslist(96) = "fap" + carbrandslist(97) = "ferrari" + carbrandslist(98) = "fiat" + carbrandslist(99) = "fisker" + carbrandslist(100) = "force" + carbrandslist(101) = "ford" + carbrandslist(102) = "fpv" + carbrandslist(103) = "gaz" + carbrandslist(104) = "gengatharan" + carbrandslist(105) = "geo" + carbrandslist(106) = "ghandhara" + carbrandslist(107) = "ghandhara nissan" + carbrandslist(108) = "gillet" + carbrandslist(109) = "ginetta" + carbrandslist(110) = "gkd" + carbrandslist(111) = "glas" + carbrandslist(112) = "global electric" + carbrandslist(113) = "gm daewoo" + carbrandslist(114) = "gm uzbekistan" + carbrandslist(115) = "gmc" + carbrandslist(116) = "goliath" + carbrandslist(117) = "gordon keeble" + carbrandslist(118) = "graham-paige" + carbrandslist(119) = "guleryuz karoseri" + carbrandslist(120) = "gumpert" + carbrandslist(121) = "gurgel" + carbrandslist(122) = "hansa" + carbrandslist(123) = "hattat" + carbrandslist(124) = "heinkel" + carbrandslist(125) = "hennessey" + carbrandslist(126) = "hero" + carbrandslist(127) = "hillman" + carbrandslist(128) = "hindustan" + carbrandslist(129) = "hino" + carbrandslist(130) = "hinopak" + carbrandslist(131) = "hispano-argentina" + carbrandslist(132) = "holden" + carbrandslist(133) = "hommell" + carbrandslist(134) = "honda" + carbrandslist(135) = "honda atlas" + carbrandslist(136) = "horch" + carbrandslist(137) = "hsv" + carbrandslist(138) = "huet brothers" + carbrandslist(139) = "humber" + carbrandslist(140) = "hummer" + carbrandslist(141) = "hupmobile" + carbrandslist(142) = "hyundai" + carbrandslist(143) = "iame" + carbrandslist(144) = "icml" + carbrandslist(145) = "ida-opel" + carbrandslist(146) = "ika" + carbrandslist(147) = "ikarbus" + carbrandslist(148) = "ikco" + carbrandslist(149) = "indus" + carbrandslist(150) = "infiniti" + carbrandslist(151) = "inokom" + carbrandslist(152) = "intermeccanica" + carbrandslist(153) = "international harvester" + carbrandslist(154) = "isuzu" + carbrandslist(155) = "isuzu anadolu" + carbrandslist(156) = "italika" + carbrandslist(157) = "izh" + carbrandslist(158) = "jaguar cars" + carbrandslist(159) = "jeep" + carbrandslist(160) = "jensen" + carbrandslist(161) = "josse" + carbrandslist(162) = "jowett" + carbrandslist(163) = "jv man" + carbrandslist(164) = "kaipan" + carbrandslist(165) = "kaiser" + carbrandslist(166) = "karsan" + carbrandslist(167) = "kerman" + carbrandslist(168) = "kia" + carbrandslist(169) = "kia" + carbrandslist(170) = "kish khodro" + carbrandslist(171) = "kissel" + carbrandslist(172) = "koenigsegg" + carbrandslist(173) = "lada" + carbrandslist(174) = "laforza" + carbrandslist(175) = "lamborghini" + carbrandslist(176) = "lanchester" + carbrandslist(177) = "lancia" + carbrandslist(178) = "land rover" + carbrandslist(179) = "lasalle" + carbrandslist(180) = "lexus" + carbrandslist(181) = "ligier" + carbrandslist(182) = "lincoln" + carbrandslist(183) = "lister" + carbrandslist(184) = "lloyd" + carbrandslist(185) = "lobini" + carbrandslist(186) = "locomobile" + carbrandslist(187) = "lotus" + carbrandslist(188) = "mahindra" + carbrandslist(189) = "man" + carbrandslist(190) = "mansory" + carbrandslist(191) = "marcos" + carbrandslist(192) = "marmon" + carbrandslist(193) = "marussia" + carbrandslist(194) = "maruti suzuki" + carbrandslist(195) = "maserati" + carbrandslist(196) = "master" + carbrandslist(197) = "mastretta" + carbrandslist(198) = "matra" + carbrandslist(199) = "maybach" + carbrandslist(200) = "mazda" + carbrandslist(201) = "mclaren" + carbrandslist(202) = "mdi" + carbrandslist(203) = "mercedes" + carbrandslist(204) = "mercury" + carbrandslist(205) = "micro" + carbrandslist(206) = "microcar" + carbrandslist(207) = "mini" + carbrandslist(208) = "mini cooper" + carbrandslist(209) = "mitsubishi" + carbrandslist(210) = "mitsuoka" + carbrandslist(211) = "morgan" + carbrandslist(212) = "morris" + carbrandslist(213) = "moskvitch" + carbrandslist(214) = "mosler" + carbrandslist(215) = "multicar" + carbrandslist(216) = "mvm" + carbrandslist(217) = "nag" + carbrandslist(218) = "nagant" + carbrandslist(219) = "nash" + carbrandslist(220) = "navistar" + carbrandslist(221) = "naza" + carbrandslist(222) = "neobus" + carbrandslist(223) = "neoplan" + carbrandslist(224) = "nissan" + carbrandslist(225) = "noble" + carbrandslist(226) = "nsu" + carbrandslist(227) = "oldsmobile" + carbrandslist(228) = "oltcit" + carbrandslist(229) = "opel" + carbrandslist(230) = "orient" + carbrandslist(231) = "otokar" + carbrandslist(232) = "otosan" + carbrandslist(233) = "oyak" + carbrandslist(234) = "p.a.r.s moto" + carbrandslist(235) = "packard" + carbrandslist(236) = "pagani" + carbrandslist(237) = "pak suzuki" + carbrandslist(238) = "panoz" + carbrandslist(239) = "pars khodro" + carbrandslist(240) = "perodua" + carbrandslist(241) = "peugeot" + carbrandslist(242) = "pgo" + carbrandslist(243) = "pieper" + carbrandslist(244) = "pierce-arrow" + carbrandslist(245) = "plymouth" + carbrandslist(246) = "pontiac" + carbrandslist(247) = "porsche" + carbrandslist(248) = "praga" + carbrandslist(249) = "premier" + carbrandslist(250) = "proto" + carbrandslist(251) = "proton" + carbrandslist(252) = "puma" + carbrandslist(253) = "ram" + carbrandslist(254) = "ramirez" + carbrandslist(255) = "regal" + carbrandslist(256) = "renault" + carbrandslist(257) = "renault samsung" + carbrandslist(258) = "reo" + carbrandslist(259) = "riley" + carbrandslist(260) = "rimac" + carbrandslist(261) = "robur" + carbrandslist(262) = "rolls royce" + carbrandslist(263) = "rover" + carbrandslist(264) = "ruf" + carbrandslist(265) = "russo-balt" + carbrandslist(266) = "saab" + carbrandslist(267) = "saipa" + carbrandslist(268) = "saleen" + carbrandslist(269) = "samavto" + carbrandslist(270) = "saturn" + carbrandslist(271) = "sbarro" + carbrandslist(272) = "scania" + carbrandslist(273) = "scion" + carbrandslist(274) = "shane moto" + carbrandslist(275) = "siam v.m.c." + carbrandslist(276) = "siata" + carbrandslist(277) = "simson" + carbrandslist(278) = "singer" + carbrandslist(279) = "skoda" + carbrandslist(280) = "sound" + carbrandslist(281) = "spyker" + carbrandslist(282) = "ssangyong" + carbrandslist(283) = "standard" + carbrandslist(284) = "stealth" + carbrandslist(285) = "sterling" + carbrandslist(286) = "studebaker" + carbrandslist(287) = "subaru" + carbrandslist(288) = "sunbeam" + carbrandslist(289) = "suzuki" + carbrandslist(290) = "tac" + carbrandslist(291) = "tafe" + carbrandslist(292) = "tata" + carbrandslist(293) = "tatra" + carbrandslist(294) = "td2000" + carbrandslist(295) = "temsa" + carbrandslist(296) = "tesla" + carbrandslist(297) = "th!nk" + carbrandslist(298) = "thai rung" + carbrandslist(299) = "the jamie stahley car" + carbrandslist(300) = "tickford" + carbrandslist(301) = "toyota" + carbrandslist(302) = "trabant" + carbrandslist(303) = "tranvias-cimex" + carbrandslist(304) = "triumph" + carbrandslist(305) = "trojan" + carbrandslist(306) = "troller" + carbrandslist(307) = "tucker" + carbrandslist(308) = "turk traktor" + carbrandslist(309) = "tvr" + carbrandslist(310) = "tvs" + carbrandslist(311) = "uaz" + carbrandslist(312) = "vam sa" + carbrandslist(313) = "vauxhall" + carbrandslist(314) = "venturi" + carbrandslist(315) = "vignale" + carbrandslist(316) = "volkswagen" + carbrandslist(317) = "volvo" + carbrandslist(318) = "wanderer" + carbrandslist(319) = "wartburg" + carbrandslist(320) = "wiesmann" + carbrandslist(321) = "willys" + carbrandslist(322) = "wolseley" + carbrandslist(323) = "yamaha" + carbrandslist(324) = "yo-mobile" + carbrandslist(325) = "zastava" + carbrandslist(326) = "zenvo" + carbrandslist(327) = "zil" + carbrandslist(328) = "zoragy" + End Sub + + Public Sub makegameconsoleslist() + gameconsoleslist(0) = "magnavox odyssey" + gameconsoleslist(1) = "ping-o-tronic" + gameconsoleslist(2) = "telstar" + gameconsoleslist(3) = "apf tv fun" + gameconsoleslist(4) = "philips odyssey" + gameconsoleslist(5) = "radio shack tv scoreboard" + gameconsoleslist(6) = "binatone tv master mk iv" + gameconsoleslist(7) = "color tv game 6" + gameconsoleslist(8) = "color tv game 15" + gameconsoleslist(9) = "color tv racing 112" + gameconsoleslist(10) = "color tv game block breaker" + gameconsoleslist(11) = "computer tv game" + gameconsoleslist(12) = "bss 01" + gameconsoleslist(13) = "fairchild channel f" + gameconsoleslist(14) = "fairchild channel f system ii" + gameconsoleslist(15) = "rca studio ii" + gameconsoleslist(16) = "atari 2600" + gameconsoleslist(17) = "atari 2600 jr" + gameconsoleslist(18) = "atari 2800" + gameconsoleslist(19) = "coleco gemini" + gameconsoleslist(20) = "bally astrocade" + gameconsoleslist(21) = "vc 4000" + gameconsoleslist(22) = "magnavox odyssey 2" + gameconsoleslist(23) = "apf imagination machine" + gameconsoleslist(24) = "intellivision" + gameconsoleslist(25) = "playcable" + gameconsoleslist(26) = "bandai super vision 8000" + gameconsoleslist(27) = "intellivision ii" + gameconsoleslist(28) = "vtech creativision" + gameconsoleslist(29) = "epoch cassette vision" + gameconsoleslist(30) = "super cassette vision" + gameconsoleslist(31) = "arcadia 2001" + gameconsoleslist(32) = "atari 5200" + gameconsoleslist(33) = "atari 5100" + gameconsoleslist(34) = "colecovision" + gameconsoleslist(35) = "entex adventure vision" + gameconsoleslist(36) = "vectrex" + gameconsoleslist(37) = "rdi halcyon" + gameconsoleslist(38) = "pv-1000" + gameconsoleslist(39) = "commodore 64 games system" + gameconsoleslist(40) = "amstrad gx4000" + gameconsoleslist(41) = "atari 7800" + gameconsoleslist(42) = "atari xegs" + gameconsoleslist(43) = "sega sg-1000" + gameconsoleslist(44) = "sega master system" + gameconsoleslist(45) = "nintendo entertainment system" + gameconsoleslist(46) = "sharp nintendo television" + gameconsoleslist(47) = "nes-101" + gameconsoleslist(48) = "family computer disk system" + gameconsoleslist(49) = "zemmix" + gameconsoleslist(50) = "action max" + gameconsoleslist(51) = "sega genesis" + gameconsoleslist(52) = "sega pico" + gameconsoleslist(53) = "pc engine" + gameconsoleslist(54) = "konix multisystem" + gameconsoleslist(55) = "neo-geo" + gameconsoleslist(56) = "neo-geo cd" + gameconsoleslist(57) = "neo-geo cdz" + gameconsoleslist(58) = "commodore cdtv" + gameconsoleslist(59) = "memorex vis" + gameconsoleslist(60) = "super nintendo entertainment system" + gameconsoleslist(61) = "sf-1 snes tv" + gameconsoleslist(62) = "snes 2" + gameconsoleslist(63) = "snes-cd" + gameconsoleslist(64) = "satellaview" + gameconsoleslist(65) = "cd-i" + gameconsoleslist(66) = "turboduo" + gameconsoleslist(67) = "super a'can" + gameconsoleslist(68) = "pioneer laseractive" + gameconsoleslist(69) = "fm towns marty" + gameconsoleslist(70) = "apple bandai pippin" + gameconsoleslist(71) = "pc-fx" + gameconsoleslist(72) = "atari panther" + gameconsoleslist(73) = "atari jaguar" + gameconsoleslist(74) = "atari jaguar cd" + gameconsoleslist(75) = "playstation" + gameconsoleslist(76) = "net yaroze" + gameconsoleslist(77) = "sega saturn" + gameconsoleslist(78) = "3do interactive multiplayer" + gameconsoleslist(79) = "amiga cd32" + gameconsoleslist(80) = "casio loopy" + gameconsoleslist(81) = "playdia" + gameconsoleslist(82) = "nintendo 64" + gameconsoleslist(83) = "nintendo 64dd" + gameconsoleslist(84) = "sega neptune" + gameconsoleslist(85) = "apextreme" + gameconsoleslist(86) = "atari flashback" + gameconsoleslist(87) = "atari jaguar ii" + gameconsoleslist(88) = "dreamcast" + gameconsoleslist(89) = "l600" + gameconsoleslist(90) = "gamecube" + gameconsoleslist(91) = "nuon" + gameconsoleslist(92) = "ique player" + gameconsoleslist(93) = "panasonic m2" + gameconsoleslist(94) = "panasonic q" + gameconsoleslist(95) = "playstation 2" + gameconsoleslist(96) = "psx" + gameconsoleslist(97) = "v.smile" + gameconsoleslist(98) = "xavixport gaming console" + gameconsoleslist(99) = "xbox" + gameconsoleslist(100) = "atari flashback 2" + gameconsoleslist(101) = "atari flashback 3" + gameconsoleslist(102) = "atari flashback 4" + gameconsoleslist(103) = "evo smart console" + gameconsoleslist(104) = "retro duo" + gameconsoleslist(105) = "game wave" + gameconsoleslist(106) = "mattel hyperscan" + gameconsoleslist(107) = "onlive" + gameconsoleslist(108) = "phantom" + gameconsoleslist(109) = "playstation 3" + gameconsoleslist(110) = "wii" + gameconsoleslist(111) = "xbox 360" + gameconsoleslist(112) = "sega firecore" + gameconsoleslist(113) = "zeebo" + gameconsoleslist(114) = "sega zone" + gameconsoleslist(115) = "eedoo ct510" + gameconsoleslist(116) = "wii u" + gameconsoleslist(117) = "ouya" + gameconsoleslist(118) = "gamestick" + gameconsoleslist(119) = "mojo" + gameconsoleslist(120) = "gamepop" + gameconsoleslist(121) = "playstation 4" + gameconsoleslist(122) = "steam machine" + gameconsoleslist(123) = "xbox one" + gameconsoleslist(124) = "xi3 piston" + + End Sub + + Public Sub makeelementslist() + elementslist(0) = "hydrogen" + elementslist(1) = "helium" + elementslist(2) = "lithium" + elementslist(3) = "beryllium" + elementslist(4) = "boron" + elementslist(5) = "carbon" + elementslist(6) = "nitrogen" + elementslist(7) = "oxygen" + elementslist(8) = "fluorine" + elementslist(9) = "neon" + elementslist(10) = "sodium" + elementslist(11) = "magnesium" + elementslist(12) = "aluminium" + elementslist(13) = "silicon" + elementslist(14) = "phosphorus" + elementslist(15) = "sulfur" + elementslist(16) = "chlorine" + elementslist(17) = "argon" + elementslist(18) = "potassium" + elementslist(19) = "calcium" + elementslist(20) = "scandium" + elementslist(21) = "titanium" + elementslist(22) = "vanadium" + elementslist(23) = "chromium" + elementslist(24) = "manganese" + elementslist(25) = "iron" + elementslist(26) = "cobalt" + elementslist(27) = "nickel" + elementslist(28) = "copper" + elementslist(29) = "zinc" + elementslist(30) = "gallium" + elementslist(31) = "germanium" + elementslist(32) = "arsenic" + elementslist(33) = "selenium" + elementslist(34) = "bromine" + elementslist(35) = "krypton" + elementslist(36) = "rubidium" + elementslist(37) = "strontium" + elementslist(38) = "yttrium" + elementslist(39) = "zirconium" + elementslist(40) = "niobium" + elementslist(41) = "molybdenum" + elementslist(42) = "technetium" + elementslist(43) = "ruthenium" + elementslist(44) = "rhodium" + elementslist(45) = "palladium" + elementslist(46) = "silver" + elementslist(47) = "cadmium" + elementslist(48) = "indium" + elementslist(49) = "tin" + elementslist(50) = "antimony" + elementslist(51) = "tellurium" + elementslist(52) = "iodine" + elementslist(53) = "xenon" + elementslist(54) = "caesium" + elementslist(55) = "barium" + elementslist(56) = "lanthanum" + elementslist(57) = "cerium" + elementslist(58) = "praseodymium" + elementslist(59) = "neodymium" + elementslist(60) = "promethium" + elementslist(61) = "samarium" + elementslist(62) = "europium" + elementslist(63) = "gadolinium" + elementslist(64) = "terbium" + elementslist(65) = "dysprosium" + elementslist(66) = "holmium" + elementslist(67) = "erbium" + elementslist(68) = "thulium" + elementslist(69) = "ytterbium" + elementslist(70) = "lutetium" + elementslist(71) = "hafnium" + elementslist(72) = "tantalum" + elementslist(73) = "tungsten" + elementslist(74) = "rhenium" + elementslist(75) = "osmium" + elementslist(76) = "iridium" + elementslist(77) = "platinum" + elementslist(78) = "gold" + elementslist(79) = "mercury" + elementslist(80) = "thallium" + elementslist(81) = "lead" + elementslist(82) = "bismuth" + elementslist(83) = "polonium" + elementslist(84) = "astatine" + elementslist(85) = "radon" + elementslist(86) = "francium" + elementslist(87) = "radium" + elementslist(88) = "actinium" + elementslist(89) = "thorium" + elementslist(90) = "protactinium" + elementslist(91) = "uranium" + elementslist(92) = "neptunium" + elementslist(93) = "plutonium" + elementslist(94) = "americium" + elementslist(95) = "curium" + elementslist(96) = "berkelium" + elementslist(97) = "californium" + elementslist(98) = "einsteinium" + elementslist(99) = "fermium" + elementslist(100) = "mendelevium" + elementslist(101) = "nobelium" + elementslist(102) = "lawrencium" + elementslist(103) = "rutherfordium" + elementslist(104) = "dubnium" + elementslist(105) = "seaborgium" + elementslist(106) = "bohrium" + elementslist(107) = "hassium" + elementslist(108) = "meitnerium" + elementslist(109) = "darmstadtium" + elementslist(110) = "roentgenium" + elementslist(111) = "copernicium" + elementslist(112) = "ununtrium" + elementslist(113) = "flerovium" + elementslist(114) = "ununpentium" + elementslist(115) = "livermorium" + elementslist(116) = "ununseptium" + elementslist(117) = "ununoctium" + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Labyrinth.designer.vb b/ShiftOS/Labyrinth.designer.vb new file mode 100644 index 0000000..65486bd --- /dev/null +++ b/ShiftOS/Labyrinth.designer.vb @@ -0,0 +1,1048 @@ + _ +Partial Class Labyrinth + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Labyrinth)) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnllevelholder = New System.Windows.Forms.Panel() + Me.pnlintro = New System.Windows.Forms.Panel() + Me.beginbtn = New System.Windows.Forms.Button() + Me.lblwelcometxt = New System.Windows.Forms.Label() + Me.pnllvl3 = New System.Windows.Forms.Panel() + Me.Panel31 = New System.Windows.Forms.Panel() + Me.Panel30 = New System.Windows.Forms.Panel() + Me.Panel29 = New System.Windows.Forms.Panel() + Me.Panel28 = New System.Windows.Forms.Panel() + Me.Panel27 = New System.Windows.Forms.Panel() + Me.Panel26 = New System.Windows.Forms.Panel() + Me.Label2 = New System.Windows.Forms.Label() + Me.pnllvl1 = New System.Windows.Forms.Panel() + Me.pnlplayer = New System.Windows.Forms.Panel() + Me.lbllvl1exit = New System.Windows.Forms.Label() + Me.Panel11 = New System.Windows.Forms.Panel() + Me.Panel10 = New System.Windows.Forms.Panel() + Me.Panel9 = New System.Windows.Forms.Panel() + Me.Panel8 = New System.Windows.Forms.Panel() + Me.Panel7 = New System.Windows.Forms.Panel() + Me.Panel6 = New System.Windows.Forms.Panel() + Me.Panel5 = New System.Windows.Forms.Panel() + Me.Panel4 = New System.Windows.Forms.Panel() + Me.Panel3 = New System.Windows.Forms.Panel() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.pnllvl2 = New System.Windows.Forms.Panel() + Me.Panel25 = New System.Windows.Forms.Panel() + Me.Panel24 = New System.Windows.Forms.Panel() + Me.Panel23 = New System.Windows.Forms.Panel() + Me.Panel22 = New System.Windows.Forms.Panel() + Me.Panel21 = New System.Windows.Forms.Panel() + Me.Panel20 = New System.Windows.Forms.Panel() + Me.Panel19 = New System.Windows.Forms.Panel() + Me.Panel18 = New System.Windows.Forms.Panel() + Me.Panel17 = New System.Windows.Forms.Panel() + Me.Panel16 = New System.Windows.Forms.Panel() + Me.Panel15 = New System.Windows.Forms.Panel() + Me.Panel14 = New System.Windows.Forms.Panel() + Me.Panel13 = New System.Windows.Forms.Panel() + Me.Panel12 = New System.Windows.Forms.Panel() + Me.Label3 = New System.Windows.Forms.Label() + Me.pnlfooter = New System.Windows.Forms.Panel() + Me.Label1 = New System.Windows.Forms.Label() + Me.lbltime = New System.Windows.Forms.Label() + Me.btncashout = New System.Windows.Forms.Button() + Me.lbllevel = New System.Windows.Forms.Label() + Me.lbltitle = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.tmrtimeleft = New System.Windows.Forms.Timer(Me.components) + Me.tmrgametick = New System.Windows.Forms.Timer(Me.components) + Me.pnllvl4 = New System.Windows.Forms.Panel() + Me.Label5 = New System.Windows.Forms.Label() + Me.Panel32 = New System.Windows.Forms.Panel() + Me.Panel33 = New System.Windows.Forms.Panel() + Me.Panel34 = New System.Windows.Forms.Panel() + Me.Panel35 = New System.Windows.Forms.Panel() + Me.Panel36 = New System.Windows.Forms.Panel() + Me.Panel37 = New System.Windows.Forms.Panel() + Me.Panel38 = New System.Windows.Forms.Panel() + Me.Panel39 = New System.Windows.Forms.Panel() + Me.Panel40 = New System.Windows.Forms.Panel() + Me.Panel41 = New System.Windows.Forms.Panel() + Me.pnllvl5 = New System.Windows.Forms.Panel() + Me.Label6 = New System.Windows.Forms.Label() + Me.Panel42 = New System.Windows.Forms.Panel() + Me.Panel43 = New System.Windows.Forms.Panel() + Me.Panel44 = New System.Windows.Forms.Panel() + Me.Panel45 = New System.Windows.Forms.Panel() + Me.Panel46 = New System.Windows.Forms.Panel() + Me.Panel47 = New System.Windows.Forms.Panel() + Me.Panel48 = New System.Windows.Forms.Panel() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnllevelholder.SuspendLayout() + Me.pnlintro.SuspendLayout() + Me.pnllvl3.SuspendLayout() + Me.pnllvl1.SuspendLayout() + Me.pnllvl2.SuspendLayout() + Me.pnlfooter.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + Me.pnllvl4.SuspendLayout() + Me.pnllvl5.SuspendLayout() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 298) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(496, 2) + Me.pgbottom.TabIndex = 31 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 268) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(498, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 270) + Me.pgright.TabIndex = 30 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(498, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 268) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnllevelholder) + Me.pgcontents.Controls.Add(Me.pnlfooter) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(498, 270) + Me.pgcontents.TabIndex = 28 + ' + 'pnllevelholder + ' + Me.pnllevelholder.Controls.Add(Me.pnllvl5) + Me.pnllevelholder.Controls.Add(Me.pnllvl4) + Me.pnllevelholder.Controls.Add(Me.pnlintro) + Me.pnllevelholder.Controls.Add(Me.pnllvl3) + Me.pnllevelholder.Controls.Add(Me.pnllvl1) + Me.pnllevelholder.Controls.Add(Me.pnllvl2) + Me.pnllevelholder.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnllevelholder.Location = New System.Drawing.Point(0, 0) + Me.pnllevelholder.Name = "pnllevelholder" + Me.pnllevelholder.Size = New System.Drawing.Size(498, 218) + Me.pnllevelholder.TabIndex = 1 + ' + 'pnlintro + ' + Me.pnlintro.Controls.Add(Me.beginbtn) + Me.pnlintro.Controls.Add(Me.lblwelcometxt) + Me.pnlintro.Location = New System.Drawing.Point(10, 181) + Me.pnlintro.Name = "pnlintro" + Me.pnlintro.Size = New System.Drawing.Size(78, 34) + Me.pnlintro.TabIndex = 3 + ' + 'beginbtn + ' + Me.beginbtn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.beginbtn.Location = New System.Drawing.Point(205, 153) + Me.beginbtn.Name = "beginbtn" + Me.beginbtn.Size = New System.Drawing.Size(75, 23) + Me.beginbtn.TabIndex = 1 + Me.beginbtn.Text = "Begin" + Me.beginbtn.UseVisualStyleBackColor = True + ' + 'lblwelcometxt + ' + Me.lblwelcometxt.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lblwelcometxt.Location = New System.Drawing.Point(30, 64) + Me.lblwelcometxt.Name = "lblwelcometxt" + Me.lblwelcometxt.Size = New System.Drawing.Size(445, 117) + Me.lblwelcometxt.TabIndex = 0 + Me.lblwelcometxt.Text = resources.GetString("lblwelcometxt.Text") + ' + 'pnllvl3 + ' + Me.pnllvl3.Controls.Add(Me.Panel31) + Me.pnllvl3.Controls.Add(Me.Panel30) + Me.pnllvl3.Controls.Add(Me.Panel29) + Me.pnllvl3.Controls.Add(Me.Panel28) + Me.pnllvl3.Controls.Add(Me.Panel27) + Me.pnllvl3.Controls.Add(Me.Panel26) + Me.pnllvl3.Controls.Add(Me.Label2) + Me.pnllvl3.Location = New System.Drawing.Point(190, 3) + Me.pnllvl3.Name = "pnllvl3" + Me.pnllvl3.Size = New System.Drawing.Size(88, 37) + Me.pnllvl3.TabIndex = 2 + ' + 'Panel31 + ' + Me.Panel31.BackColor = System.Drawing.Color.Black + Me.Panel31.Location = New System.Drawing.Point(27, 156) + Me.Panel31.Name = "Panel31" + Me.Panel31.Size = New System.Drawing.Size(333, 62) + Me.Panel31.TabIndex = 17 + ' + 'Panel30 + ' + Me.Panel30.BackColor = System.Drawing.Color.Black + Me.Panel30.Location = New System.Drawing.Point(385, 133) + Me.Panel30.Name = "Panel30" + Me.Panel30.Size = New System.Drawing.Size(26, 58) + Me.Panel30.TabIndex = 16 + ' + 'Panel29 + ' + Me.Panel29.BackColor = System.Drawing.Color.Black + Me.Panel29.Location = New System.Drawing.Point(27, 105) + Me.Panel29.Name = "Panel29" + Me.Panel29.Size = New System.Drawing.Size(414, 28) + Me.Panel29.TabIndex = 15 + ' + 'Panel28 + ' + Me.Panel28.BackColor = System.Drawing.Color.Black + Me.Panel28.Location = New System.Drawing.Point(441, 156) + Me.Panel28.Name = "Panel28" + Me.Panel28.Size = New System.Drawing.Size(23, 62) + Me.Panel28.TabIndex = 14 + ' + 'Panel27 + ' + Me.Panel27.BackColor = System.Drawing.Color.Black + Me.Panel27.Location = New System.Drawing.Point(441, 0) + Me.Panel27.Name = "Panel27" + Me.Panel27.Size = New System.Drawing.Size(23, 134) + Me.Panel27.TabIndex = 13 + ' + 'Panel26 + ' + Me.Panel26.BackColor = System.Drawing.Color.Black + Me.Panel26.Location = New System.Drawing.Point(0, 41) + Me.Panel26.Name = "Panel26" + Me.Panel26.Size = New System.Drawing.Size(414, 28) + Me.Panel26.TabIndex = 12 + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(476, 60) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(14, 104) + Me.Label2.TabIndex = 11 + Me.Label2.Text = ">" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "E" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "X" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " I" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "T" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & ">" + ' + 'pnllvl1 + ' + Me.pnllvl1.Controls.Add(Me.pnlplayer) + Me.pnllvl1.Controls.Add(Me.lbllvl1exit) + Me.pnllvl1.Controls.Add(Me.Panel11) + Me.pnllvl1.Controls.Add(Me.Panel10) + Me.pnllvl1.Controls.Add(Me.Panel9) + Me.pnllvl1.Controls.Add(Me.Panel8) + Me.pnllvl1.Controls.Add(Me.Panel7) + Me.pnllvl1.Controls.Add(Me.Panel6) + Me.pnllvl1.Controls.Add(Me.Panel5) + Me.pnllvl1.Controls.Add(Me.Panel4) + Me.pnllvl1.Controls.Add(Me.Panel3) + Me.pnllvl1.Controls.Add(Me.Panel2) + Me.pnllvl1.Controls.Add(Me.Panel1) + Me.pnllvl1.Location = New System.Drawing.Point(0, 0) + Me.pnllvl1.Name = "pnllvl1" + Me.pnllvl1.Size = New System.Drawing.Size(84, 40) + Me.pnllvl1.TabIndex = 0 + ' + 'pnlplayer + ' + Me.pnlplayer.BackColor = System.Drawing.Color.Gray + Me.pnlplayer.Location = New System.Drawing.Point(8, 10) + Me.pnlplayer.Name = "pnlplayer" + Me.pnlplayer.Size = New System.Drawing.Size(13, 13) + Me.pnlplayer.TabIndex = 12 + ' + 'lbllvl1exit + ' + Me.lbllvl1exit.AutoSize = True + Me.lbllvl1exit.Location = New System.Drawing.Point(476, 60) + Me.lbllvl1exit.Name = "lbllvl1exit" + Me.lbllvl1exit.Size = New System.Drawing.Size(14, 104) + Me.lbllvl1exit.TabIndex = 11 + Me.lbllvl1exit.Text = ">" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "E" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "X" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " I" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "T" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & ">" + ' + 'Panel11 + ' + Me.Panel11.BackColor = System.Drawing.Color.Black + Me.Panel11.Location = New System.Drawing.Point(420, 0) + Me.Panel11.Name = "Panel11" + Me.Panel11.Size = New System.Drawing.Size(23, 158) + Me.Panel11.TabIndex = 10 + ' + 'Panel10 + ' + Me.Panel10.BackColor = System.Drawing.Color.Black + Me.Panel10.Location = New System.Drawing.Point(355, 60) + Me.Panel10.Name = "Panel10" + Me.Panel10.Size = New System.Drawing.Size(23, 158) + Me.Panel10.TabIndex = 9 + ' + 'Panel9 + ' + Me.Panel9.BackColor = System.Drawing.Color.Black + Me.Panel9.Location = New System.Drawing.Point(152, 0) + Me.Panel9.Name = "Panel9" + Me.Panel9.Size = New System.Drawing.Size(168, 34) + Me.Panel9.TabIndex = 8 + ' + 'Panel8 + ' + Me.Panel8.BackColor = System.Drawing.Color.Black + Me.Panel8.Location = New System.Drawing.Point(296, 114) + Me.Panel8.Name = "Panel8" + Me.Panel8.Size = New System.Drawing.Size(24, 44) + Me.Panel8.TabIndex = 7 + ' + 'Panel7 + ' + Me.Panel7.BackColor = System.Drawing.Color.Black + Me.Panel7.Location = New System.Drawing.Point(242, 114) + Me.Panel7.Name = "Panel7" + Me.Panel7.Size = New System.Drawing.Size(24, 44) + Me.Panel7.TabIndex = 6 + ' + 'Panel6 + ' + Me.Panel6.BackColor = System.Drawing.Color.Black + Me.Panel6.Location = New System.Drawing.Point(190, 114) + Me.Panel6.Name = "Panel6" + Me.Panel6.Size = New System.Drawing.Size(24, 44) + Me.Panel6.TabIndex = 5 + ' + 'Panel5 + ' + Me.Panel5.BackColor = System.Drawing.Color.Black + Me.Panel5.Location = New System.Drawing.Point(152, 184) + Me.Panel5.Name = "Panel5" + Me.Panel5.Size = New System.Drawing.Size(168, 34) + Me.Panel5.TabIndex = 4 + ' + 'Panel4 + ' + Me.Panel4.BackColor = System.Drawing.Color.Black + Me.Panel4.Location = New System.Drawing.Point(152, 60) + Me.Panel4.Name = "Panel4" + Me.Panel4.Size = New System.Drawing.Size(168, 28) + Me.Panel4.TabIndex = 3 + ' + 'Panel3 + ' + Me.Panel3.BackColor = System.Drawing.Color.Black + Me.Panel3.Location = New System.Drawing.Point(130, 0) + Me.Panel3.Name = "Panel3" + Me.Panel3.Size = New System.Drawing.Size(23, 158) + Me.Panel3.TabIndex = 2 + ' + 'Panel2 + ' + Me.Panel2.BackColor = System.Drawing.Color.Black + Me.Panel2.Location = New System.Drawing.Point(78, 60) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(23, 158) + Me.Panel2.TabIndex = 1 + ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.Black + Me.Panel1.Location = New System.Drawing.Point(27, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(23, 158) + Me.Panel1.TabIndex = 0 + ' + 'pnllvl2 + ' + Me.pnllvl2.Controls.Add(Me.Panel25) + Me.pnllvl2.Controls.Add(Me.Panel24) + Me.pnllvl2.Controls.Add(Me.Panel23) + Me.pnllvl2.Controls.Add(Me.Panel22) + Me.pnllvl2.Controls.Add(Me.Panel21) + Me.pnllvl2.Controls.Add(Me.Panel20) + Me.pnllvl2.Controls.Add(Me.Panel19) + Me.pnllvl2.Controls.Add(Me.Panel18) + Me.pnllvl2.Controls.Add(Me.Panel17) + Me.pnllvl2.Controls.Add(Me.Panel16) + Me.pnllvl2.Controls.Add(Me.Panel15) + Me.pnllvl2.Controls.Add(Me.Panel14) + Me.pnllvl2.Controls.Add(Me.Panel13) + Me.pnllvl2.Controls.Add(Me.Panel12) + Me.pnllvl2.Controls.Add(Me.Label3) + Me.pnllvl2.Location = New System.Drawing.Point(90, 3) + Me.pnllvl2.Name = "pnllvl2" + Me.pnllvl2.Size = New System.Drawing.Size(88, 37) + Me.pnllvl2.TabIndex = 1 + ' + 'Panel25 + ' + Me.Panel25.BackColor = System.Drawing.Color.Black + Me.Panel25.Location = New System.Drawing.Point(264, 111) + Me.Panel25.Name = "Panel25" + Me.Panel25.Size = New System.Drawing.Size(86, 24) + Me.Panel25.TabIndex = 25 + ' + 'Panel24 + ' + Me.Panel24.BackColor = System.Drawing.Color.Black + Me.Panel24.Location = New System.Drawing.Point(296, 164) + Me.Panel24.Name = "Panel24" + Me.Panel24.Size = New System.Drawing.Size(86, 24) + Me.Panel24.TabIndex = 24 + ' + 'Panel23 + ' + Me.Panel23.BackColor = System.Drawing.Color.Black + Me.Panel23.Location = New System.Drawing.Point(382, 87) + Me.Panel23.Name = "Panel23" + Me.Panel23.Size = New System.Drawing.Size(24, 101) + Me.Panel23.TabIndex = 23 + ' + 'Panel22 + ' + Me.Panel22.BackColor = System.Drawing.Color.Black + Me.Panel22.Location = New System.Drawing.Point(264, 60) + Me.Panel22.Name = "Panel22" + Me.Panel22.Size = New System.Drawing.Size(142, 28) + Me.Panel22.TabIndex = 22 + ' + 'Panel21 + ' + Me.Panel21.BackColor = System.Drawing.Color.Black + Me.Panel21.Location = New System.Drawing.Point(242, 111) + Me.Panel21.Name = "Panel21" + Me.Panel21.Size = New System.Drawing.Size(24, 107) + Me.Panel21.TabIndex = 21 + ' + 'Panel20 + ' + Me.Panel20.BackColor = System.Drawing.Color.Black + Me.Panel20.Location = New System.Drawing.Point(242, 0) + Me.Panel20.Name = "Panel20" + Me.Panel20.Size = New System.Drawing.Size(24, 88) + Me.Panel20.TabIndex = 20 + ' + 'Panel19 + ' + Me.Panel19.BackColor = System.Drawing.Color.Black + Me.Panel19.Location = New System.Drawing.Point(152, 89) + Me.Panel19.Name = "Panel19" + Me.Panel19.Size = New System.Drawing.Size(20, 69) + Me.Panel19.TabIndex = 19 + ' + 'Panel18 + ' + Me.Panel18.BackColor = System.Drawing.Color.Black + Me.Panel18.Location = New System.Drawing.Point(114, 164) + Me.Panel18.Name = "Panel18" + Me.Panel18.Size = New System.Drawing.Size(100, 24) + Me.Panel18.TabIndex = 18 + ' + 'Panel17 + ' + Me.Panel17.BackColor = System.Drawing.Color.Black + Me.Panel17.Location = New System.Drawing.Point(114, 61) + Me.Panel17.Name = "Panel17" + Me.Panel17.Size = New System.Drawing.Size(100, 24) + Me.Panel17.TabIndex = 17 + ' + 'Panel16 + ' + Me.Panel16.BackColor = System.Drawing.Color.Black + Me.Panel16.Location = New System.Drawing.Point(78, 184) + Me.Panel16.Name = "Panel16" + Me.Panel16.Size = New System.Drawing.Size(20, 34) + Me.Panel16.TabIndex = 16 + ' + 'Panel15 + ' + Me.Panel15.BackColor = System.Drawing.Color.Black + Me.Panel15.Location = New System.Drawing.Point(31, 137) + Me.Panel15.Name = "Panel15" + Me.Panel15.Size = New System.Drawing.Size(19, 81) + Me.Panel15.TabIndex = 15 + ' + 'Panel14 + ' + Me.Panel14.BackColor = System.Drawing.Color.Black + Me.Panel14.Location = New System.Drawing.Point(78, -2) + Me.Panel14.Name = "Panel14" + Me.Panel14.Size = New System.Drawing.Size(19, 56) + Me.Panel14.TabIndex = 14 + ' + 'Panel13 + ' + Me.Panel13.BackColor = System.Drawing.Color.Black + Me.Panel13.Location = New System.Drawing.Point(78, 89) + Me.Panel13.Name = "Panel13" + Me.Panel13.Size = New System.Drawing.Size(19, 75) + Me.Panel13.TabIndex = 13 + ' + 'Panel12 + ' + Me.Panel12.BackColor = System.Drawing.Color.Black + Me.Panel12.Location = New System.Drawing.Point(30, -2) + Me.Panel12.Name = "Panel12" + Me.Panel12.Size = New System.Drawing.Size(20, 109) + Me.Panel12.TabIndex = 12 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(476, 60) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(14, 104) + Me.Label3.TabIndex = 11 + Me.Label3.Text = ">" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "E" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "X" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " I" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "T" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & ">" + ' + 'pnlfooter + ' + Me.pnlfooter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlfooter.Controls.Add(Me.Label1) + Me.pnlfooter.Controls.Add(Me.lbltime) + Me.pnlfooter.Controls.Add(Me.btncashout) + Me.pnlfooter.Controls.Add(Me.lbllevel) + Me.pnlfooter.Controls.Add(Me.lbltitle) + Me.pnlfooter.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlfooter.Location = New System.Drawing.Point(0, 218) + Me.pnlfooter.Name = "pnlfooter" + Me.pnlfooter.Size = New System.Drawing.Size(498, 52) + Me.pnlfooter.TabIndex = 0 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(392, 12) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(50, 13) + Me.Label1.TabIndex = 4 + Me.Label1.Text = "Time left:" + ' + 'lbltime + ' + Me.lbltime.AutoSize = True + Me.lbltime.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltime.Location = New System.Drawing.Point(448, 13) + Me.lbltime.Name = "lbltime" + Me.lbltime.Size = New System.Drawing.Size(38, 25) + Me.lbltime.TabIndex = 3 + Me.lbltime.Text = "59" + ' + 'btncashout + ' + Me.btncashout.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncashout.Location = New System.Drawing.Point(220, 12) + Me.btncashout.Name = "btncashout" + Me.btncashout.Size = New System.Drawing.Size(99, 23) + Me.btncashout.TabIndex = 2 + Me.btncashout.Text = "Cashout 0 CP" + Me.btncashout.UseVisualStyleBackColor = True + ' + 'lbllevel + ' + Me.lbllevel.AutoSize = True + Me.lbllevel.Location = New System.Drawing.Point(110, 22) + Me.lbllevel.Name = "lbllevel" + Me.lbllevel.Size = New System.Drawing.Size(42, 13) + Me.lbllevel.TabIndex = 1 + Me.lbllevel.Text = "Level 1" + ' + 'lbltitle + ' + Me.lbltitle.AutoSize = True + Me.lbltitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltitle.Location = New System.Drawing.Point(10, 13) + Me.lbltitle.Name = "lbltitle" + Me.lbltitle.Size = New System.Drawing.Size(101, 25) + Me.lbltitle.TabIndex = 0 + Me.lbltitle.Text = "Labyrinth" + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 270) + Me.pgleft.TabIndex = 29 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(500, 30) + Me.titlebar.TabIndex = 27 + ' + 'tmrtimeleft + ' + Me.tmrtimeleft.Interval = 1000 + ' + 'tmrgametick + ' + Me.tmrgametick.Interval = 1 + ' + 'pnllvl4 + ' + Me.pnllvl4.Controls.Add(Me.Panel41) + Me.pnllvl4.Controls.Add(Me.Panel40) + Me.pnllvl4.Controls.Add(Me.Panel39) + Me.pnllvl4.Controls.Add(Me.Panel38) + Me.pnllvl4.Controls.Add(Me.Panel37) + Me.pnllvl4.Controls.Add(Me.Panel36) + Me.pnllvl4.Controls.Add(Me.Panel35) + Me.pnllvl4.Controls.Add(Me.Panel34) + Me.pnllvl4.Controls.Add(Me.Panel33) + Me.pnllvl4.Controls.Add(Me.Panel32) + Me.pnllvl4.Controls.Add(Me.Label5) + Me.pnllvl4.Location = New System.Drawing.Point(290, 3) + Me.pnllvl4.Name = "pnllvl4" + Me.pnllvl4.Size = New System.Drawing.Size(88, 37) + Me.pnllvl4.TabIndex = 4 + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(476, 60) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(14, 104) + Me.Label5.TabIndex = 11 + Me.Label5.Text = ">" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "E" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "X" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " I" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "T" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & ">" + ' + 'Panel32 + ' + Me.Panel32.BackColor = System.Drawing.Color.Black + Me.Panel32.Location = New System.Drawing.Point(38, 22) + Me.Panel32.Name = "Panel32" + Me.Panel32.Size = New System.Drawing.Size(50, 50) + Me.Panel32.TabIndex = 12 + ' + 'Panel33 + ' + Me.Panel33.BackColor = System.Drawing.Color.Black + Me.Panel33.Location = New System.Drawing.Point(112, 60) + Me.Panel33.Name = "Panel33" + Me.Panel33.Size = New System.Drawing.Size(50, 50) + Me.Panel33.TabIndex = 13 + ' + 'Panel34 + ' + Me.Panel34.BackColor = System.Drawing.Color.Black + Me.Panel34.Location = New System.Drawing.Point(204, 35) + Me.Panel34.Name = "Panel34" + Me.Panel34.Size = New System.Drawing.Size(50, 50) + Me.Panel34.TabIndex = 14 + ' + 'Panel35 + ' + Me.Panel35.BackColor = System.Drawing.Color.Black + Me.Panel35.Location = New System.Drawing.Point(155, 136) + Me.Panel35.Name = "Panel35" + Me.Panel35.Size = New System.Drawing.Size(50, 50) + Me.Panel35.TabIndex = 15 + ' + 'Panel36 + ' + Me.Panel36.BackColor = System.Drawing.Color.Black + Me.Panel36.Location = New System.Drawing.Point(296, 128) + Me.Panel36.Name = "Panel36" + Me.Panel36.Size = New System.Drawing.Size(50, 50) + Me.Panel36.TabIndex = 16 + ' + 'Panel37 + ' + Me.Panel37.BackColor = System.Drawing.Color.Black + Me.Panel37.Location = New System.Drawing.Point(325, 35) + Me.Panel37.Name = "Panel37" + Me.Panel37.Size = New System.Drawing.Size(50, 50) + Me.Panel37.TabIndex = 17 + ' + 'Panel38 + ' + Me.Panel38.BackColor = System.Drawing.Color.Black + Me.Panel38.Location = New System.Drawing.Point(34, 144) + Me.Panel38.Name = "Panel38" + Me.Panel38.Size = New System.Drawing.Size(50, 50) + Me.Panel38.TabIndex = 18 + ' + 'Panel39 + ' + Me.Panel39.BackColor = System.Drawing.Color.Black + Me.Panel39.Location = New System.Drawing.Point(389, 142) + Me.Panel39.Name = "Panel39" + Me.Panel39.Size = New System.Drawing.Size(50, 50) + Me.Panel39.TabIndex = 19 + ' + 'Panel40 + ' + Me.Panel40.BackColor = System.Drawing.Color.Black + Me.Panel40.Location = New System.Drawing.Point(420, 10) + Me.Panel40.Name = "Panel40" + Me.Panel40.Size = New System.Drawing.Size(50, 50) + Me.Panel40.TabIndex = 20 + ' + 'Panel41 + ' + Me.Panel41.BackColor = System.Drawing.Color.Black + Me.Panel41.Location = New System.Drawing.Point(228, 108) + Me.Panel41.Name = "Panel41" + Me.Panel41.Size = New System.Drawing.Size(50, 50) + Me.Panel41.TabIndex = 21 + ' + 'pnllvl5 + ' + Me.pnllvl5.Controls.Add(Me.Panel48) + Me.pnllvl5.Controls.Add(Me.Panel47) + Me.pnllvl5.Controls.Add(Me.Panel46) + Me.pnllvl5.Controls.Add(Me.Panel45) + Me.pnllvl5.Controls.Add(Me.Panel44) + Me.pnllvl5.Controls.Add(Me.Panel43) + Me.pnllvl5.Controls.Add(Me.Panel42) + Me.pnllvl5.Controls.Add(Me.Label6) + Me.pnllvl5.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnllvl5.Location = New System.Drawing.Point(0, 0) + Me.pnllvl5.Name = "pnllvl5" + Me.pnllvl5.Size = New System.Drawing.Size(498, 218) + Me.pnllvl5.TabIndex = 5 + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(476, 60) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(14, 104) + Me.Label6.TabIndex = 11 + Me.Label6.Text = ">" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "E" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "X" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " I" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "T" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & ">" + ' + 'Panel42 + ' + Me.Panel42.BackColor = System.Drawing.Color.Black + Me.Panel42.Location = New System.Drawing.Point(-1, 40) + Me.Panel42.Name = "Panel42" + Me.Panel42.Size = New System.Drawing.Size(172, 32) + Me.Panel42.TabIndex = 12 + ' + 'Panel43 + ' + Me.Panel43.BackColor = System.Drawing.Color.Black + Me.Panel43.Location = New System.Drawing.Point(193, 40) + Me.Panel43.Name = "Panel43" + Me.Panel43.Size = New System.Drawing.Size(172, 32) + Me.Panel43.TabIndex = 13 + ' + 'Panel44 + ' + Me.Panel44.BackColor = System.Drawing.Color.Black + Me.Panel44.Location = New System.Drawing.Point(408, 0) + Me.Panel44.Name = "Panel44" + Me.Panel44.Size = New System.Drawing.Size(31, 186) + Me.Panel44.TabIndex = 14 + ' + 'Panel45 + ' + Me.Panel45.BackColor = System.Drawing.Color.Black + Me.Panel45.Location = New System.Drawing.Point(330, 70) + Me.Panel45.Name = "Panel45" + Me.Panel45.Size = New System.Drawing.Size(35, 116) + Me.Panel45.TabIndex = 15 + ' + 'Panel46 + ' + Me.Panel46.BackColor = System.Drawing.Color.Black + Me.Panel46.Location = New System.Drawing.Point(-2, 109) + Me.Panel46.Name = "Panel46" + Me.Panel46.Size = New System.Drawing.Size(172, 32) + Me.Panel46.TabIndex = 16 + ' + 'Panel47 + ' + Me.Panel47.BackColor = System.Drawing.Color.Black + Me.Panel47.Location = New System.Drawing.Point(-2, 167) + Me.Panel47.Name = "Panel47" + Me.Panel47.Size = New System.Drawing.Size(172, 32) + Me.Panel47.TabIndex = 17 + ' + 'Panel48 + ' + Me.Panel48.BackColor = System.Drawing.Color.Black + Me.Panel48.Location = New System.Drawing.Point(193, 115) + Me.Panel48.Name = "Panel48" + Me.Panel48.Size = New System.Drawing.Size(142, 32) + Me.Panel48.TabIndex = 18 + ' + 'Labyrinth + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(500, 300) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.KeyPreview = True + Me.Name = "Labyrinth" + Me.Text = "Labyrinth" + Me.TopMost = True + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pnllevelholder.ResumeLayout(False) + Me.pnlintro.ResumeLayout(False) + Me.pnllvl3.ResumeLayout(False) + Me.pnllvl3.PerformLayout() + Me.pnllvl1.ResumeLayout(False) + Me.pnllvl1.PerformLayout() + Me.pnllvl2.ResumeLayout(False) + Me.pnllvl2.PerformLayout() + Me.pnlfooter.ResumeLayout(False) + Me.pnlfooter.PerformLayout() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + Me.pnllvl4.ResumeLayout(False) + Me.pnllvl4.PerformLayout() + Me.pnllvl5.ResumeLayout(False) + Me.pnllvl5.PerformLayout() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pnllevelholder As System.Windows.Forms.Panel + Friend WithEvents pnllvl1 As System.Windows.Forms.Panel + Friend WithEvents pnlfooter As System.Windows.Forms.Panel + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents lbltime As System.Windows.Forms.Label + Friend WithEvents btncashout As System.Windows.Forms.Button + Friend WithEvents lbllevel As System.Windows.Forms.Label + Friend WithEvents lbltitle As System.Windows.Forms.Label + Friend WithEvents tmrtimeleft As System.Windows.Forms.Timer + Friend WithEvents pnlplayer As System.Windows.Forms.Panel + Friend WithEvents lbllvl1exit As System.Windows.Forms.Label + Friend WithEvents Panel11 As System.Windows.Forms.Panel + Friend WithEvents Panel10 As System.Windows.Forms.Panel + Friend WithEvents Panel9 As System.Windows.Forms.Panel + Friend WithEvents Panel8 As System.Windows.Forms.Panel + Friend WithEvents Panel7 As System.Windows.Forms.Panel + Friend WithEvents Panel6 As System.Windows.Forms.Panel + Friend WithEvents Panel5 As System.Windows.Forms.Panel + Friend WithEvents Panel4 As System.Windows.Forms.Panel + Friend WithEvents Panel3 As System.Windows.Forms.Panel + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents tmrgametick As System.Windows.Forms.Timer + Friend WithEvents pnllvl2 As System.Windows.Forms.Panel + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Panel25 As System.Windows.Forms.Panel + Friend WithEvents Panel24 As System.Windows.Forms.Panel + Friend WithEvents Panel23 As System.Windows.Forms.Panel + Friend WithEvents Panel22 As System.Windows.Forms.Panel + Friend WithEvents Panel21 As System.Windows.Forms.Panel + Friend WithEvents Panel20 As System.Windows.Forms.Panel + Friend WithEvents Panel19 As System.Windows.Forms.Panel + Friend WithEvents Panel18 As System.Windows.Forms.Panel + Friend WithEvents Panel17 As System.Windows.Forms.Panel + Friend WithEvents Panel16 As System.Windows.Forms.Panel + Friend WithEvents Panel15 As System.Windows.Forms.Panel + Friend WithEvents Panel14 As System.Windows.Forms.Panel + Friend WithEvents Panel13 As System.Windows.Forms.Panel + Friend WithEvents Panel12 As System.Windows.Forms.Panel + Friend WithEvents pnllvl3 As System.Windows.Forms.Panel + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Panel31 As System.Windows.Forms.Panel + Friend WithEvents Panel30 As System.Windows.Forms.Panel + Friend WithEvents Panel29 As System.Windows.Forms.Panel + Friend WithEvents Panel28 As System.Windows.Forms.Panel + Friend WithEvents Panel27 As System.Windows.Forms.Panel + Friend WithEvents Panel26 As System.Windows.Forms.Panel + Friend WithEvents pnlintro As System.Windows.Forms.Panel + Friend WithEvents lblwelcometxt As System.Windows.Forms.Label + Friend WithEvents beginbtn As System.Windows.Forms.Button + Friend WithEvents pnllvl4 As System.Windows.Forms.Panel + Friend WithEvents Panel41 As System.Windows.Forms.Panel + Friend WithEvents Panel40 As System.Windows.Forms.Panel + Friend WithEvents Panel39 As System.Windows.Forms.Panel + Friend WithEvents Panel38 As System.Windows.Forms.Panel + Friend WithEvents Panel37 As System.Windows.Forms.Panel + Friend WithEvents Panel36 As System.Windows.Forms.Panel + Friend WithEvents Panel35 As System.Windows.Forms.Panel + Friend WithEvents Panel34 As System.Windows.Forms.Panel + Friend WithEvents Panel33 As System.Windows.Forms.Panel + Friend WithEvents Panel32 As System.Windows.Forms.Panel + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents pnllvl5 As System.Windows.Forms.Panel + Friend WithEvents Panel42 As System.Windows.Forms.Panel + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents Panel48 As System.Windows.Forms.Panel + Friend WithEvents Panel47 As System.Windows.Forms.Panel + Friend WithEvents Panel46 As System.Windows.Forms.Panel + Friend WithEvents Panel45 As System.Windows.Forms.Panel + Friend WithEvents Panel44 As System.Windows.Forms.Panel + Friend WithEvents Panel43 As System.Windows.Forms.Panel + +End Class diff --git a/ShiftOS/Labyrinth.resx b/ShiftOS/Labyrinth.resx new file mode 100644 index 0000000..fe79bed --- /dev/null +++ b/ShiftOS/Labyrinth.resx @@ -0,0 +1,140 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 106, 17 + + + 200, 17 + + + 396, 17 + + + Welcome to the Labyrinth. An escape the maze style game for ShiftOS. + +This game is exactly as it sounds, the aim is to navigate the maze to the exit on the right hand side of the screen, after successfully navigating the maze, you will be presented with a new randomly selected maze. However, you have a time limit of 100 second, navigate as many mazes within this time as you can to get the maximum amount of code points. + + + 284, 17 + + + 509, 17 + + \ No newline at end of file diff --git a/ShiftOS/Labyrinth.vb b/ShiftOS/Labyrinth.vb new file mode 100644 index 0000000..22c7d69 --- /dev/null +++ b/ShiftOS/Labyrinth.vb @@ -0,0 +1,684 @@ +Public Class Labyrinth + +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 100 'replace with minimum size + Public minimumsizeheight As Integer = 100 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + setuplevels(0, True) + If ShiftOSDesktop.LabyrinthCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonmaze.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonmaze, ShiftOSDesktop.tbmazeicon, ShiftOSDesktop.tbmazetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(500, 300) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.mazename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.mazeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Dim timeleft As Integer + Dim cpearnt As Integer + Dim movex As Integer + Dim movey As Integer + Dim wall(50) As Panel + Dim level As Integer = 1 + + Private Sub setuplevels(ByVal lvl As Integer, ByVal firstlvl As Boolean) + pnllvl1.Dock = DockStyle.None + pnllvl2.Dock = DockStyle.None + pnllvl3.Dock = DockStyle.None + Select Case lvl + Case 0 + cpearnt = 0 + level = 0 + pnlintro.Dock = DockStyle.Fill + pnlintro.BringToFront() + lbllevel.Text = "Intro" + pnlplayer.Parent = pnlintro + Case 1 + If firstlvl = False Then cpearnt = cpearnt + 2 + level = 1 + pnllvl1.Dock = DockStyle.Fill + pnllvl1.BringToFront() + pnlplayer.Parent = pnllvl1 + lbllevel.Text = "Up 'n Down" + Case 2 + If firstlvl = False Then cpearnt = cpearnt + 2 + level = 2 + pnllvl2.Dock = DockStyle.Fill + pnllvl2.BringToFront() + pnlplayer.Parent = pnllvl2 + lbllevel.Text = "Mid 'I'" + Case 3 + If firstlvl = False Then cpearnt = cpearnt + 2 + level = 3 + pnllvl3.Dock = DockStyle.Fill + pnllvl3.BringToFront() + pnlplayer.Parent = pnllvl3 + lbllevel.Text = "Followin' the Path" + Case 4 + If firstlvl = False Then cpearnt = cpearnt + 2 + level = 4 + pnllvl4.Dock = DockStyle.Fill + pnllvl4.BringToFront() + pnlplayer.Parent = pnllvl4 + lbllevel.Text = "BOXES!" + Case 5 + If firstlvl = False Then cpearnt = cpearnt + 2 + level = 5 + pnllvl5.Dock = DockStyle.Fill + pnllvl5.BringToFront() + pnlplayer.Parent = pnllvl5 + lbllevel.Text = "Twoway" + + End Select + If Not lvl = 0 Then + setupwalls() + pnlplayer.Location = New Point(8, 10) + tmrtimeleft.Start() + tmrgametick.Start() + End If + End Sub + + Private Sub randomizelevel(ByVal firstrun As Boolean) + Dim i As Integer = Math.Ceiling(Rnd() * 5) + If i = level Or i = 0 Then + i = Math.Ceiling(Rnd() * 5) + Else + setuplevels(i, firstrun) + End If + End Sub + + Private Sub key_press(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + If e.KeyCode = Keys.A Then + movex = -2 + End If + If e.KeyCode = Keys.D Then + movex = 2 + End If + If e.KeyCode = Keys.W Then + movey = -2 + End If + If e.KeyCode = Keys.S Then + movey = 2 + End If + End Sub + + Private Sub key_up(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp + If e.KeyCode = Keys.A Then + movex = 0 + End If + If e.KeyCode = Keys.D Then + movex = 0 + End If + If e.KeyCode = Keys.W Then + movey = 0 + End If + If e.KeyCode = Keys.S Then + movey = 0 + End If + End Sub + + Private Sub tmrtimeleft_Tick(sender As Object, e As EventArgs) Handles tmrtimeleft.Tick + If timeleft > 0 Then + timeleft = timeleft - 1 + Else + infobox.showinfo("Time Up", "You have run out of time, having completed " & level & " mazes and earnt " & cpearnt & " CP") + setuplevels(0, True) + ShiftOSDesktop.codepoints = +cpearnt + cpearnt = 0 + End If + lbltime.Text = timeleft + End Sub + + Dim i As Integer = 0 + Private Sub tmrgametimer_Tick(sender As Object, e As EventArgs) Handles tmrgametick.Tick + pnlplayer.Location = New Point(pnlplayer.Location.X + movex, pnlplayer.Location.Y + movey) + + If Not level = 0 Then + If pnlplayer.Bounds.IntersectsWith(wall(i).Bounds) Then + infobox.showinfo(" Game Over", "You hit a wall, missing out on " & cpearnt & " Code Points") + setuplevels(0, True) + cpearnt = 0 + movex = 0 + movey = 0 + End If + End If + + If Not level = 0 Then + If Not pnlplayer.Bounds.IntersectsWith(pnlplayer.Parent.Bounds) Then + infobox.showinfo("Game Over", "No escape, stop being a mazerunner. You just missed out on " & cpearnt & " Code Points") + setuplevels(0, True) + cpearnt = 0 + End If + End If + + If pnlplayer.Bounds.IntersectsWith(lbllvl1exit.Bounds) Then + randomizelevel(False) + End If + + If level = 1 Then + If i <= 9 Then + i = i + 1 + Else + i = 0 + End If + ElseIf level = 2 Then + If i <= 11 Then + i = i + 1 + Else + i = 0 + End If + ElseIf level = 3 Then + If i <= 3 Then + i = i + 1 + Else + i = 0 + End If + ElseIf level = 4 Then + If i <= 7 Then + i = i + 1 + Else + i = 0 + End If + ElseIf level = 5 Then + If i <= 4 Then + i = i + 1 + Else + i = 0 + End If + End If + btncashout.Text = "Cashout " & cpearnt & " CP" + End Sub + + Private Sub setupwalls() + Select Case level + 'Dim j as integer = 0 + 'For Each ctl As Control In Lvls.Controls + ' Dim i as integer = 0 + ' For Each ctrl As Control In ctl.Controls + ' Try + ' wallObj(j, i) = ctrl + ' Catch ex As Exception + + ' End Try + ' i = i + 1 + ' Next + 'Next + '^^^^^^^^^^ How to code for expandability + Case 1 + wall(0) = Panel1 + wall(2) = Panel2 + wall(3) = Panel3 + wall(4) = Panel4 + wall(5) = Panel5 + wall(6) = Panel6 + wall(7) = Panel7 + wall(8) = Panel8 + wall(9) = Panel9 + wall(10) = Panel10 + wall(1) = Panel11 + Case 2 + wall(0) = Panel12 + wall(1) = Panel13 + wall(2) = Panel14 + wall(3) = Panel15 + wall(4) = Panel16 + wall(5) = Panel17 + wall(6) = Panel18 + wall(7) = Panel19 + wall(8) = Panel20 + wall(9) = Panel21 + wall(10) = Panel22 + wall(11) = Panel23 + wall(12) = Panel24 + wall(13) = Panel25 + Case 3 + wall(0) = Panel26 + wall(1) = Panel27 + wall(2) = Panel28 + wall(3) = Panel29 + wall(4) = Panel30 + wall(5) = Panel31 + Case 4 + wall(0) = Panel32 + wall(1) = Panel33 + wall(2) = Panel34 + wall(3) = Panel35 + wall(4) = Panel36 + wall(5) = Panel37 + wall(6) = Panel38 + wall(7) = Panel39 + wall(8) = Panel40 + wall(9) = Panel41 + Case 5 + wall(0) = Panel42 + wall(1) = Panel43 + wall(2) = Panel44 + wall(3) = Panel45 + wall(4) = Panel46 + wall(5) = Panel47 + wall(6) = Panel48 + End Select + End Sub + + Private Sub btncashout_Click(sender As Object, e As EventArgs) Handles btncashout.Click + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + cpearnt + infobox.showinfo("Cashout Successful", "You have successfully cashed out " & cpearnt & " Code Points") + cpearnt = 0 + setuplevels(0, True) + End Sub + + Private Sub beginbtn_Click(sender As Object, e As EventArgs) Handles beginbtn.Click + timeleft = 100 + randomizelevel(True) + End Sub +End Class diff --git a/ShiftOS/Module1.vb b/ShiftOS/Module1.vb new file mode 100644 index 0000000..4d3166b --- /dev/null +++ b/ShiftOS/Module1.vb @@ -0,0 +1,3 @@ +Module Module1 + +End Module diff --git a/ShiftOS/My Project/Application.Designer.vb b/ShiftOS/My Project/Application.Designer.vb new file mode 100644 index 0000000..8fd65ed --- /dev/null +++ b/ShiftOS/My Project/Application.Designer.vb @@ -0,0 +1,38 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.36323 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +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 + + _ + Public Sub New() + MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.ApplicationDefined) + Me.IsSingleInstance = true + Me.EnableVisualStyles = true + Me.SaveMySettingsOnExit = true + Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterAllFormsClose + End Sub + + _ + Protected Overrides Sub OnCreateMainForm() + Me.MainForm = Global.ShiftOS.HijackScreen + End Sub + End Class +End Namespace diff --git a/ShiftOS/My Project/Application.myapp b/ShiftOS/My Project/Application.myapp new file mode 100644 index 0000000..c69e73d --- /dev/null +++ b/ShiftOS/My Project/Application.myapp @@ -0,0 +1,10 @@ + + + true + HijackScreen + true + 1 + true + 1 + true + \ No newline at end of file diff --git a/ShiftOS/My Project/AssemblyInfo.vb b/ShiftOS/My Project/AssemblyInfo.vb new file mode 100644 index 0000000..d1a405b --- /dev/null +++ b/ShiftOS/My Project/AssemblyInfo.vb @@ -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 + + + + + + + + + + +'The following GUID is for the ID of the typelib if this project is exposed to COM + + +' 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: +' + + + diff --git a/ShiftOS/My Project/Resources.Designer.vb b/ShiftOS/My Project/Resources.Designer.vb new file mode 100644 index 0000000..301255a --- /dev/null +++ b/ShiftOS/My Project/Resources.Designer.vb @@ -0,0 +1,3319 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.34014 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +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. + ''' + ''' A strongly-typed resource class, for looking up localized strings, etc. + ''' + _ + Friend Module Resources + + Private resourceMan As Global.System.Resources.ResourceManager + + Private resourceCulture As Global.System.Globalization.CultureInfo + + ''' + ''' Returns the cached ResourceManager instance used by this class. + ''' + _ + 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("ShiftOS.Resources", GetType(Resources).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + ''' + ''' Overrides the current thread's CurrentUICulture property for all + ''' resource lookups using this strongly typed resource class. + ''' + _ + Friend Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set + resourceCulture = value + End Set + End Property + + ''' + ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + ''' + Friend ReadOnly Property _3beepvirus() As System.IO.UnmanagedMemoryStream + Get + Return ResourceManager.GetStream("_3beepvirus", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeaudioplayerbox() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeaudioplayerbox", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeaudioplayerprice() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeaudioplayerprice", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeaudioplayerpricepressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeaudioplayerpricepressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapecalculator() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapecalculator", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapecalculatorprice() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapecalculatorprice", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapecalculatorpricepressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapecalculatorpricepressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapedepositbitnotewalletscreenshot() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapedepositbitnotewalletscreenshot", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapedepositinfo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapedepositinfo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapedepositnowbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapedepositnowbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapedownloadbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapedownloadbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfoaudioplayertext() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfoaudioplayertext", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfoaudioplayervisualpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfoaudioplayervisualpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfobackbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfobackbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfobutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfobutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfobuttonpressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfobuttonpressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfobuybutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfobuybutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfocalculatortext() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfocalculatortext", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfocalculatorvisualpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfocalculatorvisualpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfoorcwritetext() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfoorcwritetext", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfoorcwritevisualpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfoorcwritevisualpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfovideoplayertext() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfovideoplayertext", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfovideoplayervisualpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfovideoplayervisualpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfowebbrowsertext() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfowebbrowsertext", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeinfowebbrowservisualpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeinfowebbrowservisualpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapemoresoftware() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapemoresoftware", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeorcwrite() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeorcwrite", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapetitlebanner() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapetitlebanner", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeundefinedprice() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeundefinedprice", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapeundefinedpricepressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapeundefinedpricepressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapevideoplayer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapevideoplayer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapevideoplayerprice() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapevideoplayerprice", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapevideoplayerpricepressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapevideoplayerpricepressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapewebbrowser() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapewebbrowser", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapewebbrowserprice() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapewebbrowserprice", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapewebbrowserpricepressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapewebbrowserpricepressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property appscapewelcometoappscape() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("appscapewelcometoappscape", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadcirclerubber() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadcirclerubber", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadcirclerubberselected() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadcirclerubberselected", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPaderacer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPaderacer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadfloodfill() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadfloodfill", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadlinetool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadlinetool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadmagnify() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadmagnify", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadnew() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadnew", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadopen() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadopen", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadOval() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadOval", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadpaintbrush() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadpaintbrush", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadpencil() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadpencil", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadpixelplacer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadpixelplacer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadpixelsetter() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadpixelsetter", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadRectangle() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadRectangle", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadredo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadredo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadsave() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadsave", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadsquarerubber() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadsquarerubber", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadsquarerubberselected() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadsquarerubberselected", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadtexttool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadtexttool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ArtPadundo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ArtPadundo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Byte[]. + ''' + Friend ReadOnly Property AxInterop_WMPLib() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("AxInterop_WMPLib", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property bitnotediggergradetable() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("bitnotediggergradetable", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property BitnotesAcceptedHereLogo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("BitnotesAcceptedHereLogo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property bitnoteswebsidepnl() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("bitnoteswebsidepnl", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property bitnotewalletdownload() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("bitnotewalletdownload", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property bitnotewalletpreviewscreenshot() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("bitnotewalletpreviewscreenshot", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property bitnotewebsitetitle() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("bitnotewebsitetitle", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property centrebutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("centrebutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property centrebuttonpressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("centrebuttonpressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property christmaseasteregg() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("christmaseasteregg", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property crash() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("crash", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property crash_cheat() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("crash_cheat", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property crash_force() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("crash_force", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property crash_ofm() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("crash_ofm", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property deletefile() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("deletefile", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property deletefolder() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("deletefolder", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized string similar to Desktop++ v1.0 + ''' + '''Ever wanted to have a useful desktop with icons? Icons that can open files, websites or other content? Icons that can be dragged across the screen any way you like? Well, Desktop++ is for you. Desktop++ constantly scans 'C:/ShiftOS/Home/Desktop' and creates an icon for each file and folder within. + ''' + '''Desktop++ also allows you to change between Icon and Tile view, where Tile view gives more information, and Icon View allows simplicity and draggability. It also allows you to dump a Text File [rest of string was truncated]";. + ''' + Friend ReadOnly Property DesktopPlusPlusAbout() As String + Get + Return ResourceManager.GetString("DesktopPlusPlusAbout", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + ''' + Friend ReadOnly Property dial_up_modem_02() As System.IO.UnmanagedMemoryStream + Get + Return ResourceManager.GetStream("dial_up_modem_02", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property dodge() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("dodge", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property downarrow() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("downarrow", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property floodgateicn() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("floodgateicn", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconArtpad() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconArtpad", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconAudioPlayer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconAudioPlayer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconBitnoteDigger() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconBitnoteDigger", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconBitnoteWallet() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconBitnoteWallet", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconCalculator() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconCalculator", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconClock() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconClock", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconColourPicker() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconColourPicker", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconDodge() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconDodge", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconDownloader() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconDownloader", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property icondownloadmanager() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("icondownloadmanager", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconFileOpener() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconFileOpener", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconFileSaver() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconFileSaver", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconFileSkimmer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconFileSkimmer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconfloodgate() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconfloodgate", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconGraphicPicker() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconGraphicPicker", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconIconManager() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconIconManager", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconInfoBox() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconInfoBox", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconinstaller() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconinstaller", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconKnowledgeInput() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconKnowledgeInput", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconmaze() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconmaze", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconNameChanger() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconNameChanger", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconorcwrite() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconorcwrite", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconPong() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconPong", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconShifter() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconShifter", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconShiftnet() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconShiftnet", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconShiftorium() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconShiftorium", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconshutdown() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconshutdown", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconSkinLoader() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconSkinLoader", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconSkinShifter() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconSkinShifter", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconSnakey() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconSnakey", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconSysinfo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconSysinfo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconTerminal() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconTerminal", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconTextPad() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconTextPad", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconunitytoggle() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconunitytoggle", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconVideoPlayer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconVideoPlayer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconvirusscanner() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconvirusscanner", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property iconWebBrowser() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("iconWebBrowser", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + ''' + Friend ReadOnly Property infobox() As System.IO.UnmanagedMemoryStream + Get + Return ResourceManager.GetStream("infobox", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Byte[]. + ''' + Friend ReadOnly Property Interop_WMPLib() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("Interop_WMPLib", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Byte[]. + ''' + Friend ReadOnly Property license() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("license", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property loadbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("loadbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property Minimatchbackground() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("Minimatchbackground", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property minimatchdodgepreviewimage() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("minimatchdodgepreviewimage", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property minimatchlabyrinthpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("minimatchlabyrinthpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property newfolder() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("newfolder", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property newicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("newicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property nextbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("nextbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property openicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("openicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property pausebutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("pausebutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property playbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("playbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property previousbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("previousbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ReceiveClicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ReceiveClicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ReceiveUnclicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ReceiveUnclicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + ''' + Friend ReadOnly Property rolldown() As System.IO.UnmanagedMemoryStream + Get + Return ResourceManager.GetStream("rolldown", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + ''' + Friend ReadOnly Property rollup() As System.IO.UnmanagedMemoryStream + Get + Return ResourceManager.GetStream("rollup", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property saveicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("saveicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property SendClicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("SendClicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property SendUnclicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("SendUnclicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property shiftomizericonpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("shiftomizericonpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property shiftomizerindustrialskinpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("shiftomizerindustrialskinpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property shiftomizerlinuxmintskinpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("shiftomizerlinuxmintskinpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property shiftomizernamechangerpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("shiftomizernamechangerpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property shiftomizerskinchangerpreview() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("shiftomizerskinchangerpreview", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property shiftomizersliderleftarrow() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("shiftomizersliderleftarrow", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property shiftomizersliderrightarrow() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("shiftomizersliderrightarrow", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property skindownarrow() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("skindownarrow", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property skinfile() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("skinfile", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Byte[]. + ''' + Friend ReadOnly Property skinIndustrial() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("skinIndustrial", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Byte[]. + ''' + Friend ReadOnly Property skinLinuxMint7() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("skinLinuxMint7", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property skinuparrow() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("skinuparrow", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property snakeyback() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("snakeyback", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property stopbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("stopbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property stretchbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("stretchbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property stretchbuttonpressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("stretchbuttonpressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property Symbolinfo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("Symbolinfo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property test() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("test", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property tilebutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("tilebutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property tilebuttonpressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("tilebuttonpressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property TotalBalanceClicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("TotalBalanceClicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property TotalBalanceUnclicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("TotalBalanceUnclicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property transactionsClicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("transactionsClicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property transactionsUnclicked() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("transactionsUnclicked", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + ''' + Friend ReadOnly Property typesound() As System.IO.UnmanagedMemoryStream + Get + Return ResourceManager.GetStream("typesound", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property uparrow() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("uparrow", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property updatecustomcolourpallets() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("updatecustomcolourpallets", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealartpad() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealartpad", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealclock() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealclock", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealfileskimmer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealfileskimmer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealpong() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealpong", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealshifter() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealshifter", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealshiftorium() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealshiftorium", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealtextpad() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealtextpad", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradealunitymode() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradealunitymode", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeamandpm() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeamandpm", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeanycolourshade() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeanycolourshade", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeanycolourshade2() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeanycolourshade2", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeanycolourshade3() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeanycolourshade3", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeanycolourshade4() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeanycolourshade4", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeapplaunchermenu() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeapplaunchermenu", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeapplaunchershutdown() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeapplaunchershutdown", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpad() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpad", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpad128colorpallets() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpad128colorpallets", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpad16colorpallets() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpad16colorpallets", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpad32colorpallets() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpad32colorpallets", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpad4colorpallets() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpad4colorpallets", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpad64colorpallets() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpad64colorpallets", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpad8colorpallets() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpad8colorpallets", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpaderaser() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpaderaser", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadfilltool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadfilltool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadlimitlesspixels() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadlimitlesspixels", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadlinetool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadlinetool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadload() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadload", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadnew() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadnew", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadovaltool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadovaltool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpaintbrushtool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpaintbrushtool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpenciltool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpenciltool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit1024() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit1024", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit16() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit16", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit16384() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit16384", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit256() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit256", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit4() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit4", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit4096() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit4096", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit64() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit64", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit65536() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit65536", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixellimit8() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixellimit8", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixelplacer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixelplacer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadpixelplacermovementmode() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadpixelplacermovementmode", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadrectangletool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadrectangletool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadredo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadredo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadsave() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadsave", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadtexttool() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadtexttool", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeartpadundo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeartpadundo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeautoscrollterminal() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeautoscrollterminal", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeblue() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeblue", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradebluecustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradebluecustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeblueshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeblueshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeblueshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeblueshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradebrown() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradebrown", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradebrowncustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradebrowncustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradebrownshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradebrownshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradebrownshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradebrownshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeclock() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeclock", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeclockicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeclockicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeclosebutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeclosebutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradecolourpickericon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradecolourpickericon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradecustomusername() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradecustomusername", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradedesktoppanel() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradedesktoppanel", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradedesktoppanelclock() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradedesktoppanelclock", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradedraggablewindows() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradedraggablewindows", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradefileskimmer() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradefileskimmer", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradefileskimmerdelete() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradefileskimmerdelete", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradefileskimmericon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradefileskimmericon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradefileskimmernew() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradefileskimmernew", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegray() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegray", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegraycustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegraycustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegrayshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegrayshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegrayshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegrayshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegreen() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegreen", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegreencustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegreencustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegreenshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegreenshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradegreenshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradegreenshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradehoursssincemidnight() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradehoursssincemidnight", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeiconunitymode() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeiconunitymode", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeinfoboxicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeinfoboxicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradekiaddons() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradekiaddons", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradekielements() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradekielements", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeknowledgeinput() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeknowledgeinput", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeknowledgeinputicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeknowledgeinputicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgrademinimizebutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgrademinimizebutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgrademinimizecommand() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgrademinimizecommand", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgrademinuteaccuracytime() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgrademinuteaccuracytime", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgrademinutesssincemidnight() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgrademinutesssincemidnight", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgrademoveablewindows() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgrademoveablewindows", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgrademultitasking() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgrademultitasking", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeorange() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeorange", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeorangecustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeorangecustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeorangeshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeorangeshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeorangeshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeorangeshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeosname() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeosname", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepanelbuttons() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepanelbuttons", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepink() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepink", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepinkcustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepinkcustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepinkshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepinkshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepinkshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepinkshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepong() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepong", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepongicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepongicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepurple() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepurple", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepurplecustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepurplecustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepurpleshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepurpleshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradepurpleshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradepurpleshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradered() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradered", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderedcustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderedcustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderedshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderedshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderedshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderedshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderemoveth1() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderemoveth1", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderemoveth2() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderemoveth2", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderemoveth3() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderemoveth3", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderemoveth4() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderemoveth4", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderesize() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderesize", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderollupbutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderollupbutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgraderollupcommand() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgraderollupcommand", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradesecondssincemidnight() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradesecondssincemidnight", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradesgameconsoles() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradesgameconsoles", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftapplauncher() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftapplauncher", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftborders() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftborders", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftbuttons() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftbuttons", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftdesktop() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftdesktop", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftdesktoppanel() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftdesktoppanel", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshifter() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshifter", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftericon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftericon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftitems() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftitems", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftoriumicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftoriumicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftpanelbuttons() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftpanelbuttons", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshiftpanelclock() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshiftpanelclock", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshifttitlebar() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshifttitlebar", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshifttitletext() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshifttitletext", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeshutdownicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeshutdownicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeskicarbrands() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeskicarbrands", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeskinning() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeskinning", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradesplitsecondaccuracy() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradesplitsecondaccuracy", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradesysinfo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradesysinfo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeterminalicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeterminalicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeterminalscrollbar() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeterminalscrollbar", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetextpad() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetextpad", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetextpadicon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetextpadicon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetextpadnew() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetextpadnew", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetextpadopen() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetextpadopen", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetextpadsave() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetextpadsave", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetitlebar() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetitlebar", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetitletext() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetitletext", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradetrm() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradetrm", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeunitymode() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeunitymode", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeusefulpanelbuttons() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeusefulpanelbuttons", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradevirusscanner() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradevirusscanner", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradewindowborders() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradewindowborders", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradewindowedterminal() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradewindowedterminal", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradewindowsanywhere() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradewindowsanywhere", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeyellow() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeyellow", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeyellowcustom() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeyellowcustom", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeyellowshades() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeyellowshades", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property upgradeyellowshadeset() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("upgradeyellowshadeset", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property webback() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("webback", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property webforward() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("webforward", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property webhome() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("webhome", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. + ''' + Friend ReadOnly Property writesound() As System.IO.UnmanagedMemoryStream + Get + Return ResourceManager.GetStream("writesound", resourceCulture) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property zoombutton() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("zoombutton", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Looks up a localized resource of type System.Drawing.Bitmap. + ''' + Friend ReadOnly Property zoombuttonpressed() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("zoombuttonpressed", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + End Module +End Namespace diff --git a/ShiftOS/My Project/Resources.resx b/ShiftOS/My Project/Resources.resx new file mode 100644 index 0000000..8eea251 --- /dev/null +++ b/ShiftOS/My Project/Resources.resx @@ -0,0 +1,1099 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + ..\Resources\upgrademinimizecommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\writesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\appscapeinfobackbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepinkcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradewindowborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\saveicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradedraggablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreenshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrowncustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealfileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepinkshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnotewalletpreviewscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnoteswebsidepnl.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedownloadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\loadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSnakey.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadovaltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeautoscrollterminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradekiaddons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconfloodgate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeblueshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\typesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\upgradeterminalicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\nextbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadrectangletool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurplecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\pixelsetter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit16384.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeundefinedprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\transactionsClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradedesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnotewebsitetitle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebluecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfobutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradecolourpickericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapetitlebanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconDownloader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfobuybutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesgameconsoles.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewebbrowser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\pausebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconArtpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconShiftnet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorange.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\infobox.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\appscapeinfoaudioplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit4096.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit64.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad8colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Receive.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\stopbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegrayshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad16colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\webforward.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconshutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\anycolourshade4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesecondssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshutdownicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeknowledgeinput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmerdelete.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradewindowsanywhere.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeskinning.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeaudioplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftdesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmernew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit256.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeinfoboxicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfocalculatorvisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfowebbrowsertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeknowledgeinputicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\SendClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellowshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\rolldown.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\deletefolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad32colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealpong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\skinuparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad128colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconAudioPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\newfolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconTextPad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad64colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\anycolourshade.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeskicarbrands.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademinutesssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad4colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegraycustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorangecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellowshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapevideoplayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconColourPicker.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderedshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderedcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconFileOpener.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\stretchbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\openicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradehoursssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadsquarerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealtextpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit1024.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrownshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadOval.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorangeshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadfloodfill.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradered.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\dial-up-modem-02.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\appscapeinfovideoplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\webback.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\skinfile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\installericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedepositbitnotewalletscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademinimizebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfowebbrowservisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconorcwrite.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadcirclerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapemoresoftware.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfoaudioplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeapplaunchermenu.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadpencil.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreencustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapevideoplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\TotalBalanceClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\stretchbuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadfilltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurpleshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurpleshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\deletefile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixelplacermovementmode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadlimitlesspixels.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Send.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeaudioplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconBitnoteWallet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeblueshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademultitasking.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegrayshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradewindowedterminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradebrownshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPaderacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadcirclerubberselected.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\rollup.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\iconVideoPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\snakeyback.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeclosebutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegray.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Symbolinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderollupcommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconInfoBox.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshifttitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeaudioplayerbox.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconKnowledgeInput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadload.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealshiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconNameChanger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\playbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit65536.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeorangeshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\tilebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadlinetool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfocalculatortext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\centrebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepongicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeclockicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeusefulpanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeblue.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\dodge.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedepositnowbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapevideoplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\test.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademoveablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\webhome.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadpaintbrush.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfobuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\downloadmanagericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapedepositinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradedesktoppanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\BitnotesAcceptedHereLogo.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconunitytoggle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixellimit8.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewelcometoappscape.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeundefinedpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftpanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconIconManager.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\downarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadsquarerubberselected.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\previousbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\centrebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfovideoplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconDodge.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadlinetool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeapplaunchershutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSkinShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapecalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpaderaser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewebbrowserpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\newicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpenciltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapecalculatorprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\anycolourshade3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderollupbutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconTerminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSkinLoader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconClock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconWebBrowser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\TotalBalanceUnclicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\skindownarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftpanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconBitnoteDigger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconFileSaver.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconvirusscanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftapplauncher.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradefileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeamandpm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftdesktop.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadpaintbrushtool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgrademinuteaccuracytime.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradecustomusername.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconPong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnotewalletdownload.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadRectangle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconSysinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\bitnotediggergradetable.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftoriumicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\transactionsUnclicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconShiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\anycolourshade2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradegreenshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderedshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\3beepvirus.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\minimatchdodgepreviewimage.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshifttitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesplitsecondaccuracy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\icongraphicpicker.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Minimatchbackground.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradekielements.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\zoombutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeyellowcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepurple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\zoombuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepink.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapewebbrowserprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\updatecustomcolourpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\floodgateicn.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetextpadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\tilebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapecalculatorpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconCalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradepinkshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\uparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\iconFileSkimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeterminalscrollbar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ReceiveClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ArtPadmagnify.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeartpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizerindustrialskinpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizerlinuxmintskinpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizersliderleftarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizersliderrightarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash-cheat.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash-force.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizerskinshifterscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ShiftOS License.txt;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\christmaseasteregg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\crash_ofm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\AxInterop.WMPLib.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\Interop.WMPLib.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\iconmaze.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizericonpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shiftomizernamechangerpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\minimatchlabyrinthpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradealunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeiconunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeosname.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderesize.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradeshiftitems.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradesysinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradetrm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgraderemoveth4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\upgradevirusscanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeorcwrite.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfoorcwritetext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\appscapeinfoorcwritevisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\Industrial.skn;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\Linux Mint 7.skn;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ..\Resources\DesktopPlusPlusAbout.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252 + + \ No newline at end of file diff --git a/ShiftOS/My Project/Settings.Designer.vb b/ShiftOS/My Project/Settings.Designer.vb new file mode 100644 index 0000000..3238f3a --- /dev/null +++ b/ShiftOS/My Project/Settings.Designer.vb @@ -0,0 +1,85 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.34003 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + _ + 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 + + _ + 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 + + _ + Public Property ShouldCrashOccur() As Integer + Get + Return CType(Me("ShouldCrashOccur"),Integer) + End Get + Set + Me("ShouldCrashOccur") = value + End Set + End Property + End Class +End Namespace + +Namespace My + + _ + Friend Module MySettingsProperty + + _ + Friend ReadOnly Property Settings() As Global.ShiftOS.My.MySettings + Get + Return Global.ShiftOS.My.MySettings.Default + End Get + End Property + End Module +End Namespace diff --git a/ShiftOS/My Project/Settings.settings b/ShiftOS/My Project/Settings.settings new file mode 100644 index 0000000..3aec920 --- /dev/null +++ b/ShiftOS/My Project/Settings.settings @@ -0,0 +1,9 @@ + + + + + + 0 + + + \ No newline at end of file diff --git a/ShiftOS/My Project/app.manifest b/ShiftOS/My Project/app.manifest new file mode 100644 index 0000000..f499e6a --- /dev/null +++ b/ShiftOS/My Project/app.manifest @@ -0,0 +1,52 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/ShiftOS/MyPreviewToolStripRenderer.vb b/ShiftOS/MyPreviewToolStripRenderer.vb new file mode 100644 index 0000000..ee2239d --- /dev/null +++ b/ShiftOS/MyPreviewToolStripRenderer.vb @@ -0,0 +1,8 @@ +Imports ShiftOS.MyNamespace + +Public Class MyPreviewToolStripRenderer + Inherits ToolStripProfessionalRenderer + Public Sub New() + MyBase.New(New PreviewCustomColorTable()) + End Sub +End Class diff --git a/ShiftOS/MyToolStripRenderer.vb b/ShiftOS/MyToolStripRenderer.vb new file mode 100644 index 0000000..d517cf9 --- /dev/null +++ b/ShiftOS/MyToolStripRenderer.vb @@ -0,0 +1,8 @@ +Imports ShiftOS.MyNamespace + +Public Class MyToolStripRenderer + Inherits ToolStripProfessionalRenderer + Public Sub New() + MyBase.New(New CustomColorTable()) + End Sub +End Class diff --git a/ShiftOS/Name Changer.Designer.vb b/ShiftOS/Name Changer.Designer.vb new file mode 100644 index 0000000..2cbbeb4 --- /dev/null +++ b/ShiftOS/Name Changer.Designer.vb @@ -0,0 +1,2228 @@ + _ +Partial Class Name_Changer + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + 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. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlprogramlistholder = New System.Windows.Forms.Panel() + Me.pnlterminalsettings = New System.Windows.Forms.Panel() + Me.txtterminalname = New System.Windows.Forms.TextBox() + Me.Label19 = New System.Windows.Forms.Label() + Me.picterminalicon = New System.Windows.Forms.PictureBox() + Me.pnliconmanagersettings = New System.Windows.Forms.Panel() + Me.txticonmanager = New System.Windows.Forms.TextBox() + Me.Label20 = New System.Windows.Forms.Label() + Me.piciconmanagericon = New System.Windows.Forms.PictureBox() + Me.pnlnamechangersettings = New System.Windows.Forms.Panel() + Me.txtnamechanger = New System.Windows.Forms.TextBox() + Me.Label18 = New System.Windows.Forms.Label() + Me.picnamechangericon = New System.Windows.Forms.PictureBox() + Me.pnlvideoplayersettings = New System.Windows.Forms.Panel() + Me.txtvideoplayername = New System.Windows.Forms.TextBox() + Me.Label17 = New System.Windows.Forms.Label() + Me.picvideoplayericon = New System.Windows.Forms.PictureBox() + Me.pnlwebbrowsersettings = New System.Windows.Forms.Panel() + Me.txtwebbrowsername = New System.Windows.Forms.TextBox() + Me.Label16 = New System.Windows.Forms.Label() + Me.picwebbrowsericon = New System.Windows.Forms.PictureBox() + Me.pnlaudioplayersettings = New System.Windows.Forms.Panel() + Me.txtaudioplayername = New System.Windows.Forms.TextBox() + Me.Label15 = New System.Windows.Forms.Label() + Me.picaudioplayericon = New System.Windows.Forms.PictureBox() + Me.pnlcalculatorsettings = New System.Windows.Forms.Panel() + Me.txtcalculatorname = New System.Windows.Forms.TextBox() + Me.Label14 = New System.Windows.Forms.Label() + Me.piccalculatoricon = New System.Windows.Forms.PictureBox() + Me.pnlartpadsettings = New System.Windows.Forms.Panel() + Me.txtartpadname = New System.Windows.Forms.TextBox() + Me.Label13 = New System.Windows.Forms.Label() + Me.picartpadicon = New System.Windows.Forms.PictureBox() + Me.pnlskinloadersettings = New System.Windows.Forms.Panel() + Me.txtskinloadername = New System.Windows.Forms.TextBox() + Me.Label12 = New System.Windows.Forms.Label() + Me.picskinloadericon = New System.Windows.Forms.PictureBox() + Me.pnlgraphicpickersettings = New System.Windows.Forms.Panel() + Me.txtgraphicpickername = New System.Windows.Forms.TextBox() + Me.Label11 = New System.Windows.Forms.Label() + Me.picgraphicpickericon = New System.Windows.Forms.PictureBox() + Me.pnltextpadsettings = New System.Windows.Forms.Panel() + Me.txttextpadname = New System.Windows.Forms.TextBox() + Me.Label10 = New System.Windows.Forms.Label() + Me.pictextpadicon = New System.Windows.Forms.PictureBox() + Me.pnlfilesaversettings = New System.Windows.Forms.Panel() + Me.txtfilesavername = New System.Windows.Forms.TextBox() + Me.Label9 = New System.Windows.Forms.Label() + Me.picfilesavericon = New System.Windows.Forms.PictureBox() + Me.pnlfileopenersettings = New System.Windows.Forms.Panel() + Me.txtfileopenername = New System.Windows.Forms.TextBox() + Me.Label8 = New System.Windows.Forms.Label() + Me.picfileopenericon = New System.Windows.Forms.PictureBox() + Me.pnlfileskimmersettings = New System.Windows.Forms.Panel() + Me.txtfileskimmername = New System.Windows.Forms.TextBox() + Me.Label7 = New System.Windows.Forms.Label() + Me.picfileskimmericon = New System.Windows.Forms.PictureBox() + Me.pnlpongsettings = New System.Windows.Forms.Panel() + Me.txtpongname = New System.Windows.Forms.TextBox() + Me.Label6 = New System.Windows.Forms.Label() + Me.picpongicon = New System.Windows.Forms.PictureBox() + Me.pnlcolourpickersettings = New System.Windows.Forms.Panel() + Me.txtcolourpickername = New System.Windows.Forms.TextBox() + Me.Label5 = New System.Windows.Forms.Label() + Me.piccolourpickericon = New System.Windows.Forms.PictureBox() + Me.pnlshiftersettings = New System.Windows.Forms.Panel() + Me.txtshiftername = New System.Windows.Forms.TextBox() + Me.Label4 = New System.Windows.Forms.Label() + Me.picshiftericon = New System.Windows.Forms.PictureBox() + Me.pnlclocksettings = New System.Windows.Forms.Panel() + Me.txtclockname = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.picclockicon = New System.Windows.Forms.PictureBox() + Me.pnlshiftoriumsettings = New System.Windows.Forms.Panel() + Me.txtshiftoriumname = New System.Windows.Forms.TextBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.picshiftoriumicon = New System.Windows.Forms.PictureBox() + Me.pnlknowledgeinputsettings = New System.Windows.Forms.Panel() + Me.txtknowledgeinputname = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.picknowledgeinputicon = New System.Windows.Forms.PictureBox() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.btnLoad = New System.Windows.Forms.Button() + Me.btnSave = New System.Windows.Forms.Button() + Me.PictureBox13 = New System.Windows.Forms.PictureBox() + Me.btnReset = New System.Windows.Forms.Button() + Me.btnApply = New System.Windows.Forms.Button() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlwallet = New System.Windows.Forms.Panel() + Me.txtwallet = New System.Windows.Forms.TextBox() + Me.Label21 = New System.Windows.Forms.Label() + Me.picwallet = New System.Windows.Forms.PictureBox() + Me.pnldigger = New System.Windows.Forms.Panel() + Me.txtdigger = New System.Windows.Forms.TextBox() + Me.Label22 = New System.Windows.Forms.Label() + Me.picdigger = New System.Windows.Forms.PictureBox() + Me.pnlskinshifter = New System.Windows.Forms.Panel() + Me.txtskinshifter = New System.Windows.Forms.TextBox() + Me.Label23 = New System.Windows.Forms.Label() + Me.picskinshifter = New System.Windows.Forms.PictureBox() + Me.pnlshiftnet = New System.Windows.Forms.Panel() + Me.txtshiftnet = New System.Windows.Forms.TextBox() + Me.Label24 = New System.Windows.Forms.Label() + Me.picshiftnet = New System.Windows.Forms.PictureBox() + Me.pnldodge = New System.Windows.Forms.Panel() + Me.txtdodge = New System.Windows.Forms.TextBox() + Me.Label25 = New System.Windows.Forms.Label() + Me.picdodge = New System.Windows.Forms.PictureBox() + Me.pnldownload = New System.Windows.Forms.Panel() + Me.txtdownload = New System.Windows.Forms.TextBox() + Me.Label26 = New System.Windows.Forms.Label() + Me.picdownload = New System.Windows.Forms.PictureBox() + Me.pnlinstaller = New System.Windows.Forms.Panel() + Me.txtinstaller = New System.Windows.Forms.TextBox() + Me.Label27 = New System.Windows.Forms.Label() + Me.picinstaller = New System.Windows.Forms.PictureBox() + Me.pnlsysinfo = New System.Windows.Forms.Panel() + Me.txtsysinfo = New System.Windows.Forms.TextBox() + Me.Label28 = New System.Windows.Forms.Label() + Me.picsysinfo = New System.Windows.Forms.PictureBox() + Me.pnlorcwrite = New System.Windows.Forms.Panel() + Me.txtorcwrite = New System.Windows.Forms.TextBox() + Me.Label29 = New System.Windows.Forms.Label() + Me.picorcwrite = New System.Windows.Forms.PictureBox() + Me.pnlfloodgate = New System.Windows.Forms.Panel() + Me.txtfloodgate = New System.Windows.Forms.TextBox() + Me.Label30 = New System.Windows.Forms.Label() + Me.picfloodgate = New System.Windows.Forms.PictureBox() + Me.pnlmaze = New System.Windows.Forms.Panel() + Me.txtmaze = New System.Windows.Forms.TextBox() + Me.Label31 = New System.Windows.Forms.Label() + Me.picmaze = New System.Windows.Forms.PictureBox() + Me.pnlvirusscanner = New System.Windows.Forms.Panel() + Me.txtvirusscanner = New System.Windows.Forms.TextBox() + Me.Label32 = New System.Windows.Forms.Label() + Me.picvirusscanner = New System.Windows.Forms.PictureBox() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnlprogramlistholder.SuspendLayout() + Me.pnlterminalsettings.SuspendLayout() + CType(Me.picterminalicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnliconmanagersettings.SuspendLayout() + CType(Me.piciconmanagericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlnamechangersettings.SuspendLayout() + CType(Me.picnamechangericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlvideoplayersettings.SuspendLayout() + CType(Me.picvideoplayericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlwebbrowsersettings.SuspendLayout() + CType(Me.picwebbrowsericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlaudioplayersettings.SuspendLayout() + CType(Me.picaudioplayericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlcalculatorsettings.SuspendLayout() + CType(Me.piccalculatoricon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlartpadsettings.SuspendLayout() + CType(Me.picartpadicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlskinloadersettings.SuspendLayout() + CType(Me.picskinloadericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlgraphicpickersettings.SuspendLayout() + CType(Me.picgraphicpickericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnltextpadsettings.SuspendLayout() + CType(Me.pictextpadicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlfilesaversettings.SuspendLayout() + CType(Me.picfilesavericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlfileopenersettings.SuspendLayout() + CType(Me.picfileopenericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlfileskimmersettings.SuspendLayout() + CType(Me.picfileskimmericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpongsettings.SuspendLayout() + CType(Me.picpongicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlcolourpickersettings.SuspendLayout() + CType(Me.piccolourpickericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlshiftersettings.SuspendLayout() + CType(Me.picshiftericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlclocksettings.SuspendLayout() + CType(Me.picclockicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlshiftoriumsettings.SuspendLayout() + CType(Me.picshiftoriumicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlknowledgeinputsettings.SuspendLayout() + CType(Me.picknowledgeinputicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.Panel2.SuspendLayout() + CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + Me.pnlwallet.SuspendLayout() + CType(Me.picwallet, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnldigger.SuspendLayout() + CType(Me.picdigger, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlskinshifter.SuspendLayout() + CType(Me.picskinshifter, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlshiftnet.SuspendLayout() + CType(Me.picshiftnet, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnldodge.SuspendLayout() + CType(Me.picdodge, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnldownload.SuspendLayout() + CType(Me.picdownload, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlinstaller.SuspendLayout() + CType(Me.picinstaller, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlsysinfo.SuspendLayout() + CType(Me.picsysinfo, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlorcwrite.SuspendLayout() + CType(Me.picorcwrite, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlfloodgate.SuspendLayout() + CType(Me.picfloodgate, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlmaze.SuspendLayout() + CType(Me.picmaze, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlvirusscanner.SuspendLayout() + CType(Me.picvirusscanner, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 763) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(330, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconNameChanger + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 733) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(332, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 735) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(120, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Name Changer" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(332, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 733) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlprogramlistholder) + Me.pgcontents.Controls.Add(Me.Panel2) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(330, 733) + Me.pgcontents.TabIndex = 20 + ' + 'pnlprogramlistholder + ' + Me.pnlprogramlistholder.AutoScroll = True + Me.pnlprogramlistholder.BackColor = System.Drawing.Color.White + Me.pnlprogramlistholder.Controls.Add(Me.pnlvirusscanner) + Me.pnlprogramlistholder.Controls.Add(Me.pnlmaze) + Me.pnlprogramlistholder.Controls.Add(Me.pnlfloodgate) + Me.pnlprogramlistholder.Controls.Add(Me.pnlorcwrite) + Me.pnlprogramlistholder.Controls.Add(Me.pnlsysinfo) + Me.pnlprogramlistholder.Controls.Add(Me.pnlinstaller) + Me.pnlprogramlistholder.Controls.Add(Me.pnldownload) + Me.pnlprogramlistholder.Controls.Add(Me.pnldodge) + Me.pnlprogramlistholder.Controls.Add(Me.pnlshiftnet) + Me.pnlprogramlistholder.Controls.Add(Me.pnlskinshifter) + Me.pnlprogramlistholder.Controls.Add(Me.pnldigger) + Me.pnlprogramlistholder.Controls.Add(Me.pnlwallet) + Me.pnlprogramlistholder.Controls.Add(Me.pnlterminalsettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnliconmanagersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlnamechangersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlvideoplayersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlwebbrowsersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlaudioplayersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlcalculatorsettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlartpadsettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlskinloadersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlgraphicpickersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnltextpadsettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlfilesaversettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlfileopenersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlfileskimmersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlpongsettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlcolourpickersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlshiftersettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlclocksettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlshiftoriumsettings) + Me.pnlprogramlistholder.Controls.Add(Me.pnlknowledgeinputsettings) + Me.pnlprogramlistholder.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlprogramlistholder.Location = New System.Drawing.Point(0, 0) + Me.pnlprogramlistholder.Name = "pnlprogramlistholder" + Me.pnlprogramlistholder.Size = New System.Drawing.Size(330, 693) + Me.pnlprogramlistholder.TabIndex = 1 + ' + 'pnlterminalsettings + ' + Me.pnlterminalsettings.Controls.Add(Me.txtterminalname) + Me.pnlterminalsettings.Controls.Add(Me.Label19) + Me.pnlterminalsettings.Controls.Add(Me.picterminalicon) + Me.pnlterminalsettings.Location = New System.Drawing.Point(0, 868) + Me.pnlterminalsettings.Name = "pnlterminalsettings" + Me.pnlterminalsettings.Size = New System.Drawing.Size(330, 28) + Me.pnlterminalsettings.TabIndex = 37 + ' + 'txtterminalname + ' + Me.txtterminalname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtterminalname.BackColor = System.Drawing.Color.White + Me.txtterminalname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtterminalname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtterminalname.Location = New System.Drawing.Point(151, 3) + Me.txtterminalname.Name = "txtterminalname" + Me.txtterminalname.Size = New System.Drawing.Size(175, 22) + Me.txtterminalname.TabIndex = 2 + ' + 'Label19 + ' + Me.Label19.AutoSize = True + Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label19.Location = New System.Drawing.Point(28, 6) + Me.Label19.Name = "Label19" + Me.Label19.Size = New System.Drawing.Size(61, 16) + Me.Label19.TabIndex = 1 + Me.Label19.Text = "Terminal" + ' + 'picterminalicon + ' + Me.picterminalicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picterminalicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picterminalicon.Location = New System.Drawing.Point(7, 6) + Me.picterminalicon.Name = "picterminalicon" + Me.picterminalicon.Size = New System.Drawing.Size(16, 16) + Me.picterminalicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picterminalicon.TabIndex = 0 + Me.picterminalicon.TabStop = False + ' + 'pnliconmanagersettings + ' + Me.pnliconmanagersettings.Controls.Add(Me.txticonmanager) + Me.pnliconmanagersettings.Controls.Add(Me.Label20) + Me.pnliconmanagersettings.Controls.Add(Me.piciconmanagericon) + Me.pnliconmanagersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnliconmanagersettings.Location = New System.Drawing.Point(0, 504) + Me.pnliconmanagersettings.Name = "pnliconmanagersettings" + Me.pnliconmanagersettings.Size = New System.Drawing.Size(330, 28) + Me.pnliconmanagersettings.TabIndex = 38 + Me.pnliconmanagersettings.Visible = False + ' + 'txticonmanager + ' + Me.txticonmanager.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txticonmanager.BackColor = System.Drawing.Color.White + Me.txticonmanager.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txticonmanager.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txticonmanager.Location = New System.Drawing.Point(151, 3) + Me.txticonmanager.Name = "txticonmanager" + Me.txticonmanager.Size = New System.Drawing.Size(175, 22) + Me.txticonmanager.TabIndex = 2 + ' + 'Label20 + ' + Me.Label20.AutoSize = True + Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label20.Location = New System.Drawing.Point(28, 6) + Me.Label20.Name = "Label20" + Me.Label20.Size = New System.Drawing.Size(90, 16) + Me.Label20.TabIndex = 1 + Me.Label20.Text = "Icon Manager" + ' + 'piciconmanagericon + ' + Me.piciconmanagericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.piciconmanagericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.piciconmanagericon.Location = New System.Drawing.Point(7, 6) + Me.piciconmanagericon.Name = "piciconmanagericon" + Me.piciconmanagericon.Size = New System.Drawing.Size(16, 16) + Me.piciconmanagericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.piciconmanagericon.TabIndex = 0 + Me.piciconmanagericon.TabStop = False + ' + 'pnlnamechangersettings + ' + Me.pnlnamechangersettings.Controls.Add(Me.txtnamechanger) + Me.pnlnamechangersettings.Controls.Add(Me.Label18) + Me.pnlnamechangersettings.Controls.Add(Me.picnamechangericon) + Me.pnlnamechangersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlnamechangersettings.Location = New System.Drawing.Point(0, 476) + Me.pnlnamechangersettings.Name = "pnlnamechangersettings" + Me.pnlnamechangersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlnamechangersettings.TabIndex = 35 + Me.pnlnamechangersettings.Visible = False + ' + 'txtnamechanger + ' + Me.txtnamechanger.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtnamechanger.BackColor = System.Drawing.Color.White + Me.txtnamechanger.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtnamechanger.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtnamechanger.Location = New System.Drawing.Point(151, 3) + Me.txtnamechanger.Name = "txtnamechanger" + Me.txtnamechanger.Size = New System.Drawing.Size(175, 22) + Me.txtnamechanger.TabIndex = 2 + ' + 'Label18 + ' + Me.Label18.AutoSize = True + Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label18.Location = New System.Drawing.Point(28, 6) + Me.Label18.Name = "Label18" + Me.Label18.Size = New System.Drawing.Size(99, 16) + Me.Label18.TabIndex = 1 + Me.Label18.Text = "Name Changer" + ' + 'picnamechangericon + ' + Me.picnamechangericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picnamechangericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picnamechangericon.Location = New System.Drawing.Point(7, 6) + Me.picnamechangericon.Name = "picnamechangericon" + Me.picnamechangericon.Size = New System.Drawing.Size(16, 16) + Me.picnamechangericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picnamechangericon.TabIndex = 0 + Me.picnamechangericon.TabStop = False + ' + 'pnlvideoplayersettings + ' + Me.pnlvideoplayersettings.Controls.Add(Me.txtvideoplayername) + Me.pnlvideoplayersettings.Controls.Add(Me.Label17) + Me.pnlvideoplayersettings.Controls.Add(Me.picvideoplayericon) + Me.pnlvideoplayersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlvideoplayersettings.Location = New System.Drawing.Point(0, 448) + Me.pnlvideoplayersettings.Name = "pnlvideoplayersettings" + Me.pnlvideoplayersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlvideoplayersettings.TabIndex = 33 + Me.pnlvideoplayersettings.Visible = False + ' + 'txtvideoplayername + ' + Me.txtvideoplayername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtvideoplayername.BackColor = System.Drawing.Color.White + Me.txtvideoplayername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtvideoplayername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtvideoplayername.Location = New System.Drawing.Point(151, 3) + Me.txtvideoplayername.Name = "txtvideoplayername" + Me.txtvideoplayername.Size = New System.Drawing.Size(175, 22) + Me.txtvideoplayername.TabIndex = 2 + ' + 'Label17 + ' + Me.Label17.AutoSize = True + Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label17.Location = New System.Drawing.Point(28, 6) + Me.Label17.Name = "Label17" + Me.Label17.Size = New System.Drawing.Size(86, 16) + Me.Label17.TabIndex = 1 + Me.Label17.Text = "Video Player" + ' + 'picvideoplayericon + ' + Me.picvideoplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picvideoplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picvideoplayericon.Location = New System.Drawing.Point(7, 6) + Me.picvideoplayericon.Name = "picvideoplayericon" + Me.picvideoplayericon.Size = New System.Drawing.Size(16, 16) + Me.picvideoplayericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picvideoplayericon.TabIndex = 0 + Me.picvideoplayericon.TabStop = False + ' + 'pnlwebbrowsersettings + ' + Me.pnlwebbrowsersettings.Controls.Add(Me.txtwebbrowsername) + Me.pnlwebbrowsersettings.Controls.Add(Me.Label16) + Me.pnlwebbrowsersettings.Controls.Add(Me.picwebbrowsericon) + Me.pnlwebbrowsersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlwebbrowsersettings.Location = New System.Drawing.Point(0, 420) + Me.pnlwebbrowsersettings.Name = "pnlwebbrowsersettings" + Me.pnlwebbrowsersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlwebbrowsersettings.TabIndex = 31 + Me.pnlwebbrowsersettings.Visible = False + ' + 'txtwebbrowsername + ' + Me.txtwebbrowsername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtwebbrowsername.BackColor = System.Drawing.Color.White + Me.txtwebbrowsername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtwebbrowsername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtwebbrowsername.Location = New System.Drawing.Point(151, 3) + Me.txtwebbrowsername.Name = "txtwebbrowsername" + Me.txtwebbrowsername.Size = New System.Drawing.Size(175, 22) + Me.txtwebbrowsername.TabIndex = 2 + ' + 'Label16 + ' + Me.Label16.AutoSize = True + Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label16.Location = New System.Drawing.Point(28, 6) + Me.Label16.Name = "Label16" + Me.Label16.Size = New System.Drawing.Size(89, 16) + Me.Label16.TabIndex = 1 + Me.Label16.Text = "Web Browser" + ' + 'picwebbrowsericon + ' + Me.picwebbrowsericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picwebbrowsericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picwebbrowsericon.Location = New System.Drawing.Point(7, 6) + Me.picwebbrowsericon.Name = "picwebbrowsericon" + Me.picwebbrowsericon.Size = New System.Drawing.Size(16, 16) + Me.picwebbrowsericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picwebbrowsericon.TabIndex = 0 + Me.picwebbrowsericon.TabStop = False + ' + 'pnlaudioplayersettings + ' + Me.pnlaudioplayersettings.Controls.Add(Me.txtaudioplayername) + Me.pnlaudioplayersettings.Controls.Add(Me.Label15) + Me.pnlaudioplayersettings.Controls.Add(Me.picaudioplayericon) + Me.pnlaudioplayersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlaudioplayersettings.Location = New System.Drawing.Point(0, 392) + Me.pnlaudioplayersettings.Name = "pnlaudioplayersettings" + Me.pnlaudioplayersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlaudioplayersettings.TabIndex = 29 + Me.pnlaudioplayersettings.Visible = False + ' + 'txtaudioplayername + ' + Me.txtaudioplayername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtaudioplayername.BackColor = System.Drawing.Color.White + Me.txtaudioplayername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtaudioplayername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtaudioplayername.Location = New System.Drawing.Point(151, 3) + Me.txtaudioplayername.Name = "txtaudioplayername" + Me.txtaudioplayername.Size = New System.Drawing.Size(175, 22) + Me.txtaudioplayername.TabIndex = 2 + ' + 'Label15 + ' + Me.Label15.AutoSize = True + Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label15.Location = New System.Drawing.Point(28, 6) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(85, 16) + Me.Label15.TabIndex = 1 + Me.Label15.Text = "Audio Player" + ' + 'picaudioplayericon + ' + Me.picaudioplayericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picaudioplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picaudioplayericon.Location = New System.Drawing.Point(7, 6) + Me.picaudioplayericon.Name = "picaudioplayericon" + Me.picaudioplayericon.Size = New System.Drawing.Size(16, 16) + Me.picaudioplayericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picaudioplayericon.TabIndex = 0 + Me.picaudioplayericon.TabStop = False + ' + 'pnlcalculatorsettings + ' + Me.pnlcalculatorsettings.Controls.Add(Me.txtcalculatorname) + Me.pnlcalculatorsettings.Controls.Add(Me.Label14) + Me.pnlcalculatorsettings.Controls.Add(Me.piccalculatoricon) + Me.pnlcalculatorsettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlcalculatorsettings.Location = New System.Drawing.Point(0, 364) + Me.pnlcalculatorsettings.Name = "pnlcalculatorsettings" + Me.pnlcalculatorsettings.Size = New System.Drawing.Size(330, 28) + Me.pnlcalculatorsettings.TabIndex = 27 + Me.pnlcalculatorsettings.Visible = False + ' + 'txtcalculatorname + ' + Me.txtcalculatorname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtcalculatorname.BackColor = System.Drawing.Color.White + Me.txtcalculatorname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtcalculatorname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtcalculatorname.Location = New System.Drawing.Point(151, 3) + Me.txtcalculatorname.Name = "txtcalculatorname" + Me.txtcalculatorname.Size = New System.Drawing.Size(175, 22) + Me.txtcalculatorname.TabIndex = 2 + ' + 'Label14 + ' + Me.Label14.AutoSize = True + Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label14.Location = New System.Drawing.Point(28, 6) + Me.Label14.Name = "Label14" + Me.Label14.Size = New System.Drawing.Size(68, 16) + Me.Label14.TabIndex = 1 + Me.Label14.Text = "Calculator" + ' + 'piccalculatoricon + ' + Me.piccalculatoricon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.piccalculatoricon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.piccalculatoricon.Location = New System.Drawing.Point(7, 6) + Me.piccalculatoricon.Name = "piccalculatoricon" + Me.piccalculatoricon.Size = New System.Drawing.Size(16, 16) + Me.piccalculatoricon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.piccalculatoricon.TabIndex = 0 + Me.piccalculatoricon.TabStop = False + ' + 'pnlartpadsettings + ' + Me.pnlartpadsettings.Controls.Add(Me.txtartpadname) + Me.pnlartpadsettings.Controls.Add(Me.Label13) + Me.pnlartpadsettings.Controls.Add(Me.picartpadicon) + Me.pnlartpadsettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlartpadsettings.Location = New System.Drawing.Point(0, 336) + Me.pnlartpadsettings.Name = "pnlartpadsettings" + Me.pnlartpadsettings.Size = New System.Drawing.Size(330, 28) + Me.pnlartpadsettings.TabIndex = 25 + Me.pnlartpadsettings.Visible = False + ' + 'txtartpadname + ' + Me.txtartpadname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtartpadname.BackColor = System.Drawing.Color.White + Me.txtartpadname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtartpadname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtartpadname.Location = New System.Drawing.Point(151, 3) + Me.txtartpadname.Name = "txtartpadname" + Me.txtartpadname.Size = New System.Drawing.Size(175, 22) + Me.txtartpadname.TabIndex = 2 + ' + 'Label13 + ' + Me.Label13.AutoSize = True + Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label13.Location = New System.Drawing.Point(28, 6) + Me.Label13.Name = "Label13" + Me.Label13.Size = New System.Drawing.Size(48, 16) + Me.Label13.TabIndex = 1 + Me.Label13.Text = "Artpad" + ' + 'picartpadicon + ' + Me.picartpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picartpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picartpadicon.Location = New System.Drawing.Point(7, 6) + Me.picartpadicon.Name = "picartpadicon" + Me.picartpadicon.Size = New System.Drawing.Size(16, 16) + Me.picartpadicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picartpadicon.TabIndex = 0 + Me.picartpadicon.TabStop = False + ' + 'pnlskinloadersettings + ' + Me.pnlskinloadersettings.Controls.Add(Me.txtskinloadername) + Me.pnlskinloadersettings.Controls.Add(Me.Label12) + Me.pnlskinloadersettings.Controls.Add(Me.picskinloadericon) + Me.pnlskinloadersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlskinloadersettings.Location = New System.Drawing.Point(0, 308) + Me.pnlskinloadersettings.Name = "pnlskinloadersettings" + Me.pnlskinloadersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlskinloadersettings.TabIndex = 23 + Me.pnlskinloadersettings.Visible = False + ' + 'txtskinloadername + ' + Me.txtskinloadername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtskinloadername.BackColor = System.Drawing.Color.White + Me.txtskinloadername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtskinloadername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtskinloadername.Location = New System.Drawing.Point(151, 3) + Me.txtskinloadername.Name = "txtskinloadername" + Me.txtskinloadername.Size = New System.Drawing.Size(175, 22) + Me.txtskinloadername.TabIndex = 2 + ' + 'Label12 + ' + Me.Label12.AutoSize = True + Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label12.Location = New System.Drawing.Point(28, 6) + Me.Label12.Name = "Label12" + Me.Label12.Size = New System.Drawing.Size(80, 16) + Me.Label12.TabIndex = 1 + Me.Label12.Text = "Skin Loader" + ' + 'picskinloadericon + ' + Me.picskinloadericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picskinloadericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picskinloadericon.Location = New System.Drawing.Point(7, 6) + Me.picskinloadericon.Name = "picskinloadericon" + Me.picskinloadericon.Size = New System.Drawing.Size(16, 16) + Me.picskinloadericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picskinloadericon.TabIndex = 0 + Me.picskinloadericon.TabStop = False + ' + 'pnlgraphicpickersettings + ' + Me.pnlgraphicpickersettings.Controls.Add(Me.txtgraphicpickername) + Me.pnlgraphicpickersettings.Controls.Add(Me.Label11) + Me.pnlgraphicpickersettings.Controls.Add(Me.picgraphicpickericon) + Me.pnlgraphicpickersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlgraphicpickersettings.Location = New System.Drawing.Point(0, 280) + Me.pnlgraphicpickersettings.Name = "pnlgraphicpickersettings" + Me.pnlgraphicpickersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlgraphicpickersettings.TabIndex = 21 + Me.pnlgraphicpickersettings.Visible = False + ' + 'txtgraphicpickername + ' + Me.txtgraphicpickername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtgraphicpickername.BackColor = System.Drawing.Color.White + Me.txtgraphicpickername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtgraphicpickername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtgraphicpickername.Location = New System.Drawing.Point(151, 3) + Me.txtgraphicpickername.Name = "txtgraphicpickername" + Me.txtgraphicpickername.Size = New System.Drawing.Size(175, 22) + Me.txtgraphicpickername.TabIndex = 2 + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label11.Location = New System.Drawing.Point(28, 6) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(96, 16) + Me.Label11.TabIndex = 1 + Me.Label11.Text = "Graphic Picker" + ' + 'picgraphicpickericon + ' + Me.picgraphicpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picgraphicpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picgraphicpickericon.Location = New System.Drawing.Point(7, 6) + Me.picgraphicpickericon.Name = "picgraphicpickericon" + Me.picgraphicpickericon.Size = New System.Drawing.Size(16, 16) + Me.picgraphicpickericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picgraphicpickericon.TabIndex = 0 + Me.picgraphicpickericon.TabStop = False + ' + 'pnltextpadsettings + ' + Me.pnltextpadsettings.Controls.Add(Me.txttextpadname) + Me.pnltextpadsettings.Controls.Add(Me.Label10) + Me.pnltextpadsettings.Controls.Add(Me.pictextpadicon) + Me.pnltextpadsettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnltextpadsettings.Location = New System.Drawing.Point(0, 252) + Me.pnltextpadsettings.Name = "pnltextpadsettings" + Me.pnltextpadsettings.Size = New System.Drawing.Size(330, 28) + Me.pnltextpadsettings.TabIndex = 19 + Me.pnltextpadsettings.Visible = False + ' + 'txttextpadname + ' + Me.txttextpadname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txttextpadname.BackColor = System.Drawing.Color.White + Me.txttextpadname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttextpadname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttextpadname.Location = New System.Drawing.Point(151, 3) + Me.txttextpadname.Name = "txttextpadname" + Me.txttextpadname.Size = New System.Drawing.Size(175, 22) + Me.txttextpadname.TabIndex = 2 + ' + 'Label10 + ' + Me.Label10.AutoSize = True + Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label10.Location = New System.Drawing.Point(28, 6) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(59, 16) + Me.Label10.TabIndex = 1 + Me.Label10.Text = "TextPad" + ' + 'pictextpadicon + ' + Me.pictextpadicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.pictextpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pictextpadicon.Location = New System.Drawing.Point(7, 6) + Me.pictextpadicon.Name = "pictextpadicon" + Me.pictextpadicon.Size = New System.Drawing.Size(16, 16) + Me.pictextpadicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pictextpadicon.TabIndex = 0 + Me.pictextpadicon.TabStop = False + ' + 'pnlfilesaversettings + ' + Me.pnlfilesaversettings.Controls.Add(Me.txtfilesavername) + Me.pnlfilesaversettings.Controls.Add(Me.Label9) + Me.pnlfilesaversettings.Controls.Add(Me.picfilesavericon) + Me.pnlfilesaversettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlfilesaversettings.Location = New System.Drawing.Point(0, 224) + Me.pnlfilesaversettings.Name = "pnlfilesaversettings" + Me.pnlfilesaversettings.Size = New System.Drawing.Size(330, 28) + Me.pnlfilesaversettings.TabIndex = 17 + Me.pnlfilesaversettings.Visible = False + ' + 'txtfilesavername + ' + Me.txtfilesavername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtfilesavername.BackColor = System.Drawing.Color.White + Me.txtfilesavername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtfilesavername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfilesavername.Location = New System.Drawing.Point(151, 3) + Me.txtfilesavername.Name = "txtfilesavername" + Me.txtfilesavername.Size = New System.Drawing.Size(175, 22) + Me.txtfilesavername.TabIndex = 2 + ' + 'Label9 + ' + Me.Label9.AutoSize = True + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(28, 6) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(69, 16) + Me.Label9.TabIndex = 1 + Me.Label9.Text = "File Saver" + ' + 'picfilesavericon + ' + Me.picfilesavericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picfilesavericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picfilesavericon.Location = New System.Drawing.Point(7, 6) + Me.picfilesavericon.Name = "picfilesavericon" + Me.picfilesavericon.Size = New System.Drawing.Size(16, 16) + Me.picfilesavericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picfilesavericon.TabIndex = 0 + Me.picfilesavericon.TabStop = False + ' + 'pnlfileopenersettings + ' + Me.pnlfileopenersettings.Controls.Add(Me.txtfileopenername) + Me.pnlfileopenersettings.Controls.Add(Me.Label8) + Me.pnlfileopenersettings.Controls.Add(Me.picfileopenericon) + Me.pnlfileopenersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlfileopenersettings.Location = New System.Drawing.Point(0, 196) + Me.pnlfileopenersettings.Name = "pnlfileopenersettings" + Me.pnlfileopenersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlfileopenersettings.TabIndex = 15 + Me.pnlfileopenersettings.Visible = False + ' + 'txtfileopenername + ' + Me.txtfileopenername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtfileopenername.BackColor = System.Drawing.Color.White + Me.txtfileopenername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtfileopenername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfileopenername.Location = New System.Drawing.Point(151, 3) + Me.txtfileopenername.Name = "txtfileopenername" + Me.txtfileopenername.Size = New System.Drawing.Size(175, 22) + Me.txtfileopenername.TabIndex = 2 + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(28, 6) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(78, 16) + Me.Label8.TabIndex = 1 + Me.Label8.Text = "File Opener" + ' + 'picfileopenericon + ' + Me.picfileopenericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picfileopenericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picfileopenericon.Location = New System.Drawing.Point(7, 6) + Me.picfileopenericon.Name = "picfileopenericon" + Me.picfileopenericon.Size = New System.Drawing.Size(16, 16) + Me.picfileopenericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picfileopenericon.TabIndex = 0 + Me.picfileopenericon.TabStop = False + ' + 'pnlfileskimmersettings + ' + Me.pnlfileskimmersettings.Controls.Add(Me.txtfileskimmername) + Me.pnlfileskimmersettings.Controls.Add(Me.Label7) + Me.pnlfileskimmersettings.Controls.Add(Me.picfileskimmericon) + Me.pnlfileskimmersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlfileskimmersettings.Location = New System.Drawing.Point(0, 168) + Me.pnlfileskimmersettings.Name = "pnlfileskimmersettings" + Me.pnlfileskimmersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlfileskimmersettings.TabIndex = 13 + Me.pnlfileskimmersettings.Visible = False + ' + 'txtfileskimmername + ' + Me.txtfileskimmername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtfileskimmername.BackColor = System.Drawing.Color.White + Me.txtfileskimmername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtfileskimmername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfileskimmername.Location = New System.Drawing.Point(151, 3) + Me.txtfileskimmername.Name = "txtfileskimmername" + Me.txtfileskimmername.Size = New System.Drawing.Size(175, 22) + Me.txtfileskimmername.TabIndex = 2 + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(28, 6) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(86, 16) + Me.Label7.TabIndex = 1 + Me.Label7.Text = "File Skimmer" + ' + 'picfileskimmericon + ' + Me.picfileskimmericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picfileskimmericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picfileskimmericon.Location = New System.Drawing.Point(7, 6) + Me.picfileskimmericon.Name = "picfileskimmericon" + Me.picfileskimmericon.Size = New System.Drawing.Size(16, 16) + Me.picfileskimmericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picfileskimmericon.TabIndex = 0 + Me.picfileskimmericon.TabStop = False + ' + 'pnlpongsettings + ' + Me.pnlpongsettings.Controls.Add(Me.txtpongname) + Me.pnlpongsettings.Controls.Add(Me.Label6) + Me.pnlpongsettings.Controls.Add(Me.picpongicon) + Me.pnlpongsettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlpongsettings.Location = New System.Drawing.Point(0, 140) + Me.pnlpongsettings.Name = "pnlpongsettings" + Me.pnlpongsettings.Size = New System.Drawing.Size(330, 28) + Me.pnlpongsettings.TabIndex = 11 + Me.pnlpongsettings.Visible = False + ' + 'txtpongname + ' + Me.txtpongname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtpongname.BackColor = System.Drawing.Color.White + Me.txtpongname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpongname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpongname.Location = New System.Drawing.Point(151, 3) + Me.txtpongname.Name = "txtpongname" + Me.txtpongname.Size = New System.Drawing.Size(175, 22) + Me.txtpongname.TabIndex = 2 + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(28, 6) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(40, 16) + Me.Label6.TabIndex = 1 + Me.Label6.Text = "Pong" + ' + 'picpongicon + ' + Me.picpongicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picpongicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picpongicon.Location = New System.Drawing.Point(7, 6) + Me.picpongicon.Name = "picpongicon" + Me.picpongicon.Size = New System.Drawing.Size(16, 16) + Me.picpongicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picpongicon.TabIndex = 0 + Me.picpongicon.TabStop = False + ' + 'pnlcolourpickersettings + ' + Me.pnlcolourpickersettings.Controls.Add(Me.txtcolourpickername) + Me.pnlcolourpickersettings.Controls.Add(Me.Label5) + Me.pnlcolourpickersettings.Controls.Add(Me.piccolourpickericon) + Me.pnlcolourpickersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlcolourpickersettings.Location = New System.Drawing.Point(0, 112) + Me.pnlcolourpickersettings.Name = "pnlcolourpickersettings" + Me.pnlcolourpickersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlcolourpickersettings.TabIndex = 9 + Me.pnlcolourpickersettings.Visible = False + ' + 'txtcolourpickername + ' + Me.txtcolourpickername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtcolourpickername.BackColor = System.Drawing.Color.White + Me.txtcolourpickername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtcolourpickername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtcolourpickername.Location = New System.Drawing.Point(151, 3) + Me.txtcolourpickername.Name = "txtcolourpickername" + Me.txtcolourpickername.Size = New System.Drawing.Size(175, 22) + Me.txtcolourpickername.TabIndex = 2 + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(28, 6) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(88, 16) + Me.Label5.TabIndex = 1 + Me.Label5.Text = "Colour Picker" + ' + 'piccolourpickericon + ' + Me.piccolourpickericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.piccolourpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.piccolourpickericon.Location = New System.Drawing.Point(7, 6) + Me.piccolourpickericon.Name = "piccolourpickericon" + Me.piccolourpickericon.Size = New System.Drawing.Size(16, 16) + Me.piccolourpickericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.piccolourpickericon.TabIndex = 0 + Me.piccolourpickericon.TabStop = False + ' + 'pnlshiftersettings + ' + Me.pnlshiftersettings.Controls.Add(Me.txtshiftername) + Me.pnlshiftersettings.Controls.Add(Me.Label4) + Me.pnlshiftersettings.Controls.Add(Me.picshiftericon) + Me.pnlshiftersettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlshiftersettings.Location = New System.Drawing.Point(0, 84) + Me.pnlshiftersettings.Name = "pnlshiftersettings" + Me.pnlshiftersettings.Size = New System.Drawing.Size(330, 28) + Me.pnlshiftersettings.TabIndex = 7 + Me.pnlshiftersettings.Visible = False + ' + 'txtshiftername + ' + Me.txtshiftername.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtshiftername.BackColor = System.Drawing.Color.White + Me.txtshiftername.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtshiftername.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtshiftername.Location = New System.Drawing.Point(151, 3) + Me.txtshiftername.Name = "txtshiftername" + Me.txtshiftername.Size = New System.Drawing.Size(175, 22) + Me.txtshiftername.TabIndex = 2 + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(28, 6) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(45, 16) + Me.Label4.TabIndex = 1 + Me.Label4.Text = "Shifter" + ' + 'picshiftericon + ' + Me.picshiftericon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picshiftericon.Location = New System.Drawing.Point(7, 6) + Me.picshiftericon.Name = "picshiftericon" + Me.picshiftericon.Size = New System.Drawing.Size(16, 16) + Me.picshiftericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picshiftericon.TabIndex = 0 + Me.picshiftericon.TabStop = False + ' + 'pnlclocksettings + ' + Me.pnlclocksettings.Controls.Add(Me.txtclockname) + Me.pnlclocksettings.Controls.Add(Me.Label3) + Me.pnlclocksettings.Controls.Add(Me.picclockicon) + Me.pnlclocksettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlclocksettings.Location = New System.Drawing.Point(0, 56) + Me.pnlclocksettings.Name = "pnlclocksettings" + Me.pnlclocksettings.Size = New System.Drawing.Size(330, 28) + Me.pnlclocksettings.TabIndex = 5 + Me.pnlclocksettings.Visible = False + ' + 'txtclockname + ' + Me.txtclockname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtclockname.BackColor = System.Drawing.Color.White + Me.txtclockname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtclockname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclockname.Location = New System.Drawing.Point(151, 3) + Me.txtclockname.Name = "txtclockname" + Me.txtclockname.Size = New System.Drawing.Size(175, 22) + Me.txtclockname.TabIndex = 2 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(28, 6) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(42, 16) + Me.Label3.TabIndex = 1 + Me.Label3.Text = "Clock" + ' + 'picclockicon + ' + Me.picclockicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picclockicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picclockicon.Location = New System.Drawing.Point(7, 6) + Me.picclockicon.Name = "picclockicon" + Me.picclockicon.Size = New System.Drawing.Size(16, 16) + Me.picclockicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picclockicon.TabIndex = 0 + Me.picclockicon.TabStop = False + ' + 'pnlshiftoriumsettings + ' + Me.pnlshiftoriumsettings.Controls.Add(Me.txtshiftoriumname) + Me.pnlshiftoriumsettings.Controls.Add(Me.Label2) + Me.pnlshiftoriumsettings.Controls.Add(Me.picshiftoriumicon) + Me.pnlshiftoriumsettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlshiftoriumsettings.Location = New System.Drawing.Point(0, 28) + Me.pnlshiftoriumsettings.Name = "pnlshiftoriumsettings" + Me.pnlshiftoriumsettings.Size = New System.Drawing.Size(330, 28) + Me.pnlshiftoriumsettings.TabIndex = 3 + ' + 'txtshiftoriumname + ' + Me.txtshiftoriumname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtshiftoriumname.BackColor = System.Drawing.Color.White + Me.txtshiftoriumname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtshiftoriumname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtshiftoriumname.Location = New System.Drawing.Point(151, 3) + Me.txtshiftoriumname.Name = "txtshiftoriumname" + Me.txtshiftoriumname.Size = New System.Drawing.Size(175, 22) + Me.txtshiftoriumname.TabIndex = 2 + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(28, 6) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(66, 16) + Me.Label2.TabIndex = 1 + Me.Label2.Text = "Shiftorium" + ' + 'picshiftoriumicon + ' + Me.picshiftoriumicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picshiftoriumicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picshiftoriumicon.Location = New System.Drawing.Point(7, 6) + Me.picshiftoriumicon.Name = "picshiftoriumicon" + Me.picshiftoriumicon.Size = New System.Drawing.Size(16, 16) + Me.picshiftoriumicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picshiftoriumicon.TabIndex = 0 + Me.picshiftoriumicon.TabStop = False + ' + 'pnlknowledgeinputsettings + ' + Me.pnlknowledgeinputsettings.Controls.Add(Me.txtknowledgeinputname) + Me.pnlknowledgeinputsettings.Controls.Add(Me.Label1) + Me.pnlknowledgeinputsettings.Controls.Add(Me.picknowledgeinputicon) + Me.pnlknowledgeinputsettings.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlknowledgeinputsettings.Location = New System.Drawing.Point(0, 0) + Me.pnlknowledgeinputsettings.Name = "pnlknowledgeinputsettings" + Me.pnlknowledgeinputsettings.Size = New System.Drawing.Size(330, 28) + Me.pnlknowledgeinputsettings.TabIndex = 1 + ' + 'txtknowledgeinputname + ' + Me.txtknowledgeinputname.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtknowledgeinputname.BackColor = System.Drawing.Color.White + Me.txtknowledgeinputname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtknowledgeinputname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtknowledgeinputname.Location = New System.Drawing.Point(151, 3) + Me.txtknowledgeinputname.Name = "txtknowledgeinputname" + Me.txtknowledgeinputname.Size = New System.Drawing.Size(175, 22) + Me.txtknowledgeinputname.TabIndex = 2 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(28, 6) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(106, 16) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "Knowledge Input" + ' + 'picknowledgeinputicon + ' + Me.picknowledgeinputicon.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picknowledgeinputicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picknowledgeinputicon.Location = New System.Drawing.Point(7, 6) + Me.picknowledgeinputicon.Name = "picknowledgeinputicon" + Me.picknowledgeinputicon.Size = New System.Drawing.Size(16, 16) + Me.picknowledgeinputicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picknowledgeinputicon.TabIndex = 0 + Me.picknowledgeinputicon.TabStop = False + ' + 'Panel2 + ' + Me.Panel2.Controls.Add(Me.btnLoad) + Me.Panel2.Controls.Add(Me.btnSave) + Me.Panel2.Controls.Add(Me.PictureBox13) + Me.Panel2.Controls.Add(Me.btnReset) + Me.Panel2.Controls.Add(Me.btnApply) + Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel2.Location = New System.Drawing.Point(0, 693) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(330, 40) + Me.Panel2.TabIndex = 2 + ' + 'btnLoad + ' + Me.btnLoad.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnLoad.BackColor = System.Drawing.Color.White + Me.btnLoad.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnLoad.Location = New System.Drawing.Point(4, 5) + Me.btnLoad.Name = "btnLoad" + Me.btnLoad.Size = New System.Drawing.Size(77, 30) + Me.btnLoad.TabIndex = 17 + Me.btnLoad.Text = "Load" + Me.btnLoad.UseVisualStyleBackColor = False + ' + 'btnSave + ' + Me.btnSave.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnSave.BackColor = System.Drawing.Color.White + Me.btnSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnSave.Location = New System.Drawing.Point(86, 5) + Me.btnSave.Name = "btnSave" + Me.btnSave.Size = New System.Drawing.Size(77, 30) + Me.btnSave.TabIndex = 16 + Me.btnSave.Text = "Save" + Me.btnSave.UseVisualStyleBackColor = False + ' + 'PictureBox13 + ' + Me.PictureBox13.BackColor = System.Drawing.Color.Black + Me.PictureBox13.Dock = System.Windows.Forms.DockStyle.Top + Me.PictureBox13.Location = New System.Drawing.Point(0, 0) + Me.PictureBox13.Name = "PictureBox13" + Me.PictureBox13.Size = New System.Drawing.Size(330, 1) + Me.PictureBox13.TabIndex = 15 + Me.PictureBox13.TabStop = False + ' + 'btnReset + ' + Me.btnReset.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnReset.BackColor = System.Drawing.Color.White + Me.btnReset.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnReset.Location = New System.Drawing.Point(168, 5) + Me.btnReset.Name = "btnReset" + Me.btnReset.Size = New System.Drawing.Size(77, 30) + Me.btnReset.TabIndex = 1 + Me.btnReset.Text = "Reset" + Me.btnReset.UseVisualStyleBackColor = False + ' + 'btnApply + ' + Me.btnApply.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnApply.BackColor = System.Drawing.Color.White + Me.btnApply.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnApply.Location = New System.Drawing.Point(250, 5) + Me.btnApply.Name = "btnApply" + Me.btnApply.Size = New System.Drawing.Size(77, 30) + Me.btnApply.TabIndex = 0 + Me.btnApply.Text = "Apply" + Me.btnApply.UseVisualStyleBackColor = False + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 735) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(334, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlwallet + ' + Me.pnlwallet.Controls.Add(Me.txtwallet) + Me.pnlwallet.Controls.Add(Me.Label21) + Me.pnlwallet.Controls.Add(Me.picwallet) + Me.pnlwallet.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlwallet.Location = New System.Drawing.Point(0, 532) + Me.pnlwallet.Name = "pnlwallet" + Me.pnlwallet.Size = New System.Drawing.Size(330, 28) + Me.pnlwallet.TabIndex = 39 + Me.pnlwallet.Visible = False + ' + 'txtwallet + ' + Me.txtwallet.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtwallet.BackColor = System.Drawing.Color.White + Me.txtwallet.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtwallet.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtwallet.Location = New System.Drawing.Point(151, 3) + Me.txtwallet.Name = "txtwallet" + Me.txtwallet.Size = New System.Drawing.Size(175, 22) + Me.txtwallet.TabIndex = 2 + ' + 'Label21 + ' + Me.Label21.AutoSize = True + Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label21.Location = New System.Drawing.Point(28, 6) + Me.Label21.Name = "Label21" + Me.Label21.Size = New System.Drawing.Size(90, 16) + Me.Label21.TabIndex = 1 + Me.Label21.Text = "Bitnote Wallet" + ' + 'picwallet + ' + Me.picwallet.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picwallet.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picwallet.Location = New System.Drawing.Point(7, 6) + Me.picwallet.Name = "picwallet" + Me.picwallet.Size = New System.Drawing.Size(16, 16) + Me.picwallet.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picwallet.TabIndex = 0 + Me.picwallet.TabStop = False + ' + 'pnldigger + ' + Me.pnldigger.Controls.Add(Me.txtdigger) + Me.pnldigger.Controls.Add(Me.Label22) + Me.pnldigger.Controls.Add(Me.picdigger) + Me.pnldigger.Dock = System.Windows.Forms.DockStyle.Top + Me.pnldigger.Location = New System.Drawing.Point(0, 560) + Me.pnldigger.Name = "pnldigger" + Me.pnldigger.Size = New System.Drawing.Size(330, 28) + Me.pnldigger.TabIndex = 40 + Me.pnldigger.Visible = False + ' + 'txtdigger + ' + Me.txtdigger.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtdigger.BackColor = System.Drawing.Color.White + Me.txtdigger.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtdigger.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtdigger.Location = New System.Drawing.Point(151, 3) + Me.txtdigger.Name = "txtdigger" + Me.txtdigger.Size = New System.Drawing.Size(175, 22) + Me.txtdigger.TabIndex = 2 + ' + 'Label22 + ' + Me.Label22.AutoSize = True + Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label22.Location = New System.Drawing.Point(28, 6) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(93, 16) + Me.Label22.TabIndex = 1 + Me.Label22.Text = "Bitnote Digger" + ' + 'picdigger + ' + Me.picdigger.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picdigger.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picdigger.Location = New System.Drawing.Point(7, 6) + Me.picdigger.Name = "picdigger" + Me.picdigger.Size = New System.Drawing.Size(16, 16) + Me.picdigger.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picdigger.TabIndex = 0 + Me.picdigger.TabStop = False + ' + 'pnlskinshifter + ' + Me.pnlskinshifter.Controls.Add(Me.txtskinshifter) + Me.pnlskinshifter.Controls.Add(Me.Label23) + Me.pnlskinshifter.Controls.Add(Me.picskinshifter) + Me.pnlskinshifter.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlskinshifter.Location = New System.Drawing.Point(0, 588) + Me.pnlskinshifter.Name = "pnlskinshifter" + Me.pnlskinshifter.Size = New System.Drawing.Size(330, 28) + Me.pnlskinshifter.TabIndex = 41 + Me.pnlskinshifter.Visible = False + ' + 'txtskinshifter + ' + Me.txtskinshifter.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtskinshifter.BackColor = System.Drawing.Color.White + Me.txtskinshifter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtskinshifter.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtskinshifter.Location = New System.Drawing.Point(151, 3) + Me.txtskinshifter.Name = "txtskinshifter" + Me.txtskinshifter.Size = New System.Drawing.Size(175, 22) + Me.txtskinshifter.TabIndex = 2 + ' + 'Label23 + ' + Me.Label23.AutoSize = True + Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label23.Location = New System.Drawing.Point(28, 6) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(74, 16) + Me.Label23.TabIndex = 1 + Me.Label23.Text = "Skin Shifter" + ' + 'picskinshifter + ' + Me.picskinshifter.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picskinshifter.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picskinshifter.Location = New System.Drawing.Point(7, 6) + Me.picskinshifter.Name = "picskinshifter" + Me.picskinshifter.Size = New System.Drawing.Size(16, 16) + Me.picskinshifter.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picskinshifter.TabIndex = 0 + Me.picskinshifter.TabStop = False + ' + 'pnlshiftnet + ' + Me.pnlshiftnet.Controls.Add(Me.txtshiftnet) + Me.pnlshiftnet.Controls.Add(Me.Label24) + Me.pnlshiftnet.Controls.Add(Me.picshiftnet) + Me.pnlshiftnet.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlshiftnet.Location = New System.Drawing.Point(0, 616) + Me.pnlshiftnet.Name = "pnlshiftnet" + Me.pnlshiftnet.Size = New System.Drawing.Size(330, 28) + Me.pnlshiftnet.TabIndex = 42 + Me.pnlshiftnet.Visible = False + ' + 'txtshiftnet + ' + Me.txtshiftnet.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtshiftnet.BackColor = System.Drawing.Color.White + Me.txtshiftnet.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtshiftnet.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtshiftnet.Location = New System.Drawing.Point(151, 3) + Me.txtshiftnet.Name = "txtshiftnet" + Me.txtshiftnet.Size = New System.Drawing.Size(175, 22) + Me.txtshiftnet.TabIndex = 2 + ' + 'Label24 + ' + Me.Label24.AutoSize = True + Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label24.Location = New System.Drawing.Point(28, 6) + Me.Label24.Name = "Label24" + Me.Label24.Size = New System.Drawing.Size(51, 16) + Me.Label24.TabIndex = 1 + Me.Label24.Text = "Shiftnet" + ' + 'picshiftnet + ' + Me.picshiftnet.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picshiftnet.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picshiftnet.Location = New System.Drawing.Point(7, 6) + Me.picshiftnet.Name = "picshiftnet" + Me.picshiftnet.Size = New System.Drawing.Size(16, 16) + Me.picshiftnet.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picshiftnet.TabIndex = 0 + Me.picshiftnet.TabStop = False + ' + 'pnldodge + ' + Me.pnldodge.Controls.Add(Me.txtdodge) + Me.pnldodge.Controls.Add(Me.Label25) + Me.pnldodge.Controls.Add(Me.picdodge) + Me.pnldodge.Dock = System.Windows.Forms.DockStyle.Top + Me.pnldodge.Location = New System.Drawing.Point(0, 644) + Me.pnldodge.Name = "pnldodge" + Me.pnldodge.Size = New System.Drawing.Size(330, 28) + Me.pnldodge.TabIndex = 43 + Me.pnldodge.Visible = False + ' + 'txtdodge + ' + Me.txtdodge.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtdodge.BackColor = System.Drawing.Color.White + Me.txtdodge.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtdodge.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtdodge.Location = New System.Drawing.Point(151, 3) + Me.txtdodge.Name = "txtdodge" + Me.txtdodge.Size = New System.Drawing.Size(175, 22) + Me.txtdodge.TabIndex = 2 + ' + 'Label25 + ' + Me.Label25.AutoSize = True + Me.Label25.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label25.Location = New System.Drawing.Point(28, 6) + Me.Label25.Name = "Label25" + Me.Label25.Size = New System.Drawing.Size(50, 16) + Me.Label25.TabIndex = 1 + Me.Label25.Text = "Dodge" + ' + 'picdodge + ' + Me.picdodge.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picdodge.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picdodge.Location = New System.Drawing.Point(7, 6) + Me.picdodge.Name = "picdodge" + Me.picdodge.Size = New System.Drawing.Size(16, 16) + Me.picdodge.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picdodge.TabIndex = 0 + Me.picdodge.TabStop = False + ' + 'pnldownload + ' + Me.pnldownload.Controls.Add(Me.txtdownload) + Me.pnldownload.Controls.Add(Me.Label26) + Me.pnldownload.Controls.Add(Me.picdownload) + Me.pnldownload.Dock = System.Windows.Forms.DockStyle.Top + Me.pnldownload.Location = New System.Drawing.Point(0, 672) + Me.pnldownload.Name = "pnldownload" + Me.pnldownload.Size = New System.Drawing.Size(330, 28) + Me.pnldownload.TabIndex = 44 + Me.pnldownload.Visible = False + ' + 'txtdownload + ' + Me.txtdownload.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtdownload.BackColor = System.Drawing.Color.White + Me.txtdownload.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtdownload.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtdownload.Location = New System.Drawing.Point(151, 3) + Me.txtdownload.Name = "txtdownload" + Me.txtdownload.Size = New System.Drawing.Size(175, 22) + Me.txtdownload.TabIndex = 2 + ' + 'Label26 + ' + Me.Label26.AutoSize = True + Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label26.Location = New System.Drawing.Point(28, 6) + Me.Label26.Name = "Label26" + Me.Label26.Size = New System.Drawing.Size(126, 16) + Me.Label26.TabIndex = 1 + Me.Label26.Text = "Download Manager" + ' + 'picdownload + ' + Me.picdownload.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picdownload.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picdownload.Location = New System.Drawing.Point(7, 6) + Me.picdownload.Name = "picdownload" + Me.picdownload.Size = New System.Drawing.Size(16, 16) + Me.picdownload.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picdownload.TabIndex = 0 + Me.picdownload.TabStop = False + ' + 'pnlinstaller + ' + Me.pnlinstaller.Controls.Add(Me.txtinstaller) + Me.pnlinstaller.Controls.Add(Me.Label27) + Me.pnlinstaller.Controls.Add(Me.picinstaller) + Me.pnlinstaller.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlinstaller.Location = New System.Drawing.Point(0, 700) + Me.pnlinstaller.Name = "pnlinstaller" + Me.pnlinstaller.Size = New System.Drawing.Size(330, 28) + Me.pnlinstaller.TabIndex = 45 + Me.pnlinstaller.Visible = False + ' + 'txtinstaller + ' + Me.txtinstaller.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtinstaller.BackColor = System.Drawing.Color.White + Me.txtinstaller.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtinstaller.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtinstaller.Location = New System.Drawing.Point(151, 3) + Me.txtinstaller.Name = "txtinstaller" + Me.txtinstaller.Size = New System.Drawing.Size(175, 22) + Me.txtinstaller.TabIndex = 2 + ' + 'Label27 + ' + Me.Label27.AutoSize = True + Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label27.Location = New System.Drawing.Point(28, 6) + Me.Label27.Name = "Label27" + Me.Label27.Size = New System.Drawing.Size(54, 16) + Me.Label27.TabIndex = 1 + Me.Label27.Text = "Installer" + ' + 'picinstaller + ' + Me.picinstaller.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picinstaller.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picinstaller.Location = New System.Drawing.Point(7, 6) + Me.picinstaller.Name = "picinstaller" + Me.picinstaller.Size = New System.Drawing.Size(16, 16) + Me.picinstaller.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picinstaller.TabIndex = 0 + Me.picinstaller.TabStop = False + ' + 'pnlsysinfo + ' + Me.pnlsysinfo.Controls.Add(Me.txtsysinfo) + Me.pnlsysinfo.Controls.Add(Me.Label28) + Me.pnlsysinfo.Controls.Add(Me.picsysinfo) + Me.pnlsysinfo.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlsysinfo.Location = New System.Drawing.Point(0, 728) + Me.pnlsysinfo.Name = "pnlsysinfo" + Me.pnlsysinfo.Size = New System.Drawing.Size(330, 28) + Me.pnlsysinfo.TabIndex = 46 + Me.pnlsysinfo.Visible = False + ' + 'txtsysinfo + ' + Me.txtsysinfo.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtsysinfo.BackColor = System.Drawing.Color.White + Me.txtsysinfo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtsysinfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtsysinfo.Location = New System.Drawing.Point(151, 3) + Me.txtsysinfo.Name = "txtsysinfo" + Me.txtsysinfo.Size = New System.Drawing.Size(175, 22) + Me.txtsysinfo.TabIndex = 2 + ' + 'Label28 + ' + Me.Label28.AutoSize = True + Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label28.Location = New System.Drawing.Point(28, 6) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(121, 16) + Me.Label28.TabIndex = 1 + Me.Label28.Text = "System Information" + ' + 'picsysinfo + ' + Me.picsysinfo.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picsysinfo.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picsysinfo.Location = New System.Drawing.Point(7, 6) + Me.picsysinfo.Name = "picsysinfo" + Me.picsysinfo.Size = New System.Drawing.Size(16, 16) + Me.picsysinfo.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picsysinfo.TabIndex = 0 + Me.picsysinfo.TabStop = False + ' + 'pnlorcwrite + ' + Me.pnlorcwrite.Controls.Add(Me.txtorcwrite) + Me.pnlorcwrite.Controls.Add(Me.Label29) + Me.pnlorcwrite.Controls.Add(Me.picorcwrite) + Me.pnlorcwrite.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlorcwrite.Location = New System.Drawing.Point(0, 756) + Me.pnlorcwrite.Name = "pnlorcwrite" + Me.pnlorcwrite.Size = New System.Drawing.Size(330, 28) + Me.pnlorcwrite.TabIndex = 47 + Me.pnlorcwrite.Visible = False + ' + 'txtorcwrite + ' + Me.txtorcwrite.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtorcwrite.BackColor = System.Drawing.Color.White + Me.txtorcwrite.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtorcwrite.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtorcwrite.Location = New System.Drawing.Point(151, 3) + Me.txtorcwrite.Name = "txtorcwrite" + Me.txtorcwrite.Size = New System.Drawing.Size(175, 22) + Me.txtorcwrite.TabIndex = 2 + ' + 'Label29 + ' + Me.Label29.AutoSize = True + Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label29.Location = New System.Drawing.Point(28, 6) + Me.Label29.Name = "Label29" + Me.Label29.Size = New System.Drawing.Size(60, 16) + Me.Label29.TabIndex = 1 + Me.Label29.Text = "OrcWrite" + ' + 'picorcwrite + ' + Me.picorcwrite.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picorcwrite.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picorcwrite.Location = New System.Drawing.Point(7, 6) + Me.picorcwrite.Name = "picorcwrite" + Me.picorcwrite.Size = New System.Drawing.Size(16, 16) + Me.picorcwrite.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picorcwrite.TabIndex = 0 + Me.picorcwrite.TabStop = False + ' + 'pnlfloodgate + ' + Me.pnlfloodgate.Controls.Add(Me.txtfloodgate) + Me.pnlfloodgate.Controls.Add(Me.Label30) + Me.pnlfloodgate.Controls.Add(Me.picfloodgate) + Me.pnlfloodgate.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlfloodgate.Location = New System.Drawing.Point(0, 784) + Me.pnlfloodgate.Name = "pnlfloodgate" + Me.pnlfloodgate.Size = New System.Drawing.Size(330, 28) + Me.pnlfloodgate.TabIndex = 48 + Me.pnlfloodgate.Visible = False + ' + 'txtfloodgate + ' + Me.txtfloodgate.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtfloodgate.BackColor = System.Drawing.Color.White + Me.txtfloodgate.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtfloodgate.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtfloodgate.Location = New System.Drawing.Point(151, 3) + Me.txtfloodgate.Name = "txtfloodgate" + Me.txtfloodgate.Size = New System.Drawing.Size(175, 22) + Me.txtfloodgate.TabIndex = 2 + ' + 'Label30 + ' + Me.Label30.AutoSize = True + Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label30.Location = New System.Drawing.Point(28, 6) + Me.Label30.Name = "Label30" + Me.Label30.Size = New System.Drawing.Size(75, 16) + Me.Label30.TabIndex = 1 + Me.Label30.Text = "Flood Gate" + ' + 'picfloodgate + ' + Me.picfloodgate.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picfloodgate.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picfloodgate.Location = New System.Drawing.Point(7, 6) + Me.picfloodgate.Name = "picfloodgate" + Me.picfloodgate.Size = New System.Drawing.Size(16, 16) + Me.picfloodgate.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picfloodgate.TabIndex = 0 + Me.picfloodgate.TabStop = False + ' + 'pnlmaze + ' + Me.pnlmaze.Controls.Add(Me.txtmaze) + Me.pnlmaze.Controls.Add(Me.Label31) + Me.pnlmaze.Controls.Add(Me.picmaze) + Me.pnlmaze.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlmaze.Location = New System.Drawing.Point(0, 812) + Me.pnlmaze.Name = "pnlmaze" + Me.pnlmaze.Size = New System.Drawing.Size(330, 28) + Me.pnlmaze.TabIndex = 49 + Me.pnlmaze.Visible = False + ' + 'txtmaze + ' + Me.txtmaze.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtmaze.BackColor = System.Drawing.Color.White + Me.txtmaze.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtmaze.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtmaze.Location = New System.Drawing.Point(151, 3) + Me.txtmaze.Name = "txtmaze" + Me.txtmaze.Size = New System.Drawing.Size(175, 22) + Me.txtmaze.TabIndex = 2 + ' + 'Label31 + ' + Me.Label31.AutoSize = True + Me.Label31.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label31.Location = New System.Drawing.Point(28, 6) + Me.Label31.Name = "Label31" + Me.Label31.Size = New System.Drawing.Size(62, 16) + Me.Label31.TabIndex = 1 + Me.Label31.Text = "Labyrinth" + ' + 'picmaze + ' + Me.picmaze.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picmaze.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picmaze.Location = New System.Drawing.Point(7, 6) + Me.picmaze.Name = "picmaze" + Me.picmaze.Size = New System.Drawing.Size(16, 16) + Me.picmaze.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picmaze.TabIndex = 0 + Me.picmaze.TabStop = False + ' + 'pnlvirusscanner + ' + Me.pnlvirusscanner.Controls.Add(Me.txtvirusscanner) + Me.pnlvirusscanner.Controls.Add(Me.Label32) + Me.pnlvirusscanner.Controls.Add(Me.picvirusscanner) + Me.pnlvirusscanner.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlvirusscanner.Location = New System.Drawing.Point(0, 840) + Me.pnlvirusscanner.Name = "pnlvirusscanner" + Me.pnlvirusscanner.Size = New System.Drawing.Size(330, 28) + Me.pnlvirusscanner.TabIndex = 50 + Me.pnlvirusscanner.Visible = False + ' + 'txtvirusscanner + ' + Me.txtvirusscanner.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtvirusscanner.BackColor = System.Drawing.Color.White + Me.txtvirusscanner.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtvirusscanner.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtvirusscanner.Location = New System.Drawing.Point(151, 3) + Me.txtvirusscanner.Name = "txtvirusscanner" + Me.txtvirusscanner.Size = New System.Drawing.Size(175, 22) + Me.txtvirusscanner.TabIndex = 2 + ' + 'Label32 + ' + Me.Label32.AutoSize = True + Me.Label32.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label32.Location = New System.Drawing.Point(28, 6) + Me.Label32.Name = "Label32" + Me.Label32.Size = New System.Drawing.Size(91, 16) + Me.Label32.TabIndex = 1 + Me.Label32.Text = "Virus Scanner" + ' + 'picvirusscanner + ' + Me.picvirusscanner.BackgroundImage = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.picvirusscanner.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.picvirusscanner.Location = New System.Drawing.Point(7, 6) + Me.picvirusscanner.Name = "picvirusscanner" + Me.picvirusscanner.Size = New System.Drawing.Size(16, 16) + Me.picvirusscanner.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picvirusscanner.TabIndex = 0 + Me.picvirusscanner.TabStop = False + ' + 'Name_Changer + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(334, 765) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(300, 400) + Me.Name = "Name_Changer" + Me.Text = "Name_Changer" + Me.TopMost = True + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pnlprogramlistholder.ResumeLayout(False) + Me.pnlterminalsettings.ResumeLayout(False) + Me.pnlterminalsettings.PerformLayout() + CType(Me.picterminalicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnliconmanagersettings.ResumeLayout(False) + Me.pnliconmanagersettings.PerformLayout() + CType(Me.piciconmanagericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlnamechangersettings.ResumeLayout(False) + Me.pnlnamechangersettings.PerformLayout() + CType(Me.picnamechangericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlvideoplayersettings.ResumeLayout(False) + Me.pnlvideoplayersettings.PerformLayout() + CType(Me.picvideoplayericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlwebbrowsersettings.ResumeLayout(False) + Me.pnlwebbrowsersettings.PerformLayout() + CType(Me.picwebbrowsericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlaudioplayersettings.ResumeLayout(False) + Me.pnlaudioplayersettings.PerformLayout() + CType(Me.picaudioplayericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlcalculatorsettings.ResumeLayout(False) + Me.pnlcalculatorsettings.PerformLayout() + CType(Me.piccalculatoricon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlartpadsettings.ResumeLayout(False) + Me.pnlartpadsettings.PerformLayout() + CType(Me.picartpadicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlskinloadersettings.ResumeLayout(False) + Me.pnlskinloadersettings.PerformLayout() + CType(Me.picskinloadericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlgraphicpickersettings.ResumeLayout(False) + Me.pnlgraphicpickersettings.PerformLayout() + CType(Me.picgraphicpickericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnltextpadsettings.ResumeLayout(False) + Me.pnltextpadsettings.PerformLayout() + CType(Me.pictextpadicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlfilesaversettings.ResumeLayout(False) + Me.pnlfilesaversettings.PerformLayout() + CType(Me.picfilesavericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlfileopenersettings.ResumeLayout(False) + Me.pnlfileopenersettings.PerformLayout() + CType(Me.picfileopenericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlfileskimmersettings.ResumeLayout(False) + Me.pnlfileskimmersettings.PerformLayout() + CType(Me.picfileskimmericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpongsettings.ResumeLayout(False) + Me.pnlpongsettings.PerformLayout() + CType(Me.picpongicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlcolourpickersettings.ResumeLayout(False) + Me.pnlcolourpickersettings.PerformLayout() + CType(Me.piccolourpickericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlshiftersettings.ResumeLayout(False) + Me.pnlshiftersettings.PerformLayout() + CType(Me.picshiftericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlclocksettings.ResumeLayout(False) + Me.pnlclocksettings.PerformLayout() + CType(Me.picclockicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlshiftoriumsettings.ResumeLayout(False) + Me.pnlshiftoriumsettings.PerformLayout() + CType(Me.picshiftoriumicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlknowledgeinputsettings.ResumeLayout(False) + Me.pnlknowledgeinputsettings.PerformLayout() + CType(Me.picknowledgeinputicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.Panel2.ResumeLayout(False) + CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + Me.pnlwallet.ResumeLayout(False) + Me.pnlwallet.PerformLayout() + CType(Me.picwallet, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnldigger.ResumeLayout(False) + Me.pnldigger.PerformLayout() + CType(Me.picdigger, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlskinshifter.ResumeLayout(False) + Me.pnlskinshifter.PerformLayout() + CType(Me.picskinshifter, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlshiftnet.ResumeLayout(False) + Me.pnlshiftnet.PerformLayout() + CType(Me.picshiftnet, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnldodge.ResumeLayout(False) + Me.pnldodge.PerformLayout() + CType(Me.picdodge, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnldownload.ResumeLayout(False) + Me.pnldownload.PerformLayout() + CType(Me.picdownload, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlinstaller.ResumeLayout(False) + Me.pnlinstaller.PerformLayout() + CType(Me.picinstaller, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlsysinfo.ResumeLayout(False) + Me.pnlsysinfo.PerformLayout() + CType(Me.picsysinfo, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlorcwrite.ResumeLayout(False) + Me.pnlorcwrite.PerformLayout() + CType(Me.picorcwrite, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlfloodgate.ResumeLayout(False) + Me.pnlfloodgate.PerformLayout() + CType(Me.picfloodgate, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlmaze.ResumeLayout(False) + Me.pnlmaze.PerformLayout() + CType(Me.picmaze, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlvirusscanner.ResumeLayout(False) + Me.pnlvirusscanner.PerformLayout() + CType(Me.picvirusscanner, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents btnReset As System.Windows.Forms.Button + Friend WithEvents btnApply As System.Windows.Forms.Button + Friend WithEvents pnlprogramlistholder As System.Windows.Forms.Panel + Friend WithEvents pnlknowledgeinputsettings As System.Windows.Forms.Panel + Friend WithEvents txtknowledgeinputname As System.Windows.Forms.TextBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents picknowledgeinputicon As System.Windows.Forms.PictureBox + Friend WithEvents pnlfileskimmersettings As System.Windows.Forms.Panel + Friend WithEvents txtfileskimmername As System.Windows.Forms.TextBox + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents picfileskimmericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlpongsettings As System.Windows.Forms.Panel + Friend WithEvents txtpongname As System.Windows.Forms.TextBox + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents picpongicon As System.Windows.Forms.PictureBox + Friend WithEvents pnlcolourpickersettings As System.Windows.Forms.Panel + Friend WithEvents txtcolourpickername As System.Windows.Forms.TextBox + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents piccolourpickericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlshiftersettings As System.Windows.Forms.Panel + Friend WithEvents txtshiftername As System.Windows.Forms.TextBox + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents picshiftericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlclocksettings As System.Windows.Forms.Panel + Friend WithEvents txtclockname As System.Windows.Forms.TextBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents picclockicon As System.Windows.Forms.PictureBox + Friend WithEvents pnlshiftoriumsettings As System.Windows.Forms.Panel + Friend WithEvents txtshiftoriumname As System.Windows.Forms.TextBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents picshiftoriumicon As System.Windows.Forms.PictureBox + Friend WithEvents PictureBox13 As System.Windows.Forms.PictureBox + Friend WithEvents pnlartpadsettings As System.Windows.Forms.Panel + Friend WithEvents txtartpadname As System.Windows.Forms.TextBox + Friend WithEvents Label13 As System.Windows.Forms.Label + Friend WithEvents picartpadicon As System.Windows.Forms.PictureBox + Friend WithEvents pnlskinloadersettings As System.Windows.Forms.Panel + Friend WithEvents txtskinloadername As System.Windows.Forms.TextBox + Friend WithEvents Label12 As System.Windows.Forms.Label + Friend WithEvents picskinloadericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlgraphicpickersettings As System.Windows.Forms.Panel + Friend WithEvents txtgraphicpickername As System.Windows.Forms.TextBox + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents picgraphicpickericon As System.Windows.Forms.PictureBox + Friend WithEvents pnltextpadsettings As System.Windows.Forms.Panel + Friend WithEvents txttextpadname As System.Windows.Forms.TextBox + Friend WithEvents Label10 As System.Windows.Forms.Label + Friend WithEvents pictextpadicon As System.Windows.Forms.PictureBox + Friend WithEvents pnlfilesaversettings As System.Windows.Forms.Panel + Friend WithEvents txtfilesavername As System.Windows.Forms.TextBox + Friend WithEvents Label9 As System.Windows.Forms.Label + Friend WithEvents picfilesavericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlfileopenersettings As System.Windows.Forms.Panel + Friend WithEvents txtfileopenername As System.Windows.Forms.TextBox + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents picfileopenericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlterminalsettings As System.Windows.Forms.Panel + Friend WithEvents txtterminalname As System.Windows.Forms.TextBox + Friend WithEvents Label19 As System.Windows.Forms.Label + Friend WithEvents picterminalicon As System.Windows.Forms.PictureBox + Friend WithEvents pnlvideoplayersettings As System.Windows.Forms.Panel + Friend WithEvents txtvideoplayername As System.Windows.Forms.TextBox + Friend WithEvents Label17 As System.Windows.Forms.Label + Friend WithEvents picvideoplayericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlwebbrowsersettings As System.Windows.Forms.Panel + Friend WithEvents txtwebbrowsername As System.Windows.Forms.TextBox + Friend WithEvents Label16 As System.Windows.Forms.Label + Friend WithEvents picwebbrowsericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlaudioplayersettings As System.Windows.Forms.Panel + Friend WithEvents txtaudioplayername As System.Windows.Forms.TextBox + Friend WithEvents Label15 As System.Windows.Forms.Label + Friend WithEvents picaudioplayericon As System.Windows.Forms.PictureBox + Friend WithEvents pnlcalculatorsettings As System.Windows.Forms.Panel + Friend WithEvents txtcalculatorname As System.Windows.Forms.TextBox + Friend WithEvents Label14 As System.Windows.Forms.Label + Friend WithEvents piccalculatoricon As System.Windows.Forms.PictureBox + Friend WithEvents btnLoad As System.Windows.Forms.Button + Friend WithEvents btnSave As System.Windows.Forms.Button + Friend WithEvents pnlnamechangersettings As System.Windows.Forms.Panel + Friend WithEvents txtnamechanger As System.Windows.Forms.TextBox + Friend WithEvents Label18 As System.Windows.Forms.Label + Friend WithEvents picnamechangericon As System.Windows.Forms.PictureBox + Friend WithEvents pnliconmanagersettings As System.Windows.Forms.Panel + Friend WithEvents txticonmanager As System.Windows.Forms.TextBox + Friend WithEvents Label20 As System.Windows.Forms.Label + Friend WithEvents piciconmanagericon As System.Windows.Forms.PictureBox + Friend WithEvents pnldigger As System.Windows.Forms.Panel + Friend WithEvents txtdigger As System.Windows.Forms.TextBox + Friend WithEvents Label22 As System.Windows.Forms.Label + Friend WithEvents picdigger As System.Windows.Forms.PictureBox + Friend WithEvents pnlwallet As System.Windows.Forms.Panel + Friend WithEvents txtwallet As System.Windows.Forms.TextBox + Friend WithEvents Label21 As System.Windows.Forms.Label + Friend WithEvents picwallet As System.Windows.Forms.PictureBox + Friend WithEvents pnlvirusscanner As System.Windows.Forms.Panel + Friend WithEvents txtvirusscanner As System.Windows.Forms.TextBox + Friend WithEvents Label32 As System.Windows.Forms.Label + Friend WithEvents picvirusscanner As System.Windows.Forms.PictureBox + Friend WithEvents pnlmaze As System.Windows.Forms.Panel + Friend WithEvents txtmaze As System.Windows.Forms.TextBox + Friend WithEvents Label31 As System.Windows.Forms.Label + Friend WithEvents picmaze As System.Windows.Forms.PictureBox + Friend WithEvents pnlfloodgate As System.Windows.Forms.Panel + Friend WithEvents txtfloodgate As System.Windows.Forms.TextBox + Friend WithEvents Label30 As System.Windows.Forms.Label + Friend WithEvents picfloodgate As System.Windows.Forms.PictureBox + Friend WithEvents pnlorcwrite As System.Windows.Forms.Panel + Friend WithEvents txtorcwrite As System.Windows.Forms.TextBox + Friend WithEvents Label29 As System.Windows.Forms.Label + Friend WithEvents picorcwrite As System.Windows.Forms.PictureBox + Friend WithEvents pnlsysinfo As System.Windows.Forms.Panel + Friend WithEvents txtsysinfo As System.Windows.Forms.TextBox + Friend WithEvents Label28 As System.Windows.Forms.Label + Friend WithEvents picsysinfo As System.Windows.Forms.PictureBox + Friend WithEvents pnlinstaller As System.Windows.Forms.Panel + Friend WithEvents txtinstaller As System.Windows.Forms.TextBox + Friend WithEvents Label27 As System.Windows.Forms.Label + Friend WithEvents picinstaller As System.Windows.Forms.PictureBox + Friend WithEvents pnldownload As System.Windows.Forms.Panel + Friend WithEvents txtdownload As System.Windows.Forms.TextBox + Friend WithEvents Label26 As System.Windows.Forms.Label + Friend WithEvents picdownload As System.Windows.Forms.PictureBox + Friend WithEvents pnldodge As System.Windows.Forms.Panel + Friend WithEvents txtdodge As System.Windows.Forms.TextBox + Friend WithEvents Label25 As System.Windows.Forms.Label + Friend WithEvents picdodge As System.Windows.Forms.PictureBox + Friend WithEvents pnlshiftnet As System.Windows.Forms.Panel + Friend WithEvents txtshiftnet As System.Windows.Forms.TextBox + Friend WithEvents Label24 As System.Windows.Forms.Label + Friend WithEvents picshiftnet As System.Windows.Forms.PictureBox + Friend WithEvents pnlskinshifter As System.Windows.Forms.Panel + Friend WithEvents txtskinshifter As System.Windows.Forms.TextBox + Friend WithEvents Label23 As System.Windows.Forms.Label + Friend WithEvents picskinshifter As System.Windows.Forms.PictureBox +End Class diff --git a/ShiftOS/Name Changer.resx b/ShiftOS/Name Changer.resx new file mode 100644 index 0000000..ff4c820 --- /dev/null +++ b/ShiftOS/Name Changer.resx @@ -0,0 +1,129 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 1347, 18 + + + 1441, 18 + + + 1525, 18 + + \ No newline at end of file diff --git a/ShiftOS/Name Changer.vb b/ShiftOS/Name Changer.vb new file mode 100644 index 0000000..4dc8cfa --- /dev/null +++ b/ShiftOS/Name Changer.vb @@ -0,0 +1,701 @@ +Public Class Name_Changer + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 300 + Public minimumsizeheight As Integer = 400 + + Public savelines(200) As String + Public loadlines(200) As String + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.NameChangerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + loadnames() + loadicons() + showboughtitems() + + ShiftOSDesktop.pnlpanelbuttonnamechanger.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonnamechanger, ShiftOSDesktop.tbnamechangericon, ShiftOSDesktop.tbnamechangertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(334, 644) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.namechangername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.namechangericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Public Sub loadnames() + txtknowledgeinputname.Text = ShiftOSDesktop.knowledgeinputname + txtshiftoriumname.Text = ShiftOSDesktop.shiftoriumname + txtclockname.Text = ShiftOSDesktop.clockname + txtshiftername.Text = ShiftOSDesktop.shiftername + txtcolourpickername.Text = ShiftOSDesktop.colourpickername + txtpongname.Text = ShiftOSDesktop.pongname + txtfileskimmername.Text = ShiftOSDesktop.fileskimmername + txtfileopenername.Text = ShiftOSDesktop.fileopenername + txtfilesavername.Text = ShiftOSDesktop.filesavername + txttextpadname.Text = ShiftOSDesktop.textpadname + txtgraphicpickername.Text = ShiftOSDesktop.graphicpickername + txtskinloadername.Text = ShiftOSDesktop.skinloadername + txtartpadname.Text = ShiftOSDesktop.artpadname + txtcalculatorname.Text = ShiftOSDesktop.calculatorname + txtaudioplayername.Text = ShiftOSDesktop.audioplayername + txtwebbrowsername.Text = ShiftOSDesktop.webbrowsername + txtvideoplayername.Text = ShiftOSDesktop.videoplayername + txtnamechanger.Text = ShiftOSDesktop.namechangername + txticonmanager.Text = ShiftOSDesktop.iconmanagername + txtterminalname.Text = ShiftOSDesktop.terminalname + txtwallet.Text = ShiftOSDesktop.bitnotewalletname + txtdigger.Text = ShiftOSDesktop.bitnotediggername + txtskinshifter.Text = ShiftOSDesktop.skinshiftername + txtshiftnet.Text = ShiftOSDesktop.shiftnetname + txtdodge.Text = ShiftOSDesktop.dodgename + txtdownload.Text = ShiftOSDesktop.downloadmanagername + txtinstaller.Text = ShiftOSDesktop.installername + txtsysinfo.Text = ShiftOSDesktop.sysinfoname + txtfloodgate.Text = ShiftOSDesktop.floodgatename + txtorcwrite.Text = ShiftOSDesktop.orcwritename + txtmaze.Text = ShiftOSDesktop.mazename + txtvirusscanner.Text = ShiftOSDesktop.virusscannername + End Sub + + Public Sub loadicons() + picknowledgeinputicon.BackgroundImage = ShiftOSDesktop.knowledgeinputicontitlebar + picshiftoriumicon.BackgroundImage = ShiftOSDesktop.shiftoriumicontitlebar + picclockicon.BackgroundImage = ShiftOSDesktop.clockicontitlebar + picshiftericon.BackgroundImage = ShiftOSDesktop.shiftericontitlebar + piccolourpickericon.BackgroundImage = ShiftOSDesktop.colourpickericontitlebar + picpongicon.BackgroundImage = ShiftOSDesktop.pongicontitlebar + picfileskimmericon.BackgroundImage = ShiftOSDesktop.fileskimmericontitlebar + picfileopenericon.BackgroundImage = ShiftOSDesktop.fileopenericontitlebar + picfilesavericon.BackgroundImage = ShiftOSDesktop.filesavericontitlebar + pictextpadicon.BackgroundImage = ShiftOSDesktop.textpadicontitlebar + picgraphicpickericon.BackgroundImage = ShiftOSDesktop.graphicpickericontitlebar + picskinloadericon.BackgroundImage = ShiftOSDesktop.skinloadericontitlebar + picartpadicon.BackgroundImage = ShiftOSDesktop.artpadicontitlebar + piccalculatoricon.BackgroundImage = ShiftOSDesktop.calculatoricontitlebar + picaudioplayericon.BackgroundImage = ShiftOSDesktop.audioplayericontitlebar + picwebbrowsericon.BackgroundImage = ShiftOSDesktop.webbrowsericontitlebar + picvideoplayericon.BackgroundImage = ShiftOSDesktop.videoplayericontitlebar + picnamechangericon.BackgroundImage = ShiftOSDesktop.namechangericontitlebar + piciconmanagericon.BackgroundImage = ShiftOSDesktop.iconmanagericontitlebar + picterminalicon.BackgroundImage = ShiftOSDesktop.terminalicontitlebar + picwallet.BackgroundImage = ShiftOSDesktop.bitnotewalleticontitlebar + picdigger.BackgroundImage = ShiftOSDesktop.bitnotediggericontitlebar + picskinshifter.BackgroundImage = ShiftOSDesktop.skinshiftericontitlebar + picshiftnet.BackgroundImage = ShiftOSDesktop.shiftneticontitlebar + picdodge.BackgroundImage = ShiftOSDesktop.dodgeicontitlebar + picdownload.BackgroundImage = ShiftOSDesktop.downloadmanagericontitlebar + picinstaller.BackgroundImage = ShiftOSDesktop.installericontitlebar + picsysinfo.BackgroundImage = ShiftOSDesktop.sysinfoicontitlebar + picfloodgate.BackgroundImage = ShiftOSDesktop.floodgateicontitlebar + picorcwrite.BackgroundImage = ShiftOSDesktop.orcwriteicontitlebar + picmaze.BackgroundImage = ShiftOSDesktop.mazeicontitlebar + picvirusscanner.BackgroundImage = ShiftOSDesktop.virusscannericontitlebar + End Sub + + Private Sub btnApply_Click(sender As Object, e As EventArgs) Handles btnApply.Click + applychanges() + End Sub + + Public Sub applychanges() + ShiftOSDesktop.knowledgeinputname = txtknowledgeinputname.Text + ShiftOSDesktop.shiftoriumname = txtshiftoriumname.Text + ShiftOSDesktop.clockname = txtclockname.Text + ShiftOSDesktop.shiftername = txtshiftername.Text + ShiftOSDesktop.colourpickername = txtcolourpickername.Text + ShiftOSDesktop.pongname = txtpongname.Text + ShiftOSDesktop.fileskimmername = txtfileskimmername.Text + ShiftOSDesktop.fileopenername = txtfileopenername.Text + ShiftOSDesktop.filesavername = txtfilesavername.Text + ShiftOSDesktop.textpadname = txttextpadname.Text + ShiftOSDesktop.graphicpickername = txtgraphicpickername.Text + ShiftOSDesktop.skinloadername = txtskinloadername.Text + ShiftOSDesktop.artpadname = txtartpadname.Text + ShiftOSDesktop.calculatorname = txtcalculatorname.Text + ShiftOSDesktop.audioplayername = txtaudioplayername.Text + ShiftOSDesktop.webbrowsername = txtwebbrowsername.Text + ShiftOSDesktop.videoplayername = txtvideoplayername.Text + ShiftOSDesktop.namechangername = txtnamechanger.Text + ShiftOSDesktop.iconmanagername = txticonmanager.Text + ShiftOSDesktop.terminalname = txtterminalname.Text + ShiftOSDesktop.bitnotewalletname = txtwallet.Text + ShiftOSDesktop.bitnotediggername = txtdigger.Text + ShiftOSDesktop.skinshiftername = txtskinshifter.Text + ShiftOSDesktop.shiftnetname = txtshiftnet.Text + ShiftOSDesktop.dodgename = txtdodge.Text + ShiftOSDesktop.downloadmanagername = txtdownload.Text + ShiftOSDesktop.installername = txtinstaller.Text + ShiftOSDesktop.sysinfoname = txtsysinfo.Text + ShiftOSDesktop.floodgatename = txtfloodgate.Text + ShiftOSDesktop.orcwritename = txtorcwrite.Text + ShiftOSDesktop.mazename = txtmaze.Text + ShiftOSDesktop.virusscannername = txtvirusscanner.Text + + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setupdesktop() + If Icon_Manager.Visible = True Then Icon_Manager.loadsettings() + End Sub + + Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click + savelines(0) = ShiftOSDesktop.artpadname + savelines(1) = ShiftOSDesktop.audioplayername + savelines(2) = ShiftOSDesktop.calculatorname + savelines(3) = ShiftOSDesktop.clockname + savelines(4) = ShiftOSDesktop.colourpickername + savelines(5) = ShiftOSDesktop.fileopenername + savelines(6) = ShiftOSDesktop.filesavername + savelines(7) = ShiftOSDesktop.fileskimmername + savelines(8) = ShiftOSDesktop.graphicpickername + savelines(9) = ShiftOSDesktop.knowledgeinputname + savelines(10) = ShiftOSDesktop.pongname + savelines(11) = ShiftOSDesktop.shiftername + savelines(12) = ShiftOSDesktop.shiftoriumname + savelines(13) = ShiftOSDesktop.skinloadername + savelines(14) = ShiftOSDesktop.terminalname + savelines(15) = ShiftOSDesktop.textpadname + savelines(16) = ShiftOSDesktop.videoplayername + savelines(17) = ShiftOSDesktop.webbrowsername + savelines(18) = ShiftOSDesktop.namechangername + savelines(19) = ShiftOSDesktop.iconmanagername + savelines(20) = ShiftOSDesktop.bitnotewalletname + savelines(21) = ShiftOSDesktop.bitnotediggername + savelines(22) = ShiftOSDesktop.skinshiftername + savelines(23) = ShiftOSDesktop.shiftnetname + savelines(24) = ShiftOSDesktop.dodgename + savelines(25) = ShiftOSDesktop.downloadmanagername + savelines(26) = ShiftOSDesktop.installername + savelines(27) = ShiftOSDesktop.sysinfoname + savelines(28) = ShiftOSDesktop.floodgatename + savelines(29) = ShiftOSDesktop.orcwritename + savelines(30) = ShiftOSDesktop.mazename + savelines(31) = ShiftOSDesktop.virusscannername + + File_Saver.savingprogram = "namechanger" + File_Saver.saveextention = ".nls" + File_Saver.Show() + End Sub + + Private Sub btnLoad_Click(sender As Object, e As EventArgs) Handles btnLoad.Click + File_Opener.Show() + File_Opener.openingprogram = "namechanger" + File_Opener.openextention = ".nls" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Public Sub loadnamesfromfile() + If loadlines(0) = "" Then Else ShiftOSDesktop.artpadname = loadlines(0) + If loadlines(1) = "" Then Else ShiftOSDesktop.audioplayername = loadlines(1) + If loadlines(2) = "" Then Else ShiftOSDesktop.calculatorname = loadlines(2) + If loadlines(3) = "" Then Else ShiftOSDesktop.clockname = loadlines(3) + If loadlines(4) = "" Then Else ShiftOSDesktop.colourpickername = loadlines(4) + If loadlines(5) = "" Then Else ShiftOSDesktop.fileopenername = loadlines(5) + If loadlines(6) = "" Then Else ShiftOSDesktop.filesavername = loadlines(6) + If loadlines(7) = "" Then Else ShiftOSDesktop.fileskimmername = loadlines(7) + If loadlines(8) = "" Then Else ShiftOSDesktop.graphicpickername = loadlines(8) + If loadlines(9) = "" Then Else ShiftOSDesktop.knowledgeinputname = loadlines(9) + If loadlines(10) = "" Then Else ShiftOSDesktop.pongname = loadlines(10) + If loadlines(11) = "" Then Else ShiftOSDesktop.shiftername = loadlines(11) + If loadlines(12) = "" Then Else ShiftOSDesktop.shiftoriumname = loadlines(12) + If loadlines(13) = "" Then Else ShiftOSDesktop.skinloadername = loadlines(13) + If loadlines(14) = "" Then Else ShiftOSDesktop.terminalname = loadlines(14) + If loadlines(15) = "" Then Else ShiftOSDesktop.textpadname = loadlines(15) + If loadlines(16) = "" Then Else ShiftOSDesktop.videoplayername = loadlines(16) + If loadlines(17) = "" Then Else ShiftOSDesktop.webbrowsername = loadlines(17) + If loadlines(18) = "" Then Else ShiftOSDesktop.namechangername = loadlines(18) + If loadlines(19) = "" Then Else ShiftOSDesktop.iconmanagername = loadlines(19) + If loadlines(20) = "" Then Else ShiftOSDesktop.bitnotewalletname = loadlines(20) + If loadlines(21) = "" Then Else ShiftOSDesktop.bitnotediggername = loadlines(21) + If loadlines(22) = "" Then Else ShiftOSDesktop.skinshiftername = loadlines(22) + If loadlines(23) = "" Then Else ShiftOSDesktop.shiftnetname = loadlines(23) + If loadlines(24) = "" Then Else ShiftOSDesktop.dodgename = loadlines(24) + If loadlines(25) = "" Then Else ShiftOSDesktop.downloadmanagername = loadlines(25) + If loadlines(26) = "" Then Else ShiftOSDesktop.installername = loadlines(26) + If loadlines(27) = "" Then Else ShiftOSDesktop.sysinfoname = loadlines(27) + If loadlines(28) = "" Then Else ShiftOSDesktop.floodgatename = loadlines(28) + If loadlines(29) = "" Then Else ShiftOSDesktop.orcwritename = loadlines(29) + If loadlines(30) = "" Then Else ShiftOSDesktop.mazename = loadlines(30) + If loadlines(31) = "" Then Else ShiftOSDesktop.virusscannername = loadlines(31) + loadnames() + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setupdesktop() + End Sub + + Private Sub btnReset_Click(sender As Object, e As EventArgs) Handles btnReset.Click + ShiftOSDesktop.artpadname = "Artpad" + ShiftOSDesktop.audioplayername = "Audio Player" + ShiftOSDesktop.calculatorname = "Calculator" + ShiftOSDesktop.clockname = "Clock" + ShiftOSDesktop.colourpickername = "Colour Picker" + ShiftOSDesktop.fileopenername = "File Opener" + ShiftOSDesktop.filesavername = "File Saver" + ShiftOSDesktop.fileskimmername = "File Skimmer" + ShiftOSDesktop.graphicpickername = "Graphic Picker" + ShiftOSDesktop.knowledgeinputname = "Knowledge Input" + ShiftOSDesktop.pongname = "Pong" + ShiftOSDesktop.shiftername = "Shifter" + ShiftOSDesktop.shiftoriumname = "Shiftorium" + ShiftOSDesktop.skinloadername = "Skin Loader" + ShiftOSDesktop.terminalname = "Terminal" + ShiftOSDesktop.textpadname = "TextPad" + ShiftOSDesktop.videoplayername = "Video Player" + ShiftOSDesktop.webbrowsername = "Web Browser" + ShiftOSDesktop.namechangername = "Name Changer" + ShiftOSDesktop.iconmanagername = "Icon Manager" + ShiftOSDesktop.bitnotewalletname = "Bitnote Wallet" + ShiftOSDesktop.bitnotediggername = "Bitnote Digger" + ShiftOSDesktop.skinshiftername = "Skin Shifter" + ShiftOSDesktop.shiftnetname = "Shiftnet" + ShiftOSDesktop.downloadername = "Downloader" + ShiftOSDesktop.dodgename = "Dodge" + ShiftOSDesktop.downloadmanagername = "Download Manager" + ShiftOSDesktop.installername = "Installer" + ShiftOSDesktop.snakeyname = "Snakey" + ShiftOSDesktop.sysinfoname = "System Information" + ShiftOSDesktop.orcwritename = "OrcWrite" + ShiftOSDesktop.floodgatename = "FloodGate Manager" + ShiftOSDesktop.mazename = "Labyrinth" + ShiftOSDesktop.virusscannername = "Virus Scanner" + loadnames() + loadicons() + applychanges() + End Sub + + Private Sub showboughtitems() + If ShiftOSDesktop.boughtclock = True Then pnlclocksettings.Show() + If ShiftOSDesktop.boughtshifter = True Then pnlshiftersettings.Show() + If ShiftOSDesktop.boughtshifter = True Then pnlcolourpickersettings.Show() + If ShiftOSDesktop.boughtpong = True Then pnlpongsettings.Show() + If ShiftOSDesktop.boughtfileskimmer = True Then pnlfileskimmersettings.Show() + If ShiftOSDesktop.boughtfileskimmer = True Then pnlfileopenersettings.Show() + If ShiftOSDesktop.boughtfileskimmer = True Then pnlfilesaversettings.Show() + If ShiftOSDesktop.boughttextpad = True Then pnltextpadsettings.Show() + If ShiftOSDesktop.boughtskinning = True Then pnlgraphicpickersettings.Show() + If ShiftOSDesktop.boughtskinloader = True Then pnlskinloadersettings.Show() + If ShiftOSDesktop.boughtartpad = True Then pnlartpadsettings.Show() + If ShiftOSDesktop.boughtcalculator = True Then pnlcalculatorsettings.Show() + If ShiftOSDesktop.boughtaudioplayer = True Then pnlaudioplayersettings.Show() + If ShiftOSDesktop.boughtwebbrowser = True Then pnlwebbrowsersettings.Show() + If ShiftOSDesktop.boughtvideoplayer = True Then pnlvideoplayersettings.Show() + If ShiftOSDesktop.boughtnamechanger = True Then pnlnamechangersettings.Show() + If ShiftOSDesktop.boughticonmanager = True Then pnliconmanagersettings.Show() + If ShiftOSDesktop.boughtbitnotewallet = True Then pnlwallet.Show() + If ShiftOSDesktop.boughtbitnotedigger = True Then pnldigger.Show() + If ShiftOSDesktop.boughtskinshifter = True Then pnlskinshifter.Show() + If ShiftOSDesktop.boughtshiftnet = True Then pnlshiftnet.Show() + If ShiftOSDesktop.boughtdownloadmanager = True Then pnldownload.Show() + If ShiftOSDesktop.boughtdodge = True Then pnldodge.Show() + If ShiftOSDesktop.boughtinstaller = True Then pnlinstaller.Show() + If ShiftOSDesktop.installedsysinfo = True Then pnlsysinfo.Show() + If ShiftOSDesktop.boughtorcwrite = True Then pnlorcwrite.Show() + If ShiftOSDesktop.boughtfloodgate = True Then pnlfloodgate.Show() + If ShiftOSDesktop.boughtmaze = True Then pnlmaze.Show() + If ShiftOSDesktop.installedvirusscanner = True Then pnlvirusscanner.Show() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/NewAPI.vb b/ShiftOS/NewAPI.vb new file mode 100644 index 0000000..a4f13e6 --- /dev/null +++ b/ShiftOS/NewAPI.vb @@ -0,0 +1,104 @@ +Module NewAPI + Private Command As String + Private NewModForm As New ModForm + + ' This stores the message and title values for the infobox, since they are created with 2 commands. + Dim modInfoMessage As String = "ShiftOS has been modified to create this infobox, use infobox.message = to customise it." + Dim modInfoTitle As String = "Info from Mod, customise it with infobox.title = " + Dim isInfo As Integer = 0 + ' Tells other programs where to place output files + Public modOutputPath As String + Dim modInPath As String + + Dim WithEvents trmReadModInput As New Timer + + Public Sub ReadModInput(ByVal sender As Object, ByVal e As EventArgs) Handles trmReadModInput.Tick + If My.Computer.FileSystem.FileExists(modInPath) Then + UseCode(modInPath, modOutputPath) + End If + End Sub + + Public Sub OpenModFile(path As String) + ' Mod files are zips containing "config.set" and application files. + My.Computer.FileSystem.DeleteDirectory(ShiftOSDesktop.ShiftOSPath & "\Shiftum42\Temp\ModLoader", FileIO.DeleteDirectoryOption.DeleteAllContents) + My.Computer.FileSystem.CreateDirectory(ShiftOSDesktop.ShiftOSPath & "\Shiftum42\Temp\ModLoader") + + System.IO.Compression.ZipFile.ExtractToDirectory(path, ShiftOSDesktop.ShiftOSPath & "\Shiftum42\Temp\ModLoader") + ' Config contents: line1 = what exe to launch, line2 = path mod with write to, line 3 = folder mod will read from, line4 = connection delay in milliseconds + Dim configdata(3) As String + configdata = System.IO.File.ReadAllLines(ShiftOSDesktop.ShiftOSPath & "\Shiftum42\Temp\ModLoader\config.set") + Try + Process.Start(ShiftOSDesktop.ShiftOSPath & "\Shiftum42\Temp\ModLoader\" & configdata(0)) + modOutputPath = configdata(2) + modInPath = configdata(1) + Catch ex As Exception + infobox.showinfo("Mod Error", "There is an error in the modification's config file. Please contact the developer of you mod. If you are the developer, remember: line1 = what exe to launch, line2 = path mod with write to, line 3 = folder mod will read from, line4 = connection delay in milliseconds") + End Try + trmReadModInput.Interval = configdata(3) + trmReadModInput.Start() + End Sub + + + Public Sub UseCode(ByVal InPath As String, ByVal OutPath As String) + Dim sr As System.IO.StreamReader + + sr = My.Computer.FileSystem.OpenTextFileReader(InPath) + Dim linenum As Integer = IO.File.ReadAllLines(InPath).Length + Dim i As Integer = 1 + While i <= linenum + Command = sr.ReadLine() + DoCommandAPI() + i = i + 1 + End While + sr.Close() + My.Computer.FileSystem.DeleteFile(modInPath) + modOutputPath = OutPath + End Sub + + Private Sub DoCommandAPI() + If Command Like "infobox.title = *" Then + Try + Dim title As String = Command.Substring(16) + modInfoTitle = title + isInfo = isInfo + 1 + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + ElseIf Command Like "infobox.message = *" Then + Try + Dim Message As String = Command.Substring(18) + modInfoMessage = Message + isInfo = isInfo + 1 + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + ElseIf Command Like "codepoints.add = *" Then + Try + Dim CodePointsToAdd As Integer = Command.Substring(17) + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + CodePointsToAdd + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + ElseIf Command Like "bitnotes.add = *" Then + Try + Dim BitNotesToAdd As Integer = Command.Substring(15) + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance + BitNotesToAdd + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + ElseIf Command Like "getcolour.title = *" Then + Try + Dim title As String = Command.Substring(18) + Colour_Picker.colourtochange = title + Colour_Picker.Show() + Colour_Picker.sendToMod = True + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + End If + If isInfo > 2 Then + infobox.showinfo(modInfoTitle, modInfoMessage) + isInfo = 0 + End If + End Sub +End Module diff --git a/ShiftOS/OrcWrite.Designer.vb b/ShiftOS/OrcWrite.Designer.vb new file mode 100644 index 0000000..59ea94c --- /dev/null +++ b/ShiftOS/OrcWrite.Designer.vb @@ -0,0 +1,486 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class OrcWrite + 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() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnltextarea = New System.Windows.Forms.Panel() + Me.RichTextBox1 = New System.Windows.Forms.RichTextBox() + Me.pnlcontrols = New System.Windows.Forms.Panel() + Me.Label5 = New System.Windows.Forms.Label() + Me.Button7 = New System.Windows.Forms.Button() + Me.Label4 = New System.Windows.Forms.Label() + Me.Button6 = New System.Windows.Forms.Button() + Me.Label3 = New System.Windows.Forms.Label() + Me.ComboBox2 = New System.Windows.Forms.ComboBox() + Me.TextBox1 = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.Button5 = New System.Windows.Forms.Button() + Me.Button4 = New System.Windows.Forms.Button() + Me.Button3 = New System.Windows.Forms.Button() + Me.Label2 = New System.Windows.Forms.Label() + Me.Button2 = New System.Windows.Forms.Button() + Me.ComboBox1 = New System.Windows.Forms.ComboBox() + Me.Button1 = New System.Windows.Forms.Button() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.ColorDialog1 = New System.Windows.Forms.ColorDialog() + Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() + Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog() + Me.BindingSource1 = New System.Windows.Forms.BindingSource(Me.components) + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnltextarea.SuspendLayout() + Me.pnlcontrols.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 447) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(796, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 417) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(798, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 419) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(798, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 417) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.pnltextarea) + Me.pgcontents.Controls.Add(Me.pnlcontrols) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(798, 419) + Me.pgcontents.TabIndex = 20 + ' + 'pnltextarea + ' + Me.pnltextarea.Controls.Add(Me.RichTextBox1) + Me.pnltextarea.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnltextarea.Location = New System.Drawing.Point(0, 71) + Me.pnltextarea.Name = "pnltextarea" + Me.pnltextarea.Size = New System.Drawing.Size(798, 348) + Me.pnltextarea.TabIndex = 43 + ' + 'RichTextBox1 + ' + Me.RichTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.RichTextBox1.BulletIndent = 10 + Me.RichTextBox1.Dock = System.Windows.Forms.DockStyle.Fill + Me.RichTextBox1.Font = New System.Drawing.Font("Times New Roman", 11.0!) + Me.RichTextBox1.Location = New System.Drawing.Point(0, 0) + Me.RichTextBox1.Name = "RichTextBox1" + Me.RichTextBox1.Size = New System.Drawing.Size(798, 348) + Me.RichTextBox1.TabIndex = 0 + Me.RichTextBox1.Text = "" + ' + 'pnlcontrols + ' + Me.pnlcontrols.BackColor = System.Drawing.Color.White + Me.pnlcontrols.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlcontrols.Controls.Add(Me.Label5) + Me.pnlcontrols.Controls.Add(Me.Button7) + Me.pnlcontrols.Controls.Add(Me.Label4) + Me.pnlcontrols.Controls.Add(Me.Button6) + Me.pnlcontrols.Controls.Add(Me.Label3) + Me.pnlcontrols.Controls.Add(Me.ComboBox2) + Me.pnlcontrols.Controls.Add(Me.TextBox1) + Me.pnlcontrols.Controls.Add(Me.Label1) + Me.pnlcontrols.Controls.Add(Me.Button5) + Me.pnlcontrols.Controls.Add(Me.Button4) + Me.pnlcontrols.Controls.Add(Me.Button3) + Me.pnlcontrols.Controls.Add(Me.Label2) + Me.pnlcontrols.Controls.Add(Me.Button2) + Me.pnlcontrols.Controls.Add(Me.ComboBox1) + Me.pnlcontrols.Controls.Add(Me.Button1) + Me.pnlcontrols.Dock = System.Windows.Forms.DockStyle.Top + Me.pnlcontrols.Location = New System.Drawing.Point(0, 0) + Me.pnlcontrols.Name = "pnlcontrols" + Me.pnlcontrols.Size = New System.Drawing.Size(798, 71) + Me.pnlcontrols.TabIndex = 30 + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(549, 13) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(51, 13) + Me.Label5.TabIndex = 43 + Me.Label5.Text = "Highlight:" + ' + 'Button7 + ' + Me.Button7.BackColor = System.Drawing.Color.Black + Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button7.Location = New System.Drawing.Point(606, 6) + Me.Button7.Name = "Button7" + Me.Button7.Size = New System.Drawing.Size(29, 23) + Me.Button7.TabIndex = 42 + Me.Button7.UseVisualStyleBackColor = False + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(425, 13) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(34, 13) + Me.Label4.TabIndex = 42 + Me.Label4.Text = "Color:" + ' + 'Button6 + ' + Me.Button6.BackColor = System.Drawing.Color.Black + Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button6.Location = New System.Drawing.Point(470, 6) + Me.Button6.Name = "Button6" + Me.Button6.Size = New System.Drawing.Size(29, 23) + Me.Button6.TabIndex = 41 + Me.Button6.UseVisualStyleBackColor = False + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(203, 13) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(80, 13) + Me.Label3.TabIndex = 40 + Me.Label3.Text = "Text Alignment:" + ' + 'ComboBox2 + ' + Me.ComboBox2.FormattingEnabled = True + Me.ComboBox2.Items.AddRange(New Object() {"Left", "Right", "Center"}) + Me.ComboBox2.Location = New System.Drawing.Point(289, 10) + Me.ComboBox2.Name = "ComboBox2" + Me.ComboBox2.Size = New System.Drawing.Size(121, 21) + Me.ComboBox2.TabIndex = 39 + Me.ComboBox2.Text = "Left" + ' + 'TextBox1 + ' + Me.TextBox1.Location = New System.Drawing.Point(470, 37) + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.Size = New System.Drawing.Size(29, 20) + Me.TextBox1.TabIndex = 38 + Me.TextBox1.Text = "11" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(425, 42) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(30, 13) + Me.Label1.TabIndex = 37 + Me.Label1.Text = "Size:" + ' + 'Button5 + ' + Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button5.Location = New System.Drawing.Point(109, 37) + Me.Button5.Name = "Button5" + Me.Button5.Size = New System.Drawing.Size(62, 23) + Me.Button5.TabIndex = 36 + Me.Button5.Text = "Underline" + Me.Button5.UseVisualStyleBackColor = True + ' + 'Button4 + ' + Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button4.Location = New System.Drawing.Point(60, 37) + Me.Button4.Name = "Button4" + Me.Button4.Size = New System.Drawing.Size(43, 23) + Me.Button4.TabIndex = 35 + Me.Button4.Text = "Italic" + Me.Button4.UseVisualStyleBackColor = True + ' + 'Button3 + ' + Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button3.Location = New System.Drawing.Point(7, 37) + Me.Button3.Name = "Button3" + Me.Button3.Size = New System.Drawing.Size(47, 23) + Me.Button3.TabIndex = 34 + Me.Button3.Text = "Bold" + Me.Button3.UseVisualStyleBackColor = True + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(206, 39) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(57, 13) + Me.Label2.TabIndex = 33 + Me.Label2.Text = "Font Style:" + ' + 'Button2 + ' + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.Location = New System.Drawing.Point(88, 6) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(75, 23) + Me.Button2.TabIndex = 31 + Me.Button2.Text = "Load" + Me.Button2.UseVisualStyleBackColor = True + ' + 'ComboBox1 + ' + Me.ComboBox1.FormattingEnabled = True + Me.ComboBox1.Location = New System.Drawing.Point(289, 36) + Me.ComboBox1.Name = "ComboBox1" + Me.ComboBox1.Size = New System.Drawing.Size(121, 21) + Me.ComboBox1.TabIndex = 32 + Me.ComboBox1.Text = "Times New Roman" + ' + 'Button1 + ' + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(7, 6) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(75, 23) + Me.Button1.TabIndex = 30 + Me.Button1.Text = "Save" + Me.Button1.UseVisualStyleBackColor = True + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 419) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(800, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'OpenFileDialog1 + ' + Me.OpenFileDialog1.FileName = "OpenFileDialog1" + ' + 'BindingSource1 + ' + ' + 'OrcWrite + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(800, 449) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "OrcWrite" + Me.Text = "OrcWrite" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pnltextarea.ResumeLayout(False) + Me.pnlcontrols.ResumeLayout(False) + Me.pnlcontrols.PerformLayout() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pnlcontrols As System.Windows.Forms.Panel + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents Button6 As System.Windows.Forms.Button + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents ComboBox2 As System.Windows.Forms.ComboBox + Friend WithEvents TextBox1 As System.Windows.Forms.TextBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Button5 As System.Windows.Forms.Button + Friend WithEvents Button4 As System.Windows.Forms.Button + Friend WithEvents Button3 As System.Windows.Forms.Button + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Button2 As System.Windows.Forms.Button + Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox + Friend WithEvents Button1 As System.Windows.Forms.Button + Friend WithEvents ColorDialog1 As System.Windows.Forms.ColorDialog + Friend WithEvents BindingSource1 As System.Windows.Forms.BindingSource + Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog + Friend WithEvents SaveFileDialog1 As System.Windows.Forms.SaveFileDialog + Friend WithEvents pnltextarea As System.Windows.Forms.Panel + Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents Button7 As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/OrcWrite.resx b/ShiftOS/OrcWrite.resx new file mode 100644 index 0000000..0225f6f --- /dev/null +++ b/ShiftOS/OrcWrite.resx @@ -0,0 +1,141 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 57</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>111, 57</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>195, 57</value> + </metadata> + <metadata name="ColorDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>308, 57</value> + </metadata> + <metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>568, 57</value> + </metadata> + <metadata name="SaveFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>710, 57</value> + </metadata> + <metadata name="BindingSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>431, 57</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/OrcWrite.vb b/ShiftOS/OrcWrite.vb new file mode 100644 index 0000000..bf6ea73 --- /dev/null +++ b/ShiftOS/OrcWrite.vb @@ -0,0 +1,619 @@ +Public Class OrcWrite + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 600 'replace with minimum size + Public minimumsizeheight As Integer = 200 'replace with minimum size + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.OrcWriteCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonorcwrite.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonorcwrite, ShiftOSDesktop.tborcwriteicon, ShiftOSDesktop.tborcwritetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(800, 449) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.orcwritename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.orcwriteicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Dim CloseOnSave As Boolean + Dim boldStyle As Boolean + Dim italicStyle As Boolean + Dim uStyle As Boolean + Dim bulletStyle As Boolean + Public savepath As String + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + File_Saver.savingprogram = "orcwrite" + File_Saver.saveextention = ".owd" + File_Saver.Show() + End Sub + + Public Sub savedocument() + Dim sw As New IO.StreamWriter(savepath) + sw.Write(RichTextBox1.Rtf) + sw.Close() + CloseOnSave = False + End Sub + + Private Sub AddFonts() + ' Set the default style handler settings + boldStyle = False + italicStyle = False + uStyle = False + bulletStyle = False + + ' -- The below code was stolen from the Shifter thanks to William.1008 -- + ' Get the installed fonts collection. + Dim allFonts As New Drawing.Text.InstalledFontCollection + + ' Get an array of the system's font families. + Dim fontFamilies() As FontFamily = allFonts.Families() + + ' Display the font families. + For Each myFont As FontFamily In fontFamilies + ComboBox1.Items.Add(myFont.Name) + Next 'font_family + End Sub + Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click + File_Opener.openextention = ".owd" + File_Opener.openingprogram = "orcwrite" + File_Opener.Show() + End Sub + + Public Sub openfile(ByVal path As String) + Dim sr As New IO.StreamReader(path) + RichTextBox1.Rtf = sr.ReadToEnd() + sr.Close() + End Sub + + Private Sub Form_IsClosing(sender As Object, e As EventArgs) Handles Me.FormClosing + If CloseOnSave = True Then + infobox.title = "OrcWrite - Unsaved changes" + infobox.textinfo = "It seems that your documents contains unsaved changes. Would you like to saves these changes?" + infobox.showyesno() + infobox.sendyesno = "orcwritesave" + infobox.state = RichTextBox1.Rtf + infobox.Show() + End If + End Sub + + Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load + LoadEverything() + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = 12 + RichTextBox1.SelectionFont = New Font(style, size) + + End Sub + Private Sub LoadEverything() + AddFonts() + ComboBox1.Text = "Microsoft Sans Serif" + TextBox1.Text = "12" + + End Sub + Private Sub BindingSource1_CurrentChanged(sender As Object, e As EventArgs) Handles BindingSource1.CurrentChanged + + End Sub + + Private Sub NumericUpDown1_ValueChanged(sender As Object, e As EventArgs) + + End Sub + + Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = 12 + + RichTextBox1.SelectionFont = New Font(style, size) + + + + End Sub + + Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click + If boldStyle = False Then + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = TextBox1.Text + + RichTextBox1.SelectionFont = New Font(style, size, FontStyle.Bold) + + boldStyle = True + Else + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = TextBox1.Text + + RichTextBox1.SelectionFont = New Font(style, size) + + End If + + End Sub + + Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click + If italicStyle = False Then + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = TextBox1.Text + + RichTextBox1.SelectionFont = New Font(style, size, FontStyle.Italic) + + italicStyle = True + Else + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = TextBox1.Text + + RichTextBox1.SelectionFont = New Font(style, size) + + italicStyle = False + + End If + End Sub + + Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click + If uStyle = False Then + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = TextBox1.Text + + RichTextBox1.SelectionFont = New Font(style, size, FontStyle.Underline) + uStyle = True + Else + Dim style As String = ComboBox1.SelectedItem + Dim size As Integer = TextBox1.Text + + RichTextBox1.SelectionFont = New Font(style, size) + + uStyle = False + + End If + End Sub + + Private Sub txtSize_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged + + Dim size As Integer + + Dim style As String = ComboBox1.SelectedItem + If IsNumeric(TextBox1.Text) Then + size = TextBox1.Text + Else + TextBox1.Text = 12 + size = TextBox1.Text + End If + + RichTextBox1.SelectionFont = New Font(style, size) + + End Sub + + Private Sub RichTextBox1_TextChanged(sender As Object, e As EventArgs) Handles RichTextBox1.TextChanged + CloseOnSave = True + End Sub + + Private Sub ComboBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox2.SelectedIndexChanged + Dim align As HorizontalAlignment = ComboBox2.SelectedIndex + RichTextBox1.SelectionAlignment = align + End Sub + + Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click + ' This code will be replaced with code to change color using the Shift Color Picker. + Colour_Picker.Show() + Colour_Picker.colourtochange = "OrcWrite text colour dono" + End Sub + + Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click + ' This code will be replaced with code to change color using the Shift Color Picker. + Colour_Picker.Show() + Colour_Picker.colourtochange = "OrcWrite text highlight colour dono" + + End Sub + + Private Sub pnlcontrols_Paint(sender As Object, e As PaintEventArgs) Handles pnlcontrols.Paint + + End Sub + + Private Sub titlebar_Paint(sender As Object, e As PaintEventArgs) Handles titlebar.Paint + + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Paths.vb b/ShiftOS/Paths.vb new file mode 100644 index 0000000..e8a3e63 --- /dev/null +++ b/ShiftOS/Paths.vb @@ -0,0 +1,55 @@ +Module Paths + + + + ' Paths: + ' Root path - Paths.root - DO NOT USE UNLESS NECISARY (Opening files from the file skimmer, blocking the user from going above C:\ShiftOS, ect) + ' Software Data - Paths.progdata - This is the base path for all program data. If you are adding a folder to this path, add a variable in here + ' AdvStart - Paths.advda - Stores stuff like recent files, for example if you go to Paths.advstart\Recent in Explorer, you'll see the same files you see in the Advanced AL's Recent section. + ' Knowledge Input Data - Paths.kidata - Knowledge Input uses this to save your lists of words you've found + ' Shiftnet Data - Paths.shiftnetdata - This is where the shiftnet currently saves it's history + ' Download Manager Data - Paths.dnldata - Not sure what this does + ' Save Data - Paths.savedata - The game has it's save file in here + ' Skin Directory - Paths.skindir - Self explanatory. + ' Loaded Skin Directory - Paths.loadedskin - Where the contents of .skn files are extracted to. + ' Sound Directory - Paths.sounddir - Where sound files (such as Infobox chime) are stored, coming soon. + ' Current Skin Directory - Paths.currentskin - ?????????? + ' Home Directory - Paths.home - This is the folder that contains all the user's files + ' Desktop - Paths.desktop - All the files that appear on your desktop should be stored here + ' Documents - Paths.documents - The documents folder is where the user puts their documents + ' Downloads - Paths.downloads - The downloads folder is where the downloader downloads downloads from the Shiftnet + ' Music - Paths.music - The music folder is where the user puts their music + ' Pictures - Paths.pictures - The pictures folder is where the user puts their pictures + ' Skins - Paths.skins - The skins folder is where the user puts their skins + + + + 'Declaration Hierarchy + + Public root As String = "C:\ShiftOS\" 'Do NOT use this unless it is for files that must go DIRECTLY in C:\ShiftOS\ + + Public progdata As String = root & "SoftwareData\" + + Public advdata As String = progdata & "AdvStart\" + Public kidata As String = progdata & "KnowledgeInput\" + Public shiftnetdata As String = progdata & "Shiftnet\" + Public dnldata As String = progdata & "DownloadManager\" + + Public savedata As String = root & "Shiftum42\" + + Public skindir As String = savedata & "Skins\" + + Public loadedskin As String = skindir & "Loaded\" + Public currentskin As String = skindir & "Current\" + + Public sounddir As String = loadedskin & "Sounds\" + + Public home As String = root & "Home\" + + Public desktop As String = home & "Desktop\" + Public documents As String = home & "Documents\" + Public downloads As String = home & "Documents\" + Public music As String = home & "Music\" + Public pictures As String = home & "Pictures\" + Public skins As String = home & "Skins\" +End Module diff --git a/ShiftOS/Pong.Designer.vb b/ShiftOS/Pong.Designer.vb new file mode 100644 index 0000000..c79de46 --- /dev/null +++ b/ShiftOS/Pong.Designer.vb @@ -0,0 +1,750 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Pong + 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() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Pong)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlintro = New System.Windows.Forms.Panel() + Me.Label6 = New System.Windows.Forms.Label() + Me.btnstartgame = New System.Windows.Forms.Button() + Me.Label8 = New System.Windows.Forms.Label() + Me.pnllose = New System.Windows.Forms.Panel() + Me.lblmissedout = New System.Windows.Forms.Label() + Me.btnlosetryagain = New System.Windows.Forms.Button() + Me.Label5 = New System.Windows.Forms.Label() + Me.Label1 = New System.Windows.Forms.Label() + Me.pnlgamestats = New System.Windows.Forms.Panel() + Me.lblnextstats = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.lblpreviousstats = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.btnplayon = New System.Windows.Forms.Button() + Me.Label3 = New System.Windows.Forms.Label() + Me.btncashout = New System.Windows.Forms.Button() + Me.Label2 = New System.Windows.Forms.Label() + Me.lbllevelreached = New System.Windows.Forms.Label() + Me.pnlfinalstats = New System.Windows.Forms.Panel() + Me.btnplayagain = New System.Windows.Forms.Button() + Me.lblfinalcodepoints = New System.Windows.Forms.Label() + Me.Label11 = New System.Windows.Forms.Label() + Me.lblfinalcomputerreward = New System.Windows.Forms.Label() + Me.Label9 = New System.Windows.Forms.Label() + Me.lblfinallevelreward = New System.Windows.Forms.Label() + Me.lblfinallevelreached = New System.Windows.Forms.Label() + Me.lblfinalcodepointswithtext = New System.Windows.Forms.Label() + Me.lblbeatai = New System.Windows.Forms.Label() + Me.lblcountdown = New System.Windows.Forms.Label() + Me.ball = New System.Windows.Forms.Panel() + Me.paddleHuman = New System.Windows.Forms.PictureBox() + Me.paddleComputer = New System.Windows.Forms.Panel() + Me.lbllevelandtime = New System.Windows.Forms.Label() + Me.lblstatscodepoints = New System.Windows.Forms.Label() + Me.lblstatsY = New System.Windows.Forms.Label() + Me.lblstatsX = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.lblstorylinechancedebug = New System.Windows.Forms.Label() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.gameTimer = New System.Windows.Forms.Timer(Me.components) + Me.counter = New System.Windows.Forms.Timer(Me.components) + Me.tmrcountdown = New System.Windows.Forms.Timer(Me.components) + Me.tmrstoryline = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + Me.pnlintro.SuspendLayout() + Me.pnllose.SuspendLayout() + Me.pnlgamestats.SuspendLayout() + Me.pnlfinalstats.SuspendLayout() + CType(Me.paddleHuman, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlintro) + Me.pgcontents.Controls.Add(Me.pnllose) + Me.pgcontents.Controls.Add(Me.pnlgamestats) + Me.pgcontents.Controls.Add(Me.pnlfinalstats) + Me.pgcontents.Controls.Add(Me.lblbeatai) + Me.pgcontents.Controls.Add(Me.lblcountdown) + Me.pgcontents.Controls.Add(Me.ball) + Me.pgcontents.Controls.Add(Me.paddleHuman) + Me.pgcontents.Controls.Add(Me.paddleComputer) + Me.pgcontents.Controls.Add(Me.lbllevelandtime) + Me.pgcontents.Controls.Add(Me.lblstatscodepoints) + Me.pgcontents.Controls.Add(Me.lblstatsY) + Me.pgcontents.Controls.Add(Me.lblstatsX) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(696, 368) + Me.pgcontents.TabIndex = 20 + ' + 'pnlintro + ' + Me.pnlintro.Controls.Add(Me.Label6) + Me.pnlintro.Controls.Add(Me.btnstartgame) + Me.pnlintro.Controls.Add(Me.Label8) + Me.pnlintro.Location = New System.Drawing.Point(52, 29) + Me.pnlintro.Name = "pnlintro" + Me.pnlintro.Size = New System.Drawing.Size(595, 303) + Me.pnlintro.TabIndex = 13 + ' + 'Label6 + ' + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(3, 39) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(589, 227) + Me.Label6.TabIndex = 15 + Me.Label6.Text = resources.GetString("Label6.Text") + Me.Label6.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'btnstartgame + ' + Me.btnstartgame.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnstartgame.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnstartgame.Location = New System.Drawing.Point(186, 273) + Me.btnstartgame.Name = "btnstartgame" + Me.btnstartgame.Size = New System.Drawing.Size(242, 28) + Me.btnstartgame.TabIndex = 15 + Me.btnstartgame.Text = "Click this button to play pong!" + Me.btnstartgame.UseVisualStyleBackColor = True + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.ForeColor = System.Drawing.Color.Black + Me.Label8.Location = New System.Drawing.Point(179, 5) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(250, 31) + Me.Label8.TabIndex = 14 + Me.Label8.Text = "Welcome to Pong!" + ' + 'pnllose + ' + Me.pnllose.Controls.Add(Me.lblmissedout) + Me.pnllose.Controls.Add(Me.btnlosetryagain) + Me.pnllose.Controls.Add(Me.Label5) + Me.pnllose.Controls.Add(Me.Label1) + Me.pnllose.Location = New System.Drawing.Point(209, 71) + Me.pnllose.Name = "pnllose" + Me.pnllose.Size = New System.Drawing.Size(266, 214) + Me.pnllose.TabIndex = 10 + Me.pnllose.Visible = False + ' + 'lblmissedout + ' + Me.lblmissedout.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblmissedout.Location = New System.Drawing.Point(3, 175) + Me.lblmissedout.Name = "lblmissedout" + Me.lblmissedout.Size = New System.Drawing.Size(146, 35) + Me.lblmissedout.TabIndex = 3 + Me.lblmissedout.Text = "You Missed Out On:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "500 Codepoints" + Me.lblmissedout.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnlosetryagain + ' + Me.btnlosetryagain.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnlosetryagain.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnlosetryagain.Location = New System.Drawing.Point(155, 176) + Me.btnlosetryagain.Name = "btnlosetryagain" + Me.btnlosetryagain.Size = New System.Drawing.Size(106, 35) + Me.btnlosetryagain.TabIndex = 2 + Me.btnlosetryagain.Text = "Try Again" + Me.btnlosetryagain.UseVisualStyleBackColor = True + ' + 'Label5 + ' + Me.Label5.Location = New System.Drawing.Point(7, 26) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(260, 163) + Me.Label5.TabIndex = 1 + Me.Label5.Text = resources.GetString("Label5.Text") + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(4, 4) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(265, 16) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Unfortunately you just lost the game..." + ' + 'pnlgamestats + ' + Me.pnlgamestats.Controls.Add(Me.lblnextstats) + Me.pnlgamestats.Controls.Add(Me.Label7) + Me.pnlgamestats.Controls.Add(Me.lblpreviousstats) + Me.pnlgamestats.Controls.Add(Me.Label4) + Me.pnlgamestats.Controls.Add(Me.btnplayon) + Me.pnlgamestats.Controls.Add(Me.Label3) + Me.pnlgamestats.Controls.Add(Me.btncashout) + Me.pnlgamestats.Controls.Add(Me.Label2) + Me.pnlgamestats.Controls.Add(Me.lbllevelreached) + Me.pnlgamestats.Location = New System.Drawing.Point(122, 84) + Me.pnlgamestats.Name = "pnlgamestats" + Me.pnlgamestats.Size = New System.Drawing.Size(466, 206) + Me.pnlgamestats.TabIndex = 6 + Me.pnlgamestats.Visible = False + ' + 'lblnextstats + ' + Me.lblnextstats.AutoSize = True + Me.lblnextstats.Location = New System.Drawing.Point(278, 136) + Me.lblnextstats.Name = "lblnextstats" + Me.lblnextstats.Size = New System.Drawing.Size(119, 52) + Me.lblnextstats.TabIndex = 8 + Me.lblnextstats.Text = "Initial Ball X Speed: 6" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Initial Ball Y Speed: 9" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Increment X Speed: 0.5" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Increme" & _ + "nt Y Speed: 0.9" + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(278, 119) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(124, 16) + Me.Label7.TabIndex = 7 + Me.Label7.Text = "Next Level Stats:" + ' + 'lblpreviousstats + ' + Me.lblpreviousstats.AutoSize = True + Me.lblpreviousstats.Location = New System.Drawing.Point(278, 54) + Me.lblpreviousstats.Name = "lblpreviousstats" + Me.lblpreviousstats.Size = New System.Drawing.Size(119, 52) + Me.lblpreviousstats.TabIndex = 6 + Me.lblpreviousstats.Text = "Initial Ball X Speed: 5" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Initial Ball Y Speed: 7" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Increment X Speed: 0.3" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Increme" & _ + "nt Y Speed: 0.6" + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(278, 37) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(154, 16) + Me.Label4.TabIndex = 5 + Me.Label4.Text = "Previous Level Stats:" + ' + 'btnplayon + ' + Me.btnplayon.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnplayon.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnplayon.Location = New System.Drawing.Point(32, 162) + Me.btnplayon.Name = "btnplayon" + Me.btnplayon.Size = New System.Drawing.Size(191, 35) + Me.btnplayon.TabIndex = 4 + Me.btnplayon.Text = "Play on for 3 codepoints!" + Me.btnplayon.UseVisualStyleBackColor = True + ' + 'Label3 + ' + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(8, 126) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(245, 33) + Me.Label3.TabIndex = 3 + Me.Label3.Text = "Or do you want to try your luck on the next level to increase your reward?" + Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btncashout + ' + Me.btncashout.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btncashout.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btncashout.Location = New System.Drawing.Point(32, 73) + Me.btncashout.Name = "btncashout" + Me.btncashout.Size = New System.Drawing.Size(191, 35) + Me.btncashout.TabIndex = 2 + Me.btncashout.Text = "Cash out with 1 codepoint!" + Me.btncashout.UseVisualStyleBackColor = True + ' + 'Label2 + ' + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(8, 37) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(245, 33) + Me.Label2.TabIndex = 1 + Me.Label2.Text = "Would you like the end the game now and cash out with your reward?" + Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbllevelreached + ' + Me.lbllevelreached.AutoSize = True + Me.lbllevelreached.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbllevelreached.Location = New System.Drawing.Point(149, 6) + Me.lbllevelreached.Name = "lbllevelreached" + Me.lbllevelreached.Size = New System.Drawing.Size(185, 20) + Me.lbllevelreached.TabIndex = 0 + Me.lbllevelreached.Text = "You Reached Level 2!" + ' + 'pnlfinalstats + ' + Me.pnlfinalstats.Controls.Add(Me.btnplayagain) + Me.pnlfinalstats.Controls.Add(Me.lblfinalcodepoints) + Me.pnlfinalstats.Controls.Add(Me.Label11) + Me.pnlfinalstats.Controls.Add(Me.lblfinalcomputerreward) + Me.pnlfinalstats.Controls.Add(Me.Label9) + Me.pnlfinalstats.Controls.Add(Me.lblfinallevelreward) + Me.pnlfinalstats.Controls.Add(Me.lblfinallevelreached) + Me.pnlfinalstats.Controls.Add(Me.lblfinalcodepointswithtext) + Me.pnlfinalstats.Location = New System.Drawing.Point(172, 74) + Me.pnlfinalstats.Name = "pnlfinalstats" + Me.pnlfinalstats.Size = New System.Drawing.Size(362, 226) + Me.pnlfinalstats.TabIndex = 9 + Me.pnlfinalstats.Visible = False + ' + 'btnplayagain + ' + Me.btnplayagain.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnplayagain.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnplayagain.Location = New System.Drawing.Point(5, 194) + Me.btnplayagain.Name = "btnplayagain" + Me.btnplayagain.Size = New System.Drawing.Size(352, 29) + Me.btnplayagain.TabIndex = 16 + Me.btnplayagain.Text = "Click this button to play again!" + Me.btnplayagain.UseVisualStyleBackColor = True + ' + 'lblfinalcodepoints + ' + Me.lblfinalcodepoints.Font = New System.Drawing.Font("Microsoft Sans Serif", 48.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblfinalcodepoints.Location = New System.Drawing.Point(3, 124) + Me.lblfinalcodepoints.Name = "lblfinalcodepoints" + Me.lblfinalcodepoints.Size = New System.Drawing.Size(356, 73) + Me.lblfinalcodepoints.TabIndex = 15 + Me.lblfinalcodepoints.Text = "134 CP" + Me.lblfinalcodepoints.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 21.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label11.Location = New System.Drawing.Point(162, 82) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(33, 33) + Me.Label11.TabIndex = 14 + Me.Label11.Text = "+" + Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblfinalcomputerreward + ' + Me.lblfinalcomputerreward.Font = New System.Drawing.Font("Microsoft Sans Serif", 27.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblfinalcomputerreward.Location = New System.Drawing.Point(193, 72) + Me.lblfinalcomputerreward.Name = "lblfinalcomputerreward" + Me.lblfinalcomputerreward.Size = New System.Drawing.Size(151, 52) + Me.lblfinalcomputerreward.TabIndex = 12 + Me.lblfinalcomputerreward.Text = "34" + Me.lblfinalcomputerreward.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label9 + ' + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(179, 31) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(180, 49) + Me.Label9.TabIndex = 11 + Me.Label9.Text = "Codepoints rewarded for beating the Computer" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblfinallevelreward + ' + Me.lblfinallevelreward.Font = New System.Drawing.Font("Microsoft Sans Serif", 27.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblfinallevelreward.Location = New System.Drawing.Point(12, 72) + Me.lblfinallevelreward.Name = "lblfinallevelreward" + Me.lblfinallevelreward.Size = New System.Drawing.Size(151, 52) + Me.lblfinallevelreward.TabIndex = 10 + Me.lblfinallevelreward.Text = "100" + Me.lblfinallevelreward.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblfinallevelreached + ' + Me.lblfinallevelreached.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblfinallevelreached.Location = New System.Drawing.Point(3, 31) + Me.lblfinallevelreached.Name = "lblfinallevelreached" + Me.lblfinallevelreached.Size = New System.Drawing.Size(170, 49) + Me.lblfinallevelreached.TabIndex = 9 + Me.lblfinallevelreached.Text = "Codepoints rewarded for reaching level 10" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + Me.lblfinallevelreached.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblfinalcodepointswithtext + ' + Me.lblfinalcodepointswithtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblfinalcodepointswithtext.Location = New System.Drawing.Point(3, 2) + Me.lblfinalcodepointswithtext.Name = "lblfinalcodepointswithtext" + Me.lblfinalcodepointswithtext.Size = New System.Drawing.Size(356, 26) + Me.lblfinalcodepointswithtext.TabIndex = 1 + Me.lblfinalcodepointswithtext.Text = "You cashed out with 134 codepoints!" + Me.lblfinalcodepointswithtext.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblbeatai + ' + Me.lblbeatai.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbeatai.Location = New System.Drawing.Point(47, 41) + Me.lblbeatai.Name = "lblbeatai" + Me.lblbeatai.Size = New System.Drawing.Size(600, 30) + Me.lblbeatai.TabIndex = 8 + Me.lblbeatai.Text = "You got 2 codepoints for beating the Computer!" + Me.lblbeatai.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + Me.lblbeatai.Visible = False + ' + 'lblcountdown + ' + Me.lblcountdown.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblcountdown.Location = New System.Drawing.Point(182, 152) + Me.lblcountdown.Name = "lblcountdown" + Me.lblcountdown.Size = New System.Drawing.Size(315, 49) + Me.lblcountdown.TabIndex = 7 + Me.lblcountdown.Text = "3" + Me.lblcountdown.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + Me.lblcountdown.Visible = False + ' + 'ball + ' + Me.ball.BackColor = System.Drawing.Color.Black + Me.ball.Location = New System.Drawing.Point(300, 152) + Me.ball.Name = "ball" + Me.ball.Size = New System.Drawing.Size(20, 20) + Me.ball.TabIndex = 2 + ' + 'paddleHuman + ' + Me.paddleHuman.BackColor = System.Drawing.Color.Black + Me.paddleHuman.Location = New System.Drawing.Point(10, 134) + Me.paddleHuman.Name = "paddleHuman" + Me.paddleHuman.Size = New System.Drawing.Size(20, 100) + Me.paddleHuman.TabIndex = 3 + Me.paddleHuman.TabStop = False + ' + 'paddleComputer + ' + Me.paddleComputer.BackColor = System.Drawing.Color.Black + Me.paddleComputer.Location = New System.Drawing.Point(666, 134) + Me.paddleComputer.Name = "paddleComputer" + Me.paddleComputer.Size = New System.Drawing.Size(20, 100) + Me.paddleComputer.TabIndex = 1 + ' + 'lbllevelandtime + ' + Me.lbllevelandtime.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbllevelandtime.Location = New System.Drawing.Point(6, 3) + Me.lbllevelandtime.Name = "lbllevelandtime" + Me.lbllevelandtime.Size = New System.Drawing.Size(684, 22) + Me.lbllevelandtime.TabIndex = 4 + Me.lbllevelandtime.Text = "Level: 1 - 58 Seconds Left" + Me.lbllevelandtime.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblstatscodepoints + ' + Me.lblstatscodepoints.Font = New System.Drawing.Font("Georgia", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblstatscodepoints.Location = New System.Drawing.Point(237, 335) + Me.lblstatscodepoints.Name = "lblstatscodepoints" + Me.lblstatscodepoints.Size = New System.Drawing.Size(219, 35) + Me.lblstatscodepoints.TabIndex = 12 + Me.lblstatscodepoints.Text = "Codepoints: " + Me.lblstatscodepoints.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblstatsY + ' + Me.lblstatsY.Font = New System.Drawing.Font("Georgia", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblstatsY.Location = New System.Drawing.Point(541, 335) + Me.lblstatsY.Name = "lblstatsY" + Me.lblstatsY.Size = New System.Drawing.Size(144, 35) + Me.lblstatsY.TabIndex = 11 + Me.lblstatsY.Text = "Yspeed:" + Me.lblstatsY.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblstatsX + ' + Me.lblstatsX.Font = New System.Drawing.Font("Georgia", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblstatsX.Location = New System.Drawing.Point(6, 335) + Me.lblstatsX.Name = "lblstatsX" + Me.lblstatsX.Size = New System.Drawing.Size(144, 35) + Me.lblstatsX.TabIndex = 5 + Me.lblstatsX.Text = "Xspeed: " + Me.lblstatsX.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 370) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 368) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(698, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 370) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 368) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.lblstorylinechancedebug) + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(700, 30) + Me.titlebar.TabIndex = 19 + ' + 'lblstorylinechancedebug + ' + Me.lblstorylinechancedebug.AutoSize = True + Me.lblstorylinechancedebug.Location = New System.Drawing.Point(473, 8) + Me.lblstorylinechancedebug.Name = "lblstorylinechancedebug" + Me.lblstorylinechancedebug.Size = New System.Drawing.Size(121, 13) + Me.lblstorylinechancedebug.TabIndex = 25 + Me.lblstorylinechancedebug.Text = "lblstorylinechancedebug" + Me.lblstorylinechancedebug.Visible = False + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconPong + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(47, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Pong" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(698, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 398) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(696, 2) + Me.pgbottom.TabIndex = 23 + ' + 'gameTimer + ' + Me.gameTimer.Interval = 30 + ' + 'counter + ' + Me.counter.Interval = 1000 + ' + 'tmrcountdown + ' + Me.tmrcountdown.Interval = 1000 + ' + 'tmrstoryline + ' + Me.tmrstoryline.Interval = 1000 + ' + 'Pong + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(700, 400) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.DoubleBuffered = True + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Pong" + Me.Text = "Pong" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnlintro.ResumeLayout(False) + Me.pnlintro.PerformLayout() + Me.pnllose.ResumeLayout(False) + Me.pnllose.PerformLayout() + Me.pnlgamestats.ResumeLayout(False) + Me.pnlgamestats.PerformLayout() + Me.pnlfinalstats.ResumeLayout(False) + Me.pnlfinalstats.PerformLayout() + CType(Me.paddleHuman, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents ball As System.Windows.Forms.Panel + Friend WithEvents paddleComputer As System.Windows.Forms.Panel + Friend WithEvents gameTimer As System.Windows.Forms.Timer + Friend WithEvents paddleHuman As System.Windows.Forms.PictureBox + Friend WithEvents lbllevelandtime As System.Windows.Forms.Label + Friend WithEvents lblstatsX As System.Windows.Forms.Label + Friend WithEvents counter As System.Windows.Forms.Timer + Friend WithEvents pnlgamestats As System.Windows.Forms.Panel + Friend WithEvents lblnextstats As System.Windows.Forms.Label + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents lblpreviousstats As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents btnplayon As System.Windows.Forms.Button + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents btncashout As System.Windows.Forms.Button + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents lbllevelreached As System.Windows.Forms.Label + Friend WithEvents lblcountdown As System.Windows.Forms.Label + Friend WithEvents tmrcountdown As System.Windows.Forms.Timer + Friend WithEvents lblbeatai As System.Windows.Forms.Label + Friend WithEvents pnlfinalstats As System.Windows.Forms.Panel + Friend WithEvents btnplayagain As System.Windows.Forms.Button + Friend WithEvents lblfinalcodepoints As System.Windows.Forms.Label + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents lblfinalcomputerreward As System.Windows.Forms.Label + Friend WithEvents Label9 As System.Windows.Forms.Label + Friend WithEvents lblfinallevelreward As System.Windows.Forms.Label + Friend WithEvents lblfinallevelreached As System.Windows.Forms.Label + Friend WithEvents lblfinalcodepointswithtext As System.Windows.Forms.Label + Friend WithEvents pnllose As System.Windows.Forms.Panel + Friend WithEvents lblmissedout As System.Windows.Forms.Label + Friend WithEvents btnlosetryagain As System.Windows.Forms.Button + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents lblstatscodepoints As System.Windows.Forms.Label + Friend WithEvents lblstatsY As System.Windows.Forms.Label + Friend WithEvents pnlintro As System.Windows.Forms.Panel + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents btnstartgame As System.Windows.Forms.Button + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents tmrstoryline As System.Windows.Forms.Timer + Friend WithEvents lblstorylinechancedebug As System.Windows.Forms.Label +End Class diff --git a/ShiftOS/Pong.resx b/ShiftOS/Pong.resx new file mode 100644 index 0000000..e92bf0c --- /dev/null +++ b/ShiftOS/Pong.resx @@ -0,0 +1,149 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <data name="Label6.Text" xml:space="preserve"> + <value>Pong was a very popular arcade game made back in 1972. It simulates a game of table tennis in which you must use your paddle as a shield to prevent the ball moving past it. At the same time a computer controlled paddle will attempt to prevent the ball from passing itself. + +This ShiftOS version of Pong is similar but slightly different to the original version of Pong. In this game you start at level 1 and must survive a whole minute without letting the ball pass your paddle. + +If you survive the minute you will earn some codepoints and be given the option to cash out with them or play on with the next level to earn more codepoints. You earn bonus codepoints if you manage to get the ball past the computer paddle. The higher the level the faster the ball will move! + +The higher the level the more codepoints you will get for beating it. You must be careful though as you have no lives. If the ball passes your paddle you start all the way back at level 1 and lose all codepoints earned in that game of Pong. So don't forget to cash out when it gets too difficult!</value> + </data> + <data name="Label5.Text" xml:space="preserve"> + <value>You played on for as long as you could, took a risk, moved forward but sadly didn't know when to give up and safely cashout with a reward. + +Remember you have no lives in this version of pong. This is a game of endurance and if you can't make it to the next level all codepoints earned since you started this game of pong are lost. + +If you think you are ready to try again then click the button below. Don't blow it this time! +</value> + </data> + <metadata name="gameTimer.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> + <metadata name="counter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>130, 17</value> + </metadata> + <metadata name="tmrcountdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>223, 17</value> + </metadata> + <metadata name="tmrstoryline.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>355, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Pong.vb b/ShiftOS/Pong.vb new file mode 100644 index 0000000..ee99e6f --- /dev/null +++ b/ShiftOS/Pong.vb @@ -0,0 +1,743 @@ +Public Class Pong + Public oldsize As Integer + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + + Dim RolledUp As Boolean = False + Dim rndInst As New Random() ' Random instance + Dim xVel As Single = 7 + Dim yVel As Single = 8 + Dim computerspeed = 8 + Dim rand As New Random + Dim level As Integer = 1 + Dim secondsleft As Integer = 60 + Dim casualposition As Integer + Dim xveldec As Double = 3.0 + Dim yveldec As Double = 3.0 + Dim incrementx As Double = 0.4 + Dim incrementy As Double = 0.2 + Dim levelxspeed As Integer = 3 + Dim levelyspeed As Integer = 3 + Dim beatairewardtotal As Integer + Dim beataireward As Integer = 1 + Dim levelrewards(50) As Integer + Dim totalreward As Integer + Dim countdown As Integer = 3 + Dim paused As Boolean = False + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.PongCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + setuplevelrewards() + + If ShiftOSDesktop.boughtgray4 = True And ShiftOSDesktop.boughtshiftnet = False Then tmrstoryline.Start() + + ShiftOSDesktop.pnlpanelbuttonpong.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonpong, ShiftOSDesktop.tbpongicon, ShiftOSDesktop.tbpongtext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(700, 400) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.pongname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtpongicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.pongicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + ' Move the paddle according to the mouse position. + Private Sub pongMain_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove, pgcontents.MouseMove, titlebar.MouseMove, ball.MouseMove, paddleComputer.MouseMove, paddleHuman.MouseMove, lblstatsX.MouseMove, lbllevelandtime.MouseMove, lblstatsY.MouseMove, lblstatscodepoints.MouseMove, pnlintro.MouseMove, Label6.MouseMove, Label8.MouseMove, btnstartgame.MouseMove + paddleHuman.Location = New Point(paddleHuman.Location.X, (MousePosition.Y - Me.Location.Y - ShiftOSDesktop.titlebarheight - ShiftOSDesktop.windowbordersize) - (paddleHuman.Height / 2)) + End Sub + + Private Sub gameTimer_Tick(sender As Object, e As EventArgs) Handles gameTimer.Tick + + 'Set the computer player to move according to the ball's position. + If ball.Location.X > 500 - xVel * 10 AndAlso xVel > 0 Then + If ball.Location.Y > paddleComputer.Location.Y + 50 Then + paddleComputer.Location = New Point(paddleComputer.Location.X, paddleComputer.Location.Y + computerspeed) + End If + If ball.Location.Y < paddleComputer.Location.Y + 50 Then + paddleComputer.Location = New Point(paddleComputer.Location.X, paddleComputer.Location.Y - computerspeed) + End If + casualposition = rand.Next(-150, 201) + Else + If paddleComputer.Location.Y > Me.Size.Height / 2 - paddleComputer.Height + casualposition Then 'used to be me.location.y + paddleComputer.Location = New Point(paddleComputer.Location.X, paddleComputer.Location.Y - computerspeed) + End If + If paddleComputer.Location.Y < Me.Size.Height / 2 - paddleComputer.Height + casualposition Then 'used to be me.location.y + paddleComputer.Location = New Point(paddleComputer.Location.X, paddleComputer.Location.Y + computerspeed) + End If + End If + + 'Set Xvel and Yvel speeds from decimal + If xVel > 0 Then xVel = Math.Round(xveldec) + If xVel < 0 Then xVel = -Math.Round(xveldec) + If yVel > 0 Then yVel = Math.Round(yveldec) + If yVel < 0 Then yVel = -Math.Round(yveldec) + + ' Move the game ball. + ball.Location = New Point(ball.Location.X + xVel, ball.Location.Y + yVel) + + ' Check for top wall. + If ball.Location.Y < 0 Then + ball.Location = New Point(ball.Location.X, 0) + yVel = -yVel + End If + + ' Check for bottom wall. + If ball.Location.Y > Me.Height - ball.Size.Height - titlebar.Height - pgbottom.Height Then + ball.Location = New Point(ball.Location.X, Me.Height - ball.Size.Height - titlebar.Height - pgbottom.Height) + yVel = -yVel + End If + + ' Check for player paddle. + If ball.Bounds.IntersectsWith(paddleHuman.Bounds) Then + ball.Location = New Point(paddleHuman.Location.X + ball.Size.Width, ball.Location.Y) + 'randomly increase x or y speed of ball + Select Case rand.Next(1, 3) + Case 1 + xveldec = xveldec + incrementx + Case 2 + If yveldec > 0 Then yveldec = yveldec + incrementy + If yveldec < 0 Then yveldec = yveldec - incrementy + End Select + xVel = -xVel + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + End If + + ' Check for computer paddle. + If ball.Bounds.IntersectsWith(paddleComputer.Bounds) Then + ball.Location = New Point(paddleComputer.Location.X - paddleComputer.Size.Width + 1, ball.Location.Y) + xveldec = xveldec + incrementx + xVel = -xVel + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + End If + + ' Check for left wall. + If ball.Location.X < -100 Then + ball.Location = New Point(Me.Size.Width / 2 + 200, Me.Size.Height / 2) + paddleComputer.Location = New Point(paddleComputer.Location.X, ball.Location.Y) + If xVel > 0 Then xVel = -xVel + pnllose.Show() + gameTimer.Stop() + counter.Stop() + lblmissedout.Text = "You Missed Out On:" & Environment.NewLine & levelrewards(level - 1) + beatairewardtotal & " Codepoints" + End If + + ' Check for right wall. + If ball.Location.X > Me.Width - ball.Size.Width - paddleComputer.Width + 100 Then + ball.Location = New Point(Me.Size.Width / 2 + 200, Me.Size.Height / 2) + paddleComputer.Location = New Point(paddleComputer.Location.X, ball.Location.Y) + If xVel > 0 Then xVel = -xVel + beatairewardtotal = beatairewardtotal + beataireward + lblbeatai.Show() + lblbeatai.Text = "You got " & beataireward & " codepoints for beating the Computer!" + tmrcountdown.Start() + gameTimer.Stop() + counter.Stop() + End If + + 'lblstats.Text = "Xspeed: " & Math.Abs(xVel) & " Yspeed: " & Math.Abs(yVel) & " Human Location: " & paddleHuman.Location.ToString & " Computer Location: " & paddleComputer.Location.ToString & Environment.NewLine & " Ball Location: " & ball.Location.ToString & " Xdec: " & xveldec & " Ydec: " & yveldec & " Xinc: " & incrementx & " Yinc: " & incrementy + lblstatsX.Text = "Xspeed: " & xveldec + lblstatsY.Text = "Yspeed: " & yveldec + lblstatscodepoints.Text = "Codepoints earned: " & levelrewards(level - 1) + beatairewardtotal + + lbllevelandtime.Text = "Level: " & level & " - " & secondsleft & " Seconds Left" + + If xVel > 20 OrElse xVel < -20 Then + paddleHuman.Width = Math.Abs(xVel) + paddleComputer.Width = Math.Abs(xVel) + Else + paddleHuman.Width = 20 + paddleComputer.Width = 20 + End If + + computerspeed = Math.Abs(yVel) + + ' pgcontents.Refresh() + ' pgcontents.CreateGraphics.FillRectangle(Brushes.Black, ball.Location.X, ball.Location.Y, ball.Width, ball.Height) + + End Sub + + Private Sub counter_Tick(sender As Object, e As EventArgs) Handles counter.Tick + secondsleft = secondsleft - 1 + If secondsleft = -1 Then + secondsleft = 60 + level = level + 1 + generatenextlevel() + pnlgamestats.Show() + counter.Stop() + gameTimer.Stop() + End If + lblstatscodepoints.Text = "Codepoints earned: " & levelrewards(level - 1) + beatairewardtotal + End Sub + + Private Sub btnplayon_Click(sender As Object, e As EventArgs) Handles btnplayon.Click + xveldec = levelxspeed + yveldec = levelyspeed + + secondsleft = 60 + + tmrcountdown.Start() + lblbeatai.Text = "Get " & beataireward & " codepoints for beating the Computer!" + pnlgamestats.Hide() + lblbeatai.Show() + ball.Location = New Point(paddleHuman.Location.X + paddleHuman.Width + 50, paddleHuman.Location.Y + paddleHuman.Height / 2) + If xVel < 0 Then xVel = Math.Abs(xVel) + lbllevelandtime.Text = "Level: " & level & " - " & secondsleft & " Seconds Left" + End Sub + + 'Increase the ball speed stats for the next level + Private Sub generatenextlevel() + lbllevelreached.Text = "You Reached Level " & level & "!" + + lblpreviousstats.Text = "Initial Ball X Speed: " & levelxspeed & Environment.NewLine & _ + "Initial Ball Y Speed: " & levelyspeed & Environment.NewLine & _ + "Increment X Speed: " & incrementx & Environment.NewLine & _ + "Increment Y Speed: " & incrementy + + Select Case rand.Next(1, 3) + Case 1 + levelxspeed = levelxspeed + 1 + Case 2 + levelxspeed = levelxspeed + 2 + End Select + + Select Case rand.Next(1, 3) + Case 1 + levelyspeed = levelyspeed + 1 + Case 2 + levelyspeed = levelyspeed + 2 + End Select + + Select Case rand.Next(1, 6) + Case 1 + incrementx = incrementx + 0.1 + Case 2 + incrementx = incrementx + 0.2 + Case 3 + incrementy = incrementy + 0.1 + Case 4 + incrementy = incrementy + 0.2 + Case 5 + incrementy = incrementy + 0.3 + End Select + + lblnextstats.Text = "Initial Ball X Speed: " & levelxspeed & Environment.NewLine & _ + "Initial Ball Y Speed: " & levelyspeed & Environment.NewLine & _ + "Increment X Speed: " & incrementx & Environment.NewLine & _ + "Increment Y Speed: " & incrementy + + If level < 15 Then + beataireward = level * 2 + Else + beataireward = Math.Round(levelrewards(level) / 10) + End If + + totalreward = levelrewards(level - 1) + beatairewardtotal + + btncashout.Text = "Cash out with " & totalreward & " codepoints!" + btnplayon.Text = "Play on for " & levelrewards(level) + beatairewardtotal & " codepoints!" + End Sub + + Private Sub setuplevelrewards() + levelrewards(0) = 0 + levelrewards(1) = 1 + levelrewards(2) = 3 + levelrewards(3) = 7 + levelrewards(4) = 13 + levelrewards(5) = 20 + levelrewards(6) = 30 + levelrewards(7) = 45 + levelrewards(8) = 60 + levelrewards(9) = 80 + levelrewards(10) = 100 + levelrewards(11) = 125 + levelrewards(12) = 150 + levelrewards(13) = 200 + levelrewards(14) = 250 + levelrewards(15) = 300 + levelrewards(16) = 400 + levelrewards(17) = 500 + levelrewards(18) = 650 + levelrewards(19) = 800 + levelrewards(20) = 1000 + levelrewards(21) = 1250 + levelrewards(22) = 1600 + levelrewards(23) = 2000 + levelrewards(24) = 2500 + levelrewards(25) = 3000 + levelrewards(26) = 3750 + levelrewards(27) = 4500 + levelrewards(28) = 5500 + levelrewards(29) = 7000 + levelrewards(30) = 9000 + levelrewards(31) = 11000 + levelrewards(32) = 13500 + levelrewards(33) = 16000 + levelrewards(34) = 20000 + levelrewards(35) = 25000 + levelrewards(36) = 32000 + levelrewards(37) = 40000 + levelrewards(38) = 50000 + levelrewards(39) = 75000 + levelrewards(40) = 100000 + End Sub + + Private Sub countdown_Tick(sender As Object, e As EventArgs) Handles tmrcountdown.Tick + Select Case countdown + Case 0 + countdown = 3 + lblcountdown.Hide() + lblbeatai.Hide() + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + gameTimer.Start() + counter.Start() + tmrcountdown.Stop() + Case 1 + lblcountdown.Text = "1" + countdown = countdown - 1 + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 2 + lblcountdown.Text = "2" + countdown = countdown - 1 + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 3 + lblcountdown.Text = "3" + countdown = countdown - 1 + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + lblcountdown.Show() + End Select + End Sub + + Private Sub btncashout_Click(sender As Object, e As EventArgs) Handles btncashout.Click + pnlgamestats.Hide() + pnlfinalstats.Show() + lblfinalcodepointswithtext.Text = "You cashed out with " & totalreward & " codepoints!" + lblfinallevelreached.Text = "Codepoints rewarded for reaching level " & level - 1 + lblfinallevelreward.Text = levelrewards(level - 1) + lblfinalcomputerreward.Text = beatairewardtotal + lblfinalcodepoints.Text = totalreward & " CP" + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + totalreward + End Sub + + Private Sub newgame() + pnlfinalstats.Hide() + pnllose.Hide() + pnlintro.Hide() + + level = 1 + totalreward = 0 + beataireward = 2 + beatairewardtotal = 0 + secondsleft = 60 + lblstatscodepoints.Text = "Codepoints: " 'reset stats text + lblstatsX.Text = "Xspeed: " + lblstatsY.Text = "Yspeed: " + + levelxspeed = 3 + levelyspeed = 3 + + incrementx = 0.4 + incrementy = 0.2 + + xveldec = levelxspeed + yveldec = levelyspeed + + tmrcountdown.Start() + lblbeatai.Text = "Get " & beataireward & " codepoints for beating the Computer!" + pnlgamestats.Hide() + lblbeatai.Show() + ball.Location = New Point(paddleHuman.Location.X + paddleHuman.Width + 50, paddleHuman.Location.Y + paddleHuman.Height / 2) + If xVel < 0 Then xVel = Math.Abs(xVel) + lbllevelandtime.Text = "Level: " & level & " - " & secondsleft & " Seconds Left" + End Sub + + Private Sub btnplayagain_Click(sender As Object, e As EventArgs) Handles btnplayagain.Click + newgame() + End Sub + + Private Sub btnlosetryagain_Click(sender As Object, e As EventArgs) Handles btnlosetryagain.Click + newgame() + End Sub + + Private Sub btnstartgame_Click(sender As Object, e As EventArgs) Handles btnstartgame.Click + newgame() + End Sub + + Dim chance As Integer = 101 + Private Sub tmrstoryline_Tick(sender As Object, e As EventArgs) Handles tmrstoryline.Tick + ' Random chance of showing getshiftnet storyline + If gameTimer.Enabled = False Then ' Can't show if in middle of game + chance = chance - 1 + If chance < 25 Then + chance = 25 + End If + Dim i As Integer = Math.Ceiling(Rnd() * chance) + lblstorylinechancedebug.Text = i + If i = 1 Then + Terminal.Show() + Terminal.BringToFront() + Terminal.storyline = "getshiftnet" + Terminal.tmrstorylineupdate.Start() + tmrstoryline.Stop() + End If + End If + End Sub + + Private Sub me_closing() Handles Me.FormClosing + tmrstoryline.Stop() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/PreviewCustomColorTable.vb b/ShiftOS/PreviewCustomColorTable.vb new file mode 100644 index 0000000..6ce3d83 --- /dev/null +++ b/ShiftOS/PreviewCustomColorTable.vb @@ -0,0 +1,330 @@ +' <auto-generated> +' This code was generated by the .NET ToolStrip Customizer. +' http://toolstripcustomizer.codeplex.com/ +' </auto-generated> + +Imports System.Drawing +Imports System.Windows.Forms + +Namespace MyNamespace + Class PreviewCustomColorTable + Inherits ProfessionalColorTable + Public Overrides ReadOnly Property ButtonSelectedHighlight() As Color + Get + Return ButtonSelectedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedHighlightBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedHighlight() As Color + Get + Return ButtonPressedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedHighlightBorder() As Color + Get + Return ButtonPressedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedHighlight() As Color + Get + Return ButtonCheckedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedHighlightBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedBorder() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckSelectedBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckPressedBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property GripDark() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property GripLight() As Color + Get + Return Color.FromName("White") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientBegin() As Color + Get + Return Color.FromArgb(Shifter.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientMiddle() As Color + Get + Return Color.FromArgb(Shifter.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientEnd() As Color + Get + Return Color.FromArgb(Shifter.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property MenuStripGradientBegin() As Color + Get + If Shifter.skinapplauncherbutton(1) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuStripGradientEnd() As Color + Get + If Shifter.skinapplauncherbutton(1) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelected() As Color + Get + Return Color.FromArgb(Shifter.applaunchermouseovercolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property MenuItemBorder() As Color + Get + If Shifter.skinapplauncherbutton(1) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuBorder() As Color + Get + If Shifter.skinapplauncherbutton(1) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelectedGradientBegin() As Color + Get + If Shifter.skinapplauncherbutton(1) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelectedGradientEnd() As Color + Get + If Shifter.skinapplauncherbutton(1) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttoncolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientBegin() As Color + Get + 'remember this is for clicking the button, the below must be changed in the future + If Shifter.skinapplauncherbutton(2) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttonclickedcolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientMiddle() As Color + Get + If Shifter.skinapplauncherbutton(2) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttonclickedcolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientEnd() As Color + Get + If Shifter.skinapplauncherbutton(2) Is Nothing Then + Return Color.FromArgb(Shifter.applauncherbuttonclickedcolour.ToArgb) + Else + Return Color.Transparent + End If + End Get + End Property + Public Overrides ReadOnly Property RaftingContainerGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property RaftingContainerGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property SeparatorDark() As Color + Get + Return Color.FromName("Black") + End Get + End Property + Public Overrides ReadOnly Property SeparatorLight() As Color + Get + Return Color.FromName("ButtonHighlight") + End Get + End Property + Public Overrides ReadOnly Property StatusStripGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property StatusStripGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property ToolStripBorder() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripDropDownBackground() As Color + Get + Return Color.FromArgb(Shifter.applauncherbackgroundcolour.ToArgb) + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripContentPanelGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property ToolStripContentPanelGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property ToolStripPanelGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property ToolStripPanelGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientBegin() As Color + Get + Return Color.FromArgb(255, 245, 245, 245) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientMiddle() As Color + Get + Return Color.FromArgb(255, 242, 242, 242) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + End Class +End Namespace \ No newline at end of file diff --git a/ShiftOS/ProgressBarEX.Designer.vb b/ShiftOS/ProgressBarEX.Designer.vb new file mode 100644 index 0000000..8232dc2 --- /dev/null +++ b/ShiftOS/ProgressBarEX.Designer.vb @@ -0,0 +1,29 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class ProgressBarEX + Inherits System.Windows.Forms.UserControl + + 'UserControl 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() + components = New System.ComponentModel.Container() + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + End Sub + +End Class diff --git a/ShiftOS/ProgressBarEX.vb b/ShiftOS/ProgressBarEX.vb new file mode 100644 index 0000000..6bf1c1b --- /dev/null +++ b/ShiftOS/ProgressBarEX.vb @@ -0,0 +1,275 @@ + +Public Class ProgressBarEX + +#Region " Properties " + + Private _Value As Integer = 0 + Public Property Value() As Integer + Get + Return _Value + End Get + Set(ByVal value As Integer) + If value >= Me.MinValue And value <= Me.MaxValue Then + _Value = value + Me.Invalidate() + Else + Throw New ArgumentOutOfRangeException("The value must be between the minimum and maximum values.") + End If + End Set + End Property + + Private _Step As Integer = 10 + Public Property [Step]() As Integer + Get + Return _Step + End Get + Set(ByVal value As Integer) + _Step = value + End Set + End Property + + Private _Orientation As ProgressBarOrientation + Public Property Orientation() As ProgressBarOrientation + Get + Return _Orientation + End Get + Set(ByVal value As ProgressBarOrientation) + _Orientation = value + End Set + End Property + + Private _MinValue As Integer = 0 + Public Property MinValue() As Integer + Get + Return _MinValue + End Get + Set(ByVal value As Integer) + If value < Me.MaxValue Then + _MinValue = value + Else + Throw New ArgumentOutOfRangeException("The minimum value must be less than the maximum value.") + End If + End Set + End Property + + Private _MaxValue As Integer = 100 + Public Property MaxValue() As Integer + Get + Return _MaxValue + End Get + Set(ByVal value As Integer) + If value > Me.MinValue Then + _MaxValue = value + Else + Throw New ArgumentOutOfRangeException("The maximum value must be more than the minimum value.") + End If + End Set + End Property + + Private _Color As Color = Color.Lime + Public Property Color() As Color + Get + Return _Color + End Get + Set(ByVal value As Color) + _Color = value + End Set + End Property + + Private _ShowValue As Boolean = True + Public Property ShowValue() As Boolean + Get + Return _ShowValue + End Get + Set(ByVal value As Boolean) + _ShowValue = value + End Set + End Property + + Private _Style As ProgressBarExStyle + Public Property Style() As ProgressBarExStyle + Get + Return _Style + End Get + Set(ByVal value As ProgressBarExStyle) + _Style = value + End Set + End Property + + Private _BlockWidth As Integer = 5 + Public Property BlockWidth() As Integer + Get + Return _BlockWidth + End Get + Set(ByVal value As Integer) + _BlockWidth = value + End Set + End Property + + Private _BlockSeparation As Integer = 3 + Public Property BlockSeparation() As Integer + Get + Return _BlockSeparation + End Get + Set(ByVal value As Integer) + _BlockSeparation = value + End Set + End Property + +#End Region + +#Region " Enums, Variables " + + Public Enum ProgressBarOrientation + Horizontal = 0 + Vertical = 1 + End Enum + + Public Enum ProgressBarExStyle + Blocks = 0 + Continuous = 1 + Marquee = 2 + End Enum + +#End Region + +#Region " Events " + + Public Event PaintBackground(ByVal sender As Object, ByVal e As PaintEventArgs) + Public Event PaintProcess(ByVal sender As Object, ByVal e As ProgressBarProcessPaintEventArgs) + + Public Class ProgressBarProcessPaintEventArgs + Inherits EventArgs + + Public Sub New(ByVal bounds As Rectangle, ByVal g As Graphics, Optional ByVal blocks() As Rectangle = Nothing) + _Bounds = bounds + _Graphics = g + If blocks Is Nothing Then + _Blocks = New Rectangle() {} + Else + _Blocks = blocks + End If + End Sub + + Private _Bounds As Rectangle + Public ReadOnly Property Bounds() As Rectangle + Get + Return _Bounds + End Get + End Property + + Private _Blocks As Rectangle() + Public ReadOnly Property Blocks() As Rectangle() + Get + Return _Blocks + End Get + End Property + + Private _Graphics As Graphics + Public ReadOnly Property Graphics() As Graphics + Get + Return _Graphics + End Get + End Property + + End Class + +#End Region + +#Region " Methods " + + Public Sub PerformStep() + If Me.Step > 0 Then + Me.Value = Math.Min(Me.Value + Me.Step, Me.MaxValue) + Else + Me.Value = Math.Max(Me.Value + Me.Step, Me.MinValue) + End If + End Sub + + Public Sub Increment(ByVal value As Integer) + If value > 0 Then + Me.Value = Math.Min(Me.Value + value, Me.MaxValue) + Else + Me.Value = Math.Max(Me.Value + value, Me.MinValue) + End If + End Sub + +#End Region + +#Region " Process Logic " + + Private Function GetProcessRect() As Rectangle + Dim w As Integer = Me.Width + Dim h As Integer = Me.Height + Dim valRel As Integer = GetRelativeValue() + Return New Rectangle(0, 0, w * valRel \ 100, h) + End Function + + Private Function GetBlocks() As Rectangle() + Dim b As New List(Of Rectangle) + + Dim w As Integer = Me.BlockWidth + Dim h As Integer = Me.Height + Dim r As Rectangle + + Dim x As Integer = 0 + Dim stopX As Integer = CInt((GetRelativeValue() / 100) * Me.Width) + While (x + w <= stopX) + r = New Rectangle(x, 0, w, h) + b.Add(r) + + x += Me.BlockWidth + Me.BlockSeparation + End While + + Return b.ToArray + End Function + + Private Function GetRelativeValue() As Integer + Return CInt(100 * Me.Value / (Me.MaxValue - Me.MinValue)) + End Function + +#End Region + +#Region " Drawing " + + Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs) + MyBase.OnPaint(e) + DoPaintBackground(e.Graphics) + DoPaintProcess(e.Graphics) + If Me.ShowValue Then DoPaintValue(e.Graphics) + End Sub + + Private Sub DoPaintBackground(ByVal g As Graphics) + RaiseEvent PaintBackground(Me, New PaintEventArgs(g, Me.ClientRectangle)) + End Sub + + Private Sub DoPaintProcess(ByVal g As Graphics) + Dim rect As Rectangle = GetProcessRect() + Dim blocks() As Rectangle = GetBlocks() + Using brush As New SolidBrush(Me.Color) + If Me.Style = ProgressBarExStyle.Continuous Then + g.FillRectangle(brush, rect) + ElseIf Me.Style = ProgressBarExStyle.Blocks Then + For Each b As Rectangle In blocks + g.FillRectangle(brush, b) + Next + End If + End Using + + Dim e As New ProgressBarProcessPaintEventArgs(rect, g, blocks) + RaiseEvent PaintProcess(Me, e) + End Sub + + Private Sub DoPaintValue(ByVal g As Graphics) + Dim valStr As String = GetRelativeValue.ToString & "%" + Dim sf As New StringFormat() + sf.Alignment = StringAlignment.Center + Dim s As SizeF = g.MeasureString(valStr, Me.Font) + + g.DrawString(valStr, Me.Font, New SolidBrush(Me.ForeColor), (Me.Width - s.Width) / 2, (Me.Height - s.Height) / 2) + End Sub + +#End Region + +End Class + diff --git a/ShiftOS/QuickChatStory.Designer.vb b/ShiftOS/QuickChatStory.Designer.vb new file mode 100644 index 0000000..9a3dbfe --- /dev/null +++ b/ShiftOS/QuickChatStory.Designer.vb @@ -0,0 +1,37 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class QuickChatStory + 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() + Me.SuspendLayout() + ' + 'QuickChatStory + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(284, 261) + Me.Name = "QuickChatStory" + Me.Text = "QuickChatStory" + Me.ResumeLayout(False) + + End Sub +End Class diff --git a/ShiftOS/QuickChatStory.resx b/ShiftOS/QuickChatStory.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/QuickChatStory.resx @@ -0,0 +1,120 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> +</root> \ No newline at end of file diff --git a/ShiftOS/QuickChatStory.vb b/ShiftOS/QuickChatStory.vb new file mode 100644 index 0000000..6a0f910 --- /dev/null +++ b/ShiftOS/QuickChatStory.vb @@ -0,0 +1,89 @@ +Public Class QuickChatStory + + Dim UndecidedName As String = "Hacker101" + Public i = 0 + Public qcmain() As String = {UndecidedName & " joined", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + UndecidedName & " > Hi", _ + "Marattiopsida", _ + "Polypodiopsida"} + + Private Sub QuickChatStory_Load(sender As Object, e As EventArgs) Handles MyBase.Load + MsgBox("Hacker") + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Resources/3beepvirus.wav b/ShiftOS/Resources/3beepvirus.wav new file mode 100644 index 0000000..c1af078 Binary files /dev/null and b/ShiftOS/Resources/3beepvirus.wav differ diff --git a/ShiftOS/Resources/ArtPadOval.png b/ShiftOS/Resources/ArtPadOval.png new file mode 100644 index 0000000..fceec4c Binary files /dev/null and b/ShiftOS/Resources/ArtPadOval.png differ diff --git a/ShiftOS/Resources/ArtPadRectangle.png b/ShiftOS/Resources/ArtPadRectangle.png new file mode 100644 index 0000000..d9e2aa2 Binary files /dev/null and b/ShiftOS/Resources/ArtPadRectangle.png differ diff --git a/ShiftOS/Resources/ArtPadcirclerubber.png b/ShiftOS/Resources/ArtPadcirclerubber.png new file mode 100644 index 0000000..f7331e2 Binary files /dev/null and b/ShiftOS/Resources/ArtPadcirclerubber.png differ diff --git a/ShiftOS/Resources/ArtPadcirclerubberselected.png b/ShiftOS/Resources/ArtPadcirclerubberselected.png new file mode 100644 index 0000000..17f0416 Binary files /dev/null and b/ShiftOS/Resources/ArtPadcirclerubberselected.png differ diff --git a/ShiftOS/Resources/ArtPaderacer.png b/ShiftOS/Resources/ArtPaderacer.png new file mode 100644 index 0000000..051718c Binary files /dev/null and b/ShiftOS/Resources/ArtPaderacer.png differ diff --git a/ShiftOS/Resources/ArtPadfloodfill.png b/ShiftOS/Resources/ArtPadfloodfill.png new file mode 100644 index 0000000..487585c Binary files /dev/null and b/ShiftOS/Resources/ArtPadfloodfill.png differ diff --git a/ShiftOS/Resources/ArtPadlinetool.png b/ShiftOS/Resources/ArtPadlinetool.png new file mode 100644 index 0000000..eb7329b Binary files /dev/null and b/ShiftOS/Resources/ArtPadlinetool.png differ diff --git a/ShiftOS/Resources/ArtPadmagnify.png b/ShiftOS/Resources/ArtPadmagnify.png new file mode 100644 index 0000000..1310233 Binary files /dev/null and b/ShiftOS/Resources/ArtPadmagnify.png differ diff --git a/ShiftOS/Resources/ArtPadnew.png b/ShiftOS/Resources/ArtPadnew.png new file mode 100644 index 0000000..e1dc34f Binary files /dev/null and b/ShiftOS/Resources/ArtPadnew.png differ diff --git a/ShiftOS/Resources/ArtPadopen.png b/ShiftOS/Resources/ArtPadopen.png new file mode 100644 index 0000000..9dc232b Binary files /dev/null and b/ShiftOS/Resources/ArtPadopen.png differ diff --git a/ShiftOS/Resources/ArtPadpaintbrush.png b/ShiftOS/Resources/ArtPadpaintbrush.png new file mode 100644 index 0000000..c26ac3b Binary files /dev/null and b/ShiftOS/Resources/ArtPadpaintbrush.png differ diff --git a/ShiftOS/Resources/ArtPadpencil.png b/ShiftOS/Resources/ArtPadpencil.png new file mode 100644 index 0000000..cf230e2 Binary files /dev/null and b/ShiftOS/Resources/ArtPadpencil.png differ diff --git a/ShiftOS/Resources/ArtPadpixelplacer.png b/ShiftOS/Resources/ArtPadpixelplacer.png new file mode 100644 index 0000000..4cc338b Binary files /dev/null and b/ShiftOS/Resources/ArtPadpixelplacer.png differ diff --git a/ShiftOS/Resources/ArtPadredo.png b/ShiftOS/Resources/ArtPadredo.png new file mode 100644 index 0000000..ef42439 Binary files /dev/null and b/ShiftOS/Resources/ArtPadredo.png differ diff --git a/ShiftOS/Resources/ArtPadsave.png b/ShiftOS/Resources/ArtPadsave.png new file mode 100644 index 0000000..5a31d05 Binary files /dev/null and b/ShiftOS/Resources/ArtPadsave.png differ diff --git a/ShiftOS/Resources/ArtPadsquarerubber.png b/ShiftOS/Resources/ArtPadsquarerubber.png new file mode 100644 index 0000000..16391ef Binary files /dev/null and b/ShiftOS/Resources/ArtPadsquarerubber.png differ diff --git a/ShiftOS/Resources/ArtPadsquarerubberselected.png b/ShiftOS/Resources/ArtPadsquarerubberselected.png new file mode 100644 index 0000000..5991242 Binary files /dev/null and b/ShiftOS/Resources/ArtPadsquarerubberselected.png differ diff --git a/ShiftOS/Resources/ArtPadtexttool.png b/ShiftOS/Resources/ArtPadtexttool.png new file mode 100644 index 0000000..a669a6d Binary files /dev/null and b/ShiftOS/Resources/ArtPadtexttool.png differ diff --git a/ShiftOS/Resources/ArtPadundo.png b/ShiftOS/Resources/ArtPadundo.png new file mode 100644 index 0000000..6484122 Binary files /dev/null and b/ShiftOS/Resources/ArtPadundo.png differ diff --git a/ShiftOS/Resources/AxInterop.WMPLib.dll b/ShiftOS/Resources/AxInterop.WMPLib.dll new file mode 100644 index 0000000..0d8a4ce Binary files /dev/null and b/ShiftOS/Resources/AxInterop.WMPLib.dll differ diff --git a/ShiftOS/Resources/BitnotesAcceptedHereLogo.bmp b/ShiftOS/Resources/BitnotesAcceptedHereLogo.bmp new file mode 100644 index 0000000..100bfd1 Binary files /dev/null and b/ShiftOS/Resources/BitnotesAcceptedHereLogo.bmp differ diff --git a/ShiftOS/Resources/CatalystGrammar.xml b/ShiftOS/Resources/CatalystGrammar.xml new file mode 100644 index 0000000..b082a0d --- /dev/null +++ b/ShiftOS/Resources/CatalystGrammar.xml @@ -0,0 +1,42 @@ +<?xml version="1.0" encoding="UTF-8" ?> +<grammar version="1.0" xml:lang="en-US" + xmlns="http://www.w3.org/2001/06/grammar" + tag-format="semantics/1.0" root="Main"> + + <!-- Catalyst Grammar File + + This file gives Catalyst the ability to recognize + audio input and give a proper response. + + --> + + <rule id="Main"> + <item> + How much Code Points do I have? + </item> + <item>Can you run <ruleref uri="#programs"/>?</item> + <item>Can you minimize <ruleref uri="#programs"/>?</item> + <item>Can you close <ruleref uri="#programs"/>?</item> + </rule> + + <rule id="programs" scope="public"> + <one-of> + <item> Terminal</item> + <item> Knowledge Input</item> + <item> Pong</item> + <item> Shiftorium</item> + <item> Shifter</item> + <item> Labyrinth</item> + <item> Web Browser</item> + <item> Shiftnet</item> + <item> Skin Loader</item> + <item> Skin Shifter</item> + <item> Artpad</item> + <item> TextPad</item> + <item> OrcWrite</item> + <item> File Skimmer</item> + <item> Name Changer</item> + <item> Icon Manager</item> + </one-of> + </rule> +</grammar> \ No newline at end of file diff --git a/ShiftOS/Resources/DSC01042.JPG b/ShiftOS/Resources/DSC01042.JPG new file mode 100644 index 0000000..bebf8a3 Binary files /dev/null and b/ShiftOS/Resources/DSC01042.JPG differ diff --git a/ShiftOS/Resources/DesktopPlusPlusAbout.txt b/ShiftOS/Resources/DesktopPlusPlusAbout.txt new file mode 100644 index 0000000..cce539a --- /dev/null +++ b/ShiftOS/Resources/DesktopPlusPlusAbout.txt @@ -0,0 +1,7 @@ +Desktop++ v1.0 + +Ever wanted to have a useful desktop with icons? Icons that can open files, websites or other content? Icons that can be dragged across the screen any way you like? Well, Desktop++ is for you. Desktop++ constantly scans 'C:/ShiftOS/Home/Desktop' and creates an icon for each file and folder within. + +Desktop++ also allows you to change between Icon and Tile view, where Tile view gives more information, and Icon View allows simplicity and draggability. It also allows you to dump a Text File containing the specs of your PC. The possibilities are endless. + +By using Desktop++, you agree that we send anonymous usability data directly to DevX. diff --git a/ShiftOS/Resources/Gray Shades.png b/ShiftOS/Resources/Gray Shades.png new file mode 100644 index 0000000..70945bc Binary files /dev/null and b/ShiftOS/Resources/Gray Shades.png differ diff --git a/ShiftOS/Resources/Industrial.skn b/ShiftOS/Resources/Industrial.skn new file mode 100644 index 0000000..680f4e7 Binary files /dev/null and b/ShiftOS/Resources/Industrial.skn differ diff --git a/ShiftOS/Resources/Interop.WMPLib.dll b/ShiftOS/Resources/Interop.WMPLib.dll new file mode 100644 index 0000000..d53b3b9 Binary files /dev/null and b/ShiftOS/Resources/Interop.WMPLib.dll differ diff --git a/ShiftOS/Resources/Linux Mint 7.skn b/ShiftOS/Resources/Linux Mint 7.skn new file mode 100644 index 0000000..bc275d5 Binary files /dev/null and b/ShiftOS/Resources/Linux Mint 7.skn differ diff --git a/ShiftOS/Resources/Minimatchbackground.png b/ShiftOS/Resources/Minimatchbackground.png new file mode 100644 index 0000000..ccb8569 Binary files /dev/null and b/ShiftOS/Resources/Minimatchbackground.png differ diff --git a/ShiftOS/Resources/Receive.png b/ShiftOS/Resources/Receive.png new file mode 100644 index 0000000..ded20a0 Binary files /dev/null and b/ShiftOS/Resources/Receive.png differ diff --git a/ShiftOS/Resources/ReceiveClicked.png b/ShiftOS/Resources/ReceiveClicked.png new file mode 100644 index 0000000..f5f968b Binary files /dev/null and b/ShiftOS/Resources/ReceiveClicked.png differ diff --git a/ShiftOS/Resources/Send.png b/ShiftOS/Resources/Send.png new file mode 100644 index 0000000..f4e4302 Binary files /dev/null and b/ShiftOS/Resources/Send.png differ diff --git a/ShiftOS/Resources/SendClicked.png b/ShiftOS/Resources/SendClicked.png new file mode 100644 index 0000000..807f785 Binary files /dev/null and b/ShiftOS/Resources/SendClicked.png differ diff --git a/ShiftOS/Resources/ShiftOS License.txt b/ShiftOS/Resources/ShiftOS License.txt new file mode 100644 index 0000000..2ee227c --- /dev/null +++ b/ShiftOS/Resources/ShiftOS License.txt @@ -0,0 +1,201 @@ +Apache License + Version 2.0, January 2004 + http://www.apache.org/licenses/ + + TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION + + 1. Definitions. + + "License" shall mean the terms and conditions for use, reproduction, + and distribution as defined by Sections 1 through 9 of this document. + + "Licensor" shall mean the copyright owner or entity authorized by + the copyright owner that is granting the License. + + "Legal Entity" shall mean the union of the acting entity and all + other entities that control, are controlled by, or are under common + control with that entity. For the purposes of this definition, + "control" means (i) the power, direct or indirect, to cause the + direction or management of such entity, whether by contract or + otherwise, or (ii) ownership of fifty percent (50%) or more of the + outstanding shares, or (iii) beneficial ownership of such entity. + + "You" (or "Your") shall mean an individual or Legal Entity + exercising permissions granted by this License. + + "Source" form shall mean the preferred form for making modifications, + including but not limited to software source code, documentation + source, and configuration files. + + "Object" form shall mean any form resulting from mechanical + transformation or translation of a Source form, including but + not limited to compiled object code, generated documentation, + and conversions to other media types. + + "Work" shall mean the work of authorship, whether in Source or + Object form, made available under the License, as indicated by a + copyright notice that is included in or attached to the work + (an example is provided in the Appendix below). + + "Derivative Works" shall mean any work, whether in Source or Object + form, that is based on (or derived from) the Work and for which the + editorial revisions, annotations, elaborations, or other modifications + represent, as a whole, an original work of authorship. For the purposes + of this License, Derivative Works shall not include works that remain + separable from, or merely link (or bind by name) to the interfaces of, + the Work and Derivative Works thereof. + + "Contribution" shall mean any work of authorship, including + the original version of the Work and any modifications or additions + to that Work or Derivative Works thereof, that is intentionally + submitted to Licensor for inclusion in the Work by the copyright owner + or by an individual or Legal Entity authorized to submit on behalf of + the copyright owner. For the purposes of this definition, "submitted" + means any form of electronic, verbal, or written communication sent + to the Licensor or its representatives, including but not limited to + communication on electronic mailing lists, source code control systems, + and issue tracking systems that are managed by, or on behalf of, the + Licensor for the purpose of discussing and improving the Work, but + excluding communication that is conspicuously marked or otherwise + designated in writing by the copyright owner as "Not a Contribution." + + "Contributor" shall mean Licensor and any individual or Legal Entity + on behalf of whom a Contribution has been received by Licensor and + subsequently incorporated within the Work. + + 2. Grant of Copyright License. Subject to the terms and conditions of + this License, each Contributor hereby grants to You a perpetual, + worldwide, non-exclusive, no-charge, royalty-free, irrevocable + copyright license to reproduce, prepare Derivative Works of, + publicly display, publicly perform, sublicense, and distribute the + Work and such Derivative Works in Source or Object form. + + 3. Grant of Patent License. Subject to the terms and conditions of + this License, each Contributor hereby grants to You a perpetual, + worldwide, non-exclusive, no-charge, royalty-free, irrevocable + (except as stated in this section) patent license to make, have made, + use, offer to sell, sell, import, and otherwise transfer the Work, + where such license applies only to those patent claims licensable + by such Contributor that are necessarily infringed by their + Contribution(s) alone or by combination of their Contribution(s) + with the Work to which such Contribution(s) was submitted. If You + institute patent litigation against any entity (including a + cross-claim or counterclaim in a lawsuit) alleging that the Work + or a Contribution incorporated within the Work constitutes direct + or contributory patent infringement, then any patent licenses + granted to You under this License for that Work shall terminate + as of the date such litigation is filed. + + 4. Redistribution. You may reproduce and distribute copies of the + Work or Derivative Works thereof in any medium, with or without + modifications, and in Source or Object form, provided that You + meet the following conditions: + + (a) You must give any other recipients of the Work or + Derivative Works a copy of this License; and + + (b) You must cause any modified files to carry prominent notices + stating that You changed the files; and + + (c) You must retain, in the Source form of any Derivative Works + that You distribute, all copyright, patent, trademark, and + attribution notices from the Source form of the Work, + excluding those notices that do not pertain to any part of + the Derivative Works; and + + (d) If the Work includes a "NOTICE" text file as part of its + distribution, then any Derivative Works that You distribute must + include a readable copy of the attribution notices contained + within such NOTICE file, excluding those notices that do not + pertain to any part of the Derivative Works, in at least one + of the following places: within a NOTICE text file distributed + as part of the Derivative Works; within the Source form or + documentation, if provided along with the Derivative Works; or, + within a display generated by the Derivative Works, if and + wherever such third-party notices normally appear. The contents + of the NOTICE file are for informational purposes only and + do not modify the License. You may add Your own attribution + notices within Derivative Works that You distribute, alongside + or as an addendum to the NOTICE text from the Work, provided + that such additional attribution notices cannot be construed + as modifying the License. + + You may add Your own copyright statement to Your modifications and + may provide additional or different license terms and conditions + for use, reproduction, or distribution of Your modifications, or + for any such Derivative Works as a whole, provided Your use, + reproduction, and distribution of the Work otherwise complies with + the conditions stated in this License. + + 5. Submission of Contributions. Unless You explicitly state otherwise, + any Contribution intentionally submitted for inclusion in the Work + by You to the Licensor shall be under the terms and conditions of + this License, without any additional terms or conditions. + Notwithstanding the above, nothing herein shall supersede or modify + the terms of any separate license agreement you may have executed + with Licensor regarding such Contributions. + + 6. Trademarks. This License does not grant permission to use the trade + names, trademarks, service marks, or product names of the Licensor, + except as required for reasonable and customary use in describing the + origin of the Work and reproducing the content of the NOTICE file. + + 7. Disclaimer of Warranty. Unless required by applicable law or + agreed to in writing, Licensor provides the Work (and each + Contributor provides its Contributions) on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or + implied, including, without limitation, any warranties or conditions + of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A + PARTICULAR PURPOSE. You are solely responsible for determining the + appropriateness of using or redistributing the Work and assume any + risks associated with Your exercise of permissions under this License. + + 8. Limitation of Liability. In no event and under no legal theory, + whether in tort (including negligence), contract, or otherwise, + unless required by applicable law (such as deliberate and grossly + negligent acts) or agreed to in writing, shall any Contributor be + liable to You for damages, including any direct, indirect, special, + incidental, or consequential damages of any character arising as a + result of this License or out of the use or inability to use the + Work (including but not limited to damages for loss of goodwill, + work stoppage, computer failure or malfunction, or any and all + other commercial damages or losses), even if such Contributor + has been advised of the possibility of such damages. + + 9. Accepting Warranty or Additional Liability. While redistributing + the Work or Derivative Works thereof, You may choose to offer, + and charge a fee for, acceptance of support, warranty, indemnity, + or other liability obligations and/or rights consistent with this + License. However, in accepting such obligations, You may act only + on Your own behalf and on Your sole responsibility, not on behalf + of any other Contributor, and only if You agree to indemnify, + defend, and hold each Contributor harmless for any liability + incurred by, or claims asserted against, such Contributor by reason + of your accepting any such warranty or additional liability. + + END OF TERMS AND CONDITIONS + + APPENDIX: How to apply the Apache License to your work. + + To apply the Apache License to your work, attach the following + boilerplate notice, with the fields enclosed by brackets "{}" + replaced with your own identifying information. (Don't include + the brackets!) The text should be enclosed in the appropriate + comment syntax for the file format. We also recommend that a + file or class name and description of purpose be included on the + same "printed page" as the copyright notice for easier + identification within third-party archives. + + Copyright 2015 ShiftOS + + Licensed under the Apache License, Version 2.0 (the "License"); + you may not use this file except in compliance with the License. + You may obtain a copy of the License at + + http://www.apache.org/licenses/LICENSE-2.0 + + Unless required by applicable law or agreed to in writing, software + distributed under the License is distributed on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + See the License for the specific language governing permissions and + limitations under the License. diff --git a/ShiftOS/Resources/Symbolinfo.png b/ShiftOS/Resources/Symbolinfo.png new file mode 100644 index 0000000..659d9b3 Binary files /dev/null and b/ShiftOS/Resources/Symbolinfo.png differ diff --git a/ShiftOS/Resources/TotalBalanceClicked.png b/ShiftOS/Resources/TotalBalanceClicked.png new file mode 100644 index 0000000..18ef996 Binary files /dev/null and b/ShiftOS/Resources/TotalBalanceClicked.png differ diff --git a/ShiftOS/Resources/TotalBalanceUnclicked.png b/ShiftOS/Resources/TotalBalanceUnclicked.png new file mode 100644 index 0000000..0968413 Binary files /dev/null and b/ShiftOS/Resources/TotalBalanceUnclicked.png differ diff --git a/ShiftOS/Resources/anycolourshade.png b/ShiftOS/Resources/anycolourshade.png new file mode 100644 index 0000000..70d12b7 Binary files /dev/null and b/ShiftOS/Resources/anycolourshade.png differ diff --git a/ShiftOS/Resources/anycolourshade2.png b/ShiftOS/Resources/anycolourshade2.png new file mode 100644 index 0000000..9494e3a Binary files /dev/null and b/ShiftOS/Resources/anycolourshade2.png differ diff --git a/ShiftOS/Resources/anycolourshade3.png b/ShiftOS/Resources/anycolourshade3.png new file mode 100644 index 0000000..a71abb0 Binary files /dev/null and b/ShiftOS/Resources/anycolourshade3.png differ diff --git a/ShiftOS/Resources/anycolourshade4.png b/ShiftOS/Resources/anycolourshade4.png new file mode 100644 index 0000000..b33644b Binary files /dev/null and b/ShiftOS/Resources/anycolourshade4.png differ diff --git a/ShiftOS/Resources/appscapeaudioplayerbox.png b/ShiftOS/Resources/appscapeaudioplayerbox.png new file mode 100644 index 0000000..1dd4096 Binary files /dev/null and b/ShiftOS/Resources/appscapeaudioplayerbox.png differ diff --git a/ShiftOS/Resources/appscapeaudioplayerprice.png b/ShiftOS/Resources/appscapeaudioplayerprice.png new file mode 100644 index 0000000..5700c24 Binary files /dev/null and b/ShiftOS/Resources/appscapeaudioplayerprice.png differ diff --git a/ShiftOS/Resources/appscapeaudioplayerpricepressed.png b/ShiftOS/Resources/appscapeaudioplayerpricepressed.png new file mode 100644 index 0000000..d79c687 Binary files /dev/null and b/ShiftOS/Resources/appscapeaudioplayerpricepressed.png differ diff --git a/ShiftOS/Resources/appscapecalculator.png b/ShiftOS/Resources/appscapecalculator.png new file mode 100644 index 0000000..c08f92d Binary files /dev/null and b/ShiftOS/Resources/appscapecalculator.png differ diff --git a/ShiftOS/Resources/appscapecalculatorprice.png b/ShiftOS/Resources/appscapecalculatorprice.png new file mode 100644 index 0000000..36402e4 Binary files /dev/null and b/ShiftOS/Resources/appscapecalculatorprice.png differ diff --git a/ShiftOS/Resources/appscapecalculatorpricepressed.png b/ShiftOS/Resources/appscapecalculatorpricepressed.png new file mode 100644 index 0000000..fc815b8 Binary files /dev/null and b/ShiftOS/Resources/appscapecalculatorpricepressed.png differ diff --git a/ShiftOS/Resources/appscapedepositbitnotewalletscreenshot.png b/ShiftOS/Resources/appscapedepositbitnotewalletscreenshot.png new file mode 100644 index 0000000..6a47f38 Binary files /dev/null and b/ShiftOS/Resources/appscapedepositbitnotewalletscreenshot.png differ diff --git a/ShiftOS/Resources/appscapedepositinfo.png b/ShiftOS/Resources/appscapedepositinfo.png new file mode 100644 index 0000000..8d5c7ca Binary files /dev/null and b/ShiftOS/Resources/appscapedepositinfo.png differ diff --git a/ShiftOS/Resources/appscapedepositnowbutton.png b/ShiftOS/Resources/appscapedepositnowbutton.png new file mode 100644 index 0000000..fc99814 Binary files /dev/null and b/ShiftOS/Resources/appscapedepositnowbutton.png differ diff --git a/ShiftOS/Resources/appscapedownloadbutton.png b/ShiftOS/Resources/appscapedownloadbutton.png new file mode 100644 index 0000000..1ffaf7f Binary files /dev/null and b/ShiftOS/Resources/appscapedownloadbutton.png differ diff --git a/ShiftOS/Resources/appscapeinfoaudioplayertext.png b/ShiftOS/Resources/appscapeinfoaudioplayertext.png new file mode 100644 index 0000000..4143b03 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfoaudioplayertext.png differ diff --git a/ShiftOS/Resources/appscapeinfoaudioplayervisualpreview.png b/ShiftOS/Resources/appscapeinfoaudioplayervisualpreview.png new file mode 100644 index 0000000..b3bbbed Binary files /dev/null and b/ShiftOS/Resources/appscapeinfoaudioplayervisualpreview.png differ diff --git a/ShiftOS/Resources/appscapeinfobackbutton.png b/ShiftOS/Resources/appscapeinfobackbutton.png new file mode 100644 index 0000000..6025099 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfobackbutton.png differ diff --git a/ShiftOS/Resources/appscapeinfobutton.png b/ShiftOS/Resources/appscapeinfobutton.png new file mode 100644 index 0000000..41d9331 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfobutton.png differ diff --git a/ShiftOS/Resources/appscapeinfobuttonpressed.png b/ShiftOS/Resources/appscapeinfobuttonpressed.png new file mode 100644 index 0000000..148958c Binary files /dev/null and b/ShiftOS/Resources/appscapeinfobuttonpressed.png differ diff --git a/ShiftOS/Resources/appscapeinfobuybutton.png b/ShiftOS/Resources/appscapeinfobuybutton.png new file mode 100644 index 0000000..cbbe4d3 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfobuybutton.png differ diff --git a/ShiftOS/Resources/appscapeinfocalculatortext.png b/ShiftOS/Resources/appscapeinfocalculatortext.png new file mode 100644 index 0000000..7833187 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfocalculatortext.png differ diff --git a/ShiftOS/Resources/appscapeinfocalculatorvisualpreview.png b/ShiftOS/Resources/appscapeinfocalculatorvisualpreview.png new file mode 100644 index 0000000..00ad970 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfocalculatorvisualpreview.png differ diff --git a/ShiftOS/Resources/appscapeinfoorcwritetext.png b/ShiftOS/Resources/appscapeinfoorcwritetext.png new file mode 100644 index 0000000..fe02672 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfoorcwritetext.png differ diff --git a/ShiftOS/Resources/appscapeinfoorcwritevisualpreview.png b/ShiftOS/Resources/appscapeinfoorcwritevisualpreview.png new file mode 100644 index 0000000..5e7fe03 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfoorcwritevisualpreview.png differ diff --git a/ShiftOS/Resources/appscapeinfovideoplayertext.png b/ShiftOS/Resources/appscapeinfovideoplayertext.png new file mode 100644 index 0000000..b73d5c9 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfovideoplayertext.png differ diff --git a/ShiftOS/Resources/appscapeinfovideoplayervisualpreview.png b/ShiftOS/Resources/appscapeinfovideoplayervisualpreview.png new file mode 100644 index 0000000..f22d6cc Binary files /dev/null and b/ShiftOS/Resources/appscapeinfovideoplayervisualpreview.png differ diff --git a/ShiftOS/Resources/appscapeinfowebbrowsertext.png b/ShiftOS/Resources/appscapeinfowebbrowsertext.png new file mode 100644 index 0000000..27155d4 Binary files /dev/null and b/ShiftOS/Resources/appscapeinfowebbrowsertext.png differ diff --git a/ShiftOS/Resources/appscapeinfowebbrowservisualpreview.png b/ShiftOS/Resources/appscapeinfowebbrowservisualpreview.png new file mode 100644 index 0000000..008e11e Binary files /dev/null and b/ShiftOS/Resources/appscapeinfowebbrowservisualpreview.png differ diff --git a/ShiftOS/Resources/appscapemoresoftware.png b/ShiftOS/Resources/appscapemoresoftware.png new file mode 100644 index 0000000..915ef8c Binary files /dev/null and b/ShiftOS/Resources/appscapemoresoftware.png differ diff --git a/ShiftOS/Resources/appscapeorcwrite.png b/ShiftOS/Resources/appscapeorcwrite.png new file mode 100644 index 0000000..0145ef7 Binary files /dev/null and b/ShiftOS/Resources/appscapeorcwrite.png differ diff --git a/ShiftOS/Resources/appscapetitlebanner.png b/ShiftOS/Resources/appscapetitlebanner.png new file mode 100644 index 0000000..4ca5d5f Binary files /dev/null and b/ShiftOS/Resources/appscapetitlebanner.png differ diff --git a/ShiftOS/Resources/appscapeundefinedprice.png b/ShiftOS/Resources/appscapeundefinedprice.png new file mode 100644 index 0000000..80573ef Binary files /dev/null and b/ShiftOS/Resources/appscapeundefinedprice.png differ diff --git a/ShiftOS/Resources/appscapeundefinedpricepressed.png b/ShiftOS/Resources/appscapeundefinedpricepressed.png new file mode 100644 index 0000000..deea443 Binary files /dev/null and b/ShiftOS/Resources/appscapeundefinedpricepressed.png differ diff --git a/ShiftOS/Resources/appscapevideoplayer.png b/ShiftOS/Resources/appscapevideoplayer.png new file mode 100644 index 0000000..4b07adc Binary files /dev/null and b/ShiftOS/Resources/appscapevideoplayer.png differ diff --git a/ShiftOS/Resources/appscapevideoplayerprice.png b/ShiftOS/Resources/appscapevideoplayerprice.png new file mode 100644 index 0000000..ef9b139 Binary files /dev/null and b/ShiftOS/Resources/appscapevideoplayerprice.png differ diff --git a/ShiftOS/Resources/appscapevideoplayerpricepressed.png b/ShiftOS/Resources/appscapevideoplayerpricepressed.png new file mode 100644 index 0000000..4849f54 Binary files /dev/null and b/ShiftOS/Resources/appscapevideoplayerpricepressed.png differ diff --git a/ShiftOS/Resources/appscapewebbrowser.png b/ShiftOS/Resources/appscapewebbrowser.png new file mode 100644 index 0000000..b469924 Binary files /dev/null and b/ShiftOS/Resources/appscapewebbrowser.png differ diff --git a/ShiftOS/Resources/appscapewebbrowserprice.png b/ShiftOS/Resources/appscapewebbrowserprice.png new file mode 100644 index 0000000..a3cb24c Binary files /dev/null and b/ShiftOS/Resources/appscapewebbrowserprice.png differ diff --git a/ShiftOS/Resources/appscapewebbrowserpricepressed.png b/ShiftOS/Resources/appscapewebbrowserpricepressed.png new file mode 100644 index 0000000..36ecfb1 Binary files /dev/null and b/ShiftOS/Resources/appscapewebbrowserpricepressed.png differ diff --git a/ShiftOS/Resources/appscapewelcometoappscape.png b/ShiftOS/Resources/appscapewelcometoappscape.png new file mode 100644 index 0000000..92e17c9 Binary files /dev/null and b/ShiftOS/Resources/appscapewelcometoappscape.png differ diff --git a/ShiftOS/Resources/bitnotediggergradetable.png b/ShiftOS/Resources/bitnotediggergradetable.png new file mode 100644 index 0000000..54cbe21 Binary files /dev/null and b/ShiftOS/Resources/bitnotediggergradetable.png differ diff --git a/ShiftOS/Resources/bitnoteswebsidepnl.png b/ShiftOS/Resources/bitnoteswebsidepnl.png new file mode 100644 index 0000000..2d6e17f Binary files /dev/null and b/ShiftOS/Resources/bitnoteswebsidepnl.png differ diff --git a/ShiftOS/Resources/bitnotewalletdownload.png b/ShiftOS/Resources/bitnotewalletdownload.png new file mode 100644 index 0000000..71a1f2b Binary files /dev/null and b/ShiftOS/Resources/bitnotewalletdownload.png differ diff --git a/ShiftOS/Resources/bitnotewalletpreviewscreenshot.png b/ShiftOS/Resources/bitnotewalletpreviewscreenshot.png new file mode 100644 index 0000000..bd8c483 Binary files /dev/null and b/ShiftOS/Resources/bitnotewalletpreviewscreenshot.png differ diff --git a/ShiftOS/Resources/bitnotewebsitetitle.png b/ShiftOS/Resources/bitnotewebsitetitle.png new file mode 100644 index 0000000..7703382 Binary files /dev/null and b/ShiftOS/Resources/bitnotewebsitetitle.png differ diff --git a/ShiftOS/Resources/centrebutton.png b/ShiftOS/Resources/centrebutton.png new file mode 100644 index 0000000..0578039 Binary files /dev/null and b/ShiftOS/Resources/centrebutton.png differ diff --git a/ShiftOS/Resources/centrebuttonpressed.png b/ShiftOS/Resources/centrebuttonpressed.png new file mode 100644 index 0000000..52c2725 Binary files /dev/null and b/ShiftOS/Resources/centrebuttonpressed.png differ diff --git a/ShiftOS/Resources/christmaseasteregg.png b/ShiftOS/Resources/christmaseasteregg.png new file mode 100644 index 0000000..b15feea Binary files /dev/null and b/ShiftOS/Resources/christmaseasteregg.png differ diff --git a/ShiftOS/Resources/crash-cheat.png b/ShiftOS/Resources/crash-cheat.png new file mode 100644 index 0000000..5bc6e63 Binary files /dev/null and b/ShiftOS/Resources/crash-cheat.png differ diff --git a/ShiftOS/Resources/crash-force.png b/ShiftOS/Resources/crash-force.png new file mode 100644 index 0000000..79c135d Binary files /dev/null and b/ShiftOS/Resources/crash-force.png differ diff --git a/ShiftOS/Resources/crash.png b/ShiftOS/Resources/crash.png new file mode 100644 index 0000000..a90aa4a Binary files /dev/null and b/ShiftOS/Resources/crash.png differ diff --git a/ShiftOS/Resources/crash_ofm.png b/ShiftOS/Resources/crash_ofm.png new file mode 100644 index 0000000..04f599a Binary files /dev/null and b/ShiftOS/Resources/crash_ofm.png differ diff --git a/ShiftOS/Resources/deletefile.png b/ShiftOS/Resources/deletefile.png new file mode 100644 index 0000000..89bcc65 Binary files /dev/null and b/ShiftOS/Resources/deletefile.png differ diff --git a/ShiftOS/Resources/deletefolder.png b/ShiftOS/Resources/deletefolder.png new file mode 100644 index 0000000..afcf19f Binary files /dev/null and b/ShiftOS/Resources/deletefolder.png differ diff --git a/ShiftOS/Resources/dial-up-modem-02.wav b/ShiftOS/Resources/dial-up-modem-02.wav new file mode 100644 index 0000000..f6bb696 Binary files /dev/null and b/ShiftOS/Resources/dial-up-modem-02.wav differ diff --git a/ShiftOS/Resources/dodge.png b/ShiftOS/Resources/dodge.png new file mode 100644 index 0000000..d741ad6 Binary files /dev/null and b/ShiftOS/Resources/dodge.png differ diff --git a/ShiftOS/Resources/downarrow.png b/ShiftOS/Resources/downarrow.png new file mode 100644 index 0000000..15d3663 Binary files /dev/null and b/ShiftOS/Resources/downarrow.png differ diff --git a/ShiftOS/Resources/downloadmanagericon.png b/ShiftOS/Resources/downloadmanagericon.png new file mode 100644 index 0000000..c4cc648 Binary files /dev/null and b/ShiftOS/Resources/downloadmanagericon.png differ diff --git a/ShiftOS/Resources/fileiconsaa.png b/ShiftOS/Resources/fileiconsaa.png new file mode 100644 index 0000000..291770a Binary files /dev/null and b/ShiftOS/Resources/fileiconsaa.png differ diff --git a/ShiftOS/Resources/fileskimmericon.fw.png b/ShiftOS/Resources/fileskimmericon.fw.png new file mode 100644 index 0000000..cb4262b Binary files /dev/null and b/ShiftOS/Resources/fileskimmericon.fw.png differ diff --git a/ShiftOS/Resources/floodgateicn.png b/ShiftOS/Resources/floodgateicn.png new file mode 100644 index 0000000..c243c8c Binary files /dev/null and b/ShiftOS/Resources/floodgateicn.png differ diff --git a/ShiftOS/Resources/iconArtpad.png b/ShiftOS/Resources/iconArtpad.png new file mode 100644 index 0000000..103eef8 Binary files /dev/null and b/ShiftOS/Resources/iconArtpad.png differ diff --git a/ShiftOS/Resources/iconAudioPlayer.png b/ShiftOS/Resources/iconAudioPlayer.png new file mode 100644 index 0000000..a445af4 Binary files /dev/null and b/ShiftOS/Resources/iconAudioPlayer.png differ diff --git a/ShiftOS/Resources/iconBitnoteDigger.png b/ShiftOS/Resources/iconBitnoteDigger.png new file mode 100644 index 0000000..42cbae3 Binary files /dev/null and b/ShiftOS/Resources/iconBitnoteDigger.png differ diff --git a/ShiftOS/Resources/iconBitnoteWallet.png b/ShiftOS/Resources/iconBitnoteWallet.png new file mode 100644 index 0000000..1f06a17 Binary files /dev/null and b/ShiftOS/Resources/iconBitnoteWallet.png differ diff --git a/ShiftOS/Resources/iconCalculator.png b/ShiftOS/Resources/iconCalculator.png new file mode 100644 index 0000000..4a15583 Binary files /dev/null and b/ShiftOS/Resources/iconCalculator.png differ diff --git a/ShiftOS/Resources/iconClock.png b/ShiftOS/Resources/iconClock.png new file mode 100644 index 0000000..2bcd19a Binary files /dev/null and b/ShiftOS/Resources/iconClock.png differ diff --git a/ShiftOS/Resources/iconColourPicker.fw.png b/ShiftOS/Resources/iconColourPicker.fw.png new file mode 100644 index 0000000..ece25ab Binary files /dev/null and b/ShiftOS/Resources/iconColourPicker.fw.png differ diff --git a/ShiftOS/Resources/iconDodge.png b/ShiftOS/Resources/iconDodge.png new file mode 100644 index 0000000..9a23b57 Binary files /dev/null and b/ShiftOS/Resources/iconDodge.png differ diff --git a/ShiftOS/Resources/iconDownloader.png b/ShiftOS/Resources/iconDownloader.png new file mode 100644 index 0000000..9a3ef2b Binary files /dev/null and b/ShiftOS/Resources/iconDownloader.png differ diff --git a/ShiftOS/Resources/iconFileOpener.fw.png b/ShiftOS/Resources/iconFileOpener.fw.png new file mode 100644 index 0000000..578d499 Binary files /dev/null and b/ShiftOS/Resources/iconFileOpener.fw.png differ diff --git a/ShiftOS/Resources/iconFileSaver.fw.png b/ShiftOS/Resources/iconFileSaver.fw.png new file mode 100644 index 0000000..351b5d4 Binary files /dev/null and b/ShiftOS/Resources/iconFileSaver.fw.png differ diff --git a/ShiftOS/Resources/iconFileSkimmer.png b/ShiftOS/Resources/iconFileSkimmer.png new file mode 100644 index 0000000..cb4262b Binary files /dev/null and b/ShiftOS/Resources/iconFileSkimmer.png differ diff --git a/ShiftOS/Resources/iconIconManager.png b/ShiftOS/Resources/iconIconManager.png new file mode 100644 index 0000000..99246e9 Binary files /dev/null and b/ShiftOS/Resources/iconIconManager.png differ diff --git a/ShiftOS/Resources/iconInfoBox.fw.png b/ShiftOS/Resources/iconInfoBox.fw.png new file mode 100644 index 0000000..0c9ebbd Binary files /dev/null and b/ShiftOS/Resources/iconInfoBox.fw.png differ diff --git a/ShiftOS/Resources/iconKnowledgeInput.png b/ShiftOS/Resources/iconKnowledgeInput.png new file mode 100644 index 0000000..b5e513f Binary files /dev/null and b/ShiftOS/Resources/iconKnowledgeInput.png differ diff --git a/ShiftOS/Resources/iconNameChanger.png b/ShiftOS/Resources/iconNameChanger.png new file mode 100644 index 0000000..7d94b21 Binary files /dev/null and b/ShiftOS/Resources/iconNameChanger.png differ diff --git a/ShiftOS/Resources/iconPong.png b/ShiftOS/Resources/iconPong.png new file mode 100644 index 0000000..c96cd58 Binary files /dev/null and b/ShiftOS/Resources/iconPong.png differ diff --git a/ShiftOS/Resources/iconShifter.png b/ShiftOS/Resources/iconShifter.png new file mode 100644 index 0000000..07344bf Binary files /dev/null and b/ShiftOS/Resources/iconShifter.png differ diff --git a/ShiftOS/Resources/iconShiftnet.png b/ShiftOS/Resources/iconShiftnet.png new file mode 100644 index 0000000..405662d Binary files /dev/null and b/ShiftOS/Resources/iconShiftnet.png differ diff --git a/ShiftOS/Resources/iconShiftorium.png b/ShiftOS/Resources/iconShiftorium.png new file mode 100644 index 0000000..a72239e Binary files /dev/null and b/ShiftOS/Resources/iconShiftorium.png differ diff --git a/ShiftOS/Resources/iconSkinLoader.png b/ShiftOS/Resources/iconSkinLoader.png new file mode 100644 index 0000000..1df8f53 Binary files /dev/null and b/ShiftOS/Resources/iconSkinLoader.png differ diff --git a/ShiftOS/Resources/iconSkinShifter.png b/ShiftOS/Resources/iconSkinShifter.png new file mode 100644 index 0000000..cccc0d1 Binary files /dev/null and b/ShiftOS/Resources/iconSkinShifter.png differ diff --git a/ShiftOS/Resources/iconSnakey.png b/ShiftOS/Resources/iconSnakey.png new file mode 100644 index 0000000..469367c Binary files /dev/null and b/ShiftOS/Resources/iconSnakey.png differ diff --git a/ShiftOS/Resources/iconSysinfo.png b/ShiftOS/Resources/iconSysinfo.png new file mode 100644 index 0000000..0d1146b Binary files /dev/null and b/ShiftOS/Resources/iconSysinfo.png differ diff --git a/ShiftOS/Resources/iconTerminal.png b/ShiftOS/Resources/iconTerminal.png new file mode 100644 index 0000000..df5e779 Binary files /dev/null and b/ShiftOS/Resources/iconTerminal.png differ diff --git a/ShiftOS/Resources/iconTextPad.png b/ShiftOS/Resources/iconTextPad.png new file mode 100644 index 0000000..0d536ce Binary files /dev/null and b/ShiftOS/Resources/iconTextPad.png differ diff --git a/ShiftOS/Resources/iconVideoPlayer.png b/ShiftOS/Resources/iconVideoPlayer.png new file mode 100644 index 0000000..17a9043 Binary files /dev/null and b/ShiftOS/Resources/iconVideoPlayer.png differ diff --git a/ShiftOS/Resources/iconWebBrowser.png b/ShiftOS/Resources/iconWebBrowser.png new file mode 100644 index 0000000..e22117f Binary files /dev/null and b/ShiftOS/Resources/iconWebBrowser.png differ diff --git a/ShiftOS/Resources/iconfloodgate.png b/ShiftOS/Resources/iconfloodgate.png new file mode 100644 index 0000000..2a7c483 Binary files /dev/null and b/ShiftOS/Resources/iconfloodgate.png differ diff --git a/ShiftOS/Resources/icongraphicpicker.png b/ShiftOS/Resources/icongraphicpicker.png new file mode 100644 index 0000000..59ded9f Binary files /dev/null and b/ShiftOS/Resources/icongraphicpicker.png differ diff --git a/ShiftOS/Resources/iconmaze.png b/ShiftOS/Resources/iconmaze.png new file mode 100644 index 0000000..18c3c3f Binary files /dev/null and b/ShiftOS/Resources/iconmaze.png differ diff --git a/ShiftOS/Resources/iconorcwrite.png b/ShiftOS/Resources/iconorcwrite.png new file mode 100644 index 0000000..e1c2862 Binary files /dev/null and b/ShiftOS/Resources/iconorcwrite.png differ diff --git a/ShiftOS/Resources/iconshutdown.png b/ShiftOS/Resources/iconshutdown.png new file mode 100644 index 0000000..d4959c2 Binary files /dev/null and b/ShiftOS/Resources/iconshutdown.png differ diff --git a/ShiftOS/Resources/iconunitytoggle.png b/ShiftOS/Resources/iconunitytoggle.png new file mode 100644 index 0000000..450b092 Binary files /dev/null and b/ShiftOS/Resources/iconunitytoggle.png differ diff --git a/ShiftOS/Resources/iconvirusscanner.png b/ShiftOS/Resources/iconvirusscanner.png new file mode 100644 index 0000000..5fcb50c Binary files /dev/null and b/ShiftOS/Resources/iconvirusscanner.png differ diff --git a/ShiftOS/Resources/infobox.wav b/ShiftOS/Resources/infobox.wav new file mode 100644 index 0000000..3c6f3f2 Binary files /dev/null and b/ShiftOS/Resources/infobox.wav differ diff --git a/ShiftOS/Resources/installericon.png b/ShiftOS/Resources/installericon.png new file mode 100644 index 0000000..9b567b7 Binary files /dev/null and b/ShiftOS/Resources/installericon.png differ diff --git a/ShiftOS/Resources/loadbutton.png b/ShiftOS/Resources/loadbutton.png new file mode 100644 index 0000000..54ede1c Binary files /dev/null and b/ShiftOS/Resources/loadbutton.png differ diff --git a/ShiftOS/Resources/minimatchdodgepreviewimage.png b/ShiftOS/Resources/minimatchdodgepreviewimage.png new file mode 100644 index 0000000..d156318 Binary files /dev/null and b/ShiftOS/Resources/minimatchdodgepreviewimage.png differ diff --git a/ShiftOS/Resources/minimatchlabyrinthpreview.png b/ShiftOS/Resources/minimatchlabyrinthpreview.png new file mode 100644 index 0000000..3bc7a8b Binary files /dev/null and b/ShiftOS/Resources/minimatchlabyrinthpreview.png differ diff --git a/ShiftOS/Resources/newfolder.png b/ShiftOS/Resources/newfolder.png new file mode 100644 index 0000000..61e3d80 Binary files /dev/null and b/ShiftOS/Resources/newfolder.png differ diff --git a/ShiftOS/Resources/newicon.png b/ShiftOS/Resources/newicon.png new file mode 100644 index 0000000..0d6db34 Binary files /dev/null and b/ShiftOS/Resources/newicon.png differ diff --git a/ShiftOS/Resources/nextbutton.png b/ShiftOS/Resources/nextbutton.png new file mode 100644 index 0000000..2fdb3ff Binary files /dev/null and b/ShiftOS/Resources/nextbutton.png differ diff --git a/ShiftOS/Resources/openicon.png b/ShiftOS/Resources/openicon.png new file mode 100644 index 0000000..8239c2e Binary files /dev/null and b/ShiftOS/Resources/openicon.png differ diff --git a/ShiftOS/Resources/pausebutton.png b/ShiftOS/Resources/pausebutton.png new file mode 100644 index 0000000..7119b30 Binary files /dev/null and b/ShiftOS/Resources/pausebutton.png differ diff --git a/ShiftOS/Resources/pixelsetter.png b/ShiftOS/Resources/pixelsetter.png new file mode 100644 index 0000000..4dae604 Binary files /dev/null and b/ShiftOS/Resources/pixelsetter.png differ diff --git a/ShiftOS/Resources/playbutton.png b/ShiftOS/Resources/playbutton.png new file mode 100644 index 0000000..4b701f4 Binary files /dev/null and b/ShiftOS/Resources/playbutton.png differ diff --git a/ShiftOS/Resources/previousbutton.png b/ShiftOS/Resources/previousbutton.png new file mode 100644 index 0000000..69a1c93 Binary files /dev/null and b/ShiftOS/Resources/previousbutton.png differ diff --git a/ShiftOS/Resources/rolldown.wav b/ShiftOS/Resources/rolldown.wav new file mode 100644 index 0000000..ede21d3 Binary files /dev/null and b/ShiftOS/Resources/rolldown.wav differ diff --git a/ShiftOS/Resources/rollup.wav b/ShiftOS/Resources/rollup.wav new file mode 100644 index 0000000..3e44e72 Binary files /dev/null and b/ShiftOS/Resources/rollup.wav differ diff --git a/ShiftOS/Resources/saveicon.png b/ShiftOS/Resources/saveicon.png new file mode 100644 index 0000000..6404b15 Binary files /dev/null and b/ShiftOS/Resources/saveicon.png differ diff --git a/ShiftOS/Resources/shiftomizericonpreview.png b/ShiftOS/Resources/shiftomizericonpreview.png new file mode 100644 index 0000000..f26aa3d Binary files /dev/null and b/ShiftOS/Resources/shiftomizericonpreview.png differ diff --git a/ShiftOS/Resources/shiftomizerindustrialskinpreview.png b/ShiftOS/Resources/shiftomizerindustrialskinpreview.png new file mode 100644 index 0000000..fb8d61e Binary files /dev/null and b/ShiftOS/Resources/shiftomizerindustrialskinpreview.png differ diff --git a/ShiftOS/Resources/shiftomizerlinuxmintskinpreview.png b/ShiftOS/Resources/shiftomizerlinuxmintskinpreview.png new file mode 100644 index 0000000..8308328 Binary files /dev/null and b/ShiftOS/Resources/shiftomizerlinuxmintskinpreview.png differ diff --git a/ShiftOS/Resources/shiftomizernamechangerpreview.png b/ShiftOS/Resources/shiftomizernamechangerpreview.png new file mode 100644 index 0000000..dfec30c Binary files /dev/null and b/ShiftOS/Resources/shiftomizernamechangerpreview.png differ diff --git a/ShiftOS/Resources/shiftomizerskinshifterscreenshot.png b/ShiftOS/Resources/shiftomizerskinshifterscreenshot.png new file mode 100644 index 0000000..2474786 Binary files /dev/null and b/ShiftOS/Resources/shiftomizerskinshifterscreenshot.png differ diff --git a/ShiftOS/Resources/shiftomizersliderleftarrow.png b/ShiftOS/Resources/shiftomizersliderleftarrow.png new file mode 100644 index 0000000..44eb41d Binary files /dev/null and b/ShiftOS/Resources/shiftomizersliderleftarrow.png differ diff --git a/ShiftOS/Resources/shiftomizersliderrightarrow.png b/ShiftOS/Resources/shiftomizersliderrightarrow.png new file mode 100644 index 0000000..84b85f0 Binary files /dev/null and b/ShiftOS/Resources/shiftomizersliderrightarrow.png differ diff --git a/ShiftOS/Resources/skindownarrow.png b/ShiftOS/Resources/skindownarrow.png new file mode 100644 index 0000000..2a568d0 Binary files /dev/null and b/ShiftOS/Resources/skindownarrow.png differ diff --git a/ShiftOS/Resources/skinfile.png b/ShiftOS/Resources/skinfile.png new file mode 100644 index 0000000..11048fb Binary files /dev/null and b/ShiftOS/Resources/skinfile.png differ diff --git a/ShiftOS/Resources/skinuparrow.png b/ShiftOS/Resources/skinuparrow.png new file mode 100644 index 0000000..753dab1 Binary files /dev/null and b/ShiftOS/Resources/skinuparrow.png differ diff --git a/ShiftOS/Resources/snakeyback.bmp b/ShiftOS/Resources/snakeyback.bmp new file mode 100644 index 0000000..19a55e1 Binary files /dev/null and b/ShiftOS/Resources/snakeyback.bmp differ diff --git a/ShiftOS/Resources/stopbutton.png b/ShiftOS/Resources/stopbutton.png new file mode 100644 index 0000000..b4df28d Binary files /dev/null and b/ShiftOS/Resources/stopbutton.png differ diff --git a/ShiftOS/Resources/stretchbutton.png b/ShiftOS/Resources/stretchbutton.png new file mode 100644 index 0000000..7c1d3f3 Binary files /dev/null and b/ShiftOS/Resources/stretchbutton.png differ diff --git a/ShiftOS/Resources/stretchbuttonpressed.png b/ShiftOS/Resources/stretchbuttonpressed.png new file mode 100644 index 0000000..63ae251 Binary files /dev/null and b/ShiftOS/Resources/stretchbuttonpressed.png differ diff --git a/ShiftOS/Resources/test.png b/ShiftOS/Resources/test.png new file mode 100644 index 0000000..7a391e5 Binary files /dev/null and b/ShiftOS/Resources/test.png differ diff --git a/ShiftOS/Resources/textpad.fw.png b/ShiftOS/Resources/textpad.fw.png new file mode 100644 index 0000000..0d536ce Binary files /dev/null and b/ShiftOS/Resources/textpad.fw.png differ diff --git a/ShiftOS/Resources/tilebutton.png b/ShiftOS/Resources/tilebutton.png new file mode 100644 index 0000000..2504be2 Binary files /dev/null and b/ShiftOS/Resources/tilebutton.png differ diff --git a/ShiftOS/Resources/tilebuttonpressed.png b/ShiftOS/Resources/tilebuttonpressed.png new file mode 100644 index 0000000..6621cb2 Binary files /dev/null and b/ShiftOS/Resources/tilebuttonpressed.png differ diff --git a/ShiftOS/Resources/transactionsClicked.png b/ShiftOS/Resources/transactionsClicked.png new file mode 100644 index 0000000..cf78531 Binary files /dev/null and b/ShiftOS/Resources/transactionsClicked.png differ diff --git a/ShiftOS/Resources/transactionsUnclicked.png b/ShiftOS/Resources/transactionsUnclicked.png new file mode 100644 index 0000000..0af55df Binary files /dev/null and b/ShiftOS/Resources/transactionsUnclicked.png differ diff --git a/ShiftOS/Resources/typesound.wav b/ShiftOS/Resources/typesound.wav new file mode 100644 index 0000000..d3e381f Binary files /dev/null and b/ShiftOS/Resources/typesound.wav differ diff --git a/ShiftOS/Resources/uparrow.png b/ShiftOS/Resources/uparrow.png new file mode 100644 index 0000000..55a1d61 Binary files /dev/null and b/ShiftOS/Resources/uparrow.png differ diff --git a/ShiftOS/Resources/updatecustomcolourpallets.png b/ShiftOS/Resources/updatecustomcolourpallets.png new file mode 100644 index 0000000..61e7f90 Binary files /dev/null and b/ShiftOS/Resources/updatecustomcolourpallets.png differ diff --git a/ShiftOS/Resources/upgradealartpad.png b/ShiftOS/Resources/upgradealartpad.png new file mode 100644 index 0000000..fa0e6ce Binary files /dev/null and b/ShiftOS/Resources/upgradealartpad.png differ diff --git a/ShiftOS/Resources/upgradealclock.png b/ShiftOS/Resources/upgradealclock.png new file mode 100644 index 0000000..af944a1 Binary files /dev/null and b/ShiftOS/Resources/upgradealclock.png differ diff --git a/ShiftOS/Resources/upgradealfileskimmer.png b/ShiftOS/Resources/upgradealfileskimmer.png new file mode 100644 index 0000000..9cb4a99 Binary files /dev/null and b/ShiftOS/Resources/upgradealfileskimmer.png differ diff --git a/ShiftOS/Resources/upgradealpong.png b/ShiftOS/Resources/upgradealpong.png new file mode 100644 index 0000000..0f60a2c Binary files /dev/null and b/ShiftOS/Resources/upgradealpong.png differ diff --git a/ShiftOS/Resources/upgradealshifter.png b/ShiftOS/Resources/upgradealshifter.png new file mode 100644 index 0000000..a8a7728 Binary files /dev/null and b/ShiftOS/Resources/upgradealshifter.png differ diff --git a/ShiftOS/Resources/upgradealshiftorium.png b/ShiftOS/Resources/upgradealshiftorium.png new file mode 100644 index 0000000..71fe105 Binary files /dev/null and b/ShiftOS/Resources/upgradealshiftorium.png differ diff --git a/ShiftOS/Resources/upgradealtextpad.png b/ShiftOS/Resources/upgradealtextpad.png new file mode 100644 index 0000000..857139f Binary files /dev/null and b/ShiftOS/Resources/upgradealtextpad.png differ diff --git a/ShiftOS/Resources/upgradealunitymode.png b/ShiftOS/Resources/upgradealunitymode.png new file mode 100644 index 0000000..871fb52 Binary files /dev/null and b/ShiftOS/Resources/upgradealunitymode.png differ diff --git a/ShiftOS/Resources/upgradeamandpm.png b/ShiftOS/Resources/upgradeamandpm.png new file mode 100644 index 0000000..dd6b35d Binary files /dev/null and b/ShiftOS/Resources/upgradeamandpm.png differ diff --git a/ShiftOS/Resources/upgradeapplaunchermenu.png b/ShiftOS/Resources/upgradeapplaunchermenu.png new file mode 100644 index 0000000..ba82af9 Binary files /dev/null and b/ShiftOS/Resources/upgradeapplaunchermenu.png differ diff --git a/ShiftOS/Resources/upgradeapplaunchershutdown.png b/ShiftOS/Resources/upgradeapplaunchershutdown.png new file mode 100644 index 0000000..ee5097b Binary files /dev/null and b/ShiftOS/Resources/upgradeapplaunchershutdown.png differ diff --git a/ShiftOS/Resources/upgradeartpad.png b/ShiftOS/Resources/upgradeartpad.png new file mode 100644 index 0000000..ef66c2c Binary files /dev/null and b/ShiftOS/Resources/upgradeartpad.png differ diff --git a/ShiftOS/Resources/upgradeartpad128colorpallets.png b/ShiftOS/Resources/upgradeartpad128colorpallets.png new file mode 100644 index 0000000..6fbaf99 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpad128colorpallets.png differ diff --git a/ShiftOS/Resources/upgradeartpad16colorpallets.png b/ShiftOS/Resources/upgradeartpad16colorpallets.png new file mode 100644 index 0000000..b4dfd50 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpad16colorpallets.png differ diff --git a/ShiftOS/Resources/upgradeartpad32colorpallets.png b/ShiftOS/Resources/upgradeartpad32colorpallets.png new file mode 100644 index 0000000..1a1eda4 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpad32colorpallets.png differ diff --git a/ShiftOS/Resources/upgradeartpad4colorpallets.png b/ShiftOS/Resources/upgradeartpad4colorpallets.png new file mode 100644 index 0000000..d18758b Binary files /dev/null and b/ShiftOS/Resources/upgradeartpad4colorpallets.png differ diff --git a/ShiftOS/Resources/upgradeartpad64colorpallets.png b/ShiftOS/Resources/upgradeartpad64colorpallets.png new file mode 100644 index 0000000..ba665ae Binary files /dev/null and b/ShiftOS/Resources/upgradeartpad64colorpallets.png differ diff --git a/ShiftOS/Resources/upgradeartpad8colorpallets.png b/ShiftOS/Resources/upgradeartpad8colorpallets.png new file mode 100644 index 0000000..f4bf2bd Binary files /dev/null and b/ShiftOS/Resources/upgradeartpad8colorpallets.png differ diff --git a/ShiftOS/Resources/upgradeartpaderaser.png b/ShiftOS/Resources/upgradeartpaderaser.png new file mode 100644 index 0000000..ee6a37c Binary files /dev/null and b/ShiftOS/Resources/upgradeartpaderaser.png differ diff --git a/ShiftOS/Resources/upgradeartpadfilltool.png b/ShiftOS/Resources/upgradeartpadfilltool.png new file mode 100644 index 0000000..6dcead2 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadfilltool.png differ diff --git a/ShiftOS/Resources/upgradeartpadicon.png b/ShiftOS/Resources/upgradeartpadicon.png new file mode 100644 index 0000000..a499621 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadicon.png differ diff --git a/ShiftOS/Resources/upgradeartpadlimitlesspixels.png b/ShiftOS/Resources/upgradeartpadlimitlesspixels.png new file mode 100644 index 0000000..7163005 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadlimitlesspixels.png differ diff --git a/ShiftOS/Resources/upgradeartpadlinetool.png b/ShiftOS/Resources/upgradeartpadlinetool.png new file mode 100644 index 0000000..869b21d Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadlinetool.png differ diff --git a/ShiftOS/Resources/upgradeartpadload.png b/ShiftOS/Resources/upgradeartpadload.png new file mode 100644 index 0000000..2c5f061 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadload.png differ diff --git a/ShiftOS/Resources/upgradeartpadnew.png b/ShiftOS/Resources/upgradeartpadnew.png new file mode 100644 index 0000000..2672079 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadnew.png differ diff --git a/ShiftOS/Resources/upgradeartpadovaltool.png b/ShiftOS/Resources/upgradeartpadovaltool.png new file mode 100644 index 0000000..fa12d60 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadovaltool.png differ diff --git a/ShiftOS/Resources/upgradeartpadpaintbrushtool.png b/ShiftOS/Resources/upgradeartpadpaintbrushtool.png new file mode 100644 index 0000000..330ee32 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpaintbrushtool.png differ diff --git a/ShiftOS/Resources/upgradeartpadpenciltool.png b/ShiftOS/Resources/upgradeartpadpenciltool.png new file mode 100644 index 0000000..d8eae9c Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpenciltool.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit1024.png b/ShiftOS/Resources/upgradeartpadpixellimit1024.png new file mode 100644 index 0000000..c40557e Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit1024.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit16.png b/ShiftOS/Resources/upgradeartpadpixellimit16.png new file mode 100644 index 0000000..7867b43 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit16.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit16384.png b/ShiftOS/Resources/upgradeartpadpixellimit16384.png new file mode 100644 index 0000000..9496f09 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit16384.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit256.png b/ShiftOS/Resources/upgradeartpadpixellimit256.png new file mode 100644 index 0000000..fb3b9d8 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit256.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit4.png b/ShiftOS/Resources/upgradeartpadpixellimit4.png new file mode 100644 index 0000000..ddce437 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit4.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit4096.png b/ShiftOS/Resources/upgradeartpadpixellimit4096.png new file mode 100644 index 0000000..6ff819f Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit4096.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit64.png b/ShiftOS/Resources/upgradeartpadpixellimit64.png new file mode 100644 index 0000000..29eb05f Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit64.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit65536.png b/ShiftOS/Resources/upgradeartpadpixellimit65536.png new file mode 100644 index 0000000..5cc23d4 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit65536.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixellimit8.png b/ShiftOS/Resources/upgradeartpadpixellimit8.png new file mode 100644 index 0000000..f21e03e Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixellimit8.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixelplacer.png b/ShiftOS/Resources/upgradeartpadpixelplacer.png new file mode 100644 index 0000000..88f1a9a Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixelplacer.png differ diff --git a/ShiftOS/Resources/upgradeartpadpixelplacermovementmode.png b/ShiftOS/Resources/upgradeartpadpixelplacermovementmode.png new file mode 100644 index 0000000..39097dc Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadpixelplacermovementmode.png differ diff --git a/ShiftOS/Resources/upgradeartpadrectangletool.png b/ShiftOS/Resources/upgradeartpadrectangletool.png new file mode 100644 index 0000000..0647fa7 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadrectangletool.png differ diff --git a/ShiftOS/Resources/upgradeartpadredo.png b/ShiftOS/Resources/upgradeartpadredo.png new file mode 100644 index 0000000..c574abd Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadredo.png differ diff --git a/ShiftOS/Resources/upgradeartpadsave.png b/ShiftOS/Resources/upgradeartpadsave.png new file mode 100644 index 0000000..5d464a9 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadsave.png differ diff --git a/ShiftOS/Resources/upgradeartpadtexttool.png b/ShiftOS/Resources/upgradeartpadtexttool.png new file mode 100644 index 0000000..acf7d56 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadtexttool.png differ diff --git a/ShiftOS/Resources/upgradeartpadundo.png b/ShiftOS/Resources/upgradeartpadundo.png new file mode 100644 index 0000000..e60c686 Binary files /dev/null and b/ShiftOS/Resources/upgradeartpadundo.png differ diff --git a/ShiftOS/Resources/upgradeautoscrollterminal.png b/ShiftOS/Resources/upgradeautoscrollterminal.png new file mode 100644 index 0000000..096377d Binary files /dev/null and b/ShiftOS/Resources/upgradeautoscrollterminal.png differ diff --git a/ShiftOS/Resources/upgradeblue.png b/ShiftOS/Resources/upgradeblue.png new file mode 100644 index 0000000..d611fd7 Binary files /dev/null and b/ShiftOS/Resources/upgradeblue.png differ diff --git a/ShiftOS/Resources/upgradebluecustom.png b/ShiftOS/Resources/upgradebluecustom.png new file mode 100644 index 0000000..15ff419 Binary files /dev/null and b/ShiftOS/Resources/upgradebluecustom.png differ diff --git a/ShiftOS/Resources/upgradeblueshades.png b/ShiftOS/Resources/upgradeblueshades.png new file mode 100644 index 0000000..e24073b Binary files /dev/null and b/ShiftOS/Resources/upgradeblueshades.png differ diff --git a/ShiftOS/Resources/upgradeblueshadeset.png b/ShiftOS/Resources/upgradeblueshadeset.png new file mode 100644 index 0000000..d1df0a6 Binary files /dev/null and b/ShiftOS/Resources/upgradeblueshadeset.png differ diff --git a/ShiftOS/Resources/upgradebrown.png b/ShiftOS/Resources/upgradebrown.png new file mode 100644 index 0000000..26946f1 Binary files /dev/null and b/ShiftOS/Resources/upgradebrown.png differ diff --git a/ShiftOS/Resources/upgradebrowncustom.png b/ShiftOS/Resources/upgradebrowncustom.png new file mode 100644 index 0000000..689da23 Binary files /dev/null and b/ShiftOS/Resources/upgradebrowncustom.png differ diff --git a/ShiftOS/Resources/upgradebrownshades.png b/ShiftOS/Resources/upgradebrownshades.png new file mode 100644 index 0000000..39da965 Binary files /dev/null and b/ShiftOS/Resources/upgradebrownshades.png differ diff --git a/ShiftOS/Resources/upgradebrownshadeset.png b/ShiftOS/Resources/upgradebrownshadeset.png new file mode 100644 index 0000000..dcaf86b Binary files /dev/null and b/ShiftOS/Resources/upgradebrownshadeset.png differ diff --git a/ShiftOS/Resources/upgradeclock.png b/ShiftOS/Resources/upgradeclock.png new file mode 100644 index 0000000..c89ffeb Binary files /dev/null and b/ShiftOS/Resources/upgradeclock.png differ diff --git a/ShiftOS/Resources/upgradeclockicon.png b/ShiftOS/Resources/upgradeclockicon.png new file mode 100644 index 0000000..d31ab31 Binary files /dev/null and b/ShiftOS/Resources/upgradeclockicon.png differ diff --git a/ShiftOS/Resources/upgradeclosebutton.gif b/ShiftOS/Resources/upgradeclosebutton.gif new file mode 100644 index 0000000..eb45ea6 Binary files /dev/null and b/ShiftOS/Resources/upgradeclosebutton.gif differ diff --git a/ShiftOS/Resources/upgradecolourpickericon.png b/ShiftOS/Resources/upgradecolourpickericon.png new file mode 100644 index 0000000..a9a1e2d Binary files /dev/null and b/ShiftOS/Resources/upgradecolourpickericon.png differ diff --git a/ShiftOS/Resources/upgradecustomusername.png b/ShiftOS/Resources/upgradecustomusername.png new file mode 100644 index 0000000..d2ee85c Binary files /dev/null and b/ShiftOS/Resources/upgradecustomusername.png differ diff --git a/ShiftOS/Resources/upgradedesktoppanel.png b/ShiftOS/Resources/upgradedesktoppanel.png new file mode 100644 index 0000000..db142d4 Binary files /dev/null and b/ShiftOS/Resources/upgradedesktoppanel.png differ diff --git a/ShiftOS/Resources/upgradedesktoppanelclock.png b/ShiftOS/Resources/upgradedesktoppanelclock.png new file mode 100644 index 0000000..1d417ce Binary files /dev/null and b/ShiftOS/Resources/upgradedesktoppanelclock.png differ diff --git a/ShiftOS/Resources/upgradedraggablewindows.gif b/ShiftOS/Resources/upgradedraggablewindows.gif new file mode 100644 index 0000000..c91bbd1 Binary files /dev/null and b/ShiftOS/Resources/upgradedraggablewindows.gif differ diff --git a/ShiftOS/Resources/upgradefileskimmer.png b/ShiftOS/Resources/upgradefileskimmer.png new file mode 100644 index 0000000..8559818 Binary files /dev/null and b/ShiftOS/Resources/upgradefileskimmer.png differ diff --git a/ShiftOS/Resources/upgradefileskimmerdelete.png b/ShiftOS/Resources/upgradefileskimmerdelete.png new file mode 100644 index 0000000..f0ec7d6 Binary files /dev/null and b/ShiftOS/Resources/upgradefileskimmerdelete.png differ diff --git a/ShiftOS/Resources/upgradefileskimmericon.png b/ShiftOS/Resources/upgradefileskimmericon.png new file mode 100644 index 0000000..5c3501e Binary files /dev/null and b/ShiftOS/Resources/upgradefileskimmericon.png differ diff --git a/ShiftOS/Resources/upgradefileskimmernew.png b/ShiftOS/Resources/upgradefileskimmernew.png new file mode 100644 index 0000000..0c519d6 Binary files /dev/null and b/ShiftOS/Resources/upgradefileskimmernew.png differ diff --git a/ShiftOS/Resources/upgradegray.png b/ShiftOS/Resources/upgradegray.png new file mode 100644 index 0000000..ffe4632 Binary files /dev/null and b/ShiftOS/Resources/upgradegray.png differ diff --git a/ShiftOS/Resources/upgradegraycustom.png b/ShiftOS/Resources/upgradegraycustom.png new file mode 100644 index 0000000..adcc04c Binary files /dev/null and b/ShiftOS/Resources/upgradegraycustom.png differ diff --git a/ShiftOS/Resources/upgradegrayshades.png b/ShiftOS/Resources/upgradegrayshades.png new file mode 100644 index 0000000..70945bc Binary files /dev/null and b/ShiftOS/Resources/upgradegrayshades.png differ diff --git a/ShiftOS/Resources/upgradegrayshadeset.png b/ShiftOS/Resources/upgradegrayshadeset.png new file mode 100644 index 0000000..8899401 Binary files /dev/null and b/ShiftOS/Resources/upgradegrayshadeset.png differ diff --git a/ShiftOS/Resources/upgradegreen.png b/ShiftOS/Resources/upgradegreen.png new file mode 100644 index 0000000..775eb4d Binary files /dev/null and b/ShiftOS/Resources/upgradegreen.png differ diff --git a/ShiftOS/Resources/upgradegreencustom.png b/ShiftOS/Resources/upgradegreencustom.png new file mode 100644 index 0000000..cca44c8 Binary files /dev/null and b/ShiftOS/Resources/upgradegreencustom.png differ diff --git a/ShiftOS/Resources/upgradegreenshades.png b/ShiftOS/Resources/upgradegreenshades.png new file mode 100644 index 0000000..1e9c2ef Binary files /dev/null and b/ShiftOS/Resources/upgradegreenshades.png differ diff --git a/ShiftOS/Resources/upgradegreenshadeset.png b/ShiftOS/Resources/upgradegreenshadeset.png new file mode 100644 index 0000000..d52e8ee Binary files /dev/null and b/ShiftOS/Resources/upgradegreenshadeset.png differ diff --git a/ShiftOS/Resources/upgradehoursssincemidnight.png b/ShiftOS/Resources/upgradehoursssincemidnight.png new file mode 100644 index 0000000..506d970 Binary files /dev/null and b/ShiftOS/Resources/upgradehoursssincemidnight.png differ diff --git a/ShiftOS/Resources/upgradeiconunitymode.png b/ShiftOS/Resources/upgradeiconunitymode.png new file mode 100644 index 0000000..ca61f46 Binary files /dev/null and b/ShiftOS/Resources/upgradeiconunitymode.png differ diff --git a/ShiftOS/Resources/upgradeinfoboxicon.png b/ShiftOS/Resources/upgradeinfoboxicon.png new file mode 100644 index 0000000..22db5b2 Binary files /dev/null and b/ShiftOS/Resources/upgradeinfoboxicon.png differ diff --git a/ShiftOS/Resources/upgradekiaddons.png b/ShiftOS/Resources/upgradekiaddons.png new file mode 100644 index 0000000..c7e618b Binary files /dev/null and b/ShiftOS/Resources/upgradekiaddons.png differ diff --git a/ShiftOS/Resources/upgradekielements.png b/ShiftOS/Resources/upgradekielements.png new file mode 100644 index 0000000..5c5b398 Binary files /dev/null and b/ShiftOS/Resources/upgradekielements.png differ diff --git a/ShiftOS/Resources/upgradeknowledgeinput.png b/ShiftOS/Resources/upgradeknowledgeinput.png new file mode 100644 index 0000000..74ec0d0 Binary files /dev/null and b/ShiftOS/Resources/upgradeknowledgeinput.png differ diff --git a/ShiftOS/Resources/upgradeknowledgeinputicon.png b/ShiftOS/Resources/upgradeknowledgeinputicon.png new file mode 100644 index 0000000..d5b5b42 Binary files /dev/null and b/ShiftOS/Resources/upgradeknowledgeinputicon.png differ diff --git a/ShiftOS/Resources/upgrademinimizebutton.png b/ShiftOS/Resources/upgrademinimizebutton.png new file mode 100644 index 0000000..4068564 Binary files /dev/null and b/ShiftOS/Resources/upgrademinimizebutton.png differ diff --git a/ShiftOS/Resources/upgrademinimizecommand.png b/ShiftOS/Resources/upgrademinimizecommand.png new file mode 100644 index 0000000..c268e68 Binary files /dev/null and b/ShiftOS/Resources/upgrademinimizecommand.png differ diff --git a/ShiftOS/Resources/upgrademinuteaccuracytime.png b/ShiftOS/Resources/upgrademinuteaccuracytime.png new file mode 100644 index 0000000..697a60b Binary files /dev/null and b/ShiftOS/Resources/upgrademinuteaccuracytime.png differ diff --git a/ShiftOS/Resources/upgrademinutesssincemidnight.png b/ShiftOS/Resources/upgrademinutesssincemidnight.png new file mode 100644 index 0000000..45b7889 Binary files /dev/null and b/ShiftOS/Resources/upgrademinutesssincemidnight.png differ diff --git a/ShiftOS/Resources/upgrademoveablewindows.gif b/ShiftOS/Resources/upgrademoveablewindows.gif new file mode 100644 index 0000000..3e657a8 Binary files /dev/null and b/ShiftOS/Resources/upgrademoveablewindows.gif differ diff --git a/ShiftOS/Resources/upgrademultitasking.png b/ShiftOS/Resources/upgrademultitasking.png new file mode 100644 index 0000000..536c40a Binary files /dev/null and b/ShiftOS/Resources/upgrademultitasking.png differ diff --git a/ShiftOS/Resources/upgradeorange.png b/ShiftOS/Resources/upgradeorange.png new file mode 100644 index 0000000..b45f890 Binary files /dev/null and b/ShiftOS/Resources/upgradeorange.png differ diff --git a/ShiftOS/Resources/upgradeorangecustom.png b/ShiftOS/Resources/upgradeorangecustom.png new file mode 100644 index 0000000..84bf020 Binary files /dev/null and b/ShiftOS/Resources/upgradeorangecustom.png differ diff --git a/ShiftOS/Resources/upgradeorangeshades.png b/ShiftOS/Resources/upgradeorangeshades.png new file mode 100644 index 0000000..bfe5683 Binary files /dev/null and b/ShiftOS/Resources/upgradeorangeshades.png differ diff --git a/ShiftOS/Resources/upgradeorangeshadeset.png b/ShiftOS/Resources/upgradeorangeshadeset.png new file mode 100644 index 0000000..e30a466 Binary files /dev/null and b/ShiftOS/Resources/upgradeorangeshadeset.png differ diff --git a/ShiftOS/Resources/upgradeosname.png b/ShiftOS/Resources/upgradeosname.png new file mode 100644 index 0000000..bb0db4f Binary files /dev/null and b/ShiftOS/Resources/upgradeosname.png differ diff --git a/ShiftOS/Resources/upgradepanelbuttons.png b/ShiftOS/Resources/upgradepanelbuttons.png new file mode 100644 index 0000000..451058a Binary files /dev/null and b/ShiftOS/Resources/upgradepanelbuttons.png differ diff --git a/ShiftOS/Resources/upgradepink.png b/ShiftOS/Resources/upgradepink.png new file mode 100644 index 0000000..6312fa1 Binary files /dev/null and b/ShiftOS/Resources/upgradepink.png differ diff --git a/ShiftOS/Resources/upgradepinkcustom.png b/ShiftOS/Resources/upgradepinkcustom.png new file mode 100644 index 0000000..60ed53a Binary files /dev/null and b/ShiftOS/Resources/upgradepinkcustom.png differ diff --git a/ShiftOS/Resources/upgradepinkshades.png b/ShiftOS/Resources/upgradepinkshades.png new file mode 100644 index 0000000..cf715e4 Binary files /dev/null and b/ShiftOS/Resources/upgradepinkshades.png differ diff --git a/ShiftOS/Resources/upgradepinkshadeset.png b/ShiftOS/Resources/upgradepinkshadeset.png new file mode 100644 index 0000000..dc83681 Binary files /dev/null and b/ShiftOS/Resources/upgradepinkshadeset.png differ diff --git a/ShiftOS/Resources/upgradepong.png b/ShiftOS/Resources/upgradepong.png new file mode 100644 index 0000000..d17c5c7 Binary files /dev/null and b/ShiftOS/Resources/upgradepong.png differ diff --git a/ShiftOS/Resources/upgradepongicon.png b/ShiftOS/Resources/upgradepongicon.png new file mode 100644 index 0000000..61dffe3 Binary files /dev/null and b/ShiftOS/Resources/upgradepongicon.png differ diff --git a/ShiftOS/Resources/upgradepurple.png b/ShiftOS/Resources/upgradepurple.png new file mode 100644 index 0000000..7ac8ce5 Binary files /dev/null and b/ShiftOS/Resources/upgradepurple.png differ diff --git a/ShiftOS/Resources/upgradepurplecustom.png b/ShiftOS/Resources/upgradepurplecustom.png new file mode 100644 index 0000000..eae2523 Binary files /dev/null and b/ShiftOS/Resources/upgradepurplecustom.png differ diff --git a/ShiftOS/Resources/upgradepurpleshades.png b/ShiftOS/Resources/upgradepurpleshades.png new file mode 100644 index 0000000..52323a6 Binary files /dev/null and b/ShiftOS/Resources/upgradepurpleshades.png differ diff --git a/ShiftOS/Resources/upgradepurpleshadeset.png b/ShiftOS/Resources/upgradepurpleshadeset.png new file mode 100644 index 0000000..4e0fc5e Binary files /dev/null and b/ShiftOS/Resources/upgradepurpleshadeset.png differ diff --git a/ShiftOS/Resources/upgradered.png b/ShiftOS/Resources/upgradered.png new file mode 100644 index 0000000..0337b5e Binary files /dev/null and b/ShiftOS/Resources/upgradered.png differ diff --git a/ShiftOS/Resources/upgraderedcustom.png b/ShiftOS/Resources/upgraderedcustom.png new file mode 100644 index 0000000..e2e37b3 Binary files /dev/null and b/ShiftOS/Resources/upgraderedcustom.png differ diff --git a/ShiftOS/Resources/upgraderedshades.png b/ShiftOS/Resources/upgraderedshades.png new file mode 100644 index 0000000..3f6afb3 Binary files /dev/null and b/ShiftOS/Resources/upgraderedshades.png differ diff --git a/ShiftOS/Resources/upgraderedshadeset.png b/ShiftOS/Resources/upgraderedshadeset.png new file mode 100644 index 0000000..7ad2ffe Binary files /dev/null and b/ShiftOS/Resources/upgraderedshadeset.png differ diff --git a/ShiftOS/Resources/upgraderemoveth1.png b/ShiftOS/Resources/upgraderemoveth1.png new file mode 100644 index 0000000..0b63d2a Binary files /dev/null and b/ShiftOS/Resources/upgraderemoveth1.png differ diff --git a/ShiftOS/Resources/upgraderemoveth2.png b/ShiftOS/Resources/upgraderemoveth2.png new file mode 100644 index 0000000..c9f45e4 Binary files /dev/null and b/ShiftOS/Resources/upgraderemoveth2.png differ diff --git a/ShiftOS/Resources/upgraderemoveth3.png b/ShiftOS/Resources/upgraderemoveth3.png new file mode 100644 index 0000000..68c6e33 Binary files /dev/null and b/ShiftOS/Resources/upgraderemoveth3.png differ diff --git a/ShiftOS/Resources/upgraderemoveth4.png b/ShiftOS/Resources/upgraderemoveth4.png new file mode 100644 index 0000000..ecedb19 Binary files /dev/null and b/ShiftOS/Resources/upgraderemoveth4.png differ diff --git a/ShiftOS/Resources/upgraderesize.png b/ShiftOS/Resources/upgraderesize.png new file mode 100644 index 0000000..f57d4b4 Binary files /dev/null and b/ShiftOS/Resources/upgraderesize.png differ diff --git a/ShiftOS/Resources/upgraderollupbutton.gif b/ShiftOS/Resources/upgraderollupbutton.gif new file mode 100644 index 0000000..4157203 Binary files /dev/null and b/ShiftOS/Resources/upgraderollupbutton.gif differ diff --git a/ShiftOS/Resources/upgraderollupcommand.png b/ShiftOS/Resources/upgraderollupcommand.png new file mode 100644 index 0000000..330adb0 Binary files /dev/null and b/ShiftOS/Resources/upgraderollupcommand.png differ diff --git a/ShiftOS/Resources/upgradesecondssincemidnight.png b/ShiftOS/Resources/upgradesecondssincemidnight.png new file mode 100644 index 0000000..0bd8ae0 Binary files /dev/null and b/ShiftOS/Resources/upgradesecondssincemidnight.png differ diff --git a/ShiftOS/Resources/upgradesgameconsoles.png b/ShiftOS/Resources/upgradesgameconsoles.png new file mode 100644 index 0000000..a52fffb Binary files /dev/null and b/ShiftOS/Resources/upgradesgameconsoles.png differ diff --git a/ShiftOS/Resources/upgradeshiftapplauncher.png b/ShiftOS/Resources/upgradeshiftapplauncher.png new file mode 100644 index 0000000..db97f08 Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftapplauncher.png differ diff --git a/ShiftOS/Resources/upgradeshiftborders.png b/ShiftOS/Resources/upgradeshiftborders.png new file mode 100644 index 0000000..58f00b3 Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftborders.png differ diff --git a/ShiftOS/Resources/upgradeshiftbuttons.png b/ShiftOS/Resources/upgradeshiftbuttons.png new file mode 100644 index 0000000..a678d21 Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftbuttons.png differ diff --git a/ShiftOS/Resources/upgradeshiftdesktop.png b/ShiftOS/Resources/upgradeshiftdesktop.png new file mode 100644 index 0000000..f48296f Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftdesktop.png differ diff --git a/ShiftOS/Resources/upgradeshiftdesktoppanel.png b/ShiftOS/Resources/upgradeshiftdesktoppanel.png new file mode 100644 index 0000000..421bae5 Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftdesktoppanel.png differ diff --git a/ShiftOS/Resources/upgradeshifter.png b/ShiftOS/Resources/upgradeshifter.png new file mode 100644 index 0000000..d1b507f Binary files /dev/null and b/ShiftOS/Resources/upgradeshifter.png differ diff --git a/ShiftOS/Resources/upgradeshiftericon.png b/ShiftOS/Resources/upgradeshiftericon.png new file mode 100644 index 0000000..4c04dc1 Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftericon.png differ diff --git a/ShiftOS/Resources/upgradeshiftitems.png b/ShiftOS/Resources/upgradeshiftitems.png new file mode 100644 index 0000000..8528d3c Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftitems.png differ diff --git a/ShiftOS/Resources/upgradeshiftoriumicon.png b/ShiftOS/Resources/upgradeshiftoriumicon.png new file mode 100644 index 0000000..61247df Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftoriumicon.png differ diff --git a/ShiftOS/Resources/upgradeshiftpanelbuttons.png b/ShiftOS/Resources/upgradeshiftpanelbuttons.png new file mode 100644 index 0000000..36fc82a Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftpanelbuttons.png differ diff --git a/ShiftOS/Resources/upgradeshiftpanelclock.png b/ShiftOS/Resources/upgradeshiftpanelclock.png new file mode 100644 index 0000000..cbe4cf8 Binary files /dev/null and b/ShiftOS/Resources/upgradeshiftpanelclock.png differ diff --git a/ShiftOS/Resources/upgradeshifttitlebar.png b/ShiftOS/Resources/upgradeshifttitlebar.png new file mode 100644 index 0000000..91c8090 Binary files /dev/null and b/ShiftOS/Resources/upgradeshifttitlebar.png differ diff --git a/ShiftOS/Resources/upgradeshifttitletext.png b/ShiftOS/Resources/upgradeshifttitletext.png new file mode 100644 index 0000000..9242d9a Binary files /dev/null and b/ShiftOS/Resources/upgradeshifttitletext.png differ diff --git a/ShiftOS/Resources/upgradeshutdownicon.png b/ShiftOS/Resources/upgradeshutdownicon.png new file mode 100644 index 0000000..4ada5ca Binary files /dev/null and b/ShiftOS/Resources/upgradeshutdownicon.png differ diff --git a/ShiftOS/Resources/upgradeskicarbrands.png b/ShiftOS/Resources/upgradeskicarbrands.png new file mode 100644 index 0000000..a73d5cc Binary files /dev/null and b/ShiftOS/Resources/upgradeskicarbrands.png differ diff --git a/ShiftOS/Resources/upgradeskinning.png b/ShiftOS/Resources/upgradeskinning.png new file mode 100644 index 0000000..020de14 Binary files /dev/null and b/ShiftOS/Resources/upgradeskinning.png differ diff --git a/ShiftOS/Resources/upgradesplitsecondaccuracy.png b/ShiftOS/Resources/upgradesplitsecondaccuracy.png new file mode 100644 index 0000000..eff89a5 Binary files /dev/null and b/ShiftOS/Resources/upgradesplitsecondaccuracy.png differ diff --git a/ShiftOS/Resources/upgradesysinfo.png b/ShiftOS/Resources/upgradesysinfo.png new file mode 100644 index 0000000..42c9c13 Binary files /dev/null and b/ShiftOS/Resources/upgradesysinfo.png differ diff --git a/ShiftOS/Resources/upgradeterminalicon.png b/ShiftOS/Resources/upgradeterminalicon.png new file mode 100644 index 0000000..5c65a13 Binary files /dev/null and b/ShiftOS/Resources/upgradeterminalicon.png differ diff --git a/ShiftOS/Resources/upgradeterminalscrollbar.png b/ShiftOS/Resources/upgradeterminalscrollbar.png new file mode 100644 index 0000000..ffa3dea Binary files /dev/null and b/ShiftOS/Resources/upgradeterminalscrollbar.png differ diff --git a/ShiftOS/Resources/upgradetextpad.png b/ShiftOS/Resources/upgradetextpad.png new file mode 100644 index 0000000..03958e8 Binary files /dev/null and b/ShiftOS/Resources/upgradetextpad.png differ diff --git a/ShiftOS/Resources/upgradetextpadicon.png b/ShiftOS/Resources/upgradetextpadicon.png new file mode 100644 index 0000000..f144a8b Binary files /dev/null and b/ShiftOS/Resources/upgradetextpadicon.png differ diff --git a/ShiftOS/Resources/upgradetextpadnew.png b/ShiftOS/Resources/upgradetextpadnew.png new file mode 100644 index 0000000..8dad0ce Binary files /dev/null and b/ShiftOS/Resources/upgradetextpadnew.png differ diff --git a/ShiftOS/Resources/upgradetextpadopen.png b/ShiftOS/Resources/upgradetextpadopen.png new file mode 100644 index 0000000..c29190c Binary files /dev/null and b/ShiftOS/Resources/upgradetextpadopen.png differ diff --git a/ShiftOS/Resources/upgradetextpadsave.png b/ShiftOS/Resources/upgradetextpadsave.png new file mode 100644 index 0000000..d62d369 Binary files /dev/null and b/ShiftOS/Resources/upgradetextpadsave.png differ diff --git a/ShiftOS/Resources/upgradetitlebar.png b/ShiftOS/Resources/upgradetitlebar.png new file mode 100644 index 0000000..722b60e Binary files /dev/null and b/ShiftOS/Resources/upgradetitlebar.png differ diff --git a/ShiftOS/Resources/upgradetitletext.png b/ShiftOS/Resources/upgradetitletext.png new file mode 100644 index 0000000..e29d7d3 Binary files /dev/null and b/ShiftOS/Resources/upgradetitletext.png differ diff --git a/ShiftOS/Resources/upgradetrm.png b/ShiftOS/Resources/upgradetrm.png new file mode 100644 index 0000000..bc6f02c Binary files /dev/null and b/ShiftOS/Resources/upgradetrm.png differ diff --git a/ShiftOS/Resources/upgradeunitymode.png b/ShiftOS/Resources/upgradeunitymode.png new file mode 100644 index 0000000..24fa057 Binary files /dev/null and b/ShiftOS/Resources/upgradeunitymode.png differ diff --git a/ShiftOS/Resources/upgradeusefulpanelbuttons.png b/ShiftOS/Resources/upgradeusefulpanelbuttons.png new file mode 100644 index 0000000..6308051 Binary files /dev/null and b/ShiftOS/Resources/upgradeusefulpanelbuttons.png differ diff --git a/ShiftOS/Resources/upgradevirusscanner.png b/ShiftOS/Resources/upgradevirusscanner.png new file mode 100644 index 0000000..37e548e Binary files /dev/null and b/ShiftOS/Resources/upgradevirusscanner.png differ diff --git a/ShiftOS/Resources/upgradewindowborders.png b/ShiftOS/Resources/upgradewindowborders.png new file mode 100644 index 0000000..fb7e876 Binary files /dev/null and b/ShiftOS/Resources/upgradewindowborders.png differ diff --git a/ShiftOS/Resources/upgradewindowedterminal.png b/ShiftOS/Resources/upgradewindowedterminal.png new file mode 100644 index 0000000..2f87ce0 Binary files /dev/null and b/ShiftOS/Resources/upgradewindowedterminal.png differ diff --git a/ShiftOS/Resources/upgradewindowsanywhere.png b/ShiftOS/Resources/upgradewindowsanywhere.png new file mode 100644 index 0000000..9fa307c Binary files /dev/null and b/ShiftOS/Resources/upgradewindowsanywhere.png differ diff --git a/ShiftOS/Resources/upgradeyellow.png b/ShiftOS/Resources/upgradeyellow.png new file mode 100644 index 0000000..1e4e13d Binary files /dev/null and b/ShiftOS/Resources/upgradeyellow.png differ diff --git a/ShiftOS/Resources/upgradeyellowcustom.png b/ShiftOS/Resources/upgradeyellowcustom.png new file mode 100644 index 0000000..641b40f Binary files /dev/null and b/ShiftOS/Resources/upgradeyellowcustom.png differ diff --git a/ShiftOS/Resources/upgradeyellowshades.png b/ShiftOS/Resources/upgradeyellowshades.png new file mode 100644 index 0000000..9052945 Binary files /dev/null and b/ShiftOS/Resources/upgradeyellowshades.png differ diff --git a/ShiftOS/Resources/upgradeyellowshadeset.png b/ShiftOS/Resources/upgradeyellowshadeset.png new file mode 100644 index 0000000..05c9ada Binary files /dev/null and b/ShiftOS/Resources/upgradeyellowshadeset.png differ diff --git a/ShiftOS/Resources/webback.png b/ShiftOS/Resources/webback.png new file mode 100644 index 0000000..6e52ffc Binary files /dev/null and b/ShiftOS/Resources/webback.png differ diff --git a/ShiftOS/Resources/webforward.png b/ShiftOS/Resources/webforward.png new file mode 100644 index 0000000..eea3e76 Binary files /dev/null and b/ShiftOS/Resources/webforward.png differ diff --git a/ShiftOS/Resources/webhome.png b/ShiftOS/Resources/webhome.png new file mode 100644 index 0000000..5bb886f Binary files /dev/null and b/ShiftOS/Resources/webhome.png differ diff --git a/ShiftOS/Resources/writesound.wav b/ShiftOS/Resources/writesound.wav new file mode 100644 index 0000000..84092d0 Binary files /dev/null and b/ShiftOS/Resources/writesound.wav differ diff --git a/ShiftOS/Resources/zoombutton.png b/ShiftOS/Resources/zoombutton.png new file mode 100644 index 0000000..32e5da9 Binary files /dev/null and b/ShiftOS/Resources/zoombutton.png differ diff --git a/ShiftOS/Resources/zoombuttonpressed.png b/ShiftOS/Resources/zoombuttonpressed.png new file mode 100644 index 0000000..d82d2be Binary files /dev/null and b/ShiftOS/Resources/zoombuttonpressed.png differ diff --git a/ShiftOS/STML Test.Designer.vb b/ShiftOS/STML Test.Designer.vb new file mode 100644 index 0000000..debcc39 --- /dev/null +++ b/ShiftOS/STML Test.Designer.vb @@ -0,0 +1,38 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class STML_Test + 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() + Me.SuspendLayout() + ' + 'STML_Test + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(632, 567) + Me.Name = "STML_Test" + Me.Text = "STML_Test" + Me.TopMost = True + Me.ResumeLayout(False) + + End Sub +End Class diff --git a/ShiftOS/STML Test.resx b/ShiftOS/STML Test.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/STML Test.resx @@ -0,0 +1,120 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> +</root> \ No newline at end of file diff --git a/ShiftOS/STML Test.vb b/ShiftOS/STML Test.vb new file mode 100644 index 0000000..3119683 --- /dev/null +++ b/ShiftOS/STML Test.vb @@ -0,0 +1,54 @@ +Imports System.Xml +Imports System.IO +Imports System.Text + +Public Class STML_Test + Dim obj As Collection + Private Sub STML_Test_Load(sender As Object, e As EventArgs) Handles MyBase.Load + + Dim test As String = "Hello,50,50,500,50,text|Hello210,100,100,500,50,text".Replace(ControlChars.NewLine, "|") + parse(test) + End Sub + Private Sub parse(objs As String) + For Each tag As String In objs.Split("|") + parseobj(tag) + Next + End Sub + Private Sub parseobj(objx As String) + Dim values As String() = objx.Split(",") + Try + Select Case values(5) + Case "text" + addLabel(getLabel(New Size(values(3), values(4)), New Point(values(1), values(2)), values(0))) + Case Else + addLabel(getLabel(New Size(values(3), values(4)), New Point(values(1), values(2)), values(0))) + End Select + Catch ex As Exception + addLabel(getLabel(New Size(50, 555), New Point(0, 0), "Syntax error somewhere")) + End Try + End Sub + Private Sub addLink(lbl As TextBox, onclick As Func(Of Object, EventArgs)) + + AddHandler lbl.MouseDown, AddressOf MyTextbox_TextChanged + Me.Controls.Add(lbl) + End Sub + Private Function getLabel(size As Size, pos As Point, text As String) + Dim tb As New TextBox() + With tb + .Size = size + .Location = pos + .BorderStyle = BorderStyle.None + .ReadOnly = True + .Multiline = True + .Text = text + End With + Return tb + End Function + Private Sub addLabel(lbl As TextBox) + Me.Controls.Add(lbl) + End Sub + Private Sub MyTextbox_TextChanged(sender As Object, e As EventArgs) + MsgBox("SS") + End Sub + +End Class \ No newline at end of file diff --git a/ShiftOS/ShiftDock.Designer.vb b/ShiftOS/ShiftDock.Designer.vb new file mode 100644 index 0000000..9b6e210 --- /dev/null +++ b/ShiftOS/ShiftDock.Designer.vb @@ -0,0 +1,206 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class ShiftDock + 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() + Me.components = New System.ComponentModel.Container() + Me.dockimg = New System.Windows.Forms.PictureBox() + Me.icn1 = New System.Windows.Forms.PictureBox() + Me.icn2 = New System.Windows.Forms.PictureBox() + Me.icn3 = New System.Windows.Forms.PictureBox() + Me.icn4 = New System.Windows.Forms.PictureBox() + Me.icn5 = New System.Windows.Forms.PictureBox() + Me.icn6 = New System.Windows.Forms.PictureBox() + Me.icn7 = New System.Windows.Forms.PictureBox() + Me.icn8 = New System.Windows.Forms.PictureBox() + Me.icn9 = New System.Windows.Forms.PictureBox() + Me.mousecheck = New System.Windows.Forms.Timer(Me.components) + Me.dockanimate = New System.Windows.Forms.Timer(Me.components) + Me.Content = New System.Windows.Forms.Panel() + CType(Me.dockimg, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn3, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn4, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn5, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn6, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn7, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn8, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.icn9, System.ComponentModel.ISupportInitialize).BeginInit() + Me.Content.SuspendLayout() + Me.SuspendLayout() + ' + 'dockimg + ' + Me.dockimg.Location = New System.Drawing.Point(2, 0) + Me.dockimg.Name = "dockimg" + Me.dockimg.Size = New System.Drawing.Size(706, 23) + Me.dockimg.TabIndex = 0 + Me.dockimg.TabStop = False + ' + 'icn1 + ' + Me.icn1.Image = Global.ShiftOS.My.Resources.Resources.iconDownloader + Me.icn1.ImageLocation = "" + Me.icn1.Location = New System.Drawing.Point(59, 0) + Me.icn1.Name = "icn1" + Me.icn1.Size = New System.Drawing.Size(103, 103) + Me.icn1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn1.TabIndex = 1 + Me.icn1.TabStop = False + ' + 'icn2 + ' + Me.icn2.Location = New System.Drawing.Point(195, 0) + Me.icn2.Name = "icn2" + Me.icn2.Size = New System.Drawing.Size(103, 103) + Me.icn2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn2.TabIndex = 2 + Me.icn2.TabStop = False + ' + 'icn3 + ' + Me.icn3.Location = New System.Drawing.Point(0, 0) + Me.icn3.Name = "icn3" + Me.icn3.Size = New System.Drawing.Size(103, 103) + Me.icn3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn3.TabIndex = 3 + Me.icn3.TabStop = False + ' + 'icn4 + ' + Me.icn4.Location = New System.Drawing.Point(0, 0) + Me.icn4.Name = "icn4" + Me.icn4.Size = New System.Drawing.Size(103, 103) + Me.icn4.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn4.TabIndex = 4 + Me.icn4.TabStop = False + ' + 'icn5 + ' + Me.icn5.Location = New System.Drawing.Point(0, 0) + Me.icn5.Name = "icn5" + Me.icn5.Size = New System.Drawing.Size(103, 103) + Me.icn5.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn5.TabIndex = 5 + Me.icn5.TabStop = False + ' + 'icn6 + ' + Me.icn6.Location = New System.Drawing.Point(0, 0) + Me.icn6.Name = "icn6" + Me.icn6.Size = New System.Drawing.Size(103, 103) + Me.icn6.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn6.TabIndex = 6 + Me.icn6.TabStop = False + ' + 'icn7 + ' + Me.icn7.Location = New System.Drawing.Point(0, 0) + Me.icn7.Name = "icn7" + Me.icn7.Size = New System.Drawing.Size(103, 103) + Me.icn7.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn7.TabIndex = 7 + Me.icn7.TabStop = False + ' + 'icn8 + ' + Me.icn8.Location = New System.Drawing.Point(0, 0) + Me.icn8.Name = "icn8" + Me.icn8.Size = New System.Drawing.Size(103, 103) + Me.icn8.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn8.TabIndex = 8 + Me.icn8.TabStop = False + ' + 'icn9 + ' + Me.icn9.Location = New System.Drawing.Point(1111, -6) + Me.icn9.Name = "icn9" + Me.icn9.Size = New System.Drawing.Size(103, 103) + Me.icn9.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.icn9.TabIndex = 9 + Me.icn9.TabStop = False + ' + 'mousecheck + ' + ' + 'dockanimate + ' + Me.dockanimate.Interval = 10 + ' + 'Content + ' + Me.Content.Controls.Add(Me.icn1) + Me.Content.Controls.Add(Me.icn9) + Me.Content.Controls.Add(Me.icn8) + Me.Content.Controls.Add(Me.icn7) + Me.Content.Controls.Add(Me.icn6) + Me.Content.Controls.Add(Me.icn5) + Me.Content.Controls.Add(Me.icn4) + Me.Content.Controls.Add(Me.icn3) + Me.Content.Controls.Add(Me.icn2) + Me.Content.Controls.Add(Me.dockimg) + Me.Content.Location = New System.Drawing.Point(2, 0) + Me.Content.Name = "Content" + Me.Content.Size = New System.Drawing.Size(1263, 100) + Me.Content.TabIndex = 10 + ' + 'ShiftDock + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(1, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(1, Byte), Integer)) + Me.ClientSize = New System.Drawing.Size(1263, 103) + Me.Controls.Add(Me.Content) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "ShiftDock" + Me.Text = "Dock" + Me.TopMost = True + Me.TransparencyKey = System.Drawing.Color.FromArgb(CType(CType(1, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(1, Byte), Integer)) + CType(Me.dockimg, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn3, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn4, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn5, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn6, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn7, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn8, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.icn9, System.ComponentModel.ISupportInitialize).EndInit() + Me.Content.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents dockimg As System.Windows.Forms.PictureBox + Friend WithEvents icn1 As System.Windows.Forms.PictureBox + Friend WithEvents icn2 As System.Windows.Forms.PictureBox + Friend WithEvents icn3 As System.Windows.Forms.PictureBox + Friend WithEvents icn4 As System.Windows.Forms.PictureBox + Friend WithEvents icn5 As System.Windows.Forms.PictureBox + Friend WithEvents icn6 As System.Windows.Forms.PictureBox + Friend WithEvents icn7 As System.Windows.Forms.PictureBox + Friend WithEvents icn8 As System.Windows.Forms.PictureBox + Friend WithEvents icn9 As System.Windows.Forms.PictureBox + Friend WithEvents mousecheck As System.Windows.Forms.Timer + Friend WithEvents dockanimate As System.Windows.Forms.Timer + Friend WithEvents Content As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/ShiftDock.resx b/ShiftOS/ShiftDock.resx new file mode 100644 index 0000000..6784a32 --- /dev/null +++ b/ShiftOS/ShiftDock.resx @@ -0,0 +1,126 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="mousecheck.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> + <metadata name="dockanimate.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>136, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/ShiftDock.vb b/ShiftOS/ShiftDock.vb new file mode 100644 index 0000000..b11b506 --- /dev/null +++ b/ShiftOS/ShiftDock.vb @@ -0,0 +1,73 @@ +Public Class ShiftDock + Dim uod As Integer = 5 + Private Sub ShiftDock_Load(sender As Object, e As EventArgs) Handles MyBase.Load + mousecheck.Start() + Me.Location = New Point((Screen.PrimaryScreen.Bounds.Width / 2) - (Me.Width / 2), Screen.PrimaryScreen.Bounds.Height - Me.Height) + End Sub + + Private Sub icn1_Click(sender As Object, e As EventArgs) Handles icn1.Click + Downloader.Show() + End Sub + + Private Sub icn2_Click(sender As Object, e As EventArgs) Handles icn2.Click + + End Sub + + Private Sub icn3_Click(sender As Object, e As EventArgs) Handles icn3.Click + + End Sub + + Private Sub icn4_Click(sender As Object, e As EventArgs) Handles icn4.Click + + End Sub + + Private Sub icn5_Click(sender As Object, e As EventArgs) Handles icn5.Click + + End Sub + + Private Sub icn6_Click(sender As Object, e As EventArgs) Handles icn6.Click + + End Sub + + Private Sub icn7_Click(sender As Object, e As EventArgs) Handles icn7.Click + + End Sub + + Private Sub icn8_Click(sender As Object, e As EventArgs) Handles icn8.Click + + End Sub + + Private Sub icn9_Click(sender As Object, e As EventArgs) Handles icn9.Click + + End Sub + + Private Sub mousecheck_Tick(sender As Object, e As EventArgs) Handles mousecheck.Tick + If (Cursor.Position.Y > Screen.PrimaryScreen.Bounds.Height - 20) And uod > 1 Then + uod = -5 + dockanimate.Start() + mousecheck.Stop() + ElseIf (Cursor.Position.Y < Screen.PrimaryScreen.Bounds.Height - Me.Height) And uod < 1 Then + uod = 5 + dockanimate.Start() + mousecheck.Stop() + End If + dockimg.Width = Me.Width + dockimg.Height = Me.Height + Content.Width = Me.Width + Content.Height = Me.Height + End Sub + + Private Sub dockanimate_Tick(sender As Object, e As EventArgs) Handles dockanimate.Tick + Content.Location = New Point(Content.Location.X, Content.Location.Y + uod) + uod = uod + uod + If (Content.Location.Y < 0) Then + Content.Location = New Point(Content.Location.X, 0) + dockanimate.Stop() + mousecheck.Start() + ElseIf (Content.Location.Y > Me.Height) Then + Content.Location = New Point(Content.Location.X, Me.Height) + dockanimate.Stop() + mousecheck.Start() + End If + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/ShiftOS Save File Converter.Designer.vb b/ShiftOS/ShiftOS Save File Converter.Designer.vb new file mode 100644 index 0000000..6dc846b --- /dev/null +++ b/ShiftOS/ShiftOS Save File Converter.Designer.vb @@ -0,0 +1,92 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class ShiftOS_Save_File_Converter + 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(ShiftOS_Save_File_Converter)) + Me.Label1 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.btnconvert = New System.Windows.Forms.Button() + Me.btncancel = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Label1 + ' + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(12, 40) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(301, 141) + Me.Label1.TabIndex = 0 + Me.Label1.Text = resources.GetString("Label1.Text") + Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 21.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(70, 9) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(189, 33) + Me.Label2.TabIndex = 1 + Me.Label2.Text = "0.0.7 > 0.0.8" + ' + 'btnconvert + ' + Me.btnconvert.Location = New System.Drawing.Point(12, 186) + Me.btnconvert.Name = "btnconvert" + Me.btnconvert.Size = New System.Drawing.Size(159, 29) + Me.btnconvert.TabIndex = 2 + Me.btnconvert.Text = "Convert" + Me.btnconvert.UseVisualStyleBackColor = True + ' + 'btncancel + ' + Me.btncancel.Location = New System.Drawing.Point(177, 186) + Me.btncancel.Name = "btncancel" + Me.btncancel.Size = New System.Drawing.Size(137, 29) + Me.btncancel.TabIndex = 3 + Me.btncancel.Text = "Cancel" + Me.btncancel.UseVisualStyleBackColor = True + ' + 'ShiftOS_Save_File_Converter + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(326, 222) + Me.Controls.Add(Me.btncancel) + Me.Controls.Add(Me.btnconvert) + Me.Controls.Add(Me.Label2) + Me.Controls.Add(Me.Label1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle + Me.Name = "ShiftOS_Save_File_Converter" + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "ShiftOS Save File Converter" + Me.TopMost = True + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents btnconvert As System.Windows.Forms.Button + Friend WithEvents btncancel As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/ShiftOS Save File Converter.resx b/ShiftOS/ShiftOS Save File Converter.resx new file mode 100644 index 0000000..0b57e5f --- /dev/null +++ b/ShiftOS/ShiftOS Save File Converter.resx @@ -0,0 +1,125 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <data name="Label1.Text" xml:space="preserve"> + <value>Welcome to the ShiftOS Save File Converter. This program is used to convert ShiftOS 0.0.7 save files into ShiftOS 0.0.8 save files. + +If your current ShiftOS save file is not used with ShiftOS 0.0.7 please cancel this conversion process. This converter will only convert 0.0.7 save files into files compatible with ShiftOS 0.0.8.</value> + </data> +</root> \ No newline at end of file diff --git a/ShiftOS/ShiftOS Save File Converter.vb b/ShiftOS/ShiftOS Save File Converter.vb new file mode 100644 index 0000000..a69b6ef --- /dev/null +++ b/ShiftOS/ShiftOS Save File Converter.vb @@ -0,0 +1,595 @@ +Public Class ShiftOS_Save_File_Converter + Dim loadlines(2000) As String + Public ShiftOSPath As String = "C:\ShiftOS\" + + 'Required for encryption of save files + Private Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Integer) As Integer + Public Const sSecretKey As String = "Password" + + Private Sub btnconvert_Click(sender As Object, e As EventArgs) Handles btnconvert.Click + + 'This converter works by loading the 0.0.7 save file with old 0.0.7 code, then calling the shiftosdesktop.savegame sub. This saves the old data in new format since it is loaded into public variables as well as saving the new stuff with their default values. + + loadold() + Me.Close() + End Sub + + Private Sub loadold() + If IO.File.ReadAllText("C:/ShiftOS/Shiftum42/HDAccess.sft") = "0.0.7" Then + File_Crypt.DecryptFile("C:/ShiftOS/Shiftum42/SKernal.sft", ShiftOSPath + "Shiftum42\Drivers\HDD.dri", sSecretKey) + loadlines = IO.File.ReadAllLines(ShiftOSPath + "Shiftum42\Drivers\HDD.dri") + + If loadlines(0) = 11 Then ShiftOSDesktop.boughttitlebar = True Else ShiftOSDesktop.boughttitlebar = False + If loadlines(1) = 11 Then ShiftOSDesktop.boughtgray = True Else ShiftOSDesktop.boughtgray = False + If loadlines(2) = 11 Then ShiftOSDesktop.boughtsecondspastmidnight = True Else ShiftOSDesktop.boughtsecondspastmidnight = False + If loadlines(3) = 11 Then ShiftOSDesktop.boughtminutespastmidnight = True Else ShiftOSDesktop.boughtminutespastmidnight = False + If loadlines(4) = 11 Then ShiftOSDesktop.boughthourspastmidnight = True Else ShiftOSDesktop.boughthourspastmidnight = False + If loadlines(5) = 11 Then ShiftOSDesktop.boughtcustomusername = True Else ShiftOSDesktop.boughtcustomusername = False + If loadlines(6) = 11 Then ShiftOSDesktop.boughtwindowsanywhere = True Else ShiftOSDesktop.boughtwindowsanywhere = False + If loadlines(7) = 11 Then ShiftOSDesktop.boughtmultitasking = True Else ShiftOSDesktop.boughtmultitasking = False + If loadlines(8) = 11 Then ShiftOSDesktop.boughtautoscrollterminal = True Else ShiftOSDesktop.boughtautoscrollterminal = False + ShiftOSDesktop.codepoints = loadlines(9) + If loadlines(10) = 11 Then ShiftOSDesktop.boughtmovablewindows = True Else ShiftOSDesktop.boughtmovablewindows = False + If loadlines(11) = 11 Then ShiftOSDesktop.boughtdraggablewindows = True Else ShiftOSDesktop.boughtdraggablewindows = False + If loadlines(12) = 11 Then ShiftOSDesktop.boughtwindowborders = True Else ShiftOSDesktop.boughtwindowborders = False + If loadlines(13) = 11 Then ShiftOSDesktop.boughtpmandam = True Else ShiftOSDesktop.boughtpmandam = False + If loadlines(14) = 11 Then ShiftOSDesktop.boughtminuteaccuracytime = True Else ShiftOSDesktop.boughtminuteaccuracytime = False + If loadlines(15) = 11 Then ShiftOSDesktop.boughtsplitsecondtime = True Else ShiftOSDesktop.boughtsplitsecondtime = False + If loadlines(16) = 11 Then ShiftOSDesktop.boughttitletext = True Else ShiftOSDesktop.boughttitletext = False + If loadlines(17) = 11 Then ShiftOSDesktop.boughtclosebutton = True Else ShiftOSDesktop.boughtclosebutton = False + If loadlines(18) = 11 Then ShiftOSDesktop.boughtdesktoppanel = True Else ShiftOSDesktop.boughtdesktoppanel = False + If loadlines(19) = 11 Then ShiftOSDesktop.boughtclock = True Else ShiftOSDesktop.boughtclock = False + If loadlines(20) = 11 Then ShiftOSDesktop.boughtwindowedterminal = True Else ShiftOSDesktop.boughtwindowedterminal = False + If loadlines(21) = 11 Then ShiftOSDesktop.boughtapplaunchermenu = True Else ShiftOSDesktop.boughtapplaunchermenu = False + If loadlines(22) = 11 Then ShiftOSDesktop.boughtalknowledgeinput = True Else ShiftOSDesktop.boughtalknowledgeinput = False + If loadlines(23) = 11 Then ShiftOSDesktop.boughtalclock = True Else ShiftOSDesktop.boughtalclock = False + If loadlines(24) = 11 Then ShiftOSDesktop.boughtalshiftorium = True Else ShiftOSDesktop.boughtalshiftorium = False + If loadlines(25) = 11 Then ShiftOSDesktop.boughtapplaunchershutdown = True Else ShiftOSDesktop.boughtapplaunchershutdown = False + If loadlines(26) = 11 Then ShiftOSDesktop.boughtdesktoppanelclock = True Else ShiftOSDesktop.boughtdesktoppanelclock = False + If loadlines(27) = 11 Then ShiftOSDesktop.boughtterminalscrollbar = True Else ShiftOSDesktop.boughtterminalscrollbar = False + If loadlines(28) = 11 Then ShiftOSDesktop.boughtkiaddons = True Else ShiftOSDesktop.boughtkiaddons = False + If loadlines(29) = 11 Then ShiftOSDesktop.boughtkicarbrands = True Else ShiftOSDesktop.boughtkicarbrands = False + If loadlines(30) = 11 Then ShiftOSDesktop.boughtkigameconsoles = True Else ShiftOSDesktop.boughtkigameconsoles = False + ShiftOSDesktop.username = loadlines(31) + If loadlines(32) = 11 Then ShiftOSDesktop.terminalfullscreen = True Else ShiftOSDesktop.terminalfullscreen = False + If loadlines(33) = 11 Then ShiftOSDesktop.boughtshifter = True Else ShiftOSDesktop.boughtshifter = False + If loadlines(34) = 11 Then ShiftOSDesktop.boughtalshifter = True Else ShiftOSDesktop.boughtalshifter = False + If loadlines(35) = 11 Then ShiftOSDesktop.boughtrollupcommand = True Else ShiftOSDesktop.boughtrollupcommand = False + If loadlines(36) = 11 Then ShiftOSDesktop.boughtrollupbutton = True Else ShiftOSDesktop.boughtrollupbutton = False + If loadlines(37) = 11 Then ShiftOSDesktop.boughtshiftdesktop = True Else ShiftOSDesktop.boughtshiftdesktop = False + If loadlines(38) = 11 Then ShiftOSDesktop.boughtshiftpanelclock = True Else ShiftOSDesktop.boughtshiftpanelclock = False + If loadlines(39) = 11 Then ShiftOSDesktop.boughtshiftapplauncher = True Else ShiftOSDesktop.boughtshiftapplauncher = False + If loadlines(40) = 11 Then ShiftOSDesktop.boughtshiftdesktoppanel = True Else ShiftOSDesktop.boughtshiftdesktoppanel = False + If loadlines(41) = 11 Then ShiftOSDesktop.boughtshifttitlebar = True Else ShiftOSDesktop.boughtshifttitlebar = False + If loadlines(42) = 11 Then ShiftOSDesktop.boughtshifttitletext = True Else ShiftOSDesktop.boughtshifttitletext = False + If loadlines(43) = 11 Then ShiftOSDesktop.boughtshifttitlebuttons = True Else ShiftOSDesktop.boughtshifttitlebuttons = False + If loadlines(44) = 11 Then ShiftOSDesktop.boughtshiftborders = True Else ShiftOSDesktop.boughtshiftborders = False + If loadlines(45) = 11 Then ShiftOSDesktop.boughtgray2 = True Else ShiftOSDesktop.boughtgray2 = False + If loadlines(46) = 11 Then ShiftOSDesktop.boughtgray3 = True Else ShiftOSDesktop.boughtgray3 = False + If loadlines(47) = 11 Then ShiftOSDesktop.boughtgray4 = True Else ShiftOSDesktop.boughtgray4 = False + If loadlines(48) = 11 Then ShiftOSDesktop.boughtanycolour = True Else ShiftOSDesktop.boughtanycolour = False + If loadlines(49) = 11 Then ShiftOSDesktop.boughtanycolour2 = True Else ShiftOSDesktop.boughtanycolour2 = False + If loadlines(50) = 11 Then ShiftOSDesktop.boughtanycolour3 = True Else ShiftOSDesktop.boughtanycolour3 = False + If loadlines(51) = 11 Then ShiftOSDesktop.boughtanycolour4 = True Else ShiftOSDesktop.boughtanycolour4 = False + If loadlines(52) = 11 Then ShiftOSDesktop.boughtpurple = True Else ShiftOSDesktop.boughtpurple = False + If loadlines(53) = 11 Then ShiftOSDesktop.boughtpurple2 = True Else ShiftOSDesktop.boughtpurple2 = False + If loadlines(54) = 11 Then ShiftOSDesktop.boughtpurple3 = True Else ShiftOSDesktop.boughtpurple3 = False + If loadlines(55) = 11 Then ShiftOSDesktop.boughtpurple4 = True Else ShiftOSDesktop.boughtpurple4 = False + If loadlines(56) = 11 Then ShiftOSDesktop.boughtblue = True Else ShiftOSDesktop.boughtblue = False + If loadlines(57) = 11 Then ShiftOSDesktop.boughtblue2 = True Else ShiftOSDesktop.boughtblue2 = False + If loadlines(58) = 11 Then ShiftOSDesktop.boughtblue3 = True Else ShiftOSDesktop.boughtblue3 = False + If loadlines(59) = 11 Then ShiftOSDesktop.boughtblue4 = True Else ShiftOSDesktop.boughtblue4 = False + If loadlines(60) = 11 Then ShiftOSDesktop.boughtgreen = True Else ShiftOSDesktop.boughtgreen = False + If loadlines(61) = 11 Then ShiftOSDesktop.boughtgreen2 = True Else ShiftOSDesktop.boughtgreen2 = False + If loadlines(62) = 11 Then ShiftOSDesktop.boughtgreen3 = True Else ShiftOSDesktop.boughtgreen3 = False + If loadlines(63) = 11 Then ShiftOSDesktop.boughtgreen4 = True Else ShiftOSDesktop.boughtgreen4 = False + If loadlines(64) = 11 Then ShiftOSDesktop.boughtyellow = True Else ShiftOSDesktop.boughtyellow = False + If loadlines(65) = 11 Then ShiftOSDesktop.boughtyellow2 = True Else ShiftOSDesktop.boughtyellow2 = False + If loadlines(66) = 11 Then ShiftOSDesktop.boughtyellow3 = True Else ShiftOSDesktop.boughtyellow3 = False + If loadlines(67) = 11 Then ShiftOSDesktop.boughtyellow4 = True Else ShiftOSDesktop.boughtyellow4 = False + If loadlines(68) = 11 Then ShiftOSDesktop.boughtorange = True Else ShiftOSDesktop.boughtorange = False + If loadlines(69) = 11 Then ShiftOSDesktop.boughtorange2 = True Else ShiftOSDesktop.boughtorange2 = False + If loadlines(70) = 11 Then ShiftOSDesktop.boughtorange3 = True Else ShiftOSDesktop.boughtorange3 = False + If loadlines(71) = 11 Then ShiftOSDesktop.boughtorange4 = True Else ShiftOSDesktop.boughtorange4 = False + If loadlines(72) = 11 Then ShiftOSDesktop.boughtbrown = True Else ShiftOSDesktop.boughtbrown = False + If loadlines(73) = 11 Then ShiftOSDesktop.boughtbrown2 = True Else ShiftOSDesktop.boughtbrown2 = False + If loadlines(74) = 11 Then ShiftOSDesktop.boughtbrown3 = True Else ShiftOSDesktop.boughtbrown3 = False + If loadlines(75) = 11 Then ShiftOSDesktop.boughtbrown4 = True Else ShiftOSDesktop.boughtbrown4 = False + If loadlines(76) = 11 Then ShiftOSDesktop.boughtred = True Else ShiftOSDesktop.boughtred = False + If loadlines(77) = 11 Then ShiftOSDesktop.boughtred2 = True Else ShiftOSDesktop.boughtred2 = False + If loadlines(78) = 11 Then ShiftOSDesktop.boughtred3 = True Else ShiftOSDesktop.boughtred3 = False + If loadlines(79) = 11 Then ShiftOSDesktop.boughtred4 = True Else ShiftOSDesktop.boughtred4 = False + If loadlines(80) = 11 Then ShiftOSDesktop.boughtpink = True Else ShiftOSDesktop.boughtpink = False + If loadlines(81) = 11 Then ShiftOSDesktop.boughtpink2 = True Else ShiftOSDesktop.boughtpink2 = False + If loadlines(82) = 11 Then ShiftOSDesktop.boughtpink3 = True Else ShiftOSDesktop.boughtpink3 = False + If loadlines(83) = 11 Then ShiftOSDesktop.boughtpink4 = True Else ShiftOSDesktop.boughtpink4 = False + ShiftOSDesktop.anymemory(0) = Color.FromArgb(loadlines(84)) + ShiftOSDesktop.anymemory(1) = Color.FromArgb(loadlines(85)) + ShiftOSDesktop.anymemory(2) = Color.FromArgb(loadlines(86)) + ShiftOSDesktop.anymemory(3) = Color.FromArgb(loadlines(87)) + ShiftOSDesktop.anymemory(4) = Color.FromArgb(loadlines(88)) + ShiftOSDesktop.anymemory(5) = Color.FromArgb(loadlines(89)) + ShiftOSDesktop.anymemory(6) = Color.FromArgb(loadlines(90)) + ShiftOSDesktop.anymemory(7) = Color.FromArgb(loadlines(91)) + ShiftOSDesktop.anymemory(8) = Color.FromArgb(loadlines(92)) + ShiftOSDesktop.anymemory(9) = Color.FromArgb(loadlines(93)) + ShiftOSDesktop.anymemory(10) = Color.FromArgb(loadlines(94)) + ShiftOSDesktop.anymemory(11) = Color.FromArgb(loadlines(95)) + ShiftOSDesktop.anymemory(12) = Color.FromArgb(loadlines(96)) + ShiftOSDesktop.anymemory(13) = Color.FromArgb(loadlines(97)) + ShiftOSDesktop.anymemory(14) = Color.FromArgb(loadlines(98)) + ShiftOSDesktop.anymemory(15) = Color.FromArgb(loadlines(99)) + ShiftOSDesktop.graymemory(0) = Color.FromArgb(loadlines(100)) + ShiftOSDesktop.graymemory(1) = Color.FromArgb(loadlines(101)) + ShiftOSDesktop.graymemory(2) = Color.FromArgb(loadlines(102)) + ShiftOSDesktop.graymemory(3) = Color.FromArgb(loadlines(103)) + ShiftOSDesktop.graymemory(4) = Color.FromArgb(loadlines(104)) + ShiftOSDesktop.graymemory(5) = Color.FromArgb(loadlines(105)) + ShiftOSDesktop.graymemory(6) = Color.FromArgb(loadlines(106)) + ShiftOSDesktop.graymemory(7) = Color.FromArgb(loadlines(107)) + ShiftOSDesktop.graymemory(8) = Color.FromArgb(loadlines(108)) + ShiftOSDesktop.graymemory(9) = Color.FromArgb(loadlines(109)) + ShiftOSDesktop.graymemory(10) = Color.FromArgb(loadlines(110)) + ShiftOSDesktop.graymemory(11) = Color.FromArgb(loadlines(111)) + ShiftOSDesktop.graymemory(12) = Color.FromArgb(loadlines(112)) + ShiftOSDesktop.graymemory(13) = Color.FromArgb(loadlines(113)) + ShiftOSDesktop.graymemory(14) = Color.FromArgb(loadlines(114)) + ShiftOSDesktop.graymemory(15) = Color.FromArgb(loadlines(115)) + ShiftOSDesktop.purplememory(0) = Color.FromArgb(loadlines(116)) + ShiftOSDesktop.purplememory(1) = Color.FromArgb(loadlines(117)) + ShiftOSDesktop.purplememory(2) = Color.FromArgb(loadlines(118)) + ShiftOSDesktop.purplememory(3) = Color.FromArgb(loadlines(119)) + ShiftOSDesktop.purplememory(4) = Color.FromArgb(loadlines(120)) + ShiftOSDesktop.purplememory(5) = Color.FromArgb(loadlines(121)) + ShiftOSDesktop.purplememory(6) = Color.FromArgb(loadlines(122)) + ShiftOSDesktop.purplememory(7) = Color.FromArgb(loadlines(123)) + ShiftOSDesktop.purplememory(8) = Color.FromArgb(loadlines(124)) + ShiftOSDesktop.purplememory(9) = Color.FromArgb(loadlines(125)) + ShiftOSDesktop.purplememory(10) = Color.FromArgb(loadlines(126)) + ShiftOSDesktop.purplememory(11) = Color.FromArgb(loadlines(127)) + ShiftOSDesktop.purplememory(12) = Color.FromArgb(loadlines(128)) + ShiftOSDesktop.purplememory(13) = Color.FromArgb(loadlines(129)) + ShiftOSDesktop.purplememory(14) = Color.FromArgb(loadlines(130)) + ShiftOSDesktop.purplememory(15) = Color.FromArgb(loadlines(131)) + ShiftOSDesktop.bluememory(0) = Color.FromArgb(loadlines(132)) + ShiftOSDesktop.bluememory(1) = Color.FromArgb(loadlines(133)) + ShiftOSDesktop.bluememory(2) = Color.FromArgb(loadlines(134)) + ShiftOSDesktop.bluememory(3) = Color.FromArgb(loadlines(135)) + ShiftOSDesktop.bluememory(4) = Color.FromArgb(loadlines(136)) + ShiftOSDesktop.bluememory(5) = Color.FromArgb(loadlines(137)) + ShiftOSDesktop.bluememory(6) = Color.FromArgb(loadlines(138)) + ShiftOSDesktop.bluememory(7) = Color.FromArgb(loadlines(139)) + ShiftOSDesktop.bluememory(8) = Color.FromArgb(loadlines(140)) + ShiftOSDesktop.bluememory(9) = Color.FromArgb(loadlines(141)) + ShiftOSDesktop.bluememory(10) = Color.FromArgb(loadlines(142)) + ShiftOSDesktop.bluememory(11) = Color.FromArgb(loadlines(143)) + ShiftOSDesktop.bluememory(12) = Color.FromArgb(loadlines(144)) + ShiftOSDesktop.bluememory(13) = Color.FromArgb(loadlines(145)) + ShiftOSDesktop.bluememory(14) = Color.FromArgb(loadlines(146)) + ShiftOSDesktop.bluememory(15) = Color.FromArgb(loadlines(147)) + ShiftOSDesktop.greenmemory(0) = Color.FromArgb(loadlines(148)) + ShiftOSDesktop.greenmemory(1) = Color.FromArgb(loadlines(149)) + ShiftOSDesktop.greenmemory(2) = Color.FromArgb(loadlines(150)) + ShiftOSDesktop.greenmemory(3) = Color.FromArgb(loadlines(151)) + ShiftOSDesktop.greenmemory(4) = Color.FromArgb(loadlines(152)) + ShiftOSDesktop.greenmemory(5) = Color.FromArgb(loadlines(153)) + ShiftOSDesktop.greenmemory(6) = Color.FromArgb(loadlines(154)) + ShiftOSDesktop.greenmemory(7) = Color.FromArgb(loadlines(155)) + ShiftOSDesktop.greenmemory(8) = Color.FromArgb(loadlines(156)) + ShiftOSDesktop.greenmemory(9) = Color.FromArgb(loadlines(157)) + ShiftOSDesktop.greenmemory(10) = Color.FromArgb(loadlines(158)) + ShiftOSDesktop.greenmemory(11) = Color.FromArgb(loadlines(159)) + ShiftOSDesktop.greenmemory(12) = Color.FromArgb(loadlines(160)) + ShiftOSDesktop.greenmemory(13) = Color.FromArgb(loadlines(161)) + ShiftOSDesktop.greenmemory(14) = Color.FromArgb(loadlines(162)) + ShiftOSDesktop.greenmemory(15) = Color.FromArgb(loadlines(163)) + ShiftOSDesktop.yellowmemory(0) = Color.FromArgb(loadlines(164)) + ShiftOSDesktop.yellowmemory(1) = Color.FromArgb(loadlines(165)) + ShiftOSDesktop.yellowmemory(2) = Color.FromArgb(loadlines(166)) + ShiftOSDesktop.yellowmemory(3) = Color.FromArgb(loadlines(167)) + ShiftOSDesktop.yellowmemory(4) = Color.FromArgb(loadlines(168)) + ShiftOSDesktop.yellowmemory(5) = Color.FromArgb(loadlines(169)) + ShiftOSDesktop.yellowmemory(6) = Color.FromArgb(loadlines(170)) + ShiftOSDesktop.yellowmemory(7) = Color.FromArgb(loadlines(171)) + ShiftOSDesktop.yellowmemory(8) = Color.FromArgb(loadlines(172)) + ShiftOSDesktop.yellowmemory(9) = Color.FromArgb(loadlines(173)) + ShiftOSDesktop.yellowmemory(10) = Color.FromArgb(loadlines(174)) + ShiftOSDesktop.yellowmemory(11) = Color.FromArgb(loadlines(175)) + ShiftOSDesktop.yellowmemory(12) = Color.FromArgb(loadlines(176)) + ShiftOSDesktop.yellowmemory(13) = Color.FromArgb(loadlines(177)) + ShiftOSDesktop.yellowmemory(14) = Color.FromArgb(loadlines(178)) + ShiftOSDesktop.yellowmemory(15) = Color.FromArgb(loadlines(179)) + ShiftOSDesktop.orangememory(0) = Color.FromArgb(loadlines(180)) + ShiftOSDesktop.orangememory(1) = Color.FromArgb(loadlines(181)) + ShiftOSDesktop.orangememory(2) = Color.FromArgb(loadlines(182)) + ShiftOSDesktop.orangememory(3) = Color.FromArgb(loadlines(183)) + ShiftOSDesktop.orangememory(4) = Color.FromArgb(loadlines(184)) + ShiftOSDesktop.orangememory(5) = Color.FromArgb(loadlines(185)) + ShiftOSDesktop.orangememory(6) = Color.FromArgb(loadlines(186)) + ShiftOSDesktop.orangememory(7) = Color.FromArgb(loadlines(187)) + ShiftOSDesktop.orangememory(8) = Color.FromArgb(loadlines(188)) + ShiftOSDesktop.orangememory(9) = Color.FromArgb(loadlines(189)) + ShiftOSDesktop.orangememory(10) = Color.FromArgb(loadlines(190)) + ShiftOSDesktop.orangememory(11) = Color.FromArgb(loadlines(191)) + ShiftOSDesktop.orangememory(12) = Color.FromArgb(loadlines(192)) + ShiftOSDesktop.orangememory(13) = Color.FromArgb(loadlines(193)) + ShiftOSDesktop.orangememory(14) = Color.FromArgb(loadlines(194)) + ShiftOSDesktop.orangememory(15) = Color.FromArgb(loadlines(195)) + ShiftOSDesktop.brownmemory(0) = Color.FromArgb(loadlines(196)) + ShiftOSDesktop.brownmemory(1) = Color.FromArgb(loadlines(197)) + ShiftOSDesktop.brownmemory(2) = Color.FromArgb(loadlines(198)) + ShiftOSDesktop.brownmemory(3) = Color.FromArgb(loadlines(199)) + ShiftOSDesktop.brownmemory(4) = Color.FromArgb(loadlines(200)) + ShiftOSDesktop.brownmemory(5) = Color.FromArgb(loadlines(201)) + ShiftOSDesktop.brownmemory(6) = Color.FromArgb(loadlines(202)) + ShiftOSDesktop.brownmemory(7) = Color.FromArgb(loadlines(203)) + ShiftOSDesktop.brownmemory(8) = Color.FromArgb(loadlines(204)) + ShiftOSDesktop.brownmemory(9) = Color.FromArgb(loadlines(205)) + ShiftOSDesktop.brownmemory(10) = Color.FromArgb(loadlines(206)) + ShiftOSDesktop.brownmemory(11) = Color.FromArgb(loadlines(207)) + ShiftOSDesktop.brownmemory(12) = Color.FromArgb(loadlines(208)) + ShiftOSDesktop.brownmemory(13) = Color.FromArgb(loadlines(209)) + ShiftOSDesktop.brownmemory(14) = Color.FromArgb(loadlines(210)) + ShiftOSDesktop.brownmemory(15) = Color.FromArgb(loadlines(211)) + ShiftOSDesktop.redmemory(0) = Color.FromArgb(loadlines(212)) + ShiftOSDesktop.redmemory(1) = Color.FromArgb(loadlines(213)) + ShiftOSDesktop.redmemory(2) = Color.FromArgb(loadlines(214)) + ShiftOSDesktop.redmemory(3) = Color.FromArgb(loadlines(215)) + ShiftOSDesktop.redmemory(4) = Color.FromArgb(loadlines(216)) + ShiftOSDesktop.redmemory(5) = Color.FromArgb(loadlines(217)) + ShiftOSDesktop.redmemory(6) = Color.FromArgb(loadlines(218)) + ShiftOSDesktop.redmemory(7) = Color.FromArgb(loadlines(219)) + ShiftOSDesktop.redmemory(8) = Color.FromArgb(loadlines(220)) + ShiftOSDesktop.redmemory(9) = Color.FromArgb(loadlines(221)) + ShiftOSDesktop.redmemory(10) = Color.FromArgb(loadlines(222)) + ShiftOSDesktop.redmemory(11) = Color.FromArgb(loadlines(223)) + ShiftOSDesktop.redmemory(12) = Color.FromArgb(loadlines(224)) + ShiftOSDesktop.redmemory(13) = Color.FromArgb(loadlines(225)) + ShiftOSDesktop.redmemory(14) = Color.FromArgb(loadlines(226)) + ShiftOSDesktop.redmemory(15) = Color.FromArgb(loadlines(227)) + ShiftOSDesktop.pinkmemory(0) = Color.FromArgb(loadlines(228)) + ShiftOSDesktop.pinkmemory(1) = Color.FromArgb(loadlines(229)) + ShiftOSDesktop.pinkmemory(2) = Color.FromArgb(loadlines(230)) + ShiftOSDesktop.pinkmemory(3) = Color.FromArgb(loadlines(231)) + ShiftOSDesktop.pinkmemory(4) = Color.FromArgb(loadlines(232)) + ShiftOSDesktop.pinkmemory(5) = Color.FromArgb(loadlines(233)) + ShiftOSDesktop.pinkmemory(6) = Color.FromArgb(loadlines(234)) + ShiftOSDesktop.pinkmemory(7) = Color.FromArgb(loadlines(235)) + ShiftOSDesktop.pinkmemory(8) = Color.FromArgb(loadlines(236)) + ShiftOSDesktop.pinkmemory(9) = Color.FromArgb(loadlines(237)) + ShiftOSDesktop.pinkmemory(10) = Color.FromArgb(loadlines(238)) + ShiftOSDesktop.pinkmemory(11) = Color.FromArgb(loadlines(239)) + ShiftOSDesktop.pinkmemory(12) = Color.FromArgb(loadlines(240)) + ShiftOSDesktop.pinkmemory(13) = Color.FromArgb(loadlines(241)) + ShiftOSDesktop.pinkmemory(14) = Color.FromArgb(loadlines(242)) + ShiftOSDesktop.pinkmemory(15) = Color.FromArgb(loadlines(243)) + ShiftOSDesktop.titlebarcolour = Color.FromArgb(loadlines(244)) + ShiftOSDesktop.windowbordercolour = Color.FromArgb(loadlines(245)) + ShiftOSDesktop.windowbordersize = loadlines(246) + ShiftOSDesktop.titlebarheight = loadlines(247) + ShiftOSDesktop.closebuttoncolour = Color.FromArgb(loadlines(248)) + ShiftOSDesktop.closebuttonheight = loadlines(249) + ShiftOSDesktop.closebuttonwidth = loadlines(250) + ShiftOSDesktop.closebuttonside = loadlines(251) + ShiftOSDesktop.closebuttontop = loadlines(252) + ShiftOSDesktop.titletextcolour = Color.FromArgb(loadlines(253)) + ShiftOSDesktop.titletexttop = loadlines(254) + ShiftOSDesktop.titletextside = loadlines(255) + ShiftOSDesktop.titletextsize = loadlines(256) + ShiftOSDesktop.titletextfont = loadlines(257) + ShiftOSDesktop.titletextstyle = loadlines(258) + ShiftOSDesktop.desktoppanelcolour = Color.FromArgb(loadlines(259)) + ShiftOSDesktop.desktopbackgroundcolour = Color.FromArgb(loadlines(260)) + ShiftOSDesktop.desktoppanelheight = loadlines(261) + ShiftOSDesktop.desktoppanelposition = loadlines(262) + ShiftOSDesktop.clocktextcolour = Color.FromArgb(loadlines(263)) + ShiftOSDesktop.clockbackgroundcolor = Color.FromArgb(loadlines(264)) + ShiftOSDesktop.panelclocktexttop = loadlines(265) + ShiftOSDesktop.panelclocktextsize = loadlines(266) + ShiftOSDesktop.panelclocktextfont = loadlines(267) + ShiftOSDesktop.panelclocktextstyle = loadlines(268) + ShiftOSDesktop.applauncherbuttoncolour = Color.FromArgb(loadlines(269)) + ShiftOSDesktop.applauncherbuttonclickedcolour = Color.FromArgb(loadlines(270)) + ShiftOSDesktop.applauncherbackgroundcolour = Color.FromArgb(loadlines(271)) + ShiftOSDesktop.applaunchermouseovercolour = Color.FromArgb(loadlines(272)) + ShiftOSDesktop.applicationsbuttontextcolour = Color.FromArgb(loadlines(273)) + ShiftOSDesktop.applicationbuttonheight = loadlines(274) + ShiftOSDesktop.applicationbuttontextsize = loadlines(275) + ShiftOSDesktop.applicationbuttontextfont = loadlines(276) + ShiftOSDesktop.applicationbuttontextstyle = loadlines(277) + ShiftOSDesktop.applicationlaunchername = loadlines(278) + ShiftOSDesktop.titletextposition = loadlines(279) + ShiftOSDesktop.rollupbuttoncolour = Color.FromArgb(loadlines(280)) + ShiftOSDesktop.rollupbuttonheight = loadlines(281) + ShiftOSDesktop.rollupbuttonwidth = loadlines(282) + ShiftOSDesktop.rollupbuttonside = loadlines(283) + ShiftOSDesktop.rollupbuttontop = loadlines(284) + If loadlines(285) = 11 Then ShiftOSDesktop.boughtpong = True Else ShiftOSDesktop.boughtpong = False + If loadlines(286) = 11 Then ShiftOSDesktop.boughtknowledgeinputicon = True Else ShiftOSDesktop.boughtknowledgeinputicon = False + If loadlines(287) = 11 Then ShiftOSDesktop.boughtshiftericon = True Else ShiftOSDesktop.boughtshiftericon = False + If loadlines(288) = 11 Then ShiftOSDesktop.boughtshiftoriumicon = True Else ShiftOSDesktop.boughtshiftoriumicon = False + If loadlines(289) = 11 Then ShiftOSDesktop.boughtclockicon = True Else ShiftOSDesktop.boughtclockicon = False + If loadlines(290) = 11 Then ShiftOSDesktop.boughtshutdownicon = True Else ShiftOSDesktop.boughtshutdownicon = False + If loadlines(291) = 11 Then ShiftOSDesktop.boughtpongicon = True Else ShiftOSDesktop.boughtpongicon = False + If loadlines(292) = 11 Then ShiftOSDesktop.boughtterminalicon = True Else ShiftOSDesktop.boughtterminalicon = False + If loadlines(293) = 11 Then ShiftOSDesktop.boughtalpong = True Else ShiftOSDesktop.boughtalpong = False + If loadlines(294) = 11 Then ShiftOSDesktop.boughtfileskimmer = True Else ShiftOSDesktop.boughtfileskimmer = False + If loadlines(295) = 11 Then ShiftOSDesktop.boughtalfileskimmer = True Else ShiftOSDesktop.boughtalfileskimmer = False + If loadlines(296) = 11 Then ShiftOSDesktop.boughttextpad = True Else ShiftOSDesktop.boughttextpad = False + If loadlines(297) = 11 Then ShiftOSDesktop.boughtaltextpad = True Else ShiftOSDesktop.boughtaltextpad = False + If loadlines(298) = 11 Then ShiftOSDesktop.boughtfileskimmericon = True Else ShiftOSDesktop.boughtfileskimmericon = False + If loadlines(299) = 11 Then ShiftOSDesktop.boughttextpadicon = True Else ShiftOSDesktop.boughttextpadicon = False + If loadlines(300) = 11 Then ShiftOSDesktop.boughttextpadnew = True Else ShiftOSDesktop.boughttextpadnew = False + If loadlines(301) = 11 Then ShiftOSDesktop.boughttextpadsave = True Else ShiftOSDesktop.boughttextpadsave = False + If loadlines(302) = 11 Then ShiftOSDesktop.boughttextpadopen = True Else ShiftOSDesktop.boughttextpadopen = False + If loadlines(303) = 11 Then ShiftOSDesktop.boughtfileskimmernewfolder = True Else ShiftOSDesktop.boughtfileskimmernewfolder = False + If loadlines(304) = 11 Then ShiftOSDesktop.boughtfileskimmerdelete = True Else ShiftOSDesktop.boughtfileskimmerdelete = False + If loadlines(305) = 11 Then ShiftOSDesktop.boughtkielements = True Else ShiftOSDesktop.boughtkielements = False + If loadlines(306) = 11 Then ShiftOSDesktop.boughtcolourpickericon = True Else ShiftOSDesktop.boughtcolourpickericon = False + If loadlines(307) = 11 Then ShiftOSDesktop.boughtinfoboxicon = True Else ShiftOSDesktop.boughtinfoboxicon = False + ShiftOSDesktop.artpadcolorpalletwidth = loadlines(308) + ShiftOSDesktop.artpadcolorpalletheight = loadlines(309) + ShiftOSDesktop.artpadcolorpalletsidegap = loadlines(310) + ShiftOSDesktop.artpadcolorpallettopgap = loadlines(311) + ShiftOSDesktop.artpadvisiblepallets = loadlines(312) + ShiftOSDesktop.artpadpixellimit = loadlines(313) + If loadlines(314) = 11 Then ShiftOSDesktop.boughtskinloader = True Else ShiftOSDesktop.boughtskinloader = False + If loadlines(315) = 11 Then ShiftOSDesktop.boughtminimizebutton = True Else ShiftOSDesktop.boughtminimizebutton = False + If loadlines(316) = 11 Then ShiftOSDesktop.boughtpanelbuttons = True Else ShiftOSDesktop.boughtpanelbuttons = False + If loadlines(317) = 11 Then ShiftOSDesktop.boughtshiftpanelbuttons = True Else ShiftOSDesktop.boughtshiftpanelbuttons = False + If loadlines(318) = 11 Then ShiftOSDesktop.boughtartpad = True Else ShiftOSDesktop.boughtartpad = False + If loadlines(319) = 11 Then ShiftOSDesktop.boughtalartpad = True Else ShiftOSDesktop.boughtalartpad = False + If loadlines(320) = 11 Then ShiftOSDesktop.boughtartpadicon = True Else ShiftOSDesktop.boughtartpadicon = False + If loadlines(321) = 11 Then ShiftOSDesktop.boughtskinning = True Else ShiftOSDesktop.boughtskinning = False + If loadlines(322) = 11 Then ShiftOSDesktop.boughtminimizecommand = True Else ShiftOSDesktop.boughtminimizecommand = False + If loadlines(323) = 11 Then ShiftOSDesktop.boughtusefulpanelbuttons = True Else ShiftOSDesktop.boughtusefulpanelbuttons = False + If loadlines(324) = 11 Then ShiftOSDesktop.boughtunitymode = True Else ShiftOSDesktop.boughtunitymode = False + If loadlines(325) = 11 Then ShiftOSDesktop.boughtartpadpixellimit4 = True Else ShiftOSDesktop.boughtartpadpixellimit4 = False + If loadlines(326) = 11 Then ShiftOSDesktop.boughtartpadpixellimit8 = True Else ShiftOSDesktop.boughtartpadpixellimit8 = False + If loadlines(327) = 11 Then ShiftOSDesktop.boughtartpadpixellimit16 = True Else ShiftOSDesktop.boughtartpadpixellimit16 = False + If loadlines(328) = 11 Then ShiftOSDesktop.boughtartpadpixellimit64 = True Else ShiftOSDesktop.boughtartpadpixellimit64 = False + If loadlines(329) = 11 Then ShiftOSDesktop.boughtartpadpixellimit256 = True Else ShiftOSDesktop.boughtartpadpixellimit256 = False + If loadlines(330) = 11 Then ShiftOSDesktop.boughtartpadpixellimit1024 = True Else ShiftOSDesktop.boughtartpadpixellimit1024 = False + If loadlines(331) = 11 Then ShiftOSDesktop.boughtartpadpixellimit4096 = True Else ShiftOSDesktop.boughtartpadpixellimit4096 = False + If loadlines(332) = 11 Then ShiftOSDesktop.boughtartpadpixellimit16384 = True Else ShiftOSDesktop.boughtartpadpixellimit16384 = False + If loadlines(333) = 11 Then ShiftOSDesktop.boughtartpadpixellimit65536 = True Else ShiftOSDesktop.boughtartpadpixellimit65536 = False + If loadlines(334) = 11 Then ShiftOSDesktop.boughtartpadlimitlesspixels = True Else ShiftOSDesktop.boughtartpadlimitlesspixels = False + If loadlines(335) = 11 Then ShiftOSDesktop.boughtartpad4colorpallets = True Else ShiftOSDesktop.boughtartpad4colorpallets = False + If loadlines(336) = 11 Then ShiftOSDesktop.boughtartpad8colorpallets = True Else ShiftOSDesktop.boughtartpad8colorpallets = False + If loadlines(337) = 11 Then ShiftOSDesktop.boughtartpad16colorpallets = True Else ShiftOSDesktop.boughtartpad16colorpallets = False + If loadlines(338) = 11 Then ShiftOSDesktop.boughtartpad32colorpallets = True Else ShiftOSDesktop.boughtartpad32colorpallets = False + If loadlines(339) = 11 Then ShiftOSDesktop.boughtartpad64colorpallets = True Else ShiftOSDesktop.boughtartpad64colorpallets = False + If loadlines(340) = 11 Then ShiftOSDesktop.boughtartpad128colorpallets = True Else ShiftOSDesktop.boughtartpad128colorpallets = False + If loadlines(341) = 11 Then ShiftOSDesktop.boughtartpadcustompallets = True Else ShiftOSDesktop.boughtartpadcustompallets = False + If loadlines(342) = 11 Then ShiftOSDesktop.boughtartpadpixelplacer = True Else ShiftOSDesktop.boughtartpadpixelplacer = False + If loadlines(343) = 11 Then ShiftOSDesktop.boughtartpadpixelplacermovementmode = True Else ShiftOSDesktop.boughtartpadpixelplacermovementmode = False + If loadlines(344) = 11 Then ShiftOSDesktop.boughtartpadpencil = True Else ShiftOSDesktop.boughtartpadpencil = False + If loadlines(345) = 11 Then ShiftOSDesktop.boughtartpadpaintbrush = True Else ShiftOSDesktop.boughtartpadpaintbrush = False + If loadlines(346) = 11 Then ShiftOSDesktop.boughtartpadlinetool = True Else ShiftOSDesktop.boughtartpadlinetool = False + If loadlines(347) = 11 Then ShiftOSDesktop.boughtartpadovaltool = True Else ShiftOSDesktop.boughtartpadovaltool = False + If loadlines(348) = 11 Then ShiftOSDesktop.boughtartpadrectangletool = True Else ShiftOSDesktop.boughtartpadrectangletool = False + If loadlines(349) = 11 Then ShiftOSDesktop.boughtartpaderaser = True Else ShiftOSDesktop.boughtartpaderaser = False + If loadlines(350) = 11 Then ShiftOSDesktop.boughtartpadfilltool = True Else ShiftOSDesktop.boughtartpadfilltool = False + If loadlines(351) = 11 Then ShiftOSDesktop.boughtartpadtexttool = True Else ShiftOSDesktop.boughtartpadtexttool = False + If loadlines(352) = 11 Then ShiftOSDesktop.boughtartpadundo = True Else ShiftOSDesktop.boughtartpadundo = False + If loadlines(353) = 11 Then ShiftOSDesktop.boughtartpadredo = True Else ShiftOSDesktop.boughtartpadredo = False + If loadlines(354) = 11 Then ShiftOSDesktop.boughtartpadsave = True Else ShiftOSDesktop.boughtartpadsave = False + If loadlines(355) = 11 Then ShiftOSDesktop.boughtartpadload = True Else ShiftOSDesktop.boughtartpadload = False + For i = 0 To 127 : ShiftOSDesktop.artpadcolourpallets(i) = Color.FromArgb(loadlines(356 + i)) : Next + If loadlines(484) = "" Then Else If loadlines(484) = 11 Then ShiftOSDesktop.boughtartpadnew = True Else ShiftOSDesktop.boughtartpadnew = False + + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Icons") Then ShiftOSDesktop.setupicons() + + Dim objWriter As New System.IO.StreamWriter(ShiftOSPath + "Shiftum42/HDAccess.sft", False) + objWriter.Write("0.0.8") + objWriter.Close() + + MessageBox.Show("Convertion Complete, welcome to 0.0.8!" & Environment.NewLine & Environment.NewLine & "ShiftOS will now start, please wait while we load the ShiftOS desktop", "Complete") + ShiftOSDesktop.justconverted = True + ShiftOSDesktop.Show() + HijackScreen.conversationtimer.Start() + HijackScreen.Close() + Me.Close() + Else + If MsgBox("This is not a 0.0.7 save file, unable to convert - aborting." & Environment.NewLine & Environment.NewLine & "Press 'OK' to quit", MsgBoxStyle.Information, "Incorrect Version") = Windows.Forms.DialogResult.OK Then + Me.Close() + ShiftOSDesktop.Close() + HijackScreen.Close() + End If + End If + End Sub + + Private Sub addlines() + ReDim Preserve loadlines(2000) + loadlines(308) = 105 + loadlines(309) = 69 + loadlines(310) = 4 + loadlines(311) = 4 + loadlines(312) = 2 + loadlines(313) = 2 + loadlines(314) = 10 + loadlines(315) = 10 + loadlines(316) = 10 + loadlines(317) = 10 + loadlines(318) = 10 + loadlines(319) = 10 + loadlines(320) = 10 + loadlines(321) = 10 + loadlines(322) = 10 + loadlines(323) = 10 + loadlines(324) = 10 + loadlines(325) = 10 + loadlines(326) = 10 + loadlines(327) = 10 + loadlines(328) = 10 + loadlines(329) = 10 + loadlines(330) = 10 + loadlines(331) = 10 + loadlines(332) = 10 + loadlines(333) = 10 + loadlines(334) = 10 + loadlines(335) = 10 + loadlines(336) = 10 + loadlines(337) = 10 + loadlines(338) = 10 + loadlines(339) = 10 + loadlines(340) = 10 + loadlines(341) = 10 + loadlines(342) = 10 + loadlines(343) = 10 + loadlines(344) = 10 + loadlines(345) = 10 + loadlines(346) = 10 + loadlines(347) = 10 + loadlines(348) = 10 + loadlines(349) = 10 + loadlines(350) = 10 + loadlines(351) = 10 + loadlines(352) = 10 + loadlines(353) = 10 + loadlines(354) = 10 + loadlines(355) = 10 + loadlines(356) = -16777216 + loadlines(357) = -16777216 + loadlines(358) = -16777216 + loadlines(359) = -16777216 + loadlines(360) = -16777216 + loadlines(361) = -16777216 + loadlines(362) = -16777216 + loadlines(363) = -16777216 + loadlines(364) = -16777216 + loadlines(365) = -16777216 + loadlines(366) = -16777216 + loadlines(367) = -16777216 + loadlines(368) = -16777216 + loadlines(369) = -16777216 + loadlines(370) = -16777216 + loadlines(371) = -16777216 + loadlines(372) = -16777216 + loadlines(373) = -16777216 + loadlines(374) = -16777216 + loadlines(375) = -16777216 + loadlines(376) = -16777216 + loadlines(377) = -16777216 + loadlines(378) = -16777216 + loadlines(379) = -16777216 + loadlines(380) = -16777216 + loadlines(381) = -16777216 + loadlines(382) = -16777216 + loadlines(383) = -16777216 + loadlines(384) = -16777216 + loadlines(385) = -16777216 + loadlines(386) = -16777216 + loadlines(387) = -16777216 + loadlines(388) = -16777216 + loadlines(389) = -16777216 + loadlines(390) = -16777216 + loadlines(391) = -16777216 + loadlines(392) = -16777216 + loadlines(393) = -16777216 + loadlines(394) = -16777216 + loadlines(395) = -16777216 + loadlines(396) = -16777216 + loadlines(397) = -16777216 + loadlines(398) = -16777216 + loadlines(399) = -16777216 + loadlines(400) = -16777216 + loadlines(401) = -16777216 + loadlines(402) = -16777216 + loadlines(403) = -16777216 + loadlines(404) = -16777216 + loadlines(405) = -16777216 + loadlines(406) = -16777216 + loadlines(407) = -16777216 + loadlines(408) = -16777216 + loadlines(409) = -16777216 + loadlines(410) = -16777216 + loadlines(411) = -16777216 + loadlines(412) = -16777216 + loadlines(413) = -16777216 + loadlines(414) = -16777216 + loadlines(415) = -16777216 + loadlines(416) = -16777216 + loadlines(417) = -16777216 + loadlines(418) = -16777216 + loadlines(419) = -16777216 + loadlines(420) = -16777216 + loadlines(421) = -16777216 + loadlines(422) = -16777216 + loadlines(423) = -16777216 + loadlines(424) = -16777216 + loadlines(425) = -16777216 + loadlines(426) = -16777216 + loadlines(427) = -16777216 + loadlines(428) = -16777216 + loadlines(429) = -16777216 + loadlines(430) = -16777216 + loadlines(431) = -16777216 + loadlines(432) = -16777216 + loadlines(433) = -16777216 + loadlines(434) = -16777216 + loadlines(435) = -16777216 + loadlines(436) = -16777216 + loadlines(437) = -16777216 + loadlines(438) = -16777216 + loadlines(439) = -16777216 + loadlines(440) = -16777216 + loadlines(441) = -16777216 + loadlines(442) = -16777216 + loadlines(443) = -16777216 + loadlines(444) = -16777216 + loadlines(445) = -16777216 + loadlines(446) = -16777216 + loadlines(447) = -16777216 + loadlines(448) = -16777216 + loadlines(449) = -16777216 + loadlines(450) = -16777216 + loadlines(451) = -16777216 + loadlines(452) = -16777216 + loadlines(453) = -16777216 + loadlines(454) = -16777216 + loadlines(455) = -16777216 + loadlines(456) = -16777216 + loadlines(457) = -16777216 + loadlines(458) = -16777216 + loadlines(459) = -16777216 + loadlines(460) = -16777216 + loadlines(461) = -16777216 + loadlines(462) = -16777216 + loadlines(463) = -16777216 + loadlines(464) = -16777216 + loadlines(465) = -16777216 + loadlines(466) = -16777216 + loadlines(467) = -16777216 + loadlines(468) = -16777216 + loadlines(469) = -16777216 + loadlines(470) = -16777216 + loadlines(471) = -16777216 + loadlines(472) = -16777216 + loadlines(473) = -16777216 + loadlines(474) = -16777216 + loadlines(475) = -16777216 + loadlines(476) = -16777216 + loadlines(477) = -16777216 + loadlines(478) = -16777216 + loadlines(479) = -16777216 + loadlines(480) = -16777216 + loadlines(481) = -16777216 + loadlines(482) = -16777216 + loadlines(483) = -16777216 + loadlines(484) = 10 + End Sub + + Private Sub convertfile() + IO.File.WriteAllLines(ShiftOSPath + "\Shiftum42\Drivers\HDD.dri", loadlines) + File_Crypt.EncryptFile(ShiftOSPath + "\Shiftum42\Drivers\HDD.dri", ShiftOSPath + "/Shiftum42/SKernal.sft", sSecretKey) + Dim objWriter As New System.IO.StreamWriter(ShiftOSPath + "/Shiftum42/HDAccess.sft", False) + objWriter.Write("0.0.7") + objWriter.Close() + End Sub + + Private Sub btncancel_Click(sender As Object, e As EventArgs) Handles btncancel.Click + Me.Close() + HijackScreen.Close() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/ShiftOS.Old.vbproj b/ShiftOS/ShiftOS.Old.vbproj new file mode 100644 index 0000000..e7b49c0 --- /dev/null +++ b/ShiftOS/ShiftOS.Old.vbproj @@ -0,0 +1,1053 @@ +<?xml version="1.0" encoding="utf-8"?> +<Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> + <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" /> + <PropertyGroup> + <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration> + <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform> + <ProjectGuid>{7DCD55AB-F67D-4C43-9BFB-74ED8AD0FDCF}</ProjectGuid> + <OutputType>WinExe</OutputType> + <StartupObject>ShiftOS.My.MyApplication</StartupObject> + <RootNamespace>ShiftOS</RootNamespace> + <AssemblyName>ShiftOS 0.0.8 RC2</AssemblyName> + <FileAlignment>512</FileAlignment> + <MyType>WindowsForms</MyType> + <TargetFrameworkVersion>v4.5</TargetFrameworkVersion> + <IsWebBootstrapper>false</IsWebBootstrapper> + <PublishUrl>C:\Users\William\Desktop\</PublishUrl> + <Install>true</Install> + <InstallFrom>Disk</InstallFrom> + <UpdateEnabled>false</UpdateEnabled> + <UpdateMode>Foreground</UpdateMode> + <UpdateInterval>7</UpdateInterval> + <UpdateIntervalUnits>Days</UpdateIntervalUnits> + <UpdatePeriodically>false</UpdatePeriodically> + <UpdateRequired>false</UpdateRequired> + <MapFileExtensions>true</MapFileExtensions> + <ApplicationRevision>98</ApplicationRevision> + <ApplicationVersion>0.0.7.%2a</ApplicationVersion> + <UseApplicationTrust>false</UseApplicationTrust> + <PublishWizardCompleted>true</PublishWizardCompleted> + <BootstrapperEnabled>true</BootstrapperEnabled> + </PropertyGroup> + <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' "> + <PlatformTarget>AnyCPU</PlatformTarget> + <DebugSymbols>true</DebugSymbols> + <DebugType>full</DebugType> + <DefineDebug>true</DefineDebug> + <DefineTrace>true</DefineTrace> + <OutputPath>bin\debug\</OutputPath> + <DocumentationFile> + </DocumentationFile> + <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> + </PropertyGroup> + <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' "> + <PlatformTarget>AnyCPU</PlatformTarget> + <DebugType>pdbonly</DebugType> + <DefineDebug>false</DefineDebug> + <DefineTrace>true</DefineTrace> + <Optimize>true</Optimize> + <OutputPath>bin\Debug\</OutputPath> + <DocumentationFile> + </DocumentationFile> + <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> + </PropertyGroup> + <PropertyGroup> + <OptionExplicit>On</OptionExplicit> + </PropertyGroup> + <PropertyGroup> + <OptionCompare>Binary</OptionCompare> + </PropertyGroup> + <PropertyGroup> + <OptionStrict>Off</OptionStrict> + </PropertyGroup> + <PropertyGroup> + <OptionInfer>On</OptionInfer> + </PropertyGroup> + <PropertyGroup> + <ManifestCertificateThumbprint>F8533EC3C8902318F4A89ADCCBBD4FFABA648375</ManifestCertificateThumbprint> + </PropertyGroup> + <PropertyGroup> + <ManifestKeyFile>ShiftOS_TemporaryKey.pfx</ManifestKeyFile> + </PropertyGroup> + <PropertyGroup> + <GenerateManifests>true</GenerateManifests> + </PropertyGroup> + <PropertyGroup> + <TargetZone>Internet</TargetZone> + </PropertyGroup> + <PropertyGroup> + <ApplicationManifest>app.manifest</ApplicationManifest> + </PropertyGroup> + <PropertyGroup> + <SignManifests>false</SignManifests> + </PropertyGroup> + <PropertyGroup> + <ApplicationIcon>ShiftOSLogo.ico</ApplicationIcon> + </PropertyGroup> + <ItemGroup> + <Reference Include="MichaelsMovableControlSuite"> + <HintPath>bin\debug\MichaelsMovableControlSuite.dll</HintPath> + </Reference> + <Reference Include="Skybound.Gecko, Version=1.9.1.0, Culture=neutral, PublicKeyToken=3209ac31600d1857, processorArchitecture=x86"> + <SpecificVersion>False</SpecificVersion> + <HintPath>bin\debug\Skybound.Gecko.dll</HintPath> + </Reference> + <Reference Include="System" /> + <Reference Include="System.Data" /> + <Reference Include="System.Deployment" /> + <Reference Include="System.Drawing" /> + <Reference Include="System.IO.Compression" /> + <Reference Include="System.IO.Compression.FileSystem" /> + <Reference Include="System.Management" /> + <Reference Include="System.Speech" /> + <Reference Include="System.Windows.Forms" /> + <Reference Include="System.Xml" /> + <Reference Include="System.Core" /> + <Reference Include="System.Xml.Linq" /> + <Reference Include="System.Data.DataSetExtensions" /> + </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" /> + <Import Include="System.Threading.Tasks" /> + </ItemGroup> + <ItemGroup> + <Compile Include="API.vb" /> + <Compile Include="ApplicationEvents.vb" /> + <Compile Include="ArtPad.Designer.vb"> + <DependentUpon>ArtPad.vb</DependentUpon> + </Compile> + <Compile Include="ArtPad.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Audio Player.Designer.vb"> + <DependentUpon>Audio Player.vb</DependentUpon> + </Compile> + <Compile Include="Audio Player.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Bitnote Digger.Designer.vb"> + <DependentUpon>Bitnote Digger.vb</DependentUpon> + </Compile> + <Compile Include="Bitnote Digger.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Bitnote Wallet.Designer.vb"> + <DependentUpon>Bitnote Wallet.vb</DependentUpon> + </Compile> + <Compile Include="Bitnote Wallet.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Calculator.Designer.vb"> + <DependentUpon>Calculator.vb</DependentUpon> + </Compile> + <Compile Include="Calculator.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Catalyst_Main.Designer.vb"> + <DependentUpon>Catalyst_Main.vb</DependentUpon> + </Compile> + <Compile Include="Catalyst_Main.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="DockWindow.Designer.vb"> + <DependentUpon>DockWindow.vb</DependentUpon> + </Compile> + <Compile Include="DockWindow.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="DockEngine.vb" /> + <Compile Include="FullScreenLogin Customizer.Designer.vb"> + <DependentUpon>FullScreenLogin Customizer.vb</DependentUpon> + </Compile> + <Compile Include="FullScreenLogin Customizer.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="FullScreenLogin.Designer.vb"> + <DependentUpon>FullScreenLogin.vb</DependentUpon> + </Compile> + <Compile Include="FullScreenLogin.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="loginform.Designer.vb"> + <DependentUpon>loginform.vb</DependentUpon> + </Compile> + <Compile Include="loginform.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="modform.Designer.vb"> + <DependentUpon>modform.vb</DependentUpon> + </Compile> + <Compile Include="modform.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Custom_Menu.Designer.vb"> + <DependentUpon>Custom_Menu.vb</DependentUpon> + </Compile> + <Compile Include="Custom_Menu.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="FloodRegistry.Designer.vb"> + <DependentUpon>FloodRegistry.vb</DependentUpon> + </Compile> + <Compile Include="FloodRegistry.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Helper.vb" /> + <Compile Include="Clock.Designer.vb"> + <DependentUpon>Clock.vb</DependentUpon> + </Compile> + <Compile Include="Clock.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="coherencemode.vb" /> + <Compile Include="Colour Picker.Designer.vb"> + <DependentUpon>Colour Picker.vb</DependentUpon> + </Compile> + <Compile Include="Colour Picker.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="coherencemodeform.Designer.vb"> + <DependentUpon>coherencemodeform.vb</DependentUpon> + </Compile> + <Compile Include="coherencemodeform.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="crash.vb" /> + <Compile Include="crash_pic.Designer.vb"> + <DependentUpon>crash_pic.vb</DependentUpon> + </Compile> + <Compile Include="crash_pic.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Dodge.Designer.vb"> + <DependentUpon>Dodge.vb</DependentUpon> + </Compile> + <Compile Include="Dodge.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Downloader.Designer.vb"> + <DependentUpon>Downloader.vb</DependentUpon> + </Compile> + <Compile Include="Downloader.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Downloadmanager.Designer.vb"> + <DependentUpon>Downloadmanager.vb</DependentUpon> + </Compile> + <Compile Include="Downloadmanager.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="FloodGate Manager.Designer.vb"> + <DependentUpon>FloodGate Manager.vb</DependentUpon> + </Compile> + <Compile Include="FloodGate Manager.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Labyrinth.designer.vb"> + <DependentUpon>Labyrinth.vb</DependentUpon> + </Compile> + <Compile Include="Labyrinth.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Icon Manager.Designer.vb"> + <DependentUpon>Icon Manager.vb</DependentUpon> + </Compile> + <Compile Include="Icon Manager.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Installer.Designer.vb"> + <DependentUpon>Installer.vb</DependentUpon> + </Compile> + <Compile Include="Installer.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Name Changer.Designer.vb"> + <DependentUpon>Name Changer.vb</DependentUpon> + </Compile> + <Compile Include="Name Changer.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="NewAPI.vb" /> + <Compile Include="OrcWrite.Designer.vb"> + <DependentUpon>OrcWrite.vb</DependentUpon> + </Compile> + <Compile Include="OrcWrite.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Paths.vb" /> + <Compile Include="ProgressBarEX.Designer.vb"> + <DependentUpon>ProgressBarEX.vb</DependentUpon> + </Compile> + <Compile Include="ProgressBarEX.vb"> + <SubType>UserControl</SubType> + </Compile> + <Compile Include="QuickChatStory.Designer.vb"> + <DependentUpon>QuickChatStory.vb</DependentUpon> + </Compile> + <Compile Include="QuickChatStory.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="ShiftDock.Designer.vb"> + <DependentUpon>ShiftDock.vb</DependentUpon> + </Compile> + <Compile Include="ShiftDock.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Shiftnet.Designer.vb"> + <DependentUpon>Shiftnet.vb</DependentUpon> + </Compile> + <Compile Include="Shiftnet.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="skins.vb" /> + <Compile Include="Skinshifter.Designer.vb"> + <DependentUpon>Skinshifter.vb</DependentUpon> + </Compile> + <Compile Include="Skinshifter.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Snakey.Designer.vb"> + <DependentUpon>Snakey.vb</DependentUpon> + </Compile> + <Compile Include="Snakey.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="STML Test.Designer.vb"> + <DependentUpon>STML Test.vb</DependentUpon> + </Compile> + <Compile Include="STML Test.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="SystemInfo.Designer.vb"> + <DependentUpon>SystemInfo.vb</DependentUpon> + </Compile> + <Compile Include="SystemInfo.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="DockSettingsMenu.Designer.vb"> + <DependentUpon>DockSettingsMenu.vb</DependentUpon> + </Compile> + <Compile Include="DockSettingsMenu.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Video Player.Designer.vb"> + <DependentUpon>Video Player.vb</DependentUpon> + </Compile> + <Compile Include="Video Player.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="CustomColorTable.vb" /> + <Compile Include="File Opener.Designer.vb"> + <DependentUpon>File Opener.vb</DependentUpon> + </Compile> + <Compile Include="File Opener.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="File Saver.Designer.vb"> + <DependentUpon>File Saver.vb</DependentUpon> + </Compile> + <Compile Include="File Saver.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="File Skimmer.Designer.vb"> + <DependentUpon>File Skimmer.vb</DependentUpon> + </Compile> + <Compile Include="File Skimmer.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="File_Crypt.vb" /> + <Compile Include="Graphic Picker.Designer.vb"> + <DependentUpon>Graphic Picker.vb</DependentUpon> + </Compile> + <Compile Include="Graphic Picker.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="HijackScreen.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="HijackScreen.Designer.vb"> + <DependentUpon>HijackScreen.vb</DependentUpon> + <SubType>Form</SubType> + </Compile> + <Compile Include="infobox.Designer.vb"> + <DependentUpon>infobox.vb</DependentUpon> + </Compile> + <Compile Include="infobox.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Knowledge Input.Designer.vb"> + <DependentUpon>Knowledge Input.vb</DependentUpon> + </Compile> + <Compile Include="Knowledge Input.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="My Project\AssemblyInfo.vb" /> + <Compile Include="My Project\Application.Designer.vb"> + <AutoGen>True</AutoGen> + <DependentUpon>Application.myapp</DependentUpon> + </Compile> + <Compile Include="My Project\Resources.Designer.vb"> + <AutoGen>True</AutoGen> + <DesignTime>True</DesignTime> + <DependentUpon>Resources.resx</DependentUpon> + </Compile> + <Compile Include="My Project\Settings.Designer.vb"> + <AutoGen>True</AutoGen> + <DependentUpon>Settings.settings</DependentUpon> + <DesignTimeSharedInput>True</DesignTimeSharedInput> + </Compile> + <Compile Include="MyPreviewToolStripRenderer.vb" /> + <Compile Include="MyToolStripRenderer.vb" /> + <Compile Include="Pong.Designer.vb"> + <DependentUpon>Pong.vb</DependentUpon> + </Compile> + <Compile Include="Pong.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="PreviewCustomColorTable.vb" /> + <Compile Include="Shifter.Designer.vb"> + <DependentUpon>Shifter.vb</DependentUpon> + </Compile> + <Compile Include="Shifter.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Shiftorium.Designer.vb"> + <DependentUpon>Shiftorium.vb</DependentUpon> + </Compile> + <Compile Include="Shiftorium.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="ShiftOS Save File Converter.Designer.vb"> + <DependentUpon>ShiftOS Save File Converter.vb</DependentUpon> + </Compile> + <Compile Include="ShiftOS Save File Converter.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="ShiftOSDesktop.Designer.vb"> + <DependentUpon>ShiftOSDesktop.vb</DependentUpon> + </Compile> + <Compile Include="ShiftOSDesktop.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Skin Loader.Designer.vb"> + <DependentUpon>Skin Loader.vb</DependentUpon> + </Compile> + <Compile Include="Skin Loader.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="template.Designer.vb"> + <DependentUpon>template.vb</DependentUpon> + </Compile> + <Compile Include="template.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Terminal.Designer.vb"> + <DependentUpon>Terminal.vb</DependentUpon> + </Compile> + <Compile Include="Terminal.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="TextPad.Designer.vb"> + <DependentUpon>TextPad.vb</DependentUpon> + </Compile> + <Compile Include="TextPad.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="undo.vb" /> + <Compile Include="Viruses.vb" /> + <Compile Include="VirusScanner.Designer.vb"> + <DependentUpon>VirusScanner.vb</DependentUpon> + </Compile> + <Compile Include="VirusScanner.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Web Browser.Designer.vb"> + <DependentUpon>Web Browser.vb</DependentUpon> + </Compile> + <Compile Include="Web Browser.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Window.vb" /> + </ItemGroup> + <ItemGroup> + <EmbeddedResource Include="ArtPad.resx"> + <DependentUpon>ArtPad.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Audio Player.resx"> + <DependentUpon>Audio Player.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Bitnote Digger.resx"> + <DependentUpon>Bitnote Digger.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Bitnote Wallet.resx"> + <DependentUpon>Bitnote Wallet.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Calculator.resx"> + <DependentUpon>Calculator.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Catalyst_Main.resx"> + <DependentUpon>Catalyst_Main.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Clock.resx"> + <DependentUpon>Clock.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Colour Picker.resx"> + <DependentUpon>Colour Picker.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="coherencemodeform.resx"> + <DependentUpon>coherencemodeform.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="DockWindow.resx"> + <DependentUpon>DockWindow.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="FullScreenLogin Customizer.resx"> + <DependentUpon>FullScreenLogin Customizer.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="FullScreenLogin.resx"> + <DependentUpon>FullScreenLogin.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="loginform.resx"> + <DependentUpon>loginform.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="modform.resx"> + <DependentUpon>modform.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="crash_pic.resx"> + <DependentUpon>crash_pic.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Custom_Menu.resx"> + <DependentUpon>Custom_Menu.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Dodge.resx"> + <DependentUpon>Dodge.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Downloader.resx"> + <DependentUpon>Downloader.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Downloadmanager.resx"> + <DependentUpon>Downloadmanager.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="FloodGate Manager.resx"> + <DependentUpon>FloodGate Manager.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="FloodRegistry.resx"> + <DependentUpon>FloodRegistry.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Labyrinth.resx"> + <DependentUpon>Labyrinth.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Icon Manager.resx"> + <DependentUpon>Icon Manager.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Installer.resx"> + <DependentUpon>Installer.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Name Changer.resx"> + <DependentUpon>Name Changer.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="OrcWrite.resx"> + <DependentUpon>OrcWrite.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="QuickChatStory.resx"> + <DependentUpon>QuickChatStory.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="ShiftDock.resx"> + <DependentUpon>ShiftDock.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Shiftnet.resx"> + <DependentUpon>Shiftnet.vb</DependentUpon> + <SubType>Designer</SubType> + </EmbeddedResource> + <EmbeddedResource Include="Skinshifter.resx"> + <DependentUpon>Skinshifter.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Snakey.resx"> + <DependentUpon>Snakey.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="STML Test.resx"> + <DependentUpon>STML Test.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="SystemInfo.resx"> + <DependentUpon>SystemInfo.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="DockSettingsMenu.resx"> + <DependentUpon>DockSettingsMenu.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Video Player.resx"> + <DependentUpon>Video Player.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="File Opener.resx"> + <DependentUpon>File Opener.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="File Saver.resx"> + <DependentUpon>File Saver.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="File Skimmer.resx"> + <DependentUpon>File Skimmer.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Graphic Picker.resx"> + <DependentUpon>Graphic Picker.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="HijackScreen.resx"> + <DependentUpon>HijackScreen.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="infobox.resx"> + <DependentUpon>infobox.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Knowledge Input.resx"> + <DependentUpon>Knowledge Input.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="My Project\Resources.resx"> + <Generator>VbMyResourcesResXFileCodeGenerator</Generator> + <CustomToolNamespace>My.Resources</CustomToolNamespace> + <SubType>Designer</SubType> + <LastGenOutput>Resources.Designer.vb</LastGenOutput> + </EmbeddedResource> + <EmbeddedResource Include="Pong.resx"> + <DependentUpon>Pong.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Shifter.resx"> + <DependentUpon>Shifter.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Shiftorium.resx"> + <DependentUpon>Shiftorium.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="ShiftOS Save File Converter.resx"> + <DependentUpon>ShiftOS Save File Converter.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="ShiftOSDesktop.resx"> + <DependentUpon>ShiftOSDesktop.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Skin Loader.resx"> + <DependentUpon>Skin Loader.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="template.resx"> + <DependentUpon>template.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Terminal.resx"> + <DependentUpon>Terminal.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="TextPad.resx"> + <DependentUpon>TextPad.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="VirusScanner.resx"> + <DependentUpon>VirusScanner.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Web Browser.resx"> + <DependentUpon>Web Browser.vb</DependentUpon> + </EmbeddedResource> + </ItemGroup> + <ItemGroup> + <None Include="app.manifest" /> + <None Include="My Project\app.manifest" /> + <None Include="My Project\Application.myapp"> + <Generator>MyApplicationCodeGenerator</Generator> + <LastGenOutput>Application.Designer.vb</LastGenOutput> + </None> + <None Include="My Project\Settings.settings"> + <Generator>SettingsSingleFileGenerator</Generator> + <CustomToolNamespace>My</CustomToolNamespace> + <LastGenOutput>Settings.Designer.vb</LastGenOutput> + </None> + <None Include="App.config" /> + <None Include="Resources\ Industrial.skn" /> + <None Include="Resources\ Linux Mint 7.skn" /> + <None Include="Resources\Industrial.skn" /> + <None Include="Resources\LICENSE.md" /> + <None Include="Resources\Linux Mint 7.skn" /> + <None Include="ShiftOS_TemporaryKey.pfx" /> + </ItemGroup> + <ItemGroup> + <BootstrapperPackage Include=".NETFramework,Version=v4.5"> + <Visible>False</Visible> + <ProductName>Microsoft .NET Framework 4.5 %28x86 and x64%29</ProductName> + <Install>true</Install> + </BootstrapperPackage> + <BootstrapperPackage Include="Microsoft.Net.Client.3.5"> + <Visible>False</Visible> + <ProductName>.NET Framework 3.5 SP1 Client Profile</ProductName> + <Install>false</Install> + </BootstrapperPackage> + <BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1"> + <Visible>False</Visible> + <ProductName>.NET Framework 3.5 SP1</ProductName> + <Install>false</Install> + </BootstrapperPackage> + </ItemGroup> + <ItemGroup> + <None Include="Resources\typesound.wav" /> + </ItemGroup> + <ItemGroup> + <None Include="Resources\writesound.wav" /> + </ItemGroup> + <ItemGroup> + <None Include="Resources\dial-up-modem-02.wav" /> + </ItemGroup> + <ItemGroup> + <None Include="Resources\upgradegray.png" /> + <None Include="Resources\upgradetitlebar.png" /> + <None Include="Resources\upgradecustomusername.png" /> + <None Include="Resources\upgradeamandpm.png" /> + <None Include="Resources\upgradehoursssincemidnight.png" /> + <None Include="Resources\upgrademinuteaccuracytime.png" /> + <None Include="Resources\upgrademinutesssincemidnight.png" /> + <None Include="Resources\upgradesecondssincemidnight.png" /> + <None Include="Resources\upgradesplitsecondaccuracy.png" /> + <None Include="Resources\upgrademoveablewindows.gif" /> + <None Include="Resources\upgradewindowsanywhere.png" /> + <None Include="Resources\upgradedraggablewindows.gif" /> + <None Include="Resources\upgradeclosebutton.gif" /> + <None Include="Resources\upgradetitletext.png" /> + <None Include="Resources\upgradeclock.png" /> + <None Include="Resources\upgradekiaddons.png" /> + <None Include="Resources\upgrademultitasking.png" /> + <None Include="Resources\upgradesgameconsoles.png" /> + <None Include="Resources\upgradeskicarbrands.png" /> + <None Include="Resources\upgradewindowborders.png" /> + <None Include="Resources\upgradealshiftorium.png" /> + <None Include="Resources\upgradeapplaunchermenu.png" /> + <None Include="Resources\upgradeapplaunchershutdown.png" /> + <None Include="Resources\upgradedesktoppanelclock.png" /> + <None Include="Resources\upgradeknowledgeinput.png" /> + <None Include="Resources\upgradewindowedterminal.png" /> + <None Include="Resources\upgradealclock.png" /> + <None Include="Resources\upgradeautoscrollterminal.png" /> + <None Include="Resources\upgradedesktoppanel.png" /> + <None Include="Resources\upgradeterminalscrollbar.png" /> + <None Include="Resources\Gray Shades.png" /> + <None Include="Resources\upgradegrayshades.png" /> + <None Include="Resources\upgradeblue.png" /> + <None Include="Resources\upgradebrown.png" /> + <None Include="Resources\upgradegreen.png" /> + <None Include="Resources\upgradeorange.png" /> + <None Include="Resources\upgradepink.png" /> + <None Include="Resources\upgradepurple.png" /> + <None Include="Resources\upgradered.png" /> + <None Include="Resources\upgradeyellow.png" /> + <None Include="Resources\upgradeblueshades.png" /> + <None Include="Resources\upgradebrownshades.png" /> + <None Include="Resources\upgradegreenshades.png" /> + <None Include="Resources\upgradeorangeshades.png" /> + <None Include="Resources\upgradepinkshades.png" /> + <None Include="Resources\upgradepurpleshades.png" /> + <None Include="Resources\upgraderedshades.png" /> + <None Include="Resources\upgradeyellowshades.png" /> + <None Include="Resources\test.png" /> + <None Include="Resources\upgradebluecustom.png" /> + <None Include="Resources\upgradeblueshadeset.png" /> + <None Include="Resources\upgradebrowncustom.png" /> + <None Include="Resources\upgradegraycustom.png" /> + <None Include="Resources\upgradegrayshadeset.png" /> + <None Include="Resources\upgradegreencustom.png" /> + <None Include="Resources\upgradegreenshadeset.png" /> + <None Include="Resources\upgradeorangecustom.png" /> + <None Include="Resources\upgradeorangeshadeset.png" /> + <None Include="Resources\upgradepinkcustom.png" /> + <None Include="Resources\upgradepinkshadeset.png" /> + <None Include="Resources\upgradepurpleshadeset.png" /> + <None Include="Resources\upgraderedcustom.png" /> + <None Include="Resources\upgraderedshadeset.png" /> + <None Include="Resources\upgradeyellowcustom.png" /> + <None Include="Resources\upgradeyellowshadeset.png" /> + <None Include="Resources\upgradebrownshadeset.png" /> + <None Include="Resources\upgradepurplecustom.png" /> + <None Include="Resources\anycolourshade.png" /> + <None Include="Resources\anycolourshade2.png" /> + <None Include="Resources\anycolourshade3.png" /> + <None Include="Resources\anycolourshade4.png" /> + <None Include="Resources\Symbolinfo.png" /> + <None Include="Resources\infobox.wav" /> + <None Include="Resources\rolldown.wav" /> + <None Include="Resources\rollup.wav" /> + <None Include="Resources\upgradealshifter.png" /> + <None Include="Resources\upgraderollupbutton.gif" /> + <None Include="Resources\upgraderollupcommand.png" /> + <None Include="Resources\upgradeshiftapplauncher.png" /> + <None Include="Resources\upgradeshiftborders.png" /> + <None Include="Resources\upgradeshiftbuttons.png" /> + <None Include="Resources\upgradeshiftdesktop.png" /> + <None Include="Resources\upgradeshiftdesktoppanel.png" /> + <None Include="Resources\upgradeshifter.png" /> + <None Include="Resources\upgradeshiftpanelclock.png" /> + <None Include="Resources\upgradeshifttitlebar.png" /> + <None Include="Resources\upgradeshifttitletext.png" /> + <None Include="Resources\iconClock.png" /> + <None Include="Resources\iconKnowledgeInput.png" /> + <None Include="Resources\iconPong.png" /> + <None Include="Resources\iconShifter.png" /> + <None Include="Resources\iconShiftorium.png" /> + <None Include="Resources\iconTerminal.png" /> + <None Include="Resources\newicon.png" /> + <None Include="Resources\openicon.png" /> + <None Include="Resources\saveicon.png" /> + <None Include="Resources\uparrow.png" /> + <None Include="Resources\downarrow.png" /> + <None Include="Resources\newfolder.png" /> + <None Include="Resources\deletefile.png" /> + <None Include="Resources\deletefolder.png" /> + <None Include="Resources\fileskimmericon.fw.png" /> + <None Include="Resources\textpad.fw.png" /> + <None Include="Resources\iconFileSkimmer.png" /> + <None Include="Resources\iconTextPad.png" /> + <None Include="Resources\iconshutdown.png" /> + <None Include="Resources\DSC01042.JPG" /> + <None Include="Resources\iconColourPicker.fw.png" /> + <None Include="Resources\iconFileOpener.fw.png" /> + <None Include="Resources\iconFileSaver.fw.png" /> + <None Include="Resources\iconInfoBox.fw.png" /> + <None Include="Resources\upgradealfileskimmer.png" /> + <None Include="Resources\upgradealpong.png" /> + <None Include="Resources\upgradealtextpad.png" /> + <None Include="Resources\upgradeclockicon.png" /> + <None Include="Resources\upgradecolourpickericon.png" /> + <None Include="Resources\upgradefileskimmer.png" /> + <None Include="Resources\upgradefileskimmerdelete.png" /> + <None Include="Resources\upgradefileskimmericon.png" /> + <None Include="Resources\upgradefileskimmernew.png" /> + <None Include="Resources\upgradeinfoboxicon.png" /> + <None Include="Resources\upgradekielements.png" /> + <None Include="Resources\upgradeknowledgeinputicon.png" /> + <None Include="Resources\upgradepong.png" /> + <None Include="Resources\upgradepongicon.png" /> + <None Include="Resources\upgradeshiftericon.png" /> + <None Include="Resources\upgradeshiftoriumicon.png" /> + <None Include="Resources\upgradeterminalicon.png" /> + <None Include="Resources\upgradetextpad.png" /> + <None Include="Resources\upgradetextpadicon.png" /> + <None Include="Resources\upgradetextpadnew.png" /> + <None Include="Resources\upgradetextpadopen.png" /> + <None Include="Resources\upgradetextpadsave.png" /> + <None Include="Resources\upgradeshutdownicon.png" /> + <None Include="Resources\icongraphicpicker.png" /> + <None Include="Resources\tilebutton.png" /> + <None Include="Resources\centrebutton.png" /> + <None Include="Resources\stretchbutton.png" /> + <None Include="Resources\zoombutton.png" /> + <None Include="Resources\centrebuttonpressed.png" /> + <None Include="Resources\stretchbuttonpressed.png" /> + <None Include="Resources\tilebuttonpressed.png" /> + <None Include="Resources\zoombuttonpressed.png" /> + <None Include="Resources\pixelsetter.png" /> + <None Include="Resources\iconArtpad.png" /> + <None Include="Resources\ArtPadmagnify.png" /> + <None Include="Resources\ArtPadnew.png" /> + <None Include="Resources\ArtPadopen.png" /> + <None Include="Resources\ArtPadpencil.png" /> + <None Include="Resources\ArtPadredo.png" /> + <None Include="Resources\ArtPadsave.png" /> + <None Include="Resources\ArtPadundo.png" /> + <None Include="Resources\ArtPadpixelplacer.png" /> + <None Include="Resources\ArtPadfloodfill.png" /> + <None Include="Resources\ArtPadOval.png" /> + <None Include="Resources\ArtPadRectangle.png" /> + <None Include="Resources\ArtPadcirclerubber.png" /> + <None Include="Resources\ArtPadsquarerubber.png" /> + <None Include="Resources\ArtPadcirclerubberselected.png" /> + <None Include="Resources\ArtPaderacer.png" /> + <None Include="Resources\ArtPadsquarerubberselected.png" /> + <None Include="Resources\ArtPadlinetool.png" /> + <None Include="Resources\ArtPadpaintbrush.png" /> + <None Include="Resources\ArtPadtexttool.png" /> + <None Include="Resources\updatecustomcolourpallets.png" /> + <None Include="Resources\upgradealartpad.png" /> + <None Include="Resources\upgradeartpad.png" /> + <None Include="Resources\upgradeartpad4colorpallets.png" /> + <None Include="Resources\upgradeartpad8colorpallets.png" /> + <None Include="Resources\upgradeartpad16colorpallets.png" /> + <None Include="Resources\upgradeartpad32colorpallets.png" /> + <None Include="Resources\upgradeartpad64colorpallets.png" /> + <None Include="Resources\upgradeartpad128colorpallets.png" /> + <None Include="Resources\upgradeartpaderaser.png" /> + <None Include="Resources\upgradeartpadfilltool.png" /> + <None Include="Resources\upgradeartpadicon.png" /> + <None Include="Resources\upgradeartpadlimitlesspixels.png" /> + <None Include="Resources\upgradeartpadlinetool.png" /> + <None Include="Resources\upgradeartpadload.png" /> + <None Include="Resources\upgradeartpadnew.png" /> + <None Include="Resources\upgradeartpadovaltool.png" /> + <None Include="Resources\upgradeartpadpaintbrushtool.png" /> + <None Include="Resources\upgradeartpadpenciltool.png" /> + <None Include="Resources\upgradeartpadpixellimit4.png" /> + <None Include="Resources\upgradeartpadpixellimit8.png" /> + <None Include="Resources\upgradeartpadpixellimit16.png" /> + <None Include="Resources\upgradeartpadpixellimit64.png" /> + <None Include="Resources\upgradeartpadpixellimit256.png" /> + <None Include="Resources\upgradeartpadpixellimit1024.png" /> + <None Include="Resources\upgradeartpadpixellimit4096.png" /> + <None Include="Resources\upgradeartpadpixellimit16384.png" /> + <None Include="Resources\upgradeartpadpixellimit65536.png" /> + <None Include="Resources\upgradeartpadpixelplacer.png" /> + <None Include="Resources\upgradeartpadpixelplacermovementmode.png" /> + <None Include="Resources\upgradeartpadrectangletool.png" /> + <None Include="Resources\upgradeartpadredo.png" /> + <None Include="Resources\upgradeartpadsave.png" /> + <None Include="Resources\upgradeartpadtexttool.png" /> + <None Include="Resources\upgradeartpadundo.png" /> + <None Include="Resources\upgrademinimizebutton.png" /> + <None Include="Resources\upgradepanelbuttons.png" /> + <None Include="Resources\upgradeshiftpanelbuttons.png" /> + <None Include="Resources\upgradeskinning.png" /> + <None Include="Resources\upgradeunitymode.png" /> + <None Include="Resources\upgradeusefulpanelbuttons.png" /> + <None Include="Resources\upgrademinimizecommand.png" /> + <None Include="Resources\iconSkinLoader.png" /> + <None Include="Resources\skinfile.png" /> + <None Include="Resources\playbutton.png" /> + <None Include="Resources\stopbutton.png" /> + <None Include="Resources\loadbutton.png" /> + <None Include="Resources\nextbutton.png" /> + <None Include="Resources\previousbutton.png" /> + <None Include="Resources\webback.png" /> + <None Include="Resources\webforward.png" /> + <None Include="Resources\webhome.png" /> + <None Include="Resources\pausebutton.png" /> + <None Include="Resources\iconCalculator.png" /> + <None Include="Resources\iconAudioPlayer.png" /> + <None Include="Resources\iconNameChanger.png" /> + <None Include="Resources\iconVideoPlayer.png" /> + <None Include="Resources\iconWebBrowser.png" /> + <None Include="Resources\iconIconManager.png" /> + <None Include="Resources\3beepvirus.wav" /> + <None Include="Resources\iconBitnoteDigger.png" /> + <None Include="Resources\iconBitnoteWallet.png" /> + <None Include="Resources\Receive.png" /> + <None Include="Resources\Send.png" /> + <None Include="Resources\TotalBalanceUnclicked.png" /> + <None Include="Resources\transactionsUnclicked.png" /> + <None Include="Resources\ReceiveClicked.png" /> + <None Include="Resources\SendClicked.png" /> + <None Include="Resources\TotalBalanceClicked.png" /> + <None Include="Resources\transactionsClicked.png" /> + <None Include="Resources\iconSkinShifter.png" /> + <None Include="Resources\skindownarrow.png" /> + <None Include="Resources\skinuparrow.png" /> + <None Include="Resources\iconDownloader.png" /> + <None Include="Resources\iconShiftnet.png" /> + <None Include="Resources\appscapeaudioplayerbox.png" /> + <None Include="Resources\appscapeaudioplayerprice.png" /> + <None Include="Resources\appscapecalculator.png" /> + <None Include="Resources\appscapecalculatorprice.png" /> + <None Include="Resources\appscapedepositnowbutton.png" /> + <None Include="Resources\appscapedownloadbutton.png" /> + <None Include="Resources\appscapeinfobutton.png" /> + <None Include="Resources\appscapemoresoftware.png" /> + <None Include="Resources\appscapetitlebanner.png" /> + <None Include="Resources\appscapeundefinedprice.png" /> + <None Include="Resources\appscapevideoplayer.png" /> + <None Include="Resources\appscapevideoplayerprice.png" /> + <None Include="Resources\appscapewebbrowser.png" /> + <None Include="Resources\appscapewebbrowserprice.png" /> + <None Include="Resources\appscapewelcometoappscape.png" /> + <None Include="Resources\appscapeinfobuttonpressed.png" /> + <None Include="Resources\appscapeaudioplayerpricepressed.png" /> + <None Include="Resources\appscapecalculatorpricepressed.png" /> + <None Include="Resources\appscapeundefinedpricepressed.png" /> + <None Include="Resources\appscapevideoplayerpricepressed.png" /> + <None Include="Resources\appscapewebbrowserpricepressed.png" /> + <None Include="Resources\appscapeinfoaudioplayertext.png" /> + <None Include="Resources\appscapeinfoaudioplayervisualpreview.png" /> + <None Include="Resources\appscapeinfobackbutton.png" /> + <None Include="Resources\appscapeinfobuybutton.png" /> + <None Include="Resources\appscapeinfocalculatorvisualpreview.png" /> + <None Include="Resources\appscapeinfovideoplayervisualpreview.png" /> + <None Include="Resources\appscapeinfowebbrowservisualpreview.png" /> + <None Include="Resources\appscapeinfocalculatortext.png" /> + <None Include="Resources\appscapeinfovideoplayertext.png" /> + <None Include="Resources\appscapeinfowebbrowsertext.png" /> + <None Include="Resources\dodge.png" /> + <None Include="Resources\iconDodge.png" /> + <None Include="Resources\BitnotesAcceptedHereLogo.bmp" /> + <None Include="Resources\Minimatchbackground.png" /> + <None Include="Resources\minimatchdodgepreviewimage.png" /> + <None Include="Resources\downloadmanagericon.png" /> + <None Include="Resources\appscapedepositinfo.png" /> + <None Include="Resources\appscapedepositbitnotewalletscreenshot.png" /> + <None Include="Resources\installericon.png" /> + <None Include="Resources\iconSnakey.png" /> + <None Include="Resources\snakeyback.bmp" /> + <None Include="Resources\bitnotewebsitetitle.png" /> + <None Include="Resources\bitnoteswebsidepnl.png" /> + <None Include="Resources\bitnotewalletpreviewscreenshot.png" /> + <None Include="Resources\bitnotewalletdownload.png" /> + <None Include="Resources\iconorcwrite.png" /> + <None Include="Resources\floodgateicn.png" /> + <None Include="Resources\iconunitytoggle.png" /> + <None Include="Resources\iconfloodgate.png" /> + <None Include="Resources\bitnotediggergradetable.png" /> + <None Include="Resources\iconSysinfo.png" /> + <None Include="Resources\iconvirusscanner.png" /> + <None Include="Resources\crash.png" /> + <None Include="Resources\shiftomizersliderrightarrow.png" /> + <None Include="Resources\shiftomizersliderleftarrow.png" /> + <None Include="Resources\shiftomizerindustrialskinpreview.png" /> + <None Include="Resources\shiftomizerlinuxmintskinpreview.png" /> + <None Include="Resources\crash-cheat.png" /> + <None Include="Resources\crash-force.png" /> + <None Include="Resources\shiftomizerskinshifterscreenshot.png" /> + <None Include="Resources\AxInterop.WMPLib.dll" /> + <None Include="Resources\ShiftOS License.txt" /> + <None Include="Resources\christmaseasteregg.png" /> + <None Include="Resources\crash_ofm.png" /> + <None Include="Resources\Interop.WMPLib.dll" /> + <None Include="Resources\iconmaze.png" /> + <None Include="Resources\shiftomizericonpreview.png" /> + <None Include="Resources\shiftomizernamechangerpreview.png" /> + <None Include="Resources\minimatchlabyrinthpreview.png" /> + <None Include="Resources\upgradeshiftitems.png" /> + <None Include="Resources\upgradeosname.png" /> + <None Include="Resources\upgraderesize.png" /> + <None Include="Resources\upgradealunitymode.png" /> + <None Include="Resources\upgradetrm.png" /> + <None Include="Resources\upgradeiconunitymode.png" /> + <None Include="Resources\upgradesysinfo.png" /> + <None Include="Resources\upgradevirusscanner.png" /> + <None Include="Resources\upgraderemoveth1.png" /> + <None Include="Resources\upgraderemoveth2.png" /> + <None Include="Resources\upgraderemoveth4.png" /> + <None Include="Resources\upgraderemoveth3.png" /> + <None Include="Resources\appscapeorcwrite.png" /> + <None Include="Resources\appscapeinfoorcwritevisualpreview.png" /> + <None Include="Resources\appscapeinfoorcwritetext.png" /> + <None Include="Resources\DesktopPlusPlusAbout.txt" /> + <None Include="Resources\story.txt" /> + <None Include="Resources\CatalystStory.txt" /> + <Content Include="Resources\CatalystGrammar.xml" /> + <Content Include="ShiftOSLogo.ico" /> + </ItemGroup> + <ItemGroup> + <COMReference Include="AxWMPLib"> + <Guid>{6BF52A50-394A-11D3-B153-00C04F79FAA6}</Guid> + <VersionMajor>1</VersionMajor> + <VersionMinor>0</VersionMinor> + <Lcid>0</Lcid> + <WrapperTool>aximp</WrapperTool> + <Isolated>False</Isolated> + </COMReference> + <COMReference Include="WMPLib"> + <Guid>{6BF52A50-394A-11D3-B153-00C04F79FAA6}</Guid> + <VersionMajor>1</VersionMajor> + <VersionMinor>0</VersionMinor> + <Lcid>0</Lcid> + <WrapperTool>tlbimp</WrapperTool> + <Isolated>False</Isolated> + <EmbedInteropTypes>True</EmbedInteropTypes> + </COMReference> + </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> \ No newline at end of file diff --git a/ShiftOS/ShiftOSDesktop.Designer.vb b/ShiftOS/ShiftOSDesktop.Designer.vb new file mode 100644 index 0000000..a1dde5b --- /dev/null +++ b/ShiftOS/ShiftOSDesktop.Designer.vb @@ -0,0 +1,2832 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class ShiftOSDesktop + 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() + Me.components = New System.ComponentModel.Container() + Me.desktoppanel = New System.Windows.Forms.Panel() + Me.pnlpanelbuttonholder = New System.Windows.Forms.FlowLayoutPanel() + Me.pnlpanelbuttonclock = New System.Windows.Forms.Panel() + Me.tbclockicon = New System.Windows.Forms.PictureBox() + Me.tbclocktext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonsysinfo = New System.Windows.Forms.Panel() + Me.tbsysinfoicon = New System.Windows.Forms.PictureBox() + Me.tbsysinfotext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonskinloader = New System.Windows.Forms.Panel() + Me.tbskinloadericon = New System.Windows.Forms.PictureBox() + Me.tbskinloadertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonfileskimmer = New System.Windows.Forms.Panel() + Me.tbfileskimmericon = New System.Windows.Forms.PictureBox() + Me.tbfileskimmertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonfileopener = New System.Windows.Forms.Panel() + Me.tbfileopenericon = New System.Windows.Forms.PictureBox() + Me.tbfileopenertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttoninfobox = New System.Windows.Forms.Panel() + Me.tbinfoboxicon = New System.Windows.Forms.PictureBox() + Me.tbinfoboxtext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonknowledgeinput = New System.Windows.Forms.Panel() + Me.tbknowledgeinputicon = New System.Windows.Forms.PictureBox() + Me.tbknowledgeinputtext = New System.Windows.Forms.Label() + Me.pnlpanelbuttoncolourpicker = New System.Windows.Forms.Panel() + Me.tbcolourpickericon = New System.Windows.Forms.PictureBox() + Me.tbcolourpickertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonshiftorium = New System.Windows.Forms.Panel() + Me.tbshiftoriumicon = New System.Windows.Forms.PictureBox() + Me.tbshiftoriumtext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonpong = New System.Windows.Forms.Panel() + Me.tbpongicon = New System.Windows.Forms.PictureBox() + Me.tbpongtext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonterminal = New System.Windows.Forms.Panel() + Me.tbterminalicon = New System.Windows.Forms.PictureBox() + Me.tbterminaltext = New System.Windows.Forms.Label() + Me.pnlpanelbuttontextpad = New System.Windows.Forms.Panel() + Me.tbtextpadicon = New System.Windows.Forms.PictureBox() + Me.tbtextpadtext = New System.Windows.Forms.Label() + Me.pnlpanelbuttongraphicpicker = New System.Windows.Forms.Panel() + Me.tbgraphicpickericon = New System.Windows.Forms.PictureBox() + Me.tbgraphicpickertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonartpad = New System.Windows.Forms.Panel() + Me.tbartpadicon = New System.Windows.Forms.PictureBox() + Me.tbartpadtext = New System.Windows.Forms.Label() + Me.pnlpanelbuttoncalculator = New System.Windows.Forms.Panel() + Me.tbcalculatoricon = New System.Windows.Forms.PictureBox() + Me.tbcalculatortext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonaudioplayer = New System.Windows.Forms.Panel() + Me.tbaudioplayericon = New System.Windows.Forms.PictureBox() + Me.tbaudioplayertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonvideoplayer = New System.Windows.Forms.Panel() + Me.tbvideoplayericon = New System.Windows.Forms.PictureBox() + Me.tbvideoplayertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonwebbrowser = New System.Windows.Forms.Panel() + Me.tbwebbrowsericon = New System.Windows.Forms.PictureBox() + Me.tbwebbrowsertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonnamechanger = New System.Windows.Forms.Panel() + Me.tbnamechangericon = New System.Windows.Forms.PictureBox() + Me.tbnamechangertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttoniconmanager = New System.Windows.Forms.Panel() + Me.tbiconmanagericon = New System.Windows.Forms.PictureBox() + Me.tbiconmanagertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonbitnotewallet = New System.Windows.Forms.Panel() + Me.tbbitnotewalleticon = New System.Windows.Forms.PictureBox() + Me.tbbitnotewallettext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonbitnotedigger = New System.Windows.Forms.Panel() + Me.tbbitnotediggericon = New System.Windows.Forms.PictureBox() + Me.tbbitnotediggertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonskinshifter = New System.Windows.Forms.Panel() + Me.tbskinshiftericon = New System.Windows.Forms.PictureBox() + Me.tbskinshiftertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttondownloader = New System.Windows.Forms.Panel() + Me.tbdownloadericon = New System.Windows.Forms.PictureBox() + Me.tbdownloadertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonshiftnet = New System.Windows.Forms.Panel() + Me.tbshiftneticon = New System.Windows.Forms.PictureBox() + Me.tbshiftnettext = New System.Windows.Forms.Label() + Me.pnlpanelbuttondodge = New System.Windows.Forms.Panel() + Me.tbdodgeicon = New System.Windows.Forms.PictureBox() + Me.tbdodgetext = New System.Windows.Forms.Label() + Me.pnlpanelbuttondownloadmanager = New System.Windows.Forms.Panel() + Me.tbdownloadmanagericon = New System.Windows.Forms.PictureBox() + Me.tbdownloadmanagertext = New System.Windows.Forms.Label() + Me.pnlcatalystpanelbutton = New System.Windows.Forms.Panel() + Me.tbcatalysticon = New System.Windows.Forms.PictureBox() + Me.lbcatalystname = New System.Windows.Forms.Label() + Me.pnlpanelbuttoninstaller = New System.Windows.Forms.Panel() + Me.tbinstallericon = New System.Windows.Forms.PictureBox() + Me.tbinstallertext = New System.Windows.Forms.Label() + Me.pnl_panelbuttonsnakey = New System.Windows.Forms.Panel() + Me.tbsnakeyicon = New System.Windows.Forms.PictureBox() + Me.tbsnakeytext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonorcwrite = New System.Windows.Forms.Panel() + Me.tborcwriteicon = New System.Windows.Forms.PictureBox() + Me.tborcwritetext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonsnakey = New System.Windows.Forms.Label() + Me.pnlpanelbuttonfloodgate = New System.Windows.Forms.Panel() + Me.tbfloodgateicon = New System.Windows.Forms.PictureBox() + Me.tbfloodgatetext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonmaze = New System.Windows.Forms.Panel() + Me.tbmazeicon = New System.Windows.Forms.PictureBox() + Me.tbmazetext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonvirusscanner = New System.Windows.Forms.Panel() + Me.tbvirusscannericon = New System.Windows.Forms.PictureBox() + Me.tbvirusscannertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonfilesaver = New System.Windows.Forms.Panel() + Me.tbfilesavericon = New System.Windows.Forms.PictureBox() + Me.tbfilesavertext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonshifter = New System.Windows.Forms.Panel() + Me.tbshiftericon = New System.Windows.Forms.PictureBox() + Me.tbshiftertext = New System.Windows.Forms.Label() + Me.applaunchermenuholder = New System.Windows.Forms.Panel() + Me.desktopappmenu = New System.Windows.Forms.MenuStrip() + Me.ApplicationsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ArtpadToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.AudioplayerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.BitnoteDiggerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.BitnoteWalletToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CalculatorToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ClockToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DodgeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.downloadmanagerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FileSkimmerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FloodGateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.IconManagerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.InstallerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.KnowledgeInputToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MazeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.NameChangerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.orcwriteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.PongToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShifterToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CatalystToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.ShiftnetToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShiftoriumToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SkinLoaderToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SkinShifterToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SnakeyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.sysinfoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TerminalToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TextPadToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.WebBrowserToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.VideoplayerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.VirusScannerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.unitySeperator = New System.Windows.Forms.ToolStripSeparator() + Me.UnityToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShutdownToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.timepanel = New System.Windows.Forms.Panel() + Me.paneltimetext = New System.Windows.Forms.Label() + Me.pnlpanelbuttonfloatybird = New System.Windows.Forms.Panel() + Me.tbfloatybirdicon = New System.Windows.Forms.PictureBox() + Me.tbfloatybirdtext = New System.Windows.Forms.Label() + Me.floatybirdToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.clocktick = New System.Windows.Forms.Timer(Me.components) + Me.autosave = New System.Windows.Forms.Timer(Me.components) + Me.nocheat = New System.Windows.Forms.Timer(Me.components) + Me.tmrwindowedtest = New System.Windows.Forms.Timer(Me.components) + Me.desktopicons = New System.Windows.Forms.ListView() + Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.NewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FolderToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripSeparator() + Me.ArtpadPictureToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TextDocumentToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OrcWriteDocumentToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SystemInformationReportToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.NewSkin = New System.Windows.Forms.ToolStripMenuItem() + Me.WebpageToolStripMenuItem = New System.Windows.Forms.ToolStripSeparator() + Me.ShortcutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripSeparator() + Me.TileViewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RenameToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DeleteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.fileActionsSeparator = New System.Windows.Forms.ToolStripSeparator() + Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.pnladvapplauncher = New System.Windows.Forms.Panel() + Me.pnladvmain = New System.Windows.Forms.Panel() + Me.tscadvmainframe = New System.Windows.Forms.ToolStripContainer() + Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() + Me.allPrograms = New System.Windows.Forms.ToolStripDropDownButton() + Me.UtilitiesToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TerminalToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.FileSkimmerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.SystemInformationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SettingsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShifterToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.SkinLoaderToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.SkinShifterToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.IconManagerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.NameChangerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.InternetToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShiftnetToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.ShiftoriumToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.WebBrowserToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.DownloadManagerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.InstallerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.BitnoteDiggerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.BitnoteWalletToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.FloodGateManagerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.VirusScannerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.CatalystToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.GamesToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DodgeToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.SnakeyToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.PongToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.KnowledgeInputToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.LabyrinthToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.AccessoriesToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ArtpadToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.TextpadToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.OrcWriteToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.AudioPlayerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.VideoPlayerToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.ClockToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.CalculatorToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.lvadvfiles = New System.Windows.Forms.ListView() + Me.pnladvplaces = New System.Windows.Forms.Panel() + Me.lvadvplaces = New System.Windows.Forms.ListView() + Me.pnladvbottombar = New System.Windows.Forms.Panel() + Me.btnadvshutdown = New System.Windows.Forms.Button() + Me.pnladvtopbar = New System.Windows.Forms.Panel() + Me.lbuser = New System.Windows.Forms.Label() + Me.desktoppanel.SuspendLayout() + Me.pnlpanelbuttonholder.SuspendLayout() + Me.pnlpanelbuttonclock.SuspendLayout() + CType(Me.tbclockicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonsysinfo.SuspendLayout() + CType(Me.tbsysinfoicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonskinloader.SuspendLayout() + CType(Me.tbskinloadericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonfileskimmer.SuspendLayout() + CType(Me.tbfileskimmericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonfileopener.SuspendLayout() + CType(Me.tbfileopenericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttoninfobox.SuspendLayout() + CType(Me.tbinfoboxicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonknowledgeinput.SuspendLayout() + CType(Me.tbknowledgeinputicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttoncolourpicker.SuspendLayout() + CType(Me.tbcolourpickericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonshiftorium.SuspendLayout() + CType(Me.tbshiftoriumicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonpong.SuspendLayout() + CType(Me.tbpongicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonterminal.SuspendLayout() + CType(Me.tbterminalicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttontextpad.SuspendLayout() + CType(Me.tbtextpadicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttongraphicpicker.SuspendLayout() + CType(Me.tbgraphicpickericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonartpad.SuspendLayout() + CType(Me.tbartpadicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttoncalculator.SuspendLayout() + CType(Me.tbcalculatoricon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonaudioplayer.SuspendLayout() + CType(Me.tbaudioplayericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonvideoplayer.SuspendLayout() + CType(Me.tbvideoplayericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonwebbrowser.SuspendLayout() + CType(Me.tbwebbrowsericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonnamechanger.SuspendLayout() + CType(Me.tbnamechangericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttoniconmanager.SuspendLayout() + CType(Me.tbiconmanagericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonbitnotewallet.SuspendLayout() + CType(Me.tbbitnotewalleticon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonbitnotedigger.SuspendLayout() + CType(Me.tbbitnotediggericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonskinshifter.SuspendLayout() + CType(Me.tbskinshiftericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttondownloader.SuspendLayout() + CType(Me.tbdownloadericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonshiftnet.SuspendLayout() + CType(Me.tbshiftneticon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttondodge.SuspendLayout() + CType(Me.tbdodgeicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttondownloadmanager.SuspendLayout() + CType(Me.tbdownloadmanagericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlcatalystpanelbutton.SuspendLayout() + CType(Me.tbcatalysticon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttoninstaller.SuspendLayout() + CType(Me.tbinstallericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnl_panelbuttonsnakey.SuspendLayout() + CType(Me.tbsnakeyicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonorcwrite.SuspendLayout() + CType(Me.tborcwriteicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonfloodgate.SuspendLayout() + CType(Me.tbfloodgateicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonmaze.SuspendLayout() + CType(Me.tbmazeicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonvirusscanner.SuspendLayout() + CType(Me.tbvirusscannericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonfilesaver.SuspendLayout() + CType(Me.tbfilesavericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonshifter.SuspendLayout() + CType(Me.tbshiftericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.applaunchermenuholder.SuspendLayout() + Me.desktopappmenu.SuspendLayout() + Me.timepanel.SuspendLayout() + Me.pnlpanelbuttonfloatybird.SuspendLayout() + CType(Me.tbfloatybirdicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.ContextMenuStrip1.SuspendLayout() + Me.pnladvapplauncher.SuspendLayout() + Me.pnladvmain.SuspendLayout() + Me.tscadvmainframe.BottomToolStripPanel.SuspendLayout() + Me.tscadvmainframe.ContentPanel.SuspendLayout() + Me.tscadvmainframe.SuspendLayout() + Me.ToolStrip1.SuspendLayout() + Me.pnladvplaces.SuspendLayout() + Me.pnladvbottombar.SuspendLayout() + Me.pnladvtopbar.SuspendLayout() + Me.SuspendLayout() + ' + 'desktoppanel + ' + Me.desktoppanel.BackColor = System.Drawing.Color.Gray + Me.desktoppanel.Controls.Add(Me.pnlpanelbuttonholder) + Me.desktoppanel.Controls.Add(Me.applaunchermenuholder) + Me.desktoppanel.Controls.Add(Me.timepanel) + Me.desktoppanel.Dock = System.Windows.Forms.DockStyle.Top + Me.desktoppanel.Location = New System.Drawing.Point(0, 0) + Me.desktoppanel.Name = "desktoppanel" + Me.desktoppanel.Size = New System.Drawing.Size(1268, 24) + Me.desktoppanel.TabIndex = 0 + Me.desktoppanel.Visible = False + ' + 'pnlpanelbuttonholder + ' + Me.pnlpanelbuttonholder.BackColor = System.Drawing.Color.Transparent + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonclock) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonsysinfo) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonskinloader) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonfileskimmer) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonfileopener) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttoninfobox) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonknowledgeinput) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttoncolourpicker) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonshiftorium) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonpong) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonterminal) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttontextpad) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttongraphicpicker) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonartpad) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttoncalculator) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonaudioplayer) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonvideoplayer) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonwebbrowser) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonnamechanger) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttoniconmanager) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonbitnotewallet) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonbitnotedigger) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonskinshifter) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttondownloader) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonshiftnet) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttondodge) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttondownloadmanager) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlcatalystpanelbutton) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttoninstaller) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnl_panelbuttonsnakey) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonorcwrite) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonsnakey) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonfloodgate) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonmaze) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonvirusscanner) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonfilesaver) + Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonshifter) + Me.pnlpanelbuttonholder.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlpanelbuttonholder.Location = New System.Drawing.Point(130, 0) + Me.pnlpanelbuttonholder.Name = "pnlpanelbuttonholder" + Me.pnlpanelbuttonholder.Padding = New System.Windows.Forms.Padding(2, 0, 0, 0) + Me.pnlpanelbuttonholder.Size = New System.Drawing.Size(1041, 24) + Me.pnlpanelbuttonholder.TabIndex = 1 + ' + 'pnlpanelbuttonclock + ' + Me.pnlpanelbuttonclock.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonclock.Controls.Add(Me.tbclockicon) + Me.pnlpanelbuttonclock.Controls.Add(Me.tbclocktext) + Me.pnlpanelbuttonclock.Location = New System.Drawing.Point(5, 3) + Me.pnlpanelbuttonclock.Name = "pnlpanelbuttonclock" + Me.pnlpanelbuttonclock.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonclock.TabIndex = 5 + Me.pnlpanelbuttonclock.Visible = False + ' + 'tbclockicon + ' + Me.tbclockicon.BackColor = System.Drawing.Color.Transparent + Me.tbclockicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbclockicon.Image = Global.ShiftOS.My.Resources.Resources.iconClock + Me.tbclockicon.Location = New System.Drawing.Point(4, 2) + Me.tbclockicon.Name = "tbclockicon" + Me.tbclockicon.Size = New System.Drawing.Size(16, 16) + Me.tbclockicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbclockicon.TabIndex = 1 + Me.tbclockicon.TabStop = False + ' + 'tbclocktext + ' + Me.tbclocktext.AutoSize = True + Me.tbclocktext.BackColor = System.Drawing.Color.Transparent + Me.tbclocktext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbclocktext.ForeColor = System.Drawing.Color.White + Me.tbclocktext.Location = New System.Drawing.Point(24, 2) + Me.tbclocktext.Name = "tbclocktext" + Me.tbclocktext.Size = New System.Drawing.Size(42, 16) + Me.tbclocktext.TabIndex = 0 + Me.tbclocktext.Text = "Clock" + ' + 'pnlpanelbuttonsysinfo + ' + Me.pnlpanelbuttonsysinfo.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonsysinfo.Controls.Add(Me.tbsysinfoicon) + Me.pnlpanelbuttonsysinfo.Controls.Add(Me.tbsysinfotext) + Me.pnlpanelbuttonsysinfo.Location = New System.Drawing.Point(21, 3) + Me.pnlpanelbuttonsysinfo.Name = "pnlpanelbuttonsysinfo" + Me.pnlpanelbuttonsysinfo.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonsysinfo.TabIndex = 27 + Me.pnlpanelbuttonsysinfo.Visible = False + ' + 'tbsysinfoicon + ' + Me.tbsysinfoicon.BackColor = System.Drawing.Color.Transparent + Me.tbsysinfoicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbsysinfoicon.Image = Global.ShiftOS.My.Resources.Resources.floodgateicn + Me.tbsysinfoicon.Location = New System.Drawing.Point(4, 2) + Me.tbsysinfoicon.Name = "tbsysinfoicon" + Me.tbsysinfoicon.Size = New System.Drawing.Size(16, 16) + Me.tbsysinfoicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbsysinfoicon.TabIndex = 1 + Me.tbsysinfoicon.TabStop = False + ' + 'tbsysinfotext + ' + Me.tbsysinfotext.AutoSize = True + Me.tbsysinfotext.BackColor = System.Drawing.Color.Transparent + Me.tbsysinfotext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbsysinfotext.ForeColor = System.Drawing.Color.White + Me.tbsysinfotext.Location = New System.Drawing.Point(20, 0) + Me.tbsysinfotext.Name = "tbsysinfotext" + Me.tbsysinfotext.Size = New System.Drawing.Size(126, 16) + Me.tbsysinfotext.TabIndex = 0 + Me.tbsysinfotext.Text = "Download Manager" + ' + 'pnlpanelbuttonskinloader + ' + Me.pnlpanelbuttonskinloader.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonskinloader.Controls.Add(Me.tbskinloadericon) + Me.pnlpanelbuttonskinloader.Controls.Add(Me.tbskinloadertext) + Me.pnlpanelbuttonskinloader.Location = New System.Drawing.Point(37, 3) + Me.pnlpanelbuttonskinloader.Name = "pnlpanelbuttonskinloader" + Me.pnlpanelbuttonskinloader.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonskinloader.TabIndex = 7 + Me.pnlpanelbuttonskinloader.Visible = False + ' + 'tbskinloadericon + ' + Me.tbskinloadericon.BackColor = System.Drawing.Color.Transparent + Me.tbskinloadericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbskinloadericon.Image = Global.ShiftOS.My.Resources.Resources.iconSkinLoader + Me.tbskinloadericon.Location = New System.Drawing.Point(4, 2) + Me.tbskinloadericon.Name = "tbskinloadericon" + Me.tbskinloadericon.Size = New System.Drawing.Size(16, 16) + Me.tbskinloadericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbskinloadericon.TabIndex = 1 + Me.tbskinloadericon.TabStop = False + ' + 'tbskinloadertext + ' + Me.tbskinloadertext.AutoSize = True + Me.tbskinloadertext.BackColor = System.Drawing.Color.Transparent + Me.tbskinloadertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbskinloadertext.ForeColor = System.Drawing.Color.White + Me.tbskinloadertext.Location = New System.Drawing.Point(24, 2) + Me.tbskinloadertext.Name = "tbskinloadertext" + Me.tbskinloadertext.Size = New System.Drawing.Size(80, 16) + Me.tbskinloadertext.TabIndex = 0 + Me.tbskinloadertext.Text = "Skin Loader" + ' + 'pnlpanelbuttonfileskimmer + ' + Me.pnlpanelbuttonfileskimmer.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonfileskimmer.Controls.Add(Me.tbfileskimmericon) + Me.pnlpanelbuttonfileskimmer.Controls.Add(Me.tbfileskimmertext) + Me.pnlpanelbuttonfileskimmer.Location = New System.Drawing.Point(53, 3) + Me.pnlpanelbuttonfileskimmer.Name = "pnlpanelbuttonfileskimmer" + Me.pnlpanelbuttonfileskimmer.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonfileskimmer.TabIndex = 6 + Me.pnlpanelbuttonfileskimmer.Visible = False + ' + 'tbfileskimmericon + ' + Me.tbfileskimmericon.BackColor = System.Drawing.Color.Transparent + Me.tbfileskimmericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbfileskimmericon.Image = Global.ShiftOS.My.Resources.Resources.iconFileSkimmer + Me.tbfileskimmericon.Location = New System.Drawing.Point(4, 2) + Me.tbfileskimmericon.Name = "tbfileskimmericon" + Me.tbfileskimmericon.Size = New System.Drawing.Size(16, 16) + Me.tbfileskimmericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbfileskimmericon.TabIndex = 1 + Me.tbfileskimmericon.TabStop = False + ' + 'tbfileskimmertext + ' + Me.tbfileskimmertext.AutoSize = True + Me.tbfileskimmertext.BackColor = System.Drawing.Color.Transparent + Me.tbfileskimmertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbfileskimmertext.ForeColor = System.Drawing.Color.White + Me.tbfileskimmertext.Location = New System.Drawing.Point(24, 2) + Me.tbfileskimmertext.Name = "tbfileskimmertext" + Me.tbfileskimmertext.Size = New System.Drawing.Size(86, 16) + Me.tbfileskimmertext.TabIndex = 0 + Me.tbfileskimmertext.Text = "File Skimmer" + ' + 'pnlpanelbuttonfileopener + ' + Me.pnlpanelbuttonfileopener.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonfileopener.Controls.Add(Me.tbfileopenericon) + Me.pnlpanelbuttonfileopener.Controls.Add(Me.tbfileopenertext) + Me.pnlpanelbuttonfileopener.Location = New System.Drawing.Point(69, 3) + Me.pnlpanelbuttonfileopener.Name = "pnlpanelbuttonfileopener" + Me.pnlpanelbuttonfileopener.Size = New System.Drawing.Size(12, 20) + Me.pnlpanelbuttonfileopener.TabIndex = 6 + Me.pnlpanelbuttonfileopener.Visible = False + ' + 'tbfileopenericon + ' + Me.tbfileopenericon.BackColor = System.Drawing.Color.Transparent + Me.tbfileopenericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbfileopenericon.Image = Global.ShiftOS.My.Resources.Resources.iconFileOpener + Me.tbfileopenericon.Location = New System.Drawing.Point(4, 2) + Me.tbfileopenericon.Name = "tbfileopenericon" + Me.tbfileopenericon.Size = New System.Drawing.Size(16, 16) + Me.tbfileopenericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbfileopenericon.TabIndex = 1 + Me.tbfileopenericon.TabStop = False + ' + 'tbfileopenertext + ' + Me.tbfileopenertext.AutoSize = True + Me.tbfileopenertext.BackColor = System.Drawing.Color.Transparent + Me.tbfileopenertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbfileopenertext.ForeColor = System.Drawing.Color.White + Me.tbfileopenertext.Location = New System.Drawing.Point(24, 2) + Me.tbfileopenertext.Name = "tbfileopenertext" + Me.tbfileopenertext.Size = New System.Drawing.Size(78, 16) + Me.tbfileopenertext.TabIndex = 0 + Me.tbfileopenertext.Text = "File Opener" + ' + 'pnlpanelbuttoninfobox + ' + Me.pnlpanelbuttoninfobox.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttoninfobox.Controls.Add(Me.tbinfoboxicon) + Me.pnlpanelbuttoninfobox.Controls.Add(Me.tbinfoboxtext) + Me.pnlpanelbuttoninfobox.Location = New System.Drawing.Point(87, 3) + Me.pnlpanelbuttoninfobox.Name = "pnlpanelbuttoninfobox" + Me.pnlpanelbuttoninfobox.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttoninfobox.TabIndex = 6 + Me.pnlpanelbuttoninfobox.Visible = False + ' + 'tbinfoboxicon + ' + Me.tbinfoboxicon.BackColor = System.Drawing.Color.Transparent + Me.tbinfoboxicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbinfoboxicon.Image = Global.ShiftOS.My.Resources.Resources.iconInfoBox + Me.tbinfoboxicon.Location = New System.Drawing.Point(4, 2) + Me.tbinfoboxicon.Name = "tbinfoboxicon" + Me.tbinfoboxicon.Size = New System.Drawing.Size(16, 16) + Me.tbinfoboxicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbinfoboxicon.TabIndex = 1 + Me.tbinfoboxicon.TabStop = False + ' + 'tbinfoboxtext + ' + Me.tbinfoboxtext.AutoSize = True + Me.tbinfoboxtext.BackColor = System.Drawing.Color.Transparent + Me.tbinfoboxtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbinfoboxtext.ForeColor = System.Drawing.Color.White + Me.tbinfoboxtext.Location = New System.Drawing.Point(24, 2) + Me.tbinfoboxtext.Name = "tbinfoboxtext" + Me.tbinfoboxtext.Size = New System.Drawing.Size(52, 16) + Me.tbinfoboxtext.TabIndex = 0 + Me.tbinfoboxtext.Text = "InfoBox" + ' + 'pnlpanelbuttonknowledgeinput + ' + Me.pnlpanelbuttonknowledgeinput.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonknowledgeinput.Controls.Add(Me.tbknowledgeinputicon) + Me.pnlpanelbuttonknowledgeinput.Controls.Add(Me.tbknowledgeinputtext) + Me.pnlpanelbuttonknowledgeinput.Location = New System.Drawing.Point(103, 3) + Me.pnlpanelbuttonknowledgeinput.Name = "pnlpanelbuttonknowledgeinput" + Me.pnlpanelbuttonknowledgeinput.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonknowledgeinput.TabIndex = 6 + Me.pnlpanelbuttonknowledgeinput.Visible = False + ' + 'tbknowledgeinputicon + ' + Me.tbknowledgeinputicon.BackColor = System.Drawing.Color.Transparent + Me.tbknowledgeinputicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbknowledgeinputicon.Image = Global.ShiftOS.My.Resources.Resources.iconKnowledgeInput + Me.tbknowledgeinputicon.Location = New System.Drawing.Point(4, 2) + Me.tbknowledgeinputicon.Name = "tbknowledgeinputicon" + Me.tbknowledgeinputicon.Size = New System.Drawing.Size(16, 16) + Me.tbknowledgeinputicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbknowledgeinputicon.TabIndex = 1 + Me.tbknowledgeinputicon.TabStop = False + ' + 'tbknowledgeinputtext + ' + Me.tbknowledgeinputtext.AutoSize = True + Me.tbknowledgeinputtext.BackColor = System.Drawing.Color.Transparent + Me.tbknowledgeinputtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbknowledgeinputtext.ForeColor = System.Drawing.Color.White + Me.tbknowledgeinputtext.Location = New System.Drawing.Point(24, 2) + Me.tbknowledgeinputtext.Name = "tbknowledgeinputtext" + Me.tbknowledgeinputtext.Size = New System.Drawing.Size(106, 16) + Me.tbknowledgeinputtext.TabIndex = 0 + Me.tbknowledgeinputtext.Text = "Knowledge Input" + ' + 'pnlpanelbuttoncolourpicker + ' + Me.pnlpanelbuttoncolourpicker.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttoncolourpicker.Controls.Add(Me.tbcolourpickericon) + Me.pnlpanelbuttoncolourpicker.Controls.Add(Me.tbcolourpickertext) + Me.pnlpanelbuttoncolourpicker.Location = New System.Drawing.Point(119, 3) + Me.pnlpanelbuttoncolourpicker.Name = "pnlpanelbuttoncolourpicker" + Me.pnlpanelbuttoncolourpicker.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttoncolourpicker.TabIndex = 6 + Me.pnlpanelbuttoncolourpicker.Visible = False + ' + 'tbcolourpickericon + ' + Me.tbcolourpickericon.BackColor = System.Drawing.Color.Transparent + Me.tbcolourpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbcolourpickericon.Image = Global.ShiftOS.My.Resources.Resources.iconColourPicker + Me.tbcolourpickericon.Location = New System.Drawing.Point(4, 2) + Me.tbcolourpickericon.Name = "tbcolourpickericon" + Me.tbcolourpickericon.Size = New System.Drawing.Size(16, 16) + Me.tbcolourpickericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbcolourpickericon.TabIndex = 1 + Me.tbcolourpickericon.TabStop = False + ' + 'tbcolourpickertext + ' + Me.tbcolourpickertext.AutoSize = True + Me.tbcolourpickertext.BackColor = System.Drawing.Color.Transparent + Me.tbcolourpickertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbcolourpickertext.ForeColor = System.Drawing.Color.White + Me.tbcolourpickertext.Location = New System.Drawing.Point(24, 2) + Me.tbcolourpickertext.Name = "tbcolourpickertext" + Me.tbcolourpickertext.Size = New System.Drawing.Size(88, 16) + Me.tbcolourpickertext.TabIndex = 0 + Me.tbcolourpickertext.Text = "Colour Picker" + ' + 'pnlpanelbuttonshiftorium + ' + Me.pnlpanelbuttonshiftorium.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonshiftorium.Controls.Add(Me.tbshiftoriumicon) + Me.pnlpanelbuttonshiftorium.Controls.Add(Me.tbshiftoriumtext) + Me.pnlpanelbuttonshiftorium.Location = New System.Drawing.Point(135, 3) + Me.pnlpanelbuttonshiftorium.Name = "pnlpanelbuttonshiftorium" + Me.pnlpanelbuttonshiftorium.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonshiftorium.TabIndex = 7 + Me.pnlpanelbuttonshiftorium.Visible = False + ' + 'tbshiftoriumicon + ' + Me.tbshiftoriumicon.BackColor = System.Drawing.Color.Transparent + Me.tbshiftoriumicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbshiftoriumicon.Image = Global.ShiftOS.My.Resources.Resources.iconShiftorium + Me.tbshiftoriumicon.Location = New System.Drawing.Point(4, 2) + Me.tbshiftoriumicon.Name = "tbshiftoriumicon" + Me.tbshiftoriumicon.Size = New System.Drawing.Size(16, 16) + Me.tbshiftoriumicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbshiftoriumicon.TabIndex = 1 + Me.tbshiftoriumicon.TabStop = False + ' + 'tbshiftoriumtext + ' + Me.tbshiftoriumtext.AutoSize = True + Me.tbshiftoriumtext.BackColor = System.Drawing.Color.Transparent + Me.tbshiftoriumtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbshiftoriumtext.ForeColor = System.Drawing.Color.White + Me.tbshiftoriumtext.Location = New System.Drawing.Point(24, 2) + Me.tbshiftoriumtext.Name = "tbshiftoriumtext" + Me.tbshiftoriumtext.Size = New System.Drawing.Size(66, 16) + Me.tbshiftoriumtext.TabIndex = 0 + Me.tbshiftoriumtext.Text = "Shiftorium" + ' + 'pnlpanelbuttonpong + ' + Me.pnlpanelbuttonpong.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonpong.Controls.Add(Me.tbpongicon) + Me.pnlpanelbuttonpong.Controls.Add(Me.tbpongtext) + Me.pnlpanelbuttonpong.Location = New System.Drawing.Point(151, 3) + Me.pnlpanelbuttonpong.Name = "pnlpanelbuttonpong" + Me.pnlpanelbuttonpong.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonpong.TabIndex = 6 + Me.pnlpanelbuttonpong.Visible = False + ' + 'tbpongicon + ' + Me.tbpongicon.BackColor = System.Drawing.Color.Transparent + Me.tbpongicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbpongicon.Image = Global.ShiftOS.My.Resources.Resources.iconPong + Me.tbpongicon.Location = New System.Drawing.Point(4, 2) + Me.tbpongicon.Name = "tbpongicon" + Me.tbpongicon.Size = New System.Drawing.Size(16, 16) + Me.tbpongicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbpongicon.TabIndex = 1 + Me.tbpongicon.TabStop = False + ' + 'tbpongtext + ' + Me.tbpongtext.AutoSize = True + Me.tbpongtext.BackColor = System.Drawing.Color.Transparent + Me.tbpongtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbpongtext.ForeColor = System.Drawing.Color.White + Me.tbpongtext.Location = New System.Drawing.Point(24, 2) + Me.tbpongtext.Name = "tbpongtext" + Me.tbpongtext.Size = New System.Drawing.Size(40, 16) + Me.tbpongtext.TabIndex = 0 + Me.tbpongtext.Text = "Pong" + ' + 'pnlpanelbuttonterminal + ' + Me.pnlpanelbuttonterminal.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonterminal.Controls.Add(Me.tbterminalicon) + Me.pnlpanelbuttonterminal.Controls.Add(Me.tbterminaltext) + Me.pnlpanelbuttonterminal.Location = New System.Drawing.Point(167, 3) + Me.pnlpanelbuttonterminal.Name = "pnlpanelbuttonterminal" + Me.pnlpanelbuttonterminal.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonterminal.TabIndex = 8 + Me.pnlpanelbuttonterminal.Visible = False + ' + 'tbterminalicon + ' + Me.tbterminalicon.BackColor = System.Drawing.Color.Transparent + Me.tbterminalicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbterminalicon.Image = Global.ShiftOS.My.Resources.Resources.iconTerminal + Me.tbterminalicon.Location = New System.Drawing.Point(4, 2) + Me.tbterminalicon.Name = "tbterminalicon" + Me.tbterminalicon.Size = New System.Drawing.Size(16, 16) + Me.tbterminalicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbterminalicon.TabIndex = 1 + Me.tbterminalicon.TabStop = False + ' + 'tbterminaltext + ' + Me.tbterminaltext.AutoSize = True + Me.tbterminaltext.BackColor = System.Drawing.Color.Transparent + Me.tbterminaltext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbterminaltext.ForeColor = System.Drawing.Color.White + Me.tbterminaltext.Location = New System.Drawing.Point(24, 2) + Me.tbterminaltext.Name = "tbterminaltext" + Me.tbterminaltext.Size = New System.Drawing.Size(61, 16) + Me.tbterminaltext.TabIndex = 0 + Me.tbterminaltext.Text = "Terminal" + ' + 'pnlpanelbuttontextpad + ' + Me.pnlpanelbuttontextpad.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttontextpad.Controls.Add(Me.tbtextpadicon) + Me.pnlpanelbuttontextpad.Controls.Add(Me.tbtextpadtext) + Me.pnlpanelbuttontextpad.Location = New System.Drawing.Point(183, 3) + Me.pnlpanelbuttontextpad.Name = "pnlpanelbuttontextpad" + Me.pnlpanelbuttontextpad.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttontextpad.TabIndex = 4 + Me.pnlpanelbuttontextpad.Visible = False + ' + 'tbtextpadicon + ' + Me.tbtextpadicon.BackColor = System.Drawing.Color.Transparent + Me.tbtextpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbtextpadicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.tbtextpadicon.Location = New System.Drawing.Point(4, 2) + Me.tbtextpadicon.Name = "tbtextpadicon" + Me.tbtextpadicon.Size = New System.Drawing.Size(16, 16) + Me.tbtextpadicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbtextpadicon.TabIndex = 1 + Me.tbtextpadicon.TabStop = False + ' + 'tbtextpadtext + ' + Me.tbtextpadtext.AutoSize = True + Me.tbtextpadtext.BackColor = System.Drawing.Color.Transparent + Me.tbtextpadtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbtextpadtext.ForeColor = System.Drawing.Color.White + Me.tbtextpadtext.Location = New System.Drawing.Point(24, 2) + Me.tbtextpadtext.Name = "tbtextpadtext" + Me.tbtextpadtext.Size = New System.Drawing.Size(58, 16) + Me.tbtextpadtext.TabIndex = 0 + Me.tbtextpadtext.Text = "Textpad" + ' + 'pnlpanelbuttongraphicpicker + ' + Me.pnlpanelbuttongraphicpicker.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttongraphicpicker.Controls.Add(Me.tbgraphicpickericon) + Me.pnlpanelbuttongraphicpicker.Controls.Add(Me.tbgraphicpickertext) + Me.pnlpanelbuttongraphicpicker.Location = New System.Drawing.Point(199, 3) + Me.pnlpanelbuttongraphicpicker.Name = "pnlpanelbuttongraphicpicker" + Me.pnlpanelbuttongraphicpicker.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttongraphicpicker.TabIndex = 6 + Me.pnlpanelbuttongraphicpicker.Visible = False + ' + 'tbgraphicpickericon + ' + Me.tbgraphicpickericon.BackColor = System.Drawing.Color.Transparent + Me.tbgraphicpickericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbgraphicpickericon.Image = Global.ShiftOS.My.Resources.Resources.iconGraphicPicker + Me.tbgraphicpickericon.Location = New System.Drawing.Point(4, 2) + Me.tbgraphicpickericon.Name = "tbgraphicpickericon" + Me.tbgraphicpickericon.Size = New System.Drawing.Size(16, 16) + Me.tbgraphicpickericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbgraphicpickericon.TabIndex = 1 + Me.tbgraphicpickericon.TabStop = False + ' + 'tbgraphicpickertext + ' + Me.tbgraphicpickertext.AutoSize = True + Me.tbgraphicpickertext.BackColor = System.Drawing.Color.Transparent + Me.tbgraphicpickertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbgraphicpickertext.ForeColor = System.Drawing.Color.White + Me.tbgraphicpickertext.Location = New System.Drawing.Point(24, 2) + Me.tbgraphicpickertext.Name = "tbgraphicpickertext" + Me.tbgraphicpickertext.Size = New System.Drawing.Size(96, 16) + Me.tbgraphicpickertext.TabIndex = 0 + Me.tbgraphicpickertext.Text = "Graphic Picker" + ' + 'pnlpanelbuttonartpad + ' + Me.pnlpanelbuttonartpad.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonartpad.Controls.Add(Me.tbartpadicon) + Me.pnlpanelbuttonartpad.Controls.Add(Me.tbartpadtext) + Me.pnlpanelbuttonartpad.Location = New System.Drawing.Point(215, 3) + Me.pnlpanelbuttonartpad.Name = "pnlpanelbuttonartpad" + Me.pnlpanelbuttonartpad.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonartpad.TabIndex = 9 + Me.pnlpanelbuttonartpad.Visible = False + ' + 'tbartpadicon + ' + Me.tbartpadicon.BackColor = System.Drawing.Color.Transparent + Me.tbartpadicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbartpadicon.Image = Global.ShiftOS.My.Resources.Resources.iconArtpad + Me.tbartpadicon.Location = New System.Drawing.Point(4, 2) + Me.tbartpadicon.Name = "tbartpadicon" + Me.tbartpadicon.Size = New System.Drawing.Size(16, 16) + Me.tbartpadicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbartpadicon.TabIndex = 1 + Me.tbartpadicon.TabStop = False + ' + 'tbartpadtext + ' + Me.tbartpadtext.AutoSize = True + Me.tbartpadtext.BackColor = System.Drawing.Color.Transparent + Me.tbartpadtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbartpadtext.ForeColor = System.Drawing.Color.White + Me.tbartpadtext.Location = New System.Drawing.Point(23, 2) + Me.tbartpadtext.Name = "tbartpadtext" + Me.tbartpadtext.Size = New System.Drawing.Size(49, 16) + Me.tbartpadtext.TabIndex = 0 + Me.tbartpadtext.Text = "ArtPad" + ' + 'pnlpanelbuttoncalculator + ' + Me.pnlpanelbuttoncalculator.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttoncalculator.Controls.Add(Me.tbcalculatoricon) + Me.pnlpanelbuttoncalculator.Controls.Add(Me.tbcalculatortext) + Me.pnlpanelbuttoncalculator.Location = New System.Drawing.Point(231, 3) + Me.pnlpanelbuttoncalculator.Name = "pnlpanelbuttoncalculator" + Me.pnlpanelbuttoncalculator.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttoncalculator.TabIndex = 10 + Me.pnlpanelbuttoncalculator.Visible = False + ' + 'tbcalculatoricon + ' + Me.tbcalculatoricon.BackColor = System.Drawing.Color.Transparent + Me.tbcalculatoricon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbcalculatoricon.Image = Global.ShiftOS.My.Resources.Resources.iconCalculator + Me.tbcalculatoricon.Location = New System.Drawing.Point(4, 2) + Me.tbcalculatoricon.Name = "tbcalculatoricon" + Me.tbcalculatoricon.Size = New System.Drawing.Size(16, 16) + Me.tbcalculatoricon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbcalculatoricon.TabIndex = 1 + Me.tbcalculatoricon.TabStop = False + ' + 'tbcalculatortext + ' + Me.tbcalculatortext.AutoSize = True + Me.tbcalculatortext.BackColor = System.Drawing.Color.Transparent + Me.tbcalculatortext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbcalculatortext.ForeColor = System.Drawing.Color.White + Me.tbcalculatortext.Location = New System.Drawing.Point(23, 2) + Me.tbcalculatortext.Name = "tbcalculatortext" + Me.tbcalculatortext.Size = New System.Drawing.Size(68, 16) + Me.tbcalculatortext.TabIndex = 0 + Me.tbcalculatortext.Text = "Calculator" + ' + 'pnlpanelbuttonaudioplayer + ' + Me.pnlpanelbuttonaudioplayer.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonaudioplayer.Controls.Add(Me.tbaudioplayericon) + Me.pnlpanelbuttonaudioplayer.Controls.Add(Me.tbaudioplayertext) + Me.pnlpanelbuttonaudioplayer.Location = New System.Drawing.Point(247, 3) + Me.pnlpanelbuttonaudioplayer.Name = "pnlpanelbuttonaudioplayer" + Me.pnlpanelbuttonaudioplayer.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonaudioplayer.TabIndex = 11 + Me.pnlpanelbuttonaudioplayer.Visible = False + ' + 'tbaudioplayericon + ' + Me.tbaudioplayericon.BackColor = System.Drawing.Color.Transparent + Me.tbaudioplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbaudioplayericon.Image = Global.ShiftOS.My.Resources.Resources.iconAudioPlayer + Me.tbaudioplayericon.Location = New System.Drawing.Point(4, 2) + Me.tbaudioplayericon.Name = "tbaudioplayericon" + Me.tbaudioplayericon.Size = New System.Drawing.Size(16, 16) + Me.tbaudioplayericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbaudioplayericon.TabIndex = 1 + Me.tbaudioplayericon.TabStop = False + ' + 'tbaudioplayertext + ' + Me.tbaudioplayertext.AutoSize = True + Me.tbaudioplayertext.BackColor = System.Drawing.Color.Transparent + Me.tbaudioplayertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbaudioplayertext.ForeColor = System.Drawing.Color.White + Me.tbaudioplayertext.Location = New System.Drawing.Point(23, 2) + Me.tbaudioplayertext.Name = "tbaudioplayertext" + Me.tbaudioplayertext.Size = New System.Drawing.Size(85, 16) + Me.tbaudioplayertext.TabIndex = 0 + Me.tbaudioplayertext.Text = "Audio Player" + ' + 'pnlpanelbuttonvideoplayer + ' + Me.pnlpanelbuttonvideoplayer.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonvideoplayer.Controls.Add(Me.tbvideoplayericon) + Me.pnlpanelbuttonvideoplayer.Controls.Add(Me.tbvideoplayertext) + Me.pnlpanelbuttonvideoplayer.Location = New System.Drawing.Point(263, 3) + Me.pnlpanelbuttonvideoplayer.Name = "pnlpanelbuttonvideoplayer" + Me.pnlpanelbuttonvideoplayer.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonvideoplayer.TabIndex = 13 + Me.pnlpanelbuttonvideoplayer.Visible = False + ' + 'tbvideoplayericon + ' + Me.tbvideoplayericon.BackColor = System.Drawing.Color.Transparent + Me.tbvideoplayericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbvideoplayericon.Image = Global.ShiftOS.My.Resources.Resources.iconVideoPlayer + Me.tbvideoplayericon.Location = New System.Drawing.Point(4, 2) + Me.tbvideoplayericon.Name = "tbvideoplayericon" + Me.tbvideoplayericon.Size = New System.Drawing.Size(16, 16) + Me.tbvideoplayericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbvideoplayericon.TabIndex = 1 + Me.tbvideoplayericon.TabStop = False + ' + 'tbvideoplayertext + ' + Me.tbvideoplayertext.AutoSize = True + Me.tbvideoplayertext.BackColor = System.Drawing.Color.Transparent + Me.tbvideoplayertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbvideoplayertext.ForeColor = System.Drawing.Color.White + Me.tbvideoplayertext.Location = New System.Drawing.Point(22, 2) + Me.tbvideoplayertext.Name = "tbvideoplayertext" + Me.tbvideoplayertext.Size = New System.Drawing.Size(86, 16) + Me.tbvideoplayertext.TabIndex = 0 + Me.tbvideoplayertext.Text = "Video Player" + ' + 'pnlpanelbuttonwebbrowser + ' + Me.pnlpanelbuttonwebbrowser.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonwebbrowser.Controls.Add(Me.tbwebbrowsericon) + Me.pnlpanelbuttonwebbrowser.Controls.Add(Me.tbwebbrowsertext) + Me.pnlpanelbuttonwebbrowser.Location = New System.Drawing.Point(279, 3) + Me.pnlpanelbuttonwebbrowser.Name = "pnlpanelbuttonwebbrowser" + Me.pnlpanelbuttonwebbrowser.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonwebbrowser.TabIndex = 12 + Me.pnlpanelbuttonwebbrowser.Visible = False + ' + 'tbwebbrowsericon + ' + Me.tbwebbrowsericon.BackColor = System.Drawing.Color.Transparent + Me.tbwebbrowsericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbwebbrowsericon.Image = Global.ShiftOS.My.Resources.Resources.iconWebBrowser + Me.tbwebbrowsericon.Location = New System.Drawing.Point(4, 2) + Me.tbwebbrowsericon.Name = "tbwebbrowsericon" + Me.tbwebbrowsericon.Size = New System.Drawing.Size(16, 16) + Me.tbwebbrowsericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbwebbrowsericon.TabIndex = 1 + Me.tbwebbrowsericon.TabStop = False + ' + 'tbwebbrowsertext + ' + Me.tbwebbrowsertext.AutoSize = True + Me.tbwebbrowsertext.BackColor = System.Drawing.Color.Transparent + Me.tbwebbrowsertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbwebbrowsertext.ForeColor = System.Drawing.Color.White + Me.tbwebbrowsertext.Location = New System.Drawing.Point(23, 2) + Me.tbwebbrowsertext.Name = "tbwebbrowsertext" + Me.tbwebbrowsertext.Size = New System.Drawing.Size(89, 16) + Me.tbwebbrowsertext.TabIndex = 0 + Me.tbwebbrowsertext.Text = "Web Browser" + ' + 'pnlpanelbuttonnamechanger + ' + Me.pnlpanelbuttonnamechanger.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonnamechanger.Controls.Add(Me.tbnamechangericon) + Me.pnlpanelbuttonnamechanger.Controls.Add(Me.tbnamechangertext) + Me.pnlpanelbuttonnamechanger.Location = New System.Drawing.Point(295, 3) + Me.pnlpanelbuttonnamechanger.Name = "pnlpanelbuttonnamechanger" + Me.pnlpanelbuttonnamechanger.Size = New System.Drawing.Size(36, 20) + Me.pnlpanelbuttonnamechanger.TabIndex = 14 + Me.pnlpanelbuttonnamechanger.Visible = False + ' + 'tbnamechangericon + ' + Me.tbnamechangericon.BackColor = System.Drawing.Color.Transparent + Me.tbnamechangericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbnamechangericon.Image = Global.ShiftOS.My.Resources.Resources.iconNameChanger + Me.tbnamechangericon.Location = New System.Drawing.Point(4, 2) + Me.tbnamechangericon.Name = "tbnamechangericon" + Me.tbnamechangericon.Size = New System.Drawing.Size(16, 16) + Me.tbnamechangericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbnamechangericon.TabIndex = 1 + Me.tbnamechangericon.TabStop = False + ' + 'tbnamechangertext + ' + Me.tbnamechangertext.AutoSize = True + Me.tbnamechangertext.BackColor = System.Drawing.Color.Transparent + Me.tbnamechangertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbnamechangertext.ForeColor = System.Drawing.Color.White + Me.tbnamechangertext.Location = New System.Drawing.Point(22, 2) + Me.tbnamechangertext.Name = "tbnamechangertext" + Me.tbnamechangertext.Size = New System.Drawing.Size(99, 16) + Me.tbnamechangertext.TabIndex = 0 + Me.tbnamechangertext.Text = "Name Changer" + ' + 'pnlpanelbuttoniconmanager + ' + Me.pnlpanelbuttoniconmanager.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttoniconmanager.Controls.Add(Me.tbiconmanagericon) + Me.pnlpanelbuttoniconmanager.Controls.Add(Me.tbiconmanagertext) + Me.pnlpanelbuttoniconmanager.Location = New System.Drawing.Point(337, 3) + Me.pnlpanelbuttoniconmanager.Name = "pnlpanelbuttoniconmanager" + Me.pnlpanelbuttoniconmanager.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttoniconmanager.TabIndex = 15 + Me.pnlpanelbuttoniconmanager.Visible = False + ' + 'tbiconmanagericon + ' + Me.tbiconmanagericon.BackColor = System.Drawing.Color.Transparent + Me.tbiconmanagericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbiconmanagericon.Image = Global.ShiftOS.My.Resources.Resources.iconNameChanger + Me.tbiconmanagericon.Location = New System.Drawing.Point(4, 2) + Me.tbiconmanagericon.Name = "tbiconmanagericon" + Me.tbiconmanagericon.Size = New System.Drawing.Size(16, 16) + Me.tbiconmanagericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbiconmanagericon.TabIndex = 1 + Me.tbiconmanagericon.TabStop = False + ' + 'tbiconmanagertext + ' + Me.tbiconmanagertext.AutoSize = True + Me.tbiconmanagertext.BackColor = System.Drawing.Color.Transparent + Me.tbiconmanagertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbiconmanagertext.ForeColor = System.Drawing.Color.White + Me.tbiconmanagertext.Location = New System.Drawing.Point(22, 2) + Me.tbiconmanagertext.Name = "tbiconmanagertext" + Me.tbiconmanagertext.Size = New System.Drawing.Size(90, 16) + Me.tbiconmanagertext.TabIndex = 0 + Me.tbiconmanagertext.Text = "Icon Manager" + ' + 'pnlpanelbuttonbitnotewallet + ' + Me.pnlpanelbuttonbitnotewallet.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonbitnotewallet.Controls.Add(Me.tbbitnotewalleticon) + Me.pnlpanelbuttonbitnotewallet.Controls.Add(Me.tbbitnotewallettext) + Me.pnlpanelbuttonbitnotewallet.Location = New System.Drawing.Point(353, 3) + Me.pnlpanelbuttonbitnotewallet.Name = "pnlpanelbuttonbitnotewallet" + Me.pnlpanelbuttonbitnotewallet.Size = New System.Drawing.Size(10, 20) + Me.pnlpanelbuttonbitnotewallet.TabIndex = 16 + Me.pnlpanelbuttonbitnotewallet.Visible = False + ' + 'tbbitnotewalleticon + ' + Me.tbbitnotewalleticon.BackColor = System.Drawing.Color.Transparent + Me.tbbitnotewalleticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbbitnotewalleticon.Image = Global.ShiftOS.My.Resources.Resources.iconBitnoteWallet + Me.tbbitnotewalleticon.Location = New System.Drawing.Point(4, 2) + Me.tbbitnotewalleticon.Name = "tbbitnotewalleticon" + Me.tbbitnotewalleticon.Size = New System.Drawing.Size(16, 16) + Me.tbbitnotewalleticon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbbitnotewalleticon.TabIndex = 1 + Me.tbbitnotewalleticon.TabStop = False + ' + 'tbbitnotewallettext + ' + Me.tbbitnotewallettext.AutoSize = True + Me.tbbitnotewallettext.BackColor = System.Drawing.Color.Transparent + Me.tbbitnotewallettext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbbitnotewallettext.ForeColor = System.Drawing.Color.White + Me.tbbitnotewallettext.Location = New System.Drawing.Point(22, 2) + Me.tbbitnotewallettext.Name = "tbbitnotewallettext" + Me.tbbitnotewallettext.Size = New System.Drawing.Size(90, 16) + Me.tbbitnotewallettext.TabIndex = 0 + Me.tbbitnotewallettext.Text = "Bitnote Wallet" + ' + 'pnlpanelbuttonbitnotedigger + ' + Me.pnlpanelbuttonbitnotedigger.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonbitnotedigger.Controls.Add(Me.tbbitnotediggericon) + Me.pnlpanelbuttonbitnotedigger.Controls.Add(Me.tbbitnotediggertext) + Me.pnlpanelbuttonbitnotedigger.Location = New System.Drawing.Point(369, 3) + Me.pnlpanelbuttonbitnotedigger.Name = "pnlpanelbuttonbitnotedigger" + Me.pnlpanelbuttonbitnotedigger.Size = New System.Drawing.Size(15, 20) + Me.pnlpanelbuttonbitnotedigger.TabIndex = 17 + Me.pnlpanelbuttonbitnotedigger.Visible = False + ' + 'tbbitnotediggericon + ' + Me.tbbitnotediggericon.BackColor = System.Drawing.Color.Transparent + Me.tbbitnotediggericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbbitnotediggericon.Image = Global.ShiftOS.My.Resources.Resources.iconBitnoteDigger + Me.tbbitnotediggericon.Location = New System.Drawing.Point(4, 2) + Me.tbbitnotediggericon.Name = "tbbitnotediggericon" + Me.tbbitnotediggericon.Size = New System.Drawing.Size(16, 16) + Me.tbbitnotediggericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbbitnotediggericon.TabIndex = 1 + Me.tbbitnotediggericon.TabStop = False + ' + 'tbbitnotediggertext + ' + Me.tbbitnotediggertext.AutoSize = True + Me.tbbitnotediggertext.BackColor = System.Drawing.Color.Transparent + Me.tbbitnotediggertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbbitnotediggertext.ForeColor = System.Drawing.Color.White + Me.tbbitnotediggertext.Location = New System.Drawing.Point(22, 2) + Me.tbbitnotediggertext.Name = "tbbitnotediggertext" + Me.tbbitnotediggertext.Size = New System.Drawing.Size(93, 16) + Me.tbbitnotediggertext.TabIndex = 0 + Me.tbbitnotediggertext.Text = "Bitnote Digger" + ' + 'pnlpanelbuttonskinshifter + ' + Me.pnlpanelbuttonskinshifter.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonskinshifter.Controls.Add(Me.tbskinshiftericon) + Me.pnlpanelbuttonskinshifter.Controls.Add(Me.tbskinshiftertext) + Me.pnlpanelbuttonskinshifter.Location = New System.Drawing.Point(390, 3) + Me.pnlpanelbuttonskinshifter.Name = "pnlpanelbuttonskinshifter" + Me.pnlpanelbuttonskinshifter.Size = New System.Drawing.Size(19, 20) + Me.pnlpanelbuttonskinshifter.TabIndex = 18 + Me.pnlpanelbuttonskinshifter.Visible = False + ' + 'tbskinshiftericon + ' + Me.tbskinshiftericon.BackColor = System.Drawing.Color.Transparent + Me.tbskinshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbskinshiftericon.Image = Global.ShiftOS.My.Resources.Resources.iconSkinShifter + Me.tbskinshiftericon.Location = New System.Drawing.Point(4, 2) + Me.tbskinshiftericon.Name = "tbskinshiftericon" + Me.tbskinshiftericon.Size = New System.Drawing.Size(16, 16) + Me.tbskinshiftericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbskinshiftericon.TabIndex = 1 + Me.tbskinshiftericon.TabStop = False + ' + 'tbskinshiftertext + ' + Me.tbskinshiftertext.AutoSize = True + Me.tbskinshiftertext.BackColor = System.Drawing.Color.Transparent + Me.tbskinshiftertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbskinshiftertext.ForeColor = System.Drawing.Color.White + Me.tbskinshiftertext.Location = New System.Drawing.Point(22, 2) + Me.tbskinshiftertext.Name = "tbskinshiftertext" + Me.tbskinshiftertext.Size = New System.Drawing.Size(74, 16) + Me.tbskinshiftertext.TabIndex = 0 + Me.tbskinshiftertext.Text = "Skin Shifter" + ' + 'pnlpanelbuttondownloader + ' + Me.pnlpanelbuttondownloader.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttondownloader.Controls.Add(Me.tbdownloadericon) + Me.pnlpanelbuttondownloader.Controls.Add(Me.tbdownloadertext) + Me.pnlpanelbuttondownloader.Location = New System.Drawing.Point(415, 3) + Me.pnlpanelbuttondownloader.Name = "pnlpanelbuttondownloader" + Me.pnlpanelbuttondownloader.Size = New System.Drawing.Size(23, 20) + Me.pnlpanelbuttondownloader.TabIndex = 20 + Me.pnlpanelbuttondownloader.Visible = False + ' + 'tbdownloadericon + ' + Me.tbdownloadericon.BackColor = System.Drawing.Color.Transparent + Me.tbdownloadericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbdownloadericon.Image = Global.ShiftOS.My.Resources.Resources.iconDownloader + Me.tbdownloadericon.Location = New System.Drawing.Point(4, 2) + Me.tbdownloadericon.Name = "tbdownloadericon" + Me.tbdownloadericon.Size = New System.Drawing.Size(16, 16) + Me.tbdownloadericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbdownloadericon.TabIndex = 1 + Me.tbdownloadericon.TabStop = False + ' + 'tbdownloadertext + ' + Me.tbdownloadertext.AutoSize = True + Me.tbdownloadertext.BackColor = System.Drawing.Color.Transparent + Me.tbdownloadertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbdownloadertext.ForeColor = System.Drawing.Color.White + Me.tbdownloadertext.Location = New System.Drawing.Point(22, 2) + Me.tbdownloadertext.Name = "tbdownloadertext" + Me.tbdownloadertext.Size = New System.Drawing.Size(81, 16) + Me.tbdownloadertext.TabIndex = 0 + Me.tbdownloadertext.Text = "Downloader" + ' + 'pnlpanelbuttonshiftnet + ' + Me.pnlpanelbuttonshiftnet.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonshiftnet.Controls.Add(Me.tbshiftneticon) + Me.pnlpanelbuttonshiftnet.Controls.Add(Me.tbshiftnettext) + Me.pnlpanelbuttonshiftnet.Location = New System.Drawing.Point(444, 3) + Me.pnlpanelbuttonshiftnet.Name = "pnlpanelbuttonshiftnet" + Me.pnlpanelbuttonshiftnet.Size = New System.Drawing.Size(27, 20) + Me.pnlpanelbuttonshiftnet.TabIndex = 19 + Me.pnlpanelbuttonshiftnet.Visible = False + ' + 'tbshiftneticon + ' + Me.tbshiftneticon.BackColor = System.Drawing.Color.Transparent + Me.tbshiftneticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbshiftneticon.Image = Global.ShiftOS.My.Resources.Resources.iconShiftnet + Me.tbshiftneticon.Location = New System.Drawing.Point(4, 2) + Me.tbshiftneticon.Name = "tbshiftneticon" + Me.tbshiftneticon.Size = New System.Drawing.Size(16, 16) + Me.tbshiftneticon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbshiftneticon.TabIndex = 1 + Me.tbshiftneticon.TabStop = False + ' + 'tbshiftnettext + ' + Me.tbshiftnettext.AutoSize = True + Me.tbshiftnettext.BackColor = System.Drawing.Color.Transparent + Me.tbshiftnettext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbshiftnettext.ForeColor = System.Drawing.Color.White + Me.tbshiftnettext.Location = New System.Drawing.Point(22, 2) + Me.tbshiftnettext.Name = "tbshiftnettext" + Me.tbshiftnettext.Size = New System.Drawing.Size(51, 16) + Me.tbshiftnettext.TabIndex = 0 + Me.tbshiftnettext.Text = "Shiftnet" + ' + 'pnlpanelbuttondodge + ' + Me.pnlpanelbuttondodge.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttondodge.Controls.Add(Me.tbdodgeicon) + Me.pnlpanelbuttondodge.Controls.Add(Me.tbdodgetext) + Me.pnlpanelbuttondodge.Location = New System.Drawing.Point(477, 3) + Me.pnlpanelbuttondodge.Name = "pnlpanelbuttondodge" + Me.pnlpanelbuttondodge.Size = New System.Drawing.Size(27, 20) + Me.pnlpanelbuttondodge.TabIndex = 21 + Me.pnlpanelbuttondodge.Visible = False + ' + 'tbdodgeicon + ' + Me.tbdodgeicon.BackColor = System.Drawing.Color.Transparent + Me.tbdodgeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbdodgeicon.Image = Global.ShiftOS.My.Resources.Resources.iconDodge + Me.tbdodgeicon.Location = New System.Drawing.Point(4, 2) + Me.tbdodgeicon.Name = "tbdodgeicon" + Me.tbdodgeicon.Size = New System.Drawing.Size(16, 16) + Me.tbdodgeicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbdodgeicon.TabIndex = 1 + Me.tbdodgeicon.TabStop = False + ' + 'tbdodgetext + ' + Me.tbdodgetext.AutoSize = True + Me.tbdodgetext.BackColor = System.Drawing.Color.Transparent + Me.tbdodgetext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbdodgetext.ForeColor = System.Drawing.Color.White + Me.tbdodgetext.Location = New System.Drawing.Point(22, 2) + Me.tbdodgetext.Name = "tbdodgetext" + Me.tbdodgetext.Size = New System.Drawing.Size(50, 16) + Me.tbdodgetext.TabIndex = 0 + Me.tbdodgetext.Text = "Dodge" + ' + 'pnlpanelbuttondownloadmanager + ' + Me.pnlpanelbuttondownloadmanager.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttondownloadmanager.Controls.Add(Me.tbdownloadmanagericon) + Me.pnlpanelbuttondownloadmanager.Controls.Add(Me.tbdownloadmanagertext) + Me.pnlpanelbuttondownloadmanager.Location = New System.Drawing.Point(510, 3) + Me.pnlpanelbuttondownloadmanager.Name = "pnlpanelbuttondownloadmanager" + Me.pnlpanelbuttondownloadmanager.Size = New System.Drawing.Size(27, 20) + Me.pnlpanelbuttondownloadmanager.TabIndex = 22 + Me.pnlpanelbuttondownloadmanager.Visible = False + ' + 'tbdownloadmanagericon + ' + Me.tbdownloadmanagericon.BackColor = System.Drawing.Color.Transparent + Me.tbdownloadmanagericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbdownloadmanagericon.Image = Global.ShiftOS.My.Resources.Resources.icondownloadmanager + Me.tbdownloadmanagericon.Location = New System.Drawing.Point(4, 2) + Me.tbdownloadmanagericon.Name = "tbdownloadmanagericon" + Me.tbdownloadmanagericon.Size = New System.Drawing.Size(16, 16) + Me.tbdownloadmanagericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbdownloadmanagericon.TabIndex = 1 + Me.tbdownloadmanagericon.TabStop = False + ' + 'tbdownloadmanagertext + ' + Me.tbdownloadmanagertext.AutoSize = True + Me.tbdownloadmanagertext.BackColor = System.Drawing.Color.Transparent + Me.tbdownloadmanagertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbdownloadmanagertext.ForeColor = System.Drawing.Color.White + Me.tbdownloadmanagertext.Location = New System.Drawing.Point(22, 2) + Me.tbdownloadmanagertext.Name = "tbdownloadmanagertext" + Me.tbdownloadmanagertext.Size = New System.Drawing.Size(126, 16) + Me.tbdownloadmanagertext.TabIndex = 0 + Me.tbdownloadmanagertext.Text = "Download Manager" + ' + 'pnlcatalystpanelbutton + ' + Me.pnlcatalystpanelbutton.BackColor = System.Drawing.Color.Black + Me.pnlcatalystpanelbutton.Controls.Add(Me.tbcatalysticon) + Me.pnlcatalystpanelbutton.Controls.Add(Me.lbcatalystname) + Me.pnlcatalystpanelbutton.Location = New System.Drawing.Point(543, 3) + Me.pnlcatalystpanelbutton.Name = "pnlcatalystpanelbutton" + Me.pnlcatalystpanelbutton.Size = New System.Drawing.Size(27, 20) + Me.pnlcatalystpanelbutton.TabIndex = 23 + Me.pnlcatalystpanelbutton.Visible = False + ' + 'tbcatalysticon + ' + Me.tbcatalysticon.BackColor = System.Drawing.Color.Transparent + Me.tbcatalysticon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbcatalysticon.Image = Global.ShiftOS.My.Resources.Resources.icondownloadmanager + Me.tbcatalysticon.Location = New System.Drawing.Point(4, 2) + Me.tbcatalysticon.Name = "tbcatalysticon" + Me.tbcatalysticon.Size = New System.Drawing.Size(16, 16) + Me.tbcatalysticon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbcatalysticon.TabIndex = 1 + Me.tbcatalysticon.TabStop = False + ' + 'lbcatalystname + ' + Me.lbcatalystname.AutoSize = True + Me.lbcatalystname.BackColor = System.Drawing.Color.Transparent + Me.lbcatalystname.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbcatalystname.ForeColor = System.Drawing.Color.White + Me.lbcatalystname.Location = New System.Drawing.Point(22, 2) + Me.lbcatalystname.Name = "lbcatalystname" + Me.lbcatalystname.Size = New System.Drawing.Size(56, 16) + Me.lbcatalystname.TabIndex = 0 + Me.lbcatalystname.Text = "Catalyst" + ' + 'pnlpanelbuttoninstaller + ' + Me.pnlpanelbuttoninstaller.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttoninstaller.Controls.Add(Me.tbinstallericon) + Me.pnlpanelbuttoninstaller.Controls.Add(Me.tbinstallertext) + Me.pnlpanelbuttoninstaller.Location = New System.Drawing.Point(576, 3) + Me.pnlpanelbuttoninstaller.Name = "pnlpanelbuttoninstaller" + Me.pnlpanelbuttoninstaller.Size = New System.Drawing.Size(32, 20) + Me.pnlpanelbuttoninstaller.TabIndex = 23 + Me.pnlpanelbuttoninstaller.Visible = False + ' + 'tbinstallericon + ' + Me.tbinstallericon.BackColor = System.Drawing.Color.Transparent + Me.tbinstallericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbinstallericon.Image = Global.ShiftOS.My.Resources.Resources.icondownloadmanager + Me.tbinstallericon.Location = New System.Drawing.Point(4, 2) + Me.tbinstallericon.Name = "tbinstallericon" + Me.tbinstallericon.Size = New System.Drawing.Size(16, 16) + Me.tbinstallericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbinstallericon.TabIndex = 1 + Me.tbinstallericon.TabStop = False + ' + 'tbinstallertext + ' + Me.tbinstallertext.AutoSize = True + Me.tbinstallertext.BackColor = System.Drawing.Color.Transparent + Me.tbinstallertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbinstallertext.ForeColor = System.Drawing.Color.White + Me.tbinstallertext.Location = New System.Drawing.Point(22, 2) + Me.tbinstallertext.Name = "tbinstallertext" + Me.tbinstallertext.Size = New System.Drawing.Size(126, 16) + Me.tbinstallertext.TabIndex = 0 + Me.tbinstallertext.Text = "Download Manager" + ' + 'pnl_panelbuttonsnakey + ' + Me.pnl_panelbuttonsnakey.BackColor = System.Drawing.Color.Black + Me.pnl_panelbuttonsnakey.Controls.Add(Me.tbsnakeyicon) + Me.pnl_panelbuttonsnakey.Controls.Add(Me.tbsnakeytext) + Me.pnl_panelbuttonsnakey.Location = New System.Drawing.Point(614, 3) + Me.pnl_panelbuttonsnakey.Name = "pnl_panelbuttonsnakey" + Me.pnl_panelbuttonsnakey.Size = New System.Drawing.Size(32, 20) + Me.pnl_panelbuttonsnakey.TabIndex = 25 + Me.pnl_panelbuttonsnakey.Visible = False + ' + 'tbsnakeyicon + ' + Me.tbsnakeyicon.BackColor = System.Drawing.Color.Transparent + Me.tbsnakeyicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbsnakeyicon.Image = Global.ShiftOS.My.Resources.Resources.iconSnakey + Me.tbsnakeyicon.Location = New System.Drawing.Point(4, 2) + Me.tbsnakeyicon.Name = "tbsnakeyicon" + Me.tbsnakeyicon.Size = New System.Drawing.Size(16, 16) + Me.tbsnakeyicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbsnakeyicon.TabIndex = 1 + Me.tbsnakeyicon.TabStop = False + ' + 'tbsnakeytext + ' + Me.tbsnakeytext.AutoSize = True + Me.tbsnakeytext.BackColor = System.Drawing.Color.Transparent + Me.tbsnakeytext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbsnakeytext.ForeColor = System.Drawing.Color.White + Me.tbsnakeytext.Location = New System.Drawing.Point(22, 2) + Me.tbsnakeytext.Name = "tbsnakeytext" + Me.tbsnakeytext.Size = New System.Drawing.Size(126, 16) + Me.tbsnakeytext.TabIndex = 0 + Me.tbsnakeytext.Text = "Download Manager" + ' + 'pnlpanelbuttonorcwrite + ' + Me.pnlpanelbuttonorcwrite.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonorcwrite.Controls.Add(Me.tborcwriteicon) + Me.pnlpanelbuttonorcwrite.Controls.Add(Me.tborcwritetext) + Me.pnlpanelbuttonorcwrite.Location = New System.Drawing.Point(652, 3) + Me.pnlpanelbuttonorcwrite.Name = "pnlpanelbuttonorcwrite" + Me.pnlpanelbuttonorcwrite.Size = New System.Drawing.Size(32, 20) + Me.pnlpanelbuttonorcwrite.TabIndex = 26 + Me.pnlpanelbuttonorcwrite.Visible = False + ' + 'tborcwriteicon + ' + Me.tborcwriteicon.BackColor = System.Drawing.Color.Transparent + Me.tborcwriteicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tborcwriteicon.Image = Global.ShiftOS.My.Resources.Resources.floodgateicn + Me.tborcwriteicon.Location = New System.Drawing.Point(4, 2) + Me.tborcwriteicon.Name = "tborcwriteicon" + Me.tborcwriteicon.Size = New System.Drawing.Size(16, 16) + Me.tborcwriteicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tborcwriteicon.TabIndex = 1 + Me.tborcwriteicon.TabStop = False + ' + 'tborcwritetext + ' + Me.tborcwritetext.AutoSize = True + Me.tborcwritetext.BackColor = System.Drawing.Color.Transparent + Me.tborcwritetext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tborcwritetext.ForeColor = System.Drawing.Color.White + Me.tborcwritetext.Location = New System.Drawing.Point(22, 2) + Me.tborcwritetext.Name = "tborcwritetext" + Me.tborcwritetext.Size = New System.Drawing.Size(126, 16) + Me.tborcwritetext.TabIndex = 0 + Me.tborcwritetext.Text = "Download Manager" + ' + 'pnlpanelbuttonsnakey + ' + Me.pnlpanelbuttonsnakey.AutoSize = True + Me.pnlpanelbuttonsnakey.BackColor = System.Drawing.Color.Transparent + Me.pnlpanelbuttonsnakey.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.pnlpanelbuttonsnakey.ForeColor = System.Drawing.Color.White + Me.pnlpanelbuttonsnakey.Location = New System.Drawing.Point(690, 0) + Me.pnlpanelbuttonsnakey.Name = "pnlpanelbuttonsnakey" + Me.pnlpanelbuttonsnakey.Size = New System.Drawing.Size(0, 16) + Me.pnlpanelbuttonsnakey.TabIndex = 24 + ' + 'pnlpanelbuttonfloodgate + ' + Me.pnlpanelbuttonfloodgate.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonfloodgate.Controls.Add(Me.tbfloodgateicon) + Me.pnlpanelbuttonfloodgate.Controls.Add(Me.tbfloodgatetext) + Me.pnlpanelbuttonfloodgate.Location = New System.Drawing.Point(696, 3) + Me.pnlpanelbuttonfloodgate.Name = "pnlpanelbuttonfloodgate" + Me.pnlpanelbuttonfloodgate.Size = New System.Drawing.Size(32, 20) + Me.pnlpanelbuttonfloodgate.TabIndex = 27 + Me.pnlpanelbuttonfloodgate.Visible = False + ' + 'tbfloodgateicon + ' + Me.tbfloodgateicon.BackColor = System.Drawing.Color.Transparent + Me.tbfloodgateicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbfloodgateicon.Image = Global.ShiftOS.My.Resources.Resources.iconSnakey + Me.tbfloodgateicon.Location = New System.Drawing.Point(4, 2) + Me.tbfloodgateicon.Name = "tbfloodgateicon" + Me.tbfloodgateicon.Size = New System.Drawing.Size(16, 16) + Me.tbfloodgateicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbfloodgateicon.TabIndex = 1 + Me.tbfloodgateicon.TabStop = False + ' + 'tbfloodgatetext + ' + Me.tbfloodgatetext.AutoSize = True + Me.tbfloodgatetext.BackColor = System.Drawing.Color.Transparent + Me.tbfloodgatetext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbfloodgatetext.ForeColor = System.Drawing.Color.White + Me.tbfloodgatetext.Location = New System.Drawing.Point(22, 2) + Me.tbfloodgatetext.Name = "tbfloodgatetext" + Me.tbfloodgatetext.Size = New System.Drawing.Size(126, 16) + Me.tbfloodgatetext.TabIndex = 0 + Me.tbfloodgatetext.Text = "Download Manager" + ' + 'pnlpanelbuttonmaze + ' + Me.pnlpanelbuttonmaze.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonmaze.Controls.Add(Me.tbmazeicon) + Me.pnlpanelbuttonmaze.Controls.Add(Me.tbmazetext) + Me.pnlpanelbuttonmaze.Location = New System.Drawing.Point(734, 3) + Me.pnlpanelbuttonmaze.Name = "pnlpanelbuttonmaze" + Me.pnlpanelbuttonmaze.Size = New System.Drawing.Size(32, 20) + Me.pnlpanelbuttonmaze.TabIndex = 28 + Me.pnlpanelbuttonmaze.Visible = False + ' + 'tbmazeicon + ' + Me.tbmazeicon.BackColor = System.Drawing.Color.Transparent + Me.tbmazeicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbmazeicon.Image = Global.ShiftOS.My.Resources.Resources.iconSnakey + Me.tbmazeicon.Location = New System.Drawing.Point(4, 2) + Me.tbmazeicon.Name = "tbmazeicon" + Me.tbmazeicon.Size = New System.Drawing.Size(16, 16) + Me.tbmazeicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbmazeicon.TabIndex = 1 + Me.tbmazeicon.TabStop = False + ' + 'tbmazetext + ' + Me.tbmazetext.AutoSize = True + Me.tbmazetext.BackColor = System.Drawing.Color.Transparent + Me.tbmazetext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbmazetext.ForeColor = System.Drawing.Color.White + Me.tbmazetext.Location = New System.Drawing.Point(22, 2) + Me.tbmazetext.Name = "tbmazetext" + Me.tbmazetext.Size = New System.Drawing.Size(126, 16) + Me.tbmazetext.TabIndex = 0 + Me.tbmazetext.Text = "Download Manager" + ' + 'pnlpanelbuttonvirusscanner + ' + Me.pnlpanelbuttonvirusscanner.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonvirusscanner.Controls.Add(Me.tbvirusscannericon) + Me.pnlpanelbuttonvirusscanner.Controls.Add(Me.tbvirusscannertext) + Me.pnlpanelbuttonvirusscanner.Location = New System.Drawing.Point(772, 3) + Me.pnlpanelbuttonvirusscanner.Name = "pnlpanelbuttonvirusscanner" + Me.pnlpanelbuttonvirusscanner.Size = New System.Drawing.Size(32, 20) + Me.pnlpanelbuttonvirusscanner.TabIndex = 28 + Me.pnlpanelbuttonvirusscanner.Visible = False + ' + 'tbvirusscannericon + ' + Me.tbvirusscannericon.BackColor = System.Drawing.Color.Transparent + Me.tbvirusscannericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbvirusscannericon.Image = Global.ShiftOS.My.Resources.Resources.iconSnakey + Me.tbvirusscannericon.Location = New System.Drawing.Point(4, 2) + Me.tbvirusscannericon.Name = "tbvirusscannericon" + Me.tbvirusscannericon.Size = New System.Drawing.Size(16, 16) + Me.tbvirusscannericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbvirusscannericon.TabIndex = 1 + Me.tbvirusscannericon.TabStop = False + ' + 'tbvirusscannertext + ' + Me.tbvirusscannertext.AutoSize = True + Me.tbvirusscannertext.BackColor = System.Drawing.Color.Transparent + Me.tbvirusscannertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbvirusscannertext.ForeColor = System.Drawing.Color.White + Me.tbvirusscannertext.Location = New System.Drawing.Point(22, 2) + Me.tbvirusscannertext.Name = "tbvirusscannertext" + Me.tbvirusscannertext.Size = New System.Drawing.Size(126, 16) + Me.tbvirusscannertext.TabIndex = 0 + Me.tbvirusscannertext.Text = "Download Manager" + ' + 'pnlpanelbuttonfilesaver + ' + Me.pnlpanelbuttonfilesaver.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonfilesaver.Controls.Add(Me.tbfilesavericon) + Me.pnlpanelbuttonfilesaver.Controls.Add(Me.tbfilesavertext) + Me.pnlpanelbuttonfilesaver.Location = New System.Drawing.Point(810, 3) + Me.pnlpanelbuttonfilesaver.Name = "pnlpanelbuttonfilesaver" + Me.pnlpanelbuttonfilesaver.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonfilesaver.TabIndex = 29 + Me.pnlpanelbuttonfilesaver.Visible = False + ' + 'tbfilesavericon + ' + Me.tbfilesavericon.BackColor = System.Drawing.Color.Transparent + Me.tbfilesavericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbfilesavericon.Image = Global.ShiftOS.My.Resources.Resources.iconFileSaver + Me.tbfilesavericon.Location = New System.Drawing.Point(4, 2) + Me.tbfilesavericon.Name = "tbfilesavericon" + Me.tbfilesavericon.Size = New System.Drawing.Size(16, 16) + Me.tbfilesavericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbfilesavericon.TabIndex = 1 + Me.tbfilesavericon.TabStop = False + ' + 'tbfilesavertext + ' + Me.tbfilesavertext.AutoSize = True + Me.tbfilesavertext.BackColor = System.Drawing.Color.Transparent + Me.tbfilesavertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbfilesavertext.ForeColor = System.Drawing.Color.White + Me.tbfilesavertext.Location = New System.Drawing.Point(24, 2) + Me.tbfilesavertext.Name = "tbfilesavertext" + Me.tbfilesavertext.Size = New System.Drawing.Size(69, 16) + Me.tbfilesavertext.TabIndex = 0 + Me.tbfilesavertext.Text = "File Saver" + ' + 'pnlpanelbuttonshifter + ' + Me.pnlpanelbuttonshifter.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonshifter.Controls.Add(Me.tbshiftericon) + Me.pnlpanelbuttonshifter.Controls.Add(Me.tbshiftertext) + Me.pnlpanelbuttonshifter.Location = New System.Drawing.Point(868, 3) + Me.pnlpanelbuttonshifter.Name = "pnlpanelbuttonshifter" + Me.pnlpanelbuttonshifter.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonshifter.TabIndex = 30 + Me.pnlpanelbuttonshifter.Visible = False + ' + 'tbshiftericon + ' + Me.tbshiftericon.BackColor = System.Drawing.Color.Transparent + Me.tbshiftericon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbshiftericon.Image = Global.ShiftOS.My.Resources.Resources.iconShifter + Me.tbshiftericon.Location = New System.Drawing.Point(4, 2) + Me.tbshiftericon.Name = "tbshiftericon" + Me.tbshiftericon.Size = New System.Drawing.Size(16, 16) + Me.tbshiftericon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbshiftericon.TabIndex = 1 + Me.tbshiftericon.TabStop = False + ' + 'tbshiftertext + ' + Me.tbshiftertext.AutoSize = True + Me.tbshiftertext.BackColor = System.Drawing.Color.Transparent + Me.tbshiftertext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbshiftertext.ForeColor = System.Drawing.Color.White + Me.tbshiftertext.Location = New System.Drawing.Point(24, 2) + Me.tbshiftertext.Name = "tbshiftertext" + Me.tbshiftertext.Size = New System.Drawing.Size(45, 16) + Me.tbshiftertext.TabIndex = 0 + Me.tbshiftertext.Text = "Shifter" + ' + 'applaunchermenuholder + ' + Me.applaunchermenuholder.Controls.Add(Me.desktopappmenu) + Me.applaunchermenuholder.Dock = System.Windows.Forms.DockStyle.Left + Me.applaunchermenuholder.Location = New System.Drawing.Point(0, 0) + Me.applaunchermenuholder.Name = "applaunchermenuholder" + Me.applaunchermenuholder.Size = New System.Drawing.Size(130, 24) + Me.applaunchermenuholder.TabIndex = 3 + ' + 'desktopappmenu + ' + Me.desktopappmenu.AutoSize = False + Me.desktopappmenu.BackColor = System.Drawing.Color.Transparent + Me.desktopappmenu.GripMargin = New System.Windows.Forms.Padding(0) + Me.desktopappmenu.ImageScalingSize = New System.Drawing.Size(32, 32) + Me.desktopappmenu.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ApplicationsToolStripMenuItem}) + Me.desktopappmenu.LayoutStyle = System.Windows.Forms.ToolStripLayoutStyle.HorizontalStackWithOverflow + Me.desktopappmenu.Location = New System.Drawing.Point(0, 0) + Me.desktopappmenu.Name = "desktopappmenu" + Me.desktopappmenu.Padding = New System.Windows.Forms.Padding(0) + Me.desktopappmenu.Size = New System.Drawing.Size(130, 24) + Me.desktopappmenu.TabIndex = 0 + Me.desktopappmenu.TabStop = True + Me.desktopappmenu.Text = "MenuStrip1" + ' + 'ApplicationsToolStripMenuItem + ' + Me.ApplicationsToolStripMenuItem.AutoSize = False + Me.ApplicationsToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ApplicationsToolStripMenuItem.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.ApplicationsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ArtpadToolStripMenuItem, Me.AudioplayerToolStripMenuItem, Me.BitnoteDiggerToolStripMenuItem, Me.BitnoteWalletToolStripMenuItem, Me.CalculatorToolStripMenuItem, Me.CatalystToolStripMenuItem1, Me.ClockToolStripMenuItem, Me.DodgeToolStripMenuItem, Me.downloadmanagerToolStripMenuItem, Me.FileSkimmerToolStripMenuItem, Me.FloodGateToolStripMenuItem, Me.IconManagerToolStripMenuItem, Me.InstallerToolStripMenuItem, Me.KnowledgeInputToolStripMenuItem, Me.MazeToolStripMenuItem, Me.NameChangerToolStripMenuItem, Me.orcwriteToolStripMenuItem, Me.PongToolStripMenuItem, Me.ShifterToolStripMenuItem, Me.ShiftnetToolStripMenuItem, Me.ShiftoriumToolStripMenuItem, Me.SkinLoaderToolStripMenuItem, Me.SkinShifterToolStripMenuItem, Me.SnakeyToolStripMenuItem, Me.sysinfoToolStripMenuItem, Me.TerminalToolStripMenuItem, Me.TextPadToolStripMenuItem, Me.WebBrowserToolStripMenuItem, Me.VideoplayerToolStripMenuItem, Me.VirusScannerToolStripMenuItem, Me.unitySeperator, Me.UnityToolStripMenuItem, Me.ShutdownToolStripMenuItem}) + Me.ApplicationsToolStripMenuItem.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.749999!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.ApplicationsToolStripMenuItem.Name = "ApplicationsToolStripMenuItem" + Me.ApplicationsToolStripMenuItem.Padding = New System.Windows.Forms.Padding(2, 0, 2, 0) + Me.ApplicationsToolStripMenuItem.ShowShortcutKeys = False + Me.ApplicationsToolStripMenuItem.Size = New System.Drawing.Size(94, 24) + Me.ApplicationsToolStripMenuItem.Text = "Applications" + Me.ApplicationsToolStripMenuItem.TextDirection = System.Windows.Forms.ToolStripTextDirection.Horizontal + Me.ApplicationsToolStripMenuItem.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage + ' + 'ArtpadToolStripMenuItem + ' + Me.ArtpadToolStripMenuItem.Name = "ArtpadToolStripMenuItem" + Me.ArtpadToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ArtpadToolStripMenuItem.Text = "ArtPad" + ' + 'AudioplayerToolStripMenuItem + ' + Me.AudioplayerToolStripMenuItem.Name = "AudioplayerToolStripMenuItem" + Me.AudioplayerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.AudioplayerToolStripMenuItem.Text = "Audio Player" + ' + 'BitnoteDiggerToolStripMenuItem + ' + Me.BitnoteDiggerToolStripMenuItem.Name = "BitnoteDiggerToolStripMenuItem" + Me.BitnoteDiggerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.BitnoteDiggerToolStripMenuItem.Text = "Bitnote Digger" + ' + 'BitnoteWalletToolStripMenuItem + ' + Me.BitnoteWalletToolStripMenuItem.Name = "BitnoteWalletToolStripMenuItem" + Me.BitnoteWalletToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.BitnoteWalletToolStripMenuItem.Text = "Bitnote Wallet" + ' + 'CalculatorToolStripMenuItem + ' + Me.CalculatorToolStripMenuItem.Name = "CalculatorToolStripMenuItem" + Me.CalculatorToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.CalculatorToolStripMenuItem.Text = "Calculator" + ' + 'ClockToolStripMenuItem + ' + Me.ClockToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ClockToolStripMenuItem.Name = "ClockToolStripMenuItem" + Me.ClockToolStripMenuItem.ShowShortcutKeys = False + Me.ClockToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ClockToolStripMenuItem.Text = "Clock" + ' + 'DodgeToolStripMenuItem + ' + Me.DodgeToolStripMenuItem.Name = "DodgeToolStripMenuItem" + Me.DodgeToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.DodgeToolStripMenuItem.Text = "Dodge" + ' + 'downloadmanagerToolStripMenuItem + ' + Me.downloadmanagerToolStripMenuItem.Name = "downloadmanagerToolStripMenuItem" + Me.downloadmanagerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.downloadmanagerToolStripMenuItem.Text = "Download Manager" + ' + 'FileSkimmerToolStripMenuItem + ' + Me.FileSkimmerToolStripMenuItem.Name = "FileSkimmerToolStripMenuItem" + Me.FileSkimmerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.FileSkimmerToolStripMenuItem.Text = "File Skimmer" + ' + 'FloodGateToolStripMenuItem + ' + Me.FloodGateToolStripMenuItem.Name = "FloodGateToolStripMenuItem" + Me.FloodGateToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.FloodGateToolStripMenuItem.Text = "FloodGate Manager" + ' + 'IconManagerToolStripMenuItem + ' + Me.IconManagerToolStripMenuItem.Name = "IconManagerToolStripMenuItem" + Me.IconManagerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.IconManagerToolStripMenuItem.Text = "Icon Manager" + ' + 'InstallerToolStripMenuItem + ' + Me.InstallerToolStripMenuItem.Name = "InstallerToolStripMenuItem" + Me.InstallerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.InstallerToolStripMenuItem.Text = "Installer" + ' + 'KnowledgeInputToolStripMenuItem + ' + Me.KnowledgeInputToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.KnowledgeInputToolStripMenuItem.Name = "KnowledgeInputToolStripMenuItem" + Me.KnowledgeInputToolStripMenuItem.ShowShortcutKeys = False + Me.KnowledgeInputToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.KnowledgeInputToolStripMenuItem.Text = "Knowledge Input" + ' + 'MazeToolStripMenuItem + ' + Me.MazeToolStripMenuItem.Name = "MazeToolStripMenuItem" + Me.MazeToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.MazeToolStripMenuItem.Text = "Labyrinth" + ' + 'NameChangerToolStripMenuItem + ' + Me.NameChangerToolStripMenuItem.Name = "NameChangerToolStripMenuItem" + Me.NameChangerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.NameChangerToolStripMenuItem.Text = "Name Changer" + ' + 'orcwriteToolStripMenuItem + ' + Me.orcwriteToolStripMenuItem.Name = "orcwriteToolStripMenuItem" + Me.orcwriteToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.orcwriteToolStripMenuItem.Text = "OrcWrite" + ' + 'PongToolStripMenuItem + ' + Me.PongToolStripMenuItem.Name = "PongToolStripMenuItem" + Me.PongToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.PongToolStripMenuItem.Text = "Pong" + ' + 'ShifterToolStripMenuItem + ' + Me.ShifterToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShifterToolStripMenuItem.Name = "ShifterToolStripMenuItem" + Me.ShifterToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ShifterToolStripMenuItem.Text = "Shifter" + ' + 'CatalystToolStripMenuItem1 + ' + Me.CatalystToolStripMenuItem1.Name = "CatalystToolStripMenuItem1" + Me.CatalystToolStripMenuItem1.Size = New System.Drawing.Size(214, 22) + Me.CatalystToolStripMenuItem1.Text = "Catalyst" + ' + 'ShiftnetToolStripMenuItem + ' + Me.ShiftnetToolStripMenuItem.Name = "ShiftnetToolStripMenuItem" + Me.ShiftnetToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ShiftnetToolStripMenuItem.Text = "Shiftnet" + ' + 'ShiftoriumToolStripMenuItem + ' + Me.ShiftoriumToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShiftoriumToolStripMenuItem.Name = "ShiftoriumToolStripMenuItem" + Me.ShiftoriumToolStripMenuItem.ShowShortcutKeys = False + Me.ShiftoriumToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ShiftoriumToolStripMenuItem.Text = "Shiftorium" + ' + 'SkinLoaderToolStripMenuItem + ' + Me.SkinLoaderToolStripMenuItem.Name = "SkinLoaderToolStripMenuItem" + Me.SkinLoaderToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.SkinLoaderToolStripMenuItem.Text = "Skin Loader" + ' + 'SkinShifterToolStripMenuItem + ' + Me.SkinShifterToolStripMenuItem.Name = "SkinShifterToolStripMenuItem" + Me.SkinShifterToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.SkinShifterToolStripMenuItem.Text = "Skin Shifter" + ' + 'SnakeyToolStripMenuItem + ' + Me.SnakeyToolStripMenuItem.Name = "SnakeyToolStripMenuItem" + Me.SnakeyToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.SnakeyToolStripMenuItem.Text = "Snakey" + ' + 'sysinfoToolStripMenuItem + ' + Me.sysinfoToolStripMenuItem.Name = "sysinfoToolStripMenuItem" + Me.sysinfoToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.sysinfoToolStripMenuItem.Text = "System Information" + ' + 'TerminalToolStripMenuItem + ' + Me.TerminalToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.TerminalToolStripMenuItem.Name = "TerminalToolStripMenuItem" + Me.TerminalToolStripMenuItem.ShowShortcutKeys = False + Me.TerminalToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.TerminalToolStripMenuItem.Text = "Terminal" + ' + 'TextPadToolStripMenuItem + ' + Me.TextPadToolStripMenuItem.Name = "TextPadToolStripMenuItem" + Me.TextPadToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.TextPadToolStripMenuItem.Text = "TextPad" + ' + 'WebBrowserToolStripMenuItem + ' + Me.WebBrowserToolStripMenuItem.Name = "WebBrowserToolStripMenuItem" + Me.WebBrowserToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.WebBrowserToolStripMenuItem.Text = "Web Browser" + ' + 'VideoplayerToolStripMenuItem + ' + Me.VideoplayerToolStripMenuItem.Name = "VideoplayerToolStripMenuItem" + Me.VideoplayerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.VideoplayerToolStripMenuItem.Text = "Video Player" + ' + 'VirusScannerToolStripMenuItem + ' + Me.VirusScannerToolStripMenuItem.Name = "VirusScannerToolStripMenuItem" + Me.VirusScannerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.VirusScannerToolStripMenuItem.Text = "Virus Scanner" + ' + 'unitySeperator + ' + Me.unitySeperator.BackColor = System.Drawing.Color.Transparent + Me.unitySeperator.ForeColor = System.Drawing.Color.White + Me.unitySeperator.Name = "unitySeperator" + Me.unitySeperator.Size = New System.Drawing.Size(211, 6) + ' + 'UnityToolStripMenuItem + ' + Me.UnityToolStripMenuItem.Name = "UnityToolStripMenuItem" + Me.UnityToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.UnityToolStripMenuItem.Text = "Toggle Unity Mode" + ' + 'ShutdownToolStripMenuItem + ' + Me.ShutdownToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShutdownToolStripMenuItem.Name = "ShutdownToolStripMenuItem" + Me.ShutdownToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ShutdownToolStripMenuItem.Text = "Shut Down" + ' + 'timepanel + ' + Me.timepanel.Controls.Add(Me.paneltimetext) + Me.timepanel.Dock = System.Windows.Forms.DockStyle.Right + Me.timepanel.Location = New System.Drawing.Point(1171, 0) + Me.timepanel.Name = "timepanel" + Me.timepanel.Size = New System.Drawing.Size(97, 24) + Me.timepanel.TabIndex = 2 + ' + 'paneltimetext + ' + Me.paneltimetext.AutoSize = True + Me.paneltimetext.BackColor = System.Drawing.Color.Transparent + Me.paneltimetext.Font = New System.Drawing.Font("Trebuchet MS", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.paneltimetext.Location = New System.Drawing.Point(5, 0) + Me.paneltimetext.Name = "paneltimetext" + Me.paneltimetext.Size = New System.Drawing.Size(80, 24) + Me.paneltimetext.TabIndex = 1 + Me.paneltimetext.Text = "5000023" + Me.paneltimetext.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlpanelbuttonfloatybird + ' + Me.pnlpanelbuttonfloatybird.BackColor = System.Drawing.Color.Black + Me.pnlpanelbuttonfloatybird.Controls.Add(Me.tbfloatybirdicon) + Me.pnlpanelbuttonfloatybird.Controls.Add(Me.tbfloatybirdtext) + Me.pnlpanelbuttonfloatybird.Location = New System.Drawing.Point(5, 29) + Me.pnlpanelbuttonfloatybird.Name = "pnlpanelbuttonfloatybird" + Me.pnlpanelbuttonfloatybird.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonfloatybird.TabIndex = 31 + Me.pnlpanelbuttonfloatybird.Visible = False + ' + 'tbfloatybirdicon + ' + Me.tbfloatybirdicon.BackColor = System.Drawing.Color.Transparent + Me.tbfloatybirdicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.tbfloatybirdicon.Image = Global.ShiftOS.My.Resources.Resources.iconShifter + Me.tbfloatybirdicon.Location = New System.Drawing.Point(4, 2) + Me.tbfloatybirdicon.Name = "tbfloatybirdicon" + Me.tbfloatybirdicon.Size = New System.Drawing.Size(16, 16) + Me.tbfloatybirdicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.tbfloatybirdicon.TabIndex = 1 + Me.tbfloatybirdicon.TabStop = False + ' + 'tbfloatybirdtext + ' + Me.tbfloatybirdtext.AutoSize = True + Me.tbfloatybirdtext.BackColor = System.Drawing.Color.Transparent + Me.tbfloatybirdtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbfloatybirdtext.ForeColor = System.Drawing.Color.White + Me.tbfloatybirdtext.Location = New System.Drawing.Point(24, 2) + Me.tbfloatybirdtext.Name = "tbfloatybirdtext" + Me.tbfloatybirdtext.Size = New System.Drawing.Size(45, 16) + Me.tbfloatybirdtext.TabIndex = 0 + Me.tbfloatybirdtext.Text = "Shifter" + ' + 'floatybirdToolStripMenuItem + ' + Me.floatybirdToolStripMenuItem.Name = "floatybirdToolStripMenuItem" + Me.floatybirdToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.floatybirdToolStripMenuItem.Text = "Floaty Bird" + ' + 'clocktick + ' + Me.clocktick.Enabled = True + Me.clocktick.Interval = 1000 + ' + 'autosave + ' + Me.autosave.Enabled = True + Me.autosave.Interval = 60000 + ' + 'nocheat + ' + ' + 'desktopicons + ' + Me.desktopicons.Alignment = System.Windows.Forms.ListViewAlignment.Left + Me.desktopicons.BackColor = System.Drawing.Color.Black + Me.desktopicons.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.desktopicons.ContextMenuStrip = Me.ContextMenuStrip1 + Me.desktopicons.Dock = System.Windows.Forms.DockStyle.Fill + Me.desktopicons.ForeColor = System.Drawing.Color.White + Me.desktopicons.Location = New System.Drawing.Point(0, 24) + Me.desktopicons.Name = "desktopicons" + Me.desktopicons.Scrollable = False + Me.desktopicons.Size = New System.Drawing.Size(1268, 661) + Me.desktopicons.TabIndex = 1 + Me.desktopicons.UseCompatibleStateImageBehavior = False + ' + 'ContextMenuStrip1 + ' + Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NewToolStripMenuItem, Me.ToolStripMenuItem3, Me.TileViewToolStripMenuItem, Me.fileActionsSeparator, Me.AboutToolStripMenuItem}) + Me.ContextMenuStrip1.Name = "ContextMenuStrip1" + Me.ContextMenuStrip1.Size = New System.Drawing.Size(170, 82) + ' + 'NewToolStripMenuItem + ' + Me.NewToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FolderToolStripMenuItem, Me.ToolStripMenuItem2, Me.ArtpadPictureToolStripMenuItem, Me.TextDocumentToolStripMenuItem, Me.OrcWriteDocumentToolStripMenuItem, Me.SystemInformationReportToolStripMenuItem, Me.NewSkin, Me.WebpageToolStripMenuItem, Me.ShortcutToolStripMenuItem}) + Me.NewToolStripMenuItem.Name = "NewToolStripMenuItem" + Me.NewToolStripMenuItem.Size = New System.Drawing.Size(169, 22) + Me.NewToolStripMenuItem.Text = "New" + ' + 'FolderToolStripMenuItem + ' + Me.FolderToolStripMenuItem.Name = "FolderToolStripMenuItem" + Me.FolderToolStripMenuItem.Size = New System.Drawing.Size(216, 22) + Me.FolderToolStripMenuItem.Text = "Folder" + ' + 'ToolStripMenuItem2 + ' + Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" + Me.ToolStripMenuItem2.Size = New System.Drawing.Size(213, 6) + ' + 'ArtpadPictureToolStripMenuItem + ' + Me.ArtpadPictureToolStripMenuItem.Name = "ArtpadPictureToolStripMenuItem" + Me.ArtpadPictureToolStripMenuItem.Size = New System.Drawing.Size(216, 22) + Me.ArtpadPictureToolStripMenuItem.Text = "Artpad Picture" + ' + 'TextDocumentToolStripMenuItem + ' + Me.TextDocumentToolStripMenuItem.Name = "TextDocumentToolStripMenuItem" + Me.TextDocumentToolStripMenuItem.Size = New System.Drawing.Size(216, 22) + Me.TextDocumentToolStripMenuItem.Text = "Text Document" + ' + 'OrcWriteDocumentToolStripMenuItem + ' + Me.OrcWriteDocumentToolStripMenuItem.Name = "OrcWriteDocumentToolStripMenuItem" + Me.OrcWriteDocumentToolStripMenuItem.Size = New System.Drawing.Size(216, 22) + Me.OrcWriteDocumentToolStripMenuItem.Text = "OrcWrite Document" + ' + 'SystemInformationReportToolStripMenuItem + ' + Me.SystemInformationReportToolStripMenuItem.Name = "SystemInformationReportToolStripMenuItem" + Me.SystemInformationReportToolStripMenuItem.Size = New System.Drawing.Size(216, 22) + Me.SystemInformationReportToolStripMenuItem.Text = "System Information Report" + ' + 'NewSkin + ' + Me.NewSkin.Name = "NewSkin" + Me.NewSkin.Size = New System.Drawing.Size(216, 22) + Me.NewSkin.Text = "Skin" + ' + 'WebpageToolStripMenuItem + ' + Me.WebpageToolStripMenuItem.Name = "WebpageToolStripMenuItem" + Me.WebpageToolStripMenuItem.Size = New System.Drawing.Size(213, 6) + ' + 'ShortcutToolStripMenuItem + ' + Me.ShortcutToolStripMenuItem.Name = "ShortcutToolStripMenuItem" + Me.ShortcutToolStripMenuItem.Size = New System.Drawing.Size(216, 22) + Me.ShortcutToolStripMenuItem.Text = "Shortcut" + ' + 'ToolStripMenuItem3 + ' + Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3" + Me.ToolStripMenuItem3.Size = New System.Drawing.Size(166, 6) + ' + 'TileViewToolStripMenuItem + ' + Me.TileViewToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.RenameToolStripMenuItem, Me.DeleteToolStripMenuItem}) + Me.TileViewToolStripMenuItem.Name = "TileViewToolStripMenuItem" + Me.TileViewToolStripMenuItem.Size = New System.Drawing.Size(169, 22) + Me.TileViewToolStripMenuItem.Text = "File Actions" + ' + 'RenameToolStripMenuItem + ' + Me.RenameToolStripMenuItem.Name = "RenameToolStripMenuItem" + Me.RenameToolStripMenuItem.Size = New System.Drawing.Size(117, 22) + Me.RenameToolStripMenuItem.Text = "Rename" + ' + 'DeleteToolStripMenuItem + ' + Me.DeleteToolStripMenuItem.Name = "DeleteToolStripMenuItem" + Me.DeleteToolStripMenuItem.Size = New System.Drawing.Size(117, 22) + Me.DeleteToolStripMenuItem.Text = "Delete" + ' + 'fileActionsSeparator + ' + Me.fileActionsSeparator.Name = "fileActionsSeparator" + Me.fileActionsSeparator.Size = New System.Drawing.Size(166, 6) + ' + 'AboutToolStripMenuItem + ' + Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem" + Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(169, 22) + Me.AboutToolStripMenuItem.Text = "About Desktop++" + ' + 'pnladvapplauncher + ' + Me.pnladvapplauncher.BackColor = System.Drawing.Color.Gray + Me.pnladvapplauncher.Controls.Add(Me.pnladvmain) + Me.pnladvapplauncher.Controls.Add(Me.pnladvplaces) + Me.pnladvapplauncher.Controls.Add(Me.pnladvbottombar) + Me.pnladvapplauncher.Controls.Add(Me.pnladvtopbar) + Me.pnladvapplauncher.Location = New System.Drawing.Point(0, 24) + Me.pnladvapplauncher.Name = "pnladvapplauncher" + Me.pnladvapplauncher.Size = New System.Drawing.Size(320, 526) + Me.pnladvapplauncher.TabIndex = 2 + Me.pnladvapplauncher.Visible = False + ' + 'pnladvmain + ' + Me.pnladvmain.BackColor = System.Drawing.Color.Black + Me.pnladvmain.Controls.Add(Me.tscadvmainframe) + Me.pnladvmain.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnladvmain.Location = New System.Drawing.Point(0, 55) + Me.pnladvmain.Name = "pnladvmain" + Me.pnladvmain.Size = New System.Drawing.Size(184, 427) + Me.pnladvmain.TabIndex = 3 + ' + 'tscadvmainframe + ' + ' + 'tscadvmainframe.BottomToolStripPanel + ' + Me.tscadvmainframe.BottomToolStripPanel.Controls.Add(Me.ToolStrip1) + ' + 'tscadvmainframe.ContentPanel + ' + Me.tscadvmainframe.ContentPanel.Controls.Add(Me.lvadvfiles) + Me.tscadvmainframe.ContentPanel.Size = New System.Drawing.Size(184, 377) + Me.tscadvmainframe.Dock = System.Windows.Forms.DockStyle.Fill + Me.tscadvmainframe.Location = New System.Drawing.Point(0, 0) + Me.tscadvmainframe.Name = "tscadvmainframe" + Me.tscadvmainframe.Size = New System.Drawing.Size(184, 427) + Me.tscadvmainframe.TabIndex = 0 + Me.tscadvmainframe.Text = "ToolStripContainer1" + ' + 'ToolStrip1 + ' + Me.ToolStrip1.Dock = System.Windows.Forms.DockStyle.None + Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden + Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.allPrograms}) + Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) + Me.ToolStrip1.Name = "ToolStrip1" + Me.ToolStrip1.Size = New System.Drawing.Size(184, 25) + Me.ToolStrip1.Stretch = True + Me.ToolStrip1.TabIndex = 0 + ' + 'allPrograms + ' + Me.allPrograms.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UtilitiesToolStripMenuItem, Me.SettingsToolStripMenuItem, Me.InternetToolStripMenuItem, Me.GamesToolStripMenuItem, Me.AccessoriesToolStripMenuItem}) + Me.allPrograms.Image = Global.ShiftOS.My.Resources.Resources.iconFileSkimmer + Me.allPrograms.ImageTransparentColor = System.Drawing.Color.Magenta + Me.allPrograms.Name = "allPrograms" + Me.allPrograms.Size = New System.Drawing.Size(104, 22) + Me.allPrograms.Text = "All Programs" + ' + 'UtilitiesToolStripMenuItem + ' + Me.UtilitiesToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TerminalToolStripMenuItem1, Me.FileSkimmerToolStripMenuItem1, Me.SystemInformationToolStripMenuItem}) + Me.UtilitiesToolStripMenuItem.Name = "UtilitiesToolStripMenuItem" + Me.UtilitiesToolStripMenuItem.Size = New System.Drawing.Size(135, 22) + Me.UtilitiesToolStripMenuItem.Text = "Utilities" + ' + 'TerminalToolStripMenuItem1 + ' + Me.TerminalToolStripMenuItem1.Name = "TerminalToolStripMenuItem1" + Me.TerminalToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.TerminalToolStripMenuItem1.Text = "Terminal" + ' + 'FileSkimmerToolStripMenuItem1 + ' + Me.FileSkimmerToolStripMenuItem1.Name = "FileSkimmerToolStripMenuItem1" + Me.FileSkimmerToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.FileSkimmerToolStripMenuItem1.Text = "File Skimmer" + ' + 'SystemInformationToolStripMenuItem + ' + Me.SystemInformationToolStripMenuItem.Name = "SystemInformationToolStripMenuItem" + Me.SystemInformationToolStripMenuItem.Size = New System.Drawing.Size(178, 22) + Me.SystemInformationToolStripMenuItem.Text = "System Information" + ' + 'SettingsToolStripMenuItem + ' + Me.SettingsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ShifterToolStripMenuItem1, Me.SkinLoaderToolStripMenuItem1, Me.SkinShifterToolStripMenuItem1, Me.IconManagerToolStripMenuItem1, Me.NameChangerToolStripMenuItem1}) + Me.SettingsToolStripMenuItem.Name = "SettingsToolStripMenuItem" + Me.SettingsToolStripMenuItem.Size = New System.Drawing.Size(135, 22) + Me.SettingsToolStripMenuItem.Text = "Settings" + ' + 'ShifterToolStripMenuItem1 + ' + Me.ShifterToolStripMenuItem1.Name = "ShifterToolStripMenuItem1" + Me.ShifterToolStripMenuItem1.Size = New System.Drawing.Size(154, 22) + Me.ShifterToolStripMenuItem1.Text = "Shifter" + ' + 'SkinLoaderToolStripMenuItem1 + ' + Me.SkinLoaderToolStripMenuItem1.Name = "SkinLoaderToolStripMenuItem1" + Me.SkinLoaderToolStripMenuItem1.Size = New System.Drawing.Size(154, 22) + Me.SkinLoaderToolStripMenuItem1.Text = "Skin Loader" + ' + 'SkinShifterToolStripMenuItem1 + ' + Me.SkinShifterToolStripMenuItem1.Name = "SkinShifterToolStripMenuItem1" + Me.SkinShifterToolStripMenuItem1.Size = New System.Drawing.Size(154, 22) + Me.SkinShifterToolStripMenuItem1.Text = "Skin Shifter" + ' + 'IconManagerToolStripMenuItem1 + ' + Me.IconManagerToolStripMenuItem1.Name = "IconManagerToolStripMenuItem1" + Me.IconManagerToolStripMenuItem1.Size = New System.Drawing.Size(154, 22) + Me.IconManagerToolStripMenuItem1.Text = "Icon Manager" + ' + 'NameChangerToolStripMenuItem1 + ' + Me.NameChangerToolStripMenuItem1.Name = "NameChangerToolStripMenuItem1" + Me.NameChangerToolStripMenuItem1.Size = New System.Drawing.Size(154, 22) + Me.NameChangerToolStripMenuItem1.Text = "Name Changer" + ' + 'InternetToolStripMenuItem + ' + Me.InternetToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ShiftnetToolStripMenuItem1, Me.ShiftoriumToolStripMenuItem1, Me.WebBrowserToolStripMenuItem1, Me.DownloadManagerToolStripMenuItem1, Me.InstallerToolStripMenuItem1, Me.BitnoteDiggerToolStripMenuItem1, Me.BitnoteWalletToolStripMenuItem1, Me.FloodGateManagerToolStripMenuItem, Me.VirusScannerToolStripMenuItem1, Me.CatalystToolStripMenuItem}) + Me.InternetToolStripMenuItem.Name = "InternetToolStripMenuItem" + Me.InternetToolStripMenuItem.Size = New System.Drawing.Size(135, 22) + Me.InternetToolStripMenuItem.Text = "Internet" + ' + 'ShiftnetToolStripMenuItem1 + ' + Me.ShiftnetToolStripMenuItem1.Name = "ShiftnetToolStripMenuItem1" + Me.ShiftnetToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.ShiftnetToolStripMenuItem1.Text = "Shiftnet" + ' + 'ShiftoriumToolStripMenuItem1 + ' + Me.ShiftoriumToolStripMenuItem1.Name = "ShiftoriumToolStripMenuItem1" + Me.ShiftoriumToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.ShiftoriumToolStripMenuItem1.Text = "Shiftorium" + ' + 'WebBrowserToolStripMenuItem1 + ' + Me.WebBrowserToolStripMenuItem1.Name = "WebBrowserToolStripMenuItem1" + Me.WebBrowserToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.WebBrowserToolStripMenuItem1.Text = "Web Browser" + ' + 'DownloadManagerToolStripMenuItem1 + ' + Me.DownloadManagerToolStripMenuItem1.Name = "DownloadManagerToolStripMenuItem1" + Me.DownloadManagerToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.DownloadManagerToolStripMenuItem1.Text = "Download Manager" + ' + 'InstallerToolStripMenuItem1 + ' + Me.InstallerToolStripMenuItem1.Name = "InstallerToolStripMenuItem1" + Me.InstallerToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.InstallerToolStripMenuItem1.Text = "Installer" + ' + 'BitnoteDiggerToolStripMenuItem1 + ' + Me.BitnoteDiggerToolStripMenuItem1.Name = "BitnoteDiggerToolStripMenuItem1" + Me.BitnoteDiggerToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.BitnoteDiggerToolStripMenuItem1.Text = "Bitnote Digger" + ' + 'BitnoteWalletToolStripMenuItem1 + ' + Me.BitnoteWalletToolStripMenuItem1.Name = "BitnoteWalletToolStripMenuItem1" + Me.BitnoteWalletToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.BitnoteWalletToolStripMenuItem1.Text = "Bitnote Wallet" + ' + 'FloodGateManagerToolStripMenuItem + ' + Me.FloodGateManagerToolStripMenuItem.Name = "FloodGateManagerToolStripMenuItem" + Me.FloodGateManagerToolStripMenuItem.Size = New System.Drawing.Size(178, 22) + Me.FloodGateManagerToolStripMenuItem.Text = "FloodGate Manager" + ' + 'VirusScannerToolStripMenuItem1 + ' + Me.VirusScannerToolStripMenuItem1.Name = "VirusScannerToolStripMenuItem1" + Me.VirusScannerToolStripMenuItem1.Size = New System.Drawing.Size(178, 22) + Me.VirusScannerToolStripMenuItem1.Text = "Virus Scanner" + ' + 'CatalystToolStripMenuItem + ' + Me.CatalystToolStripMenuItem.Name = "CatalystToolStripMenuItem" + Me.CatalystToolStripMenuItem.Size = New System.Drawing.Size(178, 22) + Me.CatalystToolStripMenuItem.Text = "Catalyst" + ' + 'GamesToolStripMenuItem + ' + Me.GamesToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DodgeToolStripMenuItem1, Me.SnakeyToolStripMenuItem1, Me.PongToolStripMenuItem1, Me.KnowledgeInputToolStripMenuItem1, Me.LabyrinthToolStripMenuItem}) + Me.GamesToolStripMenuItem.Name = "GamesToolStripMenuItem" + Me.GamesToolStripMenuItem.Size = New System.Drawing.Size(135, 22) + Me.GamesToolStripMenuItem.Text = "Games" + ' + 'DodgeToolStripMenuItem1 + ' + Me.DodgeToolStripMenuItem1.Name = "DodgeToolStripMenuItem1" + Me.DodgeToolStripMenuItem1.Size = New System.Drawing.Size(164, 22) + Me.DodgeToolStripMenuItem1.Text = "Dodge" + ' + 'SnakeyToolStripMenuItem1 + ' + Me.SnakeyToolStripMenuItem1.Name = "SnakeyToolStripMenuItem1" + Me.SnakeyToolStripMenuItem1.Size = New System.Drawing.Size(164, 22) + Me.SnakeyToolStripMenuItem1.Text = "Snakey" + ' + 'PongToolStripMenuItem1 + ' + Me.PongToolStripMenuItem1.Name = "PongToolStripMenuItem1" + Me.PongToolStripMenuItem1.Size = New System.Drawing.Size(164, 22) + Me.PongToolStripMenuItem1.Text = "Pong" + ' + 'KnowledgeInputToolStripMenuItem1 + ' + Me.KnowledgeInputToolStripMenuItem1.Name = "KnowledgeInputToolStripMenuItem1" + Me.KnowledgeInputToolStripMenuItem1.Size = New System.Drawing.Size(164, 22) + Me.KnowledgeInputToolStripMenuItem1.Text = "Knowledge Input" + ' + 'LabyrinthToolStripMenuItem + ' + Me.LabyrinthToolStripMenuItem.Name = "LabyrinthToolStripMenuItem" + Me.LabyrinthToolStripMenuItem.Size = New System.Drawing.Size(164, 22) + Me.LabyrinthToolStripMenuItem.Text = "Labyrinth" + ' + 'AccessoriesToolStripMenuItem + ' + Me.AccessoriesToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ArtpadToolStripMenuItem1, Me.TextpadToolStripMenuItem1, Me.OrcWriteToolStripMenuItem1, Me.AudioPlayerToolStripMenuItem1, Me.VideoPlayerToolStripMenuItem1, Me.ClockToolStripMenuItem1, Me.CalculatorToolStripMenuItem1}) + Me.AccessoriesToolStripMenuItem.Name = "AccessoriesToolStripMenuItem" + Me.AccessoriesToolStripMenuItem.Size = New System.Drawing.Size(135, 22) + Me.AccessoriesToolStripMenuItem.Text = "Accessories" + ' + 'ArtpadToolStripMenuItem1 + ' + Me.ArtpadToolStripMenuItem1.Name = "ArtpadToolStripMenuItem1" + Me.ArtpadToolStripMenuItem1.Size = New System.Drawing.Size(141, 22) + Me.ArtpadToolStripMenuItem1.Text = "Artpad" + ' + 'TextpadToolStripMenuItem1 + ' + Me.TextpadToolStripMenuItem1.Name = "TextpadToolStripMenuItem1" + Me.TextpadToolStripMenuItem1.Size = New System.Drawing.Size(141, 22) + Me.TextpadToolStripMenuItem1.Text = "Textpad" + ' + 'OrcWriteToolStripMenuItem1 + ' + Me.OrcWriteToolStripMenuItem1.Name = "OrcWriteToolStripMenuItem1" + Me.OrcWriteToolStripMenuItem1.Size = New System.Drawing.Size(141, 22) + Me.OrcWriteToolStripMenuItem1.Text = "OrcWrite" + ' + 'AudioPlayerToolStripMenuItem1 + ' + Me.AudioPlayerToolStripMenuItem1.Name = "AudioPlayerToolStripMenuItem1" + Me.AudioPlayerToolStripMenuItem1.Size = New System.Drawing.Size(141, 22) + Me.AudioPlayerToolStripMenuItem1.Text = "Audio Player" + ' + 'VideoPlayerToolStripMenuItem1 + ' + Me.VideoPlayerToolStripMenuItem1.Name = "VideoPlayerToolStripMenuItem1" + Me.VideoPlayerToolStripMenuItem1.Size = New System.Drawing.Size(141, 22) + Me.VideoPlayerToolStripMenuItem1.Text = "Video Player" + ' + 'ClockToolStripMenuItem1 + ' + Me.ClockToolStripMenuItem1.Name = "ClockToolStripMenuItem1" + Me.ClockToolStripMenuItem1.Size = New System.Drawing.Size(141, 22) + Me.ClockToolStripMenuItem1.Text = "Clock" + ' + 'CalculatorToolStripMenuItem1 + ' + Me.CalculatorToolStripMenuItem1.Name = "CalculatorToolStripMenuItem1" + Me.CalculatorToolStripMenuItem1.Size = New System.Drawing.Size(141, 22) + Me.CalculatorToolStripMenuItem1.Text = "Calculator" + ' + 'lvadvfiles + ' + Me.lvadvfiles.Dock = System.Windows.Forms.DockStyle.Fill + Me.lvadvfiles.Location = New System.Drawing.Point(0, 0) + Me.lvadvfiles.Name = "lvadvfiles" + Me.lvadvfiles.Size = New System.Drawing.Size(184, 377) + Me.lvadvfiles.TabIndex = 0 + Me.lvadvfiles.UseCompatibleStateImageBehavior = False + ' + 'pnladvplaces + ' + Me.pnladvplaces.BackColor = System.Drawing.Color.White + Me.pnladvplaces.Controls.Add(Me.lvadvplaces) + Me.pnladvplaces.Dock = System.Windows.Forms.DockStyle.Right + Me.pnladvplaces.Location = New System.Drawing.Point(184, 55) + Me.pnladvplaces.Name = "pnladvplaces" + Me.pnladvplaces.Size = New System.Drawing.Size(136, 427) + Me.pnladvplaces.TabIndex = 2 + ' + 'lvadvplaces + ' + Me.lvadvplaces.Dock = System.Windows.Forms.DockStyle.Fill + Me.lvadvplaces.Location = New System.Drawing.Point(0, 0) + Me.lvadvplaces.Name = "lvadvplaces" + Me.lvadvplaces.Size = New System.Drawing.Size(136, 427) + Me.lvadvplaces.TabIndex = 0 + Me.lvadvplaces.UseCompatibleStateImageBehavior = False + Me.lvadvplaces.View = System.Windows.Forms.View.SmallIcon + ' + 'pnladvbottombar + ' + Me.pnladvbottombar.Controls.Add(Me.btnadvshutdown) + Me.pnladvbottombar.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnladvbottombar.Location = New System.Drawing.Point(0, 482) + Me.pnladvbottombar.Name = "pnladvbottombar" + Me.pnladvbottombar.Size = New System.Drawing.Size(320, 44) + Me.pnladvbottombar.TabIndex = 1 + ' + 'btnadvshutdown + ' + Me.btnadvshutdown.Dock = System.Windows.Forms.DockStyle.Fill + Me.btnadvshutdown.FlatAppearance.BorderSize = 0 + Me.btnadvshutdown.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnadvshutdown.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.btnadvshutdown.ForeColor = System.Drawing.Color.White + Me.btnadvshutdown.Image = Global.ShiftOS.My.Resources.Resources.iconshutdown + Me.btnadvshutdown.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnadvshutdown.Location = New System.Drawing.Point(0, 0) + Me.btnadvshutdown.Name = "btnadvshutdown" + Me.btnadvshutdown.Size = New System.Drawing.Size(320, 44) + Me.btnadvshutdown.TabIndex = 0 + Me.btnadvshutdown.Text = "Shut Down ShiftOS" + Me.btnadvshutdown.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnadvshutdown.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText + Me.btnadvshutdown.UseVisualStyleBackColor = True + ' + 'pnladvtopbar + ' + Me.pnladvtopbar.Controls.Add(Me.lbuser) + Me.pnladvtopbar.Dock = System.Windows.Forms.DockStyle.Top + Me.pnladvtopbar.Location = New System.Drawing.Point(0, 0) + Me.pnladvtopbar.Name = "pnladvtopbar" + Me.pnladvtopbar.Size = New System.Drawing.Size(320, 55) + Me.pnladvtopbar.TabIndex = 0 + ' + 'lbuser + ' + Me.lbuser.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbuser.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Italic) + Me.lbuser.ForeColor = System.Drawing.Color.White + Me.lbuser.Location = New System.Drawing.Point(0, 0) + Me.lbuser.Name = "lbuser" + Me.lbuser.Size = New System.Drawing.Size(320, 55) + Me.lbuser.TabIndex = 0 + Me.lbuser.Text = "Username" + Me.lbuser.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'ShiftOSDesktop + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.Black + Me.ClientSize = New System.Drawing.Size(1268, 685) + Me.Controls.Add(Me.pnladvapplauncher) + Me.Controls.Add(Me.desktopicons) + Me.Controls.Add(Me.desktoppanel) + Me.KeyPreview = True + Me.MainMenuStrip = Me.desktopappmenu + Me.Name = "ShiftOSDesktop" + Me.Text = "ShiftOSDesktop" + Me.desktoppanel.ResumeLayout(False) + Me.pnlpanelbuttonholder.ResumeLayout(False) + Me.pnlpanelbuttonholder.PerformLayout() + Me.pnlpanelbuttonclock.ResumeLayout(False) + Me.pnlpanelbuttonclock.PerformLayout() + CType(Me.tbclockicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonsysinfo.ResumeLayout(False) + Me.pnlpanelbuttonsysinfo.PerformLayout() + CType(Me.tbsysinfoicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonskinloader.ResumeLayout(False) + Me.pnlpanelbuttonskinloader.PerformLayout() + CType(Me.tbskinloadericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonfileskimmer.ResumeLayout(False) + Me.pnlpanelbuttonfileskimmer.PerformLayout() + CType(Me.tbfileskimmericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonfileopener.ResumeLayout(False) + Me.pnlpanelbuttonfileopener.PerformLayout() + CType(Me.tbfileopenericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttoninfobox.ResumeLayout(False) + Me.pnlpanelbuttoninfobox.PerformLayout() + CType(Me.tbinfoboxicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonknowledgeinput.ResumeLayout(False) + Me.pnlpanelbuttonknowledgeinput.PerformLayout() + CType(Me.tbknowledgeinputicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttoncolourpicker.ResumeLayout(False) + Me.pnlpanelbuttoncolourpicker.PerformLayout() + CType(Me.tbcolourpickericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonshiftorium.ResumeLayout(False) + Me.pnlpanelbuttonshiftorium.PerformLayout() + CType(Me.tbshiftoriumicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonpong.ResumeLayout(False) + Me.pnlpanelbuttonpong.PerformLayout() + CType(Me.tbpongicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonterminal.ResumeLayout(False) + Me.pnlpanelbuttonterminal.PerformLayout() + CType(Me.tbterminalicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttontextpad.ResumeLayout(False) + Me.pnlpanelbuttontextpad.PerformLayout() + CType(Me.tbtextpadicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttongraphicpicker.ResumeLayout(False) + Me.pnlpanelbuttongraphicpicker.PerformLayout() + CType(Me.tbgraphicpickericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonartpad.ResumeLayout(False) + Me.pnlpanelbuttonartpad.PerformLayout() + CType(Me.tbartpadicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttoncalculator.ResumeLayout(False) + Me.pnlpanelbuttoncalculator.PerformLayout() + CType(Me.tbcalculatoricon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonaudioplayer.ResumeLayout(False) + Me.pnlpanelbuttonaudioplayer.PerformLayout() + CType(Me.tbaudioplayericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonvideoplayer.ResumeLayout(False) + Me.pnlpanelbuttonvideoplayer.PerformLayout() + CType(Me.tbvideoplayericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonwebbrowser.ResumeLayout(False) + Me.pnlpanelbuttonwebbrowser.PerformLayout() + CType(Me.tbwebbrowsericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonnamechanger.ResumeLayout(False) + Me.pnlpanelbuttonnamechanger.PerformLayout() + CType(Me.tbnamechangericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttoniconmanager.ResumeLayout(False) + Me.pnlpanelbuttoniconmanager.PerformLayout() + CType(Me.tbiconmanagericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonbitnotewallet.ResumeLayout(False) + Me.pnlpanelbuttonbitnotewallet.PerformLayout() + CType(Me.tbbitnotewalleticon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonbitnotedigger.ResumeLayout(False) + Me.pnlpanelbuttonbitnotedigger.PerformLayout() + CType(Me.tbbitnotediggericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonskinshifter.ResumeLayout(False) + Me.pnlpanelbuttonskinshifter.PerformLayout() + CType(Me.tbskinshiftericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttondownloader.ResumeLayout(False) + Me.pnlpanelbuttondownloader.PerformLayout() + CType(Me.tbdownloadericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonshiftnet.ResumeLayout(False) + Me.pnlpanelbuttonshiftnet.PerformLayout() + CType(Me.tbshiftneticon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttondodge.ResumeLayout(False) + Me.pnlpanelbuttondodge.PerformLayout() + CType(Me.tbdodgeicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttondownloadmanager.ResumeLayout(False) + Me.pnlpanelbuttondownloadmanager.PerformLayout() + CType(Me.tbdownloadmanagericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlcatalystpanelbutton.ResumeLayout(False) + Me.pnlcatalystpanelbutton.PerformLayout() + CType(Me.tbcatalysticon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttoninstaller.ResumeLayout(False) + Me.pnlpanelbuttoninstaller.PerformLayout() + CType(Me.tbinstallericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnl_panelbuttonsnakey.ResumeLayout(False) + Me.pnl_panelbuttonsnakey.PerformLayout() + CType(Me.tbsnakeyicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonorcwrite.ResumeLayout(False) + Me.pnlpanelbuttonorcwrite.PerformLayout() + CType(Me.tborcwriteicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonfloodgate.ResumeLayout(False) + Me.pnlpanelbuttonfloodgate.PerformLayout() + CType(Me.tbfloodgateicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonmaze.ResumeLayout(False) + Me.pnlpanelbuttonmaze.PerformLayout() + CType(Me.tbmazeicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonvirusscanner.ResumeLayout(False) + Me.pnlpanelbuttonvirusscanner.PerformLayout() + CType(Me.tbvirusscannericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonfilesaver.ResumeLayout(False) + Me.pnlpanelbuttonfilesaver.PerformLayout() + CType(Me.tbfilesavericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonshifter.ResumeLayout(False) + Me.pnlpanelbuttonshifter.PerformLayout() + CType(Me.tbshiftericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.applaunchermenuholder.ResumeLayout(False) + Me.desktopappmenu.ResumeLayout(False) + Me.desktopappmenu.PerformLayout() + Me.timepanel.ResumeLayout(False) + Me.timepanel.PerformLayout() + Me.pnlpanelbuttonfloatybird.ResumeLayout(False) + Me.pnlpanelbuttonfloatybird.PerformLayout() + CType(Me.tbfloatybirdicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ContextMenuStrip1.ResumeLayout(False) + Me.pnladvapplauncher.ResumeLayout(False) + Me.pnladvmain.ResumeLayout(False) + Me.tscadvmainframe.BottomToolStripPanel.ResumeLayout(False) + Me.tscadvmainframe.BottomToolStripPanel.PerformLayout() + Me.tscadvmainframe.ContentPanel.ResumeLayout(False) + Me.tscadvmainframe.ResumeLayout(False) + Me.tscadvmainframe.PerformLayout() + Me.ToolStrip1.ResumeLayout(False) + Me.ToolStrip1.PerformLayout() + Me.pnladvplaces.ResumeLayout(False) + Me.pnladvbottombar.ResumeLayout(False) + Me.pnladvtopbar.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents desktoppanel As System.Windows.Forms.Panel + Friend WithEvents desktopappmenu As System.Windows.Forms.MenuStrip + Friend WithEvents ApplicationsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents KnowledgeInputToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShiftoriumToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ClockToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TerminalToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents unitySeperator As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ShutdownToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents paneltimetext As System.Windows.Forms.Label + Friend WithEvents clocktick As System.Windows.Forms.Timer + Friend WithEvents timepanel As System.Windows.Forms.Panel + Friend WithEvents ShifterToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents applaunchermenuholder As System.Windows.Forms.Panel + Friend WithEvents PongToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents FileSkimmerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TextPadToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents autosave As System.Windows.Forms.Timer + Friend WithEvents SkinLoaderToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttontextpad As System.Windows.Forms.Panel + Friend WithEvents tbtextpadicon As System.Windows.Forms.PictureBox + Friend WithEvents tbtextpadtext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonclock As System.Windows.Forms.Panel + Friend WithEvents tbclockicon As System.Windows.Forms.PictureBox + Friend WithEvents tbclocktext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttoncolourpicker As System.Windows.Forms.Panel + Friend WithEvents tbcolourpickericon As System.Windows.Forms.PictureBox + Friend WithEvents tbcolourpickertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttongraphicpicker As System.Windows.Forms.Panel + Friend WithEvents tbgraphicpickericon As System.Windows.Forms.PictureBox + Friend WithEvents tbgraphicpickertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonfileopener As System.Windows.Forms.Panel + Friend WithEvents tbfileopenericon As System.Windows.Forms.PictureBox + Friend WithEvents tbfileopenertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonfileskimmer As System.Windows.Forms.Panel + Friend WithEvents tbfileskimmericon As System.Windows.Forms.PictureBox + Friend WithEvents tbfileskimmertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonknowledgeinput As System.Windows.Forms.Panel + Friend WithEvents tbknowledgeinputicon As System.Windows.Forms.PictureBox + Friend WithEvents tbknowledgeinputtext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttoninfobox As System.Windows.Forms.Panel + Friend WithEvents tbinfoboxicon As System.Windows.Forms.PictureBox + Friend WithEvents tbinfoboxtext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonpong As System.Windows.Forms.Panel + Friend WithEvents tbpongicon As System.Windows.Forms.PictureBox + Friend WithEvents tbpongtext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonshiftorium As System.Windows.Forms.Panel + Friend WithEvents tbshiftoriumicon As System.Windows.Forms.PictureBox + Friend WithEvents tbshiftoriumtext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonskinloader As System.Windows.Forms.Panel + Friend WithEvents tbskinloadericon As System.Windows.Forms.PictureBox + Friend WithEvents tbskinloadertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonterminal As System.Windows.Forms.Panel + Friend WithEvents tbterminalicon As System.Windows.Forms.PictureBox + Friend WithEvents tbterminaltext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonholder As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents pnlpanelbuttonartpad As System.Windows.Forms.Panel + Friend WithEvents tbartpadicon As System.Windows.Forms.PictureBox + Friend WithEvents tbartpadtext As System.Windows.Forms.Label + Friend WithEvents ArtpadToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents CalculatorToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttoncalculator As System.Windows.Forms.Panel + Friend WithEvents tbcalculatoricon As System.Windows.Forms.PictureBox + Friend WithEvents tbcalculatortext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonaudioplayer As System.Windows.Forms.Panel + Friend WithEvents tbaudioplayericon As System.Windows.Forms.PictureBox + Friend WithEvents tbaudioplayertext As System.Windows.Forms.Label + Friend WithEvents AudioplayerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonwebbrowser As System.Windows.Forms.Panel + Friend WithEvents tbwebbrowsericon As System.Windows.Forms.PictureBox + Friend WithEvents tbwebbrowsertext As System.Windows.Forms.Label + Friend WithEvents WebBrowserToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonvideoplayer As System.Windows.Forms.Panel + Friend WithEvents tbvideoplayericon As System.Windows.Forms.PictureBox + Friend WithEvents tbvideoplayertext As System.Windows.Forms.Label + Friend WithEvents VideoplayerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonnamechanger As System.Windows.Forms.Panel + Friend WithEvents tbnamechangericon As System.Windows.Forms.PictureBox + Friend WithEvents tbnamechangertext As System.Windows.Forms.Label + Friend WithEvents NameChangerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttoniconmanager As System.Windows.Forms.Panel + Friend WithEvents tbiconmanagericon As System.Windows.Forms.PictureBox + Friend WithEvents tbiconmanagertext As System.Windows.Forms.Label + Friend WithEvents IconManagerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonbitnotewallet As System.Windows.Forms.Panel + Friend WithEvents tbbitnotewalleticon As System.Windows.Forms.PictureBox + Friend WithEvents tbbitnotewallettext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonbitnotedigger As System.Windows.Forms.Panel + Friend WithEvents tbbitnotediggericon As System.Windows.Forms.PictureBox + Friend WithEvents tbbitnotediggertext As System.Windows.Forms.Label + Friend WithEvents BitnoteWalletToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents BitnoteDiggerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonskinshifter As System.Windows.Forms.Panel + Friend WithEvents tbskinshiftericon As System.Windows.Forms.PictureBox + Friend WithEvents tbskinshiftertext As System.Windows.Forms.Label + Friend WithEvents SkinShifterToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonshiftnet As System.Windows.Forms.Panel + Friend WithEvents tbshiftneticon As System.Windows.Forms.PictureBox + Friend WithEvents tbshiftnettext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttondownloader As System.Windows.Forms.Panel + Friend WithEvents tbdownloadericon As System.Windows.Forms.PictureBox + Friend WithEvents tbdownloadertext As System.Windows.Forms.Label + Friend WithEvents ShiftnetToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttondodge As System.Windows.Forms.Panel + Friend WithEvents tbdodgeicon As System.Windows.Forms.PictureBox + Friend WithEvents tbdodgetext As System.Windows.Forms.Label + Friend WithEvents DodgeToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents sysinfoToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttondownloadmanager As System.Windows.Forms.Panel + Friend WithEvents tbdownloadmanagericon As System.Windows.Forms.PictureBox + Friend WithEvents tbdownloadmanagertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttoninstaller As System.Windows.Forms.Panel + Friend WithEvents tbinstallericon As System.Windows.Forms.PictureBox + Friend WithEvents tbinstallertext As System.Windows.Forms.Label + Friend WithEvents InstallerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonsnakey As System.Windows.Forms.Label + Friend WithEvents downloadmanagerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnl_panelbuttonsnakey As System.Windows.Forms.Panel + Friend WithEvents tbsnakeyicon As System.Windows.Forms.PictureBox + Friend WithEvents tbsnakeytext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonorcwrite As System.Windows.Forms.Panel + Friend WithEvents tborcwriteicon As System.Windows.Forms.PictureBox + Friend WithEvents tborcwritetext As System.Windows.Forms.Label + Friend WithEvents orcwriteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonfloodgate As System.Windows.Forms.Panel + Friend WithEvents tbfloodgateicon As System.Windows.Forms.PictureBox + Friend WithEvents tbfloodgatetext As System.Windows.Forms.Label + Friend WithEvents FloodGateToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents UnityToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonsysinfo As System.Windows.Forms.Panel + Friend WithEvents tbsysinfoicon As System.Windows.Forms.PictureBox + Friend WithEvents tbsysinfotext As System.Windows.Forms.Label + Friend WithEvents SnakeyToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonmaze As System.Windows.Forms.Panel + Friend WithEvents tbmazeicon As System.Windows.Forms.PictureBox + Friend WithEvents tbmazetext As System.Windows.Forms.Label + Friend WithEvents MazeToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlpanelbuttonvirusscanner As System.Windows.Forms.Panel + Friend WithEvents tbvirusscannericon As System.Windows.Forms.PictureBox + Friend WithEvents tbvirusscannertext As System.Windows.Forms.Label + Friend WithEvents VirusScannerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents nocheat As System.Windows.Forms.Timer + Friend WithEvents pnlpanelbuttonfilesaver As System.Windows.Forms.Panel + Friend WithEvents tbfilesavericon As System.Windows.Forms.PictureBox + Friend WithEvents tbfilesavertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonshifter As System.Windows.Forms.Panel + Friend WithEvents tbshiftericon As System.Windows.Forms.PictureBox + Friend WithEvents tbshiftertext As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttonfloatybird As System.Windows.Forms.Panel + Friend WithEvents tbfloatybirdicon As System.Windows.Forms.PictureBox + Friend WithEvents tbfloatybirdtext As System.Windows.Forms.Label + Friend WithEvents floatybirdToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents tmrwindowedtest As System.Windows.Forms.Timer + Friend WithEvents desktopicons As System.Windows.Forms.ListView + Friend WithEvents ContextMenuStrip1 As System.Windows.Forms.ContextMenuStrip + Friend WithEvents NewToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents FolderToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripMenuItem2 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ArtpadPictureToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TextDocumentToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents OrcWriteDocumentToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents SystemInformationReportToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents WebpageToolStripMenuItem As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ShortcutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripMenuItem3 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents TileViewToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents fileActionsSeparator As System.Windows.Forms.ToolStripSeparator + Friend WithEvents AboutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents NewSkin As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents RenameToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents DeleteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnladvapplauncher As System.Windows.Forms.Panel + Friend WithEvents pnladvmain As System.Windows.Forms.Panel + Friend WithEvents tscadvmainframe As System.Windows.Forms.ToolStripContainer + Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip + Friend WithEvents allPrograms As System.Windows.Forms.ToolStripDropDownButton + Friend WithEvents UtilitiesToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TerminalToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents FileSkimmerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents SystemInformationToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents SettingsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShifterToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents SkinLoaderToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents SkinShifterToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents IconManagerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents NameChangerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents InternetToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShiftnetToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShiftoriumToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents WebBrowserToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents DownloadManagerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents InstallerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents BitnoteDiggerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents BitnoteWalletToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents FloodGateManagerToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents VirusScannerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents GamesToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents DodgeToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents SnakeyToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents PongToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents KnowledgeInputToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents LabyrinthToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents AccessoriesToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ArtpadToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TextpadToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents OrcWriteToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents AudioPlayerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents VideoPlayerToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ClockToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents CalculatorToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnladvplaces As System.Windows.Forms.Panel + Friend WithEvents pnladvbottombar As System.Windows.Forms.Panel + Friend WithEvents pnladvtopbar As System.Windows.Forms.Panel + Friend WithEvents btnadvshutdown As System.Windows.Forms.Button + Friend WithEvents lvadvplaces As System.Windows.Forms.ListView + Friend WithEvents lvadvfiles As System.Windows.Forms.ListView + Friend WithEvents lbuser As System.Windows.Forms.Label + Friend WithEvents pnlcatalystpanelbutton As System.Windows.Forms.Panel + Friend WithEvents tbcatalysticon As System.Windows.Forms.PictureBox + Friend WithEvents lbcatalystname As System.Windows.Forms.Label + Friend WithEvents CatalystToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents CatalystToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem +End Class diff --git a/ShiftOS/ShiftOSDesktop.resx b/ShiftOS/ShiftOSDesktop.resx new file mode 100644 index 0000000..f8fcdc0 --- /dev/null +++ b/ShiftOS/ShiftOSDesktop.resx @@ -0,0 +1,144 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="desktopappmenu.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>190, 17</value> + </metadata> + <metadata name="clocktick.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>337, 17</value> + </metadata> + <metadata name="autosave.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>435, 17</value> + </metadata> + <metadata name="nocheat.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>535, 17</value> + </metadata> + <metadata name="tmrwindowedtest.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>630, 17</value> + </metadata> + <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 56</value> + </metadata> + <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>174, 56</value> + </metadata> + <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> + <value>50</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/ShiftOSDesktop.vb b/ShiftOS/ShiftOSDesktop.vb new file mode 100644 index 0000000..1d2517d --- /dev/null +++ b/ShiftOS/ShiftOSDesktop.vb @@ -0,0 +1,5290 @@ +Public Class ShiftOSDesktop + + +#Region "Saving and Loading Skins and Game Progress" + Public justconverted As Boolean = False + Public codepoints As Integer + Public log As String + Public forceclose As Boolean = False + Public movablewindownumber As Integer = 50 + Public terminalfullscreen As Boolean = True + Public unitymode As Boolean = False + Public savelines(2000) As String + Public loadlines(2000) As String + Public skinlines(200) As String + Public newgame As Boolean = False + Public lastcolourpick As Color = Color.Gray + Public programsopen As Integer = 0 + Public ShiftOSPath As String = "C:\ShiftOS\" + Private actualshiftversion As String = "0.0.8" + Public ingameversion As String = "0.0.1.0" + Public password As String + + 'Corruptions + Public NumberOn As Integer = 1 + Public CrashGameReady As Boolean = False + Public FileSkimmerCorrupted As Boolean = False + Public ArtpadCorrupted As Boolean = False + Public AudioPlayerCorrupted As Boolean = False + Public BitNoteDiggerCorrupted As Boolean = False + Public BitNoteWalletCorrupted As Boolean = False + Public CalculatorCorrupted As Boolean = False + Public ClockCorrupted As Boolean = False + Public CoherenceModeCorrupted As Boolean = False + Public ColourPickerCorrupted As Boolean = False + Public DodgeCorrupted As Boolean = False + Public DownloadManagerCorrupted As Boolean = False + Public FloodGateManagerCorrupted As Boolean = False + Public GraphicPickerCorrupted As Boolean = False + Public IconManagerCorrupted As Boolean = False + Public InstallerCorrupted As Boolean = False + Public KnowledgeInputCorrupted As Boolean = False + Public LabyrinthCorrupted As Boolean = False + Public NameChangerCorrupted As Boolean = False + Public OrcWriteCorrupted As Boolean = False + Public PongCorrupted As Boolean = False + Public ShifterCorrupted As Boolean = False + Public ShiftNetCorrupted As Boolean = False + Public ShiftoriumCorrupted As Boolean = False + Public SkinLoaderCorrupted As Boolean = False + Public SkinShifterCorrupted As Boolean = False + Public SnakeyCorrupted As Boolean = False + Public SystemInfoCorrupted As Boolean = False + Public TerminalCorrupted As Boolean = False + Public TextpadCorrupted As Boolean = False + Public VideoPlayerCorrupted As Boolean = False + Public VirusScannerCorrupted As Boolean = False + Public WebBrowserCorrupted As Boolean = False + + 'Shiftorium Upgrades + Public boughttitlebar As Boolean = False + Public boughtgray As Boolean = False + Public boughtsecondspastmidnight As Boolean = False + Public boughtminutespastmidnight As Boolean = False + Public boughthourspastmidnight As Boolean = False + Public boughtcustomusername As Boolean = False + Public boughtwindowsanywhere As Boolean = False + Public boughtmultitasking As Boolean = False + Public boughtautoscrollterminal As Boolean = False + Public boughtmovablewindows As Boolean = False + Public boughtdraggablewindows As Boolean = False + Public boughtwindowborders As Boolean = False + Public boughtpmandam As Boolean = False + Public boughtminuteaccuracytime As Boolean = False + Public boughtsplitsecondtime As Boolean = False + Public boughttitletext As Boolean = False + Public boughtclosebutton As Boolean = False + Public boughtdesktoppanel As Boolean = False + Public boughtclock As Boolean = False + Public boughtwindowedterminal As Boolean = False + Public boughtapplaunchermenu As Boolean = False + Public boughtalknowledgeinput As Boolean = False + Public boughtalclock As Boolean = False + Public boughtalshiftorium As Boolean = False + Public boughtapplaunchershutdown As Boolean = False + Public boughtdesktoppanelclock As Boolean = False + Public boughtterminalscrollbar As Boolean = False + Public boughtkiaddons As Boolean = False + Public boughtkicarbrands As Boolean = False + Public boughtkigameconsoles As Boolean = False + Public boughtshifter As Boolean = False + Public boughtalshifter As Boolean = False + Public boughtrollupcommand As Boolean = False + Public boughtrollupbutton As Boolean = False + Public boughtshiftdesktop As Boolean = False + Public boughtshiftpanelclock As Boolean = False + Public boughtshiftapplauncher As Boolean = False + Public boughtshiftdesktoppanel As Boolean = False + Public boughtshifttitlebar As Boolean = False + Public boughtshifttitletext As Boolean = False + Public boughtshifttitlebuttons As Boolean = False + Public boughtshiftborders As Boolean = False + Public boughtgray2 As Boolean = False + Public boughtgray3 As Boolean = False + Public boughtgray4 As Boolean = False + Public boughtanycolour As Boolean = False + Public boughtanycolour2 As Boolean = False + Public boughtanycolour3 As Boolean = False + Public boughtanycolour4 As Boolean = False + Public boughtpurple As Boolean = False + Public boughtpurple2 As Boolean = False + Public boughtpurple3 As Boolean = False + Public boughtpurple4 As Boolean = False + Public boughtblue As Boolean = False + Public boughtblue2 As Boolean = False + Public boughtblue3 As Boolean = False + Public boughtblue4 As Boolean = False + Public boughtgreen As Boolean = False + Public boughtgreen2 As Boolean = False + Public boughtgreen3 As Boolean = False + Public boughtgreen4 As Boolean = False + Public boughtyellow As Boolean = False + Public boughtyellow2 As Boolean = False + Public boughtyellow3 As Boolean = False + Public boughtyellow4 As Boolean = False + Public boughtorange As Boolean = False + Public boughtorange2 As Boolean = False + Public boughtorange3 As Boolean = False + Public boughtorange4 As Boolean = False + Public boughtbrown As Boolean = False + Public boughtbrown2 As Boolean = False + Public boughtbrown3 As Boolean = False + Public boughtbrown4 As Boolean = False + Public boughtred As Boolean = False + Public boughtred2 As Boolean = False + Public boughtred3 As Boolean = False + Public boughtred4 As Boolean = False + Public boughtpink As Boolean = False + Public boughtpink2 As Boolean = False + Public boughtpink3 As Boolean = False + Public boughtpink4 As Boolean = False + 'new 0.0.6 content + Public boughtpong As Boolean = False + Public boughtknowledgeinputicon As Boolean = False + Public boughtshiftericon As Boolean = False + Public boughtshiftoriumicon As Boolean = False + Public boughtclockicon As Boolean = False + Public boughtshutdownicon As Boolean = False + Public boughtpongicon As Boolean = False + Public boughtterminalicon As Boolean = False + Public boughtalpong As Boolean = False + Public boughtfileskimmer As Boolean = False + Public boughtalfileskimmer As Boolean = False + Public boughttextpad As Boolean = False + Public boughtaltextpad As Boolean = False + Public boughtfileskimmericon As Boolean = False + Public boughttextpadicon As Boolean = False + Public boughttextpadnew As Boolean = False + Public boughttextpadsave As Boolean = False + Public boughttextpadopen As Boolean = False + Public boughtfileskimmernewfolder As Boolean = False + Public boughtfileskimmerdelete As Boolean = False + Public boughtkielements As Boolean = False + Public boughtcolourpickericon As Boolean = False + Public boughtinfoboxicon As Boolean = False + 'new 0.0.7 content + Public boughtskinloader As Boolean = False + Public boughtminimizebutton As Boolean = False + Public boughtpanelbuttons As Boolean = False + Public boughtshiftpanelbuttons As Boolean = False + Public boughtartpad As Boolean = False + Public boughtalartpad As Boolean = False + Public boughtartpadicon As Boolean = False + Public boughtskinning As Boolean = False + Public boughtminimizecommand As Boolean = False + Public boughtusefulpanelbuttons As Boolean = False + Public boughtunitymode As Boolean = False + Public boughtartpadpixellimit4 As Boolean = False + Public boughtartpadpixellimit8 As Boolean = False + Public boughtartpadpixellimit16 As Boolean = False + Public boughtartpadpixellimit64 As Boolean = False + Public boughtartpadpixellimit256 As Boolean = False + Public boughtartpadpixellimit1024 As Boolean = False + Public boughtartpadpixellimit4096 As Boolean = False + Public boughtartpadpixellimit16384 As Boolean = False + Public boughtartpadpixellimit65536 As Boolean = False + Public boughtartpadlimitlesspixels As Boolean = False + Public boughtartpad4colorpallets As Boolean = False + Public boughtartpad8colorpallets As Boolean = False + Public boughtartpad16colorpallets As Boolean = False + Public boughtartpad32colorpallets As Boolean = False + Public boughtartpad64colorpallets As Boolean = False + Public boughtartpad128colorpallets As Boolean = False + Public boughtartpadcustompallets As Boolean = False + Public boughtartpadnew As Boolean = False + Public boughtartpadpixelplacer As Boolean = False + Public boughtartpadpixelplacermovementmode As Boolean = False + Public boughtartpadpencil As Boolean = False + Public boughtartpadpaintbrush As Boolean = False + Public boughtartpadlinetool As Boolean = False + Public boughtartpadovaltool As Boolean = False + Public boughtartpadrectangletool As Boolean = False + Public boughtartpaderaser As Boolean = False + Public boughtartpadfilltool As Boolean = False + Public boughtartpadtexttool As Boolean = False + Public boughtartpadundo As Boolean = False + Public boughtartpadredo As Boolean = False + Public boughtartpadsave As Boolean = False + Public boughtartpadload As Boolean = False + 'new 0.0.8 features + Public boughtresizablewindows As Boolean = False + Public boughtcalculator As Boolean = False + Public boughtaudioplayer As Boolean = False + Public boughtchangeosnamecommand As Boolean = False + Public boughtwebbrowser As Boolean = False + Public boughtvideoplayer As Boolean = False + Public boughtnamechanger As Boolean = False + Public boughticonmanager As Boolean = False + Public boughtbitnotewallet As Boolean = False + Public boughtbitnotedigger As Boolean = False + Public boughtskinshifter As Boolean = False + Public boughtshiftnet As Boolean = False + Public boughtdownloader As Boolean = False + Public boughtshiftneticon As Boolean = False + Public boughtalshiftnet As Boolean = False + Public boughtdodge As Boolean = False + Public boughtdownloadmanager As Boolean = False + Public boughtinstaller As Boolean = False + Public boughtsnakey As Boolean = False + Public boughtsysinfoicon As Boolean = False + Public boughtorcwrite As Boolean = False + Public boughtfloodgate As Boolean = False + Public boughtmaze As Boolean = False + Public boughtunitymodetoggle As Boolean = False + Public boughtunitytoggleicon As Boolean = False + Public bitnotediggergrade As Integer = 0 + Public boughtvirusscannericon As Boolean = False + Public virusscannergrade As Integer = 0 + Public boughttextpadtrm As Boolean = False + Public boughtshiftapplauncheritems As Boolean = False + Public boughtadvapplauncher As Boolean = False + + + + 'Apps bought through shiftnet + Public installedcalculator As Boolean = False + Public installedaudioplayer As Boolean = False + Public installedwebbrowser As Boolean = False + Public installedvideoplayer As Boolean = False + Public installeddodge As Boolean = False + Public installedsnakey As Boolean = False + Public installedsysinfo As Boolean = False + Public installedorcwrite As Boolean = False + Public installedfloodgate As Boolean = False + Public installedfloodgatenow As Boolean = False + Public installedmaze As Boolean = False + Public installedvirusscanner As Boolean = False + + 'new 0.0.9 features + Public boughtskinstates As Boolean = False + Public boughtdesktopicons As Boolean = False + + 'Colour Picker Memories + Public anymemory(15) As Color + Public graymemory(15) As Color + Public purplememory(15) As Color + Public bluememory(15) As Color + Public greenmemory(15) As Color + Public yellowmemory(15) As Color + Public orangememory(15) As Color + Public brownmemory(15) As Color + Public redmemory(15) As Color + Public pinkmemory(15) As Color + + 'ShiftOS UI Settings + Public titlebarcolour As Color = Color.Gray + Public windowbordercolour As Color = Color.Gray + Public windowbordersize As Integer = 2 + Public titlebarheight As Integer = 30 + Public closebuttoncolour As Color = Color.Black + Public closebuttonheight As Integer = 22 + Public closebuttonwidth As Integer = 22 + Public closebuttonside As Integer = 5 + Public closebuttontop As Integer = 4 + Public titletextcolour As Color = Color.White + Public titletexttop As Integer = 7 + Public titletextside As Integer = 4 + Public titletextsize As Integer = 11 + Public titletextfont As String = "Felix Titling" + Public titletextstyle As FontStyle = FontStyle.Bold + Public desktoppanelcolour As Color = Color.Gray + Public desktopbackgroundcolour As Color = Color.Black + Public desktoppanelheight As Integer = 24 + Public desktoppanelposition As String = "Top" + Public clocktextcolour As Color = Color.Black + Public clockbackgroundcolor As Color = Color.Gray + Public panelclocktexttop As Integer = 0 + Public panelclocktextsize As Integer = 14 + Public panelclocktextfont As String = "Trebuchet MS" + Public panelclocktextstyle As FontStyle = FontStyle.Regular + Public applauncherbuttoncolour As Color = Color.Gray + Public applauncherbuttonclickedcolour = Color.Gray + Public applauncherbackgroundcolour As Color = Color.Gray + Public applaunchermouseovercolour As Color = Color.Gray + Public applicationsbuttontextcolour As Color = Color.Black + Public applicationbuttonheight As Integer = 24 + Public applicationbuttontextsize As Integer = 10 + Public applicationbuttontextfont As String = "Byington" + Public applicationbuttontextstyle As FontStyle = FontStyle.Bold + Public applicationlaunchername As String = "Applications" + Public titletextposition As String = "Left" + Public rollupbuttoncolour As Color = Color.Black + Public rollupbuttonheight As Integer = 22 + Public rollupbuttonwidth As Integer = 22 + Public rollupbuttonside As Integer = 32 + Public rollupbuttontop As Integer = 4 + 'new 0.0.7 + Public titlebariconside As Integer = 8 + Public titlebaricontop As Integer = 8 + Public showwindowcorners As Boolean = False + Public titlebarcornerwidth As Integer = 2 + Public titlebarrightcornercolour As Color = Color.White + Public titlebarleftcornercolour As Color = Color.White + Public applaunchermenuholderwidth As Integer = 100 + Public windowborderleftcolour As Color = Color.Gray + Public windowborderrightcolour As Color = Color.Gray + Public windowborderbottomcolour As Color = Color.Gray + Public windowborderbottomrightcolour As Color = Color.Gray + Public windowborderbottomleftcolour As Color = Color.Gray + Public fileopenerlastdirectory As String + Public panelbuttonicontop As Integer = 3 + Public panelbuttoniconside As Integer = 4 + 'Public panelbuttoniconsize As Integer = 16 'duplicated + 'Public panelbuttoniconsize As Integer = 16 'duplicated + Public panelbuttonheight As Integer = 22 + Public panelbuttonwidth As Integer = 186 + Public panelbuttoncolour As Color = Color.Black + Public panelbuttontextcolour As Color = Color.White + Public panelbuttontextsize As Integer = 10 + Public panelbuttontextfont As String = "Microsoft Sans Serif" + Public panelbuttontextstyle As FontStyle = FontStyle.Bold + Public panelbuttontextside As Integer = 22 + Public panelbuttontexttop As Integer = 2 + Public panelbuttongap As Integer = 1 + Public panelbuttonfromtop As Integer = 1 + Public panelbuttoninitialgap As Integer = 5 + Public minimizebuttoncolour As Color = Color.Black + Public minimizebuttonheight As Integer = 22 + Public minimizebuttonwidth As Integer = 22 + Public minimizebuttonside As Integer = 59 + Public minimizebuttontop As Integer = 4 + + + 'ShiftOS Skin Settings + 'finsih up checking for skin changes with states in the clock app before copying across to other apps + Public globaltransparencycolour As Color = Color.FromArgb(1, 0, 1) + 'Public skinimages(100) As String + 'Public skinclosebutton(2) As Image + 'Public skinclosebuttonstyle As ImageLayout = ImageLayout.Stretch + 'Public skintitlebar(2) As Image + 'Public skintitlebarstyle As ImageLayout = ImageLayout.Stretch + 'Public skindesktopbackground(2) As Image + 'Public skindesktopbackgroundstyle As ImageLayout = ImageLayout.Stretch + 'Public skinrollupbutton(2) As Image + 'Public skinrollupbuttonstyle As ImageLayout = ImageLayout.Stretch + 'Public skintitlebarrightcorner(2) As Image + 'Public skintitlebarrightcornerstyle As ImageLayout = ImageLayout.Stretch + 'Public skintitlebarleftcorner(2) As Image + 'Public skintitlebarleftcornerstyle As ImageLayout = ImageLayout.Stretch + 'Public skindesktoppanel(2) As Image + 'Public skindesktoppanelstyle As ImageLayout = ImageLayout.Stretch + 'Public skindesktoppaneltime(2) As Image + 'Public skindesktoppaneltimestyle As ImageLayout = ImageLayout.Stretch + 'Public skinapplauncherbutton(2) As Image + 'Public skinapplauncherbuttonstyle As ImageLayout = ImageLayout.Stretch + 'Public skinwindowborderleft(2) As Image + 'Public skinwindowborderleftstyle As ImageLayout = ImageLayout.Stretch + 'Public skinwindowborderright(2) As Image + 'Public skinwindowborderrightstyle As ImageLayout = ImageLayout.Stretch + 'Public skinwindowborderbottom(2) As Image + 'Public skinwindowborderbottomstyle As ImageLayout = ImageLayout.Stretch + 'Public skinwindowborderbottomright(2) As Image + 'Public skinwindowborderbottomrightstyle As ImageLayout = ImageLayout.Stretch + 'Public skinwindowborderbottomleft(2) As Image + 'Public skinwindowborderbottomleftstyle As ImageLayout = ImageLayout.Stretch + 'Public skinpanelbutton(2) As Image + 'Public skinpanelbuttonstyle As ImageLayout = ImageLayout.Stretch + 'Public skinminimizebutton(2) As Image + 'Public skinminimizebuttonstyle As ImageLayout = ImageLayout.Stretch + + 'Program settings + Public artpadcolorpalletwidth As Integer = 105 + Public artpadcolorpalletheight As Integer = 69 + Public artpadcolorpalletsidegap As Integer = 4 + Public artpadcolorpallettopgap As Integer = 4 + Public artpadvisiblepallets As Integer = 2 + Public artpadpixellimit As Integer = 2 + Public artpadcolourpallets(128) As Color + + Public webbrowserhomepage As String = "www.google.com" + + Public iconmanagericondatalines(50) As String + + Public bitnotebalance As Decimal = 0.0 + Public bitnotebalanceappscape As Decimal = 0.0 + Public bitnoteaddress As String = "1LgZUWQNYWZ7Qhc1hScZieC3GWnPLzaqSd" + Public bitnoteaddressappscape As String = "1JB97iocfdv6zVMeKxXAHdahbfdoYWNyUh" + Public bitnoteaddressshiftomizer As String = "Gu603g4348UhBJcnDEc3YIwph" + Public bitnotebalanceminimatch As Decimal = 0.0 + + Public downloadmanagerhistory As String + + Public downloadspeedcap As Integer = 32 + + 'Main ShiftOS settings + Public catalystname As String = "Catalyst" + Public username As String = "user" + Public osname As String = "shiftos" + Public artpadname As String = "Artpad" + Public audioplayername As String = "Audio Player" + Public calculatorname As String = "Calculator" + Public clockname As String = "Clock" + Public colourpickername As String = "Colour Picker" + Public fileopenername As String = "File Opener" + Public filesavername As String = "File Saver" + Public fileskimmername As String = "File Skimmer" + Public graphicpickername As String = "Graphic Picker" + Public knowledgeinputname As String = "Knowledge Input" + Public pongname As String = "Pong" + Public shiftername As String = "Shifter" + Public shiftoriumname As String = "Shiftorium" + Public skinloadername As String = "Skin Loader" + Public terminalname As String = "Terminal" + Public textpadname As String = "TextPad" + Public videoplayername As String = "Video Player" + Public webbrowsername As String = "Web Browser" + Public namechangername As String = "Name Changer" + Public iconmanagername As String = "Icon Manager" + Public bitnotewalletname As String = "Bitnote Wallet" + Public bitnotediggername As String = "Bitnote Digger" + Public skinshiftername As String = "Skin Shifter" + Public shiftnetname As String = "Shiftnet" + Public downloadername As String = "Downloader" + Public dodgename As String = "Dodge" + Public downloadmanagername As String = "Download Manager" + Public installername As String = "Installer" + Public snakeyname As String = "Snakey" + Public sysinfoname As String = "System Information" + Public orcwritename As String = "OrcWrite" + Public floodgatename As String = "FloodGate Manager" + Public mazename As String = "Labyrinth" + Public virusscannername As String = "Virus Scanner" + + 'Icons + Public titlebariconsize As Integer = 16 + Public panelbuttoniconsize As Integer = 16 + Public launchericonsize As Integer = 16 + + Public artpadicontitlebar As Image = My.Resources.iconArtpad + Public audioplayericontitlebar As Image = My.Resources.iconAudioPlayer + Public calculatoricontitlebar As Image = My.Resources.iconCalculator + Public clockicontitlebar As Image = My.Resources.iconClock + Public colourpickericontitlebar As Image = My.Resources.iconColourPicker + Public fileopenericontitlebar As Image = My.Resources.iconFileOpener + Public filesavericontitlebar As Image = My.Resources.iconFileSaver + Public fileskimmericontitlebar As Image = My.Resources.iconFileSkimmer + Public graphicpickericontitlebar As Image = My.Resources.iconGraphicPicker + Public infoboxicontitlebar As Image = My.Resources.iconInfoBox + Public knowledgeinputicontitlebar As Image = My.Resources.iconKnowledgeInput + Public pongicontitlebar As Image = My.Resources.iconPong + Public shiftericontitlebar As Image = My.Resources.iconShifter + Public shiftoriumicontitlebar As Image = My.Resources.iconShiftorium + Public skinloadericontitlebar As Image = My.Resources.iconSkinLoader + Public terminalicontitlebar As Image = My.Resources.iconTerminal + Public textpadicontitlebar As Image = My.Resources.iconTextPad + Public videoplayericontitlebar As Image = My.Resources.iconVideoPlayer + Public webbrowsericontitlebar As Image = My.Resources.iconWebBrowser + Public namechangericontitlebar As Image = My.Resources.iconNameChanger + Public iconmanagericontitlebar As Image = My.Resources.iconIconManager + Public bitnotewalleticontitlebar As Image = My.Resources.iconBitnoteWallet + Public bitnotediggericontitlebar As Image = My.Resources.iconBitnoteDigger + Public skinshiftericontitlebar As Image = My.Resources.iconSkinShifter + Public shiftneticontitlebar As Image = My.Resources.iconShiftnet + Public downloadericontitlebar As Image = My.Resources.iconDownloader + Public dodgeicontitlebar As Image = My.Resources.iconDodge + Public downloadmanagericontitlebar As Image = My.Resources.icondownloadmanager + Public installericontitlebar As Image = My.Resources.iconinstaller + Public snakeyicontitlebar As Image = My.Resources.iconSnakey + Public sysinfoicontitlebar As Image = My.Resources.iconSysinfo + Public orcwriteicontitlebar As Image = My.Resources.iconorcwrite + Public floodgateicontitlebar As Image = My.Resources.iconfloodgate + Public mazeicontitlebar As Image = My.Resources.iconmaze + Public virusscannericontitlebar As Image = My.Resources.iconvirusscanner + + Public artpadiconpanelbutton As Image = My.Resources.iconArtpad + Public audioplayericonpanelbutton As Image = My.Resources.iconAudioPlayer + Public calculatoriconpanelbutton As Image = My.Resources.iconCalculator + Public clockiconpanelbutton As Image = My.Resources.iconClock + Public colourpickericonpanelbutton As Image = My.Resources.iconColourPicker + Public fileopenericonpanelbutton As Image = My.Resources.iconFileOpener + Public filesavericonpanelbutton As Image = My.Resources.iconFileSaver + Public fileskimmericonpanelbutton As Image = My.Resources.iconFileSkimmer + Public graphicpickericonpanelbutton As Image = My.Resources.iconGraphicPicker + Public infoboxiconpanelbutton As Image = My.Resources.iconInfoBox + Public knowledgeinputiconpanelbutton As Image = My.Resources.iconKnowledgeInput + Public pongiconpanelbutton As Image = My.Resources.iconPong + Public shiftericonpanelbutton As Image = My.Resources.iconShifter + Public shiftoriumiconpanelbutton As Image = My.Resources.iconShiftorium + Public skinloadericonpanelbutton As Image = My.Resources.iconSkinLoader + Public terminaliconpanelbutton As Image = My.Resources.iconTerminal + Public textpadiconpanelbutton As Image = My.Resources.iconTextPad + Public videoplayericonpanelbutton As Image = My.Resources.iconVideoPlayer + Public webbrowsericonpanelbutton As Image = My.Resources.iconWebBrowser + Public namechangericonpanelbutton As Image = My.Resources.iconNameChanger + Public iconmanagericonpanelbutton As Image = My.Resources.iconIconManager + Public bitnotewalleticonpanelbutton As Image = My.Resources.iconBitnoteWallet + Public bitnotediggericonpanelbutton As Image = My.Resources.iconBitnoteDigger + Public skinshiftericonpanelbutton As Image = My.Resources.iconSkinShifter + Public shiftneticonpanelbutton As Image = My.Resources.iconShiftnet + Public downloadericonpanelbutton As Image = My.Resources.iconDownloader + Public dodgeiconpanelbutton As Image = My.Resources.iconDodge + Public downloadmanagericonpanelbutton As Image = My.Resources.icondownloadmanager + Public installericonpanelbutton As Image = My.Resources.iconinstaller + Public snakeyiconpanelbutton As Image = My.Resources.iconSnakey + Public sysinfoiconpanelbutton As Image = My.Resources.iconSysinfo + Public orcwriteiconpanelbutton As Image = My.Resources.iconorcwrite + Public floodgateiconpanelbutton As Image = My.Resources.iconfloodgate + Public mazeiconpanelbutton As Image = My.Resources.iconmaze + Public virusscannericonpanelbutton As Image = My.Resources.iconvirusscanner + + Public artpadiconlauncher As Image = My.Resources.iconArtpad + Public audioplayericonlauncher As Image = My.Resources.iconAudioPlayer + Public calculatoriconlauncher As Image = My.Resources.iconCalculator + Public clockiconlauncher As Image = My.Resources.iconClock + Public colourpickericonlauncher As Image = My.Resources.iconColourPicker + Public fileopenericonlauncher As Image = My.Resources.iconFileOpener + Public filesavericonlauncher As Image = My.Resources.iconFileSaver + Public fileskimmericonlauncher As Image = My.Resources.iconFileSkimmer + Public graphicpickericonlauncher As Image = My.Resources.iconGraphicPicker + Public infoboxiconlauncher As Image = My.Resources.iconInfoBox + Public knowledgeinputiconlauncher As Image = My.Resources.iconKnowledgeInput + Public pongiconlauncher As Image = My.Resources.iconPong + Public shiftericonlauncher As Image = My.Resources.iconShifter + Public shiftoriumiconlauncher As Image = My.Resources.iconShiftorium + Public skinloadericonlauncher As Image = My.Resources.iconSkinLoader + Public terminaliconlauncher As Image = My.Resources.iconTerminal + Public textpadiconlauncher As Image = My.Resources.iconTextPad + Public videoplayericonlauncher As Image = My.Resources.iconVideoPlayer + Public webbrowsericonlauncher As Image = My.Resources.iconWebBrowser + Public namechangericonlauncher As Image = My.Resources.iconNameChanger + Public iconmanagericonlauncher As Image = My.Resources.iconIconManager + Public bitnotewalleticonlauncher As Image = My.Resources.iconBitnoteWallet + Public bitnotediggericonlauncher As Image = My.Resources.iconBitnoteDigger + Public skinshiftericonlauncher As Image = My.Resources.iconSkinShifter + Public shiftneticonlauncher As Image = My.Resources.iconShiftnet + Public downloadericonlauncher As Image = My.Resources.iconDownloader + Public dodgeiconlauncher As Image = My.Resources.iconDodge + Public downloadmanagericonlauncher As Image = My.Resources.icondownloadmanager + Public installericonlauncher As Image = My.Resources.iconinstaller + Public snakeyiconlauncher As Image = My.Resources.iconSnakey + Public sysinfoiconlauncher As Image = My.Resources.iconSysinfo + Public orcwriteiconlauncher As Image = My.Resources.iconorcwrite + Public floodgateiconlauncher As Image = My.Resources.iconfloodgate + Public mazeiconlauncher As Image = My.Resources.iconmaze + Public virusscannericonlauncher As Image = My.Resources.iconvirusscanner + + Public shutdowniconlauncher As Image = My.Resources.iconshutdown + Public unitytoggleiconlauncher As Image = My.Resources.iconunitytoggle + + 'Required for encryption of save files + Private Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Integer) As Integer + Public Const sSecretKey As String = "Password" + + 'When adding a new program you need to do the following: + 'Copy over Template and Template Code + 'Make program upmost/alway on top + 'Add the panelbutton + 'Add Open and Close command in terminal as well as info and commands such as move to + 'Add desktop launcher menu item + 'Add buy from shiftorium and lanucher buy from shiftorium + 'Add to all ShiftOSDesktop.vb things + + Public Sub savegame() + If boughttitlebar = True Then savelines(0) = 11 Else savelines(0) = 10 + If boughtgray = True Then savelines(1) = 11 Else savelines(1) = 10 + If boughtsecondspastmidnight = True Then savelines(2) = 11 Else savelines(2) = 10 + If boughtminutespastmidnight = True Then savelines(3) = 11 Else savelines(3) = 10 + If boughthourspastmidnight = True Then savelines(4) = 11 Else savelines(4) = 10 + If boughtcustomusername = True Then savelines(5) = 11 Else savelines(5) = 10 + If boughtwindowsanywhere = True Then savelines(6) = 11 Else savelines(6) = 10 + If boughtmultitasking = True Then savelines(7) = 11 Else savelines(7) = 10 + If boughtautoscrollterminal = True Then savelines(8) = 11 Else savelines(8) = 10 + savelines(9) = codepoints + If boughtmovablewindows = True Then savelines(10) = 11 Else savelines(10) = 10 + If boughtdraggablewindows = True Then savelines(11) = 11 Else savelines(11) = 10 + If boughtwindowborders = True Then savelines(12) = 11 Else savelines(12) = 10 + If boughtpmandam = True Then savelines(13) = 11 Else savelines(13) = 10 + If boughtminuteaccuracytime = True Then savelines(14) = 11 Else savelines(14) = 10 + If boughtsplitsecondtime = True Then savelines(15) = 11 Else savelines(15) = 10 + If boughttitletext = True Then savelines(16) = 11 Else savelines(16) = 10 + If boughtclosebutton = True Then savelines(17) = 11 Else savelines(17) = 10 + If boughtdesktoppanel = True Then savelines(18) = 11 Else savelines(18) = 10 + If boughtclock = True Then savelines(19) = 11 Else savelines(19) = 10 + If boughtwindowedterminal = True Then savelines(20) = 11 Else savelines(20) = 10 + If boughtapplaunchermenu = True Then savelines(21) = 11 Else savelines(21) = 10 + If boughtalknowledgeinput = True Then savelines(22) = 11 Else savelines(22) = 10 + If boughtalclock = True Then savelines(23) = 11 Else savelines(23) = 10 + If boughtalshiftorium = True Then savelines(24) = 11 Else savelines(24) = 10 + If boughtapplaunchershutdown = True Then savelines(25) = 11 Else savelines(25) = 10 + If boughtdesktoppanelclock = True Then savelines(26) = 11 Else savelines(26) = 10 + If boughtterminalscrollbar = True Then savelines(27) = 11 Else savelines(27) = 10 + If boughtkiaddons = True Then savelines(28) = 11 Else savelines(28) = 10 + If boughtkicarbrands = True Then savelines(29) = 11 Else savelines(29) = 10 + If boughtkigameconsoles = True Then savelines(30) = 11 Else savelines(30) = 10 + savelines(31) = username + If terminalfullscreen = True Then savelines(32) = 11 Else savelines(32) = 10 + If boughtshifter = True Then savelines(33) = 11 Else savelines(33) = 10 + If boughtalshifter = True Then savelines(34) = 11 Else savelines(34) = 10 + If boughtrollupcommand = True Then savelines(35) = 11 Else savelines(35) = 10 + If boughtrollupbutton = True Then savelines(36) = 11 Else savelines(36) = 10 + If boughtshiftdesktop = True Then savelines(37) = 11 Else savelines(37) = 10 + If boughtshiftpanelclock = True Then savelines(38) = 11 Else savelines(38) = 10 + If boughtshiftapplauncher = True Then savelines(39) = 11 Else savelines(39) = 10 + If boughtshiftdesktoppanel = True Then savelines(40) = 11 Else savelines(40) = 10 + If boughtshifttitlebar = True Then savelines(41) = 11 Else savelines(41) = 10 + If boughtshifttitletext = True Then savelines(42) = 11 Else savelines(42) = 10 + If boughtshifttitlebuttons = True Then savelines(43) = 11 Else savelines(43) = 10 + If boughtshiftborders = True Then savelines(44) = 11 Else savelines(44) = 10 + If boughtgray2 = True Then savelines(45) = 11 Else savelines(45) = 10 + If boughtgray3 = True Then savelines(46) = 11 Else savelines(46) = 10 + If boughtgray4 = True Then savelines(47) = 11 Else savelines(47) = 10 + If boughtanycolour = True Then savelines(48) = 11 Else savelines(48) = 10 + If boughtanycolour2 = True Then savelines(49) = 11 Else savelines(49) = 10 + If boughtanycolour3 = True Then savelines(50) = 11 Else savelines(50) = 10 + If boughtanycolour4 = True Then savelines(51) = 11 Else savelines(51) = 10 + If boughtpurple = True Then savelines(52) = 11 Else savelines(52) = 10 + If boughtpurple2 = True Then savelines(53) = 11 Else savelines(53) = 10 + If boughtpurple3 = True Then savelines(54) = 11 Else savelines(54) = 10 + If boughtpurple4 = True Then savelines(55) = 11 Else savelines(55) = 10 + If boughtblue = True Then savelines(56) = 11 Else savelines(56) = 10 + If boughtblue2 = True Then savelines(57) = 11 Else savelines(57) = 10 + If boughtblue3 = True Then savelines(58) = 11 Else savelines(58) = 10 + If boughtblue4 = True Then savelines(59) = 11 Else savelines(59) = 10 + If boughtgreen = True Then savelines(60) = 11 Else savelines(60) = 10 + If boughtgreen2 = True Then savelines(61) = 11 Else savelines(61) = 10 + If boughtgreen3 = True Then savelines(62) = 11 Else savelines(62) = 10 + If boughtgreen4 = True Then savelines(63) = 11 Else savelines(63) = 10 + If boughtyellow = True Then savelines(64) = 11 Else savelines(64) = 10 + If boughtyellow2 = True Then savelines(65) = 11 Else savelines(65) = 10 + If boughtyellow3 = True Then savelines(66) = 11 Else savelines(66) = 10 + If boughtyellow4 = True Then savelines(67) = 11 Else savelines(67) = 10 + If boughtorange = True Then savelines(68) = 11 Else savelines(68) = 10 + If boughtorange2 = True Then savelines(69) = 11 Else savelines(69) = 10 + If boughtorange3 = True Then savelines(70) = 11 Else savelines(70) = 10 + If boughtorange4 = True Then savelines(71) = 11 Else savelines(71) = 10 + If boughtbrown = True Then savelines(72) = 11 Else savelines(72) = 10 + If boughtbrown2 = True Then savelines(73) = 11 Else savelines(73) = 10 + If boughtbrown3 = True Then savelines(74) = 11 Else savelines(74) = 10 + If boughtbrown4 = True Then savelines(75) = 11 Else savelines(75) = 10 + If boughtred = True Then savelines(76) = 11 Else savelines(76) = 10 + If boughtred2 = True Then savelines(77) = 11 Else savelines(77) = 10 + If boughtred3 = True Then savelines(78) = 11 Else savelines(78) = 10 + If boughtred4 = True Then savelines(79) = 11 Else savelines(79) = 10 + If boughtpink = True Then savelines(80) = 11 Else savelines(80) = 10 + If boughtpink2 = True Then savelines(81) = 11 Else savelines(81) = 10 + If boughtpink3 = True Then savelines(82) = 11 Else savelines(82) = 10 + If boughtpink4 = True Then savelines(83) = 11 Else savelines(83) = 10 + savelines(84) = anymemory(0).ToArgb + savelines(85) = anymemory(1).ToArgb + savelines(86) = anymemory(2).ToArgb + savelines(87) = anymemory(3).ToArgb + savelines(88) = anymemory(4).ToArgb + savelines(89) = anymemory(5).ToArgb + savelines(90) = anymemory(6).ToArgb + savelines(91) = anymemory(7).ToArgb + savelines(92) = anymemory(8).ToArgb + savelines(93) = anymemory(9).ToArgb + savelines(94) = anymemory(10).ToArgb + savelines(95) = anymemory(11).ToArgb + savelines(96) = anymemory(12).ToArgb + savelines(97) = anymemory(13).ToArgb + savelines(98) = anymemory(14).ToArgb + savelines(99) = anymemory(15).ToArgb + savelines(100) = graymemory(0).ToArgb + savelines(101) = graymemory(1).ToArgb + savelines(102) = graymemory(2).ToArgb + savelines(103) = graymemory(3).ToArgb + savelines(104) = graymemory(4).ToArgb + savelines(105) = graymemory(5).ToArgb + savelines(106) = graymemory(6).ToArgb + savelines(107) = graymemory(7).ToArgb + savelines(108) = graymemory(8).ToArgb + savelines(109) = graymemory(9).ToArgb + savelines(110) = graymemory(10).ToArgb + savelines(111) = graymemory(11).ToArgb + savelines(112) = graymemory(12).ToArgb + savelines(113) = graymemory(13).ToArgb + savelines(114) = graymemory(14).ToArgb + savelines(115) = graymemory(15).ToArgb + savelines(116) = purplememory(0).ToArgb + savelines(117) = purplememory(1).ToArgb + savelines(118) = purplememory(2).ToArgb + savelines(119) = purplememory(3).ToArgb + savelines(120) = purplememory(4).ToArgb + savelines(121) = purplememory(5).ToArgb + savelines(122) = purplememory(6).ToArgb + savelines(123) = purplememory(7).ToArgb + savelines(124) = purplememory(8).ToArgb + savelines(125) = purplememory(9).ToArgb + savelines(126) = purplememory(10).ToArgb + savelines(127) = purplememory(11).ToArgb + savelines(128) = purplememory(12).ToArgb + savelines(129) = purplememory(13).ToArgb + savelines(130) = purplememory(14).ToArgb + savelines(131) = purplememory(15).ToArgb + savelines(132) = bluememory(0).ToArgb + savelines(133) = bluememory(1).ToArgb + savelines(134) = bluememory(2).ToArgb + savelines(135) = bluememory(3).ToArgb + savelines(136) = bluememory(4).ToArgb + savelines(137) = bluememory(5).ToArgb + savelines(138) = bluememory(6).ToArgb + savelines(139) = bluememory(7).ToArgb + savelines(140) = bluememory(8).ToArgb + savelines(141) = bluememory(9).ToArgb + savelines(142) = bluememory(10).ToArgb + savelines(143) = bluememory(11).ToArgb + savelines(144) = bluememory(12).ToArgb + savelines(145) = bluememory(13).ToArgb + savelines(146) = bluememory(14).ToArgb + savelines(147) = bluememory(15).ToArgb + savelines(148) = greenmemory(0).ToArgb + savelines(149) = greenmemory(1).ToArgb + savelines(150) = greenmemory(2).ToArgb + savelines(151) = greenmemory(3).ToArgb + savelines(152) = greenmemory(4).ToArgb + savelines(153) = greenmemory(5).ToArgb + savelines(154) = greenmemory(6).ToArgb + savelines(155) = greenmemory(7).ToArgb + savelines(156) = greenmemory(8).ToArgb + savelines(157) = greenmemory(9).ToArgb + savelines(158) = greenmemory(10).ToArgb + savelines(159) = greenmemory(11).ToArgb + savelines(160) = greenmemory(12).ToArgb + savelines(161) = greenmemory(13).ToArgb + savelines(162) = greenmemory(14).ToArgb + savelines(163) = greenmemory(15).ToArgb + savelines(164) = yellowmemory(0).ToArgb + savelines(165) = yellowmemory(1).ToArgb + savelines(166) = yellowmemory(2).ToArgb + savelines(167) = yellowmemory(3).ToArgb + savelines(168) = yellowmemory(4).ToArgb + savelines(169) = yellowmemory(5).ToArgb + savelines(170) = yellowmemory(6).ToArgb + savelines(171) = yellowmemory(7).ToArgb + savelines(172) = yellowmemory(8).ToArgb + savelines(173) = yellowmemory(9).ToArgb + savelines(174) = yellowmemory(10).ToArgb + savelines(175) = yellowmemory(11).ToArgb + savelines(176) = yellowmemory(12).ToArgb + savelines(177) = yellowmemory(13).ToArgb + savelines(178) = yellowmemory(14).ToArgb + savelines(179) = yellowmemory(15).ToArgb + savelines(180) = orangememory(0).ToArgb + savelines(181) = orangememory(1).ToArgb + savelines(182) = orangememory(2).ToArgb + savelines(183) = orangememory(3).ToArgb + savelines(184) = orangememory(4).ToArgb + savelines(185) = orangememory(5).ToArgb + savelines(186) = orangememory(6).ToArgb + savelines(187) = orangememory(7).ToArgb + savelines(188) = orangememory(8).ToArgb + savelines(189) = orangememory(9).ToArgb + savelines(190) = orangememory(10).ToArgb + savelines(191) = orangememory(11).ToArgb + savelines(192) = orangememory(12).ToArgb + savelines(193) = orangememory(13).ToArgb + savelines(194) = orangememory(14).ToArgb + savelines(195) = orangememory(15).ToArgb + savelines(196) = brownmemory(0).ToArgb + savelines(197) = brownmemory(1).ToArgb + savelines(198) = brownmemory(2).ToArgb + savelines(199) = brownmemory(3).ToArgb + savelines(200) = brownmemory(4).ToArgb + savelines(201) = brownmemory(5).ToArgb + savelines(202) = brownmemory(6).ToArgb + savelines(203) = brownmemory(7).ToArgb + savelines(204) = brownmemory(8).ToArgb + savelines(205) = brownmemory(9).ToArgb + savelines(206) = brownmemory(10).ToArgb + savelines(207) = brownmemory(11).ToArgb + savelines(208) = brownmemory(12).ToArgb + savelines(209) = brownmemory(13).ToArgb + savelines(210) = brownmemory(14).ToArgb + savelines(211) = brownmemory(15).ToArgb + savelines(212) = redmemory(0).ToArgb + savelines(213) = redmemory(1).ToArgb + savelines(214) = redmemory(2).ToArgb + savelines(215) = redmemory(3).ToArgb + savelines(216) = redmemory(4).ToArgb + savelines(217) = redmemory(5).ToArgb + savelines(218) = redmemory(6).ToArgb + savelines(219) = redmemory(7).ToArgb + savelines(220) = redmemory(8).ToArgb + savelines(221) = redmemory(9).ToArgb + savelines(222) = redmemory(10).ToArgb + savelines(223) = redmemory(11).ToArgb + savelines(224) = redmemory(12).ToArgb + savelines(225) = redmemory(13).ToArgb + savelines(226) = redmemory(14).ToArgb + savelines(227) = redmemory(15).ToArgb + savelines(228) = pinkmemory(0).ToArgb + savelines(229) = pinkmemory(1).ToArgb + savelines(230) = pinkmemory(2).ToArgb + savelines(231) = pinkmemory(3).ToArgb + savelines(232) = pinkmemory(4).ToArgb + savelines(233) = pinkmemory(5).ToArgb + savelines(234) = pinkmemory(6).ToArgb + savelines(235) = pinkmemory(7).ToArgb + savelines(236) = pinkmemory(8).ToArgb + savelines(237) = pinkmemory(9).ToArgb + savelines(238) = pinkmemory(10).ToArgb + savelines(239) = pinkmemory(11).ToArgb + savelines(240) = pinkmemory(12).ToArgb + savelines(241) = pinkmemory(13).ToArgb + savelines(242) = pinkmemory(14).ToArgb + savelines(243) = pinkmemory(15).ToArgb + savelines(244) = titlebarcolour.ToArgb + savelines(245) = windowbordercolour.ToArgb + savelines(246) = windowbordersize + savelines(247) = titlebarheight + savelines(248) = closebuttoncolour.ToArgb + savelines(249) = closebuttonheight + savelines(250) = closebuttonwidth + savelines(251) = closebuttonside + savelines(252) = closebuttontop + savelines(253) = titletextcolour.ToArgb + savelines(254) = titletexttop + savelines(255) = titletextside + savelines(256) = titletextsize + savelines(257) = titletextfont + savelines(258) = titletextstyle + savelines(259) = desktoppanelcolour.ToArgb + savelines(260) = desktopbackgroundcolour.ToArgb + savelines(261) = desktoppanelheight + savelines(262) = desktoppanelposition + savelines(263) = clocktextcolour.ToArgb + savelines(264) = clockbackgroundcolor.ToArgb + savelines(265) = panelclocktexttop + savelines(266) = panelclocktextsize + savelines(267) = panelclocktextfont + savelines(268) = panelclocktextstyle + savelines(269) = applauncherbuttoncolour.ToArgb + savelines(270) = applauncherbuttonclickedcolour.ToArgb + savelines(271) = applauncherbackgroundcolour.ToArgb + savelines(272) = applaunchermouseovercolour.ToArgb + savelines(273) = applicationsbuttontextcolour.ToArgb + savelines(274) = applicationbuttonheight + savelines(275) = applicationbuttontextsize + savelines(276) = applicationbuttontextfont + savelines(277) = applicationbuttontextstyle + savelines(278) = applicationlaunchername + savelines(279) = titletextposition + savelines(280) = rollupbuttoncolour.ToArgb + savelines(281) = rollupbuttonheight + savelines(282) = rollupbuttonwidth + savelines(283) = rollupbuttonside + savelines(284) = rollupbuttontop + If boughtpong = True Then savelines(285) = 11 Else savelines(285) = 10 + If boughtknowledgeinputicon = True Then savelines(286) = 11 Else savelines(286) = 10 + If boughtshiftericon = True Then savelines(287) = 11 Else savelines(287) = 10 + If boughtshiftoriumicon = True Then savelines(288) = 11 Else savelines(288) = 10 + If boughtclockicon = True Then savelines(289) = 11 Else savelines(289) = 10 + If boughtshutdownicon = True Then savelines(290) = 11 Else savelines(290) = 10 + If boughtpongicon = True Then savelines(291) = 11 Else savelines(291) = 10 + If boughtterminalicon = True Then savelines(292) = 11 Else savelines(292) = 10 + If boughtalpong = True Then savelines(293) = 11 Else savelines(293) = 10 + If boughtfileskimmer = True Then savelines(294) = 11 Else savelines(294) = 10 + If boughtalfileskimmer = True Then savelines(295) = 11 Else savelines(295) = 10 + If boughttextpad = True Then savelines(296) = 11 Else savelines(296) = 10 + If boughtaltextpad = True Then savelines(297) = 11 Else savelines(297) = 10 + If boughtfileskimmericon = True Then savelines(298) = 11 Else savelines(298) = 10 + If boughttextpadicon = True Then savelines(299) = 11 Else savelines(299) = 10 + If boughttextpadnew = True Then savelines(300) = 11 Else savelines(300) = 10 + If boughttextpadsave = True Then savelines(301) = 11 Else savelines(301) = 10 + If boughttextpadopen = True Then savelines(302) = 11 Else savelines(302) = 10 + If boughtfileskimmernewfolder = True Then savelines(303) = 11 Else savelines(303) = 10 + If boughtfileskimmerdelete = True Then savelines(304) = 11 Else savelines(304) = 10 + If boughtkielements = True Then savelines(305) = 11 Else savelines(305) = 10 + If boughtcolourpickericon = True Then savelines(306) = 11 Else savelines(306) = 10 + If boughtinfoboxicon = True Then savelines(307) = 11 Else savelines(307) = 10 + savelines(308) = artpadcolorpalletwidth + savelines(309) = artpadcolorpalletheight + savelines(310) = artpadcolorpalletsidegap + savelines(311) = artpadcolorpallettopgap + savelines(312) = artpadvisiblepallets + savelines(313) = artpadpixellimit + If boughtskinloader = True Then savelines(314) = 11 Else savelines(314) = 10 + If boughtminimizebutton = True Then savelines(315) = 11 Else savelines(315) = 10 + If boughtpanelbuttons = True Then savelines(316) = 11 Else savelines(316) = 10 + If boughtshiftpanelbuttons = True Then savelines(317) = 11 Else savelines(317) = 10 + If boughtartpad = True Then savelines(318) = 11 Else savelines(318) = 10 + If boughtalartpad = True Then savelines(319) = 11 Else savelines(319) = 10 + If boughtartpadicon = True Then savelines(320) = 11 Else savelines(320) = 10 + If boughtskinning = True Then savelines(321) = 11 Else savelines(321) = 10 + If boughtminimizecommand = True Then savelines(322) = 11 Else savelines(322) = 10 + If boughtusefulpanelbuttons = True Then savelines(323) = 11 Else savelines(323) = 10 + If boughtunitymode = True Then savelines(324) = 11 Else savelines(324) = 10 + If boughtartpadpixellimit4 = True Then savelines(325) = 11 Else savelines(325) = 10 + If boughtartpadpixellimit8 = True Then savelines(326) = 11 Else savelines(326) = 10 + If boughtartpadpixellimit16 = True Then savelines(327) = 11 Else savelines(327) = 10 + If boughtartpadpixellimit64 = True Then savelines(328) = 11 Else savelines(328) = 10 + If boughtartpadpixellimit256 = True Then savelines(329) = 11 Else savelines(329) = 10 + If boughtartpadpixellimit1024 = True Then savelines(330) = 11 Else savelines(330) = 10 + If boughtartpadpixellimit4096 = True Then savelines(331) = 11 Else savelines(331) = 10 + If boughtartpadpixellimit16384 = True Then savelines(332) = 11 Else savelines(332) = 10 + If boughtartpadpixellimit65536 = True Then savelines(333) = 11 Else savelines(333) = 10 + If boughtartpadlimitlesspixels = True Then savelines(334) = 11 Else savelines(334) = 10 + If boughtartpad4colorpallets = True Then savelines(335) = 11 Else savelines(335) = 10 + If boughtartpad8colorpallets = True Then savelines(336) = 11 Else savelines(336) = 10 + If boughtartpad16colorpallets = True Then savelines(337) = 11 Else savelines(337) = 10 + If boughtartpad32colorpallets = True Then savelines(338) = 11 Else savelines(338) = 10 + If boughtartpad64colorpallets = True Then savelines(339) = 11 Else savelines(339) = 10 + If boughtartpad128colorpallets = True Then savelines(340) = 11 Else savelines(340) = 10 + If boughtartpadcustompallets = True Then savelines(341) = 11 Else savelines(341) = 10 + If boughtartpadpixelplacer = True Then savelines(342) = 11 Else savelines(342) = 10 + If boughtartpadpixelplacermovementmode = True Then savelines(343) = 11 Else savelines(343) = 10 + If boughtartpadpencil = True Then savelines(344) = 11 Else savelines(344) = 10 + If boughtartpadpaintbrush = True Then savelines(345) = 11 Else savelines(345) = 10 + If boughtartpadlinetool = True Then savelines(346) = 11 Else savelines(346) = 10 + If boughtartpadovaltool = True Then savelines(347) = 11 Else savelines(347) = 10 + If boughtartpadrectangletool = True Then savelines(348) = 11 Else savelines(348) = 10 + If boughtartpaderaser = True Then savelines(349) = 11 Else savelines(349) = 10 + If boughtartpadfilltool = True Then savelines(350) = 11 Else savelines(350) = 10 + If boughtartpadtexttool = True Then savelines(351) = 11 Else savelines(351) = 10 + If boughtartpadundo = True Then savelines(352) = 11 Else savelines(352) = 10 + If boughtartpadredo = True Then savelines(353) = 11 Else savelines(353) = 10 + If boughtartpadsave = True Then savelines(354) = 11 Else savelines(354) = 10 + If boughtartpadload = True Then savelines(355) = 11 Else savelines(355) = 10 + For i = 0 To 127 : savelines(356 + i) = artpadcolourpallets(i).ToArgb : Next + If boughtartpadnew = True Then savelines(484) = 11 Else savelines(484) = 10 + '0.0.8 + savelines(485) = ingameversion + If boughtresizablewindows Then savelines(486) = 11 Else savelines(486) = 10 + If boughtcalculator Then savelines(487) = 11 Else savelines(487) = 10 + If boughtaudioplayer Then savelines(488) = 11 Else savelines(488) = 10 + If boughtchangeosnamecommand Then savelines(489) = 11 Else savelines(489) = 10 + If boughtwebbrowser Then savelines(490) = 11 Else savelines(490) = 10 + If boughtvideoplayer Then savelines(491) = 11 Else savelines(491) = 10 + If boughtnamechanger Then savelines(492) = 11 Else savelines(492) = 10 + If boughticonmanager Then savelines(493) = 11 Else savelines(493) = 10 + If boughtbitnotewallet Then savelines(494) = 11 Else savelines(494) = 10 + If boughtbitnotedigger Then savelines(495) = 11 Else savelines(495) = 10 + If boughtskinshifter Then savelines(496) = 11 Else savelines(496) = 10 + If boughtshiftnet Then savelines(497) = 11 Else savelines(497) = 10 + If boughtshiftneticon Then savelines(498) = 11 Else savelines(498) = 10 + If boughtalshiftnet Then savelines(499) = 11 Else savelines(499) = 10 + If boughtdodge Then savelines(500) = 11 Else savelines(500) = 10 + If boughtdownloadmanager Then savelines(501) = 11 Else savelines(501) = 10 + If boughtinstaller Then savelines(502) = 11 Else savelines(502) = 10 + If boughtsysinfoicon Then savelines(503) = 11 Else savelines(503) = 10 + If boughtorcwrite Then savelines(504) = 11 Else savelines(504) = 10 + If boughtfloodgate Then savelines(505) = 11 Else savelines(505) = 10 + If boughtmaze Then savelines(506) = 11 Else savelines(506) = 10 + If boughtunitymodetoggle Then savelines(507) = 11 Else savelines(507) = 10 + If boughtunitytoggleicon Then savelines(508) = 11 Else savelines(508) = 10 + savelines(509) = bitnotediggergrade + If boughtvirusscannericon Then savelines(510) = 11 Else savelines(510) = 10 + savelines(511) = virusscannergrade + If boughttextpadtrm Then savelines(512) = 11 Else savelines(512) = 10 + If boughtshiftapplauncheritems Then savelines(513) = 11 Else savelines(513) = 10 + If installedcalculator Then savelines(514) = 11 Else savelines(514) = 10 + If installedaudioplayer Then savelines(515) = 11 Else savelines(515) = 10 + If installedwebbrowser Then savelines(516) = 11 Else savelines(516) = 10 + If installedvideoplayer Then savelines(517) = 11 Else savelines(517) = 10 + If installeddodge Then savelines(518) = 11 Else savelines(518) = 10 + If installedsysinfo Then savelines(519) = 11 Else savelines(519) = 10 + If installedorcwrite Then savelines(520) = 11 Else savelines(520) = 10 + If installedfloodgate Then savelines(521) = 11 Else savelines(521) = 10 + If installedfloodgatenow Then savelines(522) = 11 Else savelines(522) = 10 + If installedmaze Then savelines(523) = 11 Else savelines(523) = 10 + If installedvirusscanner Then savelines(524) = 11 Else savelines(524) = 10 + savelines(525) = webbrowserhomepage + savelines(526) = bitnotebalance + savelines(527) = bitnotebalanceappscape + savelines(528) = bitnotebalanceminimatch + savelines(529) = "" ' download manager history - removed because could be muli-line + savelines(530) = downloadspeedcap + savelines(531) = osname + savelines(532) = artpadname + savelines(533) = audioplayername + savelines(534) = calculatorname + savelines(535) = clockname + savelines(536) = colourpickername + savelines(537) = fileopenername + savelines(538) = filesavername + savelines(539) = fileskimmername + savelines(540) = graphicpickername + savelines(541) = knowledgeinputname + savelines(542) = pongname + savelines(543) = shiftername + savelines(544) = shiftoriumname + savelines(545) = skinloadername + savelines(546) = terminalname + savelines(547) = textpadname + savelines(548) = videoplayername + savelines(549) = webbrowsername + savelines(550) = namechangername + savelines(551) = iconmanagername + savelines(552) = bitnotewalletname + savelines(553) = bitnotediggername + savelines(554) = skinshiftername + savelines(555) = shiftnetname + savelines(556) = dodgename + savelines(557) = downloadmanagername + savelines(558) = installername + savelines(559) = snakeyname + savelines(560) = sysinfoname + savelines(561) = orcwritename + savelines(562) = floodgatename + savelines(563) = mazename + savelines(564) = virusscannername + savelines(565) = titlebariconsize + savelines(566) = panelbuttoniconsize + savelines(567) = launchericonsize + If Viruses.zerogravity Then savelines(568) = 11 Else savelines(568) = 10 + If Viruses.mousetrap Then savelines(569) = 11 Else savelines(569) = 10 + If Viruses.beeper Then savelines(570) = 11 Else savelines(570) = 10 + If Viruses.ThePlague Then savelines(571) = 11 Else savelines(571) = 10 + savelines(572) = Viruses.zerogravitythreatlevel + savelines(573) = Viruses.mousetrapthreatlevel + savelines(574) = Viruses.beeperthreatlevel + savelines(575) = Viruses.theplaguethreatlevel + 'ThePlague corruptions under here, for all your corrupted files ;) + SortOutBooleans(FileSkimmerCorrupted, 580, False) + SortOutBooleans(ArtpadCorrupted, 581, False) + SortOutBooleans(AudioPlayerCorrupted, 582, False) + SortOutBooleans(BitNoteDiggerCorrupted, 583, False) + SortOutBooleans(BitNoteWalletCorrupted, 584, False) + SortOutBooleans(CalculatorCorrupted, 585, False) + SortOutBooleans(ClockCorrupted, 586, False) + SortOutBooleans(CoherenceModeCorrupted, 587, False) + SortOutBooleans(ColourPickerCorrupted, 588, False) + SortOutBooleans(DodgeCorrupted, 589, False) + SortOutBooleans(DownloadManagerCorrupted, 590, False) + SortOutBooleans(FloodGateManagerCorrupted, 591, False) + SortOutBooleans(GraphicPickerCorrupted, 592, False) + SortOutBooleans(IconManagerCorrupted, 593, False) + SortOutBooleans(InstallerCorrupted, 594, False) + SortOutBooleans(KnowledgeInputCorrupted, 595, False) + SortOutBooleans(LabyrinthCorrupted, 596, False) + SortOutBooleans(NameChangerCorrupted, 597, False) + SortOutBooleans(OrcWriteCorrupted, 598, False) + SortOutBooleans(PongCorrupted, 599, False) + SortOutBooleans(ShifterCorrupted, 600, False) + SortOutBooleans(ShifterCorrupted, 601, False) + SortOutBooleans(ShiftNetCorrupted, 602, False) + SortOutBooleans(ShiftoriumCorrupted, 603, False) + SortOutBooleans(SkinLoaderCorrupted, 604, False) + SortOutBooleans(SkinShifterCorrupted, 605, False) + SortOutBooleans(SnakeyCorrupted, 606, False) + SortOutBooleans(SystemInfoCorrupted, 607, False) + SortOutBooleans(TerminalCorrupted, 608, False) + SortOutBooleans(TextpadCorrupted, 609, False) + SortOutBooleans(VideoPlayerCorrupted, 610, False) + SortOutBooleans(VirusScannerCorrupted, 612, False) + SortOutBooleans(WebBrowserCorrupted, 613, False) + SortOutBooleans(CrashGameReady, 614, False) + savelines(615) = NumberOn + If boughtdesktopicons = True Then savelines(614) = 11 Else savelines(614) = 10 + If boughtadvapplauncher = True Then savelines(615) = 11 Else savelines(615) = 10 + savelines(616) = password + IO.File.WriteAllLines(Paths.savedata & "Drivers\HDD.dri", savelines) + File_Crypt.EncryptFile(Paths.savedata & "Drivers\HDD.dri", Paths.savedata & "SKernal.sft", sSecretKey) + Try + Dim sw As New IO.StreamWriter(Paths.dnldata & "Downloadhistory.lst") + sw.Write(downloadmanagerhistory) + sw.Close() + Catch ex As Exception + End Try + + Dim objWriter As New System.IO.StreamWriter(Paths.savedata & "HDAccess.sft", False) + objWriter.Write(actualshiftversion) + objWriter.Close() + + End Sub +#End Region + +#Region "Code" + + Private Sub SortOutBooleans(ByRef NameOfBoolean As Boolean, ByVal NumberOfSaveLine As Integer, ByVal TrueForSaveFalseForLoad As Boolean) + If TrueForSaveFalseForLoad = False Then + If NameOfBoolean = True Then savelines(NumberOfSaveLine) = 1 Else savelines(NumberOfSaveLine) = 0 + Else + Dim TempNumber As String = loadlines(NumberOfSaveLine) + If TempNumber = "1" Then NameOfBoolean = True Else NameOfBoolean = False + End If + End Sub + + Private Sub loadgame() + File_Crypt.DecryptFile(Paths.savedata & "SKernal.sft", Paths.savedata & "Drivers\HDD.dri", sSecretKey) + loadlines = IO.File.ReadAllLines(Paths.savedata & "Drivers\HDD.dri") + + If loadlines(0) = 11 Then boughttitlebar = True Else boughttitlebar = False + If loadlines(1) = 11 Then boughtgray = True Else boughtgray = False + If loadlines(2) = 11 Then boughtsecondspastmidnight = True Else boughtsecondspastmidnight = False + If loadlines(3) = 11 Then boughtminutespastmidnight = True Else boughtminutespastmidnight = False + If loadlines(4) = 11 Then boughthourspastmidnight = True Else boughthourspastmidnight = False + If loadlines(5) = 11 Then boughtcustomusername = True Else boughtcustomusername = False + If loadlines(6) = 11 Then boughtwindowsanywhere = True Else boughtwindowsanywhere = False + If loadlines(7) = 11 Then boughtmultitasking = True Else boughtmultitasking = False + If loadlines(8) = 11 Then boughtautoscrollterminal = True Else boughtautoscrollterminal = False + codepoints = loadlines(9) + If loadlines(10) = 11 Then boughtmovablewindows = True Else boughtmovablewindows = False + If loadlines(11) = 11 Then boughtdraggablewindows = True Else boughtdraggablewindows = False + If loadlines(12) = 11 Then boughtwindowborders = True Else boughtwindowborders = False + If loadlines(13) = 11 Then boughtpmandam = True Else boughtpmandam = False + If loadlines(14) = 11 Then boughtminuteaccuracytime = True Else boughtminuteaccuracytime = False + If loadlines(15) = 11 Then boughtsplitsecondtime = True Else boughtsplitsecondtime = False + If loadlines(16) = 11 Then boughttitletext = True Else boughttitletext = False + If loadlines(17) = 11 Then boughtclosebutton = True Else boughtclosebutton = False + If loadlines(18) = 11 Then boughtdesktoppanel = True Else boughtdesktoppanel = False + If loadlines(19) = 11 Then boughtclock = True Else boughtclock = False + If loadlines(20) = 11 Then boughtwindowedterminal = True Else boughtwindowedterminal = False + If loadlines(21) = 11 Then boughtapplaunchermenu = True Else boughtapplaunchermenu = False + If loadlines(22) = 11 Then boughtalknowledgeinput = True Else boughtalknowledgeinput = False + If loadlines(23) = 11 Then boughtalclock = True Else boughtalclock = False + If loadlines(24) = 11 Then boughtalshiftorium = True Else boughtalshiftorium = False + If loadlines(25) = 11 Then boughtapplaunchershutdown = True Else boughtapplaunchershutdown = False + If loadlines(26) = 11 Then boughtdesktoppanelclock = True Else boughtdesktoppanelclock = False + If loadlines(27) = 11 Then boughtterminalscrollbar = True Else boughtterminalscrollbar = False + If loadlines(28) = 11 Then boughtkiaddons = True Else boughtkiaddons = False + If loadlines(29) = 11 Then boughtkicarbrands = True Else boughtkicarbrands = False + If loadlines(30) = 11 Then boughtkigameconsoles = True Else boughtkigameconsoles = False + username = loadlines(31) + If loadlines(32) = 11 Then terminalfullscreen = True Else terminalfullscreen = False + If loadlines(33) = 11 Then boughtshifter = True Else boughtshifter = False + If loadlines(34) = 11 Then boughtalshifter = True Else boughtalshifter = False + If loadlines(35) = 11 Then boughtrollupcommand = True Else boughtrollupcommand = False + If loadlines(36) = 11 Then boughtrollupbutton = True Else boughtrollupbutton = False + If loadlines(37) = 11 Then boughtshiftdesktop = True Else boughtshiftdesktop = False + If loadlines(38) = 11 Then boughtshiftpanelclock = True Else boughtshiftpanelclock = False + If loadlines(39) = 11 Then boughtshiftapplauncher = True Else boughtshiftapplauncher = False + If loadlines(40) = 11 Then boughtshiftdesktoppanel = True Else boughtshiftdesktoppanel = False + If loadlines(41) = 11 Then boughtshifttitlebar = True Else boughtshifttitlebar = False + If loadlines(42) = 11 Then boughtshifttitletext = True Else boughtshifttitletext = False + If loadlines(43) = 11 Then boughtshifttitlebuttons = True Else boughtshifttitlebuttons = False + If loadlines(44) = 11 Then boughtshiftborders = True Else boughtshiftborders = False + If loadlines(45) = 11 Then boughtgray2 = True Else boughtgray2 = False + If loadlines(46) = 11 Then boughtgray3 = True Else boughtgray3 = False + If loadlines(47) = 11 Then boughtgray4 = True Else boughtgray4 = False + If loadlines(48) = 11 Then boughtanycolour = True Else boughtanycolour = False + If loadlines(49) = 11 Then boughtanycolour2 = True Else boughtanycolour2 = False + If loadlines(50) = 11 Then boughtanycolour3 = True Else boughtanycolour3 = False + If loadlines(51) = 11 Then boughtanycolour4 = True Else boughtanycolour4 = False + If loadlines(52) = 11 Then boughtpurple = True Else boughtpurple = False + If loadlines(53) = 11 Then boughtpurple2 = True Else boughtpurple2 = False + If loadlines(54) = 11 Then boughtpurple3 = True Else boughtpurple3 = False + If loadlines(55) = 11 Then boughtpurple4 = True Else boughtpurple4 = False + If loadlines(56) = 11 Then boughtblue = True Else boughtblue = False + If loadlines(57) = 11 Then boughtblue2 = True Else boughtblue2 = False + If loadlines(58) = 11 Then boughtblue3 = True Else boughtblue3 = False + If loadlines(59) = 11 Then boughtblue4 = True Else boughtblue4 = False + If loadlines(60) = 11 Then boughtgreen = True Else boughtgreen = False + If loadlines(61) = 11 Then boughtgreen2 = True Else boughtgreen2 = False + If loadlines(62) = 11 Then boughtgreen3 = True Else boughtgreen3 = False + If loadlines(63) = 11 Then boughtgreen4 = True Else boughtgreen4 = False + If loadlines(64) = 11 Then boughtyellow = True Else boughtyellow = False + If loadlines(65) = 11 Then boughtyellow2 = True Else boughtyellow2 = False + If loadlines(66) = 11 Then boughtyellow3 = True Else boughtyellow3 = False + If loadlines(67) = 11 Then boughtyellow4 = True Else boughtyellow4 = False + If loadlines(68) = 11 Then boughtorange = True Else boughtorange = False + If loadlines(69) = 11 Then boughtorange2 = True Else boughtorange2 = False + If loadlines(70) = 11 Then boughtorange3 = True Else boughtorange3 = False + If loadlines(71) = 11 Then boughtorange4 = True Else boughtorange4 = False + If loadlines(72) = 11 Then boughtbrown = True Else boughtbrown = False + If loadlines(73) = 11 Then boughtbrown2 = True Else boughtbrown2 = False + If loadlines(74) = 11 Then boughtbrown3 = True Else boughtbrown3 = False + If loadlines(75) = 11 Then boughtbrown4 = True Else boughtbrown4 = False + If loadlines(76) = 11 Then boughtred = True Else boughtred = False + If loadlines(77) = 11 Then boughtred2 = True Else boughtred2 = False + If loadlines(78) = 11 Then boughtred3 = True Else boughtred3 = False + If loadlines(79) = 11 Then boughtred4 = True Else boughtred4 = False + If loadlines(80) = 11 Then boughtpink = True Else boughtpink = False + If loadlines(81) = 11 Then boughtpink2 = True Else boughtpink2 = False + If loadlines(82) = 11 Then boughtpink3 = True Else boughtpink3 = False + If loadlines(83) = 11 Then boughtpink4 = True Else boughtpink4 = False + anymemory(0) = Color.FromArgb(loadlines(84)) + anymemory(1) = Color.FromArgb(loadlines(85)) + anymemory(2) = Color.FromArgb(loadlines(86)) + anymemory(3) = Color.FromArgb(loadlines(87)) + anymemory(4) = Color.FromArgb(loadlines(88)) + anymemory(5) = Color.FromArgb(loadlines(89)) + anymemory(6) = Color.FromArgb(loadlines(90)) + anymemory(7) = Color.FromArgb(loadlines(91)) + anymemory(8) = Color.FromArgb(loadlines(92)) + anymemory(9) = Color.FromArgb(loadlines(93)) + anymemory(10) = Color.FromArgb(loadlines(94)) + anymemory(11) = Color.FromArgb(loadlines(95)) + anymemory(12) = Color.FromArgb(loadlines(96)) + anymemory(13) = Color.FromArgb(loadlines(97)) + anymemory(14) = Color.FromArgb(loadlines(98)) + anymemory(15) = Color.FromArgb(loadlines(99)) + graymemory(0) = Color.FromArgb(loadlines(100)) + graymemory(1) = Color.FromArgb(loadlines(101)) + graymemory(2) = Color.FromArgb(loadlines(102)) + graymemory(3) = Color.FromArgb(loadlines(103)) + graymemory(4) = Color.FromArgb(loadlines(104)) + graymemory(5) = Color.FromArgb(loadlines(105)) + graymemory(6) = Color.FromArgb(loadlines(106)) + graymemory(7) = Color.FromArgb(loadlines(107)) + graymemory(8) = Color.FromArgb(loadlines(108)) + graymemory(9) = Color.FromArgb(loadlines(109)) + graymemory(10) = Color.FromArgb(loadlines(110)) + graymemory(11) = Color.FromArgb(loadlines(111)) + graymemory(12) = Color.FromArgb(loadlines(112)) + graymemory(13) = Color.FromArgb(loadlines(113)) + graymemory(14) = Color.FromArgb(loadlines(114)) + graymemory(15) = Color.FromArgb(loadlines(115)) + purplememory(0) = Color.FromArgb(loadlines(116)) + purplememory(1) = Color.FromArgb(loadlines(117)) + purplememory(2) = Color.FromArgb(loadlines(118)) + purplememory(3) = Color.FromArgb(loadlines(119)) + purplememory(4) = Color.FromArgb(loadlines(120)) + purplememory(5) = Color.FromArgb(loadlines(121)) + purplememory(6) = Color.FromArgb(loadlines(122)) + purplememory(7) = Color.FromArgb(loadlines(123)) + purplememory(8) = Color.FromArgb(loadlines(124)) + purplememory(9) = Color.FromArgb(loadlines(125)) + purplememory(10) = Color.FromArgb(loadlines(126)) + purplememory(11) = Color.FromArgb(loadlines(127)) + purplememory(12) = Color.FromArgb(loadlines(128)) + purplememory(13) = Color.FromArgb(loadlines(129)) + purplememory(14) = Color.FromArgb(loadlines(130)) + purplememory(15) = Color.FromArgb(loadlines(131)) + bluememory(0) = Color.FromArgb(loadlines(132)) + bluememory(1) = Color.FromArgb(loadlines(133)) + bluememory(2) = Color.FromArgb(loadlines(134)) + bluememory(3) = Color.FromArgb(loadlines(135)) + bluememory(4) = Color.FromArgb(loadlines(136)) + bluememory(5) = Color.FromArgb(loadlines(137)) + bluememory(6) = Color.FromArgb(loadlines(138)) + bluememory(7) = Color.FromArgb(loadlines(139)) + bluememory(8) = Color.FromArgb(loadlines(140)) + bluememory(9) = Color.FromArgb(loadlines(141)) + bluememory(10) = Color.FromArgb(loadlines(142)) + bluememory(11) = Color.FromArgb(loadlines(143)) + bluememory(12) = Color.FromArgb(loadlines(144)) + bluememory(13) = Color.FromArgb(loadlines(145)) + bluememory(14) = Color.FromArgb(loadlines(146)) + bluememory(15) = Color.FromArgb(loadlines(147)) + greenmemory(0) = Color.FromArgb(loadlines(148)) + greenmemory(1) = Color.FromArgb(loadlines(149)) + greenmemory(2) = Color.FromArgb(loadlines(150)) + greenmemory(3) = Color.FromArgb(loadlines(151)) + greenmemory(4) = Color.FromArgb(loadlines(152)) + greenmemory(5) = Color.FromArgb(loadlines(153)) + greenmemory(6) = Color.FromArgb(loadlines(154)) + greenmemory(7) = Color.FromArgb(loadlines(155)) + greenmemory(8) = Color.FromArgb(loadlines(156)) + greenmemory(9) = Color.FromArgb(loadlines(157)) + greenmemory(10) = Color.FromArgb(loadlines(158)) + greenmemory(11) = Color.FromArgb(loadlines(159)) + greenmemory(12) = Color.FromArgb(loadlines(160)) + greenmemory(13) = Color.FromArgb(loadlines(161)) + greenmemory(14) = Color.FromArgb(loadlines(162)) + greenmemory(15) = Color.FromArgb(loadlines(163)) + yellowmemory(0) = Color.FromArgb(loadlines(164)) + yellowmemory(1) = Color.FromArgb(loadlines(165)) + yellowmemory(2) = Color.FromArgb(loadlines(166)) + yellowmemory(3) = Color.FromArgb(loadlines(167)) + yellowmemory(4) = Color.FromArgb(loadlines(168)) + yellowmemory(5) = Color.FromArgb(loadlines(169)) + yellowmemory(6) = Color.FromArgb(loadlines(170)) + yellowmemory(7) = Color.FromArgb(loadlines(171)) + yellowmemory(8) = Color.FromArgb(loadlines(172)) + yellowmemory(9) = Color.FromArgb(loadlines(173)) + yellowmemory(10) = Color.FromArgb(loadlines(174)) + yellowmemory(11) = Color.FromArgb(loadlines(175)) + yellowmemory(12) = Color.FromArgb(loadlines(176)) + yellowmemory(13) = Color.FromArgb(loadlines(177)) + yellowmemory(14) = Color.FromArgb(loadlines(178)) + yellowmemory(15) = Color.FromArgb(loadlines(179)) + orangememory(0) = Color.FromArgb(loadlines(180)) + orangememory(1) = Color.FromArgb(loadlines(181)) + orangememory(2) = Color.FromArgb(loadlines(182)) + orangememory(3) = Color.FromArgb(loadlines(183)) + orangememory(4) = Color.FromArgb(loadlines(184)) + orangememory(5) = Color.FromArgb(loadlines(185)) + orangememory(6) = Color.FromArgb(loadlines(186)) + orangememory(7) = Color.FromArgb(loadlines(187)) + orangememory(8) = Color.FromArgb(loadlines(188)) + orangememory(9) = Color.FromArgb(loadlines(189)) + orangememory(10) = Color.FromArgb(loadlines(190)) + orangememory(11) = Color.FromArgb(loadlines(191)) + orangememory(12) = Color.FromArgb(loadlines(192)) + orangememory(13) = Color.FromArgb(loadlines(193)) + orangememory(14) = Color.FromArgb(loadlines(194)) + orangememory(15) = Color.FromArgb(loadlines(195)) + brownmemory(0) = Color.FromArgb(loadlines(196)) + brownmemory(1) = Color.FromArgb(loadlines(197)) + brownmemory(2) = Color.FromArgb(loadlines(198)) + brownmemory(3) = Color.FromArgb(loadlines(199)) + brownmemory(4) = Color.FromArgb(loadlines(200)) + brownmemory(5) = Color.FromArgb(loadlines(201)) + brownmemory(6) = Color.FromArgb(loadlines(202)) + brownmemory(7) = Color.FromArgb(loadlines(203)) + brownmemory(8) = Color.FromArgb(loadlines(204)) + brownmemory(9) = Color.FromArgb(loadlines(205)) + brownmemory(10) = Color.FromArgb(loadlines(206)) + brownmemory(11) = Color.FromArgb(loadlines(207)) + brownmemory(12) = Color.FromArgb(loadlines(208)) + brownmemory(13) = Color.FromArgb(loadlines(209)) + brownmemory(14) = Color.FromArgb(loadlines(210)) + brownmemory(15) = Color.FromArgb(loadlines(211)) + redmemory(0) = Color.FromArgb(loadlines(212)) + redmemory(1) = Color.FromArgb(loadlines(213)) + redmemory(2) = Color.FromArgb(loadlines(214)) + redmemory(3) = Color.FromArgb(loadlines(215)) + redmemory(4) = Color.FromArgb(loadlines(216)) + redmemory(5) = Color.FromArgb(loadlines(217)) + redmemory(6) = Color.FromArgb(loadlines(218)) + redmemory(7) = Color.FromArgb(loadlines(219)) + redmemory(8) = Color.FromArgb(loadlines(220)) + redmemory(9) = Color.FromArgb(loadlines(221)) + redmemory(10) = Color.FromArgb(loadlines(222)) + redmemory(11) = Color.FromArgb(loadlines(223)) + redmemory(12) = Color.FromArgb(loadlines(224)) + redmemory(13) = Color.FromArgb(loadlines(225)) + redmemory(14) = Color.FromArgb(loadlines(226)) + redmemory(15) = Color.FromArgb(loadlines(227)) + pinkmemory(0) = Color.FromArgb(loadlines(228)) + pinkmemory(1) = Color.FromArgb(loadlines(229)) + pinkmemory(2) = Color.FromArgb(loadlines(230)) + pinkmemory(3) = Color.FromArgb(loadlines(231)) + pinkmemory(4) = Color.FromArgb(loadlines(232)) + pinkmemory(5) = Color.FromArgb(loadlines(233)) + pinkmemory(6) = Color.FromArgb(loadlines(234)) + pinkmemory(7) = Color.FromArgb(loadlines(235)) + pinkmemory(8) = Color.FromArgb(loadlines(236)) + pinkmemory(9) = Color.FromArgb(loadlines(237)) + pinkmemory(10) = Color.FromArgb(loadlines(238)) + pinkmemory(11) = Color.FromArgb(loadlines(239)) + pinkmemory(12) = Color.FromArgb(loadlines(240)) + pinkmemory(13) = Color.FromArgb(loadlines(241)) + pinkmemory(14) = Color.FromArgb(loadlines(242)) + pinkmemory(15) = Color.FromArgb(loadlines(243)) + titlebarcolour = Color.FromArgb(loadlines(244)) + windowbordercolour = Color.FromArgb(loadlines(245)) + windowbordersize = loadlines(246) + titlebarheight = loadlines(247) + closebuttoncolour = Color.FromArgb(loadlines(248)) + closebuttonheight = loadlines(249) + closebuttonwidth = loadlines(250) + closebuttonside = loadlines(251) + closebuttontop = loadlines(252) + titletextcolour = Color.FromArgb(loadlines(253)) + titletexttop = loadlines(254) + titletextside = loadlines(255) + titletextsize = loadlines(256) + titletextfont = loadlines(257) + titletextstyle = loadlines(258) + desktoppanelcolour = Color.FromArgb(loadlines(259)) + desktopbackgroundcolour = Color.FromArgb(loadlines(260)) + desktoppanelheight = loadlines(261) + desktoppanelposition = loadlines(262) + clocktextcolour = Color.FromArgb(loadlines(263)) + clockbackgroundcolor = Color.FromArgb(loadlines(264)) + panelclocktexttop = loadlines(265) + panelclocktextsize = loadlines(266) + panelclocktextfont = loadlines(267) + panelclocktextstyle = loadlines(268) + applauncherbuttoncolour = Color.FromArgb(loadlines(269)) + applauncherbuttonclickedcolour = Color.FromArgb(loadlines(270)) + applauncherbackgroundcolour = Color.FromArgb(loadlines(271)) + applaunchermouseovercolour = Color.FromArgb(loadlines(272)) + applicationsbuttontextcolour = Color.FromArgb(loadlines(273)) + applicationbuttonheight = loadlines(274) + applicationbuttontextsize = loadlines(275) + applicationbuttontextfont = loadlines(276) + applicationbuttontextstyle = loadlines(277) + applicationlaunchername = loadlines(278) + titletextposition = loadlines(279) + rollupbuttoncolour = Color.FromArgb(loadlines(280)) + rollupbuttonheight = loadlines(281) + rollupbuttonwidth = loadlines(282) + rollupbuttonside = loadlines(283) + rollupbuttontop = loadlines(284) + If loadlines(285) = 11 Then boughtpong = True Else boughtpong = False + If loadlines(286) = 11 Then boughtknowledgeinputicon = True Else boughtknowledgeinputicon = False + If loadlines(287) = 11 Then boughtshiftericon = True Else boughtshiftericon = False + If loadlines(288) = 11 Then boughtshiftoriumicon = True Else boughtshiftoriumicon = False + If loadlines(289) = 11 Then boughtclockicon = True Else boughtclockicon = False + If loadlines(290) = 11 Then boughtshutdownicon = True Else boughtshutdownicon = False + If loadlines(291) = 11 Then boughtpongicon = True Else boughtpongicon = False + If loadlines(292) = 11 Then boughtterminalicon = True Else boughtterminalicon = False + If loadlines(293) = 11 Then boughtalpong = True Else boughtalpong = False + If loadlines(294) = 11 Then boughtfileskimmer = True Else boughtfileskimmer = False + If loadlines(295) = 11 Then boughtalfileskimmer = True Else boughtalfileskimmer = False + If loadlines(296) = 11 Then boughttextpad = True Else boughttextpad = False + If loadlines(297) = 11 Then boughtaltextpad = True Else boughtaltextpad = False + If loadlines(298) = 11 Then boughtfileskimmericon = True Else boughtfileskimmericon = False + If loadlines(299) = 11 Then boughttextpadicon = True Else boughttextpadicon = False + If loadlines(300) = 11 Then boughttextpadnew = True Else boughttextpadnew = False + If loadlines(301) = 11 Then boughttextpadsave = True Else boughttextpadsave = False + If loadlines(302) = 11 Then boughttextpadopen = True Else boughttextpadopen = False + If loadlines(303) = 11 Then boughtfileskimmernewfolder = True Else boughtfileskimmernewfolder = False + If loadlines(304) = 11 Then boughtfileskimmerdelete = True Else boughtfileskimmerdelete = False + If loadlines(305) = 11 Then boughtkielements = True Else boughtkielements = False + If loadlines(306) = 11 Then boughtcolourpickericon = True Else boughtcolourpickericon = False + If loadlines(307) = 11 Then boughtinfoboxicon = True Else boughtinfoboxicon = False + artpadcolorpalletwidth = loadlines(308) + artpadcolorpalletheight = loadlines(309) + artpadcolorpalletsidegap = loadlines(310) + artpadcolorpallettopgap = loadlines(311) + artpadvisiblepallets = loadlines(312) + artpadpixellimit = loadlines(313) + If loadlines(314) = 11 Then boughtskinloader = True Else boughtskinloader = False + If loadlines(315) = 11 Then boughtminimizebutton = True Else boughtminimizebutton = False + If loadlines(316) = 11 Then boughtpanelbuttons = True Else boughtpanelbuttons = False + If loadlines(317) = 11 Then boughtshiftpanelbuttons = True Else boughtshiftpanelbuttons = False + If loadlines(318) = 11 Then boughtartpad = True Else boughtartpad = False + If loadlines(319) = 11 Then boughtalartpad = True Else boughtalartpad = False + If loadlines(320) = 11 Then boughtartpadicon = True Else boughtartpadicon = False + If loadlines(321) = 11 Then boughtskinning = True Else boughtskinning = False + If loadlines(322) = 11 Then boughtminimizecommand = True Else boughtminimizecommand = False + If loadlines(323) = 11 Then boughtusefulpanelbuttons = True Else boughtusefulpanelbuttons = False + If loadlines(324) = 11 Then boughtunitymode = True Else boughtunitymode = False + If loadlines(325) = 11 Then boughtartpadpixellimit4 = True Else boughtartpadpixellimit4 = False + If loadlines(326) = 11 Then boughtartpadpixellimit8 = True Else boughtartpadpixellimit8 = False + If loadlines(327) = 11 Then boughtartpadpixellimit16 = True Else boughtartpadpixellimit16 = False + If loadlines(328) = 11 Then boughtartpadpixellimit64 = True Else boughtartpadpixellimit64 = False + If loadlines(329) = 11 Then boughtartpadpixellimit256 = True Else boughtartpadpixellimit256 = False + If loadlines(330) = 11 Then boughtartpadpixellimit1024 = True Else boughtartpadpixellimit1024 = False + If loadlines(331) = 11 Then boughtartpadpixellimit4096 = True Else boughtartpadpixellimit4096 = False + If loadlines(332) = 11 Then boughtartpadpixellimit16384 = True Else boughtartpadpixellimit16384 = False + If loadlines(333) = 11 Then boughtartpadpixellimit65536 = True Else boughtartpadpixellimit65536 = False + If loadlines(334) = 11 Then boughtartpadlimitlesspixels = True Else boughtartpadlimitlesspixels = False + If loadlines(335) = 11 Then boughtartpad4colorpallets = True Else boughtartpad4colorpallets = False + If loadlines(336) = 11 Then boughtartpad8colorpallets = True Else boughtartpad8colorpallets = False + If loadlines(337) = 11 Then boughtartpad16colorpallets = True Else boughtartpad16colorpallets = False + If loadlines(338) = 11 Then boughtartpad32colorpallets = True Else boughtartpad32colorpallets = False + If loadlines(339) = 11 Then boughtartpad64colorpallets = True Else boughtartpad64colorpallets = False + If loadlines(340) = 11 Then boughtartpad128colorpallets = True Else boughtartpad128colorpallets = False + If loadlines(341) = 11 Then boughtartpadcustompallets = True Else boughtartpadcustompallets = False + If loadlines(342) = 11 Then boughtartpadpixelplacer = True Else boughtartpadpixelplacer = False + If loadlines(343) = 11 Then boughtartpadpixelplacermovementmode = True Else boughtartpadpixelplacermovementmode = False + If loadlines(344) = 11 Then boughtartpadpencil = True Else boughtartpadpencil = False + If loadlines(345) = 11 Then boughtartpadpaintbrush = True Else boughtartpadpaintbrush = False + If loadlines(346) = 11 Then boughtartpadlinetool = True Else boughtartpadlinetool = False + If loadlines(347) = 11 Then boughtartpadovaltool = True Else boughtartpadovaltool = False + If loadlines(348) = 11 Then boughtartpadrectangletool = True Else boughtartpadrectangletool = False + If loadlines(349) = 11 Then boughtartpaderaser = True Else boughtartpaderaser = False + If loadlines(350) = 11 Then boughtartpadfilltool = True Else boughtartpadfilltool = False + If loadlines(351) = 11 Then boughtartpadtexttool = True Else boughtartpadtexttool = False + If loadlines(352) = 11 Then boughtartpadundo = True Else boughtartpadundo = False + If loadlines(353) = 11 Then boughtartpadredo = True Else boughtartpadredo = False + If loadlines(354) = 11 Then boughtartpadsave = True Else boughtartpadsave = False + If loadlines(355) = 11 Then boughtartpadload = True Else boughtartpadload = False + For i = 0 To 127 : artpadcolourpallets(i) = Color.FromArgb(loadlines(356 + i)) : Next + If loadlines(484) = "" Then Else If loadlines(484) = 11 Then boughtartpadnew = True Else boughtartpadnew = False + '0.0.8 + ingameversion = loadlines(485) + If loadlines(486) = 11 Then boughtresizablewindows = True Else boughtresizablewindows = False + If loadlines(487) = 11 Then boughtcalculator = True Else boughtcalculator = False + If loadlines(488) = 11 Then boughtaudioplayer = True Else boughtaudioplayer = False + If loadlines(489) = 11 Then boughtchangeosnamecommand = True Else boughtchangeosnamecommand = False + If loadlines(490) = 11 Then boughtwebbrowser = True Else boughtwebbrowser = False + If loadlines(491) = 11 Then boughtvideoplayer = True Else boughtvideoplayer = False + If loadlines(492) = 11 Then boughtnamechanger = True Else boughtnamechanger = False + If loadlines(493) = 11 Then boughticonmanager = True Else boughticonmanager = False + If loadlines(494) = 11 Then boughtbitnotewallet = True Else boughtbitnotewallet = False + If loadlines(495) = 11 Then boughtbitnotedigger = True Else boughtbitnotedigger = False + If loadlines(496) = 11 Then boughtskinshifter = True Else boughtskinshifter = False + If loadlines(497) = 11 Then boughtshiftnet = True Else boughtshiftnet = False + If loadlines(498) = 11 Then boughtshiftneticon = True Else boughtshiftneticon = False + If loadlines(499) = 11 Then boughtalshiftnet = True Else boughtalshiftnet = False + If loadlines(500) = 11 Then boughtdodge = True Else boughtdodge = False + If loadlines(501) = 11 Then boughtdownloadmanager = True Else boughtdownloadmanager = False + If loadlines(502) = 11 Then boughtinstaller = True Else boughtinstaller = False + If loadlines(503) = 11 Then boughtsysinfoicon = True Else boughtsysinfoicon = False + If loadlines(504) = 11 Then boughtorcwrite = True Else boughtorcwrite = False + If loadlines(505) = 11 Then boughtfloodgate = True Else boughtfloodgate = False + If loadlines(506) = 11 Then boughtmaze = True Else boughtmaze = False + If loadlines(507) = 11 Then boughtunitymodetoggle = True Else boughtunitymodetoggle = False + If loadlines(508) = 11 Then boughtunitytoggleicon = True Else boughtunitytoggleicon = False + bitnotediggergrade = loadlines(509) + If loadlines(510) = 11 Then boughtvirusscannericon = True Else boughtvirusscannericon = False + virusscannergrade = loadlines(511) + If loadlines(512) = 11 Then boughttextpadtrm = True Else boughttextpadtrm = False + If loadlines(513) = 11 Then boughtshiftapplauncheritems = True Else boughtshiftapplauncheritems = False + If loadlines(514) = 11 Then installedcalculator = True Else installedcalculator = False + If loadlines(515) = 11 Then installedaudioplayer = True Else installedaudioplayer = False + If loadlines(516) = 11 Then installedwebbrowser = True Else installedwebbrowser = False + If loadlines(517) = 11 Then installedvideoplayer = True Else installedvideoplayer = False + If loadlines(518) = 11 Then installeddodge = True Else installeddodge = False + If loadlines(519) = 11 Then installedsysinfo = True Else installedsysinfo = False + If loadlines(520) = 11 Then installedorcwrite = True Else installedorcwrite = False + If loadlines(521) = 11 Then installedfloodgate = True Else installedfloodgate = False + If loadlines(522) = 11 Then installedfloodgatenow = True Else installedfloodgatenow = False + If loadlines(523) = 11 Then installedmaze = True Else installedmaze = False + If loadlines(524) = 11 Then installedvirusscanner = True Else installedvirusscanner = False + webbrowserhomepage = loadlines(525) + bitnotebalance = loadlines(526) + bitnotebalanceappscape = loadlines(527) + 'bitnotebalanceminimatch = loadlines(528) 'comment in after updating save + 'downloadmanagerhistory = loadlines(529) + downloadspeedcap = loadlines(530) + osname = loadlines(531) + artpadname = loadlines(532) + audioplayername = loadlines(533) + calculatorname = loadlines(534) + clockname = loadlines(535) + colourpickername = loadlines(536) + fileopenername = loadlines(537) + filesavername = loadlines(538) + fileskimmername = loadlines(539) + graphicpickername = loadlines(540) + knowledgeinputname = loadlines(541) + pongname = loadlines(542) + shiftername = loadlines(543) + shiftoriumname = loadlines(544) + skinloadername = loadlines(545) + terminalname = loadlines(546) + textpadname = loadlines(547) + videoplayername = loadlines(548) + webbrowsername = loadlines(549) + namechangername = loadlines(550) + iconmanagername = loadlines(551) + bitnotewalletname = loadlines(552) + bitnotediggername = loadlines(553) + skinshiftername = loadlines(554) + shiftnetname = loadlines(555) + dodgename = loadlines(556) + downloadmanagername = loadlines(557) + installername = loadlines(558) + snakeyname = loadlines(559) + sysinfoname = loadlines(560) + orcwritename = loadlines(561) + floodgatename = loadlines(562) + mazename = loadlines(563) + virusscannername = loadlines(564) + titlebariconsize = loadlines(565) + panelbuttoniconsize = loadlines(566) + launchericonsize = loadlines(567) + If loadlines(568) = 11 Then Viruses.zerogravity = True Else Viruses.zerogravity = False + If loadlines(569) = 11 Then Viruses.mousetrap = True Else Viruses.mousetrap = False + If loadlines(570) = 11 Then Viruses.beeper = True Else Viruses.beeper = False + If loadlines(571) = 11 Then Viruses.ThePlague = True Else Viruses.ThePlague = False + Viruses.zerogravitythreatlevel = loadlines(572) + Viruses.mousetrapthreatlevel = loadlines(573) + Viruses.beeperthreatlevel = loadlines(574) + Viruses.theplaguethreatlevel = loadlines(575) + 'Load up the corruptions if any are made + SortOutBooleans(FileSkimmerCorrupted, 580, True) + SortOutBooleans(ArtpadCorrupted, 581, True) + SortOutBooleans(AudioPlayerCorrupted, 582, True) + SortOutBooleans(BitNoteDiggerCorrupted, 583, True) + SortOutBooleans(BitNoteWalletCorrupted, 584, True) + SortOutBooleans(CalculatorCorrupted, 585, True) + SortOutBooleans(ClockCorrupted, 586, True) + SortOutBooleans(CoherenceModeCorrupted, 587, True) + SortOutBooleans(ColourPickerCorrupted, 588, True) + SortOutBooleans(DodgeCorrupted, 589, True) + SortOutBooleans(DownloadManagerCorrupted, 590, True) + SortOutBooleans(FloodGateManagerCorrupted, 591, True) + SortOutBooleans(GraphicPickerCorrupted, 592, True) + SortOutBooleans(IconManagerCorrupted, 593, True) + SortOutBooleans(InstallerCorrupted, 594, True) + SortOutBooleans(KnowledgeInputCorrupted, 595, True) + SortOutBooleans(LabyrinthCorrupted, 596, True) + SortOutBooleans(NameChangerCorrupted, 597, True) + SortOutBooleans(OrcWriteCorrupted, 598, True) + SortOutBooleans(PongCorrupted, 599, True) + SortOutBooleans(ShifterCorrupted, 600, True) + SortOutBooleans(ShifterCorrupted, 601, True) + SortOutBooleans(ShiftNetCorrupted, 602, True) + SortOutBooleans(ShiftoriumCorrupted, 603, True) + SortOutBooleans(SkinLoaderCorrupted, 604, True) + SortOutBooleans(SkinShifterCorrupted, 605, True) + SortOutBooleans(SnakeyCorrupted, 606, True) + SortOutBooleans(SystemInfoCorrupted, 607, True) + SortOutBooleans(TerminalCorrupted, 608, True) + SortOutBooleans(TextpadCorrupted, 609, True) + SortOutBooleans(VideoPlayerCorrupted, 610, True) + SortOutBooleans(VirusScannerCorrupted, 612, True) + SortOutBooleans(WebBrowserCorrupted, 613, True) + SortOutBooleans(CrashGameReady, 614, True) + NumberOn = loadlines(615) + Try + If loadlines(614) = 11 Then boughtdesktopicons = True Else boughtdesktopicons = False + Catch + boughtdesktopicons = False + End Try + Try + If loadlines(615) = 11 Then boughtadvapplauncher = True Else boughtadvapplauncher = False + Catch + boughtadvapplauncher = False + End Try + If loadlines(616) = "" Then loginform.throwRegister = True Else password = loadlines(616) + Viruses.startactiveviruses() + If IO.File.Exists(Paths.loadedskin & "skindata.dat") Then loadcurrentskin() ' FIXME (ShiftOSPath + "Shiftum42\Skins\Current\skindata.dat") + If My.Computer.FileSystem.DirectoryExists(Paths.savedata & "Icons") Then setupicons() + If IO.File.Exists(Paths.dnldata & "Downloadhistory.lst") Then downloadmanagerhistory = IO.File.ReadAllText(ShiftOSPath & "\SoftwareData\DownloadManager\Downloadhistory.lst") + End Sub + + Private Sub ShiftOSDesktop_Load(sender As Object, e As EventArgs) Handles MyBase.Load + FloodRegistry.registerItems() + If newgame = True Or justconverted = True Then + savegame() + Else + loadgame() + Terminal.runterminalfile(ShiftOSPath + "\Shiftum42\autorun.trm") + End If + If Not My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "\SoftwareData\AdvStart\Recent") Then + IO.Directory.CreateDirectory(ShiftOSPath + "\SoftwareData\AdvStart\Recent") + End If + ToolStripManager.Renderer = New MyToolStripRenderer() + Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None + Me.WindowState = FormWindowState.Maximized + 'loadskinfiles() + 'setupdesktop() + 'setupskins() + Skins.loadimages() + desktopicons.AllowDrop = True + desktopicons.AutoArrange = False + 'For Each Control In MyBase.Controls UNFINISHED/WTF? + ' Control.visible = False + 'Next + If Skins.autologin = False Then + If Skins.fullScreen = False Then + loginform.ShowDialog() + Else + FullScreenLogin.ShowDialog() + End If + End If + + + 'For Each Control In MyBase.Controls UNFINISHED/WTF? + ' Control.visible = True + ' hideStart() + 'Next + Try + Helper.playSound(Paths.sounddir & "startup.wav", AudioPlayMode.WaitToComplete) + Catch ex As Exception + 'Do nothing -- Haven't found a good startup sound + End Try + 'DockWindow.Show() UNFINISHED + End Sub + + Public Sub loadcurrentskin() + skinlines = IO.File.ReadAllLines(Paths.loadedskin & "skindata.dat") + titlebarcolour = Color.FromArgb(skinlines(0)) + windowbordercolour = Color.FromArgb(skinlines(1)) + windowbordersize = skinlines(2) + titlebarheight = skinlines(3) + closebuttoncolour = Color.FromArgb(skinlines(4)) + closebuttonheight = skinlines(5) + closebuttonwidth = skinlines(6) + closebuttonside = skinlines(7) + closebuttontop = skinlines(8) + titletextcolour = Color.FromArgb(skinlines(9)) + titletexttop = skinlines(10) + titletextside = skinlines(11) + titletextsize = skinlines(12) + titletextfont = skinlines(13) + titletextstyle = skinlines(14) + desktoppanelcolour = Color.FromArgb(skinlines(15)) + desktopbackgroundcolour = Color.FromArgb(skinlines(16)) + desktoppanelheight = skinlines(17) + desktoppanelposition = skinlines(18) + clocktextcolour = Color.FromArgb(skinlines(19)) + clockbackgroundcolor = Color.FromArgb(skinlines(20)) + panelclocktexttop = skinlines(21) + panelclocktextsize = skinlines(22) + panelclocktextfont = skinlines(23) + panelclocktextstyle = skinlines(24) + applauncherbuttoncolour = Color.FromArgb(skinlines(25)) + applauncherbuttonclickedcolour = Color.FromArgb(skinlines(26)) + applauncherbackgroundcolour = Color.FromArgb(skinlines(27)) + applaunchermouseovercolour = Color.FromArgb(skinlines(28)) + applicationsbuttontextcolour = Color.FromArgb(skinlines(29)) + applicationbuttonheight = skinlines(30) + applicationbuttontextsize = skinlines(31) + applicationbuttontextfont = skinlines(32) + applicationbuttontextstyle = skinlines(33) + applicationlaunchername = skinlines(34) + titletextposition = skinlines(35) + rollupbuttoncolour = Color.FromArgb(skinlines(36)) + If skinlines(37) = "" Then Else rollupbuttonheight = skinlines(37) + If skinlines(38) = "" Then Else rollupbuttonwidth = skinlines(38) + If skinlines(39) = "" Then Else rollupbuttonside = skinlines(39) + If skinlines(40) = "" Then Else rollupbuttontop = skinlines(40) + If skinlines(41) = "" Then Else titlebariconside = skinlines(41) + If skinlines(42) = "" Then Else titlebaricontop = skinlines(42) + If skinlines(43) = "" Then Else showwindowcorners = skinlines(43) + If skinlines(44) = "" Then Else titlebarcornerwidth = skinlines(44) + If skinlines(45) = "" Then Else titlebarrightcornercolour = Color.FromArgb(skinlines(45)) + If skinlines(46) = "" Then Else titlebarleftcornercolour = Color.FromArgb(skinlines(46)) + If skinlines(47) = "" Then Else applaunchermenuholderwidth = skinlines(47) + If skinlines(48) = "" Then Else windowborderleftcolour = Color.FromArgb(skinlines(48)) + If skinlines(49) = "" Then Else windowborderrightcolour = Color.FromArgb(skinlines(49)) + If skinlines(50) = "" Then Else windowborderbottomcolour = Color.FromArgb(skinlines(50)) + If skinlines(51) = "" Then Else windowborderbottomrightcolour = Color.FromArgb(skinlines(51)) + If skinlines(52) = "" Then Else windowborderbottomleftcolour = Color.FromArgb(skinlines(52)) + If skinlines(53) = "" Then Else panelbuttonicontop = skinlines(53) + If skinlines(54) = "" Then Else panelbuttoniconside = skinlines(54) + If skinlines(55) = "" Then Else panelbuttoniconsize = skinlines(55) + If skinlines(56) = "" Then Else panelbuttoniconsize = skinlines(56) + If skinlines(57) = "" Then Else panelbuttonheight = skinlines(57) + If skinlines(58) = "" Then Else panelbuttonwidth = skinlines(58) + If skinlines(59) = "" Then Else panelbuttoncolour = Color.FromArgb(skinlines(59)) + If skinlines(60) = "" Then Else panelbuttontextcolour = Color.FromArgb(skinlines(60)) + If skinlines(61) = "" Then Else panelbuttontextsize = skinlines(61) + If skinlines(62) = "" Then Else panelbuttontextfont = skinlines(62) + If skinlines(63) = "" Then Else panelbuttontextstyle = skinlines(63) + If skinlines(64) = "" Then Else panelbuttontextside = skinlines(64) + If skinlines(65) = "" Then Else panelbuttontexttop = skinlines(65) + If skinlines(66) = "" Then Else panelbuttongap = skinlines(66) + If skinlines(67) = "" Then Else panelbuttonfromtop = skinlines(67) + If skinlines(68) = "" Then Else panelbuttoninitialgap = skinlines(68) + If skinlines(69) = "" Then Else minimizebuttoncolour = Color.FromArgb(skinlines(69)) + If skinlines(70) = "" Then Else minimizebuttonheight = skinlines(70) + If skinlines(71) = "" Then Else minimizebuttonwidth = skinlines(71) + If skinlines(72) = "" Then Else minimizebuttonside = skinlines(72) + If skinlines(73) = "" Then Else minimizebuttontop = skinlines(73) + + ' Old skin loading + 'skinimages(0) = skinlines(100) + 'skinimages(1) = skinlines(101) + 'skinimages(2) = skinlines(102) + 'skinimages(3) = skinlines(103) + 'skinimages(4) = skinlines(104) + 'skinimages(5) = skinlines(105) + 'skinimages(6) = skinlines(106) + 'skinimages(7) = skinlines(107) + 'skinimages(8) = skinlines(108) + 'skinimages(9) = skinlines(109) + 'skinimages(10) = skinlines(110) + 'skinimages(11) = skinlines(111) + 'skinimages(12) = skinlines(112) + 'skinimages(13) = skinlines(113) + 'skinimages(14) = skinlines(114) + 'skinimages(15) = skinlines(115) + 'skinimages(16) = skinlines(116) + 'skinimages(17) = skinlines(117) + 'skinimages(18) = skinlines(118) + 'skinimages(19) = skinlines(119) + 'skinimages(20) = skinlines(120) + 'skinimages(21) = skinlines(121) + 'skinimages(22) = skinlines(122) + 'skinimages(23) = skinlines(123) + 'skinimages(24) = skinlines(124) + 'skinimages(25) = skinlines(125) + 'skinimages(26) = skinlines(126) + 'skinimages(27) = skinlines(127) + 'skinimages(28) = skinlines(128) + 'skinimages(29) = skinlines(129) + 'skinimages(30) = skinlines(130) + 'skinimages(31) = skinlines(131) + 'skinimages(32) = skinlines(132) + 'skinimages(33) = skinlines(133) + 'skinimages(34) = skinlines(134) + 'skinimages(35) = skinlines(135) + 'skinimages(36) = skinlines(136) + 'skinimages(37) = skinlines(137) + 'skinimages(38) = skinlines(138) + 'skinimages(39) = skinlines(139) + 'skinimages(40) = skinlines(140) + 'skinimages(41) = skinlines(141) + 'skinimages(42) = skinlines(142) + 'skinimages(43) = skinlines(143) + 'skinimages(44) = skinlines(144) + 'skinimages(45) = skinlines(145) + 'skinimages(46) = skinlines(146) + 'skinimages(47) = skinlines(147) + 'skinimages(48) = skinlines(148) + 'skinimages(49) = skinlines(149) + 'skinimages(50) = skinlines(150) + End Sub + + Private Sub shortdisposecode(ByVal skinloadervarible As Array, ByVal shiftosdesktopvarible As Array, ByVal shiftervarible As Array, ByVal includedesktop As Boolean) + If includedesktop = True Then + If shiftosdesktopvarible(0) Is Nothing Then Else shiftosdesktopvarible(0).Dispose() + If shiftosdesktopvarible(1) Is Nothing Then Else shiftosdesktopvarible(1).Dispose() + If shiftosdesktopvarible(2) Is Nothing Then Else shiftosdesktopvarible(2).Dispose() + shiftosdesktopvarible(0) = Nothing + shiftosdesktopvarible(1) = Nothing + shiftosdesktopvarible(2) = Nothing + End If + If Shifter.Visible Then + If shiftervarible(0) Is Nothing Then Else shiftervarible(0).Dispose() + If shiftervarible(1) Is Nothing Then Else shiftervarible(1).Dispose() + If shiftervarible(2) Is Nothing Then Else shiftervarible(2).Dispose() + shiftervarible(0) = Nothing + shiftervarible(1) = Nothing + shiftervarible(2) = Nothing + End If + If Skin_Loader.Visible Then + If skinloadervarible(0) Is Nothing Then Else skinloadervarible(0).Dispose() + If skinloadervarible(1) Is Nothing Then Else skinloadervarible(1).Dispose() + If skinloadervarible(2) Is Nothing Then Else skinloadervarible(2).Dispose() + skinloadervarible(0) = Nothing + skinloadervarible(1) = Nothing + skinloadervarible(2) = Nothing + End If + End Sub + + Public Sub setupdesktop() + 'Set skin/size/colour of all windows + If Knowledge_Input.Visible Then Knowledge_Input.setupall() + If Shiftorium.Visible Then Shiftorium.setupall() + If Clock.Visible Then Clock.setupall() + If Shifter.Visible Then Shifter.setupall() + If Colour_Picker.Visible Then Colour_Picker.setupall() + If infobox.Visible Then infobox.setupall() + If Pong.Visible Then Pong.setupall() + If File_Skimmer.Visible Then File_Skimmer.setupall() + If File_Opener.Visible Then File_Opener.setupall() + If File_Saver.Visible Then File_Saver.setupall() + If TextPad.Visible Then TextPad.setupall() + If Graphic_Picker.Visible Then Graphic_Picker.setupall() + If Skin_Loader.Visible Then Skin_Loader.setupall() + If ArtPad.Visible Then ArtPad.setupall() + If Calculator.Visible Then Calculator.setupall() + If Audio_Player.Visible Then Audio_Player.setupall() + If Web_Browser.Visible Then Web_Browser.setupall() + If Video_Player.Visible Then Video_Player.setupall() + If Name_Changer.Visible Then Name_Changer.setupall() + If Icon_Manager.Visible Then Icon_Manager.setupall() + If Bitnote_Wallet.Visible Then Bitnote_Wallet.setupall() + If Bitnote_Digger.Visible Then Bitnote_Digger.setupall() + If Skinshifter.Visible Then Skinshifter.setupall() + If Shiftnet.Visible Then Shiftnet.setupall() + If Downloader.Visible Then Downloader.setupall() + If Dodge.Visible Then Dodge.setupall() + If Downloadmanager.Visible Then Downloadmanager.setupall() + If Installer.Visible Then Installer.setupall() + If Snakey.Visible Then Snakey.setupall() + If systeminfo.Visible Then systeminfo.setupall() + If OrcWrite.Visible Then OrcWrite.setupall() + If FloodGate_Manager.Visible Then FloodGate_Manager.setupall() + If Labyrinth.Visible Then Labyrinth.setupall() + If VirusScanner.Visible Then VirusScanner.setupall() + If terminalfullscreen = False Then Terminal.setupall() + If Not My.Computer.FileSystem.DirectoryExists(ShiftOSPath & "\Home\Desktop") Then + IO.Directory.CreateDirectory(ShiftOSPath & "\Home\Desktop") + End If + 'Desktop Icons + If unitymode = False Then + refreshIcons() + End If + + 'Setup windows + If unitymode = False Then + desktopicons.Visible = True + desktopicons.BackColor = Skins.desktopbackgroundcolour + If Skins.desktopbackground Is Nothing Then desktopicons.BackgroundImage = Nothing Else desktopicons.BackgroundImage = Skins.desktopbackground + desktopicons.BackgroundImageLayout = Skins.desktopbackgroundlayout + Me.BackColor = Skins.desktopbackgroundcolour + If Skins.desktopbackground Is Nothing Then Me.BackgroundImage = Nothing Else Me.BackgroundImage = Skins.desktopbackground + Me.BackgroundImageLayout = Skins.desktopbackgroundlayout + Else + Me.BackColor = globaltransparencycolour + Me.BackgroundImage = Nothing + desktopicons.Visible = False + Me.TransparencyKey = globaltransparencycolour + End If + + shiftwindowsontop() + ToolStripManager.Renderer = New MyToolStripRenderer() + + If boughtdesktoppanel = True Then + If Skins.desktoppanel Is Nothing Then + desktoppanel.BackColor = Skins.desktoppanelcolour + desktoppanel.BackgroundImage = Nothing + Else + desktoppanel.BackgroundImage = Skins.desktoppanel + desktoppanel.BackgroundImageLayout = Skins.desktoppanellayout + desktoppanel.BackColor = Color.Transparent + End If + + desktoppanel.Size = New Size(desktoppanel.Size.Width, Skins.desktoppanelheight) + Select Case Skins.desktoppanelposition + Case "Top" + desktoppanel.Dock = DockStyle.Top + desktopappmenu.Dock = DockStyle.Top + Case "Bottom" + desktoppanel.Dock = DockStyle.Bottom + desktopappmenu.Dock = DockStyle.Bottom + End Select + desktoppanel.Show() + Else + desktoppanel.Hide() + End If + + If boughtapplaunchermenu = True Then + + ApplicationsToolStripMenuItem.Font = New Font(Skins.applicationbuttontextfont, Skins.applicationbuttontextsize, Skins.applicationbuttontextstyle) + ApplicationsToolStripMenuItem.Text = applicationlaunchername + KnowledgeInputToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + ShiftoriumToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + ClockToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + ShifterToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + TerminalToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + PongToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + FileSkimmerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + TextPadToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + SkinLoaderToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + ArtpadToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + CalculatorToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + AudioplayerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + WebBrowserToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + VideoplayerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + NameChangerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + IconManagerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + BitnoteWalletToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + BitnoteDiggerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + SkinShifterToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + ShiftnetToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + DodgeToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + downloadmanagerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + InstallerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + sysinfoToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + orcwriteToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + FloodGateToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + VirusScannerToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + SnakeyToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + MazeToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + ShutdownToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + UnityToolStripMenuItem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + desktopappmenu.ImageScalingSize = New Size(launchericonsize, launchericonsize) + KnowledgeInputToolStripMenuItem.Text = knowledgeinputname + ShiftoriumToolStripMenuItem.Text = shiftoriumname + ClockToolStripMenuItem.Text = clockname + ShifterToolStripMenuItem.Text = shiftername + TerminalToolStripMenuItem.Text = terminalname + PongToolStripMenuItem.Text = pongname + FileSkimmerToolStripMenuItem.Text = fileskimmername + TextPadToolStripMenuItem.Text = textpadname + SkinLoaderToolStripMenuItem.Text = skinloadername + ArtpadToolStripMenuItem.Text = artpadname + CatalystToolStripMenuItem1.Text = catalystname + CatalystToolStripMenuItem1.ForeColor = Skins.launcheritemcolour + CatalystToolStripMenuItem1.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + CalculatorToolStripMenuItem.Text = calculatorname + AudioplayerToolStripMenuItem.Text = audioplayername + WebBrowserToolStripMenuItem.Text = webbrowsername + VideoplayerToolStripMenuItem.Text = videoplayername + NameChangerToolStripMenuItem.Text = namechangername + IconManagerToolStripMenuItem.Text = iconmanagername + BitnoteWalletToolStripMenuItem.Text = bitnotewalletname + BitnoteDiggerToolStripMenuItem.Text = bitnotediggername + SkinShifterToolStripMenuItem.Text = skinshiftername + ShiftnetToolStripMenuItem.Text = shiftnetname + DodgeToolStripMenuItem.Text = dodgename + downloadmanagerToolStripMenuItem.Text = downloadmanagername + InstallerToolStripMenuItem.Text = installername + sysinfoToolStripMenuItem.Text = sysinfoname + orcwriteToolStripMenuItem.Text = orcwritename + FloodGateToolStripMenuItem.Text = floodgatename + MazeToolStripMenuItem.Text = mazename + VirusScannerToolStripMenuItem.Text = virusscannername + KnowledgeInputToolStripMenuItem.ForeColor = Skins.launcheritemcolour + ShiftoriumToolStripMenuItem.ForeColor = Skins.launcheritemcolour + ClockToolStripMenuItem.ForeColor = Skins.launcheritemcolour + ShiftoriumToolStripMenuItem.ForeColor = Skins.launcheritemcolour + ShifterToolStripMenuItem.ForeColor = Skins.launcheritemcolour + TerminalToolStripMenuItem.ForeColor = Skins.launcheritemcolour + PongToolStripMenuItem.ForeColor = Skins.launcheritemcolour + FileSkimmerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + TextPadToolStripMenuItem.ForeColor = Skins.launcheritemcolour + SkinLoaderToolStripMenuItem.ForeColor = Skins.launcheritemcolour + ArtpadToolStripMenuItem.ForeColor = Skins.launcheritemcolour + CalculatorToolStripMenuItem.ForeColor = Skins.launcheritemcolour + AudioplayerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + WebBrowserToolStripMenuItem.ForeColor = Skins.launcheritemcolour + VideoplayerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + NameChangerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + IconManagerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + BitnoteWalletToolStripMenuItem.ForeColor = Skins.launcheritemcolour + BitnoteDiggerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + SkinShifterToolStripMenuItem.ForeColor = Skins.launcheritemcolour + ShiftnetToolStripMenuItem.ForeColor = Skins.launcheritemcolour + DodgeToolStripMenuItem.ForeColor = Skins.launcheritemcolour + downloadmanagerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + InstallerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + sysinfoToolStripMenuItem.ForeColor = Skins.launcheritemcolour + orcwriteToolStripMenuItem.ForeColor = Skins.launcheritemcolour + FloodGateToolStripMenuItem.ForeColor = Skins.launcheritemcolour + VirusScannerToolStripMenuItem.ForeColor = Skins.launcheritemcolour + MazeToolStripMenuItem.ForeColor = Skins.launcheritemcolour + SnakeyToolStripMenuItem.ForeColor = Skins.launcheritemcolour + ShutdownToolStripMenuItem.ForeColor = Skins.launcheritemcolour + UnityToolStripMenuItem.ForeColor = Skins.launcheritemcolour + applaunchermenuholder.Size = ApplicationsToolStripMenuItem.Size + ApplicationsToolStripMenuItem.ForeColor = Skins.applicationsbuttontextcolour + desktopappmenu.BackColor = Skins.applauncherbuttoncolour + applaunchermenuholder.Height = Skins.applicationbuttonheight + desktopappmenu.Height = Skins.applicationbuttonheight + ApplicationsToolStripMenuItem.Height = Skins.applicationbuttonheight + ApplicationsToolStripMenuItem.Visible = True + TerminalToolStripMenuItem.Visible = True + + + + + ApplicationsToolStripMenuItem.Height = Skins.applicationbuttonheight + If Not IsNothing(Skins.applauncher) Then + ApplicationsToolStripMenuItem.Text = "" + ApplicationsToolStripMenuItem.BackColor = Color.Transparent + Else + ApplicationsToolStripMenuItem.Text = Skins.applicationlaunchername + ApplicationsToolStripMenuItem.BackColor = Skins.applauncherbackgroundcolour + ApplicationsToolStripMenuItem.BackgroundImage = Nothing + End If + + applaunchermenuholder.Width = Skins.applaunchermenuholderwidth + desktopappmenu.Width = Skins.applaunchermenuholderwidth + ApplicationsToolStripMenuItem.Width = Skins.applaunchermenuholderwidth + If Not IsNothing(Skins.applauncher) Then ApplicationsToolStripMenuItem.BackgroundImage = Skins.applauncher Else ApplicationsToolStripMenuItem.BackColor = Skins.applauncherbackgroundcolour + ApplicationsToolStripMenuItem.BackgroundImageLayout = Skins.applauncherlayout + + Else + ApplicationsToolStripMenuItem.Visible = False + End If + + 'DevX's Advanced App Launcher Skin Code + For Each item In allPrograms.DropDownItems 'Clever way of adding proper font to All Programs, where each subitem of each item is skinned. This uses the default App Launcher skinning system, so you could + 'indeed rip an entire XP skin, as this engine is also used by the Desktop++ Right-click menu. + item.ForeColor = Skins.launcheritemcolour + item.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + For Each subitem In item.DropDownItems + subitem.ForeColor = Skins.launcheritemcolour + subitem.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + Next + Next + + btnadvshutdown.Text = Skins.shutdownstring + lbuser.Font = New Font(Skins.usernamefont, Skins.usernamefontsize, Skins.usernamefontstyle) + lbuser.ForeColor = Skins.usernametextcolor + lbuser.BackColor = Skins.userNamePanelBackgroundColor + If IsNothing(Skins.userNamePanelBackground) Then lbuser.BackgroundImage = Nothing Else lbuser.BackgroundImage = Skins.userNamePanelBackground + lbuser.BackgroundImageLayout = Skins.usrPanelBackgroundLayout + btnadvshutdown.BackColor = Skins.powerPanelBackgroundColor + If IsNothing(Skins.powerPanelBackgroundImage) Then btnadvshutdown.BackgroundImage = Nothing Else btnadvshutdown.BackgroundImage = Skins.powerPanelBackgroundImage + btnadvshutdown.BackgroundImageLayout = Skins.pwrPanelBackgroundLayout + + If Skins.recentIconsHorizontal = True Then + lvadvfiles.Alignment = ListViewAlignment.Top + lvadvfiles.View = View.LargeIcon + Else + lvadvfiles.Alignment = ListViewAlignment.Left + lvadvfiles.View = View.SmallIcon + End If + + Select Case Skins.placesSide + Case "Left" + pnladvplaces.Dock = DockStyle.Left + Case "Right" + pnladvplaces.Dock = DockStyle.Right + End Select + + + pnladvtopbar.Height = Skins.topBarHeight + pnladvbottombar.Height = Skins.bottomBarHeight + Select Case Skins.userNamePosition + Case "Top, Left" + lbuser.TextAlign = ContentAlignment.TopLeft + Case "Top, Middle" + lbuser.TextAlign = ContentAlignment.TopCenter + Case "Top, Right" + lbuser.TextAlign = ContentAlignment.TopRight + Case "Middle, Left" + lbuser.TextAlign = ContentAlignment.MiddleLeft + Case "Middle, Middle" + lbuser.TextAlign = ContentAlignment.MiddleCenter + Case "Middle, Right" + lbuser.TextAlign = ContentAlignment.MiddleRight + Case "Bottom, Left" + lbuser.TextAlign = ContentAlignment.BottomLeft + Case "Bottom, Middle" + lbuser.TextAlign = ContentAlignment.BottomCenter + Case "Bottom. Right" + lbuser.TextAlign = ContentAlignment.BottomRight + End Select + + 'End ADV App Launcher Code + + 'Desktop++ Skin Code + ContextMenuStrip1.ForeColor = Skins.launcheritemcolour + ContextMenuStrip1.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + For Each item In NewToolStripMenuItem.DropDownItems + item.ForeColor = Skins.launcheritemcolour + item.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + Next + For Each item In TileViewToolStripMenuItem.DropDownItems + item.ForeColor = Skins.launcheritemcolour + item.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle) + Next + + 'End Desktop++ Code + + + If boughtalclock = True Then + ClockToolStripMenuItem.Visible = True + If boughtclockicon = True Then + ClockToolStripMenuItem.Image = clockiconlauncher + End If + Else + ClockToolStripMenuItem.Visible = False + End If + + If boughtalknowledgeinput = True Then + KnowledgeInputToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + KnowledgeInputToolStripMenuItem.Image = knowledgeinputiconlauncher + End If + Else + KnowledgeInputToolStripMenuItem.Visible = False + End If + + If boughtalshiftorium = True Then + ShiftoriumToolStripMenuItem.Visible = True + If boughtshiftoriumicon = True Then + ShiftoriumToolStripMenuItem.Image = shiftoriumiconlauncher + End If + Else + ShiftoriumToolStripMenuItem.Visible = False + End If + + If boughtalshifter = True Then + ShifterToolStripMenuItem.Visible = True + If boughtshiftericon = True Then + ShifterToolStripMenuItem.Image = shiftericonlauncher + End If + Else + ShifterToolStripMenuItem.Visible = False + End If + + If boughtalpong = True Then + PongToolStripMenuItem.Visible = True + If boughtpongicon = True Then + PongToolStripMenuItem.Image = pongiconlauncher + End If + Else + PongToolStripMenuItem.Visible = False + End If + + If boughtskinloader = True Then + NewSkin.Visible = True + Else + NewSkin.Visible = False + End If + + If boughtalfileskimmer = True Then + FileSkimmerToolStripMenuItem.Visible = True + If boughtfileskimmericon = True Then + FileSkimmerToolStripMenuItem.Image = fileskimmericonlauncher + End If + Else + FileSkimmerToolStripMenuItem.Visible = False + End If + + If boughtaltextpad = True Then + TextPadToolStripMenuItem.Visible = True + If boughttextpadicon = True Then + TextPadToolStripMenuItem.Image = textpadiconlauncher + End If + Else + TextPadToolStripMenuItem.Visible = False + End If + + If boughtskinning = True Then + SkinLoaderToolStripMenuItem.Visible = True + SkinLoaderToolStripMenuItem.Image = skinloadericonlauncher + Else + SkinLoaderToolStripMenuItem.Visible = False + End If + + If boughtalartpad = True Then + ArtpadToolStripMenuItem.Visible = True + If boughtartpadicon = True Then + ArtpadToolStripMenuItem.Image = artpadiconlauncher + End If + Else + ArtpadToolStripMenuItem.Visible = False + End If + + If installedcalculator = True Then + CalculatorToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + CalculatorToolStripMenuItem.Image = calculatoriconlauncher + End If + Else + CalculatorToolStripMenuItem.Visible = False + End If + + If installedaudioplayer = True Then + AudioplayerToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + AudioplayerToolStripMenuItem.Image = audioplayericonlauncher + End If + Else + AudioplayerToolStripMenuItem.Visible = False + End If + + If installedwebbrowser = True Then + WebBrowserToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + WebBrowserToolStripMenuItem.Image = webbrowsericonlauncher + End If + Else + WebBrowserToolStripMenuItem.Visible = False + End If + + If installedvideoplayer = True Then + VideoplayerToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + VideoplayerToolStripMenuItem.Image = videoplayericonlauncher + End If + Else + VideoplayerToolStripMenuItem.Visible = False + End If + + If boughtnamechanger = True Then + NameChangerToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + NameChangerToolStripMenuItem.Image = namechangericonlauncher + End If + Else + NameChangerToolStripMenuItem.Visible = False + End If + + If boughticonmanager = True Then + IconManagerToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + IconManagerToolStripMenuItem.Image = iconmanagericonlauncher + End If + Else + IconManagerToolStripMenuItem.Visible = False + End If + + If boughtbitnotewallet = True Then + BitnoteWalletToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + BitnoteWalletToolStripMenuItem.Image = bitnotewalleticonlauncher + End If + Else + BitnoteWalletToolStripMenuItem.Visible = False + End If + + If boughtbitnotedigger = True Then + BitnoteDiggerToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + BitnoteDiggerToolStripMenuItem.Image = bitnotediggericonlauncher + End If + Else + BitnoteDiggerToolStripMenuItem.Visible = False + End If + + If boughtskinshifter = True Then + SkinShifterToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + SkinShifterToolStripMenuItem.Image = skinshiftericonlauncher + End If + Else + SkinShifterToolStripMenuItem.Visible = False + End If + + If boughtshiftnet = True Then + ShiftnetToolStripMenuItem.Visible = True + If boughtshiftneticon = True Then + ShiftnetToolStripMenuItem.Image = shiftneticonlauncher + End If + Else + ShiftnetToolStripMenuItem.Visible = False + End If + + If installeddodge = True Then + DodgeToolStripMenuItem.Visible = True + If boughtshiftneticon = True Then + DodgeToolStripMenuItem.Image = dodgeiconlauncher + End If + Else + DodgeToolStripMenuItem.Visible = False + End If + + If boughtdownloadmanager = True Then + downloadmanagerToolStripMenuItem.Visible = True + If boughtknowledgeinputicon = True Then + downloadmanagerToolStripMenuItem.Image = downloadmanagericonlauncher + End If + Else + downloadmanagerToolStripMenuItem.Visible = False + End If + + If boughtinstaller = True Then + InstallerToolStripMenuItem.Visible = True + If boughtshiftneticon = True Then + InstallerToolStripMenuItem.Image = installericonlauncher + End If + Else + InstallerToolStripMenuItem.Visible = False + End If + + If installedsnakey = True Then + SnakeyToolStripMenuItem.Visible = True + If boughtshiftneticon = True Then + SnakeyToolStripMenuItem.Image = snakeyiconlauncher + End If + Else + SnakeyToolStripMenuItem.Visible = False + End If + + If installedsysinfo = True Then + sysinfoToolStripMenuItem.Visible = True + If boughtsysinfoicon = True Then + sysinfoToolStripMenuItem.Image = sysinfoiconlauncher + End If + Else + sysinfoToolStripMenuItem.Visible = False + End If + + If installedorcwrite = True Then + orcwriteToolStripMenuItem.Visible = True + If boughtshiftneticon = True Then + orcwriteToolStripMenuItem.Image = orcwriteiconlauncher + End If + Else + orcwriteToolStripMenuItem.Visible = False + End If + + If installedfloodgate = True Then + FloodGateToolStripMenuItem.Visible = True + If boughtshiftneticon = True Then + FloodGateToolStripMenuItem.Image = floodgateiconlauncher + End If + Else + FloodGateToolStripMenuItem.Visible = False + End If + + If installedmaze = True Then + MazeToolStripMenuItem.Visible = True + If boughtshiftneticon = True Then + MazeToolStripMenuItem.Image = mazeiconlauncher + End If + Else + MazeToolStripMenuItem.Visible = False + End If + If installedvirusscanner = True Then + VirusScannerToolStripMenuItem.Visible = True + If boughtvirusscannericon = True Then + VirusScannerToolStripMenuItem.Image = virusscannericonlauncher + End If + Else + VirusScannerToolStripMenuItem.Visible = False + End If + + + If boughtdesktoppanelclock = True Then + setclocktime() + paneltimetext.ForeColor = Skins.clocktextcolour + + If Skins.panelclock Is Nothing Then + timepanel.BackColor = Skins.clockbackgroundcolor + timepanel.BackgroundImage = Nothing + Else + timepanel.BackColor = Color.Transparent + timepanel.BackgroundImage = panelclock + timepanel.BackgroundImageLayout = panelclocklayout + End If + paneltimetext.Font = New Font(Skins.panelclocktextfont, Skins.panelclocktextsize, Skins.panelclocktextstyle) + timepanel.Size = New Size(paneltimetext.Width + 3, timepanel.Height) + paneltimetext.Location = New Point(0, Skins.panelclocktexttop) + timepanel.Show() + Else + timepanel.Hide() + End If + + If boughtapplaunchershutdown = True Then + ShutdownToolStripMenuItem.Visible = True + unitySeperator.Visible = True + If boughtshutdownicon = True Then + ShutdownToolStripMenuItem.Image = shutdowniconlauncher + End If + Else + ShutdownToolStripMenuItem.Visible = False + unitySeperator.Visible = False + End If + + If boughtunitymodetoggle = True Then + UnityToolStripMenuItem.Visible = True + unitySeperator.Visible = True + If boughtunitytoggleicon = True Then + UnityToolStripMenuItem.Image = unitytoggleiconlauncher + End If + Else + UnityToolStripMenuItem.Visible = False + End If + + If boughtterminalicon = True Then + TerminalToolStripMenuItem.Image = terminaliconlauncher + End If + + If boughttitlebar = False Then + Skins.titlebarheight = 0 + End If + + If boughtwindowborders = False Then + Skins.borderwidth = 0 + End If + + setuppanelbuttons() + + ApplicationsToolStripMenuItem.BackColor = Skins.applauncherbuttoncolour + 'Fixes an AL bug with ADVAL + + If boughtadvapplauncher = True Then + For Each item In ApplicationsToolStripMenuItem.DropDownItems + item.Visible = False + Next + Else + For Each item In ApplicationsToolStripMenuItem.DropDownItems + item.Visible = True + Next + End If + End Sub + + + + Public Sub setuppanelbuttons() + If boughtpanelbuttons Then + If Catalyst_Main.Visible Then pnlcatalystpanelbutton.Visible = True Else pnlcatalystpanelbutton.Visible = False + If Knowledge_Input.Visible Then pnlpanelbuttonknowledgeinput.Show() Else pnlpanelbuttonknowledgeinput.Hide() + If Shiftorium.Visible Then pnlpanelbuttonshiftorium.Show() Else pnlpanelbuttonshiftorium.Hide() + If Clock.Visible Then pnlpanelbuttonclock.Show() Else pnlpanelbuttonclock.Hide() + If Shifter.Visible Then pnlpanelbuttonshifter.Show() Else pnlpanelbuttonshifter.Hide() + If Colour_Picker.Visible Then pnlpanelbuttoncolourpicker.Show() Else pnlpanelbuttoncolourpicker.Hide() + If infobox.Visible Then pnlpanelbuttoninfobox.Show() Else pnlpanelbuttoninfobox.Hide() + If Pong.Visible Then pnlpanelbuttonpong.Show() Else pnlpanelbuttonpong.Hide() + If File_Skimmer.Visible Then pnlpanelbuttonfileskimmer.Show() Else pnlpanelbuttonfileskimmer.Hide() + If File_Opener.Visible Then pnlpanelbuttonfileopener.Show() Else pnlpanelbuttonfileopener.Hide() + If File_Saver.Visible Then pnlpanelbuttonfilesaver.Show() Else pnlpanelbuttonfilesaver.Hide() + If TextPad.Visible Then pnlpanelbuttontextpad.Show() Else pnlpanelbuttontextpad.Hide() + If Graphic_Picker.Visible Then pnlpanelbuttongraphicpicker.Show() Else pnlpanelbuttongraphicpicker.Hide() + If Skin_Loader.Visible Then pnlpanelbuttonskinloader.Show() Else pnlpanelbuttonskinloader.Hide() + If ArtPad.Visible Then pnlpanelbuttonartpad.Show() Else pnlpanelbuttonartpad.Hide() + If Calculator.Visible Then pnlpanelbuttoncalculator.Show() Else pnlpanelbuttoncalculator.Hide() + If Audio_Player.Visible Then pnlpanelbuttonaudioplayer.Show() Else pnlpanelbuttonaudioplayer.Hide() + If Web_Browser.Visible Then pnlpanelbuttonwebbrowser.Show() Else pnlpanelbuttonwebbrowser.Hide() + If Video_Player.Visible Then pnlpanelbuttonvideoplayer.Show() Else pnlpanelbuttonvideoplayer.Hide() + If Name_Changer.Visible Then pnlpanelbuttonnamechanger.Show() Else pnlpanelbuttonnamechanger.Hide() + If Icon_Manager.Visible Then pnlpanelbuttoniconmanager.Show() Else pnlpanelbuttoniconmanager.Hide() + If Bitnote_Wallet.Visible Then pnlpanelbuttonbitnotewallet.Show() Else pnlpanelbuttonbitnotewallet.Hide() + If Bitnote_Digger.Visible Then pnlpanelbuttonbitnotedigger.Show() Else pnlpanelbuttonbitnotedigger.Hide() + If Skinshifter.Visible Then pnlpanelbuttonskinshifter.Show() Else pnlpanelbuttonskinshifter.Hide() + If Shiftnet.Visible Then pnlpanelbuttonshiftnet.Show() Else pnlpanelbuttonshiftnet.Hide() + If Downloader.Visible Then pnlpanelbuttondownloader.Show() Else pnlpanelbuttondownloader.Hide() + If Dodge.Visible Then pnlpanelbuttondodge.Show() Else pnlpanelbuttondodge.Hide() + If Downloadmanager.Visible Then pnlpanelbuttondownloadmanager.Show() Else pnlpanelbuttondownloadmanager.Hide() + If Installer.Visible Then pnlpanelbuttoninstaller.Show() Else pnlpanelbuttoninstaller.Hide() + If Snakey.Visible Then pnl_panelbuttonsnakey.Show() Else pnl_panelbuttonsnakey.Hide() + If systeminfo.Visible Then pnlpanelbuttonsysinfo.Show() Else pnlpanelbuttonsysinfo.Hide() + If OrcWrite.Visible Then pnlpanelbuttonorcwrite.Show() Else pnlpanelbuttonorcwrite.Hide() + If FloodGate_Manager.Visible Then pnlpanelbuttonfloodgate.Show() Else pnlpanelbuttonfloodgate.Hide() + If Labyrinth.Visible Then pnlpanelbuttonmaze.Show() Else pnlpanelbuttonmaze.Hide() + If VirusScanner.Visible Then pnlpanelbuttonvirusscanner.Show() Else pnlpanelbuttonvirusscanner.Hide() + If Terminal.Visible Then pnlpanelbuttonterminal.Show() Else pnlpanelbuttonterminal.Hide() + + tbknowledgeinputicon.Image = knowledgeinputiconpanelbutton.Clone + lbcatalystname.Text = catalystname + tbknowledgeinputtext.Text = knowledgeinputname + tbshiftoriumtext.Text = shiftoriumname + tbclocktext.Text = clockname + tbshiftertext.Text = shiftername + tbcolourpickertext.Text = colourpickername + tbpongtext.Text = pongname + tbfileskimmertext.Text = fileskimmername + tbfileopenertext.Text = fileopenername + tbfilesavertext.Text = filesavername + tbtextpadtext.Text = textpadname + tbgraphicpickertext.Text = graphicpickername + tbskinloadertext.Text = skinloadername + tbartpadtext.Text = artpadname + tbcalculatortext.Text = calculatorname + tbaudioplayertext.Text = audioplayername + tbwebbrowsertext.Text = webbrowsername + tbvideoplayertext.Text = videoplayername + tbnamechangertext.Text = namechangername + tbiconmanagertext.Text = iconmanagername + tbbitnotewallettext.Text = bitnotewalletname + tbbitnotediggertext.Text = bitnotediggername + tbskinshiftertext.Text = skinshiftername + tbshiftnettext.Text = shiftnetname + tbdownloadertext.Text = downloadername + tbdodgetext.Text = dodgename + tbdownloadmanagertext.Text = downloadmanagername + tbinstallertext.Text = installername + tbsnakeytext.Text = snakeyname + tbsysinfotext.Text = sysinfoname + tborcwritetext.Text = orcwritename + tbfloodgatetext.Text = floodgatename + tbmazetext.Text = mazename + tbvirusscannertext.Text = virusscannername + tbterminaltext.Text = terminalname + + pnlpanelbuttonknowledgeinput.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonshiftorium.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonclock.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonshifter.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttoncolourpicker.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttoninfobox.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonpong.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonfileskimmer.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonfileopener.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonfilesaver.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttontextpad.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttongraphicpicker.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonskinloader.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonartpad.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttoncalculator.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonaudioplayer.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonwebbrowser.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonvideoplayer.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonnamechanger.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttoniconmanager.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonbitnotewallet.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonbitnotedigger.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonskinshifter.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonshiftnet.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttondownloader.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttondodge.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttondownloadmanager.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttoninstaller.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnl_panelbuttonsnakey.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonsysinfo.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonorcwrite.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonfloodgate.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonmaze.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonvirusscanner.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + pnlpanelbuttonterminal.Margin = New Padding(0, Skins.panelbuttonfromtop, Skins.panelbuttongap, 0) + + setpanelbuttonappearnce(pnlpanelbuttonknowledgeinput, tbknowledgeinputicon, tbknowledgeinputtext, False) + setpanelbuttonappearnce(pnlpanelbuttonshiftorium, tbshiftoriumicon, tbshiftoriumtext, False) + setpanelbuttonappearnce(pnlpanelbuttonclock, tbclockicon, tbclocktext, False) + setpanelbuttonappearnce(pnlpanelbuttonshifter, tbshiftericon, tbshiftertext, False) + setpanelbuttonappearnce(pnlpanelbuttoncolourpicker, tbcolourpickericon, tbcolourpickertext, False) + setpanelbuttonappearnce(pnlpanelbuttoninfobox, tbinfoboxicon, tbinfoboxtext, False) + setpanelbuttonappearnce(pnlpanelbuttonpong, tbpongicon, tbpongtext, False) + setpanelbuttonappearnce(pnlpanelbuttonfileskimmer, tbfileskimmericon, tbfileskimmertext, False) + setpanelbuttonappearnce(pnlpanelbuttonfileopener, tbfileopenericon, tbfileopenertext, False) + setpanelbuttonappearnce(pnlpanelbuttonfilesaver, tbfilesavericon, tbfilesavertext, False) + setpanelbuttonappearnce(pnlpanelbuttontextpad, tbtextpadicon, tbtextpadtext, False) + setpanelbuttonappearnce(pnlpanelbuttongraphicpicker, tbgraphicpickericon, tbgraphicpickertext, False) + setpanelbuttonappearnce(pnlpanelbuttonskinloader, tbskinloadericon, tbskinloadertext, False) + setpanelbuttonappearnce(pnlpanelbuttonartpad, tbartpadicon, tbartpadtext, False) + setpanelbuttonappearnce(pnlpanelbuttoncalculator, tbcalculatoricon, tbcalculatortext, False) + setpanelbuttonappearnce(pnlpanelbuttonaudioplayer, tbaudioplayericon, tbaudioplayertext, False) + setpanelbuttonappearnce(pnlpanelbuttonwebbrowser, tbwebbrowsericon, tbwebbrowsertext, False) + setpanelbuttonappearnce(pnlpanelbuttonvideoplayer, tbvideoplayericon, tbvideoplayertext, False) + setpanelbuttonappearnce(pnlpanelbuttonnamechanger, tbnamechangericon, tbnamechangertext, False) + setpanelbuttonappearnce(pnlpanelbuttoniconmanager, tbiconmanagericon, tbiconmanagertext, False) + setpanelbuttonappearnce(pnlpanelbuttonbitnotewallet, tbbitnotewalleticon, tbbitnotewallettext, False) + setpanelbuttonappearnce(pnlpanelbuttonbitnotedigger, tbbitnotediggericon, tbbitnotediggertext, False) + setpanelbuttonappearnce(pnlpanelbuttonskinshifter, tbskinshiftericon, tbskinshiftertext, False) + setpanelbuttonappearnce(pnlpanelbuttonshiftnet, tbshiftneticon, tbshiftnettext, False) + setpanelbuttonappearnce(pnlpanelbuttondownloader, tbdownloadericon, tbdownloadertext, False) + setpanelbuttonappearnce(pnlpanelbuttondodge, tbdodgeicon, tbdodgetext, False) + setpanelbuttonappearnce(pnlpanelbuttondownloadmanager, tbdownloadmanagericon, tbdownloadmanagertext, False) + setpanelbuttonappearnce(pnlpanelbuttoninstaller, tbinstallericon, tbinstallertext, False) + setpanelbuttonappearnce(pnl_panelbuttonsnakey, tbsnakeyicon, tbsnakeytext, False) + setpanelbuttonappearnce(pnlpanelbuttonsysinfo, tbsysinfoicon, tbsysinfotext, False) + setpanelbuttonappearnce(pnlpanelbuttonorcwrite, tborcwriteicon, tborcwritetext, False) + setpanelbuttonappearnce(pnlpanelbuttonfloodgate, tbfloodgateicon, tbfloodgatetext, False) + setpanelbuttonappearnce(pnlpanelbuttonmaze, tbmazeicon, tbmazetext, False) + setpanelbuttonappearnce(pnlpanelbuttonvirusscanner, tbvirusscannericon, tbvirusscannertext, False) + setpanelbuttonappearnce(pnlpanelbuttonterminal, tbterminalicon, tbterminaltext, False) + + setuppanelbuttonicons(tbknowledgeinputicon, knowledgeinputiconpanelbutton) + setuppanelbuttonicons(tbshiftoriumicon, shiftoriumiconpanelbutton) + setuppanelbuttonicons(tbclockicon, clockiconpanelbutton) + setuppanelbuttonicons(tbshiftericon, shiftericonpanelbutton) + setuppanelbuttonicons(tbcolourpickericon, colourpickericonpanelbutton) + setuppanelbuttonicons(tbinfoboxicon, infoboxiconpanelbutton) + setuppanelbuttonicons(tbpongicon, pongiconpanelbutton) + setuppanelbuttonicons(tbfileskimmericon, fileskimmericonpanelbutton) + setuppanelbuttonicons(tbfileopenericon, fileopenericonpanelbutton) + setuppanelbuttonicons(tbfilesavericon, filesavericonpanelbutton) + setuppanelbuttonicons(tbtextpadicon, textpadiconpanelbutton) + setuppanelbuttonicons(tbgraphicpickericon, graphicpickericonpanelbutton) + setuppanelbuttonicons(tbskinloadericon, skinloadericonpanelbutton) + setuppanelbuttonicons(tbartpadicon, artpadiconpanelbutton) + setuppanelbuttonicons(tbcalculatoricon, calculatoriconpanelbutton) + setuppanelbuttonicons(tbaudioplayericon, audioplayericonpanelbutton) + setuppanelbuttonicons(tbwebbrowsericon, webbrowsericonpanelbutton) + setuppanelbuttonicons(tbvideoplayericon, videoplayericonpanelbutton) + setuppanelbuttonicons(tbnamechangericon, namechangericonpanelbutton) + setuppanelbuttonicons(tbiconmanagericon, iconmanagericonpanelbutton) + setuppanelbuttonicons(tbbitnotewalleticon, bitnotewalleticonpanelbutton) + setuppanelbuttonicons(tbbitnotediggericon, bitnotediggericonpanelbutton) + setuppanelbuttonicons(tbskinshiftericon, skinshiftericonpanelbutton) + setuppanelbuttonicons(tbshiftneticon, shiftneticonpanelbutton) + setuppanelbuttonicons(tbdownloadericon, downloadericonpanelbutton) + setuppanelbuttonicons(tbdodgeicon, dodgeiconpanelbutton) + setuppanelbuttonicons(tbdownloadmanagericon, downloadmanagericonpanelbutton) + setuppanelbuttonicons(tbinstallericon, installericonpanelbutton) + setuppanelbuttonicons(tbsnakeyicon, snakeyiconpanelbutton) + setuppanelbuttonicons(tbsysinfoicon, sysinfoiconpanelbutton) + setuppanelbuttonicons(tborcwriteicon, orcwriteiconpanelbutton) + setuppanelbuttonicons(tbfloodgateicon, floodgateiconpanelbutton) + setuppanelbuttonicons(tbmazeicon, mazeiconpanelbutton) + setuppanelbuttonicons(tbvirusscannericon, virusscannericonpanelbutton) + setuppanelbuttonicons(tbterminalicon, terminaliconpanelbutton) + + pnlpanelbuttonholder.Padding = New Padding(Skins.panelbuttoninitialgap, 0, 0, 0) + End If + End Sub + + Public Sub setuppanelbuttonicons(ByVal tbicon As PictureBox, ByVal image As Image) + tbicon.Image = image + tbicon.Size = New Size(Skins.panelbuttoniconsize, Skins.panelbuttoniconsize) + End Sub + + Public Sub setpanelbuttonappearnce(ByVal panelbutton As Panel, ByVal icon As PictureBox, ByVal text As Label, ByVal sendback As Boolean) + If sendback = True Then panelbutton.SendToBack() + icon.Location = New Point(Skins.panelbuttoniconside, Skins.panelbuttonicontop) + icon.Size = New Size(Skins.panelbuttoniconsize, Skins.panelbuttoniconsize) + panelbutton.Size = New Size(Skins.panelbuttonwidth, Skins.panelbuttonheight) + panelbutton.BackColor = Skins.panelbuttoncolour + panelbutton.BackgroundImage = Skins.panelbutton + If Skins.panelbutton Is Nothing Then Else panelbutton.BackColor = Color.Transparent + panelbutton.BackgroundImageLayout = Skins.panelbuttonlayout + text.ForeColor = Skins.panelbuttontextcolour + text.Font = New Font(Skins.panelbuttontextfont, Skins.panelbuttontextsize, Skins.panelbuttontextstyle) + text.Location = New Point(Skins.panelbuttontextside, Skins.panelbuttontexttop) + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.BringToFront() + If terminalfullscreen = True Then Terminal.fullterminal() + End If + End Sub + + Public Sub closeeverything() + + If boughtmultitasking = False Then + For Each f In My.Application.OpenForms.Cast(Of Form)().ToArray() + Select Case f.Name + Case "ShiftOSDesktop", "HijackScreen", "ShiftOS Save File Converter" + 'do nothing + Case Else + f.Close() + End Select + Next + + End If + + If forceclose = True Then + For Each f In My.Application.OpenForms.Cast(Of Form)().ToArray() + Select Case f.Name + Case "ShiftOSDesktop", "HijackScreen", "ShiftOS Save File Converter" + 'do nothing + Case Else + f.Close() + End Select + Next + End If + forceclose = False + End Sub + + Public Sub shutdownshiftos() + forceclose = True + closeeverything() + Terminal.txtterm.Text = Terminal.txtterm.Text & Environment.NewLine & "System Is Shutting Down..." & Environment.NewLine + log = log & My.Computer.Clock.LocalTime & " ShutDown ShiftOS with " & codepoints & " Code Points!" & Environment.NewLine + savegame() + Terminal.tmrshutdown.Start() + Try + playSound(sounddir & "shutdown.wav", AudioPlayMode.WaitToComplete) + Catch ex As Exception + 'Do nothing -- I haven't found a good shutdown sound... + End Try + End Sub + + Public Sub addtitlebars() + + 'attempted future code to dramatically increase development time and simplify code + 'For Each f In My.Application.OpenForms.Cast(Of Form)().ToArray() + ' Select Case f.Name + ' Case "ShiftOSDesktop", "HijackScreen", "ShiftOS Save File Converter" + ' 'do nothing + ' Case Else + ' If f.Visible = True Then + ' f.titlebar.Show() + ' f.setuptitlebar() + ' f.Size = New Size(f.Width, f.Size.Height + f.titlebar.Height) + ' End If + ' End Select + 'Next + + 'This cause windows to shrink with the new skinning system + 'If Knowledge_Input.Visible = True Then + ' Knowledge_Input.titlebar.Show() + ' Knowledge_Input.setuptitlebar() + ' Knowledge_Input.Size = New Size(Knowledge_Input.Width, Knowledge_Input.Size.Height + Knowledge_Input.titlebar.Height) + 'End If + + 'If Shiftorium.Visible = True Then + ' Shiftorium.titlebar.Show() + ' Shiftorium.setuptitlebar() + ' Shiftorium.Size = New Size(Shiftorium.Width, Shiftorium.Size.Height + Shiftorium.titlebar.Height) + 'End If + + 'If Clock.Visible = True Then + ' Clock.titlebar.Show() + ' Clock.setuptitlebar() + ' Clock.Size = New Size(Clock.Width, Clock.Size.Height + Clock.titlebar.Height) + 'End If + + 'If Shifter.Visible = True Then + ' Shifter.titlebar.Show() + ' Shifter.setuptitlebar() + ' Shifter.Size = New Size(Shifter.Width, Shifter.Size.Height + Shifter.titlebar.Height) + 'End If + + 'If Colour_Picker.Visible = True Then + ' Colour_Picker.titlebar.Show() + ' Colour_Picker.setuptitlebar() + ' Colour_Picker.Size = New Size(Colour_Picker.Width, Colour_Picker.Size.Height + Colour_Picker.titlebar.Height) + 'End If + + 'If infobox.Visible = True Then + ' infobox.titlebar.Show() + ' infobox.setuptitlebar() + ' infobox.Size = New Size(infobox.Width, infobox.Size.Height + infobox.titlebar.Height) + 'End If + + 'If Pong.Visible = True Then + ' Pong.titlebar.Show() + ' Pong.setuptitlebar() + ' Pong.Size = New Size(Pong.Width, Pong.Size.Height + Pong.titlebar.Height) + 'End If + + 'If File_Skimmer.Visible = True Then + ' File_Skimmer.titlebar.Show() + ' File_Skimmer.setuptitlebar() + ' File_Skimmer.Size = New Size(File_Skimmer.Width, File_Skimmer.Size.Height + File_Skimmer.titlebar.Height) + 'End If + + 'If TextPad.Visible = True Then + ' TextPad.titlebar.Show() + ' TextPad.setuptitlebar() + ' TextPad.Size = New Size(TextPad.Width, TextPad.Size.Height + TextPad.titlebar.Height) + 'End If + + 'If File_Opener.Visible = True Then + ' File_Opener.titlebar.Show() + ' File_Opener.setuptitlebar() + ' File_Opener.Size = New Size(File_Opener.Width, File_Opener.Size.Height + File_Opener.titlebar.Height) + 'End If + + 'If File_Saver.Visible = True Then + ' File_Saver.titlebar.Show() + ' File_Saver.setuptitlebar() + ' File_Saver.Size = New Size(File_Saver.Width, File_Saver.Size.Height + File_Saver.titlebar.Height) + 'End If + + 'If Graphic_Picker.Visible = True Then + ' Graphic_Picker.titlebar.Show() + ' Graphic_Picker.setuptitlebar() + ' Graphic_Picker.Size = New Size(Graphic_Picker.Width, Graphic_Picker.Size.Height + Graphic_Picker.titlebar.Height) + 'End If + + 'If Skin_Loader.Visible = True Then + ' Skin_Loader.titlebar.Show() + ' Skin_Loader.setuptitlebar() + ' Skin_Loader.Size = New Size(Skin_Loader.Width, Skin_Loader.Size.Height + Skin_Loader.titlebar.Height) + 'End If + + ''If ArtPad.Visible = True Then + '' ArtPad.titlebar.Show() + '' ArtPad.setuptitlebar() + '' ArtPad.Size = New Size(ArtPad.Width, ArtPad.Size.Height + ArtPad.titlebar.Height) + ''End If + + 'If Calculator.Visible = True Then + ' Calculator.titlebar.Show() + ' Calculator.setuptitlebar() + ' Calculator.Size = New Size(Calculator.Width, Calculator.Size.Height + Calculator.titlebar.Height) + 'End If + + 'If Audio_Player.Visible = True Then + ' Audio_Player.titlebar.Show() + ' Audio_Player.setuptitlebar() + ' Audio_Player.Size = New Size(Audio_Player.Width, Audio_Player.Size.Height + Audio_Player.titlebar.Height) + 'End If + + 'If Web_Browser.Visible = True Then + ' Web_Browser.titlebar.Show() + ' Web_Browser.setuptitlebar() + ' Web_Browser.Size = New Size(Web_Browser.Width, Web_Browser.Size.Height + Web_Browser.titlebar.Height) + 'End If + + 'If Name_Changer.Visible = True Then + ' Name_Changer.titlebar.Show() + ' Name_Changer.setuptitlebar() + ' Name_Changer.Size = New Size(Name_Changer.Width, Name_Changer.Size.Height + Name_Changer.titlebar.Height) + 'End If + + 'If Icon_Manager.Visible = True Then + ' Icon_Manager.titlebar.Show() + ' Icon_Manager.setuptitlebar() + ' Icon_Manager.Size = New Size(Icon_Manager.Width, Icon_Manager.Size.Height + Icon_Manager.titlebar.Height) + 'End If + + 'If Bitnote_Wallet.Visible = True Then + ' Bitnote_Wallet.titlebar.Show() + ' Bitnote_Wallet.setuptitlebar() + ' Bitnote_Wallet.Size = New Size(Bitnote_Wallet.Width, Bitnote_Wallet.Size.Height + Bitnote_Wallet.titlebar.Height) + 'End If + + 'If Bitnote_Digger.Visible = True Then + ' Bitnote_Digger.titlebar.Show() + ' Bitnote_Digger.setuptitlebar() + ' Bitnote_Digger.Size = New Size(Bitnote_Digger.Width, Bitnote_Digger.Size.Height + Bitnote_Digger.titlebar.Height) + 'End If + + 'If Skinshifter.Visible = True Then + ' Skinshifter.titlebar.Show() + ' Skinshifter.setuptitlebar() + ' Skinshifter.Size = New Size(Skinshifter.Width, Skinshifter.Size.Height + Skinshifter.titlebar.Height) + 'End If + + 'If Shiftnet.Visible = True Then + ' Shiftnet.titlebar.Show() + ' Shiftnet.setuptitlebar() + ' Shiftnet.Size = New Size(Shiftnet.Width, Shiftnet.Size.Height + Shiftnet.titlebar.Height) + 'End If + + 'If Downloader.Visible = True Then + ' Downloader.titlebar.Show() + ' Downloader.setuptitlebar() + ' Downloader.Size = New Size(Downloader.Width, Downloader.Size.Height + Downloader.titlebar.Height) + 'End If + + 'If Dodge.Visible = True Then + ' Dodge.titlebar.Show() + ' Dodge.setuptitlebar() + ' Dodge.Size = New Size(Dodge.Width, Dodge.Size.Height + Dodge.titlebar.Height) + 'End If + + 'If Downloadmanager.Visible = True Then + ' Downloadmanager.titlebar.Show() + ' Downloadmanager.setuptitlebar() + ' Downloadmanager.Size = New Size(Downloadmanager.Width, Downloadmanager.Size.Height + Downloadmanager.titlebar.Height) + 'End If + + 'If Installer.Visible = True Then + ' Installer.titlebar.Show() + ' Installer.setuptitlebar() + ' Installer.Size = New Size(Installer.Width, Installer.Size.Height + Installer.titlebar.Height) + 'End If + + 'If Snakey.Visible = True Then + ' Snakey.titlebar.Show() + ' Snakey.setuptitlebar() + ' Snakey.Size = New Size(Installer.Width, Installer.Size.Height + Installer.titlebar.Height) + 'End If + + 'If systeminfo.Visible = True Then + ' systeminfo.titlebar.Show() + ' systeminfo.setuptitlebar() + ' systeminfo.Size = New Size(Installer.Width, Installer.Size.Height + Installer.titlebar.Height) + 'End If + + 'If OrcWrite.Visible = True Then + ' OrcWrite.titlebar.Show() + ' OrcWrite.setuptitlebar() + ' OrcWrite.Size = New Size(Installer.Width, Installer.Size.Height + Installer.titlebar.Height) + 'End If + + 'If FloodGate_Manager.Visible = True Then + ' FloodGate_Manager.titlebar.Show() + ' FloodGate_Manager.setuptitlebar() + ' FloodGate_Manager.Size = New Size(Installer.Width, Installer.Size.Height + Installer.titlebar.Height) + 'End If + + 'If VirusScanner.Visible = True Then + ' VirusScanner.titlebar.Show() + ' VirusScanner.setuptitlebar() + ' VirusScanner.Size = New Size(Installer.Width, Installer.Size.Height + Installer.titlebar.Height) + 'End If + + 'If template.Visible = True Then + ' template.titlebar.Show() + ' template.setuptitlebar() + ' template.Size = New Size(ArtPad.Width, ArtPad.Size.Height + ArtPad.titlebar.Height) + 'End If + + 'If terminalfullscreen = False Then + ' If Terminal.Visible = True Then + ' Terminal.titlebar.Show() + ' Terminal.setuptitlebar() + ' Terminal.Size = New Size(Terminal.Width, Terminal.Size.Height + Terminal.titlebar.Height) + ' End If + 'End If + End Sub + + Public Sub addborders() + Knowledge_Input.pgleft.Show() + Knowledge_Input.pgbottom.Show() + Knowledge_Input.pgright.Show() + Knowledge_Input.Size = New Size(Knowledge_Input.Width + Knowledge_Input.pgleft.Width + Knowledge_Input.pgright.Width, Knowledge_Input.Height + Knowledge_Input.pgbottom.Height) + If boughttitlebar = True Then Knowledge_Input.setuptitlebar() + + Shiftorium.pgleft.Show() + Shiftorium.pgbottom.Show() + Shiftorium.pgright.Show() + Shiftorium.Size = New Size(Shiftorium.Width + Shiftorium.pgleft.Width + Shiftorium.pgright.Width, Shiftorium.Height + Shiftorium.pgbottom.Height) + If boughttitlebar = True Then Shiftorium.setuptitlebar() + + Clock.pgleft.Show() + Clock.pgbottom.Show() + Clock.pgright.Show() + Clock.Size = New Size(Clock.Width + Clock.pgleft.Width + Clock.pgright.Width, Clock.Height + Clock.pgbottom.Height) + If boughttitlebar = True Then Clock.setuptitlebar() + + Shifter.pgleft.Show() + Shifter.pgbottom.Show() + Shifter.pgright.Show() + Shifter.Size = New Size(Shifter.Width + Shifter.pgleft.Width + Shifter.pgright.Width, Shifter.Height + Shifter.pgbottom.Height) + If boughttitlebar = True Then Shifter.setuptitlebar() + + Colour_Picker.pgleft.Show() + Colour_Picker.pgbottom.Show() + Colour_Picker.pgright.Show() + Colour_Picker.Size = New Size(Colour_Picker.Width + Colour_Picker.pgleft.Width + Colour_Picker.pgright.Width, Colour_Picker.Height + Colour_Picker.pgbottom.Height) + If boughttitlebar = True Then Colour_Picker.setuptitlebar() + + infobox.pgleft.Show() + infobox.pgbottom.Show() + infobox.pgright.Show() + infobox.Size = New Size(infobox.Width + infobox.pgleft.Width + infobox.pgright.Width, infobox.Height + infobox.pgbottom.Height) + If boughttitlebar = True Then infobox.setuptitlebar() + + Pong.pgleft.Show() + Pong.pgbottom.Show() + Pong.pgright.Show() + Pong.Size = New Size(Pong.Width + Pong.pgleft.Width + Pong.pgright.Width, Pong.Height + Pong.pgbottom.Height) + If boughttitlebar = True Then Pong.setuptitlebar() + + File_Skimmer.pgleft.Show() + File_Skimmer.pgbottom.Show() + File_Skimmer.pgright.Show() + File_Skimmer.Size = New Size(File_Skimmer.Width + File_Skimmer.pgleft.Width + File_Skimmer.pgright.Width, File_Skimmer.Height + File_Skimmer.pgbottom.Height) + If boughttitlebar = True Then File_Skimmer.setuptitlebar() + + TextPad.pgleft.Show() + TextPad.pgbottom.Show() + TextPad.pgright.Show() + TextPad.Size = New Size(File_Skimmer.Width + TextPad.pgleft.Width + TextPad.pgright.Width, TextPad.Height + TextPad.pgbottom.Height) + If boughttitlebar = True Then TextPad.setuptitlebar() + + File_Opener.pgleft.Show() + File_Opener.pgbottom.Show() + File_Opener.pgright.Show() + File_Opener.Size = New Size(File_Skimmer.Width + File_Opener.pgleft.Width + File_Opener.pgright.Width, File_Opener.Height + File_Opener.pgbottom.Height) + If boughttitlebar = True Then File_Opener.setuptitlebar() + + File_Saver.pgleft.Show() + File_Saver.pgbottom.Show() + File_Saver.pgright.Show() + File_Saver.Size = New Size(File_Skimmer.Width + File_Saver.pgleft.Width + File_Saver.pgright.Width, File_Saver.Height + File_Saver.pgbottom.Height) + If boughttitlebar = True Then File_Saver.setuptitlebar() + + Graphic_Picker.pgleft.Show() + Graphic_Picker.pgbottom.Show() + Graphic_Picker.pgright.Show() + Graphic_Picker.Size = New Size(Graphic_Picker.Width + Graphic_Picker.pgleft.Width + Graphic_Picker.pgright.Width, Graphic_Picker.Height + Graphic_Picker.pgbottom.Height) + If boughttitlebar = True Then Graphic_Picker.setuptitlebar() + + Skin_Loader.pgleft.Show() + Skin_Loader.pgbottom.Show() + Skin_Loader.pgright.Show() + Skin_Loader.Size = New Size(Skin_Loader.Width + Skin_Loader.pgleft.Width + Skin_Loader.pgright.Width, Skin_Loader.Height + Skin_Loader.pgbottom.Height) + If boughttitlebar = True Then Skin_Loader.setuptitlebar() + + ArtPad.pgleft.Show() + ArtPad.pgbottom.Show() + ArtPad.pgright.Show() + ArtPad.Size = New Size(ArtPad.Width + ArtPad.pgleft.Width + ArtPad.pgright.Width, ArtPad.Height + ArtPad.pgbottom.Height) + If boughttitlebar = True Then ArtPad.setuptitlebar() + + Calculator.pgleft.Show() + Calculator.pgbottom.Show() + Calculator.pgright.Show() + Calculator.Size = New Size(Calculator.Width + Calculator.pgleft.Width + Calculator.pgright.Width, Calculator.Height + Calculator.pgbottom.Height) + If boughttitlebar = True Then Calculator.setuptitlebar() + + Audio_Player.pgleft.Show() + Audio_Player.pgbottom.Show() + Audio_Player.pgright.Show() + Audio_Player.Size = New Size(Audio_Player.Width + Audio_Player.pgleft.Width + Audio_Player.pgright.Width, Audio_Player.Height + Audio_Player.pgbottom.Height) + If boughttitlebar = True Then Audio_Player.setuptitlebar() + + Web_Browser.pgleft.Show() + Web_Browser.pgbottom.Show() + Web_Browser.pgright.Show() + Web_Browser.Size = New Size(Web_Browser.Width + Web_Browser.pgleft.Width + Web_Browser.pgright.Width, Web_Browser.Height + Web_Browser.pgbottom.Height) + If boughttitlebar = True Then Web_Browser.setuptitlebar() + + Video_Player.pgleft.Show() + Video_Player.pgbottom.Show() + Video_Player.pgright.Show() + Video_Player.Size = New Size(Video_Player.Width + Video_Player.pgleft.Width + Video_Player.pgright.Width, Video_Player.Height + Video_Player.pgbottom.Height) + If boughttitlebar = True Then Video_Player.setuptitlebar() + + Name_Changer.pgleft.Show() + Name_Changer.pgbottom.Show() + Name_Changer.pgright.Show() + Name_Changer.Size = New Size(Name_Changer.Width + Name_Changer.pgleft.Width + Name_Changer.pgright.Width, Name_Changer.Height + Name_Changer.pgbottom.Height) + If boughttitlebar = True Then Name_Changer.setuptitlebar() + + Icon_Manager.pgleft.Show() + Icon_Manager.pgbottom.Show() + Icon_Manager.pgright.Show() + Icon_Manager.Size = New Size(Icon_Manager.Width + Icon_Manager.pgleft.Width + Icon_Manager.pgright.Width, Icon_Manager.Height + Icon_Manager.pgbottom.Height) + If boughttitlebar = True Then Icon_Manager.setuptitlebar() + + Bitnote_Wallet.pgleft.Show() + Bitnote_Wallet.pgbottom.Show() + Bitnote_Wallet.pgright.Show() + Bitnote_Wallet.Size = New Size(Bitnote_Wallet.Width + Bitnote_Wallet.pgleft.Width + Bitnote_Wallet.pgright.Width, Bitnote_Wallet.Height + Bitnote_Wallet.pgbottom.Height) + If boughttitlebar = True Then Bitnote_Wallet.setuptitlebar() + + Bitnote_Digger.pgleft.Show() + Bitnote_Digger.pgbottom.Show() + Bitnote_Digger.pgright.Show() + Bitnote_Digger.Size = New Size(Bitnote_Digger.Width + Bitnote_Digger.pgleft.Width + Bitnote_Digger.pgright.Width, Bitnote_Digger.Height + Bitnote_Digger.pgbottom.Height) + If boughttitlebar = True Then Bitnote_Digger.setuptitlebar() + + Skinshifter.pgleft.Show() + Skinshifter.pgbottom.Show() + Skinshifter.pgright.Show() + Skinshifter.Size = New Size(Skinshifter.Width + Skinshifter.pgleft.Width + Skinshifter.pgright.Width, Skinshifter.Height + Skinshifter.pgbottom.Height) + If boughttitlebar = True Then Skinshifter.setuptitlebar() + + Shiftnet.pgleft.Show() + Shiftnet.pgbottom.Show() + Shiftnet.pgright.Show() + Shiftnet.Size = New Size(Shiftnet.Width + Shiftnet.pgleft.Width + Shiftnet.pgright.Width, Shiftnet.Height + Shiftnet.pgbottom.Height) + If boughttitlebar = True Then Shiftnet.setuptitlebar() + + Downloader.pgleft.Show() + Downloader.pgbottom.Show() + Downloader.pgright.Show() + Downloader.Size = New Size(Downloader.Width + Downloader.pgleft.Width + Downloader.pgright.Width, Downloader.Height + Downloader.pgbottom.Height) + If boughttitlebar = True Then Downloader.setuptitlebar() + + Dodge.pgleft.Show() + Dodge.pgbottom.Show() + Dodge.pgright.Show() + Dodge.Size = New Size(Dodge.Width + Dodge.pgleft.Width + Dodge.pgright.Width, Dodge.Height + Dodge.pgbottom.Height) + If boughttitlebar = True Then Dodge.setuptitlebar() + + Downloadmanager.pgleft.Show() + Downloadmanager.pgbottom.Show() + Downloadmanager.pgright.Show() + Downloadmanager.Size = New Size(Downloadmanager.Width + Downloadmanager.pgleft.Width + Downloadmanager.pgright.Width, Downloadmanager.Height + Downloadmanager.pgbottom.Height) + If boughttitlebar = True Then Downloadmanager.setuptitlebar() + + Installer.pgleft.Show() + Installer.pgbottom.Show() + Installer.pgright.Show() + Installer.Size = New Size(Installer.Width + Installer.pgleft.Width + Installer.pgright.Width, Installer.Height + Installer.pgbottom.Height) + If boughttitlebar = True Then Installer.setuptitlebar() + + Snakey.pgleft.Show() + Snakey.pgbottom.Show() + Snakey.pgright.Show() + Snakey.Size = New Size(Snakey.Width + Snakey.pgleft.Width + Snakey.pgright.Width, Snakey.Height + Snakey.pgbottom.Height) + If boughttitlebar = True Then Snakey.setuptitlebar() + + systeminfo.pgleft.Show() + systeminfo.pgbottom.Show() + systeminfo.pgright.Show() + systeminfo.Size = New Size(systeminfo.Width + systeminfo.pgleft.Width + systeminfo.pgright.Width, systeminfo.Height + systeminfo.pgbottom.Height) + If boughttitlebar = True Then systeminfo.setuptitlebar() + + OrcWrite.pgleft.Show() + OrcWrite.pgbottom.Show() + OrcWrite.pgright.Show() + OrcWrite.Size = New Size(OrcWrite.Width + OrcWrite.pgleft.Width + OrcWrite.pgright.Width, OrcWrite.Height + OrcWrite.pgbottom.Height) + If boughttitlebar = True Then OrcWrite.setuptitlebar() + + FloodGate_Manager.pgleft.Show() + FloodGate_Manager.pgbottom.Show() + FloodGate_Manager.pgright.Show() + FloodGate_Manager.Size = New Size(FloodGate_Manager.Width + FloodGate_Manager.pgleft.Width + FloodGate_Manager.pgright.Width, FloodGate_Manager.Height + FloodGate_Manager.pgbottom.Height) + If boughttitlebar = True Then FloodGate_Manager.setuptitlebar() + + VirusScanner.pgleft.Show() + VirusScanner.pgbottom.Show() + VirusScanner.pgright.Show() + VirusScanner.Size = New Size(VirusScanner.Width + VirusScanner.pgleft.Width + VirusScanner.pgright.Width, FloodGate_Manager.Height + FloodGate_Manager.pgbottom.Height) + If boughttitlebar = True Then VirusScanner.setuptitlebar() + + template.pgleft.Show() + template.pgbottom.Show() + template.pgright.Show() + template.Size = New Size(template.Width + template.pgleft.Width + template.pgright.Width, template.Height + template.pgbottom.Height) + If boughttitlebar = True Then ArtPad.setuptitlebar() + + If terminalfullscreen = False Then + Terminal.pgleft.Show() + Terminal.pgbottom.Show() + Terminal.pgright.Show() + Terminal.Size = New Size(Terminal.Width + Terminal.pgleft.Width + Terminal.pgright.Width, Terminal.Height + Terminal.pgbottom.Height) + If boughttitlebar = True Then Terminal.setuptitlebar() + End If + End Sub + + Public Sub shiftwindowsontop() + If unitymode = True Then + Me.TopMost = True + Knowledge_Input.TopMost = False + Shiftorium.TopMost = False + Clock.TopMost = False + Shifter.TopMost = False + Colour_Picker.TopMost = False + infobox.TopMost = False + Pong.TopMost = False + File_Skimmer.TopMost = False + TextPad.TopMost = False + File_Opener.TopMost = False + File_Saver.TopMost = False + Graphic_Picker.TopMost = False + Skin_Loader.TopMost = False + ArtPad.TopMost = False + Calculator.TopMost = False + Audio_Player.TopMost = False + Web_Browser.TopMost = False + Video_Player.TopMost = False + Name_Changer.TopMost = False + Icon_Manager.TopMost = False + Bitnote_Wallet.TopMost = False + Bitnote_Digger.TopMost = False + Skinshifter.TopMost = False + Shiftnet.TopMost = False + Downloader.TopMost = False + Dodge.TopMost = False + Downloadmanager.TopMost = False + Installer.TopMost = False + Snakey.TopMost = False + systeminfo.TopMost = False + OrcWrite.TopMost = False + FloodGate_Manager.TopMost = False + VirusScanner.TopMost = False + template.TopMost = False + Terminal.TopMost = False + Else + Me.BringToFront() + Me.TopMost = False + Knowledge_Input.TopMost = True + Shiftorium.TopMost = True + Clock.TopMost = True + Shifter.TopMost = True + Colour_Picker.TopMost = True + infobox.TopMost = True + Pong.TopMost = True + File_Skimmer.TopMost = True + TextPad.TopMost = True + File_Opener.TopMost = True + File_Saver.TopMost = True + Graphic_Picker.TopMost = True + Skin_Loader.TopMost = True + ArtPad.TopMost = True + Calculator.TopMost = True + Audio_Player.TopMost = True + Web_Browser.TopMost = True + Video_Player.TopMost = True + Name_Changer.TopMost = True + Icon_Manager.TopMost = True + Bitnote_Wallet.TopMost = True + Bitnote_Digger.TopMost = True + Skinshifter.TopMost = True + Shiftnet.TopMost = True + Downloader.TopMost = True + Dodge.TopMost = True + Downloadmanager.TopMost = True + Installer.TopMost = True + Snakey.TopMost = True + systeminfo.TopMost = True + OrcWrite.TopMost = True + FloodGate_Manager.TopMost = True + VirusScanner.TopMost = True + template.TopMost = True + Terminal.TopMost = True + End If + End Sub + + Public Sub loadskinfiles() + ' Old skin loading + 'If skinimages(0) = "" Then Else skinclosebutton(0) = GetImage(skinimages(0)) + 'If skinimages(1) = "" Then Else skinclosebutton(1) = GetImage(skinimages(1)) + 'If skinimages(2) = "" Then Else skinclosebutton(2) = GetImage(skinimages(2)) + 'If skinimages(3) = "" Then Else skintitlebar(0) = GetImage(skinimages(3)) + 'If skinimages(4) = "" Then Else skintitlebar(1) = GetImage(skinimages(4)) + 'If skinimages(5) = "" Then Else skintitlebar(2) = GetImage(skinimages(5)) + 'If skinimages(6) = "" Then Else skindesktopbackground(0) = GetImage(skinimages(6)) + 'If skinimages(7) = "" Then Else skindesktopbackground(1) = GetImage(skinimages(7)) + 'If skinimages(8) = "" Then Else skindesktopbackground(2) = GetImage(skinimages(8)) + 'If skinimages(9) = "" Then Else skinrollupbutton(0) = GetImage(skinimages(9)) + 'If skinimages(10) = "" Then Else skinrollupbutton(1) = GetImage(skinimages(10)) + 'If skinimages(11) = "" Then Else skinrollupbutton(2) = GetImage(skinimages(11)) + 'If skinimages(12) = "" Then Else skintitlebarrightcorner(0) = GetImage(skinimages(12)) + 'If skinimages(13) = "" Then Else skintitlebarrightcorner(1) = GetImage(skinimages(13)) + 'If skinimages(14) = "" Then Else skintitlebarrightcorner(2) = GetImage(skinimages(14)) + 'If skinimages(15) = "" Then Else skintitlebarleftcorner(0) = GetImage(skinimages(15)) + 'If skinimages(16) = "" Then Else skintitlebarleftcorner(1) = GetImage(skinimages(16)) + 'If skinimages(17) = "" Then Else skintitlebarleftcorner(2) = GetImage(skinimages(17)) + 'If skinimages(18) = "" Then Else skindesktoppanel(0) = GetImage(skinimages(18)) + 'If skinimages(19) = "" Then Else skindesktoppanel(1) = GetImage(skinimages(19)) + 'If skinimages(20) = "" Then Else skindesktoppanel(2) = GetImage(skinimages(20)) + 'If skinimages(21) = "" Then Else skindesktoppaneltime(0) = GetImage(skinimages(21)) + 'If skinimages(22) = "" Then Else skindesktoppaneltime(1) = GetImage(skinimages(22)) + 'If skinimages(23) = "" Then Else skindesktoppaneltime(2) = GetImage(skinimages(23)) + 'If skinimages(24) = "" Then Else skinapplauncherbutton(0) = GetImage(skinimages(24)) + 'If skinimages(25) = "" Then Else skinapplauncherbutton(1) = GetImage(skinimages(25)) + 'If skinimages(26) = "" Then Else skinapplauncherbutton(2) = GetImage(skinimages(26)) + 'If skinimages(27) = "" Then Else skinwindowborderleft(0) = GetImage(skinimages(27)) + 'If skinimages(28) = "" Then Else skinwindowborderleft(1) = GetImage(skinimages(28)) + 'If skinimages(29) = "" Then Else skinwindowborderleft(2) = GetImage(skinimages(29)) + 'If skinimages(30) = "" Then Else skinwindowborderright(0) = GetImage(skinimages(30)) + 'If skinimages(31) = "" Then Else skinwindowborderright(1) = GetImage(skinimages(31)) + 'If skinimages(32) = "" Then Else skinwindowborderright(2) = GetImage(skinimages(32)) + 'If skinimages(33) = "" Then Else skinwindowborderbottom(0) = GetImage(skinimages(33)) + 'If skinimages(34) = "" Then Else skinwindowborderbottom(1) = GetImage(skinimages(34)) + 'If skinimages(35) = "" Then Else skinwindowborderbottom(2) = GetImage(skinimages(35)) + 'If skinimages(36) = "" Then Else skinwindowborderbottomright(0) = GetImage(skinimages(36)) + 'If skinimages(37) = "" Then Else skinwindowborderbottomright(1) = GetImage(skinimages(37)) + 'If skinimages(38) = "" Then Else skinwindowborderbottomright(2) = GetImage(skinimages(38)) + 'If skinimages(39) = "" Then Else skinwindowborderbottomleft(0) = GetImage(skinimages(39)) + 'If skinimages(40) = "" Then Else skinwindowborderbottomleft(1) = GetImage(skinimages(40)) + 'If skinimages(41) = "" Then Else skinwindowborderbottomleft(2) = GetImage(skinimages(41)) + 'If skinimages(42) = "" Then Else skinminimizebutton(0) = GetImage(skinimages(42)) + 'If skinimages(43) = "" Then Else skinminimizebutton(1) = GetImage(skinimages(43)) + 'If skinimages(44) = "" Then Else skinminimizebutton(2) = GetImage(skinimages(44)) + 'If skinimages(45) = "" Then Else skinpanelbutton(0) = GetImage(skinimages(45)) + 'If skinimages(46) = "" Then Else skinpanelbutton(1) = GetImage(skinimages(46)) + 'If skinimages(47) = "" Then Else skinpanelbutton(2) = GetImage(skinimages(47)) + End Sub + + Private Function GetImage(ByVal fileName As String) As Bitmap + Dim ret As Bitmap + Using img As Image = Image.FromFile(fileName) + ret = New Bitmap(img) + End Using + Return ret + End Function + + 'Public Sub setcolours() + ' ' Why is this even here, windows are skinned in the template code + ' If Shiftorium.Visible = True Then + ' Shiftorium.titlebar.BackColor = titlebarcolour + ' Shiftorium.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Shiftorium.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Shiftorium.pgleft.BackColor = windowborderleftcolour + ' Shiftorium.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Shiftorium.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Shiftorium.pgright.BackColor = windowborderrightcolour + ' Shiftorium.pgright.BackgroundImage = skinwindowborderright(0) + ' Shiftorium.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Shiftorium.pgbottom.BackColor = windowborderbottomcolour + ' Shiftorium.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Shiftorium.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Shiftorium.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Shiftorium.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Shiftorium.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Shiftorium.pgbottomlcorner.Height = windowbordersize + ' Shiftorium.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Shiftorium.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Shiftorium.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Shiftorium.pgbottomrcorner.Height = windowbordersize + ' Else + ' Shiftorium.Close() + ' End If + + ' If Knowledge_Input.Visible = True Then + ' Knowledge_Input.titlebar.BackColor = titlebarcolour + ' Knowledge_Input.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Knowledge_Input.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Knowledge_Input.pgleft.BackColor = windowborderleftcolour + ' Knowledge_Input.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Knowledge_Input.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Knowledge_Input.pgright.BackColor = windowborderrightcolour + ' Knowledge_Input.pgright.BackgroundImage = skinwindowborderright(0) + ' Knowledge_Input.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Knowledge_Input.pgbottom.BackColor = windowborderbottomcolour + ' Knowledge_Input.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Knowledge_Input.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Knowledge_Input.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Knowledge_Input.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Knowledge_Input.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Knowledge_Input.pgbottomlcorner.Height = windowbordersize + ' Knowledge_Input.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Knowledge_Input.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Knowledge_Input.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Knowledge_Input.pgbottomrcorner.Height = windowbordersize + ' Else + ' Knowledge_Input.Close() + ' End If + + ' If Clock.Visible = True Then + ' Clock.titlebar.BackColor = titlebarcolour + ' Clock.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Clock.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Clock.pgleft.BackColor = windowborderleftcolour + ' Clock.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Clock.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Clock.pgright.BackColor = windowborderrightcolour + ' Clock.pgright.BackgroundImage = skinwindowborderright(0) + ' Clock.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Clock.pgbottom.BackColor = windowborderbottomcolour + ' Clock.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Clock.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Clock.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Clock.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Clock.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Clock.pgbottomlcorner.Height = windowbordersize + ' Clock.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Clock.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Clock.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Clock.pgbottomrcorner.Height = windowbordersize + ' Else + ' Clock.Close() + ' End If + + ' If Shifter.Visible = True Then + ' Shifter.titlebar.BackColor = titlebarcolour + ' Shifter.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Shifter.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Shifter.pgleft.BackColor = windowborderleftcolour + ' Shifter.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Shifter.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Shifter.pgright.BackColor = windowborderrightcolour + ' Shifter.pgright.BackgroundImage = skinwindowborderright(0) + ' Shifter.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Shifter.pgbottom.BackColor = windowborderbottomcolour + ' Shifter.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Shifter.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Shifter.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Shifter.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Shifter.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Shifter.pgbottomlcorner.Height = windowbordersize + ' Shifter.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Shifter.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Shifter.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Shifter.pgbottomrcorner.Height = windowbordersize + ' Else + ' Shifter.Close() + ' End If + + ' If Colour_Picker.Visible = True Then + ' Colour_Picker.titlebar.BackColor = titlebarcolour + ' Colour_Picker.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Colour_Picker.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Colour_Picker.pgleft.BackColor = windowborderleftcolour + ' Colour_Picker.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Colour_Picker.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Colour_Picker.pgright.BackColor = windowborderrightcolour + ' Colour_Picker.pgright.BackgroundImage = skinwindowborderright(0) + ' Colour_Picker.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Colour_Picker.pgbottom.BackColor = windowborderbottomcolour + ' Colour_Picker.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Colour_Picker.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Colour_Picker.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Colour_Picker.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Colour_Picker.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Colour_Picker.pgbottomlcorner.Height = windowbordersize + ' Colour_Picker.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Colour_Picker.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Colour_Picker.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Colour_Picker.pgbottomrcorner.Height = windowbordersize + ' Else + ' Colour_Picker.Close() + ' End If + + ' If infobox.Visible = True Then + ' infobox.titlebar.BackColor = titlebarcolour + ' infobox.pgtoplcorner.BackColor = titlebarleftcornercolour + ' infobox.pgtoprcorner.BackColor = titlebarrightcornercolour + ' infobox.pgleft.BackColor = windowborderleftcolour + ' infobox.pgleft.BackgroundImage = skinwindowborderleft(0) + ' infobox.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' infobox.pgright.BackColor = windowborderrightcolour + ' infobox.pgright.BackgroundImage = skinwindowborderright(0) + ' infobox.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' infobox.pgbottom.BackColor = windowborderbottomcolour + ' infobox.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' infobox.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' infobox.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' infobox.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' infobox.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' infobox.pgbottomlcorner.Height = windowbordersize + ' infobox.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' infobox.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' infobox.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' infobox.pgbottomrcorner.Height = windowbordersize + ' Else + ' infobox.Close() + ' End If + + ' If Pong.Visible = True Then + ' Pong.titlebar.BackColor = titlebarcolour + ' Pong.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Pong.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Pong.pgleft.BackColor = windowborderleftcolour + ' Pong.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Pong.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Pong.pgright.BackColor = windowborderrightcolour + ' Pong.pgright.BackgroundImage = skinwindowborderright(0) + ' Pong.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Pong.pgbottom.BackColor = windowborderbottomcolour + ' Pong.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Pong.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Pong.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Pong.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Pong.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Pong.pgbottomlcorner.Height = windowbordersize + ' Pong.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Pong.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Pong.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Pong.pgbottomrcorner.Height = windowbordersize + ' Else + ' Pong.Close() + ' End If + + ' If File_Skimmer.Visible = True Then + ' File_Skimmer.titlebar.BackColor = titlebarcolour + ' File_Skimmer.pgtoplcorner.BackColor = titlebarleftcornercolour + ' File_Skimmer.pgtoprcorner.BackColor = titlebarrightcornercolour + ' File_Skimmer.pgleft.BackColor = windowborderleftcolour + ' File_Skimmer.pgleft.BackgroundImage = skinwindowborderleft(0) + ' File_Skimmer.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' File_Skimmer.pgright.BackColor = windowborderrightcolour + ' File_Skimmer.pgright.BackgroundImage = skinwindowborderright(0) + ' File_Skimmer.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' File_Skimmer.pgbottom.BackColor = windowborderbottomcolour + ' File_Skimmer.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' File_Skimmer.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' File_Skimmer.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' File_Skimmer.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' File_Skimmer.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' File_Skimmer.pgbottomlcorner.Height = windowbordersize + ' File_Skimmer.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' File_Skimmer.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' File_Skimmer.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' File_Skimmer.pgbottomrcorner.Height = windowbordersize + ' Else + ' File_Skimmer.Close() + ' End If + + ' If TextPad.Visible = True Then + ' TextPad.titlebar.BackColor = titlebarcolour + ' TextPad.pgtoplcorner.BackColor = titlebarleftcornercolour + ' TextPad.pgtoprcorner.BackColor = titlebarrightcornercolour + ' TextPad.pgleft.BackColor = windowborderleftcolour + ' TextPad.pgleft.BackgroundImage = skinwindowborderleft(0) + ' TextPad.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' TextPad.pgright.BackColor = windowborderrightcolour + ' TextPad.pgright.BackgroundImage = skinwindowborderright(0) + ' TextPad.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' TextPad.pgbottom.BackColor = windowborderbottomcolour + ' TextPad.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' TextPad.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' TextPad.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' TextPad.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' TextPad.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' TextPad.pgbottomlcorner.Height = windowbordersize + ' TextPad.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' TextPad.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' TextPad.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' TextPad.pgbottomrcorner.Height = windowbordersize + ' Else + ' TextPad.Close() + ' End If + + + ' If File_Opener.Visible = True Then + ' File_Opener.titlebar.BackColor = titlebarcolour + ' File_Opener.pgtoplcorner.BackColor = titlebarleftcornercolour + ' File_Opener.pgtoprcorner.BackColor = titlebarrightcornercolour + ' File_Opener.pgleft.BackColor = windowborderleftcolour + ' File_Opener.pgleft.BackgroundImage = skinwindowborderleft(0) + ' File_Opener.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' File_Opener.pgright.BackColor = windowborderrightcolour + ' File_Opener.pgright.BackgroundImage = skinwindowborderright(0) + ' File_Opener.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' File_Opener.pgbottom.BackColor = windowborderbottomcolour + ' File_Opener.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' File_Opener.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' File_Opener.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' File_Opener.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' File_Opener.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' File_Opener.pgbottomlcorner.Height = windowbordersize + ' File_Opener.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' File_Opener.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' File_Opener.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' File_Opener.pgbottomrcorner.Height = windowbordersize + ' Else + ' File_Opener.Close() + ' End If + + ' If File_Saver.Visible = True Then + ' File_Saver.titlebar.BackColor = titlebarcolour + ' File_Saver.pgtoplcorner.BackColor = titlebarleftcornercolour + ' File_Saver.pgtoprcorner.BackColor = titlebarrightcornercolour + ' File_Saver.pgleft.BackColor = windowborderleftcolour + ' File_Saver.pgleft.BackgroundImage = skinwindowborderleft(0) + ' File_Saver.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' File_Saver.pgright.BackColor = windowborderrightcolour + ' File_Saver.pgright.BackgroundImage = skinwindowborderright(0) + ' File_Saver.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' File_Saver.pgbottom.BackColor = windowborderbottomcolour + ' File_Saver.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' File_Saver.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' File_Saver.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' File_Saver.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' File_Saver.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' File_Saver.pgbottomlcorner.Height = windowbordersize + ' File_Saver.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' File_Saver.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' File_Saver.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' File_Saver.pgbottomrcorner.Height = windowbordersize + ' Else + ' File_Saver.Close() + ' End If + + ' If Graphic_Picker.Visible = True Then + ' Graphic_Picker.titlebar.BackColor = titlebarcolour + ' Graphic_Picker.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Graphic_Picker.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Graphic_Picker.pgleft.BackColor = windowborderleftcolour + ' Graphic_Picker.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Graphic_Picker.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Graphic_Picker.pgright.BackColor = windowborderrightcolour + ' Graphic_Picker.pgright.BackgroundImage = skinwindowborderright(0) + ' Graphic_Picker.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Graphic_Picker.pgbottom.BackColor = windowborderbottomcolour + ' Graphic_Picker.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Graphic_Picker.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Graphic_Picker.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Graphic_Picker.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Graphic_Picker.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Graphic_Picker.pgbottomlcorner.Height = windowbordersize + ' Graphic_Picker.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Graphic_Picker.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Graphic_Picker.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Graphic_Picker.pgbottomrcorner.Height = windowbordersize + ' Else + ' Graphic_Picker.Close() + ' End If + + ' If Skin_Loader.Visible = True Then + ' Skin_Loader.titlebar.BackColor = titlebarcolour + ' Skin_Loader.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Skin_Loader.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Skin_Loader.pgleft.BackColor = windowborderleftcolour + ' Skin_Loader.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Skin_Loader.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Skin_Loader.pgright.BackColor = windowborderrightcolour + ' Skin_Loader.pgright.BackgroundImage = skinwindowborderright(0) + ' Skin_Loader.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Skin_Loader.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Skin_Loader.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Skin_Loader.pgbottom.BackColor = windowborderbottomcolour + ' Skin_Loader.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Skin_Loader.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Skin_Loader.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Skin_Loader.pgbottomlcorner.Height = windowbordersize + ' Skin_Loader.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Skin_Loader.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Skin_Loader.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Skin_Loader.pgbottomrcorner.Height = windowbordersize + ' Else + ' Skin_Loader.Close() + ' End If + + ' If ArtPad.Visible = True Then + ' ArtPad.titlebar.BackColor = titlebarcolour + ' ArtPad.pgtoplcorner.BackColor = titlebarleftcornercolour + ' ArtPad.pgtoprcorner.BackColor = titlebarrightcornercolour + ' ArtPad.pgleft.BackColor = windowborderleftcolour + ' ArtPad.pgleft.BackgroundImage = skinwindowborderleft(0) + ' ArtPad.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' ArtPad.pgright.BackColor = windowborderrightcolour + ' ArtPad.pgright.BackgroundImage = skinwindowborderright(0) + ' ArtPad.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' ArtPad.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' ArtPad.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' ArtPad.pgbottom.BackColor = windowborderbottomcolour + ' ArtPad.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' ArtPad.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' ArtPad.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' ArtPad.pgbottomlcorner.Height = windowbordersize + ' ArtPad.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' ArtPad.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' ArtPad.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' ArtPad.pgbottomrcorner.Height = windowbordersize + ' Else + ' ArtPad.Close() + ' End If + + ' If Calculator.Visible = True Then + ' Calculator.titlebar.BackColor = titlebarcolour + ' Calculator.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Calculator.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Calculator.pgleft.BackColor = windowborderleftcolour + ' Calculator.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Calculator.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Calculator.pgright.BackColor = windowborderrightcolour + ' Calculator.pgright.BackgroundImage = skinwindowborderright(0) + ' Calculator.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Calculator.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Calculator.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Calculator.pgbottom.BackColor = windowborderbottomcolour + ' Calculator.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Calculator.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Calculator.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Calculator.pgbottomlcorner.Height = windowbordersize + ' Calculator.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Calculator.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Calculator.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Calculator.pgbottomrcorner.Height = windowbordersize + ' Else + ' Calculator.Close() + ' End If + + ' If Audio_Player.Visible = True Then + ' Audio_Player.titlebar.BackColor = titlebarcolour + ' Audio_Player.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Audio_Player.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Audio_Player.pgleft.BackColor = windowborderleftcolour + ' Audio_Player.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Audio_Player.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Audio_Player.pgright.BackColor = windowborderrightcolour + ' Audio_Player.pgright.BackgroundImage = skinwindowborderright(0) + ' Audio_Player.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Audio_Player.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Audio_Player.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Audio_Player.pgbottom.BackColor = windowborderbottomcolour + ' Audio_Player.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Audio_Player.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Audio_Player.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Audio_Player.pgbottomlcorner.Height = windowbordersize + ' Audio_Player.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Audio_Player.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Audio_Player.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Audio_Player.pgbottomrcorner.Height = windowbordersize + ' Else + ' Audio_Player.Close() + ' End If + + ' If Web_Browser.Visible = True Then + ' Web_Browser.titlebar.BackColor = titlebarcolour + ' Web_Browser.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Web_Browser.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Web_Browser.pgleft.BackColor = windowborderleftcolour + ' Web_Browser.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Web_Browser.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Web_Browser.pgright.BackColor = windowborderrightcolour + ' Web_Browser.pgright.BackgroundImage = skinwindowborderright(0) + ' Web_Browser.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Web_Browser.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Web_Browser.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Web_Browser.pgbottom.BackColor = windowborderbottomcolour + ' Web_Browser.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Web_Browser.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Web_Browser.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Web_Browser.pgbottomlcorner.Height = windowbordersize + ' Web_Browser.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Web_Browser.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Web_Browser.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Web_Browser.pgbottomrcorner.Height = windowbordersize + ' Else + ' Web_Browser.Close() + ' End If + + ' If Video_Player.Visible = True Then + ' Video_Player.titlebar.BackColor = titlebarcolour + ' Video_Player.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Video_Player.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Video_Player.pgleft.BackColor = windowborderleftcolour + ' Video_Player.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Video_Player.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Video_Player.pgright.BackColor = windowborderrightcolour + ' Video_Player.pgright.BackgroundImage = skinwindowborderright(0) + ' Video_Player.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Video_Player.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Video_Player.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Video_Player.pgbottom.BackColor = windowborderbottomcolour + ' Video_Player.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Video_Player.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Video_Player.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Video_Player.pgbottomlcorner.Height = windowbordersize + ' Video_Player.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Video_Player.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Video_Player.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Video_Player.pgbottomrcorner.Height = windowbordersize + ' Else + ' Video_Player.Close() + ' End If + + ' If Name_Changer.Visible = True Then + ' Name_Changer.titlebar.BackColor = titlebarcolour + ' Name_Changer.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Name_Changer.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Name_Changer.pgleft.BackColor = windowborderleftcolour + ' Name_Changer.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Name_Changer.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Name_Changer.pgright.BackColor = windowborderrightcolour + ' Name_Changer.pgright.BackgroundImage = skinwindowborderright(0) + ' Name_Changer.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Name_Changer.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Name_Changer.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Name_Changer.pgbottom.BackColor = windowborderbottomcolour + ' Name_Changer.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Name_Changer.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Name_Changer.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Name_Changer.pgbottomlcorner.Height = windowbordersize + ' Name_Changer.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Name_Changer.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Name_Changer.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Name_Changer.pgbottomrcorner.Height = windowbordersize + ' Else + ' Name_Changer.Close() + ' End If + + ' If Icon_Manager.Visible = True Then + ' Icon_Manager.titlebar.BackColor = titlebarcolour + ' Icon_Manager.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Icon_Manager.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Icon_Manager.pgleft.BackColor = windowborderleftcolour + ' Icon_Manager.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Icon_Manager.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Icon_Manager.pgright.BackColor = windowborderrightcolour + ' Icon_Manager.pgright.BackgroundImage = skinwindowborderright(0) + ' Icon_Manager.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Icon_Manager.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Icon_Manager.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Icon_Manager.pgbottom.BackColor = windowborderbottomcolour + ' Icon_Manager.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Icon_Manager.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Icon_Manager.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Icon_Manager.pgbottomlcorner.Height = windowbordersize + ' Icon_Manager.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Icon_Manager.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Icon_Manager.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Icon_Manager.pgbottomrcorner.Height = windowbordersize + ' Else + ' Icon_Manager.Close() + ' End If + + ' If Bitnote_Wallet.Visible = True Then + ' Bitnote_Wallet.titlebar.BackColor = titlebarcolour + ' Bitnote_Wallet.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Bitnote_Wallet.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Bitnote_Wallet.pgleft.BackColor = windowborderleftcolour + ' Bitnote_Wallet.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Bitnote_Wallet.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Bitnote_Wallet.pgright.BackColor = windowborderrightcolour + ' Bitnote_Wallet.pgright.BackgroundImage = skinwindowborderright(0) + ' Bitnote_Wallet.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Bitnote_Wallet.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Bitnote_Wallet.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Bitnote_Wallet.pgbottom.BackColor = windowborderbottomcolour + ' Bitnote_Wallet.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Bitnote_Wallet.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Bitnote_Wallet.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Bitnote_Wallet.pgbottomlcorner.Height = windowbordersize + ' Bitnote_Wallet.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Bitnote_Wallet.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Bitnote_Wallet.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Bitnote_Wallet.pgbottomrcorner.Height = windowbordersize + ' Else + ' Bitnote_Wallet.Close() + ' End If + + ' If Bitnote_Digger.Visible = True Then + ' Bitnote_Digger.titlebar.BackColor = titlebarcolour + ' Bitnote_Digger.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Bitnote_Digger.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Bitnote_Digger.pgleft.BackColor = windowborderleftcolour + ' Bitnote_Digger.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Bitnote_Digger.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Bitnote_Digger.pgright.BackColor = windowborderrightcolour + ' Bitnote_Digger.pgright.BackgroundImage = skinwindowborderright(0) + ' Bitnote_Digger.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Bitnote_Digger.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Bitnote_Digger.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Bitnote_Digger.pgbottom.BackColor = windowborderbottomcolour + ' Bitnote_Digger.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Bitnote_Digger.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Bitnote_Digger.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Bitnote_Digger.pgbottomlcorner.Height = windowbordersize + ' Bitnote_Digger.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Bitnote_Digger.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Bitnote_Digger.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Bitnote_Digger.pgbottomrcorner.Height = windowbordersize + ' Else + ' Bitnote_Digger.Close() + ' End If + + ' If Skinshifter.Visible = True Then + ' Skinshifter.titlebar.BackColor = titlebarcolour + ' Skinshifter.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Skinshifter.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Skinshifter.pgleft.BackColor = windowborderleftcolour + ' Skinshifter.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Skinshifter.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Skinshifter.pgright.BackColor = windowborderrightcolour + ' Skinshifter.pgright.BackgroundImage = skinwindowborderright(0) + ' Skinshifter.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Skinshifter.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Skinshifter.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Skinshifter.pgbottom.BackColor = windowborderbottomcolour + ' Skinshifter.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Skinshifter.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Skinshifter.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Skinshifter.pgbottomlcorner.Height = windowbordersize + ' Skinshifter.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Skinshifter.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Skinshifter.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Skinshifter.pgbottomrcorner.Height = windowbordersize + ' Else + ' Skinshifter.Close() + ' End If + + ' If Shiftnet.Visible = True Then + ' Shiftnet.titlebar.BackColor = titlebarcolour + ' Shiftnet.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Shiftnet.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Shiftnet.pgleft.BackColor = windowborderleftcolour + ' Shiftnet.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Shiftnet.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Shiftnet.pgright.BackColor = windowborderrightcolour + ' Shiftnet.pgright.BackgroundImage = skinwindowborderright(0) + ' Shiftnet.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Shiftnet.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Shiftnet.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Shiftnet.pgbottom.BackColor = windowborderbottomcolour + ' Shiftnet.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Shiftnet.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Shiftnet.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Shiftnet.pgbottomlcorner.Height = windowbordersize + ' Shiftnet.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Shiftnet.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Shiftnet.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Shiftnet.pgbottomrcorner.Height = windowbordersize + ' Else + ' Shiftnet.Close() + ' End If + + ' If Downloader.Visible = True Then + ' Downloader.titlebar.BackColor = titlebarcolour + ' Downloader.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Downloader.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Downloader.pgleft.BackColor = windowborderleftcolour + ' Downloader.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Downloader.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Downloader.pgright.BackColor = windowborderrightcolour + ' Downloader.pgright.BackgroundImage = skinwindowborderright(0) + ' Downloader.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Downloader.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Downloader.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Downloader.pgbottom.BackColor = windowborderbottomcolour + ' Downloader.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Downloader.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Downloader.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Downloader.pgbottomlcorner.Height = windowbordersize + ' Downloader.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Downloader.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Downloader.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Downloader.pgbottomrcorner.Height = windowbordersize + ' Else + ' Downloader.Close() + ' End If + ' 'If Dodge.Visible = True Then + ' ' Dodge.titlebar.BackColor = titlebarcolour + ' ' Dodge.pgtoplcorner.BackColor = titlebarleftcornercolour + ' ' Dodge.pgtoprcorner.BackColor = titlebarrightcornercolour + ' ' Dodge.pgleft.BackColor = windowborderleftcolour + ' ' Dodge.pgleft.BackgroundImage = skinwindowborderleft(0) + ' ' Dodge.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' ' Dodge.pgright.BackColor = windowborderrightcolour + ' ' Dodge.pgright.BackgroundImage = skinwindowborderright(0) + ' ' Dodge.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' ' Dodge.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' ' Dodge.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' ' Dodge.pgbottom.BackColor = windowborderbottomcolour + ' ' Dodge.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' ' Dodge.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' ' Dodge.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' ' Dodge.pgbottomlcorner.Height = windowbordersize + ' ' Dodge.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' ' Dodge.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' ' Dodge.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' ' Dodge.pgbottomrcorner.Height = windowbordersize + ' 'Else + ' ' Dodge.Close() + ' 'End If + + ' If Downloadmanager.Visible = True Then + ' Downloadmanager.titlebar.BackColor = titlebarcolour + ' Downloadmanager.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Downloadmanager.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Downloadmanager.pgleft.BackColor = windowborderleftcolour + ' Downloadmanager.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Downloadmanager.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Downloadmanager.pgright.BackColor = windowborderrightcolour + ' Downloadmanager.pgright.BackgroundImage = skinwindowborderright(0) + ' Downloadmanager.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Downloadmanager.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Downloadmanager.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Downloadmanager.pgbottom.BackColor = windowborderbottomcolour + ' Downloadmanager.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Downloadmanager.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Downloadmanager.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Downloadmanager.pgbottomlcorner.Height = windowbordersize + ' Downloadmanager.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Downloadmanager.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Downloadmanager.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Downloadmanager.pgbottomrcorner.Height = windowbordersize + ' Else + ' Downloadmanager.Close() + ' End If + + ' If Installer.Visible = True Then + ' Installer.titlebar.BackColor = titlebarcolour + ' Installer.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Installer.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Installer.pgleft.BackColor = windowborderleftcolour + ' Installer.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Installer.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Installer.pgright.BackColor = windowborderrightcolour + ' Installer.pgright.BackgroundImage = skinwindowborderright(0) + ' Installer.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Installer.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Installer.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Installer.pgbottom.BackColor = windowborderbottomcolour + ' Installer.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Installer.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Installer.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Installer.pgbottomlcorner.Height = windowbordersize + ' Installer.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Installer.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Installer.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Installer.pgbottomrcorner.Height = windowbordersize + ' Else + ' Installer.Close() + ' End If + + ' If Snakey.Visible = True Then + ' Snakey.titlebar.BackColor = titlebarcolour + ' Snakey.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Snakey.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Snakey.pgleft.BackColor = windowborderleftcolour + ' Snakey.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Snakey.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Snakey.pgright.BackColor = windowborderrightcolour + ' Snakey.pgright.BackgroundImage = skinwindowborderright(0) + ' Snakey.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Snakey.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Snakey.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Snakey.pgbottom.BackColor = windowborderbottomcolour + ' Snakey.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Snakey.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Snakey.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Snakey.pgbottomlcorner.Height = windowbordersize + ' Snakey.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Snakey.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Snakey.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Snakey.pgbottomrcorner.Height = windowbordersize + ' Else + ' Snakey.Close() + ' End If + + ' If SystemInfo.Visible = True Then + ' SystemInfo.titlebar.BackColor = titlebarcolour + ' SystemInfo.pgtoplcorner.BackColor = titlebarleftcornercolour + ' SystemInfo.pgtoprcorner.BackColor = titlebarrightcornercolour + ' SystemInfo.pgleft.BackColor = windowborderleftcolour + ' SystemInfo.pgleft.BackgroundImage = skinwindowborderleft(0) + ' SystemInfo.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' SystemInfo.pgright.BackColor = windowborderrightcolour + ' SystemInfo.pgright.BackgroundImage = skinwindowborderright(0) + ' SystemInfo.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' SystemInfo.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' SystemInfo.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' SystemInfo.pgbottom.BackColor = windowborderbottomcolour + ' SystemInfo.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' SystemInfo.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' SystemInfo.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' SystemInfo.pgbottomlcorner.Height = windowbordersize + ' SystemInfo.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' SystemInfo.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' SystemInfo.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' SystemInfo.pgbottomrcorner.Height = windowbordersize + ' Else + ' SystemInfo.Close() + ' End If + + ' If OrcWrite.Visible = True Then + ' OrcWrite.titlebar.BackColor = titlebarcolour + ' OrcWrite.pgtoplcorner.BackColor = titlebarleftcornercolour + ' OrcWrite.pgtoprcorner.BackColor = titlebarrightcornercolour + ' OrcWrite.pgleft.BackColor = windowborderleftcolour + ' OrcWrite.pgleft.BackgroundImage = skinwindowborderleft(0) + ' OrcWrite.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' OrcWrite.pgright.BackColor = windowborderrightcolour + ' OrcWrite.pgright.BackgroundImage = skinwindowborderright(0) + ' OrcWrite.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' OrcWrite.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' OrcWrite.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' OrcWrite.pgbottom.BackColor = windowborderbottomcolour + ' OrcWrite.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' OrcWrite.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' OrcWrite.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' OrcWrite.pgbottomlcorner.Height = windowbordersize + ' OrcWrite.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' OrcWrite.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' OrcWrite.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' OrcWrite.pgbottomrcorner.Height = windowbordersize + ' Else + ' OrcWrite.Close() + ' End If + + ' If FloodGate_Manager.Visible = True Then + ' FloodGate_Manager.titlebar.BackColor = titlebarcolour + ' FloodGate_Manager.pgtoplcorner.BackColor = titlebarleftcornercolour + ' FloodGate_Manager.pgtoprcorner.BackColor = titlebarrightcornercolour + ' FloodGate_Manager.pgleft.BackColor = windowborderleftcolour + ' FloodGate_Manager.pgleft.BackgroundImage = skinwindowborderleft(0) + ' FloodGate_Manager.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' FloodGate_Manager.pgright.BackColor = windowborderrightcolour + ' FloodGate_Manager.pgright.BackgroundImage = skinwindowborderright(0) + ' FloodGate_Manager.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' FloodGate_Manager.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' FloodGate_Manager.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' FloodGate_Manager.pgbottom.BackColor = windowborderbottomcolour + ' FloodGate_Manager.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' FloodGate_Manager.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' FloodGate_Manager.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' FloodGate_Manager.pgbottomlcorner.Height = windowbordersize + ' FloodGate_Manager.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' FloodGate_Manager.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' FloodGate_Manager.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' FloodGate_Manager.pgbottomrcorner.Height = windowbordersize + ' Else + ' FloodGate_Manager.Close() + ' End If + + ' If VirusScanner.Visible = True Then + ' VirusScanner.titlebar.BackColor = titlebarcolour + ' VirusScanner.pgtoplcorner.BackColor = titlebarleftcornercolour + ' VirusScanner.pgtoprcorner.BackColor = titlebarrightcornercolour + ' VirusScanner.pgleft.BackColor = windowborderleftcolour + ' VirusScanner.pgleft.BackgroundImage = skinwindowborderleft(0) + ' VirusScanner.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' VirusScanner.pgright.BackColor = windowborderrightcolour + ' VirusScanner.pgright.BackgroundImage = skinwindowborderright(0) + ' VirusScanner.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' VirusScanner.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' VirusScanner.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' VirusScanner.pgbottom.BackColor = windowborderbottomcolour + ' VirusScanner.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' VirusScanner.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' VirusScanner.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' VirusScanner.pgbottomlcorner.Height = windowbordersize + ' VirusScanner.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' VirusScanner.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' VirusScanner.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' VirusScanner.pgbottomrcorner.Height = windowbordersize + ' Else + ' VirusScanner.Close() + ' End If + + ' If template.Visible = True Then + ' template.titlebar.BackColor = titlebarcolour + ' template.pgtoplcorner.BackColor = titlebarleftcornercolour + ' template.pgtoprcorner.BackColor = titlebarrightcornercolour + ' template.pgleft.BackColor = windowborderleftcolour + ' template.pgleft.BackgroundImage = skinwindowborderleft(0) + ' template.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' template.pgright.BackColor = windowborderrightcolour + ' template.pgright.BackgroundImage = skinwindowborderright(0) + ' template.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' template.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' template.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' template.pgbottom.BackColor = windowborderbottomcolour + ' template.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' template.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' template.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' template.pgbottomlcorner.Height = windowbordersize + ' template.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' template.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' template.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' template.pgbottomrcorner.Height = windowbordersize + ' Else + ' template.Close() + ' End If + + ' If Terminal.Visible = True Then + ' Terminal.titlebar.BackColor = titlebarcolour + ' Terminal.pgtoplcorner.BackColor = titlebarleftcornercolour + ' Terminal.pgtoprcorner.BackColor = titlebarrightcornercolour + ' Terminal.pgleft.BackColor = windowborderleftcolour + ' Terminal.pgleft.BackgroundImage = skinwindowborderleft(0) + ' Terminal.pgleft.BackgroundImageLayout = skinwindowborderleftstyle + ' Terminal.pgright.BackColor = windowborderrightcolour + ' Terminal.pgright.BackgroundImage = skinwindowborderright(0) + ' Terminal.pgright.BackgroundImageLayout = skinwindowborderrightstyle + ' Terminal.pgbottom.BackColor = windowborderbottomcolour + ' Terminal.pgbottom.BackgroundImage = skinwindowborderbottom(0) + ' Terminal.pgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + ' Terminal.pgbottomlcorner.BackColor = windowborderbottomleftcolour + ' Terminal.pgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + ' Terminal.pgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + ' Terminal.pgbottomlcorner.Height = windowbordersize + ' Terminal.pgbottomrcorner.BackColor = windowborderbottomrightcolour + ' Terminal.pgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + ' Terminal.pgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + ' Terminal.pgbottomrcorner.Height = windowbordersize + ' Else + ' Terminal.Close() + ' End If + 'End Sub + + Public Sub setupiconprocess(ByVal location As String, ByRef imagetochange As Image) + If IO.File.Exists(ShiftOSPath + "\Shiftum42\Icons\" & location & ".pic") Then + imagetochange = GetImage(ShiftOSPath + "\Shiftum42\Icons\" & location & ".pic") + End If + End Sub + + Public Sub setupicons() + + iconmanagericondatalines = IO.File.ReadAllLines(ShiftOSPath + "\Shiftum42\Icons\icondata.dat") + titlebariconsize = iconmanagericondatalines(0) + panelbuttoniconsize = iconmanagericondatalines(1) + launchericonsize = iconmanagericondatalines(2) + + setupiconprocess("titlebarartpadicon", artpadicontitlebar) + setupiconprocess("titlebaraudioplayericon", audioplayericontitlebar) + setupiconprocess("titlebarcalculatoricon", calculatoricontitlebar) + setupiconprocess("titlebarclockicon", clockicontitlebar) + setupiconprocess("titlebarcolourpickericon", colourpickericontitlebar) + setupiconprocess("titlebarfileopenericon", fileopenericontitlebar) + setupiconprocess("titlebarfilesavericon", filesavericontitlebar) + setupiconprocess("titlebarfileskimmericon", fileskimmericontitlebar) + setupiconprocess("titlebargraphicpickericon", graphicpickericontitlebar) + setupiconprocess("titlebarinfoboxicon", infoboxicontitlebar) + setupiconprocess("titlebarknowledgeinputicon", knowledgeinputicontitlebar) + setupiconprocess("titlebarpongicon", pongicontitlebar) + setupiconprocess("titlebarshiftericon", shiftericontitlebar) + setupiconprocess("titlebarshiftoriumicon", shiftoriumicontitlebar) + setupiconprocess("titlebarskinloadericon", skinloadericontitlebar) + setupiconprocess("titlebarterminalicon", terminalicontitlebar) + setupiconprocess("titlebartextpadicon", textpadicontitlebar) + setupiconprocess("titlebarvideoplayericon", videoplayericontitlebar) + setupiconprocess("titlebarwebbrowsericon", webbrowsericontitlebar) + setupiconprocess("titlebarnamechangericon", namechangericontitlebar) + setupiconprocess("titlebariconmanagericon", iconmanagericontitlebar) + setupiconprocess("titlebarbitnotewalleticon", bitnotewalleticontitlebar) + setupiconprocess("titlebarbitnotediggericon", bitnotediggericontitlebar) + setupiconprocess("titlebardownloadericon", bitnotediggericontitlebar) + setupiconprocess("titlebardodgeicon", bitnotediggericontitlebar) + setupiconprocess("titlebardownloadmanagericon", bitnotediggericontitlebar) + setupiconprocess("titlebarinstallericon", bitnotediggericontitlebar) + setupiconprocess("titlebarsnakeyicon", snakeyicontitlebar) + setupiconprocess("titlebarsysinfoicon", sysinfoicontitlebar) + setupiconprocess("titlebarorcwriteicon", orcwriteicontitlebar) + setupiconprocess("titlebarfloodgateicon", floodgateicontitlebar) + setupiconprocess("titlebarmazeicon", mazeicontitlebar) + setupiconprocess("titlebarvirusscannericon", virusscannericontitlebar) + + setupiconprocess("panelbuttonartpadicon", artpadiconpanelbutton) + setupiconprocess("panelbuttonaudioplayericon", audioplayericonpanelbutton) + setupiconprocess("panelbuttoncalculatoricon", calculatoriconpanelbutton) + setupiconprocess("panelbuttonclockicon", clockiconpanelbutton) + setupiconprocess("panelbuttoncolourpickericon", colourpickericonpanelbutton) + setupiconprocess("panelbuttonfileopenericon", fileopenericonpanelbutton) + setupiconprocess("panelbuttonfilesavericon", filesavericonpanelbutton) + setupiconprocess("panelbuttonfileskimmericon", fileskimmericonpanelbutton) + setupiconprocess("panelbuttongraphicpickericon", graphicpickericonpanelbutton) + setupiconprocess("panelbuttoninfoboxicon", infoboxiconpanelbutton) + setupiconprocess("panelbuttonknowledgeinputicon", knowledgeinputiconpanelbutton) + setupiconprocess("panelbuttonpongicon", pongiconpanelbutton) + setupiconprocess("panelbuttonshiftericon", shiftericonpanelbutton) + setupiconprocess("panelbuttonshiftoriumicon", shiftoriumiconpanelbutton) + setupiconprocess("panelbuttonskinloadericon", skinloadericonpanelbutton) + setupiconprocess("panelbuttonterminalicon", terminaliconpanelbutton) + setupiconprocess("panelbuttontextpadicon", textpadiconpanelbutton) + setupiconprocess("panelbuttonvideoplayericon", videoplayericonpanelbutton) + setupiconprocess("panelbuttonwebbrowsericon", webbrowsericonpanelbutton) + setupiconprocess("panelbuttonnamechangericon", namechangericonpanelbutton) + setupiconprocess("panelbuttoniconmanagericon", iconmanagericonpanelbutton) + setupiconprocess("panelbuttonbitnotewalleticon", bitnotewalleticonpanelbutton) + setupiconprocess("panelbuttonbitnotediggericon", bitnotediggericonpanelbutton) + setupiconprocess("panelbuttondownloadericon", bitnotediggericonpanelbutton) + setupiconprocess("titlebardodgeicon", bitnotediggericontitlebar) + setupiconprocess("titlebardownloadmanagericon", bitnotediggericontitlebar) + setupiconprocess("titlebarinstallericon", bitnotediggericontitlebar) + setupiconprocess("titlebarsnakeyicon", snakeyicontitlebar) + setupiconprocess("titlebarsysinfoicon", sysinfoicontitlebar) + setupiconprocess("titlebarorcwriteicon", orcwriteicontitlebar) + setupiconprocess("titlebarfloodgateicon", floodgateicontitlebar) + setupiconprocess("titlebarmazeicon", mazeicontitlebar) + setupiconprocess("titlebarvirusscannericon", virusscannericontitlebar) + + setupiconprocess("launcherartpadicon", artpadiconlauncher) + setupiconprocess("launcheraudioplayericon", audioplayericonlauncher) + setupiconprocess("launchercalculatoricon", calculatoriconlauncher) + setupiconprocess("launcherclockicon", clockiconlauncher) + setupiconprocess("launchercolourpickericon", colourpickericonlauncher) + setupiconprocess("launcherfileopenericon", fileopenericonlauncher) + setupiconprocess("launcherfilesavericon", filesavericonlauncher) + setupiconprocess("launcherfileskimmericon", fileskimmericonlauncher) + setupiconprocess("launchergraphicpickericon", graphicpickericonlauncher) + setupiconprocess("launcherinfoboxicon", infoboxiconlauncher) + setupiconprocess("launcherknowledgeinputicon", knowledgeinputiconlauncher) + setupiconprocess("launcherpongicon", pongiconlauncher) + setupiconprocess("launchershiftericon", shiftericonlauncher) + setupiconprocess("launchershiftoriumicon", shiftoriumiconlauncher) + setupiconprocess("launcherskinloadericon", skinloadericonlauncher) + setupiconprocess("launcherterminalicon", terminaliconlauncher) + setupiconprocess("launchertextpadicon", textpadiconlauncher) + setupiconprocess("launchervideoplayericon", videoplayericonlauncher) + setupiconprocess("launcherwebbrowsericon", webbrowsericonlauncher) + setupiconprocess("launchernamechangericon", namechangericonlauncher) + setupiconprocess("launchericonmanagericon", iconmanagericonlauncher) + setupiconprocess("launcherbitnotewalleticon", bitnotewalleticonlauncher) + setupiconprocess("launcherbitnotediggericon", bitnotediggericonlauncher) + setupiconprocess("launcherdownloadericon", bitnotediggericonlauncher) + setupiconprocess("titlebardodgeicon", bitnotediggericontitlebar) + setupiconprocess("titlebardownloadmanagericon", bitnotediggericontitlebar) + setupiconprocess("titlebarinstallericon", bitnotediggericontitlebar) + setupiconprocess("titlebarsnakeyicon", snakeyicontitlebar) + setupiconprocess("titlebarsysinfoicon", sysinfoicontitlebar) + setupiconprocess("titlebarorcwriteicon", orcwriteicontitlebar) + setupiconprocess("titlebarfloodgateicon", floodgateicontitlebar) + setupiconprocess("titlebarmazeicon", mazeicontitlebar) + setupiconprocess("titlebarvirusscannericon", virusscannericontitlebar) + + setupiconprocess("launchershutdownicon", shutdowniconlauncher) + setupiconprocess("launcherunitytoggleicon", unitytoggleiconlauncher) + End Sub + + Private Sub KnowledgeInputToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KnowledgeInputToolStripMenuItem.Click + closeeverything() + log = log & My.Computer.Clock.LocalTime & " User opened Knowledge Input from the app launcher" & Environment.NewLine + Knowledge_Input.Show() + Knowledge_Input.BringToFront() + End Sub + + Private Sub ShiftoriumToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShiftoriumToolStripMenuItem.Click + closeeverything() + log = log & My.Computer.Clock.LocalTime & " User opened Shiftorium from the app launcher" & Environment.NewLine + Shiftorium.Show() + Shiftorium.BringToFront() + End Sub + + Private Sub ClockToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ClockToolStripMenuItem.Click + closeeverything() + log = log & My.Computer.Clock.LocalTime & " User opened Clock from the app launcher" & Environment.NewLine + Clock.Show() + Clock.BringToFront() + End Sub + + Private Sub TerminalToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TerminalToolStripMenuItem.Click + closeeverything() + log = log & My.Computer.Clock.LocalTime & " User opened Terminal from the app launcher" & Environment.NewLine + Terminal.Show() + Terminal.BringToFront() + End Sub + + Private Sub CalculatorToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CalculatorToolStripMenuItem.Click + closeeverything() + Calculator.Show() + Calculator.BringToFront() + End Sub + + Private Sub ApplicationsToolStripMenuItem_MouseEnter(sender As Object, e As EventArgs) Handles ApplicationsToolStripMenuItem.MouseEnter + Me.Focus() + ToolStripManager.Renderer = New MyToolStripRenderer() + End Sub + + Private Sub ShutdownToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShutdownToolStripMenuItem.Click + Terminal.Show() + Terminal.BringToFront() + log = log & My.Computer.Clock.LocalTime & " User Shut Down ShiftOS from the app launcher" & Environment.NewLine + shutdownshiftos() + End Sub + + Private Sub clocktick_Tick(sender As Object, e As EventArgs) Handles clocktick.Tick + setclocktime() + End Sub + + Private Sub setclocktime() + If boughtsplitsecondtime = True Then + paneltimetext.Text = TimeOfDay + Else + If boughtminuteaccuracytime = True Then + If Date.Now.Hour < 12 Then + paneltimetext.Text = TimeOfDay.Hour & ":" & Format(TimeOfDay.Minute, "00") & " AM" + Else + paneltimetext.Text = TimeOfDay.Hour - 12 & ":" & Format(TimeOfDay.Minute, "00") & " PM" + End If + Else + If boughtpmandam = True Then + If Date.Now.Hour < 12 Then + paneltimetext.Text = TimeOfDay.Hour & " AM" + Else + paneltimetext.Text = TimeOfDay.Hour - 12 & " PM" + End If + Else + If boughthourspastmidnight = True Then + paneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60 / 60) + Else + If boughtminutespastmidnight = True Then + paneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60) + Else + If boughtsecondspastmidnight = True Then + paneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds) + End If + End If + End If + End If + End If + End If + End Sub + + Private Sub ShifterToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShifterToolStripMenuItem.Click + closeeverything() + log = log & My.Computer.Clock.LocalTime & " User opened Shifter from the app launcher" & Environment.NewLine + Shifter.Show() + Shifter.BringToFront() + End Sub + + Private Sub PongToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PongToolStripMenuItem.Click + closeeverything() + Pong.Show() + Pong.BringToFront() + End Sub + + Private Sub FileSkimmerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FileSkimmerToolStripMenuItem.Click + closeeverything() + File_Skimmer.Show() + File_Skimmer.BringToFront() + End Sub + + Private Sub TextPadToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TextPadToolStripMenuItem.Click + closeeverything() + TextPad.Show() + TextPad.BringToFront() + End Sub + + Private Sub SkinLoaderToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SkinLoaderToolStripMenuItem.Click + closeeverything() + Skin_Loader.Show() + Skin_Loader.BringToFront() + End Sub + + Private Sub ArtpadToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ArtpadToolStripMenuItem.Click + closeeverything() + ArtPad.Show() + ArtPad.BringToFront() + End Sub + + Private Sub AudioplayerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AudioplayerToolStripMenuItem.Click + closeeverything() + Audio_Player.Show() + Audio_Player.BringToFront() + End Sub + + Private Sub WebBrowserToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles WebBrowserToolStripMenuItem.Click + closeeverything() + Web_Browser.Show() + Web_Browser.BringToFront() + If Web_Browser.Location.Y <= 0 Then Web_Browser.Location = New Point(Web_Browser.Location.X, Web_Browser.Location.Y + 5000) + Web_Browser.resettitlebar() + End Sub + + Private Sub VideoplayerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VideoplayerToolStripMenuItem.Click + closeeverything() + Video_Player.Show() + Video_Player.BringToFront() + End Sub + + Private Sub NameChangerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles NameChangerToolStripMenuItem.Click + closeeverything() + Name_Changer.Show() + Name_Changer.BringToFront() + End Sub + + Private Sub IconManagerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles IconManagerToolStripMenuItem.Click + closeeverything() + Icon_Manager.Show() + Icon_Manager.BringToFront() + End Sub + + Private Sub bitnotewalletToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BitnoteWalletToolStripMenuItem.Click + closeeverything() + Bitnote_Wallet.Show() + Bitnote_Wallet.BringToFront() + End Sub + + Private Sub bitnotediggerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BitnoteDiggerToolStripMenuItem.Click + closeeverything() + Bitnote_Digger.Show() + Bitnote_Digger.BringToFront() + End Sub + + Private Sub SkinshifterToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SkinShifterToolStripMenuItem.Click + closeeverything() + Skinshifter.Show() + Skinshifter.BringToFront() + End Sub + + Private Sub ShiftnetToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShiftnetToolStripMenuItem.Click + closeeverything() + Shiftnet.Show() + Shiftnet.BringToFront() + End Sub + + Private Sub DodgeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DodgeToolStripMenuItem.Click + closeeverything() + Dodge.Show() + Dodge.BringToFront() + End Sub + + Private Sub downloadmanagerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles downloadmanagerToolStripMenuItem.Click + closeeverything() + Downloadmanager.Show() + Downloadmanager.BringToFront() + End Sub + + Private Sub installerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles InstallerToolStripMenuItem.Click + closeeverything() + Installer.Show() + Installer.BringToFront() + End Sub + + Private Sub snakeyToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SnakeyToolStripMenuItem.Click + closeeverything() + Snakey.Show() + Snakey.BringToFront() + End Sub + + Private Sub sysinfoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles sysinfoToolStripMenuItem.Click + closeeverything() + systeminfo.Show() + systeminfo.BringToFront() + End Sub + + Private Sub orcwriteToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles orcwriteToolStripMenuItem.Click + closeeverything() + OrcWrite.Show() + OrcWrite.BringToFront() + End Sub + + Private Sub floodgateToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FloodGateToolStripMenuItem.Click + closeeverything() + FloodGate_Manager.Show() + FloodGate_Manager.BringToFront() + End Sub + + Private Sub mazeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MazeToolStripMenuItem.Click + closeeverything() + Labyrinth.Show() + Labyrinth.BringToFront() + End Sub + Private Sub virusscannerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VirusScannerToolStripMenuItem.Click + closeeverything() + VirusScanner.Show() + VirusScanner.BringToFront() + End Sub + + Private Sub autosave_Tick(sender As Object, e As EventArgs) Handles autosave.Tick + savegame() + End Sub + + Public Sub ApplicationsToolStripMenuItem_Paint(sender As Object, e As PaintEventArgs) Handles ApplicationsToolStripMenuItem.Paint + If Skins.applauncher Is Nothing Then + Else + e.Graphics.DrawImage(Skins.applauncher, 0, 0, Skins.applauncher.Width, Skins.applauncher.Height) + End If + End Sub + + Public Sub minimizeprogram(ByVal whatprogram As Form, ByVal isitpong As Boolean) + If whatprogram.Location.Y > 0 Then + whatprogram.Location = New Point(whatprogram.Location.X, whatprogram.Location.Y - 5000) + If isitpong = True Then + Pong.rollupanddown() + End If + Else + whatprogram.Location = New Point(whatprogram.Location.X, whatprogram.Location.Y + 5000) + whatprogram.BringToFront() + If isitpong = True Then + Pong.rollupanddown() + End If + End If + End Sub + + Private Sub pnlpanelbuttonclock_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonclock.Click, tbclockicon.Click, tbclocktext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Clock, False) + End If + End Sub + + Private Sub pnlpanelbuttoncolourpicker_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttoncolourpicker.Click, tbcolourpickericon.Click, tbcolourpickertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Colour_Picker, False) + End If + End Sub + + Private Sub pnlpanelbuttonfileopener_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonfileopener.Click, tbfileopenericon.Click, tbfileopenertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(File_Opener, False) + End If + End Sub + + Private Sub pnlpanelbuttonfilesaver_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonfilesaver.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(File_Saver, False) + End If + End Sub + + Private Sub pnlpanelbuttonfileskimmer_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonfileskimmer.Click, tbfileskimmericon.Click, tbfileskimmertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(File_Skimmer, False) + End If + End Sub + + Private Sub pnlpanelbuttongraphicpicker_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttongraphicpicker.Click, tbgraphicpickericon.Click, tbgraphicpickertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Graphic_Picker, False) + End If + End Sub + + Private Sub pnlpanelbuttoninfobox_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttoninfobox.Click, tbinfoboxicon.Click, tbinfoboxtext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(infobox, False) + End If + End Sub + + Private Sub pnlpanelbuttonknowledgeinput_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonknowledgeinput.Click, tbknowledgeinputicon.Click, tbknowledgeinputtext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Knowledge_Input, False) + End If + End Sub + + Private Sub pnlpanelbuttonpong_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonpong.Click, tbpongicon.Click, tbpongtext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Pong, True) + End If + End Sub + + Private Sub pnlpanelbuttonshifter_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonshifter.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Shifter, False) + End If + End Sub + + Private Sub pnlpanelbuttonshiftorium_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonshiftorium.Click, tbshiftoriumicon.Click, tbshiftoriumtext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Shiftorium, False) + End If + End Sub + + Private Sub pnlpanelbuttonskinloader_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonskinloader.Click, tbskinloadericon.Click, tbskinloadertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Skin_Loader, False) + End If + End Sub + + Private Sub pnlpanelbuttonterminal_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonterminal.Click, tbterminalicon.Click, tbterminaltext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Terminal, False) + End If + End Sub + + Private Sub pnlpanelbuttontextpad_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttontextpad.Click, tbtextpadicon.Click, tbtextpadtext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(TextPad, False) + End If + End Sub + + Private Sub pnlpanelbuttonartpad_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonartpad.Click, tbartpadicon.Click, tbartpadtext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(ArtPad, False) + End If + End Sub + + Private Sub pnlpanelbuttoncalculator_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttoncalculator.Click, tbcalculatoricon.Click, tbcalculatortext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Calculator, False) + End If + End Sub + + Private Sub pnlpanelbuttonaudioplayer_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonaudioplayer.Click, tbaudioplayericon.Click, tbaudioplayertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Audio_Player, False) + End If + End Sub + + Private Sub pnlpanelbuttonwebbrowser_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonwebbrowser.Click, tbwebbrowsericon.Click, tbwebbrowsertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Web_Browser, False) + End If + End Sub + + Private Sub pnlpanelbuttonvideoplayer_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonvideoplayer.Click, tbvideoplayericon.Click, tbvideoplayertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Video_Player, False) + End If + End Sub + + Private Sub pnlpanelbuttonnamechanger_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonnamechanger.Click, tbnamechangericon.Click, tbnamechangertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Name_Changer, False) + End If + End Sub + + Private Sub pnlpanelbuttoniconmanager_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttoniconmanager.Click, tbiconmanagericon.Click, tbiconmanagertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Icon_Manager, False) + End If + End Sub + + Private Sub pnlpanelbuttonbitnotewallet_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonbitnotewallet.Click, tbbitnotewalleticon.Click, tbbitnotewallettext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Bitnote_Wallet, False) + End If + End Sub + + Private Sub pnlpanelbuttonbitnotedigger_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonbitnotedigger.Click, tbbitnotediggericon.Click, tbbitnotediggertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Bitnote_Digger, False) + End If + End Sub + + Private Sub pnlpanelbuttonskinshifter_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonskinshifter.Click, tbskinshiftericon.Click, tbskinshiftertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Skinshifter, False) + End If + End Sub + + Private Sub pnlpanelbuttonShiftnet_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonshiftnet.Click, tbshiftneticon.Click, tbshiftnettext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Shiftnet, False) + End If + End Sub + + Private Sub pnlpanelbuttonDownloader_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttondownloader.Click, tbdownloadericon.Click, tbdownloadertext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Downloader, False) + End If + End Sub + + Private Sub pnlpanelbuttondodge_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttondodge.Click, tbdodgeicon.Click, tbdodgetext.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Dodge, False) + End If + End Sub + + Private Sub pnlpanelbuttondownloadmanager_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttondownloadmanager.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Downloadmanager, False) + End If + End Sub + + Private Sub pnlpanelbuttoninstaller_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttoninstaller.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Installer, False) + End If + End Sub + + Private Sub pnl_panelbuttonsnakey_Click(sender As Object, e As EventArgs) Handles pnl_panelbuttonsnakey.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Snakey, False) + End If + End Sub + + Private Sub pnlpanelbuttonsysinfo_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonsysinfo.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(systeminfo, False) + End If + End Sub + + + Private Sub pnl_panelbuttonorcwrite_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonorcwrite.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(OrcWrite, False) + End If + End Sub + + Private Sub pnl_panelbuttonfloodgate_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonfloodgate.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(FloodGate_Manager, False) + End If + End Sub + + Private Sub pnl_panelbuttonmaze_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonmaze.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(Labyrinth, False) + End If + End Sub + Private Sub pnl_panelbuttonvirusscanner_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonvirusscanner.Click + If boughtusefulpanelbuttons = True Then + minimizeprogram(VirusScanner, False) + End If + End Sub + + Private Sub setpanelbuttonappearnce(label As Label, pictureBox As PictureBox, label1 As Label, p4 As Boolean) + Throw New NotImplementedException + End Sub + + Private Sub UnityToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UnityToolStripMenuItem.Click + If boughtunitymodetoggle = True Then + If unitymode = False Then + unitymode = True + setupdesktop() + Else + unitymode = False + setupdesktop() + End If + End If + End Sub + Public Sub logit(msg As String) + log = log & ControlChars.NewLine & msg + End Sub +#End Region +#Region "Auto-Generated Code" + 'Don't use the toolkit +#End Region +#Region "DetectCrashes" + Private Sub nocheat_Tick(sender As Object, e As EventArgs) Handles nocheat.Tick + FindProc() + End Sub +#End Region + + + ' disabled for release (Completely unfinished feature) + 'Private Sub Button1_Click_1(sender As Object, e As EventArgs) handles button1.click + ' STML_Test.Show() + ' Me.BackgroundImage = Skins.applauncher + 'End Sub + + Public Sub refreshIcons() + desktopicons.Items.Clear() + desktopicons.ForeColor = Skins.icontextcolor + desktopicons.View = iconview1 + If Skins.showicons = True Then + desktopicons.LargeImageList = File_Skimmer.ImageList1 + desktopicons.SmallImageList = File_Skimmer.ImageList1 + + Dim dir As New IO.DirectoryInfo(Paths.desktop) + Dim files As IO.FileInfo() = dir.GetFiles() + Dim file As IO.FileInfo + Dim folders As IO.DirectoryInfo() = dir.GetDirectories() + Dim folder As IO.DirectoryInfo + Dim filetype As Integer + For Each folder In folders + Dim Str(3) As String + + Str(0) = folder.Name + Str(1) = folder.LastAccessTime + Str(2) = "Directory" + + Dim folderIcon As New ListViewItem + folderIcon.Text = Str(0) + folderIcon.Tag = folder.FullName + folderIcon.SubItems.Add(Str(1)) + folderIcon.SubItems.Add(Str(2)) + folderIcon.ImageIndex = 0 + + desktopicons.Items.Add(folderIcon) + Next + + For Each file In files + Dim filename As String = file.Name + Dim fileex As String = file.Extension + Dim program As String + Dim item As New ListViewItem + + item.Text = filename + item.Tag = file.FullName + item.SubItems.Add(file.LastWriteTime) + + filetype = File_Skimmer.getExType(fileex)(0) + program = File_Skimmer.getExType(fileex)(1) + + item.SubItems.Add(program) + item.ImageIndex = filetype + desktopicons.Items.Add(item) + Next + End If + lvadvplaces.Items.Clear() + lvadvplaces.SmallImageList = File_Skimmer.ImageList1 + lvadvplaces.LargeImageList = File_Skimmer.ImageList1 + + For Each folder In My.Computer.FileSystem.GetDirectories(Paths.home) + Dim placeinfo As New IO.DirectoryInfo(folder) + Dim place As New ListViewItem + place.Text = placeinfo.Name + place.Tag = placeinfo.FullName + place.ImageIndex = 0 + lvadvplaces.Items.Add(place) + Next + lvadvfiles.Items.Clear() + lvadvfiles.LargeImageList = File_Skimmer.ImageList1 + lvadvfiles.SmallImageList = File_Skimmer.ImageList1 + For Each File In My.Computer.FileSystem.GetFiles(Paths.advdata & "Recent") + Dim fileinfo As New IO.FileInfo(File) + Dim item As New ListViewItem + item.Text = fileinfo.Name + item.Tag = fileinfo.FullName + Dim fileex As String = fileinfo.Extension + item.ImageIndex = File_Skimmer.getExType(fileex)(0) + lvadvfiles.Items.Add(item) + Next + End Sub + + Private Sub ClickDesktopIcon(sender As Object, e As EventArgs) Handles desktopicons.DoubleClick + If desktopicons.SelectedItems.Count > 0 Then + Dim Path As String = desktopicons.SelectedItems(0).Tag + File_Skimmer.OpenFile(Path) + End If + End Sub + + Private Sub AboutToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AboutToolStripMenuItem.Click + infobox.title = "Desktop++ - About" + infobox.textinfo = My.Resources.DesktopPlusPlusAbout + infobox.resizeAndLoad(infobox.Width, 325) 'Resizes Infobox because if not, the full text for the message is cut off. + End Sub + + Private Sub IconViewToolStripMenuItem_Click(sender As Object, e As EventArgs) + desktopicons.View = View.LargeIcon + refreshIcons() + End Sub + + Private Sub TileViewToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TileViewToolStripMenuItem.Click + desktopicons.View = View.SmallIcon + desktopicons.SmallImageList = File_Skimmer.ImageList1 + refreshIcons() + End Sub + + Public Sub makefolder() + My.Computer.FileSystem.CreateDirectory("C:/ShiftOS/Home/Desktop/" & infobox.txtuserinput.Text) + refreshIcons() + infobox.Close() + End Sub + + Private Sub FolderToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FolderToolStripMenuItem.Click + infobox.title = "Create New Folder" + infobox.textinfo = "What shall the name of your folder be?" + infobox.txtuserinput.Visible = True + infobox.state = "makingdesktopfolder" + infobox.Show() + End Sub + + Private Sub contextmenu_Show(sender As Object, e As PaintEventArgs) Handles ContextMenuStrip1.Paint + If desktopicons.SelectedItems.Count > 0 Then + TileViewToolStripMenuItem.Visible = True + fileActionsSeparator.Visible = True + Else + TileViewToolStripMenuItem.Visible = False + fileActionsSeparator.Visible = False + End If + + End Sub + + Private Sub NewSkin_Click(sender As Object, e As EventArgs) Handles NewSkin.Click + infobox.title = "Skin Loader" + infobox.textinfo = "What should the name of your skin be?" + infobox.state = "generatingskin" + infobox.txtuserinput.Visible = True + infobox.Show() + End Sub + + Private Sub SystemInformationReportToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SystemInformationReportToolStripMenuItem.Click + infobox.title = "System Information Dump" + infobox.textinfo = "Please enter the name of the dump file." + infobox.state = "generatingdump" + infobox.txtuserinput.Visible = True + infobox.Show() + End Sub + + Private Sub TextDocumentToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TextDocumentToolStripMenuItem.Click + infobox.title = "New Text Document" + infobox.textinfo = "What should the name of your text file be?" + infobox.state = "newtextdocondesktop" + infobox.txtuserinput.Visible = True + infobox.Show() + End Sub + + Public Sub generateShortCut(Name As String, relayPath As String) + Dim sw As New IO.StreamWriter("C:/ShiftOS/Home/Desktop/" & Name & ".sct") + sw.Write(relayPath) + sw.Close() + End Sub + + Private Sub ShortcutToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShortcutToolStripMenuItem.Click + File_Opener.openingprogram = "shortcut" + File_Opener.lbtitletext.Text = "Create Shortcut" + File_Opener.Show() + End Sub + + Private Sub desktopicons_ItemDrag(ByVal sender As Object, ByVal e As System.Windows.Forms.ItemDragEventArgs) Handles desktopicons.ItemDrag + If Skins.enabledraggableicons = True Then + Dim lvi As ListViewItem = CType(e.Item, ListViewItem) + desktopicons.DoDragDrop(New DataObject("System.Windows.Forms.ListViewItem", lvi), DragDropEffects.Move) + End If + End Sub + Private Sub desktopicons_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles desktopicons.DragEnter + If Skins.enabledraggableicons = True Then + If e.Data.GetDataPresent("System.Windows.Forms.ListViewItem") Then + e.Effect = DragDropEffects.Move + End If + End If + End Sub + Private Sub desktopicons_DragOver(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles desktopicons.DragOver + If Skins.enabledraggableicons = True Then + Dim lvi As ListViewItem = CType(e.Data.GetData("System.Windows.Forms.ListViewItem"), ListViewItem) + Dim Offset As Size = Size.Subtract(Cursor.Size, New Size(Cursor.HotSpot.X, Cursor.HotSpot.Y)) + If (e.X < 53) Then + lvi.Position = Point.Subtract(desktopicons.PointToClient(New Point(53, e.Y)), Offset) + Else + lvi.Position = Point.Subtract(desktopicons.PointToClient(New Point(e.X, e.Y)), Offset) + End If + e.Effect = DragDropEffects.Move + End If + + End Sub + + Private Sub DeleteToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DeleteToolStripMenuItem.Click + If My.Computer.FileSystem.DirectoryExists(desktopicons.SelectedItems(0).Tag) Then + My.Computer.FileSystem.DeleteDirectory(desktopicons.SelectedItems(0).Tag, FileIO.DeleteDirectoryOption.DeleteAllContents) + Else + My.Computer.FileSystem.DeleteFile(desktopicons.SelectedItems(0).Tag) + End If + refreshIcons() + End Sub + + Private Sub TerminalToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles TerminalToolStripMenuItem1.Click + Terminal.Show() + Terminal.TopMost = True + hideStart() + End Sub + + Private Sub FileSkimmerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles FileSkimmerToolStripMenuItem1.Click + If boughtfileskimmer = True Then + File_Skimmer.Show() + File_Skimmer.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'File Skimmer'.") + End If + End Sub + + Private Sub SystemInformationToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SystemInformationToolStripMenuItem.Click + If installedsysinfo = True Then + systeminfo.Show() + systeminfo.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'System Information'.") + End If + End Sub + + Private Sub ShifterToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles ShifterToolStripMenuItem1.Click + If boughtshifter = True Then + Shifter.Show() + Shifter.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Shifter'.") + End If + End Sub + + Private Sub SkinLoaderToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles SkinLoaderToolStripMenuItem1.Click + If boughtskinloader = True Then + Skin_Loader.Show() + Skin_Loader.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Skin Loader'.") + End If + End Sub + + Private Sub SkinShifterToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles SkinShifterToolStripMenuItem1.Click + If boughtskinshifter Then + Skinshifter.Show() + Skinshifter.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'skinshifter.saa'.") + End If + End Sub + + Private Sub IconManagerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles IconManagerToolStripMenuItem1.Click + If boughticonmanager = True Then + Icon_Manager.Show() + Icon_Manager.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'icon_manager.saa'.") + End If + End Sub + + Private Sub NameChangerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles NameChangerToolStripMenuItem1.Click + If boughtnamechanger = True Then + Name_Changer.Show() + Name_Changer.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'namechanger.saa'.") + End If + End Sub + + Private Sub ShiftnetToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles ShiftnetToolStripMenuItem1.Click + If boughtshiftnet = True Then + Shiftnet.Show() + Shiftnet.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'shiftnet.dri'.") + End If + End Sub + + Private Sub ShiftoriumToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles ShiftoriumToolStripMenuItem1.Click + Shiftorium.Show() + Shiftorium.TopMost = True + hideStart() + End Sub + + Private Sub WebBrowserToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles WebBrowserToolStripMenuItem1.Click + If boughtwebbrowser = True Then + Web_Browser.Show() + Web_Browser.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'webbrowser.saa'.") + End If + End Sub + + Private Sub DownloadManagerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles DownloadManagerToolStripMenuItem1.Click + If boughtshiftnet = True Then + Downloadmanager.Show() + Downloadmanager.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'shiftnet.dri'.") + End If + End Sub + + Private Sub InstallerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles InstallerToolStripMenuItem1.Click + If boughtshiftnet = True Then + Installer.Show() + Installer.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'shiftnet.dri'.") + End If + End Sub + + Private Sub BitnoteDiggerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles BitnoteDiggerToolStripMenuItem1.Click + If boughtbitnotedigger = True Then + Bitnote_Digger.Show() + Bitnote_Digger.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'btn_dig.dri'.") + End If + End Sub + + Private Sub BitnoteWalletToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles BitnoteWalletToolStripMenuItem1.Click + If boughtbitnotewallet = True Then + Bitnote_Wallet.Show() + Bitnote_Wallet.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'btn_wallet.saa'.") + End If + End Sub + + Private Sub FloodGateManagerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FloodGateManagerToolStripMenuItem.Click + If boughtfloodgate = True Then + FloodGate_Manager.Show() + FloodGate_Manager.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'floodgateman.saa'.") + End If + End Sub + + Private Sub VirusScannerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles VirusScannerToolStripMenuItem1.Click + If installedvirusscanner = True Then + VirusScanner.Show() + VirusScanner.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'virusscanner.saa'.") + End If + End Sub + + Private Sub DodgeToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles DodgeToolStripMenuItem1.Click + If installeddodge = True Then + Dodge.Show() + Dodge.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Dodge'.") + End If + End Sub + + Private Sub SnakeyToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles SnakeyToolStripMenuItem1.Click + If boughtsnakey = True Then + Snakey.Show() + Snakey.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Snakey'.") + End If + End Sub + + Private Sub PongToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles PongToolStripMenuItem1.Click + If boughtpong = True Then + Pong.Show() + Pong.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Pong'.") + End If + End Sub + + Private Sub KnowledgeInputToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles KnowledgeInputToolStripMenuItem1.Click + Knowledge_Input.Show() + Knowledge_Input.TopMost = True + hideStart() + End Sub + + Private Sub LabyrinthToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles LabyrinthToolStripMenuItem.Click + Labyrinth.Show() + Labyrinth.TopMost = True + hideStart() + End Sub + + Private Sub ArtpadToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles ArtpadToolStripMenuItem1.Click + If boughtartpad = True Then + ArtPad.Show() + ArtPad.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Artpad'.") + End If + End Sub + + Private Sub TextpadToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles TextpadToolStripMenuItem1.Click + If boughttextpad = True Then + TextPad.Show() + TextPad.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'TextPad'.") + End If + + End Sub + + Private Sub OrcWriteToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles OrcWriteToolStripMenuItem1.Click + If installedorcwrite = True Then + OrcWrite.Show() + OrcWrite.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find driver 'OWDHandler.dri'.") + End If + End Sub + + Private Sub AudioPlayerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles AudioPlayerToolStripMenuItem1.Click + If boughtaudioplayer = True Then + Audio_Player.Show() + Audio_Player.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'audplay.saa'.") + End If + End Sub + + Private Sub VideoPlayerToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles VideoPlayerToolStripMenuItem1.Click + If boughtvideoplayer = True Then + Video_Player.Show() + Video_Player.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find file 'video_player.saa'.") + End If + End Sub + + Private Sub ClockToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles ClockToolStripMenuItem1.Click + If boughtclock = True Then + Clock.Show() + Clock.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Clock'.") + End If + End Sub + + Private Sub CalculatorToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles CalculatorToolStripMenuItem1.Click + If boughtcalculator = True Then + Calculator.Show() + Calculator.TopMost = True + hideStart() + Else + infobox.showinfo("Error", "Could not find app 'Calculator'.") + End If + End Sub + + Public Sub hideStart() + pnladvapplauncher.Hide() + End Sub + + Private Sub btnadvshutdown_Click(sender As Object, e As EventArgs) Handles btnadvshutdown.Click + savegame() + shutdownshiftos() + End Sub + + Private Sub lvadvplaces_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lvadvplaces.SelectedIndexChanged + If lvadvplaces.SelectedItems.Count > 0 Then + Dim fName As String = lvadvplaces.SelectedItems(0).Tag + fName = fName.Replace("\", "/") + File_Skimmer.OpenFile(fName) + End If + pnladvapplauncher.Hide() + End Sub + + Private Sub lvadvfiles_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lvadvfiles.SelectedIndexChanged + If lvadvfiles.SelectedItems.Count > 0 Then + File_Skimmer.OpenFile(lvadvfiles.SelectedItems(0).Tag) + End If + pnladvapplauncher.Hide() + End Sub + + Private Sub ApplicationsToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ApplicationsToolStripMenuItem.Click + If boughtadvapplauncher = True Then + ApplicationsToolStripMenuItem.HideDropDown() + If pnladvapplauncher.Visible = False Then + pnladvapplauncher.Show() + Else + pnladvapplauncher.Hide() + End If + lbuser.Text = username + Select Case Skins.desktoppanelposition + Case "Top" + pnladvapplauncher.Location = New Point(0, desktoppanel.Height) + Case "Bottom" + pnladvapplauncher.Location = New Point(0, Me.Height - desktoppanel.Height - pnladvapplauncher.Height) + End Select + refreshIcons() + End If + End Sub + + Private Sub StartFixer(sender As Object, e As MouseEventArgs) Handles desktopicons.MouseDown, pnlpanelbuttonholder.MouseDown + If pnladvapplauncher.Visible = True Then pnladvapplauncher.Visible = False + End Sub + + Private Sub CatalystToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CatalystToolStripMenuItem.Click + Catalyst_Main.Show() + Catalyst_Main.TopMost = True + End Sub + + Private Sub ToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles CatalystToolStripMenuItem1.Click + Catalyst_Main.Show() + Catalyst_Main.TopMost = True + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/ShiftOSLogo.ico b/ShiftOS/ShiftOSLogo.ico new file mode 100644 index 0000000..5840b3c Binary files /dev/null and b/ShiftOS/ShiftOSLogo.ico differ diff --git a/ShiftOS/ShiftOSTabs.vb b/ShiftOS/ShiftOSTabs.vb new file mode 100644 index 0000000..52df581 --- /dev/null +++ b/ShiftOS/ShiftOSTabs.vb @@ -0,0 +1,40 @@ +Public Class ShiftOSTabs + + Inherits TabControl + Sub New() + SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.OptimizedDoubleBuffer Or ControlStyles.ResizeRedraw Or ControlStyles.UserPaint, True) + DoubleBuffered = True + SizeMode = TabSizeMode.Fixed + ItemSize = New Size(120, 30) + End Sub + + Protected Overrides Sub CreateHandle() + MyBase.CreateHandle() + End Sub + + Protected Overrides Sub OnPaint(e As PaintEventArgs) + Dim B As New Bitmap(Width, Height) + Dim G As Graphics = Graphics.FromImage(B) + + G.Clear(Color.Gainsboro) + + For i = 0 To TabCount - 1 + Dim TabRectangle As Rectangle = GetTabRect(i) + + If i = SelectedIndex Then + G.FillRectangle(Brushes.DarkGray, TabRectangle) + Else + G.FillRectangle(Brushes.LightGray, TabRectangle) + End If + + G.DrawString(TabPages(i).Text, Font, Brushes.White, TabRectangle, New StringFormat With {.Alignment = StringAlignment.Center, .LineAlignment = StringAlignment.Center}) + Next + + e.Graphics.DrawImage(B.Clone, 0, 0) + G.Dispose() : B.Dispose() + MyBase.OnPaint(e) + End Sub + +End Class + + diff --git a/ShiftOS/Shifter.Designer.vb b/ShiftOS/Shifter.Designer.vb new file mode 100644 index 0000000..55f529f --- /dev/null +++ b/ShiftOS/Shifter.Designer.vb @@ -0,0 +1,4284 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Shifter + 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() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Shifter)) + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.ColorDialog1 = New System.Windows.Forms.ColorDialog() + Me.clocktick = New System.Windows.Forms.Timer(Me.components) + Me.customizationtime = New System.Windows.Forms.Timer(Me.components) + Me.timerearned = New System.Windows.Forms.Timer(Me.components) + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.Label1 = New System.Windows.Forms.Label() + Me.btnapply = New System.Windows.Forms.Button() + Me.catholder = New System.Windows.Forms.Panel() + Me.btnreset = New System.Windows.Forms.Button() + Me.Button2 = New System.Windows.Forms.Button() + Me.btndeskdoubleplus = New System.Windows.Forms.Button() + Me.btnprograms = New System.Windows.Forms.Button() + Me.btnicons = New System.Windows.Forms.Button() + Me.btnwindows = New System.Windows.Forms.Button() + Me.btndesktop = New System.Windows.Forms.Button() + Me.pnlshifterintro = New System.Windows.Forms.Panel() + Me.Label66 = New System.Windows.Forms.Label() + Me.Label65 = New System.Windows.Forms.Label() + Me.Label64 = New System.Windows.Forms.Label() + Me.Label63 = New System.Windows.Forms.Label() + Me.pnldesktopoptions = New System.Windows.Forms.Panel() + Me.pnlapplauncheroptions = New System.Windows.Forms.Panel() + Me.pnllauncheritems = New System.Windows.Forms.Panel() + Me.launcheritemtxtcolour = New System.Windows.Forms.Panel() + Me.Label116 = New System.Windows.Forms.Label() + Me.launcheritemstyle = New System.Windows.Forms.ComboBox() + Me.Label115 = New System.Windows.Forms.Label() + Me.launcheritemfont = New System.Windows.Forms.ComboBox() + Me.Label114 = New System.Windows.Forms.Label() + Me.txtlauncheritemtxtsize = New System.Windows.Forms.TextBox() + Me.Label107 = New System.Windows.Forms.Label() + Me.btnshowlauncheritems = New System.Windows.Forms.Button() + Me.Label71 = New System.Windows.Forms.Label() + Me.txtapplauncherwidth = New System.Windows.Forms.TextBox() + Me.Label72 = New System.Windows.Forms.Label() + Me.txtappbuttonlabel = New System.Windows.Forms.TextBox() + Me.Label51 = New System.Windows.Forms.Label() + Me.Label50 = New System.Windows.Forms.Label() + Me.pnlmaintextcolour = New System.Windows.Forms.Panel() + Me.comboappbuttontextstyle = New System.Windows.Forms.ComboBox() + Me.comboappbuttontextfont = New System.Windows.Forms.ComboBox() + Me.Label37 = New System.Windows.Forms.Label() + Me.Label38 = New System.Windows.Forms.Label() + Me.txtappbuttontextsize = New System.Windows.Forms.TextBox() + Me.Label39 = New System.Windows.Forms.Label() + Me.Label40 = New System.Windows.Forms.Label() + Me.pnlmenuitemsmouseover = New System.Windows.Forms.Panel() + Me.Label41 = New System.Windows.Forms.Label() + Me.pnlmenuitemscolour = New System.Windows.Forms.Panel() + Me.Label42 = New System.Windows.Forms.Label() + Me.pnlmainbuttonactivated = New System.Windows.Forms.Panel() + Me.Label28 = New System.Windows.Forms.Label() + Me.Label35 = New System.Windows.Forms.Label() + Me.txtapplicationsbuttonheight = New System.Windows.Forms.TextBox() + Me.Label36 = New System.Windows.Forms.Label() + Me.pnlmainbuttoncolour = New System.Windows.Forms.Panel() + Me.Label43 = New System.Windows.Forms.Label() + Me.pnldesktoppreview = New System.Windows.Forms.Panel() + Me.predesktoppanel = New System.Windows.Forms.Panel() + Me.prepnlpanelbuttonholder = New System.Windows.Forms.FlowLayoutPanel() + Me.prepnlpanelbutton = New System.Windows.Forms.Panel() + Me.pretbicon = New System.Windows.Forms.PictureBox() + Me.pretbctext = New System.Windows.Forms.Label() + Me.pretimepanel = New System.Windows.Forms.Panel() + Me.prepaneltimetext = New System.Windows.Forms.Label() + Me.preapplaunchermenuholder = New System.Windows.Forms.Panel() + Me.predesktopappmenu = New System.Windows.Forms.MenuStrip() + Me.ApplicationsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.KnowledgeInputToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShiftoriumToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ClockToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TerminalToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShifterToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.ShutdownToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.pnlpanelbuttonsoptions = New System.Windows.Forms.Panel() + Me.pnlpanelbuttontextcolour = New System.Windows.Forms.Panel() + Me.Label101 = New System.Windows.Forms.Label() + Me.txtpanelbuttontexttop = New System.Windows.Forms.TextBox() + Me.Label104 = New System.Windows.Forms.Label() + Me.txtpanelbuttontextside = New System.Windows.Forms.TextBox() + Me.Label106 = New System.Windows.Forms.Label() + Me.Label93 = New System.Windows.Forms.Label() + Me.txtpanelbuttontop = New System.Windows.Forms.TextBox() + Me.Label94 = New System.Windows.Forms.Label() + Me.txtpanelbuttoninitalgap = New System.Windows.Forms.TextBox() + Me.Label108 = New System.Windows.Forms.Label() + Me.txtpanelbuttonicontop = New System.Windows.Forms.TextBox() + Me.Label110 = New System.Windows.Forms.Label() + Me.txtpanelbuttoniconside = New System.Windows.Forms.TextBox() + Me.Label112 = New System.Windows.Forms.Label() + Me.txtpanelbuttoniconsize = New System.Windows.Forms.TextBox() + Me.Label105 = New System.Windows.Forms.Label() + Me.cbpanelbuttontextstyle = New System.Windows.Forms.ComboBox() + Me.cbpanelbuttonfont = New System.Windows.Forms.ComboBox() + Me.Label100 = New System.Windows.Forms.Label() + Me.txtpaneltextbuttonsize = New System.Windows.Forms.TextBox() + Me.Label102 = New System.Windows.Forms.Label() + Me.Label103 = New System.Windows.Forms.Label() + Me.Label98 = New System.Windows.Forms.Label() + Me.txtpanelbuttongap = New System.Windows.Forms.TextBox() + Me.Label99 = New System.Windows.Forms.Label() + Me.Label96 = New System.Windows.Forms.Label() + Me.txtpanelbuttonheight = New System.Windows.Forms.TextBox() + Me.Label97 = New System.Windows.Forms.Label() + Me.Label92 = New System.Windows.Forms.Label() + Me.txtpanelbuttonwidth = New System.Windows.Forms.TextBox() + Me.Label91 = New System.Windows.Forms.Label() + Me.pnlpanelbuttoncolour = New System.Windows.Forms.Panel() + Me.Label95 = New System.Windows.Forms.Label() + Me.pnldesktoppaneloptions = New System.Windows.Forms.Panel() + Me.btnpanelbuttons = New System.Windows.Forms.Button() + Me.Label27 = New System.Windows.Forms.Label() + Me.combodesktoppanelposition = New System.Windows.Forms.ComboBox() + Me.Label46 = New System.Windows.Forms.Label() + Me.Label47 = New System.Windows.Forms.Label() + Me.txtdesktoppanelheight = New System.Windows.Forms.TextBox() + Me.Label48 = New System.Windows.Forms.Label() + Me.pnldesktoppanelcolour = New System.Windows.Forms.Panel() + Me.Label49 = New System.Windows.Forms.Label() + Me.pnldesktopintro = New System.Windows.Forms.Panel() + Me.Label69 = New System.Windows.Forms.Label() + Me.Label70 = New System.Windows.Forms.Label() + Me.pnlpanelclockoptions = New System.Windows.Forms.Panel() + Me.pnlclockbackgroundcolour = New System.Windows.Forms.Panel() + Me.Label44 = New System.Windows.Forms.Label() + Me.comboclocktextstyle = New System.Windows.Forms.ComboBox() + Me.comboclocktextfont = New System.Windows.Forms.ComboBox() + Me.Label26 = New System.Windows.Forms.Label() + Me.Label29 = New System.Windows.Forms.Label() + Me.txtclocktextfromtop = New System.Windows.Forms.TextBox() + Me.Label30 = New System.Windows.Forms.Label() + Me.Label31 = New System.Windows.Forms.Label() + Me.txtclocktextsize = New System.Windows.Forms.TextBox() + Me.Label32 = New System.Windows.Forms.Label() + Me.Label33 = New System.Windows.Forms.Label() + Me.pnlpanelclocktextcolour = New System.Windows.Forms.Panel() + Me.Label34 = New System.Windows.Forms.Label() + Me.pnldesktopbackgroundoptions = New System.Windows.Forms.Panel() + Me.pnldesktopcolour = New System.Windows.Forms.Panel() + Me.Label45 = New System.Windows.Forms.Label() + Me.Panel10 = New System.Windows.Forms.Panel() + Me.btndesktopitself = New System.Windows.Forms.Button() + Me.btnpanelclock = New System.Windows.Forms.Button() + Me.btnapplauncher = New System.Windows.Forms.Button() + Me.btndesktoppanel = New System.Windows.Forms.Button() + Me.txtpanelbuttoniconheight = New System.Windows.Forms.TextBox() + Me.pnlwindowsoptions = New System.Windows.Forms.Panel() + Me.pnlbuttonoptions = New System.Windows.Forms.Panel() + Me.pnlminimizebuttonoptions = New System.Windows.Forms.Panel() + Me.Label82 = New System.Windows.Forms.Label() + Me.Label83 = New System.Windows.Forms.Label() + Me.pnlminimizebuttoncolour = New System.Windows.Forms.Panel() + Me.txtminimizebuttonside = New System.Windows.Forms.TextBox() + Me.Label84 = New System.Windows.Forms.Label() + Me.Label85 = New System.Windows.Forms.Label() + Me.txtminimizebuttonheight = New System.Windows.Forms.TextBox() + Me.Label86 = New System.Windows.Forms.Label() + Me.Label87 = New System.Windows.Forms.Label() + Me.txtminimizebuttontop = New System.Windows.Forms.TextBox() + Me.Label88 = New System.Windows.Forms.Label() + Me.Label89 = New System.Windows.Forms.Label() + Me.txtminimizebuttonwidth = New System.Windows.Forms.TextBox() + Me.Label90 = New System.Windows.Forms.Label() + Me.pnlrollupbuttonoptions = New System.Windows.Forms.Panel() + Me.Label54 = New System.Windows.Forms.Label() + Me.Label55 = New System.Windows.Forms.Label() + Me.pnlrollupbuttoncolour = New System.Windows.Forms.Panel() + Me.txtrollupbuttonside = New System.Windows.Forms.TextBox() + Me.Label56 = New System.Windows.Forms.Label() + Me.Label57 = New System.Windows.Forms.Label() + Me.txtrollupbuttonheight = New System.Windows.Forms.TextBox() + Me.Label58 = New System.Windows.Forms.Label() + Me.Label59 = New System.Windows.Forms.Label() + Me.txtrollupbuttontop = New System.Windows.Forms.TextBox() + Me.Label60 = New System.Windows.Forms.Label() + Me.Label61 = New System.Windows.Forms.Label() + Me.txtrollupbuttonwidth = New System.Windows.Forms.TextBox() + Me.Label62 = New System.Windows.Forms.Label() + Me.combobuttonoption = New System.Windows.Forms.ComboBox() + Me.Label52 = New System.Windows.Forms.Label() + Me.pnlclosebuttonoptions = New System.Windows.Forms.Panel() + Me.Label8 = New System.Windows.Forms.Label() + Me.Label11 = New System.Windows.Forms.Label() + Me.pnlclosebuttoncolour = New System.Windows.Forms.Panel() + Me.txtclosebuttonfromside = New System.Windows.Forms.TextBox() + Me.Label7 = New System.Windows.Forms.Label() + Me.Label12 = New System.Windows.Forms.Label() + Me.txtclosebuttonheight = New System.Windows.Forms.TextBox() + Me.Label13 = New System.Windows.Forms.Label() + Me.Label6 = New System.Windows.Forms.Label() + Me.txtclosebuttonfromtop = New System.Windows.Forms.TextBox() + Me.Label10 = New System.Windows.Forms.Label() + Me.Label14 = New System.Windows.Forms.Label() + Me.txtclosebuttonwidth = New System.Windows.Forms.TextBox() + Me.Label9 = New System.Windows.Forms.Label() + Me.pnltitlebaroptions = New System.Windows.Forms.Panel() + Me.Label80 = New System.Windows.Forms.Label() + Me.txticonfromtop = New System.Windows.Forms.TextBox() + Me.Label81 = New System.Windows.Forms.Label() + Me.Label78 = New System.Windows.Forms.Label() + Me.txticonfromside = New System.Windows.Forms.TextBox() + Me.Label79 = New System.Windows.Forms.Label() + Me.lbcornerwidthpx = New System.Windows.Forms.Label() + Me.txttitlebarcornerwidth = New System.Windows.Forms.TextBox() + Me.lbcornerwidth = New System.Windows.Forms.Label() + Me.pnltitlebarrightcornercolour = New System.Windows.Forms.Panel() + Me.pnltitlebarleftcornercolour = New System.Windows.Forms.Panel() + Me.lbrightcornercolor = New System.Windows.Forms.Label() + Me.lbleftcornercolor = New System.Windows.Forms.Label() + Me.cboxtitlebarcorners = New System.Windows.Forms.CheckBox() + Me.Label5 = New System.Windows.Forms.Label() + Me.txttitlebarheight = New System.Windows.Forms.TextBox() + Me.Label4 = New System.Windows.Forms.Label() + Me.pnltitlebarcolour = New System.Windows.Forms.Panel() + Me.Label2 = New System.Windows.Forms.Label() + Me.pnlborderoptions = New System.Windows.Forms.Panel() + Me.cbindividualbordercolours = New System.Windows.Forms.CheckBox() + Me.pnlborderbottomrightcolour = New System.Windows.Forms.Panel() + Me.Label77 = New System.Windows.Forms.Label() + Me.pnlborderbottomcolour = New System.Windows.Forms.Panel() + Me.Label76 = New System.Windows.Forms.Label() + Me.pnlborderbottomleftcolour = New System.Windows.Forms.Panel() + Me.Label75 = New System.Windows.Forms.Label() + Me.pnlborderrightcolour = New System.Windows.Forms.Panel() + Me.Label74 = New System.Windows.Forms.Label() + Me.pnlborderleftcolour = New System.Windows.Forms.Panel() + Me.Label73 = New System.Windows.Forms.Label() + Me.Label15 = New System.Windows.Forms.Label() + Me.pnlbordercolour = New System.Windows.Forms.Panel() + Me.txtbordersize = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label16 = New System.Windows.Forms.Label() + Me.pnltitletextoptions = New System.Windows.Forms.Panel() + Me.combotitletextposition = New System.Windows.Forms.ComboBox() + Me.Label53 = New System.Windows.Forms.Label() + Me.combotitletextstyle = New System.Windows.Forms.ComboBox() + Me.combotitletextfont = New System.Windows.Forms.ComboBox() + Me.Label23 = New System.Windows.Forms.Label() + Me.Label17 = New System.Windows.Forms.Label() + Me.txttitletextside = New System.Windows.Forms.TextBox() + Me.Label18 = New System.Windows.Forms.Label() + Me.Label19 = New System.Windows.Forms.Label() + Me.txttitletexttop = New System.Windows.Forms.TextBox() + Me.Label20 = New System.Windows.Forms.Label() + Me.Label21 = New System.Windows.Forms.Label() + Me.txttitletextsize = New System.Windows.Forms.TextBox() + Me.Label22 = New System.Windows.Forms.Label() + Me.Label24 = New System.Windows.Forms.Label() + Me.pnltitletextcolour = New System.Windows.Forms.Panel() + Me.Label25 = New System.Windows.Forms.Label() + Me.pnlwindowsintro = New System.Windows.Forms.Panel() + Me.Label68 = New System.Windows.Forms.Label() + Me.Label67 = New System.Windows.Forms.Label() + Me.pnlwindowsobjects = New System.Windows.Forms.Panel() + Me.btnborders = New System.Windows.Forms.Button() + Me.btnbuttons = New System.Windows.Forms.Button() + Me.btntitletext = New System.Windows.Forms.Button() + Me.btntitlebar = New System.Windows.Forms.Button() + Me.pnlwindowpreview = New System.Windows.Forms.Panel() + Me.prepgcontent = New System.Windows.Forms.Panel() + Me.prepgbottom = New System.Windows.Forms.Panel() + Me.prepgleft = New System.Windows.Forms.Panel() + Me.prepgbottomlcorner = New System.Windows.Forms.Panel() + Me.prepgright = New System.Windows.Forms.Panel() + Me.prepgbottomrcorner = New System.Windows.Forms.Panel() + Me.pretitlebar = New System.Windows.Forms.Panel() + Me.preminimizebutton = New System.Windows.Forms.Panel() + Me.prepnlicon = New System.Windows.Forms.PictureBox() + Me.prerollupbutton = New System.Windows.Forms.Panel() + Me.preclosebutton = New System.Windows.Forms.Panel() + Me.pretitletext = New System.Windows.Forms.Label() + Me.prepgtoplcorner = New System.Windows.Forms.Panel() + Me.prepgtoprcorner = New System.Windows.Forms.Panel() + Me.pnlreset = New System.Windows.Forms.Panel() + Me.Label113 = New System.Windows.Forms.Label() + Me.btnresetallsettings = New System.Windows.Forms.Button() + Me.Label109 = New System.Windows.Forms.Label() + Me.Label111 = New System.Windows.Forms.Label() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlshiftadvapplauncher = New System.Windows.Forms.Panel() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.btnaalpwrpnlbg = New System.Windows.Forms.Button() + Me.Label124 = New System.Windows.Forms.Label() + Me.btnaalusrpnlbg = New System.Windows.Forms.Button() + Me.Label123 = New System.Windows.Forms.Label() + Me.btnaalshutdowntextcolor = New System.Windows.Forms.Button() + Me.Label122 = New System.Windows.Forms.Label() + Me.cmbaalusrstyle = New System.Windows.Forms.ComboBox() + Me.nudusrsize = New System.Windows.Forms.NumericUpDown() + Me.cmbaalusrfont = New System.Windows.Forms.ComboBox() + Me.Label121 = New System.Windows.Forms.Label() + Me.btnaalusrtextcolor = New System.Windows.Forms.Button() + Me.Label120 = New System.Windows.Forms.Label() + Me.Label119 = New System.Windows.Forms.Label() + Me.Button7 = New System.Windows.Forms.Button() + Me.Button6 = New System.Windows.Forms.Button() + Me.Button5 = New System.Windows.Forms.Button() + Me.Button4 = New System.Windows.Forms.Button() + Me.Button3 = New System.Windows.Forms.Button() + Me.Label118 = New System.Windows.Forms.Label() + Me.pnldeskdoubleplus = New System.Windows.Forms.Panel() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.desktopiconspreview = New System.Windows.Forms.ListView() + Me.pnldppoptions = New System.Windows.Forms.Panel() + Me.pnldppicons = New System.Windows.Forms.Panel() + Me.Button1 = New System.Windows.Forms.Button() + Me.Label117 = New System.Windows.Forms.Label() + Me.pnldppfunctions = New System.Windows.Forms.Panel() + Me.CheckBox1 = New System.Windows.Forms.CheckBox() + Me.btndppfunctions = New System.Windows.Forms.Button() + Me.btndppappearance = New System.Windows.Forms.Button() + Me.btndppfiles = New System.Windows.Forms.Button() + Me.btndppicons = New System.Windows.Forms.Button() + Me.tmrfix = New System.Windows.Forms.Timer(Me.components) + Me.tmrdelay = New System.Windows.Forms.Timer(Me.components) + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.catholder.SuspendLayout() + Me.pnlshifterintro.SuspendLayout() + Me.pnldesktopoptions.SuspendLayout() + Me.pnlapplauncheroptions.SuspendLayout() + Me.pnllauncheritems.SuspendLayout() + Me.pnldesktoppreview.SuspendLayout() + Me.predesktoppanel.SuspendLayout() + Me.prepnlpanelbuttonholder.SuspendLayout() + Me.prepnlpanelbutton.SuspendLayout() + CType(Me.pretbicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pretimepanel.SuspendLayout() + Me.preapplaunchermenuholder.SuspendLayout() + Me.predesktopappmenu.SuspendLayout() + Me.pnlpanelbuttonsoptions.SuspendLayout() + Me.pnldesktoppaneloptions.SuspendLayout() + Me.pnldesktopintro.SuspendLayout() + Me.pnlpanelclockoptions.SuspendLayout() + Me.pnldesktopbackgroundoptions.SuspendLayout() + Me.Panel10.SuspendLayout() + Me.pnlwindowsoptions.SuspendLayout() + Me.pnlbuttonoptions.SuspendLayout() + Me.pnlminimizebuttonoptions.SuspendLayout() + Me.pnlrollupbuttonoptions.SuspendLayout() + Me.pnlclosebuttonoptions.SuspendLayout() + Me.pnltitlebaroptions.SuspendLayout() + Me.pnlborderoptions.SuspendLayout() + Me.pnltitletextoptions.SuspendLayout() + Me.pnlwindowsintro.SuspendLayout() + Me.pnlwindowsobjects.SuspendLayout() + Me.pnlwindowpreview.SuspendLayout() + Me.prepgleft.SuspendLayout() + Me.prepgright.SuspendLayout() + Me.pretitlebar.SuspendLayout() + CType(Me.prepnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlreset.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnlshiftadvapplauncher.SuspendLayout() + Me.Panel1.SuspendLayout() + CType(Me.nudusrsize, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnldeskdoubleplus.SuspendLayout() + Me.Panel2.SuspendLayout() + Me.pnldppoptions.SuspendLayout() + Me.pnldppicons.SuspendLayout() + Me.pnldppfunctions.SuspendLayout() + Me.SuspendLayout() + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 309) + Me.pgleft.TabIndex = 27 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 307) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(598, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 309) + Me.pgright.TabIndex = 28 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 307) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 337) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(596, 2) + Me.pgbottom.TabIndex = 29 + ' + 'clocktick + ' + Me.clocktick.Enabled = True + Me.clocktick.Interval = 1000 + ' + 'customizationtime + ' + Me.customizationtime.Enabled = True + Me.customizationtime.Interval = 10000 + ' + 'timerearned + ' + Me.timerearned.Interval = 3000 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(600, 30) + Me.titlebar.TabIndex = 25 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 30 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconShifter + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 31 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 5) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 30 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(57, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Shifter" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(598, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.ForeColor = System.Drawing.Color.White + Me.Label1.Location = New System.Drawing.Point(597, 3) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(39, 13) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "Label1" + ' + 'btnapply + ' + Me.btnapply.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.btnapply.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnapply.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnapply.Location = New System.Drawing.Point(7, 270) + Me.btnapply.Name = "btnapply" + Me.btnapply.Size = New System.Drawing.Size(119, 29) + Me.btnapply.TabIndex = 3 + Me.btnapply.TabStop = False + Me.btnapply.Text = "Apply Changes" + Me.btnapply.UseVisualStyleBackColor = True + ' + 'catholder + ' + Me.catholder.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.catholder.BackColor = System.Drawing.Color.White + Me.catholder.Controls.Add(Me.btnreset) + Me.catholder.Controls.Add(Me.Button2) + Me.catholder.Controls.Add(Me.btndeskdoubleplus) + Me.catholder.Controls.Add(Me.btnprograms) + Me.catholder.Controls.Add(Me.btnicons) + Me.catholder.Controls.Add(Me.btnwindows) + Me.catholder.Controls.Add(Me.btndesktop) + Me.catholder.Location = New System.Drawing.Point(7, 9) + Me.catholder.Name = "catholder" + Me.catholder.Size = New System.Drawing.Size(119, 255) + Me.catholder.TabIndex = 5 + ' + 'btnreset + ' + Me.btnreset.BackColor = System.Drawing.Color.White + Me.btnreset.Dock = System.Windows.Forms.DockStyle.Top + Me.btnreset.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnreset.Font = New System.Drawing.Font("Cambria", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnreset.Location = New System.Drawing.Point(0, 193) + Me.btnreset.Name = "btnreset" + Me.btnreset.Size = New System.Drawing.Size(119, 29) + Me.btnreset.TabIndex = 8 + Me.btnreset.TabStop = False + Me.btnreset.Text = "Reset" + Me.btnreset.UseVisualStyleBackColor = False + ' + 'Button2 + ' + Me.Button2.BackColor = System.Drawing.Color.White + Me.Button2.Dock = System.Windows.Forms.DockStyle.Top + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.Font = New System.Drawing.Font("Cambria", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Button2.Location = New System.Drawing.Point(0, 145) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(119, 48) + Me.Button2.TabIndex = 10 + Me.Button2.TabStop = False + Me.Button2.Text = "Adv. App Launcher" + Me.Button2.UseVisualStyleBackColor = False + ' + 'btndeskdoubleplus + ' + Me.btndeskdoubleplus.BackColor = System.Drawing.Color.White + Me.btndeskdoubleplus.Dock = System.Windows.Forms.DockStyle.Top + Me.btndeskdoubleplus.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndeskdoubleplus.Font = New System.Drawing.Font("Cambria", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btndeskdoubleplus.Location = New System.Drawing.Point(0, 116) + Me.btndeskdoubleplus.Name = "btndeskdoubleplus" + Me.btndeskdoubleplus.Size = New System.Drawing.Size(119, 29) + Me.btndeskdoubleplus.TabIndex = 9 + Me.btndeskdoubleplus.TabStop = False + Me.btndeskdoubleplus.Text = "Desktop++" + Me.btndeskdoubleplus.UseVisualStyleBackColor = False + ' + 'btnprograms + ' + Me.btnprograms.BackColor = System.Drawing.Color.White + Me.btnprograms.Dock = System.Windows.Forms.DockStyle.Top + Me.btnprograms.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnprograms.Font = New System.Drawing.Font("Cambria", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnprograms.Location = New System.Drawing.Point(0, 87) + Me.btnprograms.Name = "btnprograms" + Me.btnprograms.Size = New System.Drawing.Size(119, 29) + Me.btnprograms.TabIndex = 7 + Me.btnprograms.TabStop = False + Me.btnprograms.Text = "Programs" + Me.btnprograms.UseVisualStyleBackColor = False + Me.btnprograms.Visible = False + ' + 'btnicons + ' + Me.btnicons.BackColor = System.Drawing.Color.White + Me.btnicons.Dock = System.Windows.Forms.DockStyle.Top + Me.btnicons.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnicons.Font = New System.Drawing.Font("Cambria", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnicons.Location = New System.Drawing.Point(0, 58) + Me.btnicons.Name = "btnicons" + Me.btnicons.Size = New System.Drawing.Size(119, 29) + Me.btnicons.TabIndex = 6 + Me.btnicons.TabStop = False + Me.btnicons.Text = "Icons" + Me.btnicons.UseVisualStyleBackColor = False + Me.btnicons.Visible = False + ' + 'btnwindows + ' + Me.btnwindows.BackColor = System.Drawing.Color.White + Me.btnwindows.Dock = System.Windows.Forms.DockStyle.Top + Me.btnwindows.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnwindows.Font = New System.Drawing.Font("Cambria", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnwindows.Location = New System.Drawing.Point(0, 29) + Me.btnwindows.Name = "btnwindows" + Me.btnwindows.Size = New System.Drawing.Size(119, 29) + Me.btnwindows.TabIndex = 5 + Me.btnwindows.TabStop = False + Me.btnwindows.Text = "Windows" + Me.btnwindows.UseVisualStyleBackColor = False + ' + 'btndesktop + ' + Me.btndesktop.BackColor = System.Drawing.Color.White + Me.btndesktop.Dock = System.Windows.Forms.DockStyle.Top + Me.btndesktop.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndesktop.Font = New System.Drawing.Font("Cambria", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btndesktop.Location = New System.Drawing.Point(0, 0) + Me.btndesktop.Name = "btndesktop" + Me.btndesktop.Size = New System.Drawing.Size(119, 29) + Me.btndesktop.TabIndex = 4 + Me.btndesktop.TabStop = False + Me.btndesktop.Text = "Desktop" + Me.btndesktop.UseVisualStyleBackColor = False + ' + 'pnlshifterintro + ' + Me.pnlshifterintro.BackColor = System.Drawing.Color.White + Me.pnlshifterintro.Controls.Add(Me.Label66) + Me.pnlshifterintro.Controls.Add(Me.Label65) + Me.pnlshifterintro.Controls.Add(Me.Label64) + Me.pnlshifterintro.Controls.Add(Me.Label63) + Me.pnlshifterintro.Location = New System.Drawing.Point(519, 256) + Me.pnlshifterintro.Name = "pnlshifterintro" + Me.pnlshifterintro.Size = New System.Drawing.Size(72, 47) + Me.pnlshifterintro.TabIndex = 17 + ' + 'Label66 + ' + Me.Label66.BackColor = System.Drawing.Color.Transparent + Me.Label66.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label66.Location = New System.Drawing.Point(3, 227) + Me.Label66.Name = "Label66" + Me.Label66.Size = New System.Drawing.Size(451, 65) + Me.Label66.TabIndex = 3 + Me.Label66.Text = resources.GetString("Label66.Text") + Me.Label66.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label65 + ' + Me.Label65.AutoSize = True + Me.Label65.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label65.Location = New System.Drawing.Point(53, 204) + Me.Label65.Name = "Label65" + Me.Label65.Size = New System.Drawing.Size(352, 20) + Me.Label65.TabIndex = 2 + Me.Label65.Text = "You can earn codepoints using the Shifter!" + ' + 'Label64 + ' + Me.Label64.BackColor = System.Drawing.Color.Transparent + Me.Label64.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label64.Location = New System.Drawing.Point(4, 32) + Me.Label64.Name = "Label64" + Me.Label64.Size = New System.Drawing.Size(451, 163) + Me.Label64.TabIndex = 1 + Me.Label64.Text = resources.GetString("Label64.Text") + Me.Label64.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label63 + ' + Me.Label63.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label63.Location = New System.Drawing.Point(72, 0) + Me.Label63.Name = "Label63" + Me.Label63.Size = New System.Drawing.Size(332, 29) + Me.Label63.TabIndex = 0 + Me.Label63.Text = "Welcome to the Shifter!" + ' + 'pnldesktopoptions + ' + Me.pnldesktopoptions.BackColor = System.Drawing.Color.White + Me.pnldesktopoptions.Controls.Add(Me.pnlapplauncheroptions) + Me.pnldesktopoptions.Controls.Add(Me.pnldesktoppreview) + Me.pnldesktopoptions.Controls.Add(Me.pnlpanelbuttonsoptions) + Me.pnldesktopoptions.Controls.Add(Me.pnldesktoppaneloptions) + Me.pnldesktopoptions.Controls.Add(Me.pnldesktopintro) + Me.pnldesktopoptions.Controls.Add(Me.pnlpanelclockoptions) + Me.pnldesktopoptions.Controls.Add(Me.pnldesktopbackgroundoptions) + Me.pnldesktopoptions.Controls.Add(Me.Panel10) + Me.pnldesktopoptions.Location = New System.Drawing.Point(134, 9) + Me.pnldesktopoptions.Name = "pnldesktopoptions" + Me.pnldesktopoptions.Size = New System.Drawing.Size(457, 292) + Me.pnldesktopoptions.TabIndex = 16 + Me.pnldesktopoptions.Visible = False + ' + 'pnlapplauncheroptions + ' + Me.pnlapplauncheroptions.Controls.Add(Me.pnllauncheritems) + Me.pnlapplauncheroptions.Controls.Add(Me.btnshowlauncheritems) + Me.pnlapplauncheroptions.Controls.Add(Me.Label71) + Me.pnlapplauncheroptions.Controls.Add(Me.txtapplauncherwidth) + Me.pnlapplauncheroptions.Controls.Add(Me.Label72) + Me.pnlapplauncheroptions.Controls.Add(Me.txtappbuttonlabel) + Me.pnlapplauncheroptions.Controls.Add(Me.Label51) + Me.pnlapplauncheroptions.Controls.Add(Me.Label50) + Me.pnlapplauncheroptions.Controls.Add(Me.pnlmaintextcolour) + Me.pnlapplauncheroptions.Controls.Add(Me.comboappbuttontextstyle) + Me.pnlapplauncheroptions.Controls.Add(Me.comboappbuttontextfont) + Me.pnlapplauncheroptions.Controls.Add(Me.Label37) + Me.pnlapplauncheroptions.Controls.Add(Me.Label38) + Me.pnlapplauncheroptions.Controls.Add(Me.txtappbuttontextsize) + Me.pnlapplauncheroptions.Controls.Add(Me.Label39) + Me.pnlapplauncheroptions.Controls.Add(Me.Label40) + Me.pnlapplauncheroptions.Controls.Add(Me.pnlmenuitemsmouseover) + Me.pnlapplauncheroptions.Controls.Add(Me.Label41) + Me.pnlapplauncheroptions.Controls.Add(Me.pnlmenuitemscolour) + Me.pnlapplauncheroptions.Controls.Add(Me.Label42) + Me.pnlapplauncheroptions.Controls.Add(Me.pnlmainbuttonactivated) + Me.pnlapplauncheroptions.Controls.Add(Me.Label28) + Me.pnlapplauncheroptions.Controls.Add(Me.Label35) + Me.pnlapplauncheroptions.Controls.Add(Me.txtapplicationsbuttonheight) + Me.pnlapplauncheroptions.Controls.Add(Me.Label36) + Me.pnlapplauncheroptions.Controls.Add(Me.pnlmainbuttoncolour) + Me.pnlapplauncheroptions.Controls.Add(Me.Label43) + Me.pnlapplauncheroptions.Location = New System.Drawing.Point(0, 0) + Me.pnlapplauncheroptions.Name = "pnlapplauncheroptions" + Me.pnlapplauncheroptions.Size = New System.Drawing.Size(60, 60) + Me.pnlapplauncheroptions.TabIndex = 10 + Me.pnlapplauncheroptions.Visible = False + ' + 'pnllauncheritems + ' + Me.pnllauncheritems.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnllauncheritems.Controls.Add(Me.launcheritemtxtcolour) + Me.pnllauncheritems.Controls.Add(Me.Label116) + Me.pnllauncheritems.Controls.Add(Me.launcheritemstyle) + Me.pnllauncheritems.Controls.Add(Me.Label115) + Me.pnllauncheritems.Controls.Add(Me.launcheritemfont) + Me.pnllauncheritems.Controls.Add(Me.Label114) + Me.pnllauncheritems.Controls.Add(Me.txtlauncheritemtxtsize) + Me.pnllauncheritems.Controls.Add(Me.Label107) + Me.pnllauncheritems.Location = New System.Drawing.Point(3, 136) + Me.pnllauncheritems.Name = "pnllauncheritems" + Me.pnllauncheritems.Size = New System.Drawing.Size(312, 107) + Me.pnllauncheritems.TabIndex = 35 + ' + 'launcheritemtxtcolour + ' + Me.launcheritemtxtcolour.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.launcheritemtxtcolour.Location = New System.Drawing.Point(239, 36) + Me.launcheritemtxtcolour.Name = "launcheritemtxtcolour" + Me.launcheritemtxtcolour.Size = New System.Drawing.Size(41, 20) + Me.launcheritemtxtcolour.TabIndex = 31 + ' + 'Label116 + ' + Me.Label116.AutoSize = True + Me.Label116.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label116.Location = New System.Drawing.Point(157, 37) + Me.Label116.Name = "Label116" + Me.Label116.Size = New System.Drawing.Size(79, 16) + Me.Label116.TabIndex = 30 + Me.Label116.Text = "Text Colour:" + ' + 'launcheritemstyle + ' + Me.launcheritemstyle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.launcheritemstyle.FormattingEnabled = True + Me.launcheritemstyle.Items.AddRange(New Object() {"Bold", "Italic", "Regular", "Strikeout", "Underline"}) + Me.launcheritemstyle.Location = New System.Drawing.Point(54, 31) + Me.launcheritemstyle.Name = "launcheritemstyle" + Me.launcheritemstyle.Size = New System.Drawing.Size(97, 24) + Me.launcheritemstyle.TabIndex = 29 + ' + 'Label115 + ' + Me.Label115.AutoSize = True + Me.Label115.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!) + Me.Label115.Location = New System.Drawing.Point(8, 35) + Me.Label115.Name = "Label115" + Me.Label115.Size = New System.Drawing.Size(41, 16) + Me.Label115.TabIndex = 28 + Me.Label115.Text = "Style:" + ' + 'launcheritemfont + ' + Me.launcheritemfont.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.launcheritemfont.FormattingEnabled = True + Me.launcheritemfont.Location = New System.Drawing.Point(157, 4) + Me.launcheritemfont.Name = "launcheritemfont" + Me.launcheritemfont.Size = New System.Drawing.Size(125, 24) + Me.launcheritemfont.TabIndex = 27 + ' + 'Label114 + ' + Me.Label114.AutoSize = True + Me.Label114.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!) + Me.Label114.Location = New System.Drawing.Point(115, 6) + Me.Label114.Name = "Label114" + Me.Label114.Size = New System.Drawing.Size(37, 16) + Me.Label114.TabIndex = 15 + Me.Label114.Text = "Font:" + ' + 'txtlauncheritemtxtsize + ' + Me.txtlauncheritemtxtsize.BackColor = System.Drawing.Color.White + Me.txtlauncheritemtxtsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtlauncheritemtxtsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtlauncheritemtxtsize.ForeColor = System.Drawing.Color.Black + Me.txtlauncheritemtxtsize.Location = New System.Drawing.Point(75, 4) + Me.txtlauncheritemtxtsize.Name = "txtlauncheritemtxtsize" + Me.txtlauncheritemtxtsize.Size = New System.Drawing.Size(23, 22) + Me.txtlauncheritemtxtsize.TabIndex = 14 + ' + 'Label107 + ' + Me.Label107.AutoSize = True + Me.Label107.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!) + Me.Label107.Location = New System.Drawing.Point(5, 6) + Me.Label107.Name = "Label107" + Me.Label107.Size = New System.Drawing.Size(66, 16) + Me.Label107.TabIndex = 0 + Me.Label107.Text = "Text Size:" + ' + 'btnshowlauncheritems + ' + Me.btnshowlauncheritems.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnshowlauncheritems.Location = New System.Drawing.Point(233, 106) + Me.btnshowlauncheritems.Name = "btnshowlauncheritems" + Me.btnshowlauncheritems.Size = New System.Drawing.Size(75, 23) + Me.btnshowlauncheritems.TabIndex = 34 + Me.btnshowlauncheritems.Text = "Items >" + Me.btnshowlauncheritems.UseVisualStyleBackColor = True + ' + 'Label71 + ' + Me.Label71.AutoSize = True + Me.Label71.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label71.Location = New System.Drawing.Point(204, 108) + Me.Label71.Name = "Label71" + Me.Label71.Size = New System.Drawing.Size(22, 16) + Me.Label71.TabIndex = 33 + Me.Label71.Text = "px" + ' + 'txtapplauncherwidth + ' + Me.txtapplauncherwidth.BackColor = System.Drawing.Color.White + Me.txtapplauncherwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtapplauncherwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtapplauncherwidth.ForeColor = System.Drawing.Color.Black + Me.txtapplauncherwidth.Location = New System.Drawing.Point(149, 106) + Me.txtapplauncherwidth.Name = "txtapplauncherwidth" + Me.txtapplauncherwidth.Size = New System.Drawing.Size(54, 22) + Me.txtapplauncherwidth.TabIndex = 32 + ' + 'Label72 + ' + Me.Label72.AutoSize = True + Me.Label72.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label72.Location = New System.Drawing.Point(104, 108) + Me.Label72.Name = "Label72" + Me.Label72.Size = New System.Drawing.Size(45, 16) + Me.Label72.TabIndex = 31 + Me.Label72.Text = "Width:" + ' + 'txtappbuttonlabel + ' + Me.txtappbuttonlabel.BackColor = System.Drawing.Color.White + Me.txtappbuttonlabel.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtappbuttonlabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtappbuttonlabel.ForeColor = System.Drawing.Color.Black + Me.txtappbuttonlabel.Location = New System.Drawing.Point(54, 81) + Me.txtappbuttonlabel.Name = "txtappbuttonlabel" + Me.txtappbuttonlabel.Size = New System.Drawing.Size(81, 22) + Me.txtappbuttonlabel.TabIndex = 30 + ' + 'Label51 + ' + Me.Label51.AutoSize = True + Me.Label51.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label51.Location = New System.Drawing.Point(3, 84) + Me.Label51.Name = "Label51" + Me.Label51.Size = New System.Drawing.Size(45, 16) + Me.Label51.TabIndex = 29 + Me.Label51.Text = "Label:" + ' + 'Label50 + ' + Me.Label50.AutoSize = True + Me.Label50.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label50.Location = New System.Drawing.Point(141, 84) + Me.Label50.Name = "Label50" + Me.Label50.Size = New System.Drawing.Size(37, 16) + Me.Label50.TabIndex = 28 + Me.Label50.Text = "Font:" + ' + 'pnlmaintextcolour + ' + Me.pnlmaintextcolour.Location = New System.Drawing.Point(156, 56) + Me.pnlmaintextcolour.Name = "pnlmaintextcolour" + Me.pnlmaintextcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlmaintextcolour.TabIndex = 19 + ' + 'comboappbuttontextstyle + ' + Me.comboappbuttontextstyle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.comboappbuttontextstyle.FormattingEnabled = True + Me.comboappbuttontextstyle.Items.AddRange(New Object() {"Bold", "Italic", "Regular", "Strikeout", "Underline"}) + Me.comboappbuttontextstyle.Location = New System.Drawing.Point(244, 54) + Me.comboappbuttontextstyle.Name = "comboappbuttontextstyle" + Me.comboappbuttontextstyle.Size = New System.Drawing.Size(64, 24) + Me.comboappbuttontextstyle.TabIndex = 27 + ' + 'comboappbuttontextfont + ' + Me.comboappbuttontextfont.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.comboappbuttontextfont.FormattingEnabled = True + Me.comboappbuttontextfont.Location = New System.Drawing.Point(182, 80) + Me.comboappbuttontextfont.Name = "comboappbuttontextfont" + Me.comboappbuttontextfont.Size = New System.Drawing.Size(125, 24) + Me.comboappbuttontextfont.TabIndex = 26 + ' + 'Label37 + ' + Me.Label37.AutoSize = True + Me.Label37.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label37.Location = New System.Drawing.Point(201, 57) + Me.Label37.Name = "Label37" + Me.Label37.Size = New System.Drawing.Size(41, 16) + Me.Label37.TabIndex = 25 + Me.Label37.Text = "Style:" + ' + 'Label38 + ' + Me.Label38.AutoSize = True + Me.Label38.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label38.Location = New System.Drawing.Point(76, 57) + Me.Label38.Name = "Label38" + Me.Label38.Size = New System.Drawing.Size(22, 16) + Me.Label38.TabIndex = 24 + Me.Label38.Text = "px" + ' + 'txtappbuttontextsize + ' + Me.txtappbuttontextsize.BackColor = System.Drawing.Color.White + Me.txtappbuttontextsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtappbuttontextsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtappbuttontextsize.ForeColor = System.Drawing.Color.Black + Me.txtappbuttontextsize.Location = New System.Drawing.Point(52, 55) + Me.txtappbuttontextsize.Name = "txtappbuttontextsize" + Me.txtappbuttontextsize.Size = New System.Drawing.Size(23, 22) + Me.txtappbuttontextsize.TabIndex = 23 + ' + 'Label39 + ' + Me.Label39.AutoSize = True + Me.Label39.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label39.Location = New System.Drawing.Point(2, 57) + Me.Label39.Name = "Label39" + Me.Label39.Size = New System.Drawing.Size(49, 16) + Me.Label39.TabIndex = 22 + Me.Label39.Text = "T Size:" + ' + 'Label40 + ' + Me.Label40.AutoSize = True + Me.Label40.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label40.Location = New System.Drawing.Point(102, 58) + Me.Label40.Name = "Label40" + Me.Label40.Size = New System.Drawing.Size(50, 16) + Me.Label40.TabIndex = 21 + Me.Label40.Text = "Colour:" + ' + 'pnlmenuitemsmouseover + ' + Me.pnlmenuitemsmouseover.Location = New System.Drawing.Point(267, 31) + Me.pnlmenuitemsmouseover.Name = "pnlmenuitemsmouseover" + Me.pnlmenuitemsmouseover.Size = New System.Drawing.Size(41, 20) + Me.pnlmenuitemsmouseover.TabIndex = 20 + ' + 'Label41 + ' + Me.Label41.AutoSize = True + Me.Label41.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label41.Location = New System.Drawing.Point(177, 32) + Me.Label41.Name = "Label41" + Me.Label41.Size = New System.Drawing.Size(84, 16) + Me.Label41.TabIndex = 19 + Me.Label41.Text = "Mouse Over:" + ' + 'pnlmenuitemscolour + ' + Me.pnlmenuitemscolour.Location = New System.Drawing.Point(128, 30) + Me.pnlmenuitemscolour.Name = "pnlmenuitemscolour" + Me.pnlmenuitemscolour.Size = New System.Drawing.Size(41, 20) + Me.pnlmenuitemscolour.TabIndex = 18 + ' + 'Label42 + ' + Me.Label42.AutoSize = True + Me.Label42.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label42.Location = New System.Drawing.Point(3, 32) + Me.Label42.Name = "Label42" + Me.Label42.Size = New System.Drawing.Size(121, 16) + Me.Label42.TabIndex = 17 + Me.Label42.Text = "Menu Items Colour:" + ' + 'pnlmainbuttonactivated + ' + Me.pnlmainbuttonactivated.Location = New System.Drawing.Point(267, 6) + Me.pnlmainbuttonactivated.Name = "pnlmainbuttonactivated" + Me.pnlmainbuttonactivated.Size = New System.Drawing.Size(41, 20) + Me.pnlmainbuttonactivated.TabIndex = 16 + ' + 'Label28 + ' + Me.Label28.AutoSize = True + Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label28.Location = New System.Drawing.Point(177, 7) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(67, 16) + Me.Label28.TabIndex = 15 + Me.Label28.Text = "Activated:" + ' + 'Label35 + ' + Me.Label35.AutoSize = True + Me.Label35.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label35.Location = New System.Drawing.Point(78, 108) + Me.Label35.Name = "Label35" + Me.Label35.Size = New System.Drawing.Size(22, 16) + Me.Label35.TabIndex = 14 + Me.Label35.Text = "px" + ' + 'txtapplicationsbuttonheight + ' + Me.txtapplicationsbuttonheight.BackColor = System.Drawing.Color.White + Me.txtapplicationsbuttonheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtapplicationsbuttonheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtapplicationsbuttonheight.ForeColor = System.Drawing.Color.Black + Me.txtapplicationsbuttonheight.Location = New System.Drawing.Point(54, 106) + Me.txtapplicationsbuttonheight.Name = "txtapplicationsbuttonheight" + Me.txtapplicationsbuttonheight.Size = New System.Drawing.Size(23, 22) + Me.txtapplicationsbuttonheight.TabIndex = 13 + ' + 'Label36 + ' + Me.Label36.AutoSize = True + Me.Label36.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label36.Location = New System.Drawing.Point(3, 108) + Me.Label36.Name = "Label36" + Me.Label36.Size = New System.Drawing.Size(50, 16) + Me.Label36.TabIndex = 12 + Me.Label36.Text = "Height:" + ' + 'pnlmainbuttoncolour + ' + Me.pnlmainbuttoncolour.Location = New System.Drawing.Point(128, 4) + Me.pnlmainbuttoncolour.Name = "pnlmainbuttoncolour" + Me.pnlmainbuttoncolour.Size = New System.Drawing.Size(41, 20) + Me.pnlmainbuttoncolour.TabIndex = 1 + ' + 'Label43 + ' + Me.Label43.AutoSize = True + Me.Label43.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label43.Location = New System.Drawing.Point(3, 7) + Me.Label43.Name = "Label43" + Me.Label43.Size = New System.Drawing.Size(122, 16) + Me.Label43.TabIndex = 0 + Me.Label43.Text = "Main Button Colour:" + ' + 'pnldesktoppreview + ' + Me.pnldesktoppreview.Controls.Add(Me.predesktoppanel) + Me.pnldesktoppreview.Location = New System.Drawing.Point(5, 3) + Me.pnldesktoppreview.Name = "pnldesktoppreview" + Me.pnldesktoppreview.Size = New System.Drawing.Size(448, 148) + Me.pnldesktoppreview.TabIndex = 0 + ' + 'predesktoppanel + ' + Me.predesktoppanel.BackColor = System.Drawing.Color.Gray + Me.predesktoppanel.Controls.Add(Me.prepnlpanelbuttonholder) + Me.predesktoppanel.Controls.Add(Me.pretimepanel) + Me.predesktoppanel.Controls.Add(Me.preapplaunchermenuholder) + Me.predesktoppanel.Dock = System.Windows.Forms.DockStyle.Top + Me.predesktoppanel.Location = New System.Drawing.Point(0, 0) + Me.predesktoppanel.Name = "predesktoppanel" + Me.predesktoppanel.Size = New System.Drawing.Size(448, 25) + Me.predesktoppanel.TabIndex = 1 + ' + 'prepnlpanelbuttonholder + ' + Me.prepnlpanelbuttonholder.BackColor = System.Drawing.Color.Transparent + Me.prepnlpanelbuttonholder.Controls.Add(Me.prepnlpanelbutton) + Me.prepnlpanelbuttonholder.Dock = System.Windows.Forms.DockStyle.Fill + Me.prepnlpanelbuttonholder.Location = New System.Drawing.Point(116, 0) + Me.prepnlpanelbuttonholder.Name = "prepnlpanelbuttonholder" + Me.prepnlpanelbuttonholder.Padding = New System.Windows.Forms.Padding(2, 0, 0, 0) + Me.prepnlpanelbuttonholder.Size = New System.Drawing.Size(235, 25) + Me.prepnlpanelbuttonholder.TabIndex = 6 + ' + 'prepnlpanelbutton + ' + Me.prepnlpanelbutton.BackColor = System.Drawing.Color.Black + Me.prepnlpanelbutton.Controls.Add(Me.pretbicon) + Me.prepnlpanelbutton.Controls.Add(Me.pretbctext) + Me.prepnlpanelbutton.Location = New System.Drawing.Point(5, 3) + Me.prepnlpanelbutton.Name = "prepnlpanelbutton" + Me.prepnlpanelbutton.Size = New System.Drawing.Size(126, 20) + Me.prepnlpanelbutton.TabIndex = 18 + Me.prepnlpanelbutton.Visible = False + ' + 'pretbicon + ' + Me.pretbicon.BackColor = System.Drawing.Color.Transparent + Me.pretbicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pretbicon.Image = Global.ShiftOS.My.Resources.Resources.iconShifter + Me.pretbicon.Location = New System.Drawing.Point(4, 2) + Me.pretbicon.Name = "pretbicon" + Me.pretbicon.Size = New System.Drawing.Size(16, 16) + Me.pretbicon.TabIndex = 1 + Me.pretbicon.TabStop = False + ' + 'pretbctext + ' + Me.pretbctext.AutoSize = True + Me.pretbctext.BackColor = System.Drawing.Color.Transparent + Me.pretbctext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.pretbctext.ForeColor = System.Drawing.Color.White + Me.pretbctext.Location = New System.Drawing.Point(24, 2) + Me.pretbctext.Name = "pretbctext" + Me.pretbctext.Size = New System.Drawing.Size(45, 16) + Me.pretbctext.TabIndex = 0 + Me.pretbctext.Text = "Shifter" + ' + 'pretimepanel + ' + Me.pretimepanel.Controls.Add(Me.prepaneltimetext) + Me.pretimepanel.Dock = System.Windows.Forms.DockStyle.Right + Me.pretimepanel.Location = New System.Drawing.Point(351, 0) + Me.pretimepanel.Name = "pretimepanel" + Me.pretimepanel.Size = New System.Drawing.Size(97, 25) + Me.pretimepanel.TabIndex = 5 + ' + 'prepaneltimetext + ' + Me.prepaneltimetext.AutoSize = True + Me.prepaneltimetext.BackColor = System.Drawing.Color.Transparent + Me.prepaneltimetext.Font = New System.Drawing.Font("Trebuchet MS", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.prepaneltimetext.Location = New System.Drawing.Point(5, 0) + Me.prepaneltimetext.Name = "prepaneltimetext" + Me.prepaneltimetext.Size = New System.Drawing.Size(80, 24) + Me.prepaneltimetext.TabIndex = 1 + Me.prepaneltimetext.Text = "5000023" + Me.prepaneltimetext.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'preapplaunchermenuholder + ' + Me.preapplaunchermenuholder.Controls.Add(Me.predesktopappmenu) + Me.preapplaunchermenuholder.Dock = System.Windows.Forms.DockStyle.Left + Me.preapplaunchermenuholder.Location = New System.Drawing.Point(0, 0) + Me.preapplaunchermenuholder.Name = "preapplaunchermenuholder" + Me.preapplaunchermenuholder.Size = New System.Drawing.Size(116, 25) + Me.preapplaunchermenuholder.TabIndex = 4 + ' + 'predesktopappmenu + ' + Me.predesktopappmenu.AutoSize = False + Me.predesktopappmenu.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ApplicationsToolStripMenuItem}) + Me.predesktopappmenu.LayoutStyle = System.Windows.Forms.ToolStripLayoutStyle.HorizontalStackWithOverflow + Me.predesktopappmenu.Location = New System.Drawing.Point(0, 0) + Me.predesktopappmenu.Name = "predesktopappmenu" + Me.predesktopappmenu.Padding = New System.Windows.Forms.Padding(0) + Me.predesktopappmenu.Size = New System.Drawing.Size(116, 24) + Me.predesktopappmenu.TabIndex = 0 + Me.predesktopappmenu.Text = "MenuStrip1" + ' + 'ApplicationsToolStripMenuItem + ' + Me.ApplicationsToolStripMenuItem.AutoSize = False + Me.ApplicationsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.KnowledgeInputToolStripMenuItem, Me.ShiftoriumToolStripMenuItem, Me.ClockToolStripMenuItem, Me.TerminalToolStripMenuItem, Me.ShifterToolStripMenuItem, Me.ToolStripSeparator1, Me.ShutdownToolStripMenuItem}) + Me.ApplicationsToolStripMenuItem.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.749999!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.ApplicationsToolStripMenuItem.Name = "ApplicationsToolStripMenuItem" + Me.ApplicationsToolStripMenuItem.Padding = New System.Windows.Forms.Padding(2, 0, 2, 0) + Me.ApplicationsToolStripMenuItem.ShowShortcutKeys = False + Me.ApplicationsToolStripMenuItem.Size = New System.Drawing.Size(102, 24) + Me.ApplicationsToolStripMenuItem.Text = "Applications" + Me.ApplicationsToolStripMenuItem.TextDirection = System.Windows.Forms.ToolStripTextDirection.Horizontal + Me.ApplicationsToolStripMenuItem.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage + ' + 'KnowledgeInputToolStripMenuItem + ' + Me.KnowledgeInputToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.KnowledgeInputToolStripMenuItem.Name = "KnowledgeInputToolStripMenuItem" + Me.KnowledgeInputToolStripMenuItem.ShowShortcutKeys = False + Me.KnowledgeInputToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.KnowledgeInputToolStripMenuItem.Text = "Knowledge Input" + ' + 'ShiftoriumToolStripMenuItem + ' + Me.ShiftoriumToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShiftoriumToolStripMenuItem.Name = "ShiftoriumToolStripMenuItem" + Me.ShiftoriumToolStripMenuItem.ShowShortcutKeys = False + Me.ShiftoriumToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ShiftoriumToolStripMenuItem.Text = "Shiftorium" + ' + 'ClockToolStripMenuItem + ' + Me.ClockToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ClockToolStripMenuItem.Name = "ClockToolStripMenuItem" + Me.ClockToolStripMenuItem.ShowShortcutKeys = False + Me.ClockToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ClockToolStripMenuItem.Text = "Clock" + ' + 'TerminalToolStripMenuItem + ' + Me.TerminalToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.TerminalToolStripMenuItem.Name = "TerminalToolStripMenuItem" + Me.TerminalToolStripMenuItem.ShowShortcutKeys = False + Me.TerminalToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.TerminalToolStripMenuItem.Text = "Terminal" + ' + 'ShifterToolStripMenuItem + ' + Me.ShifterToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShifterToolStripMenuItem.Name = "ShifterToolStripMenuItem" + Me.ShifterToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ShifterToolStripMenuItem.Text = "Shifter" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.BackColor = System.Drawing.Color.Transparent + Me.ToolStripSeparator1.ForeColor = System.Drawing.Color.White + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(178, 6) + ' + 'ShutdownToolStripMenuItem + ' + Me.ShutdownToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShutdownToolStripMenuItem.Name = "ShutdownToolStripMenuItem" + Me.ShutdownToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ShutdownToolStripMenuItem.Text = "Shut Down" + ' + 'pnlpanelbuttonsoptions + ' + Me.pnlpanelbuttonsoptions.Controls.Add(Me.pnlpanelbuttontextcolour) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label101) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttontexttop) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label104) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttontextside) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label106) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label93) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttontop) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label94) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttoninitalgap) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label108) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttonicontop) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label110) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttoniconside) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label112) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttoniconsize) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label105) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.cbpanelbuttontextstyle) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.cbpanelbuttonfont) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label100) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpaneltextbuttonsize) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label102) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label103) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label98) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttongap) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label99) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label96) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttonheight) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label97) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label92) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.txtpanelbuttonwidth) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label91) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.pnlpanelbuttoncolour) + Me.pnlpanelbuttonsoptions.Controls.Add(Me.Label95) + Me.pnlpanelbuttonsoptions.Location = New System.Drawing.Point(135, 159) + Me.pnlpanelbuttonsoptions.Name = "pnlpanelbuttonsoptions" + Me.pnlpanelbuttonsoptions.Size = New System.Drawing.Size(317, 134) + Me.pnlpanelbuttonsoptions.TabIndex = 10 + Me.pnlpanelbuttonsoptions.Visible = False + ' + 'pnlpanelbuttontextcolour + ' + Me.pnlpanelbuttontextcolour.Location = New System.Drawing.Point(270, 57) + Me.pnlpanelbuttontextcolour.Name = "pnlpanelbuttontextcolour" + Me.pnlpanelbuttontextcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlpanelbuttontextcolour.TabIndex = 50 + ' + 'Label101 + ' + Me.Label101.AutoSize = True + Me.Label101.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label101.Location = New System.Drawing.Point(219, 59) + Me.Label101.Name = "Label101" + Me.Label101.Size = New System.Drawing.Size(50, 16) + Me.Label101.TabIndex = 49 + Me.Label101.Text = "Colour:" + ' + 'txtpanelbuttontexttop + ' + Me.txtpanelbuttontexttop.BackColor = System.Drawing.Color.White + Me.txtpanelbuttontexttop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttontexttop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttontexttop.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttontexttop.Location = New System.Drawing.Point(225, 82) + Me.txtpanelbuttontexttop.Name = "txtpanelbuttontexttop" + Me.txtpanelbuttontexttop.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttontexttop.TabIndex = 48 + ' + 'Label104 + ' + Me.Label104.AutoSize = True + Me.Label104.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label104.Location = New System.Drawing.Point(191, 84) + Me.Label104.Name = "Label104" + Me.Label104.Size = New System.Drawing.Size(36, 16) + Me.Label104.TabIndex = 47 + Me.Label104.Text = "Top:" + ' + 'txtpanelbuttontextside + ' + Me.txtpanelbuttontextside.BackColor = System.Drawing.Color.White + Me.txtpanelbuttontextside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttontextside.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttontextside.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttontextside.Location = New System.Drawing.Point(165, 82) + Me.txtpanelbuttontextside.Name = "txtpanelbuttontextside" + Me.txtpanelbuttontextside.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttontextside.TabIndex = 46 + ' + 'Label106 + ' + Me.Label106.AutoSize = True + Me.Label106.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label106.Location = New System.Drawing.Point(128, 84) + Me.Label106.Name = "Label106" + Me.Label106.Size = New System.Drawing.Size(39, 16) + Me.Label106.TabIndex = 45 + Me.Label106.Text = "Side:" + ' + 'Label93 + ' + Me.Label93.AutoSize = True + Me.Label93.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label93.Location = New System.Drawing.Point(292, 7) + Me.Label93.Name = "Label93" + Me.Label93.Size = New System.Drawing.Size(22, 16) + Me.Label93.TabIndex = 43 + Me.Label93.Text = "px" + ' + 'txtpanelbuttontop + ' + Me.txtpanelbuttontop.BackColor = System.Drawing.Color.White + Me.txtpanelbuttontop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttontop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttontop.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttontop.Location = New System.Drawing.Point(268, 5) + Me.txtpanelbuttontop.Name = "txtpanelbuttontop" + Me.txtpanelbuttontop.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttontop.TabIndex = 42 + ' + 'Label94 + ' + Me.Label94.AutoSize = True + Me.Label94.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label94.Location = New System.Drawing.Point(233, 7) + Me.Label94.Name = "Label94" + Me.Label94.Size = New System.Drawing.Size(36, 16) + Me.Label94.TabIndex = 41 + Me.Label94.Text = "Top:" + ' + 'txtpanelbuttoninitalgap + ' + Me.txtpanelbuttoninitalgap.BackColor = System.Drawing.Color.White + Me.txtpanelbuttoninitalgap.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttoninitalgap.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttoninitalgap.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttoninitalgap.Location = New System.Drawing.Point(207, 5) + Me.txtpanelbuttoninitalgap.Name = "txtpanelbuttoninitalgap" + Me.txtpanelbuttoninitalgap.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttoninitalgap.TabIndex = 40 + ' + 'Label108 + ' + Me.Label108.AutoSize = True + Me.Label108.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label108.Location = New System.Drawing.Point(137, 7) + Me.Label108.Name = "Label108" + Me.Label108.Size = New System.Drawing.Size(70, 16) + Me.Label108.TabIndex = 39 + Me.Label108.Text = "Initial Gap:" + ' + 'txtpanelbuttonicontop + ' + Me.txtpanelbuttonicontop.BackColor = System.Drawing.Color.White + Me.txtpanelbuttonicontop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttonicontop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttonicontop.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttonicontop.Location = New System.Drawing.Point(287, 108) + Me.txtpanelbuttonicontop.Name = "txtpanelbuttonicontop" + Me.txtpanelbuttonicontop.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttonicontop.TabIndex = 37 + ' + 'Label110 + ' + Me.Label110.AutoSize = True + Me.Label110.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label110.Location = New System.Drawing.Point(221, 110) + Me.Label110.Name = "Label110" + Me.Label110.Size = New System.Drawing.Size(64, 16) + Me.Label110.TabIndex = 36 + Me.Label110.Text = "Icon Top:" + ' + 'txtpanelbuttoniconside + ' + Me.txtpanelbuttoniconside.BackColor = System.Drawing.Color.White + Me.txtpanelbuttoniconside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttoniconside.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttoniconside.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttoniconside.Location = New System.Drawing.Point(180, 108) + Me.txtpanelbuttoniconside.Name = "txtpanelbuttoniconside" + Me.txtpanelbuttoniconside.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttoniconside.TabIndex = 34 + ' + 'Label112 + ' + Me.Label112.AutoSize = True + Me.Label112.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label112.Location = New System.Drawing.Point(113, 110) + Me.Label112.Name = "Label112" + Me.Label112.Size = New System.Drawing.Size(67, 16) + Me.Label112.TabIndex = 33 + Me.Label112.Text = "Icon Side:" + ' + 'txtpanelbuttoniconsize + ' + Me.txtpanelbuttoniconsize.BackColor = System.Drawing.Color.White + Me.txtpanelbuttoniconsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttoniconsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttoniconsize.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttoniconsize.Location = New System.Drawing.Point(70, 108) + Me.txtpanelbuttoniconsize.Name = "txtpanelbuttoniconsize" + Me.txtpanelbuttoniconsize.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttoniconsize.TabIndex = 27 + ' + 'Label105 + ' + Me.Label105.AutoSize = True + Me.Label105.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label105.Location = New System.Drawing.Point(3, 110) + Me.Label105.Name = "Label105" + Me.Label105.Size = New System.Drawing.Size(65, 16) + Me.Label105.TabIndex = 26 + Me.Label105.Text = "Icon Size:" + ' + 'cbpanelbuttontextstyle + ' + Me.cbpanelbuttontextstyle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbpanelbuttontextstyle.FormattingEnabled = True + Me.cbpanelbuttontextstyle.Items.AddRange(New Object() {"Bold", "Italic", "Regular", "Strikeout", "Underline"}) + Me.cbpanelbuttontextstyle.Location = New System.Drawing.Point(46, 83) + Me.cbpanelbuttontextstyle.Name = "cbpanelbuttontextstyle" + Me.cbpanelbuttontextstyle.Size = New System.Drawing.Size(80, 24) + Me.cbpanelbuttontextstyle.TabIndex = 25 + ' + 'cbpanelbuttonfont + ' + Me.cbpanelbuttonfont.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbpanelbuttonfont.FormattingEnabled = True + Me.cbpanelbuttonfont.Location = New System.Drawing.Point(70, 56) + Me.cbpanelbuttonfont.Name = "cbpanelbuttonfont" + Me.cbpanelbuttonfont.Size = New System.Drawing.Size(147, 24) + Me.cbpanelbuttonfont.TabIndex = 24 + ' + 'Label100 + ' + Me.Label100.AutoSize = True + Me.Label100.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label100.Location = New System.Drawing.Point(3, 86) + Me.Label100.Name = "Label100" + Me.Label100.Size = New System.Drawing.Size(41, 16) + Me.Label100.TabIndex = 23 + Me.Label100.Text = "Style:" + ' + 'txtpaneltextbuttonsize + ' + Me.txtpaneltextbuttonsize.BackColor = System.Drawing.Color.White + Me.txtpaneltextbuttonsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpaneltextbuttonsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpaneltextbuttonsize.ForeColor = System.Drawing.Color.Black + Me.txtpaneltextbuttonsize.Location = New System.Drawing.Point(287, 82) + Me.txtpaneltextbuttonsize.Name = "txtpaneltextbuttonsize" + Me.txtpaneltextbuttonsize.Size = New System.Drawing.Size(23, 22) + Me.txtpaneltextbuttonsize.TabIndex = 21 + ' + 'Label102 + ' + Me.Label102.AutoSize = True + Me.Label102.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label102.Location = New System.Drawing.Point(252, 84) + Me.Label102.Name = "Label102" + Me.Label102.Size = New System.Drawing.Size(37, 16) + Me.Label102.TabIndex = 20 + Me.Label102.Text = "Size:" + ' + 'Label103 + ' + Me.Label103.AutoSize = True + Me.Label103.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label103.Location = New System.Drawing.Point(3, 60) + Me.Label103.Name = "Label103" + Me.Label103.Size = New System.Drawing.Size(66, 16) + Me.Label103.TabIndex = 19 + Me.Label103.Text = "Text Font:" + ' + 'Label98 + ' + Me.Label98.AutoSize = True + Me.Label98.BackColor = System.Drawing.Color.Transparent + Me.Label98.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label98.Location = New System.Drawing.Point(292, 33) + Me.Label98.Name = "Label98" + Me.Label98.Size = New System.Drawing.Size(22, 16) + Me.Label98.TabIndex = 14 + Me.Label98.Text = "px" + ' + 'txtpanelbuttongap + ' + Me.txtpanelbuttongap.BackColor = System.Drawing.Color.White + Me.txtpanelbuttongap.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttongap.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttongap.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttongap.Location = New System.Drawing.Point(268, 31) + Me.txtpanelbuttongap.Name = "txtpanelbuttongap" + Me.txtpanelbuttongap.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttongap.TabIndex = 13 + ' + 'Label99 + ' + Me.Label99.AutoSize = True + Me.Label99.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label99.Location = New System.Drawing.Point(232, 33) + Me.Label99.Name = "Label99" + Me.Label99.Size = New System.Drawing.Size(37, 16) + Me.Label99.TabIndex = 12 + Me.Label99.Text = "Gap:" + ' + 'Label96 + ' + Me.Label96.AutoSize = True + Me.Label96.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label96.Location = New System.Drawing.Point(209, 34) + Me.Label96.Name = "Label96" + Me.Label96.Size = New System.Drawing.Size(22, 16) + Me.Label96.TabIndex = 11 + Me.Label96.Text = "px" + ' + 'txtpanelbuttonheight + ' + Me.txtpanelbuttonheight.BackColor = System.Drawing.Color.White + Me.txtpanelbuttonheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttonheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttonheight.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttonheight.Location = New System.Drawing.Point(185, 32) + Me.txtpanelbuttonheight.Name = "txtpanelbuttonheight" + Me.txtpanelbuttonheight.Size = New System.Drawing.Size(23, 22) + Me.txtpanelbuttonheight.TabIndex = 10 + ' + 'Label97 + ' + Me.Label97.AutoSize = True + Me.Label97.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label97.Location = New System.Drawing.Point(135, 34) + Me.Label97.Name = "Label97" + Me.Label97.Size = New System.Drawing.Size(50, 16) + Me.Label97.TabIndex = 9 + Me.Label97.Text = "Height:" + ' + 'Label92 + ' + Me.Label92.AutoSize = True + Me.Label92.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label92.Location = New System.Drawing.Point(114, 33) + Me.Label92.Name = "Label92" + Me.Label92.Size = New System.Drawing.Size(22, 16) + Me.Label92.TabIndex = 8 + Me.Label92.Text = "px" + ' + 'txtpanelbuttonwidth + ' + Me.txtpanelbuttonwidth.BackColor = System.Drawing.Color.White + Me.txtpanelbuttonwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtpanelbuttonwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtpanelbuttonwidth.ForeColor = System.Drawing.Color.Black + Me.txtpanelbuttonwidth.Location = New System.Drawing.Point(88, 31) + Me.txtpanelbuttonwidth.Name = "txtpanelbuttonwidth" + Me.txtpanelbuttonwidth.Size = New System.Drawing.Size(26, 22) + Me.txtpanelbuttonwidth.TabIndex = 7 + ' + 'Label91 + ' + Me.Label91.AutoSize = True + Me.Label91.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label91.Location = New System.Drawing.Point(3, 33) + Me.Label91.Name = "Label91" + Me.Label91.Size = New System.Drawing.Size(85, 16) + Me.Label91.TabIndex = 6 + Me.Label91.Text = "Button Width:" + ' + 'pnlpanelbuttoncolour + ' + Me.pnlpanelbuttoncolour.Location = New System.Drawing.Point(94, 5) + Me.pnlpanelbuttoncolour.Name = "pnlpanelbuttoncolour" + Me.pnlpanelbuttoncolour.Size = New System.Drawing.Size(41, 20) + Me.pnlpanelbuttoncolour.TabIndex = 1 + ' + 'Label95 + ' + Me.Label95.AutoSize = True + Me.Label95.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label95.Location = New System.Drawing.Point(3, 7) + Me.Label95.Name = "Label95" + Me.Label95.Size = New System.Drawing.Size(90, 16) + Me.Label95.TabIndex = 0 + Me.Label95.Text = "Button Colour:" + ' + 'pnldesktoppaneloptions + ' + Me.pnldesktoppaneloptions.Controls.Add(Me.btnpanelbuttons) + Me.pnldesktoppaneloptions.Controls.Add(Me.Label27) + Me.pnldesktoppaneloptions.Controls.Add(Me.combodesktoppanelposition) + Me.pnldesktoppaneloptions.Controls.Add(Me.Label46) + Me.pnldesktoppaneloptions.Controls.Add(Me.Label47) + Me.pnldesktoppaneloptions.Controls.Add(Me.txtdesktoppanelheight) + Me.pnldesktoppaneloptions.Controls.Add(Me.Label48) + Me.pnldesktoppaneloptions.Controls.Add(Me.pnldesktoppanelcolour) + Me.pnldesktoppaneloptions.Controls.Add(Me.Label49) + Me.pnldesktoppaneloptions.Location = New System.Drawing.Point(393, 265) + Me.pnldesktoppaneloptions.Name = "pnldesktoppaneloptions" + Me.pnldesktoppaneloptions.Size = New System.Drawing.Size(60, 28) + Me.pnldesktoppaneloptions.TabIndex = 9 + Me.pnldesktoppaneloptions.Visible = False + ' + 'btnpanelbuttons + ' + Me.btnpanelbuttons.BackColor = System.Drawing.Color.White + Me.btnpanelbuttons.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpanelbuttons.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpanelbuttons.Location = New System.Drawing.Point(193, 101) + Me.btnpanelbuttons.Name = "btnpanelbuttons" + Me.btnpanelbuttons.Size = New System.Drawing.Size(119, 29) + Me.btnpanelbuttons.TabIndex = 8 + Me.btnpanelbuttons.Text = "Panel Buttons >" + Me.btnpanelbuttons.UseVisualStyleBackColor = False + ' + 'Label27 + ' + Me.Label27.Location = New System.Drawing.Point(3, 52) + Me.Label27.Name = "Label27" + Me.Label27.Size = New System.Drawing.Size(290, 42) + Me.Label27.TabIndex = 8 + Me.Label27.Text = "Warning: If you set the panel position to the bottom you must hide your windows t" & _ + "askbar and restart ShiftOS on your host operating system to prevent a visual bug" & _ + "." + ' + 'combodesktoppanelposition + ' + Me.combodesktoppanelposition.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.combodesktoppanelposition.FormattingEnabled = True + Me.combodesktoppanelposition.Items.AddRange(New Object() {"Top", "Bottom"}) + Me.combodesktoppanelposition.Location = New System.Drawing.Point(103, 28) + Me.combodesktoppanelposition.Name = "combodesktoppanelposition" + Me.combodesktoppanelposition.Size = New System.Drawing.Size(59, 24) + Me.combodesktoppanelposition.TabIndex = 7 + ' + 'Label46 + ' + Me.Label46.AutoSize = True + Me.Label46.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label46.Location = New System.Drawing.Point(3, 31) + Me.Label46.Name = "Label46" + Me.Label46.Size = New System.Drawing.Size(97, 16) + Me.Label46.TabIndex = 6 + Me.Label46.Text = "Panel Position:" + ' + 'Label47 + ' + Me.Label47.AutoSize = True + Me.Label47.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label47.Location = New System.Drawing.Point(213, 7) + Me.Label47.Name = "Label47" + Me.Label47.Size = New System.Drawing.Size(22, 16) + Me.Label47.TabIndex = 5 + Me.Label47.Text = "px" + ' + 'txtdesktoppanelheight + ' + Me.txtdesktoppanelheight.BackColor = System.Drawing.Color.White + Me.txtdesktoppanelheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtdesktoppanelheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtdesktoppanelheight.ForeColor = System.Drawing.Color.Black + Me.txtdesktoppanelheight.Location = New System.Drawing.Point(189, 5) + Me.txtdesktoppanelheight.Name = "txtdesktoppanelheight" + Me.txtdesktoppanelheight.Size = New System.Drawing.Size(23, 22) + Me.txtdesktoppanelheight.TabIndex = 4 + ' + 'Label48 + ' + Me.Label48.AutoSize = True + Me.Label48.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label48.Location = New System.Drawing.Point(138, 7) + Me.Label48.Name = "Label48" + Me.Label48.Size = New System.Drawing.Size(50, 16) + Me.Label48.TabIndex = 2 + Me.Label48.Text = "Height:" + ' + 'pnldesktoppanelcolour + ' + Me.pnldesktoppanelcolour.Location = New System.Drawing.Point(92, 5) + Me.pnldesktoppanelcolour.Name = "pnldesktoppanelcolour" + Me.pnldesktoppanelcolour.Size = New System.Drawing.Size(41, 20) + Me.pnldesktoppanelcolour.TabIndex = 1 + ' + 'Label49 + ' + Me.Label49.AutoSize = True + Me.Label49.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label49.Location = New System.Drawing.Point(3, 7) + Me.Label49.Name = "Label49" + Me.Label49.Size = New System.Drawing.Size(88, 16) + Me.Label49.TabIndex = 0 + Me.Label49.Text = "Panel Colour:" + ' + 'pnldesktopintro + ' + Me.pnldesktopintro.Controls.Add(Me.Label69) + Me.pnldesktopintro.Controls.Add(Me.Label70) + Me.pnldesktopintro.Location = New System.Drawing.Point(154, 173) + Me.pnldesktopintro.Name = "pnldesktopintro" + Me.pnldesktopintro.Size = New System.Drawing.Size(47, 48) + Me.pnldesktopintro.TabIndex = 17 + ' + 'Label69 + ' + Me.Label69.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label69.Location = New System.Drawing.Point(3, 20) + Me.Label69.Name = "Label69" + Me.Label69.Size = New System.Drawing.Size(312, 113) + Me.Label69.TabIndex = 1 + Me.Label69.Text = resources.GetString("Label69.Text") + Me.Label69.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label70 + ' + Me.Label70.AutoSize = True + Me.Label70.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label70.Location = New System.Drawing.Point(86, -2) + Me.Label70.Name = "Label70" + Me.Label70.Size = New System.Drawing.Size(148, 20) + Me.Label70.TabIndex = 0 + Me.Label70.Text = "Desktop Settings" + ' + 'pnlpanelclockoptions + ' + Me.pnlpanelclockoptions.Controls.Add(Me.pnlclockbackgroundcolour) + Me.pnlpanelclockoptions.Controls.Add(Me.Label44) + Me.pnlpanelclockoptions.Controls.Add(Me.comboclocktextstyle) + Me.pnlpanelclockoptions.Controls.Add(Me.comboclocktextfont) + Me.pnlpanelclockoptions.Controls.Add(Me.Label26) + Me.pnlpanelclockoptions.Controls.Add(Me.Label29) + Me.pnlpanelclockoptions.Controls.Add(Me.txtclocktextfromtop) + Me.pnlpanelclockoptions.Controls.Add(Me.Label30) + Me.pnlpanelclockoptions.Controls.Add(Me.Label31) + Me.pnlpanelclockoptions.Controls.Add(Me.txtclocktextsize) + Me.pnlpanelclockoptions.Controls.Add(Me.Label32) + Me.pnlpanelclockoptions.Controls.Add(Me.Label33) + Me.pnlpanelclockoptions.Controls.Add(Me.pnlpanelclocktextcolour) + Me.pnlpanelclockoptions.Controls.Add(Me.Label34) + Me.pnlpanelclockoptions.Location = New System.Drawing.Point(217, 170) + Me.pnlpanelclockoptions.Name = "pnlpanelclockoptions" + Me.pnlpanelclockoptions.Size = New System.Drawing.Size(110, 64) + Me.pnlpanelclockoptions.TabIndex = 15 + Me.pnlpanelclockoptions.Visible = False + ' + 'pnlclockbackgroundcolour + ' + Me.pnlclockbackgroundcolour.Location = New System.Drawing.Point(261, 5) + Me.pnlclockbackgroundcolour.Name = "pnlclockbackgroundcolour" + Me.pnlclockbackgroundcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlclockbackgroundcolour.TabIndex = 20 + ' + 'Label44 + ' + Me.Label44.AutoSize = True + Me.Label44.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label44.Location = New System.Drawing.Point(173, 7) + Me.Label44.Name = "Label44" + Me.Label44.Size = New System.Drawing.Size(84, 16) + Me.Label44.TabIndex = 19 + Me.Label44.Text = "Background:" + ' + 'comboclocktextstyle + ' + Me.comboclocktextstyle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.comboclocktextstyle.FormattingEnabled = True + Me.comboclocktextstyle.Items.AddRange(New Object() {"Bold", "Italic", "Regular", "Strikeout", "Underline"}) + Me.comboclocktextstyle.Location = New System.Drawing.Point(209, 54) + Me.comboclocktextstyle.Name = "comboclocktextstyle" + Me.comboclocktextstyle.Size = New System.Drawing.Size(99, 24) + Me.comboclocktextstyle.TabIndex = 18 + ' + 'comboclocktextfont + ' + Me.comboclocktextfont.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.comboclocktextfont.FormattingEnabled = True + Me.comboclocktextfont.Location = New System.Drawing.Point(114, 28) + Me.comboclocktextfont.Name = "comboclocktextfont" + Me.comboclocktextfont.Size = New System.Drawing.Size(192, 24) + Me.comboclocktextfont.TabIndex = 17 + ' + 'Label26 + ' + Me.Label26.AutoSize = True + Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label26.Location = New System.Drawing.Point(166, 57) + Me.Label26.Name = "Label26" + Me.Label26.Size = New System.Drawing.Size(41, 16) + Me.Label26.TabIndex = 15 + Me.Label26.Text = "Style:" + ' + 'Label29 + ' + Me.Label29.AutoSize = True + Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label29.Location = New System.Drawing.Point(163, 82) + Me.Label29.Name = "Label29" + Me.Label29.Size = New System.Drawing.Size(22, 16) + Me.Label29.TabIndex = 11 + Me.Label29.Text = "px" + ' + 'txtclocktextfromtop + ' + Me.txtclocktextfromtop.BackColor = System.Drawing.Color.White + Me.txtclocktextfromtop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtclocktextfromtop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclocktextfromtop.ForeColor = System.Drawing.Color.Black + Me.txtclocktextfromtop.Location = New System.Drawing.Point(139, 80) + Me.txtclocktextfromtop.Name = "txtclocktextfromtop" + Me.txtclocktextfromtop.Size = New System.Drawing.Size(23, 22) + Me.txtclocktextfromtop.TabIndex = 10 + ' + 'Label30 + ' + Me.Label30.AutoSize = True + Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label30.Location = New System.Drawing.Point(3, 82) + Me.Label30.Name = "Label30" + Me.Label30.Size = New System.Drawing.Size(136, 16) + Me.Label30.TabIndex = 9 + Me.Label30.Text = "Clock Text From Top:" + ' + 'Label31 + ' + Me.Label31.AutoSize = True + Me.Label31.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label31.Location = New System.Drawing.Point(138, 57) + Me.Label31.Name = "Label31" + Me.Label31.Size = New System.Drawing.Size(22, 16) + Me.Label31.TabIndex = 8 + Me.Label31.Text = "px" + ' + 'txtclocktextsize + ' + Me.txtclocktextsize.BackColor = System.Drawing.Color.White + Me.txtclocktextsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtclocktextsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclocktextsize.ForeColor = System.Drawing.Color.Black + Me.txtclocktextsize.Location = New System.Drawing.Point(114, 55) + Me.txtclocktextsize.Name = "txtclocktextsize" + Me.txtclocktextsize.Size = New System.Drawing.Size(23, 22) + Me.txtclocktextsize.TabIndex = 7 + ' + 'Label32 + ' + Me.Label32.AutoSize = True + Me.Label32.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label32.Location = New System.Drawing.Point(3, 57) + Me.Label32.Name = "Label32" + Me.Label32.Size = New System.Drawing.Size(103, 16) + Me.Label32.TabIndex = 6 + Me.Label32.Text = "Clock Text Size:" + ' + 'Label33 + ' + Me.Label33.AutoSize = True + Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label33.Location = New System.Drawing.Point(3, 32) + Me.Label33.Name = "Label33" + Me.Label33.Size = New System.Drawing.Size(103, 16) + Me.Label33.TabIndex = 2 + Me.Label33.Text = "Clock Text Font:" + ' + 'pnlpanelclocktextcolour + ' + Me.pnlpanelclocktextcolour.Location = New System.Drawing.Point(121, 5) + Me.pnlpanelclocktextcolour.Name = "pnlpanelclocktextcolour" + Me.pnlpanelclocktextcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlpanelclocktextcolour.TabIndex = 1 + ' + 'Label34 + ' + Me.Label34.AutoSize = True + Me.Label34.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label34.Location = New System.Drawing.Point(3, 7) + Me.Label34.Name = "Label34" + Me.Label34.Size = New System.Drawing.Size(116, 16) + Me.Label34.TabIndex = 0 + Me.Label34.Text = "Clock Text Colour:" + ' + 'pnldesktopbackgroundoptions + ' + Me.pnldesktopbackgroundoptions.Controls.Add(Me.pnldesktopcolour) + Me.pnldesktopbackgroundoptions.Controls.Add(Me.Label45) + Me.pnldesktopbackgroundoptions.Location = New System.Drawing.Point(354, 163) + Me.pnldesktopbackgroundoptions.Name = "pnldesktopbackgroundoptions" + Me.pnldesktopbackgroundoptions.Size = New System.Drawing.Size(103, 70) + Me.pnldesktopbackgroundoptions.TabIndex = 10 + Me.pnldesktopbackgroundoptions.Visible = False + ' + 'pnldesktopcolour + ' + Me.pnldesktopcolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnldesktopcolour.Location = New System.Drawing.Point(112, 5) + Me.pnldesktopcolour.Name = "pnldesktopcolour" + Me.pnldesktopcolour.Size = New System.Drawing.Size(41, 20) + Me.pnldesktopcolour.TabIndex = 3 + ' + 'Label45 + ' + Me.Label45.AutoSize = True + Me.Label45.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label45.Location = New System.Drawing.Point(3, 7) + Me.Label45.Name = "Label45" + Me.Label45.Size = New System.Drawing.Size(104, 16) + Me.Label45.TabIndex = 2 + Me.Label45.Text = "Desktop Colour:" + ' + 'Panel10 + ' + Me.Panel10.Controls.Add(Me.btndesktopitself) + Me.Panel10.Controls.Add(Me.btnpanelclock) + Me.Panel10.Controls.Add(Me.btnapplauncher) + Me.Panel10.Controls.Add(Me.btndesktoppanel) + Me.Panel10.Location = New System.Drawing.Point(1, 159) + Me.Panel10.Name = "Panel10" + Me.Panel10.Size = New System.Drawing.Size(128, 135) + Me.Panel10.TabIndex = 8 + ' + 'btndesktopitself + ' + Me.btndesktopitself.BackColor = System.Drawing.Color.White + Me.btndesktopitself.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndesktopitself.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btndesktopitself.Location = New System.Drawing.Point(4, 105) + Me.btndesktopitself.Name = "btndesktopitself" + Me.btndesktopitself.Size = New System.Drawing.Size(119, 29) + Me.btndesktopitself.TabIndex = 7 + Me.btndesktopitself.Text = "Desktop" + Me.btndesktopitself.UseVisualStyleBackColor = False + ' + 'btnpanelclock + ' + Me.btnpanelclock.BackColor = System.Drawing.Color.White + Me.btnpanelclock.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnpanelclock.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnpanelclock.Location = New System.Drawing.Point(4, 70) + Me.btnpanelclock.Name = "btnpanelclock" + Me.btnpanelclock.Size = New System.Drawing.Size(119, 29) + Me.btnpanelclock.TabIndex = 6 + Me.btnpanelclock.Text = "Panel Clock" + Me.btnpanelclock.UseVisualStyleBackColor = False + ' + 'btnapplauncher + ' + Me.btnapplauncher.BackColor = System.Drawing.Color.White + Me.btnapplauncher.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnapplauncher.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnapplauncher.Location = New System.Drawing.Point(4, 35) + Me.btnapplauncher.Name = "btnapplauncher" + Me.btnapplauncher.Size = New System.Drawing.Size(119, 29) + Me.btnapplauncher.TabIndex = 5 + Me.btnapplauncher.Text = "App Launcher" + Me.btnapplauncher.UseVisualStyleBackColor = False + ' + 'btndesktoppanel + ' + Me.btndesktoppanel.BackColor = System.Drawing.Color.White + Me.btndesktoppanel.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndesktoppanel.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btndesktoppanel.Location = New System.Drawing.Point(4, 0) + Me.btndesktoppanel.Name = "btndesktoppanel" + Me.btndesktoppanel.Size = New System.Drawing.Size(119, 29) + Me.btndesktoppanel.TabIndex = 4 + Me.btndesktoppanel.Text = "Desktop Panel" + Me.btndesktoppanel.UseVisualStyleBackColor = False + ' + 'txtpanelbuttoniconheight + ' + Me.txtpanelbuttoniconheight.Location = New System.Drawing.Point(0, 0) + Me.txtpanelbuttoniconheight.Name = "txtpanelbuttoniconheight" + Me.txtpanelbuttoniconheight.Size = New System.Drawing.Size(100, 20) + Me.txtpanelbuttoniconheight.TabIndex = 0 + ' + 'pnlwindowsoptions + ' + Me.pnlwindowsoptions.BackColor = System.Drawing.Color.White + Me.pnlwindowsoptions.Controls.Add(Me.pnlbuttonoptions) + Me.pnlwindowsoptions.Controls.Add(Me.pnltitlebaroptions) + Me.pnlwindowsoptions.Controls.Add(Me.pnlborderoptions) + Me.pnlwindowsoptions.Controls.Add(Me.pnltitletextoptions) + Me.pnlwindowsoptions.Controls.Add(Me.pnlwindowsintro) + Me.pnlwindowsoptions.Controls.Add(Me.pnlwindowsobjects) + Me.pnlwindowsoptions.Controls.Add(Me.pnlwindowpreview) + Me.pnlwindowsoptions.Location = New System.Drawing.Point(539, 28) + Me.pnlwindowsoptions.Name = "pnlwindowsoptions" + Me.pnlwindowsoptions.Size = New System.Drawing.Size(46, 39) + Me.pnlwindowsoptions.TabIndex = 4 + Me.pnlwindowsoptions.Visible = False + ' + 'pnlbuttonoptions + ' + Me.pnlbuttonoptions.Controls.Add(Me.pnlminimizebuttonoptions) + Me.pnlbuttonoptions.Controls.Add(Me.pnlrollupbuttonoptions) + Me.pnlbuttonoptions.Controls.Add(Me.combobuttonoption) + Me.pnlbuttonoptions.Controls.Add(Me.Label52) + Me.pnlbuttonoptions.Controls.Add(Me.pnlclosebuttonoptions) + Me.pnlbuttonoptions.Location = New System.Drawing.Point(312, 266) + Me.pnlbuttonoptions.Name = "pnlbuttonoptions" + Me.pnlbuttonoptions.Size = New System.Drawing.Size(66, 18) + Me.pnlbuttonoptions.TabIndex = 10 + Me.pnlbuttonoptions.Visible = False + ' + 'pnlminimizebuttonoptions + ' + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label82) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label83) + Me.pnlminimizebuttonoptions.Controls.Add(Me.pnlminimizebuttoncolour) + Me.pnlminimizebuttonoptions.Controls.Add(Me.txtminimizebuttonside) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label84) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label85) + Me.pnlminimizebuttonoptions.Controls.Add(Me.txtminimizebuttonheight) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label86) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label87) + Me.pnlminimizebuttonoptions.Controls.Add(Me.txtminimizebuttontop) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label88) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label89) + Me.pnlminimizebuttonoptions.Controls.Add(Me.txtminimizebuttonwidth) + Me.pnlminimizebuttonoptions.Controls.Add(Me.Label90) + Me.pnlminimizebuttonoptions.Location = New System.Drawing.Point(4, 29) + Me.pnlminimizebuttonoptions.Name = "pnlminimizebuttonoptions" + Me.pnlminimizebuttonoptions.Size = New System.Drawing.Size(311, 105) + Me.pnlminimizebuttonoptions.TabIndex = 18 + Me.pnlminimizebuttonoptions.Visible = False + ' + 'Label82 + ' + Me.Label82.AutoSize = True + Me.Label82.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label82.Location = New System.Drawing.Point(3, 6) + Me.Label82.Name = "Label82" + Me.Label82.Size = New System.Drawing.Size(145, 16) + Me.Label82.TabIndex = 0 + Me.Label82.Text = "Minimize Button Colour:" + ' + 'Label83 + ' + Me.Label83.AutoSize = True + Me.Label83.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label83.Location = New System.Drawing.Point(196, 82) + Me.Label83.Name = "Label83" + Me.Label83.Size = New System.Drawing.Size(22, 16) + Me.Label83.TabIndex = 14 + Me.Label83.Text = "px" + ' + 'pnlminimizebuttoncolour + ' + Me.pnlminimizebuttoncolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlminimizebuttoncolour.Location = New System.Drawing.Point(149, 4) + Me.pnlminimizebuttoncolour.Name = "pnlminimizebuttoncolour" + Me.pnlminimizebuttoncolour.Size = New System.Drawing.Size(41, 20) + Me.pnlminimizebuttoncolour.TabIndex = 1 + ' + 'txtminimizebuttonside + ' + Me.txtminimizebuttonside.BackColor = System.Drawing.Color.White + Me.txtminimizebuttonside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtminimizebuttonside.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtminimizebuttonside.ForeColor = System.Drawing.Color.Black + Me.txtminimizebuttonside.Location = New System.Drawing.Point(172, 80) + Me.txtminimizebuttonside.Name = "txtminimizebuttonside" + Me.txtminimizebuttonside.Size = New System.Drawing.Size(23, 22) + Me.txtminimizebuttonside.TabIndex = 13 + ' + 'Label84 + ' + Me.Label84.AutoSize = True + Me.Label84.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label84.Location = New System.Drawing.Point(3, 32) + Me.Label84.Name = "Label84" + Me.Label84.Size = New System.Drawing.Size(145, 16) + Me.Label84.TabIndex = 2 + Me.Label84.Text = "Minimize Button Height:" + ' + 'Label85 + ' + Me.Label85.AutoSize = True + Me.Label85.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label85.Location = New System.Drawing.Point(3, 82) + Me.Label85.Name = "Label85" + Me.Label85.Size = New System.Drawing.Size(168, 16) + Me.Label85.TabIndex = 12 + Me.Label85.Text = "Minimize Button From Side:" + ' + 'txtminimizebuttonheight + ' + Me.txtminimizebuttonheight.BackColor = System.Drawing.Color.White + Me.txtminimizebuttonheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtminimizebuttonheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtminimizebuttonheight.ForeColor = System.Drawing.Color.Black + Me.txtminimizebuttonheight.Location = New System.Drawing.Point(150, 30) + Me.txtminimizebuttonheight.Name = "txtminimizebuttonheight" + Me.txtminimizebuttonheight.Size = New System.Drawing.Size(23, 22) + Me.txtminimizebuttonheight.TabIndex = 4 + ' + 'Label86 + ' + Me.Label86.AutoSize = True + Me.Label86.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label86.Location = New System.Drawing.Point(196, 57) + Me.Label86.Name = "Label86" + Me.Label86.Size = New System.Drawing.Size(22, 16) + Me.Label86.TabIndex = 11 + Me.Label86.Text = "px" + ' + 'Label87 + ' + Me.Label87.AutoSize = True + Me.Label87.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label87.Location = New System.Drawing.Point(174, 32) + Me.Label87.Name = "Label87" + Me.Label87.Size = New System.Drawing.Size(22, 16) + Me.Label87.TabIndex = 5 + Me.Label87.Text = "px" + ' + 'txtminimizebuttontop + ' + Me.txtminimizebuttontop.BackColor = System.Drawing.Color.White + Me.txtminimizebuttontop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtminimizebuttontop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtminimizebuttontop.ForeColor = System.Drawing.Color.Black + Me.txtminimizebuttontop.Location = New System.Drawing.Point(172, 55) + Me.txtminimizebuttontop.Name = "txtminimizebuttontop" + Me.txtminimizebuttontop.Size = New System.Drawing.Size(23, 22) + Me.txtminimizebuttontop.TabIndex = 10 + ' + 'Label88 + ' + Me.Label88.AutoSize = True + Me.Label88.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label88.Location = New System.Drawing.Point(198, 32) + Me.Label88.Name = "Label88" + Me.Label88.Size = New System.Drawing.Size(45, 16) + Me.Label88.TabIndex = 6 + Me.Label88.Text = "Width:" + ' + 'Label89 + ' + Me.Label89.AutoSize = True + Me.Label89.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label89.Location = New System.Drawing.Point(3, 57) + Me.Label89.Name = "Label89" + Me.Label89.Size = New System.Drawing.Size(165, 16) + Me.Label89.TabIndex = 9 + Me.Label89.Text = "Minimize Button From Top:" + ' + 'txtminimizebuttonwidth + ' + Me.txtminimizebuttonwidth.BackColor = System.Drawing.Color.White + Me.txtminimizebuttonwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtminimizebuttonwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtminimizebuttonwidth.ForeColor = System.Drawing.Color.Black + Me.txtminimizebuttonwidth.Location = New System.Drawing.Point(247, 30) + Me.txtminimizebuttonwidth.Name = "txtminimizebuttonwidth" + Me.txtminimizebuttonwidth.Size = New System.Drawing.Size(23, 22) + Me.txtminimizebuttonwidth.TabIndex = 7 + ' + 'Label90 + ' + Me.Label90.AutoSize = True + Me.Label90.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label90.Location = New System.Drawing.Point(269, 32) + Me.Label90.Name = "Label90" + Me.Label90.Size = New System.Drawing.Size(22, 16) + Me.Label90.TabIndex = 8 + Me.Label90.Text = "px" + ' + 'pnlrollupbuttonoptions + ' + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label54) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label55) + Me.pnlrollupbuttonoptions.Controls.Add(Me.pnlrollupbuttoncolour) + Me.pnlrollupbuttonoptions.Controls.Add(Me.txtrollupbuttonside) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label56) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label57) + Me.pnlrollupbuttonoptions.Controls.Add(Me.txtrollupbuttonheight) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label58) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label59) + Me.pnlrollupbuttonoptions.Controls.Add(Me.txtrollupbuttontop) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label60) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label61) + Me.pnlrollupbuttonoptions.Controls.Add(Me.txtrollupbuttonwidth) + Me.pnlrollupbuttonoptions.Controls.Add(Me.Label62) + Me.pnlrollupbuttonoptions.Location = New System.Drawing.Point(235, 38) + Me.pnlrollupbuttonoptions.Name = "pnlrollupbuttonoptions" + Me.pnlrollupbuttonoptions.Size = New System.Drawing.Size(53, 39) + Me.pnlrollupbuttonoptions.TabIndex = 16 + Me.pnlrollupbuttonoptions.Visible = False + ' + 'Label54 + ' + Me.Label54.AutoSize = True + Me.Label54.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label54.Location = New System.Drawing.Point(3, 6) + Me.Label54.Name = "Label54" + Me.Label54.Size = New System.Drawing.Size(138, 16) + Me.Label54.TabIndex = 0 + Me.Label54.Text = "Roll Up Button Colour:" + ' + 'Label55 + ' + Me.Label55.AutoSize = True + Me.Label55.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label55.Location = New System.Drawing.Point(188, 82) + Me.Label55.Name = "Label55" + Me.Label55.Size = New System.Drawing.Size(22, 16) + Me.Label55.TabIndex = 14 + Me.Label55.Text = "px" + ' + 'pnlrollupbuttoncolour + ' + Me.pnlrollupbuttoncolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlrollupbuttoncolour.Location = New System.Drawing.Point(143, 4) + Me.pnlrollupbuttoncolour.Name = "pnlrollupbuttoncolour" + Me.pnlrollupbuttoncolour.Size = New System.Drawing.Size(41, 20) + Me.pnlrollupbuttoncolour.TabIndex = 1 + ' + 'txtrollupbuttonside + ' + Me.txtrollupbuttonside.BackColor = System.Drawing.Color.White + Me.txtrollupbuttonside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtrollupbuttonside.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtrollupbuttonside.ForeColor = System.Drawing.Color.Black + Me.txtrollupbuttonside.Location = New System.Drawing.Point(164, 80) + Me.txtrollupbuttonside.Name = "txtrollupbuttonside" + Me.txtrollupbuttonside.Size = New System.Drawing.Size(23, 22) + Me.txtrollupbuttonside.TabIndex = 13 + ' + 'Label56 + ' + Me.Label56.AutoSize = True + Me.Label56.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label56.Location = New System.Drawing.Point(3, 32) + Me.Label56.Name = "Label56" + Me.Label56.Size = New System.Drawing.Size(138, 16) + Me.Label56.TabIndex = 2 + Me.Label56.Text = "Roll Up Button Height:" + ' + 'Label57 + ' + Me.Label57.AutoSize = True + Me.Label57.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label57.Location = New System.Drawing.Point(3, 82) + Me.Label57.Name = "Label57" + Me.Label57.Size = New System.Drawing.Size(161, 16) + Me.Label57.TabIndex = 12 + Me.Label57.Text = "Roll Up Button From Side:" + ' + 'txtrollupbuttonheight + ' + Me.txtrollupbuttonheight.BackColor = System.Drawing.Color.White + Me.txtrollupbuttonheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtrollupbuttonheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtrollupbuttonheight.ForeColor = System.Drawing.Color.Black + Me.txtrollupbuttonheight.Location = New System.Drawing.Point(143, 30) + Me.txtrollupbuttonheight.Name = "txtrollupbuttonheight" + Me.txtrollupbuttonheight.Size = New System.Drawing.Size(23, 22) + Me.txtrollupbuttonheight.TabIndex = 4 + ' + 'Label58 + ' + Me.Label58.AutoSize = True + Me.Label58.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label58.Location = New System.Drawing.Point(188, 57) + Me.Label58.Name = "Label58" + Me.Label58.Size = New System.Drawing.Size(22, 16) + Me.Label58.TabIndex = 11 + Me.Label58.Text = "px" + ' + 'Label59 + ' + Me.Label59.AutoSize = True + Me.Label59.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label59.Location = New System.Drawing.Point(167, 32) + Me.Label59.Name = "Label59" + Me.Label59.Size = New System.Drawing.Size(22, 16) + Me.Label59.TabIndex = 5 + Me.Label59.Text = "px" + ' + 'txtrollupbuttontop + ' + Me.txtrollupbuttontop.BackColor = System.Drawing.Color.White + Me.txtrollupbuttontop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtrollupbuttontop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtrollupbuttontop.ForeColor = System.Drawing.Color.Black + Me.txtrollupbuttontop.Location = New System.Drawing.Point(164, 55) + Me.txtrollupbuttontop.Name = "txtrollupbuttontop" + Me.txtrollupbuttontop.Size = New System.Drawing.Size(23, 22) + Me.txtrollupbuttontop.TabIndex = 10 + ' + 'Label60 + ' + Me.Label60.AutoSize = True + Me.Label60.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label60.Location = New System.Drawing.Point(195, 32) + Me.Label60.Name = "Label60" + Me.Label60.Size = New System.Drawing.Size(45, 16) + Me.Label60.TabIndex = 6 + Me.Label60.Text = "Width:" + ' + 'Label61 + ' + Me.Label61.AutoSize = True + Me.Label61.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label61.Location = New System.Drawing.Point(3, 57) + Me.Label61.Name = "Label61" + Me.Label61.Size = New System.Drawing.Size(158, 16) + Me.Label61.TabIndex = 9 + Me.Label61.Text = "Roll Up Button From Top:" + ' + 'txtrollupbuttonwidth + ' + Me.txtrollupbuttonwidth.BackColor = System.Drawing.Color.White + Me.txtrollupbuttonwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtrollupbuttonwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtrollupbuttonwidth.ForeColor = System.Drawing.Color.Black + Me.txtrollupbuttonwidth.Location = New System.Drawing.Point(245, 30) + Me.txtrollupbuttonwidth.Name = "txtrollupbuttonwidth" + Me.txtrollupbuttonwidth.Size = New System.Drawing.Size(23, 22) + Me.txtrollupbuttonwidth.TabIndex = 7 + ' + 'Label62 + ' + Me.Label62.AutoSize = True + Me.Label62.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label62.Location = New System.Drawing.Point(269, 32) + Me.Label62.Name = "Label62" + Me.Label62.Size = New System.Drawing.Size(22, 16) + Me.Label62.TabIndex = 8 + Me.Label62.Text = "px" + ' + 'combobuttonoption + ' + Me.combobuttonoption.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.combobuttonoption.FormattingEnabled = True + Me.combobuttonoption.Items.AddRange(New Object() {"Close Button", "Roll Up Button"}) + Me.combobuttonoption.Location = New System.Drawing.Point(157, 4) + Me.combobuttonoption.Name = "combobuttonoption" + Me.combobuttonoption.Size = New System.Drawing.Size(121, 24) + Me.combobuttonoption.TabIndex = 17 + ' + 'Label52 + ' + Me.Label52.AutoSize = True + Me.Label52.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label52.Location = New System.Drawing.Point(40, 6) + Me.Label52.Name = "Label52" + Me.Label52.Size = New System.Drawing.Size(111, 16) + Me.Label52.TabIndex = 15 + Me.Label52.Text = "Button To Modify:" + ' + 'pnlclosebuttonoptions + ' + Me.pnlclosebuttonoptions.Controls.Add(Me.Label8) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label11) + Me.pnlclosebuttonoptions.Controls.Add(Me.pnlclosebuttoncolour) + Me.pnlclosebuttonoptions.Controls.Add(Me.txtclosebuttonfromside) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label7) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label12) + Me.pnlclosebuttonoptions.Controls.Add(Me.txtclosebuttonheight) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label13) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label6) + Me.pnlclosebuttonoptions.Controls.Add(Me.txtclosebuttonfromtop) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label10) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label14) + Me.pnlclosebuttonoptions.Controls.Add(Me.txtclosebuttonwidth) + Me.pnlclosebuttonoptions.Controls.Add(Me.Label9) + Me.pnlclosebuttonoptions.Location = New System.Drawing.Point(212, 87) + Me.pnlclosebuttonoptions.Name = "pnlclosebuttonoptions" + Me.pnlclosebuttonoptions.Size = New System.Drawing.Size(104, 44) + Me.pnlclosebuttonoptions.TabIndex = 15 + Me.pnlclosebuttonoptions.Visible = False + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(3, 6) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(128, 16) + Me.Label8.TabIndex = 0 + Me.Label8.Text = "Close Button Colour:" + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label11.Location = New System.Drawing.Point(177, 82) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(22, 16) + Me.Label11.TabIndex = 14 + Me.Label11.Text = "px" + ' + 'pnlclosebuttoncolour + ' + Me.pnlclosebuttoncolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlclosebuttoncolour.Location = New System.Drawing.Point(132, 4) + Me.pnlclosebuttoncolour.Name = "pnlclosebuttoncolour" + Me.pnlclosebuttoncolour.Size = New System.Drawing.Size(41, 20) + Me.pnlclosebuttoncolour.TabIndex = 1 + ' + 'txtclosebuttonfromside + ' + Me.txtclosebuttonfromside.BackColor = System.Drawing.Color.White + Me.txtclosebuttonfromside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtclosebuttonfromside.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclosebuttonfromside.ForeColor = System.Drawing.Color.Black + Me.txtclosebuttonfromside.Location = New System.Drawing.Point(153, 80) + Me.txtclosebuttonfromside.Name = "txtclosebuttonfromside" + Me.txtclosebuttonfromside.Size = New System.Drawing.Size(23, 22) + Me.txtclosebuttonfromside.TabIndex = 13 + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label7.Location = New System.Drawing.Point(3, 32) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(128, 16) + Me.Label7.TabIndex = 2 + Me.Label7.Text = "Close Button Height:" + ' + 'Label12 + ' + Me.Label12.AutoSize = True + Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label12.Location = New System.Drawing.Point(3, 82) + Me.Label12.Name = "Label12" + Me.Label12.Size = New System.Drawing.Size(151, 16) + Me.Label12.TabIndex = 12 + Me.Label12.Text = "Close Button From Side:" + ' + 'txtclosebuttonheight + ' + Me.txtclosebuttonheight.BackColor = System.Drawing.Color.White + Me.txtclosebuttonheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtclosebuttonheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclosebuttonheight.ForeColor = System.Drawing.Color.Black + Me.txtclosebuttonheight.Location = New System.Drawing.Point(132, 30) + Me.txtclosebuttonheight.Name = "txtclosebuttonheight" + Me.txtclosebuttonheight.Size = New System.Drawing.Size(23, 22) + Me.txtclosebuttonheight.TabIndex = 4 + ' + 'Label13 + ' + Me.Label13.AutoSize = True + Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label13.Location = New System.Drawing.Point(177, 57) + Me.Label13.Name = "Label13" + Me.Label13.Size = New System.Drawing.Size(22, 16) + Me.Label13.TabIndex = 11 + Me.Label13.Text = "px" + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(156, 32) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(22, 16) + Me.Label6.TabIndex = 5 + Me.Label6.Text = "px" + ' + 'txtclosebuttonfromtop + ' + Me.txtclosebuttonfromtop.BackColor = System.Drawing.Color.White + Me.txtclosebuttonfromtop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtclosebuttonfromtop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclosebuttonfromtop.ForeColor = System.Drawing.Color.Black + Me.txtclosebuttonfromtop.Location = New System.Drawing.Point(153, 55) + Me.txtclosebuttonfromtop.Name = "txtclosebuttonfromtop" + Me.txtclosebuttonfromtop.Size = New System.Drawing.Size(23, 22) + Me.txtclosebuttonfromtop.TabIndex = 10 + ' + 'Label10 + ' + Me.Label10.AutoSize = True + Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label10.Location = New System.Drawing.Point(184, 32) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(45, 16) + Me.Label10.TabIndex = 6 + Me.Label10.Text = "Width:" + ' + 'Label14 + ' + Me.Label14.AutoSize = True + Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label14.Location = New System.Drawing.Point(3, 57) + Me.Label14.Name = "Label14" + Me.Label14.Size = New System.Drawing.Size(148, 16) + Me.Label14.TabIndex = 9 + Me.Label14.Text = "Close Button From Top:" + ' + 'txtclosebuttonwidth + ' + Me.txtclosebuttonwidth.BackColor = System.Drawing.Color.White + Me.txtclosebuttonwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtclosebuttonwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtclosebuttonwidth.ForeColor = System.Drawing.Color.Black + Me.txtclosebuttonwidth.Location = New System.Drawing.Point(234, 30) + Me.txtclosebuttonwidth.Name = "txtclosebuttonwidth" + Me.txtclosebuttonwidth.Size = New System.Drawing.Size(23, 22) + Me.txtclosebuttonwidth.TabIndex = 7 + ' + 'Label9 + ' + Me.Label9.AutoSize = True + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(258, 32) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(22, 16) + Me.Label9.TabIndex = 8 + Me.Label9.Text = "px" + ' + 'pnltitlebaroptions + ' + Me.pnltitlebaroptions.Controls.Add(Me.Label80) + Me.pnltitlebaroptions.Controls.Add(Me.txticonfromtop) + Me.pnltitlebaroptions.Controls.Add(Me.Label81) + Me.pnltitlebaroptions.Controls.Add(Me.Label78) + Me.pnltitlebaroptions.Controls.Add(Me.txticonfromside) + Me.pnltitlebaroptions.Controls.Add(Me.Label79) + Me.pnltitlebaroptions.Controls.Add(Me.lbcornerwidthpx) + Me.pnltitlebaroptions.Controls.Add(Me.txttitlebarcornerwidth) + Me.pnltitlebaroptions.Controls.Add(Me.lbcornerwidth) + Me.pnltitlebaroptions.Controls.Add(Me.pnltitlebarrightcornercolour) + Me.pnltitlebaroptions.Controls.Add(Me.pnltitlebarleftcornercolour) + Me.pnltitlebaroptions.Controls.Add(Me.lbrightcornercolor) + Me.pnltitlebaroptions.Controls.Add(Me.lbleftcornercolor) + Me.pnltitlebaroptions.Controls.Add(Me.cboxtitlebarcorners) + Me.pnltitlebaroptions.Controls.Add(Me.Label5) + Me.pnltitlebaroptions.Controls.Add(Me.txttitlebarheight) + Me.pnltitlebaroptions.Controls.Add(Me.Label4) + Me.pnltitlebaroptions.Controls.Add(Me.pnltitlebarcolour) + Me.pnltitlebaroptions.Controls.Add(Me.Label2) + Me.pnltitlebaroptions.Location = New System.Drawing.Point(325, 159) + Me.pnltitlebaroptions.Name = "pnltitlebaroptions" + Me.pnltitlebaroptions.Size = New System.Drawing.Size(33, 65) + Me.pnltitlebaroptions.TabIndex = 9 + Me.pnltitlebaroptions.Visible = False + ' + 'Label80 + ' + Me.Label80.AutoSize = True + Me.Label80.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label80.Location = New System.Drawing.Point(277, 105) + Me.Label80.Name = "Label80" + Me.Label80.Size = New System.Drawing.Size(22, 16) + Me.Label80.TabIndex = 19 + Me.Label80.Text = "px" + ' + 'txticonfromtop + ' + Me.txticonfromtop.BackColor = System.Drawing.Color.White + Me.txticonfromtop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txticonfromtop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txticonfromtop.ForeColor = System.Drawing.Color.Black + Me.txticonfromtop.Location = New System.Drawing.Point(253, 103) + Me.txticonfromtop.Name = "txticonfromtop" + Me.txticonfromtop.Size = New System.Drawing.Size(23, 22) + Me.txticonfromtop.TabIndex = 18 + ' + 'Label81 + ' + Me.Label81.AutoSize = True + Me.Label81.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label81.Location = New System.Drawing.Point(157, 105) + Me.Label81.Name = "Label81" + Me.Label81.Size = New System.Drawing.Size(98, 16) + Me.Label81.TabIndex = 17 + Me.Label81.Text = "Icon From Top:" + ' + 'Label78 + ' + Me.Label78.AutoSize = True + Me.Label78.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label78.Location = New System.Drawing.Point(128, 105) + Me.Label78.Name = "Label78" + Me.Label78.Size = New System.Drawing.Size(22, 16) + Me.Label78.TabIndex = 16 + Me.Label78.Text = "px" + ' + 'txticonfromside + ' + Me.txticonfromside.BackColor = System.Drawing.Color.White + Me.txticonfromside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txticonfromside.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txticonfromside.ForeColor = System.Drawing.Color.Black + Me.txticonfromside.Location = New System.Drawing.Point(104, 103) + Me.txticonfromside.Name = "txticonfromside" + Me.txticonfromside.Size = New System.Drawing.Size(23, 22) + Me.txticonfromside.TabIndex = 15 + ' + 'Label79 + ' + Me.Label79.AutoSize = True + Me.Label79.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label79.Location = New System.Drawing.Point(3, 105) + Me.Label79.Name = "Label79" + Me.Label79.Size = New System.Drawing.Size(101, 16) + Me.Label79.TabIndex = 14 + Me.Label79.Text = "Icon From Side:" + ' + 'lbcornerwidthpx + ' + Me.lbcornerwidthpx.AutoSize = True + Me.lbcornerwidthpx.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbcornerwidthpx.Location = New System.Drawing.Point(277, 32) + Me.lbcornerwidthpx.Name = "lbcornerwidthpx" + Me.lbcornerwidthpx.Size = New System.Drawing.Size(22, 16) + Me.lbcornerwidthpx.TabIndex = 13 + Me.lbcornerwidthpx.Text = "px" + ' + 'txttitlebarcornerwidth + ' + Me.txttitlebarcornerwidth.BackColor = System.Drawing.Color.White + Me.txttitlebarcornerwidth.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttitlebarcornerwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttitlebarcornerwidth.ForeColor = System.Drawing.Color.Black + Me.txttitlebarcornerwidth.Location = New System.Drawing.Point(253, 30) + Me.txttitlebarcornerwidth.Name = "txttitlebarcornerwidth" + Me.txttitlebarcornerwidth.Size = New System.Drawing.Size(23, 22) + Me.txttitlebarcornerwidth.TabIndex = 12 + ' + 'lbcornerwidth + ' + Me.lbcornerwidth.AutoSize = True + Me.lbcornerwidth.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbcornerwidth.Location = New System.Drawing.Point(163, 32) + Me.lbcornerwidth.Name = "lbcornerwidth" + Me.lbcornerwidth.Size = New System.Drawing.Size(88, 16) + Me.lbcornerwidth.TabIndex = 11 + Me.lbcornerwidth.Text = "Corner Width:" + ' + 'pnltitlebarrightcornercolour + ' + Me.pnltitlebarrightcornercolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnltitlebarrightcornercolour.Location = New System.Drawing.Point(136, 80) + Me.pnltitlebarrightcornercolour.Name = "pnltitlebarrightcornercolour" + Me.pnltitlebarrightcornercolour.Size = New System.Drawing.Size(41, 20) + Me.pnltitlebarrightcornercolour.TabIndex = 10 + ' + 'pnltitlebarleftcornercolour + ' + Me.pnltitlebarleftcornercolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnltitlebarleftcornercolour.Location = New System.Drawing.Point(126, 56) + Me.pnltitlebarleftcornercolour.Name = "pnltitlebarleftcornercolour" + Me.pnltitlebarleftcornercolour.Size = New System.Drawing.Size(41, 20) + Me.pnltitlebarleftcornercolour.TabIndex = 8 + ' + 'lbrightcornercolor + ' + Me.lbrightcornercolor.AutoSize = True + Me.lbrightcornercolor.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbrightcornercolor.Location = New System.Drawing.Point(3, 81) + Me.lbrightcornercolor.Name = "lbrightcornercolor" + Me.lbrightcornercolor.Size = New System.Drawing.Size(127, 16) + Me.lbrightcornercolor.TabIndex = 9 + Me.lbrightcornercolor.Text = "Right Corner Colour:" + ' + 'lbleftcornercolor + ' + Me.lbleftcornercolor.AutoSize = True + Me.lbleftcornercolor.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbleftcornercolor.Location = New System.Drawing.Point(3, 57) + Me.lbleftcornercolor.Name = "lbleftcornercolor" + Me.lbleftcornercolor.Size = New System.Drawing.Size(117, 16) + Me.lbleftcornercolor.TabIndex = 7 + Me.lbleftcornercolor.Text = "Left Corner Colour:" + ' + 'cboxtitlebarcorners + ' + Me.cboxtitlebarcorners.AutoSize = True + Me.cboxtitlebarcorners.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.cboxtitlebarcorners.FlatAppearance.CheckedBackColor = System.Drawing.Color.Black + Me.cboxtitlebarcorners.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cboxtitlebarcorners.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.25!) + Me.cboxtitlebarcorners.Location = New System.Drawing.Point(166, 4) + Me.cboxtitlebarcorners.Name = "cboxtitlebarcorners" + Me.cboxtitlebarcorners.Size = New System.Drawing.Size(131, 21) + Me.cboxtitlebarcorners.TabIndex = 6 + Me.cboxtitlebarcorners.Text = "Title Bar Corners" + Me.cboxtitlebarcorners.UseVisualStyleBackColor = True + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(136, 32) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(22, 16) + Me.Label5.TabIndex = 5 + Me.Label5.Text = "px" + ' + 'txttitlebarheight + ' + Me.txttitlebarheight.BackColor = System.Drawing.Color.White + Me.txttitlebarheight.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttitlebarheight.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttitlebarheight.ForeColor = System.Drawing.Color.Black + Me.txttitlebarheight.Location = New System.Drawing.Point(112, 30) + Me.txttitlebarheight.Name = "txttitlebarheight" + Me.txttitlebarheight.Size = New System.Drawing.Size(23, 22) + Me.txttitlebarheight.TabIndex = 4 + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(3, 32) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(103, 16) + Me.Label4.TabIndex = 2 + Me.Label4.Text = "Title Bar Height:" + ' + 'pnltitlebarcolour + ' + Me.pnltitlebarcolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnltitlebarcolour.Location = New System.Drawing.Point(112, 5) + Me.pnltitlebarcolour.Name = "pnltitlebarcolour" + Me.pnltitlebarcolour.Size = New System.Drawing.Size(41, 20) + Me.pnltitlebarcolour.TabIndex = 1 + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(3, 7) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(103, 16) + Me.Label2.TabIndex = 0 + Me.Label2.Text = "Title Bar Colour:" + ' + 'pnlborderoptions + ' + Me.pnlborderoptions.Controls.Add(Me.cbindividualbordercolours) + Me.pnlborderoptions.Controls.Add(Me.pnlborderbottomrightcolour) + Me.pnlborderoptions.Controls.Add(Me.Label77) + Me.pnlborderoptions.Controls.Add(Me.pnlborderbottomcolour) + Me.pnlborderoptions.Controls.Add(Me.Label76) + Me.pnlborderoptions.Controls.Add(Me.pnlborderbottomleftcolour) + Me.pnlborderoptions.Controls.Add(Me.Label75) + Me.pnlborderoptions.Controls.Add(Me.pnlborderrightcolour) + Me.pnlborderoptions.Controls.Add(Me.Label74) + Me.pnlborderoptions.Controls.Add(Me.pnlborderleftcolour) + Me.pnlborderoptions.Controls.Add(Me.Label73) + Me.pnlborderoptions.Controls.Add(Me.Label15) + Me.pnlborderoptions.Controls.Add(Me.pnlbordercolour) + Me.pnlborderoptions.Controls.Add(Me.txtbordersize) + Me.pnlborderoptions.Controls.Add(Me.Label3) + Me.pnlborderoptions.Controls.Add(Me.Label16) + Me.pnlborderoptions.Location = New System.Drawing.Point(407, 188) + Me.pnlborderoptions.Name = "pnlborderoptions" + Me.pnlborderoptions.Size = New System.Drawing.Size(44, 52) + Me.pnlborderoptions.TabIndex = 10 + Me.pnlborderoptions.Visible = False + ' + 'cbindividualbordercolours + ' + Me.cbindividualbordercolours.AutoSize = True + Me.cbindividualbordercolours.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.cbindividualbordercolours.FlatAppearance.CheckedBackColor = System.Drawing.Color.Black + Me.cbindividualbordercolours.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.cbindividualbordercolours.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.25!) + Me.cbindividualbordercolours.Location = New System.Drawing.Point(161, 4) + Me.cbindividualbordercolours.Name = "cbindividualbordercolours" + Me.cbindividualbordercolours.Size = New System.Drawing.Size(135, 21) + Me.cbindividualbordercolours.TabIndex = 28 + Me.cbindividualbordercolours.Text = "Individual Colours" + Me.cbindividualbordercolours.UseVisualStyleBackColor = True + ' + 'pnlborderbottomrightcolour + ' + Me.pnlborderbottomrightcolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlborderbottomrightcolour.Location = New System.Drawing.Point(132, 101) + Me.pnlborderbottomrightcolour.Name = "pnlborderbottomrightcolour" + Me.pnlborderbottomrightcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlborderbottomrightcolour.TabIndex = 27 + ' + 'Label77 + ' + Me.Label77.AutoSize = True + Me.Label77.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label77.Location = New System.Drawing.Point(3, 103) + Me.Label77.Name = "Label77" + Me.Label77.Size = New System.Drawing.Size(129, 16) + Me.Label77.TabIndex = 26 + Me.Label77.Text = "Bottom Right Colour:" + ' + 'pnlborderbottomcolour + ' + Me.pnlborderbottomcolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlborderbottomcolour.Location = New System.Drawing.Point(263, 31) + Me.pnlborderbottomcolour.Name = "pnlborderbottomcolour" + Me.pnlborderbottomcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlborderbottomcolour.TabIndex = 25 + ' + 'Label76 + ' + Me.Label76.AutoSize = True + Me.Label76.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label76.Location = New System.Drawing.Point(158, 32) + Me.Label76.Name = "Label76" + Me.Label76.Size = New System.Drawing.Size(95, 16) + Me.Label76.TabIndex = 24 + Me.Label76.Text = "Bottom Colour:" + ' + 'pnlborderbottomleftcolour + ' + Me.pnlborderbottomleftcolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlborderbottomleftcolour.Location = New System.Drawing.Point(124, 78) + Me.pnlborderbottomleftcolour.Name = "pnlborderbottomleftcolour" + Me.pnlborderbottomleftcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlborderbottomleftcolour.TabIndex = 23 + ' + 'Label75 + ' + Me.Label75.AutoSize = True + Me.Label75.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label75.Location = New System.Drawing.Point(3, 80) + Me.Label75.Name = "Label75" + Me.Label75.Size = New System.Drawing.Size(119, 16) + Me.Label75.TabIndex = 22 + Me.Label75.Text = "Bottom Left Colour:" + ' + 'pnlborderrightcolour + ' + Me.pnlborderrightcolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlborderrightcolour.Location = New System.Drawing.Point(263, 54) + Me.pnlborderrightcolour.Name = "pnlborderrightcolour" + Me.pnlborderrightcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlborderrightcolour.TabIndex = 21 + ' + 'Label74 + ' + Me.Label74.AutoSize = True + Me.Label74.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label74.Location = New System.Drawing.Point(157, 56) + Me.Label74.Name = "Label74" + Me.Label74.Size = New System.Drawing.Size(84, 16) + Me.Label74.TabIndex = 20 + Me.Label74.Text = "Right Colour:" + ' + 'pnlborderleftcolour + ' + Me.pnlborderleftcolour.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlborderleftcolour.Location = New System.Drawing.Point(102, 54) + Me.pnlborderleftcolour.Name = "pnlborderleftcolour" + Me.pnlborderleftcolour.Size = New System.Drawing.Size(41, 20) + Me.pnlborderleftcolour.TabIndex = 19 + ' + 'Label73 + ' + Me.Label73.AutoSize = True + Me.Label73.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label73.Location = New System.Drawing.Point(3, 56) + Me.Label73.Name = "Label73" + Me.Label73.Size = New System.Drawing.Size(74, 16) + Me.Label73.TabIndex = 18 + Me.Label73.Text = "Left Colour:" + ' + 'Label15 + ' + Me.Label15.AutoSize = True + Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label15.Location = New System.Drawing.Point(126, 31) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(22, 16) + Me.Label15.TabIndex = 17 + Me.Label15.Text = "px" + ' + 'pnlbordercolour + ' + Me.pnlbordercolour.Location = New System.Drawing.Point(102, 5) + Me.pnlbordercolour.Name = "pnlbordercolour" + Me.pnlbordercolour.Size = New System.Drawing.Size(41, 20) + Me.pnlbordercolour.TabIndex = 3 + ' + 'txtbordersize + ' + Me.txtbordersize.BackColor = System.Drawing.Color.White + Me.txtbordersize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbordersize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtbordersize.ForeColor = System.Drawing.Color.Black + Me.txtbordersize.Location = New System.Drawing.Point(102, 29) + Me.txtbordersize.Name = "txtbordersize" + Me.txtbordersize.Size = New System.Drawing.Size(23, 22) + Me.txtbordersize.TabIndex = 16 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(3, 7) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(94, 16) + Me.Label3.TabIndex = 2 + Me.Label3.Text = "Border Colour:" + ' + 'Label16 + ' + Me.Label16.AutoSize = True + Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label16.Location = New System.Drawing.Point(3, 31) + Me.Label16.Name = "Label16" + Me.Label16.Size = New System.Drawing.Size(81, 16) + Me.Label16.TabIndex = 15 + Me.Label16.Text = "Border Size:" + ' + 'pnltitletextoptions + ' + Me.pnltitletextoptions.Controls.Add(Me.combotitletextposition) + Me.pnltitletextoptions.Controls.Add(Me.Label53) + Me.pnltitletextoptions.Controls.Add(Me.combotitletextstyle) + Me.pnltitletextoptions.Controls.Add(Me.combotitletextfont) + Me.pnltitletextoptions.Controls.Add(Me.Label23) + Me.pnltitletextoptions.Controls.Add(Me.Label17) + Me.pnltitletextoptions.Controls.Add(Me.txttitletextside) + Me.pnltitletextoptions.Controls.Add(Me.Label18) + Me.pnltitletextoptions.Controls.Add(Me.Label19) + Me.pnltitletextoptions.Controls.Add(Me.txttitletexttop) + Me.pnltitletextoptions.Controls.Add(Me.Label20) + Me.pnltitletextoptions.Controls.Add(Me.Label21) + Me.pnltitletextoptions.Controls.Add(Me.txttitletextsize) + Me.pnltitletextoptions.Controls.Add(Me.Label22) + Me.pnltitletextoptions.Controls.Add(Me.Label24) + Me.pnltitletextoptions.Controls.Add(Me.pnltitletextcolour) + Me.pnltitletextoptions.Controls.Add(Me.Label25) + Me.pnltitletextoptions.Location = New System.Drawing.Point(408, 264) + Me.pnltitletextoptions.Name = "pnltitletextoptions" + Me.pnltitletextoptions.Size = New System.Drawing.Size(43, 27) + Me.pnltitletextoptions.TabIndex = 15 + Me.pnltitletextoptions.Visible = False + ' + 'combotitletextposition + ' + Me.combotitletextposition.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.combotitletextposition.FormattingEnabled = True + Me.combotitletextposition.Items.AddRange(New Object() {"Left", "Centre"}) + Me.combotitletextposition.Location = New System.Drawing.Point(211, 54) + Me.combotitletextposition.Name = "combotitletextposition" + Me.combotitletextposition.Size = New System.Drawing.Size(95, 24) + Me.combotitletextposition.TabIndex = 21 + ' + 'Label53 + ' + Me.Label53.AutoSize = True + Me.Label53.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label53.Location = New System.Drawing.Point(149, 57) + Me.Label53.Name = "Label53" + Me.Label53.Size = New System.Drawing.Size(59, 16) + Me.Label53.TabIndex = 20 + Me.Label53.Text = "Position:" + ' + 'combotitletextstyle + ' + Me.combotitletextstyle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.combotitletextstyle.FormattingEnabled = True + Me.combotitletextstyle.Items.AddRange(New Object() {"Bold", "Italic", "Regular", "Strikeout", "Underline"}) + Me.combotitletextstyle.Location = New System.Drawing.Point(207, 3) + Me.combotitletextstyle.Name = "combotitletextstyle" + Me.combotitletextstyle.Size = New System.Drawing.Size(99, 24) + Me.combotitletextstyle.TabIndex = 18 + ' + 'combotitletextfont + ' + Me.combotitletextfont.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.combotitletextfont.FormattingEnabled = True + Me.combotitletextfont.Location = New System.Drawing.Point(100, 30) + Me.combotitletextfont.Name = "combotitletextfont" + Me.combotitletextfont.Size = New System.Drawing.Size(202, 24) + Me.combotitletextfont.TabIndex = 17 + ' + 'Label23 + ' + Me.Label23.AutoSize = True + Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label23.Location = New System.Drawing.Point(164, 7) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(41, 16) + Me.Label23.TabIndex = 15 + Me.Label23.Text = "Style:" + ' + 'Label17 + ' + Me.Label17.AutoSize = True + Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label17.Location = New System.Drawing.Point(159, 107) + Me.Label17.Name = "Label17" + Me.Label17.Size = New System.Drawing.Size(22, 16) + Me.Label17.TabIndex = 14 + Me.Label17.Text = "px" + ' + 'txttitletextside + ' + Me.txttitletextside.BackColor = System.Drawing.Color.White + Me.txttitletextside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttitletextside.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttitletextside.ForeColor = System.Drawing.Color.Black + Me.txttitletextside.Location = New System.Drawing.Point(135, 105) + Me.txttitletextside.Name = "txttitletextside" + Me.txttitletextside.Size = New System.Drawing.Size(23, 22) + Me.txttitletextside.TabIndex = 13 + ' + 'Label18 + ' + Me.Label18.AutoSize = True + Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label18.Location = New System.Drawing.Point(3, 107) + Me.Label18.Name = "Label18" + Me.Label18.Size = New System.Drawing.Size(131, 16) + Me.Label18.TabIndex = 12 + Me.Label18.Text = "Title Text From Side:" + ' + 'Label19 + ' + Me.Label19.AutoSize = True + Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label19.Location = New System.Drawing.Point(159, 82) + Me.Label19.Name = "Label19" + Me.Label19.Size = New System.Drawing.Size(22, 16) + Me.Label19.TabIndex = 11 + Me.Label19.Text = "px" + ' + 'txttitletexttop + ' + Me.txttitletexttop.BackColor = System.Drawing.Color.White + Me.txttitletexttop.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttitletexttop.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttitletexttop.ForeColor = System.Drawing.Color.Black + Me.txttitletexttop.Location = New System.Drawing.Point(135, 80) + Me.txttitletexttop.Name = "txttitletexttop" + Me.txttitletexttop.Size = New System.Drawing.Size(23, 22) + Me.txttitletexttop.TabIndex = 10 + ' + 'Label20 + ' + Me.Label20.AutoSize = True + Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label20.Location = New System.Drawing.Point(3, 82) + Me.Label20.Name = "Label20" + Me.Label20.Size = New System.Drawing.Size(128, 16) + Me.Label20.TabIndex = 9 + Me.Label20.Text = "Title Text From Top:" + ' + 'Label21 + ' + Me.Label21.AutoSize = True + Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label21.Location = New System.Drawing.Point(124, 57) + Me.Label21.Name = "Label21" + Me.Label21.Size = New System.Drawing.Size(22, 16) + Me.Label21.TabIndex = 8 + Me.Label21.Text = "px" + ' + 'txttitletextsize + ' + Me.txttitletextsize.BackColor = System.Drawing.Color.White + Me.txttitletextsize.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txttitletextsize.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txttitletextsize.ForeColor = System.Drawing.Color.Black + Me.txttitletextsize.Location = New System.Drawing.Point(100, 55) + Me.txttitletextsize.Name = "txttitletextsize" + Me.txttitletextsize.Size = New System.Drawing.Size(23, 22) + Me.txttitletextsize.TabIndex = 7 + ' + 'Label22 + ' + Me.Label22.AutoSize = True + Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label22.Location = New System.Drawing.Point(3, 57) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(95, 16) + Me.Label22.TabIndex = 6 + Me.Label22.Text = "Title Text Size:" + ' + 'Label24 + ' + Me.Label24.AutoSize = True + Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label24.Location = New System.Drawing.Point(3, 33) + Me.Label24.Name = "Label24" + Me.Label24.Size = New System.Drawing.Size(95, 16) + Me.Label24.TabIndex = 2 + Me.Label24.Text = "Title Text Font:" + ' + 'pnltitletextcolour + ' + Me.pnltitletextcolour.Location = New System.Drawing.Point(114, 5) + Me.pnltitletextcolour.Name = "pnltitletextcolour" + Me.pnltitletextcolour.Size = New System.Drawing.Size(41, 20) + Me.pnltitletextcolour.TabIndex = 1 + ' + 'Label25 + ' + Me.Label25.AutoSize = True + Me.Label25.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label25.Location = New System.Drawing.Point(3, 7) + Me.Label25.Name = "Label25" + Me.Label25.Size = New System.Drawing.Size(108, 16) + Me.Label25.TabIndex = 0 + Me.Label25.Text = "Title Text Colour:" + ' + 'pnlwindowsintro + ' + Me.pnlwindowsintro.Controls.Add(Me.Label68) + Me.pnlwindowsintro.Controls.Add(Me.Label67) + Me.pnlwindowsintro.Location = New System.Drawing.Point(156, 202) + Me.pnlwindowsintro.Name = "pnlwindowsintro" + Me.pnlwindowsintro.Size = New System.Drawing.Size(107, 74) + Me.pnlwindowsintro.TabIndex = 16 + ' + 'Label68 + ' + Me.Label68.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label68.Location = New System.Drawing.Point(3, 20) + Me.Label68.Name = "Label68" + Me.Label68.Size = New System.Drawing.Size(312, 113) + Me.Label68.TabIndex = 1 + Me.Label68.Text = resources.GetString("Label68.Text") + Me.Label68.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label67 + ' + Me.Label67.AutoSize = True + Me.Label67.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label67.Location = New System.Drawing.Point(89, -2) + Me.Label67.Name = "Label67" + Me.Label67.Size = New System.Drawing.Size(143, 20) + Me.Label67.TabIndex = 0 + Me.Label67.Text = "Window Settings" + ' + 'pnlwindowsobjects + ' + Me.pnlwindowsobjects.Controls.Add(Me.btnborders) + Me.pnlwindowsobjects.Controls.Add(Me.btnbuttons) + Me.pnlwindowsobjects.Controls.Add(Me.btntitletext) + Me.pnlwindowsobjects.Controls.Add(Me.btntitlebar) + Me.pnlwindowsobjects.Location = New System.Drawing.Point(1, 159) + Me.pnlwindowsobjects.Name = "pnlwindowsobjects" + Me.pnlwindowsobjects.Size = New System.Drawing.Size(128, 135) + Me.pnlwindowsobjects.TabIndex = 8 + ' + 'btnborders + ' + Me.btnborders.BackColor = System.Drawing.Color.White + Me.btnborders.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnborders.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnborders.Location = New System.Drawing.Point(4, 105) + Me.btnborders.Name = "btnborders" + Me.btnborders.Size = New System.Drawing.Size(119, 29) + Me.btnborders.TabIndex = 7 + Me.btnborders.TabStop = False + Me.btnborders.Text = "Borders" + Me.btnborders.UseVisualStyleBackColor = False + ' + 'btnbuttons + ' + Me.btnbuttons.BackColor = System.Drawing.Color.White + Me.btnbuttons.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbuttons.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnbuttons.Location = New System.Drawing.Point(4, 70) + Me.btnbuttons.Name = "btnbuttons" + Me.btnbuttons.Size = New System.Drawing.Size(119, 29) + Me.btnbuttons.TabIndex = 6 + Me.btnbuttons.TabStop = False + Me.btnbuttons.Text = "Buttons" + Me.btnbuttons.UseVisualStyleBackColor = False + ' + 'btntitletext + ' + Me.btntitletext.BackColor = System.Drawing.Color.White + Me.btntitletext.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btntitletext.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btntitletext.Location = New System.Drawing.Point(4, 35) + Me.btntitletext.Name = "btntitletext" + Me.btntitletext.Size = New System.Drawing.Size(119, 29) + Me.btntitletext.TabIndex = 5 + Me.btntitletext.TabStop = False + Me.btntitletext.Text = "Title Text" + Me.btntitletext.UseVisualStyleBackColor = False + ' + 'btntitlebar + ' + Me.btntitlebar.BackColor = System.Drawing.Color.White + Me.btntitlebar.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btntitlebar.Font = New System.Drawing.Font("Cambria", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btntitlebar.Location = New System.Drawing.Point(4, 0) + Me.btntitlebar.Name = "btntitlebar" + Me.btntitlebar.Size = New System.Drawing.Size(119, 29) + Me.btntitlebar.TabIndex = 4 + Me.btntitlebar.TabStop = False + Me.btntitlebar.Text = "Title Bar" + Me.btntitlebar.UseVisualStyleBackColor = False + ' + 'pnlwindowpreview + ' + Me.pnlwindowpreview.Controls.Add(Me.prepgcontent) + Me.pnlwindowpreview.Controls.Add(Me.prepgbottom) + Me.pnlwindowpreview.Controls.Add(Me.prepgleft) + Me.pnlwindowpreview.Controls.Add(Me.prepgright) + Me.pnlwindowpreview.Controls.Add(Me.pretitlebar) + Me.pnlwindowpreview.Location = New System.Drawing.Point(5, 3) + Me.pnlwindowpreview.Name = "pnlwindowpreview" + Me.pnlwindowpreview.Size = New System.Drawing.Size(448, 148) + Me.pnlwindowpreview.TabIndex = 0 + ' + 'prepgcontent + ' + Me.prepgcontent.Dock = System.Windows.Forms.DockStyle.Fill + Me.prepgcontent.Location = New System.Drawing.Point(2, 30) + Me.prepgcontent.Name = "prepgcontent" + Me.prepgcontent.Size = New System.Drawing.Size(444, 116) + Me.prepgcontent.TabIndex = 20 + ' + 'prepgbottom + ' + Me.prepgbottom.BackColor = System.Drawing.Color.Gray + Me.prepgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.prepgbottom.Location = New System.Drawing.Point(2, 146) + Me.prepgbottom.Name = "prepgbottom" + Me.prepgbottom.Size = New System.Drawing.Size(444, 2) + Me.prepgbottom.TabIndex = 23 + ' + 'prepgleft + ' + Me.prepgleft.BackColor = System.Drawing.Color.Gray + Me.prepgleft.Controls.Add(Me.prepgbottomlcorner) + Me.prepgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.prepgleft.Location = New System.Drawing.Point(0, 30) + Me.prepgleft.Name = "prepgleft" + Me.prepgleft.Size = New System.Drawing.Size(2, 118) + Me.prepgleft.TabIndex = 21 + ' + 'prepgbottomlcorner + ' + Me.prepgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.prepgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.prepgbottomlcorner.Location = New System.Drawing.Point(0, 116) + Me.prepgbottomlcorner.Name = "prepgbottomlcorner" + Me.prepgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.prepgbottomlcorner.TabIndex = 14 + ' + 'prepgright + ' + Me.prepgright.BackColor = System.Drawing.Color.Gray + Me.prepgright.Controls.Add(Me.prepgbottomrcorner) + Me.prepgright.Dock = System.Windows.Forms.DockStyle.Right + Me.prepgright.Location = New System.Drawing.Point(446, 30) + Me.prepgright.Name = "prepgright" + Me.prepgright.Size = New System.Drawing.Size(2, 118) + Me.prepgright.TabIndex = 22 + ' + 'prepgbottomrcorner + ' + Me.prepgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.prepgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.prepgbottomrcorner.Location = New System.Drawing.Point(0, 116) + Me.prepgbottomrcorner.Name = "prepgbottomrcorner" + Me.prepgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.prepgbottomrcorner.TabIndex = 15 + ' + 'pretitlebar + ' + Me.pretitlebar.BackColor = System.Drawing.Color.Gray + Me.pretitlebar.Controls.Add(Me.preminimizebutton) + Me.pretitlebar.Controls.Add(Me.prepnlicon) + Me.pretitlebar.Controls.Add(Me.prerollupbutton) + Me.pretitlebar.Controls.Add(Me.preclosebutton) + Me.pretitlebar.Controls.Add(Me.pretitletext) + Me.pretitlebar.Controls.Add(Me.prepgtoplcorner) + Me.pretitlebar.Controls.Add(Me.prepgtoprcorner) + Me.pretitlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.pretitlebar.ForeColor = System.Drawing.Color.White + Me.pretitlebar.Location = New System.Drawing.Point(0, 0) + Me.pretitlebar.Name = "pretitlebar" + Me.pretitlebar.Size = New System.Drawing.Size(448, 30) + Me.pretitlebar.TabIndex = 19 + ' + 'preminimizebutton + ' + Me.preminimizebutton.BackColor = System.Drawing.Color.Black + Me.preminimizebutton.Location = New System.Drawing.Point(185, 5) + Me.preminimizebutton.Name = "preminimizebutton" + Me.preminimizebutton.Size = New System.Drawing.Size(22, 22) + Me.preminimizebutton.TabIndex = 31 + ' + 'prepnlicon + ' + Me.prepnlicon.BackColor = System.Drawing.Color.Transparent + Me.prepnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconShifter + Me.prepnlicon.Location = New System.Drawing.Point(8, 8) + Me.prepnlicon.Name = "prepnlicon" + Me.prepnlicon.Size = New System.Drawing.Size(16, 16) + Me.prepnlicon.TabIndex = 32 + Me.prepnlicon.TabStop = False + Me.prepnlicon.Visible = False + ' + 'prerollupbutton + ' + Me.prerollupbutton.BackColor = System.Drawing.Color.Black + Me.prerollupbutton.Location = New System.Drawing.Point(213, 5) + Me.prerollupbutton.Name = "prerollupbutton" + Me.prerollupbutton.Size = New System.Drawing.Size(22, 22) + Me.prerollupbutton.TabIndex = 31 + ' + 'preclosebutton + ' + Me.preclosebutton.BackColor = System.Drawing.Color.Black + Me.preclosebutton.Location = New System.Drawing.Point(251, 5) + Me.preclosebutton.Name = "preclosebutton" + Me.preclosebutton.Size = New System.Drawing.Size(22, 22) + Me.preclosebutton.TabIndex = 20 + ' + 'pretitletext + ' + Me.pretitletext.AutoSize = True + Me.pretitletext.BackColor = System.Drawing.Color.Transparent + Me.pretitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.pretitletext.Location = New System.Drawing.Point(29, 7) + Me.pretitletext.Name = "pretitletext" + Me.pretitletext.Size = New System.Drawing.Size(77, 18) + Me.pretitletext.TabIndex = 19 + Me.pretitletext.Text = "Template" + ' + 'prepgtoplcorner + ' + Me.prepgtoplcorner.BackColor = System.Drawing.Color.Red + Me.prepgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.prepgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.prepgtoplcorner.Name = "prepgtoplcorner" + Me.prepgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.prepgtoplcorner.TabIndex = 17 + ' + 'prepgtoprcorner + ' + Me.prepgtoprcorner.BackColor = System.Drawing.Color.Red + Me.prepgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.prepgtoprcorner.Location = New System.Drawing.Point(446, 0) + Me.prepgtoprcorner.Name = "prepgtoprcorner" + Me.prepgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.prepgtoprcorner.TabIndex = 16 + ' + 'pnlreset + ' + Me.pnlreset.Controls.Add(Me.Label113) + Me.pnlreset.Controls.Add(Me.btnresetallsettings) + Me.pnlreset.Controls.Add(Me.Label109) + Me.pnlreset.Controls.Add(Me.Label111) + Me.pnlreset.Location = New System.Drawing.Point(134, 272) + Me.pnlreset.Name = "pnlreset" + Me.pnlreset.Size = New System.Drawing.Size(55, 26) + Me.pnlreset.TabIndex = 18 + ' + 'Label113 + ' + Me.Label113.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label113.Location = New System.Drawing.Point(57, 231) + Me.Label113.Name = "Label113" + Me.Label113.Size = New System.Drawing.Size(332, 33) + Me.Label113.TabIndex = 5 + Me.Label113.Text = "Warning! A Global Reset Is Irreversible!" + Me.Label113.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnresetallsettings + ' + Me.btnresetallsettings.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnresetallsettings.Font = New System.Drawing.Font("Cambria", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnresetallsettings.Location = New System.Drawing.Point(101, 145) + Me.btnresetallsettings.Name = "btnresetallsettings" + Me.btnresetallsettings.Size = New System.Drawing.Size(255, 83) + Me.btnresetallsettings.TabIndex = 4 + Me.btnresetallsettings.TabStop = False + Me.btnresetallsettings.Text = "Reset All Settings" + Me.btnresetallsettings.UseVisualStyleBackColor = True + ' + 'Label109 + ' + Me.Label109.BackColor = System.Drawing.Color.Transparent + Me.Label109.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label109.Location = New System.Drawing.Point(4, 40) + Me.Label109.Name = "Label109" + Me.Label109.Size = New System.Drawing.Size(451, 66) + Me.Label109.TabIndex = 3 + Me.Label109.Text = resources.GetString("Label109.Text") + Me.Label109.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label111 + ' + Me.Label111.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label111.Location = New System.Drawing.Point(68, 4) + Me.Label111.Name = "Label111" + Me.Label111.Size = New System.Drawing.Size(332, 33) + Me.Label111.TabIndex = 2 + Me.Label111.Text = "Global Settings Reset!" + Me.Label111.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlshiftadvapplauncher) + Me.pgcontents.Controls.Add(Me.pnldeskdoubleplus) + Me.pgcontents.Controls.Add(Me.pnlreset) + Me.pgcontents.Controls.Add(Me.pnlwindowsoptions) + Me.pgcontents.Controls.Add(Me.pnldesktopoptions) + Me.pgcontents.Controls.Add(Me.pnlshifterintro) + Me.pgcontents.Controls.Add(Me.catholder) + Me.pgcontents.Controls.Add(Me.btnapply) + Me.pgcontents.Controls.Add(Me.Label1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(596, 307) + Me.pgcontents.TabIndex = 0 + ' + 'pnlshiftadvapplauncher + ' + Me.pnlshiftadvapplauncher.Controls.Add(Me.Panel1) + Me.pnlshiftadvapplauncher.Controls.Add(Me.Label119) + Me.pnlshiftadvapplauncher.Controls.Add(Me.Button7) + Me.pnlshiftadvapplauncher.Controls.Add(Me.Button6) + Me.pnlshiftadvapplauncher.Controls.Add(Me.Button5) + Me.pnlshiftadvapplauncher.Controls.Add(Me.Button4) + Me.pnlshiftadvapplauncher.Controls.Add(Me.Button3) + Me.pnlshiftadvapplauncher.Controls.Add(Me.Label118) + Me.pnlshiftadvapplauncher.Location = New System.Drawing.Point(134, 9) + Me.pnlshiftadvapplauncher.Name = "pnlshiftadvapplauncher" + Me.pnlshiftadvapplauncher.Size = New System.Drawing.Size(452, 292) + Me.pnlshiftadvapplauncher.TabIndex = 20 + ' + 'Panel1 + ' + Me.Panel1.Controls.Add(Me.btnaalpwrpnlbg) + Me.Panel1.Controls.Add(Me.Label124) + Me.Panel1.Controls.Add(Me.btnaalusrpnlbg) + Me.Panel1.Controls.Add(Me.Label123) + Me.Panel1.Controls.Add(Me.btnaalshutdowntextcolor) + Me.Panel1.Controls.Add(Me.Label122) + Me.Panel1.Controls.Add(Me.cmbaalusrstyle) + Me.Panel1.Controls.Add(Me.nudusrsize) + Me.Panel1.Controls.Add(Me.cmbaalusrfont) + Me.Panel1.Controls.Add(Me.Label121) + Me.Panel1.Controls.Add(Me.btnaalusrtextcolor) + Me.Panel1.Controls.Add(Me.Label120) + Me.Panel1.Location = New System.Drawing.Point(4, 104) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(444, 157) + Me.Panel1.TabIndex = 7 + ' + 'btnaalpwrpnlbg + ' + Me.btnaalpwrpnlbg.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnaalpwrpnlbg.Location = New System.Drawing.Point(346, 84) + Me.btnaalpwrpnlbg.Name = "btnaalpwrpnlbg" + Me.btnaalpwrpnlbg.Size = New System.Drawing.Size(34, 23) + Me.btnaalpwrpnlbg.TabIndex = 11 + Me.btnaalpwrpnlbg.UseVisualStyleBackColor = True + ' + 'Label124 + ' + Me.Label124.AutoSize = True + Me.Label124.Location = New System.Drawing.Point(213, 90) + Me.Label124.Name = "Label124" + Me.Label124.Size = New System.Drawing.Size(131, 13) + Me.Label124.TabIndex = 10 + Me.Label124.Text = "Power Panel Background:" + ' + 'btnaalusrpnlbg + ' + Me.btnaalusrpnlbg.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnaalusrpnlbg.Location = New System.Drawing.Point(167, 84) + Me.btnaalusrpnlbg.Name = "btnaalusrpnlbg" + Me.btnaalusrpnlbg.Size = New System.Drawing.Size(34, 23) + Me.btnaalusrpnlbg.TabIndex = 9 + Me.btnaalusrpnlbg.UseVisualStyleBackColor = True + ' + 'Label123 + ' + Me.Label123.AutoSize = True + Me.Label123.Location = New System.Drawing.Point(14, 89) + Me.Label123.Name = "Label123" + Me.Label123.Size = New System.Drawing.Size(149, 13) + Me.Label123.TabIndex = 8 + Me.Label123.Text = "Username Panel Background:" + ' + 'btnaalshutdowntextcolor + ' + Me.btnaalshutdowntextcolor.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnaalshutdowntextcolor.Location = New System.Drawing.Point(310, 7) + Me.btnaalshutdowntextcolor.Name = "btnaalshutdowntextcolor" + Me.btnaalshutdowntextcolor.Size = New System.Drawing.Size(34, 23) + Me.btnaalshutdowntextcolor.TabIndex = 7 + Me.btnaalshutdowntextcolor.UseVisualStyleBackColor = True + ' + 'Label122 + ' + Me.Label122.AutoSize = True + Me.Label122.Location = New System.Drawing.Point(164, 12) + Me.Label122.Name = "Label122" + Me.Label122.Size = New System.Drawing.Size(143, 13) + Me.Label122.TabIndex = 6 + Me.Label122.Text = "Shutdown Button Text Color:" + ' + 'cmbaalusrstyle + ' + Me.cmbaalusrstyle.FormattingEnabled = True + Me.cmbaalusrstyle.Items.AddRange(New Object() {"Regular", "Bold", "Italic", "Underline"}) + Me.cmbaalusrstyle.Location = New System.Drawing.Point(295, 44) + Me.cmbaalusrstyle.Name = "cmbaalusrstyle" + Me.cmbaalusrstyle.Size = New System.Drawing.Size(60, 21) + Me.cmbaalusrstyle.TabIndex = 5 + Me.cmbaalusrstyle.Text = "Regular" + ' + 'nudusrsize + ' + Me.nudusrsize.Location = New System.Drawing.Point(243, 44) + Me.nudusrsize.Name = "nudusrsize" + Me.nudusrsize.Size = New System.Drawing.Size(39, 20) + Me.nudusrsize.TabIndex = 4 + ' + 'cmbaalusrfont + ' + Me.cmbaalusrfont.FormattingEnabled = True + Me.cmbaalusrfont.Location = New System.Drawing.Point(119, 44) + Me.cmbaalusrfont.Name = "cmbaalusrfont" + Me.cmbaalusrfont.Size = New System.Drawing.Size(121, 21) + Me.cmbaalusrfont.TabIndex = 3 + Me.cmbaalusrfont.Text = "[Insert Font Here]" + ' + 'Label121 + ' + Me.Label121.AutoSize = True + Me.Label121.Location = New System.Drawing.Point(14, 47) + Me.Label121.Name = "Label121" + Me.Label121.Size = New System.Drawing.Size(106, 13) + Me.Label121.TabIndex = 2 + Me.Label121.Text = "Username Text Font:" + ' + 'btnaalusrtextcolor + ' + Me.btnaalusrtextcolor.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnaalusrtextcolor.Location = New System.Drawing.Point(124, 7) + Me.btnaalusrtextcolor.Name = "btnaalusrtextcolor" + Me.btnaalusrtextcolor.Size = New System.Drawing.Size(34, 23) + Me.btnaalusrtextcolor.TabIndex = 1 + Me.btnaalusrtextcolor.UseVisualStyleBackColor = True + ' + 'Label120 + ' + Me.Label120.AutoSize = True + Me.Label120.Location = New System.Drawing.Point(11, 12) + Me.Label120.Name = "Label120" + Me.Label120.Size = New System.Drawing.Size(109, 13) + Me.Label120.TabIndex = 0 + Me.Label120.Text = "Username Text Color:" + ' + 'Label119 + ' + Me.Label119.Location = New System.Drawing.Point(9, 46) + Me.Label119.Name = "Label119" + Me.Label119.Size = New System.Drawing.Size(437, 58) + Me.Label119.TabIndex = 6 + Me.Label119.Text = resources.GetString("Label119.Text") + ' + 'Button7 + ' + Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button7.Location = New System.Drawing.Point(351, 264) + Me.Button7.Name = "Button7" + Me.Button7.Size = New System.Drawing.Size(75, 23) + Me.Button7.TabIndex = 5 + Me.Button7.Text = "Misc." + Me.Button7.UseVisualStyleBackColor = True + ' + 'Button6 + ' + Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button6.Location = New System.Drawing.Point(273, 264) + Me.Button6.Name = "Button6" + Me.Button6.Size = New System.Drawing.Size(75, 23) + Me.Button6.TabIndex = 4 + Me.Button6.Text = "Behavior" + Me.Button6.UseVisualStyleBackColor = True + ' + 'Button5 + ' + Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button5.Location = New System.Drawing.Point(194, 264) + Me.Button5.Name = "Button5" + Me.Button5.Size = New System.Drawing.Size(75, 23) + Me.Button5.TabIndex = 3 + Me.Button5.Text = "Icons" + Me.Button5.UseVisualStyleBackColor = True + ' + 'Button4 + ' + Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button4.Location = New System.Drawing.Point(113, 264) + Me.Button4.Name = "Button4" + Me.Button4.Size = New System.Drawing.Size(75, 23) + Me.Button4.TabIndex = 2 + Me.Button4.Text = "Positions" + Me.Button4.UseVisualStyleBackColor = True + ' + 'Button3 + ' + Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button3.Location = New System.Drawing.Point(4, 264) + Me.Button3.Name = "Button3" + Me.Button3.Size = New System.Drawing.Size(105, 23) + Me.Button3.TabIndex = 1 + Me.Button3.Text = "Colors and Fonts" + Me.Button3.UseVisualStyleBackColor = True + ' + 'Label118 + ' + Me.Label118.AutoSize = True + Me.Label118.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!) + Me.Label118.Location = New System.Drawing.Point(5, 13) + Me.Label118.Name = "Label118" + Me.Label118.Size = New System.Drawing.Size(292, 24) + Me.Label118.TabIndex = 0 + Me.Label118.Text = "Advanced App Launcher Settings" + ' + 'pnldeskdoubleplus + ' + Me.pnldeskdoubleplus.Controls.Add(Me.Panel2) + Me.pnldeskdoubleplus.Controls.Add(Me.pnldppoptions) + Me.pnldeskdoubleplus.Location = New System.Drawing.Point(134, 9) + Me.pnldeskdoubleplus.Name = "pnldeskdoubleplus" + Me.pnldeskdoubleplus.Size = New System.Drawing.Size(457, 292) + Me.pnldeskdoubleplus.TabIndex = 19 + ' + 'Panel2 + ' + Me.Panel2.Controls.Add(Me.desktopiconspreview) + Me.Panel2.Location = New System.Drawing.Point(5, 8) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(448, 166) + Me.Panel2.TabIndex = 1 + ' + 'desktopiconspreview + ' + Me.desktopiconspreview.Dock = System.Windows.Forms.DockStyle.Fill + Me.desktopiconspreview.Location = New System.Drawing.Point(0, 0) + Me.desktopiconspreview.Name = "desktopiconspreview" + Me.desktopiconspreview.Size = New System.Drawing.Size(448, 166) + Me.desktopiconspreview.TabIndex = 0 + Me.desktopiconspreview.UseCompatibleStateImageBehavior = False + ' + 'pnldppoptions + ' + Me.pnldppoptions.Controls.Add(Me.pnldppicons) + Me.pnldppoptions.Controls.Add(Me.pnldppfunctions) + Me.pnldppoptions.Controls.Add(Me.btndppfunctions) + Me.pnldppoptions.Controls.Add(Me.btndppappearance) + Me.pnldppoptions.Controls.Add(Me.btndppfiles) + Me.pnldppoptions.Controls.Add(Me.btndppicons) + Me.pnldppoptions.Location = New System.Drawing.Point(5, 176) + Me.pnldppoptions.Name = "pnldppoptions" + Me.pnldppoptions.Size = New System.Drawing.Size(446, 110) + Me.pnldppoptions.TabIndex = 0 + ' + 'pnldppicons + ' + Me.pnldppicons.Controls.Add(Me.Button1) + Me.pnldppicons.Controls.Add(Me.Label117) + Me.pnldppicons.Location = New System.Drawing.Point(89, 6) + Me.pnldppicons.Name = "pnldppicons" + Me.pnldppicons.Size = New System.Drawing.Size(352, 100) + Me.pnldppicons.TabIndex = 5 + ' + 'Button1 + ' + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(88, 6) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(29, 23) + Me.Button1.TabIndex = 1 + Me.Button1.UseVisualStyleBackColor = True + ' + 'Label117 + ' + Me.Label117.AutoSize = True + Me.Label117.Location = New System.Drawing.Point(7, 12) + Me.Label117.Name = "Label117" + Me.Label117.Size = New System.Drawing.Size(82, 13) + Me.Label117.TabIndex = 0 + Me.Label117.Text = "Icon Text Color:" + ' + 'pnldppfunctions + ' + Me.pnldppfunctions.Controls.Add(Me.CheckBox1) + Me.pnldppfunctions.Location = New System.Drawing.Point(89, 6) + Me.pnldppfunctions.Name = "pnldppfunctions" + Me.pnldppfunctions.Size = New System.Drawing.Size(352, 100) + Me.pnldppfunctions.TabIndex = 4 + ' + 'CheckBox1 + ' + Me.CheckBox1.AutoSize = True + Me.CheckBox1.Location = New System.Drawing.Point(7, 8) + Me.CheckBox1.Name = "CheckBox1" + Me.CheckBox1.Size = New System.Drawing.Size(122, 17) + Me.CheckBox1.TabIndex = 0 + Me.CheckBox1.Text = "Icons are Draggable" + Me.CheckBox1.UseVisualStyleBackColor = True + ' + 'btndppfunctions + ' + Me.btndppfunctions.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndppfunctions.Location = New System.Drawing.Point(7, 12) + Me.btndppfunctions.Name = "btndppfunctions" + Me.btndppfunctions.Size = New System.Drawing.Size(75, 23) + Me.btndppfunctions.TabIndex = 3 + Me.btndppfunctions.Text = "Functions" + Me.btndppfunctions.UseVisualStyleBackColor = True + ' + 'btndppappearance + ' + Me.btndppappearance.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndppappearance.Location = New System.Drawing.Point(7, 81) + Me.btndppappearance.Name = "btndppappearance" + Me.btndppappearance.Size = New System.Drawing.Size(75, 23) + Me.btndppappearance.TabIndex = 2 + Me.btndppappearance.Text = "Appearance" + Me.btndppappearance.UseVisualStyleBackColor = True + ' + 'btndppfiles + ' + Me.btndppfiles.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndppfiles.Location = New System.Drawing.Point(7, 58) + Me.btndppfiles.Name = "btndppfiles" + Me.btndppfiles.Size = New System.Drawing.Size(75, 23) + Me.btndppfiles.TabIndex = 1 + Me.btndppfiles.Text = "Files" + Me.btndppfiles.UseVisualStyleBackColor = True + ' + 'btndppicons + ' + Me.btndppicons.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btndppicons.Location = New System.Drawing.Point(7, 35) + Me.btndppicons.Name = "btndppicons" + Me.btndppicons.Size = New System.Drawing.Size(75, 23) + Me.btndppicons.TabIndex = 0 + Me.btndppicons.Text = "Icons" + Me.btndppicons.UseVisualStyleBackColor = True + ' + 'tmrfix + ' + Me.tmrfix.Interval = 5000 + ' + 'tmrdelay + ' + ' + 'Shifter + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(600, 339) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Shifter" + Me.Text = "Shifter" + Me.TopMost = True + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.catholder.ResumeLayout(False) + Me.pnlshifterintro.ResumeLayout(False) + Me.pnlshifterintro.PerformLayout() + Me.pnldesktopoptions.ResumeLayout(False) + Me.pnlapplauncheroptions.ResumeLayout(False) + Me.pnlapplauncheroptions.PerformLayout() + Me.pnllauncheritems.ResumeLayout(False) + Me.pnllauncheritems.PerformLayout() + Me.pnldesktoppreview.ResumeLayout(False) + Me.predesktoppanel.ResumeLayout(False) + Me.prepnlpanelbuttonholder.ResumeLayout(False) + Me.prepnlpanelbutton.ResumeLayout(False) + Me.prepnlpanelbutton.PerformLayout() + CType(Me.pretbicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pretimepanel.ResumeLayout(False) + Me.pretimepanel.PerformLayout() + Me.preapplaunchermenuholder.ResumeLayout(False) + Me.predesktopappmenu.ResumeLayout(False) + Me.predesktopappmenu.PerformLayout() + Me.pnlpanelbuttonsoptions.ResumeLayout(False) + Me.pnlpanelbuttonsoptions.PerformLayout() + Me.pnldesktoppaneloptions.ResumeLayout(False) + Me.pnldesktoppaneloptions.PerformLayout() + Me.pnldesktopintro.ResumeLayout(False) + Me.pnldesktopintro.PerformLayout() + Me.pnlpanelclockoptions.ResumeLayout(False) + Me.pnlpanelclockoptions.PerformLayout() + Me.pnldesktopbackgroundoptions.ResumeLayout(False) + Me.pnldesktopbackgroundoptions.PerformLayout() + Me.Panel10.ResumeLayout(False) + Me.pnlwindowsoptions.ResumeLayout(False) + Me.pnlbuttonoptions.ResumeLayout(False) + Me.pnlbuttonoptions.PerformLayout() + Me.pnlminimizebuttonoptions.ResumeLayout(False) + Me.pnlminimizebuttonoptions.PerformLayout() + Me.pnlrollupbuttonoptions.ResumeLayout(False) + Me.pnlrollupbuttonoptions.PerformLayout() + Me.pnlclosebuttonoptions.ResumeLayout(False) + Me.pnlclosebuttonoptions.PerformLayout() + Me.pnltitlebaroptions.ResumeLayout(False) + Me.pnltitlebaroptions.PerformLayout() + Me.pnlborderoptions.ResumeLayout(False) + Me.pnlborderoptions.PerformLayout() + Me.pnltitletextoptions.ResumeLayout(False) + Me.pnltitletextoptions.PerformLayout() + Me.pnlwindowsintro.ResumeLayout(False) + Me.pnlwindowsintro.PerformLayout() + Me.pnlwindowsobjects.ResumeLayout(False) + Me.pnlwindowpreview.ResumeLayout(False) + Me.prepgleft.ResumeLayout(False) + Me.prepgright.ResumeLayout(False) + Me.pretitlebar.ResumeLayout(False) + Me.pretitlebar.PerformLayout() + CType(Me.prepnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlreset.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.pnlshiftadvapplauncher.ResumeLayout(False) + Me.pnlshiftadvapplauncher.PerformLayout() + Me.Panel1.ResumeLayout(False) + Me.Panel1.PerformLayout() + CType(Me.nudusrsize, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnldeskdoubleplus.ResumeLayout(False) + Me.Panel2.ResumeLayout(False) + Me.pnldppoptions.ResumeLayout(False) + Me.pnldppicons.ResumeLayout(False) + Me.pnldppicons.PerformLayout() + Me.pnldppfunctions.ResumeLayout(False) + Me.pnldppfunctions.PerformLayout() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents ColorDialog1 As System.Windows.Forms.ColorDialog + Friend WithEvents clocktick As System.Windows.Forms.Timer + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents customizationtime As System.Windows.Forms.Timer + Friend WithEvents timerearned As System.Windows.Forms.Timer + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents btnapply As System.Windows.Forms.Button + Friend WithEvents catholder As System.Windows.Forms.Panel + Friend WithEvents btnreset As System.Windows.Forms.Button + Friend WithEvents btnprograms As System.Windows.Forms.Button + Friend WithEvents btnicons As System.Windows.Forms.Button + Friend WithEvents btnwindows As System.Windows.Forms.Button + Friend WithEvents btndesktop As System.Windows.Forms.Button + Friend WithEvents pnlshifterintro As System.Windows.Forms.Panel + Friend WithEvents Label66 As System.Windows.Forms.Label + Friend WithEvents Label65 As System.Windows.Forms.Label + Friend WithEvents Label64 As System.Windows.Forms.Label + Friend WithEvents Label63 As System.Windows.Forms.Label + Friend WithEvents pnldesktopoptions As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttonsoptions As System.Windows.Forms.Panel + Friend WithEvents pnlpanelbuttontextcolour As System.Windows.Forms.Panel + Friend WithEvents Label101 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttontexttop As System.Windows.Forms.TextBox + Friend WithEvents Label104 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttontextside As System.Windows.Forms.TextBox + Friend WithEvents Label106 As System.Windows.Forms.Label + Friend WithEvents Label93 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttontop As System.Windows.Forms.TextBox + Friend WithEvents Label94 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttoninitalgap As System.Windows.Forms.TextBox + Friend WithEvents Label108 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttonicontop As System.Windows.Forms.TextBox + Friend WithEvents Label110 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttoniconside As System.Windows.Forms.TextBox + Friend WithEvents Label112 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttoniconsize As System.Windows.Forms.TextBox + Friend WithEvents txtpanelbuttoniconheight As System.Windows.Forms.TextBox + Friend WithEvents Label105 As System.Windows.Forms.Label + Friend WithEvents cbpanelbuttontextstyle As System.Windows.Forms.ComboBox + Friend WithEvents cbpanelbuttonfont As System.Windows.Forms.ComboBox + Friend WithEvents Label100 As System.Windows.Forms.Label + Friend WithEvents txtpaneltextbuttonsize As System.Windows.Forms.TextBox + Friend WithEvents Label102 As System.Windows.Forms.Label + Friend WithEvents Label103 As System.Windows.Forms.Label + Friend WithEvents Label98 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttongap As System.Windows.Forms.TextBox + Friend WithEvents Label99 As System.Windows.Forms.Label + Friend WithEvents Label96 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttonheight As System.Windows.Forms.TextBox + Friend WithEvents Label97 As System.Windows.Forms.Label + Friend WithEvents Label92 As System.Windows.Forms.Label + Friend WithEvents txtpanelbuttonwidth As System.Windows.Forms.TextBox + Friend WithEvents Label91 As System.Windows.Forms.Label + Friend WithEvents pnlpanelbuttoncolour As System.Windows.Forms.Panel + Friend WithEvents Label95 As System.Windows.Forms.Label + Friend WithEvents pnldesktoppaneloptions As System.Windows.Forms.Panel + Friend WithEvents btnpanelbuttons As System.Windows.Forms.Button + Friend WithEvents Label27 As System.Windows.Forms.Label + Friend WithEvents combodesktoppanelposition As System.Windows.Forms.ComboBox + Friend WithEvents Label46 As System.Windows.Forms.Label + Friend WithEvents Label47 As System.Windows.Forms.Label + Friend WithEvents txtdesktoppanelheight As System.Windows.Forms.TextBox + Friend WithEvents Label48 As System.Windows.Forms.Label + Friend WithEvents pnldesktoppanelcolour As System.Windows.Forms.Panel + Friend WithEvents Label49 As System.Windows.Forms.Label + Friend WithEvents pnlapplauncheroptions As System.Windows.Forms.Panel + Friend WithEvents Label71 As System.Windows.Forms.Label + Friend WithEvents txtapplauncherwidth As System.Windows.Forms.TextBox + Friend WithEvents Label72 As System.Windows.Forms.Label + Friend WithEvents txtappbuttonlabel As System.Windows.Forms.TextBox + Friend WithEvents Label51 As System.Windows.Forms.Label + Friend WithEvents Label50 As System.Windows.Forms.Label + Friend WithEvents pnlmaintextcolour As System.Windows.Forms.Panel + Friend WithEvents comboappbuttontextstyle As System.Windows.Forms.ComboBox + Friend WithEvents comboappbuttontextfont As System.Windows.Forms.ComboBox + Friend WithEvents Label37 As System.Windows.Forms.Label + Friend WithEvents Label38 As System.Windows.Forms.Label + Friend WithEvents txtappbuttontextsize As System.Windows.Forms.TextBox + Friend WithEvents Label39 As System.Windows.Forms.Label + Friend WithEvents Label40 As System.Windows.Forms.Label + Friend WithEvents pnlmenuitemsmouseover As System.Windows.Forms.Panel + Friend WithEvents Label41 As System.Windows.Forms.Label + Friend WithEvents pnlmenuitemscolour As System.Windows.Forms.Panel + Friend WithEvents Label42 As System.Windows.Forms.Label + Friend WithEvents pnlmainbuttonactivated As System.Windows.Forms.Panel + Friend WithEvents Label28 As System.Windows.Forms.Label + Friend WithEvents Label35 As System.Windows.Forms.Label + Friend WithEvents txtapplicationsbuttonheight As System.Windows.Forms.TextBox + Friend WithEvents Label36 As System.Windows.Forms.Label + Friend WithEvents pnlmainbuttoncolour As System.Windows.Forms.Panel + Friend WithEvents Label43 As System.Windows.Forms.Label + Friend WithEvents pnldesktopintro As System.Windows.Forms.Panel + Friend WithEvents Label69 As System.Windows.Forms.Label + Friend WithEvents Label70 As System.Windows.Forms.Label + Friend WithEvents pnlpanelclockoptions As System.Windows.Forms.Panel + Friend WithEvents pnlclockbackgroundcolour As System.Windows.Forms.Panel + Friend WithEvents Label44 As System.Windows.Forms.Label + Friend WithEvents comboclocktextstyle As System.Windows.Forms.ComboBox + Friend WithEvents comboclocktextfont As System.Windows.Forms.ComboBox + Friend WithEvents Label26 As System.Windows.Forms.Label + Friend WithEvents Label29 As System.Windows.Forms.Label + Friend WithEvents txtclocktextfromtop As System.Windows.Forms.TextBox + Friend WithEvents Label30 As System.Windows.Forms.Label + Friend WithEvents Label31 As System.Windows.Forms.Label + Friend WithEvents txtclocktextsize As System.Windows.Forms.TextBox + Friend WithEvents Label32 As System.Windows.Forms.Label + Friend WithEvents Label33 As System.Windows.Forms.Label + Friend WithEvents pnlpanelclocktextcolour As System.Windows.Forms.Panel + Friend WithEvents Label34 As System.Windows.Forms.Label + Friend WithEvents pnldesktopbackgroundoptions As System.Windows.Forms.Panel + Friend WithEvents pnldesktopcolour As System.Windows.Forms.Panel + Friend WithEvents Label45 As System.Windows.Forms.Label + Friend WithEvents Panel10 As System.Windows.Forms.Panel + Friend WithEvents btndesktopitself As System.Windows.Forms.Button + Friend WithEvents btnpanelclock As System.Windows.Forms.Button + Friend WithEvents btnapplauncher As System.Windows.Forms.Button + Friend WithEvents btndesktoppanel As System.Windows.Forms.Button + Friend WithEvents pnldesktoppreview As System.Windows.Forms.Panel + Friend WithEvents predesktoppanel As System.Windows.Forms.Panel + Friend WithEvents prepnlpanelbuttonholder As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents prepnlpanelbutton As System.Windows.Forms.Panel + Friend WithEvents pretbicon As System.Windows.Forms.PictureBox + Friend WithEvents pretbctext As System.Windows.Forms.Label + Friend WithEvents pretimepanel As System.Windows.Forms.Panel + Friend WithEvents prepaneltimetext As System.Windows.Forms.Label + Friend WithEvents preapplaunchermenuholder As System.Windows.Forms.Panel + Friend WithEvents predesktopappmenu As System.Windows.Forms.MenuStrip + Friend WithEvents ApplicationsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents KnowledgeInputToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShiftoriumToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ClockToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TerminalToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShifterToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ShutdownToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents pnlwindowsoptions As System.Windows.Forms.Panel + Friend WithEvents pnlbuttonoptions As System.Windows.Forms.Panel + Friend WithEvents pnlminimizebuttonoptions As System.Windows.Forms.Panel + Friend WithEvents Label82 As System.Windows.Forms.Label + Friend WithEvents Label83 As System.Windows.Forms.Label + Friend WithEvents pnlminimizebuttoncolour As System.Windows.Forms.Panel + Friend WithEvents txtminimizebuttonside As System.Windows.Forms.TextBox + Friend WithEvents Label84 As System.Windows.Forms.Label + Friend WithEvents Label85 As System.Windows.Forms.Label + Friend WithEvents txtminimizebuttonheight As System.Windows.Forms.TextBox + Friend WithEvents Label86 As System.Windows.Forms.Label + Friend WithEvents Label87 As System.Windows.Forms.Label + Friend WithEvents txtminimizebuttontop As System.Windows.Forms.TextBox + Friend WithEvents Label88 As System.Windows.Forms.Label + Friend WithEvents Label89 As System.Windows.Forms.Label + Friend WithEvents txtminimizebuttonwidth As System.Windows.Forms.TextBox + Friend WithEvents Label90 As System.Windows.Forms.Label + Friend WithEvents pnlrollupbuttonoptions As System.Windows.Forms.Panel + Friend WithEvents Label54 As System.Windows.Forms.Label + Friend WithEvents Label55 As System.Windows.Forms.Label + Friend WithEvents pnlrollupbuttoncolour As System.Windows.Forms.Panel + Friend WithEvents txtrollupbuttonside As System.Windows.Forms.TextBox + Friend WithEvents Label56 As System.Windows.Forms.Label + Friend WithEvents Label57 As System.Windows.Forms.Label + Friend WithEvents txtrollupbuttonheight As System.Windows.Forms.TextBox + Friend WithEvents Label58 As System.Windows.Forms.Label + Friend WithEvents Label59 As System.Windows.Forms.Label + Friend WithEvents txtrollupbuttontop As System.Windows.Forms.TextBox + Friend WithEvents Label60 As System.Windows.Forms.Label + Friend WithEvents Label61 As System.Windows.Forms.Label + Friend WithEvents txtrollupbuttonwidth As System.Windows.Forms.TextBox + Friend WithEvents Label62 As System.Windows.Forms.Label + Friend WithEvents combobuttonoption As System.Windows.Forms.ComboBox + Friend WithEvents Label52 As System.Windows.Forms.Label + Friend WithEvents pnlclosebuttonoptions As System.Windows.Forms.Panel + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents pnlclosebuttoncolour As System.Windows.Forms.Panel + Friend WithEvents txtclosebuttonfromside As System.Windows.Forms.TextBox + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents Label12 As System.Windows.Forms.Label + Friend WithEvents txtclosebuttonheight As System.Windows.Forms.TextBox + Friend WithEvents Label13 As System.Windows.Forms.Label + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents txtclosebuttonfromtop As System.Windows.Forms.TextBox + Friend WithEvents Label10 As System.Windows.Forms.Label + Friend WithEvents Label14 As System.Windows.Forms.Label + Friend WithEvents txtclosebuttonwidth As System.Windows.Forms.TextBox + Friend WithEvents Label9 As System.Windows.Forms.Label + Friend WithEvents pnltitlebaroptions As System.Windows.Forms.Panel + Friend WithEvents Label80 As System.Windows.Forms.Label + Friend WithEvents txticonfromtop As System.Windows.Forms.TextBox + Friend WithEvents Label81 As System.Windows.Forms.Label + Friend WithEvents Label78 As System.Windows.Forms.Label + Friend WithEvents txticonfromside As System.Windows.Forms.TextBox + Friend WithEvents Label79 As System.Windows.Forms.Label + Friend WithEvents lbcornerwidthpx As System.Windows.Forms.Label + Friend WithEvents txttitlebarcornerwidth As System.Windows.Forms.TextBox + Friend WithEvents lbcornerwidth As System.Windows.Forms.Label + Friend WithEvents pnltitlebarrightcornercolour As System.Windows.Forms.Panel + Friend WithEvents pnltitlebarleftcornercolour As System.Windows.Forms.Panel + Friend WithEvents lbrightcornercolor As System.Windows.Forms.Label + Friend WithEvents lbleftcornercolor As System.Windows.Forms.Label + Friend WithEvents cboxtitlebarcorners As System.Windows.Forms.CheckBox + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents txttitlebarheight As System.Windows.Forms.TextBox + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents pnltitlebarcolour As System.Windows.Forms.Panel + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents pnlborderoptions As System.Windows.Forms.Panel + Friend WithEvents cbindividualbordercolours As System.Windows.Forms.CheckBox + Friend WithEvents pnlborderbottomrightcolour As System.Windows.Forms.Panel + Friend WithEvents Label77 As System.Windows.Forms.Label + Friend WithEvents pnlborderbottomcolour As System.Windows.Forms.Panel + Friend WithEvents Label76 As System.Windows.Forms.Label + Friend WithEvents pnlborderbottomleftcolour As System.Windows.Forms.Panel + Friend WithEvents Label75 As System.Windows.Forms.Label + Friend WithEvents pnlborderrightcolour As System.Windows.Forms.Panel + Friend WithEvents Label74 As System.Windows.Forms.Label + Friend WithEvents pnlborderleftcolour As System.Windows.Forms.Panel + Friend WithEvents Label73 As System.Windows.Forms.Label + Friend WithEvents Label15 As System.Windows.Forms.Label + Friend WithEvents pnlbordercolour As System.Windows.Forms.Panel + Friend WithEvents txtbordersize As System.Windows.Forms.TextBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label16 As System.Windows.Forms.Label + Friend WithEvents pnltitletextoptions As System.Windows.Forms.Panel + Friend WithEvents combotitletextposition As System.Windows.Forms.ComboBox + Friend WithEvents Label53 As System.Windows.Forms.Label + Friend WithEvents combotitletextstyle As System.Windows.Forms.ComboBox + Friend WithEvents combotitletextfont As System.Windows.Forms.ComboBox + Friend WithEvents Label23 As System.Windows.Forms.Label + Friend WithEvents Label17 As System.Windows.Forms.Label + Friend WithEvents txttitletextside As System.Windows.Forms.TextBox + Friend WithEvents Label18 As System.Windows.Forms.Label + Friend WithEvents Label19 As System.Windows.Forms.Label + Friend WithEvents txttitletexttop As System.Windows.Forms.TextBox + Friend WithEvents Label20 As System.Windows.Forms.Label + Friend WithEvents Label21 As System.Windows.Forms.Label + Friend WithEvents txttitletextsize As System.Windows.Forms.TextBox + Friend WithEvents Label22 As System.Windows.Forms.Label + Friend WithEvents Label24 As System.Windows.Forms.Label + Friend WithEvents pnltitletextcolour As System.Windows.Forms.Panel + Friend WithEvents Label25 As System.Windows.Forms.Label + Friend WithEvents pnlwindowsintro As System.Windows.Forms.Panel + Friend WithEvents Label68 As System.Windows.Forms.Label + Friend WithEvents Label67 As System.Windows.Forms.Label + Friend WithEvents pnlwindowsobjects As System.Windows.Forms.Panel + Friend WithEvents btnborders As System.Windows.Forms.Button + Friend WithEvents btnbuttons As System.Windows.Forms.Button + Friend WithEvents btntitletext As System.Windows.Forms.Button + Friend WithEvents btntitlebar As System.Windows.Forms.Button + Friend WithEvents pnlwindowpreview As System.Windows.Forms.Panel + Friend WithEvents prepgcontent As System.Windows.Forms.Panel + Friend WithEvents prepgbottom As System.Windows.Forms.Panel + Friend WithEvents prepgleft As System.Windows.Forms.Panel + Friend WithEvents prepgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents prepgright As System.Windows.Forms.Panel + Friend WithEvents prepgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pretitlebar As System.Windows.Forms.Panel + Friend WithEvents preminimizebutton As System.Windows.Forms.Panel + Friend WithEvents prepnlicon As System.Windows.Forms.PictureBox + Friend WithEvents prerollupbutton As System.Windows.Forms.Panel + Friend WithEvents preclosebutton As System.Windows.Forms.Panel + Friend WithEvents pretitletext As System.Windows.Forms.Label + Friend WithEvents prepgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents prepgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pnlreset As System.Windows.Forms.Panel + Friend WithEvents Label113 As System.Windows.Forms.Label + Friend WithEvents btnresetallsettings As System.Windows.Forms.Button + Friend WithEvents Label109 As System.Windows.Forms.Label + Friend WithEvents Label111 As System.Windows.Forms.Label + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents tmrfix As System.Windows.Forms.Timer + Friend WithEvents tmrdelay As System.Windows.Forms.Timer + Friend WithEvents pnllauncheritems As System.Windows.Forms.Panel + Friend WithEvents txtlauncheritemtxtsize As System.Windows.Forms.TextBox + Friend WithEvents Label107 As System.Windows.Forms.Label + Friend WithEvents btnshowlauncheritems As System.Windows.Forms.Button + Friend WithEvents launcheritemtxtcolour As System.Windows.Forms.Panel + Friend WithEvents Label116 As System.Windows.Forms.Label + Friend WithEvents launcheritemstyle As System.Windows.Forms.ComboBox + Friend WithEvents Label115 As System.Windows.Forms.Label + Friend WithEvents launcheritemfont As System.Windows.Forms.ComboBox + Friend WithEvents Label114 As System.Windows.Forms.Label + Friend WithEvents btndeskdoubleplus As System.Windows.Forms.Button + Friend WithEvents pnldeskdoubleplus As System.Windows.Forms.Panel + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents desktopiconspreview As System.Windows.Forms.ListView + Friend WithEvents pnldppoptions As System.Windows.Forms.Panel + Friend WithEvents pnldppfunctions As System.Windows.Forms.Panel + Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox + Friend WithEvents btndppfunctions As System.Windows.Forms.Button + Friend WithEvents btndppappearance As System.Windows.Forms.Button + Friend WithEvents btndppfiles As System.Windows.Forms.Button + Friend WithEvents btndppicons As System.Windows.Forms.Button + Friend WithEvents pnldppicons As System.Windows.Forms.Panel + Friend WithEvents Button1 As System.Windows.Forms.Button + Friend WithEvents Label117 As System.Windows.Forms.Label + Friend WithEvents Button2 As System.Windows.Forms.Button + Friend WithEvents pnlshiftadvapplauncher As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents btnaalpwrpnlbg As System.Windows.Forms.Button + Friend WithEvents Label124 As System.Windows.Forms.Label + Friend WithEvents btnaalusrpnlbg As System.Windows.Forms.Button + Friend WithEvents Label123 As System.Windows.Forms.Label + Friend WithEvents btnaalshutdowntextcolor As System.Windows.Forms.Button + Friend WithEvents Label122 As System.Windows.Forms.Label + Friend WithEvents cmbaalusrstyle As System.Windows.Forms.ComboBox + Friend WithEvents nudusrsize As System.Windows.Forms.NumericUpDown + Friend WithEvents cmbaalusrfont As System.Windows.Forms.ComboBox + Friend WithEvents Label121 As System.Windows.Forms.Label + Friend WithEvents btnaalusrtextcolor As System.Windows.Forms.Button + Friend WithEvents Label120 As System.Windows.Forms.Label + Friend WithEvents Label119 As System.Windows.Forms.Label + Friend WithEvents Button7 As System.Windows.Forms.Button + Friend WithEvents Button6 As System.Windows.Forms.Button + Friend WithEvents Button5 As System.Windows.Forms.Button + Friend WithEvents Button4 As System.Windows.Forms.Button + Friend WithEvents Button3 As System.Windows.Forms.Button + Friend WithEvents Label118 As System.Windows.Forms.Label +End Class diff --git a/ShiftOS/Shifter.resx b/ShiftOS/Shifter.resx new file mode 100644 index 0000000..d1df8e2 --- /dev/null +++ b/ShiftOS/Shifter.resx @@ -0,0 +1,169 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="ColorDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> + <metadata name="clocktick.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>582, 17</value> + </metadata> + <metadata name="customizationtime.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>845, 17</value> + </metadata> + <metadata name="timerearned.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>997, 17</value> + </metadata> + <data name="Label66.Text" xml:space="preserve"> + <value>That's right! Simply by customizing your ShiftOS interface you can earn as many codepoints as you like. The amount of codepoints you earn will be calculated and displayed the moment you press "Apply Changes". The more time you spend customizing the more codepoints you will earn! +</value> + </data> + <data name="Label64.Text" xml:space="preserve"> + <value>The shifter is an application that allows you to modify various features in ShiftOS. Initially the user interface of ShiftOS is very dull however you can use the Shifter and various sub programs within the Shifter such as the "Colour Picker" to improve the appearance of ShiftOS. + +The basic process of modifying your ShiftOS interface is very simple. You first choose a main category on the left which will bring up a list of sub categories. Next select a sub category to display your list of customization options. Once you have modified the appropriate settings click Apply Changes to confirm your choices. +</value> + </data> + <metadata name="predesktopappmenu.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>680, 17</value> + </metadata> + <data name="Label69.Text" xml:space="preserve"> + <value>Welcome to the desktop settings panel. Here you can modify the appearance of the controls that are displayed on your desktop. Just select a sub option to the left to get started! + +The preview desktop above will track your modifications live until you click "Apply Changes".</value> + </data> + <data name="Label68.Text" xml:space="preserve"> + <value>Welcome to the windows settings panel. Here you can modify the appearance of the controls that are displayed on your open windows. Just select a sub option to the left to get started! + +The preview window above will track your modifications live until you click "Apply Changes".</value> + </data> + <data name="Label109.Text" xml:space="preserve"> + <value>After spending hours customizing ShiftOS you may want to reset all settings to their default values so you can have a clean slate. Remember that once you reset your settings you can't undo your actions so only do so if you truly want to abandon all the customizations you have made to ShiftOS. + +</value> + </data> + <data name="Label119.Text" xml:space="preserve"> + <value>Welcome to the Advanced App Launcher Settings! Here, you can customize your Advanced App Launcher to look anyway you like! Be creative! Use the buttons at the bottom to cycle through the different options, and when you're done, click "Apply Changes"!</value> + </data> + <metadata name="tmrfix.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1115, 17</value> + </metadata> + <metadata name="tmrdelay.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>131, 45</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Shifter.vb b/ShiftOS/Shifter.vb new file mode 100644 index 0000000..dcf1092 --- /dev/null +++ b/ShiftOS/Shifter.vb @@ -0,0 +1,3262 @@ +Public Class Shifter + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + Public ShiftOSPath As String = "C:\ShiftOS" + + Public skinlines(200) As String + + Public titlebarcolour As Color + Public windowbordercolour As Color + Public windowbordersize As Integer + Public titlebarheight As Integer + Public closebuttoncolour As Color + Public closebuttonheight As Integer + Public closebuttonwidth As Integer + Public closebuttonside As Integer + Public closebuttontop As Integer + Public titletextcolour As Color + Public titletexttop As Integer + Public titletextside As Integer + Public titletextsize As Integer + Public titletextfont As String + Public titletextstyle As FontStyle + Public desktoppanelcolour As Color + Public desktopbackgroundcolour As Color + Public desktoppanelheight As Integer + Public desktoppanelposition As String + Public clocktextcolour As Color + Public clockbackgroundcolor As Color + Public panelclocktexttop As Integer + Public panelclocktextsize As Integer + Public panelclocktextfont As String + Public panelclocktextstyle As FontStyle + Public applauncherbuttoncolour As Color + Public applauncherbuttonclickedcolour As Color + Public applauncherbackgroundcolour As Color + Public applaunchermouseovercolour As Color + Public applicationsbuttontextcolour As Color + Public applicationbuttonheight As Integer + Public applicationbuttontextsize As Integer + Public applicationbuttontextfont As String + Public applicationbuttontextstyle As FontStyle + Public applicationlaunchername As String + Public titletextposition As String + Public rollupbuttoncolour As Color + Public rollupbuttonheight As Integer + Public rollupbuttonwidth As Integer + Public rollupbuttonside As Integer + Public rollupbuttontop As Integer + Public titlebariconside As Integer + Public titlebaricontop As Integer + Public showwindowcorners As Boolean + Public titlebarcornerwidth As Integer + Public titlebarrightcornercolour As Color + Public titlebarleftcornercolour As Color + Public applaunchermenuholderwidth As Integer = 100 + Public windowborderleftcolour As Color + Public windowborderrightcolour As Color + Public windowborderbottomcolour As Color + Public windowborderbottomrightcolour As Color + Public windowborderbottomleftcolour As Color + Public panelbuttonicontop As Integer + Public panelbuttoniconside As Integer + Public panelbuttoniconsize As Integer + Public panelbuttonheight As Integer + Public panelbuttonwidth As Integer + Public panelbuttoncolour As Color + Public panelbuttontextcolour As Color + Public panelbuttontextsize As Integer + Public panelbuttontextfont As String + Public panelbuttontextstyle As FontStyle + Public panelbuttontextside As Integer + Public panelbuttontexttop As Integer + Public panelbuttongap As Integer + Public panelbuttonfromtop As Integer + Public panelbuttoninitialgap As Integer + Public minimizebuttoncolour As Color + Public minimizebuttonheight As Integer + Public minimizebuttonwidth As Integer + Public minimizebuttonside As Integer + Public minimizebuttontop As Integer + Public icontextcolor As Color + + 'skins + Public shifterskinimages(100) As String + Public skinclosebutton(2) As Image + Public skinclosebuttonstyle As ImageLayout + Public shifterskintitlebar(2) As Image + Public skintitlebarstyle As ImageLayout + Public skindesktopbackground(2) As Image + Public skindesktopbackgroundstyle As ImageLayout + Public skinrollupbutton(2) As Image + Public skinrollupbuttonstyle As ImageLayout + Public skintitlebarrightcorner(2) As Image + Public skintitlebarrightcornerstyle As ImageLayout = ImageLayout.Stretch + Public skintitlebarleftcorner(2) As Image + Public skintitlebarleftcornerstyle As ImageLayout = ImageLayout.Stretch + Public skindesktoppanel(2) As Image + Public skindesktoppanelstyle As ImageLayout = ImageLayout.Stretch + Public skindesktoppaneltime(2) As Image + Public skindesktoppaneltimestyle As ImageLayout = ImageLayout.Stretch + Public skinapplauncherbutton(2) As Image + Public skinapplauncherbuttonstyle As ImageLayout = ImageLayout.Stretch + Public skinwindowborderleft(2) As Image + Public skinwindowborderleftstyle As ImageLayout = ImageLayout.Stretch + Public skinwindowborderright(2) As Image + Public skinwindowborderrightstyle As ImageLayout = ImageLayout.Stretch + Public skinwindowborderbottom(2) As Image + Public skinwindowborderbottomstyle As ImageLayout = ImageLayout.Stretch + Public skinwindowborderbottomright(2) As Image + Public skinwindowborderbottomrightstyle As ImageLayout = ImageLayout.Stretch + Public skinwindowborderbottomleft(2) As Image + Public skinwindowborderbottomleftstyle As ImageLayout = ImageLayout.Stretch + Public skinpanelbutton(2) As Image + Public skinpanelbuttonstyle As ImageLayout = ImageLayout.Stretch + Public skinminimizebutton(2) As Image + Public skinminimizebuttonstyle As ImageLayout = ImageLayout.Stretch + Public skinuserpanel(2) As Image + Public skinshutdownbutton(2) As Image + + Public customizationtimepoints As Integer + Public customizationsdone As Integer + Public customizationpointsearned As Integer + Dim bmp As Bitmap + + 'DevX's ADV. App Launcher + + Public startWidth As Integer = Skins.startWidth + Public startHeight As Integer = Skins.startHeight + Public usernametextcolor As Color = Skins.usernametextcolor + Public shutdowntextcolor As Color = Skins.shutdownTextColor + Public usernamebgcolor As Color = Skins.userNamePanelBackgroundColor + Public powerpanelbgcolor As Color = Skins.powerPanelBackgroundColor + Public powerpanelbgimage As Image = Skins.powerPanelBackgroundImage + Public usernamebgimage As Image = Skins.userNamePanelBackground + Public usernamefont As String = Skins.usernamefont + Public usernamefontsize As Integer = Skins.usernamefontsize + Public usernamefontstyle As FontStyle = Skins.usernamefontstyle + Public ShutDownString As String = Skins.shutdownstring + Public powerpanelfont As String = Skins.shutdownTextFont + Public powerpanelfontsize As Integer = Skins.shutdownTextSize + Public powerpanelfontstyle As FontStyle = Skins.shutdownTextStyle + Public usrbglayout As ImageLayout = Skins.usrPanelBackgroundLayout + Public pwrbglayout As ImageLayout = Skins.pwrPanelBackgroundLayout + + + + +#Region "Template Code" + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + 'ShiftOSDesktop.setcolours() + setupbuttons() + initialsetup() + determinevisibleobjects() + AddFonts() + If ShiftOSDesktop.ShifterCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + setuppreshifterstuff() + + ShiftOSDesktop.pnlpanelbuttonshifter.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshifter, ShiftOSDesktop.tbshiftericon, ShiftOSDesktop.tbshiftertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + 'Display the shifter intro + pnlshifterintro.Location = New Point(133, 6) + pnlshifterintro.Size = New Size(458, 297) + pnlshifterintro.Show() + pnlshifterintro.BringToFront() + + 'Display window intro + pnlwindowsintro.Show() + pnlwindowsintro.Size = New Size(317, 134) + pnlwindowsintro.Location = New Point(136, 159) + pnlwindowsintro.BringToFront() + + 'Display desktop intro + pnldesktopintro.Show() + pnldesktopintro.Size = New Size(317, 134) + pnldesktopintro.Location = New Point(136, 159) + pnldesktopintro.BringToFront() + + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Public Sub loadclone() + setuptitlebar() + setupborders() + 'ShiftOSDesktop.setcolours() + setskin() + setupbuttons() + initialsetup() + determinevisibleobjects() + setuppreshifterstuff() + AddFonts() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + 'End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(600, 339) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.shiftername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftericon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.shiftericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub +#End Region + + + Private Sub initialsetup() + titlebarcolour = Skins.titlebarcolour + windowbordercolour = Skins.borderbottomcolour + windowbordersize = Skins.borderwidth + titlebarheight = Skins.titlebarheight + closebuttoncolour = Skins.closebtncolour + closebuttonheight = Skins.closebtnsize.Height + closebuttonwidth = Skins.closebtnsize.Width + closebuttontop = Skins.closebtnfromtop + closebuttonside = Skins.closebtnfromside + titletextcolour = Skins.titletextcolour + titletexttop = Skins.titletextfromtop + titletextside = Skins.titletextfromside + titletextsize = Skins.titletextfontsize + titletextfont = Skins.titletextfontfamily + titletextstyle = Skins.titletextfontstyle + desktoppanelcolour = Skins.desktoppanelcolour + desktopbackgroundcolour = Skins.desktopbackgroundcolour + desktoppanelheight = Skins.desktoppanelheight + desktoppanelposition = Skins.desktoppanelposition + clocktextcolour = Skins.clocktextcolour + clockbackgroundcolor = Skins.clockbackgroundcolor + panelclocktexttop = Skins.panelclocktexttop + panelclocktextsize = Skins.panelclocktextsize + panelclocktextfont = Skins.panelclocktextfont + panelclocktextstyle = Skins.panelclocktextstyle + applauncherbuttoncolour = Skins.applauncherbuttoncolour + applauncherbuttonclickedcolour = Skins.applauncherbuttonclickedcolour + applauncherbackgroundcolour = Skins.applauncherbackgroundcolour + applaunchermouseovercolour = Skins.applaunchermouseovercolour + applicationsbuttontextcolour = Skins.applicationsbuttontextcolour + applicationbuttonheight = Skins.applicationbuttonheight + applicationbuttontextsize = Skins.applicationbuttontextsize + applicationbuttontextfont = Skins.applicationbuttontextfont + applicationbuttontextstyle = Skins.applicationbuttontextstyle + applicationlaunchername = Skins.applicationlaunchername + titletextposition = Skins.titletextposition + rollupbuttoncolour = Skins.rollbtncolour + rollupbuttonheight = Skins.rollbtnsize.Height + rollupbuttonwidth = Skins.rollbtnsize.Width + rollupbuttonside = Skins.rollbtnfromside + rollupbuttontop = Skins.rollbtnfromtop + titlebariconside = Skins.titleiconfromside + titlebaricontop = Skins.titleiconfromtop + titlebarcornerwidth = Skins.titlebarcornerwidth + titlebarrightcornercolour = Skins.rightcornercolour + titlebarleftcornercolour = Skins.leftcornercolour + showwindowcorners = Skins.enablecorners + applaunchermenuholderwidth = Skins.applaunchermenuholderwidth + windowborderleftcolour = Skins.borderleftcolour + windowborderrightcolour = Skins.borderrightcolour + windowborderbottomcolour = Skins.borderbottomcolour + windowborderbottomrightcolour = Skins.bottomrightcornercolour + windowborderbottomleftcolour = Skins.bottomleftcornercolour + panelbuttonicontop = Skins.panelbuttonicontop + panelbuttoniconside = Skins.panelbuttoniconside + panelbuttoniconsize = Skins.panelbuttoniconsize + panelbuttoniconsize = Skins.panelbuttoniconsize + panelbuttonheight = Skins.panelbuttonheight + panelbuttonwidth = Skins.panelbuttonwidth + panelbuttoncolour = Skins.panelbuttoncolour + panelbuttontextcolour = Skins.panelbuttontextcolour + panelbuttontextsize = Skins.panelbuttontextsize + panelbuttontextfont = Skins.panelbuttontextfont + panelbuttontextstyle = Skins.panelbuttontextstyle + panelbuttontextside = Skins.panelbuttontextside + panelbuttontexttop = Skins.panelbuttontexttop + panelbuttongap = Skins.panelbuttongap + panelbuttonfromtop = Skins.panelbuttonfromtop + panelbuttoninitialgap = Skins.panelbuttoninitialgap + minimizebuttoncolour = Skins.minbtncolour + minimizebuttonheight = Skins.minbtnsize.Height + minimizebuttonwidth = Skins.minbtnsize.Width + minimizebuttonside = Skins.minbtnfromside + minimizebuttontop = Skins.minbtnfromtop + txtlauncheritemtxtsize.Text = Skins.launcheritemsize + launcheritemtxtcolour.BackColor = Skins.launcheritemcolour + launcheritemfont.Text = Skins.launcheritemfont + icontextcolor = Skins.icontextcolor + + skinuserpanel(0) = userNamePanelBackground + skinshutdownbutton(0) = powerpanelbgimage + + 'Uncomment when I (The Ultimate Hacker) have gotten the Shiftnet Download for + 'Desktop++ Done: + + 'If ShiftOSDesktop.boughtdesktopicons = True Then + ' btndeskdoubleplus.Visible = True + 'End If + + desktopiconspreview.BackColor = Skins.desktopbackgroundcolour + If Skins.desktopbackground Is Nothing Then desktopiconspreview.BackgroundImage = Nothing Else desktopiconspreview.BackgroundImage = Skins.desktopbackground + desktopiconspreview.BackgroundImageLayout = Skins.desktopbackgroundlayout + desktopiconspreview.ForeColor = Skins.icontextcolor + CheckBox1.Checked = Skins.enabledraggableicons + refreshIcons() + + 'Adv. App Launcher Setup Code + + Dim fStyleForAAL As String 'Just for simplicity, ignore. + cmbaalusrfont.Text = usernamefont + Select Case usernamefontstyle + Case FontStyle.Regular + fStyleForAAL = "Regular" + Case FontStyle.Bold + fStyleForAAL = "Bold" + Case FontStyle.Italic + fStyleForAAL = "Italic" + Case FontStyle.Underline + fStyleForAAL = "Underline" + Case Else + fStyleForAAL = "Regular" + End Select + cmbaalusrstyle.Text = fStyleForAAL + nudusrsize.Value = usernamefontsize + btnaalpwrpnlbg.BackColor = powerpanelbgcolor + If powerpanelbgimage Is Nothing Then btnaalpwrpnlbg.BackgroundImage = Nothing Else btnaalpwrpnlbg.BackgroundImage = powerpanelbgimage + btnaalpwrpnlbg.BackgroundImageLayout = pwrbglayout + btnaalusrpnlbg.BackColor = usernamebgcolor + If usernamebgimage Is Nothing Then btnaalusrpnlbg.BackgroundImage = Nothing Else btnaalusrpnlbg.BackgroundImage = usernamebgimage + btnaalusrpnlbg.BackgroundImageLayout = usrbglayout + + + + + + + 'skins + 'Array.Copy(ShiftOSDesktop.skinimages, shifterskinimages, shifterskinimages.Length) + + If Skins.closebtn Is Nothing Then Else skinclosebutton(0) = Skins.closebtn.Clone + If Skins.closebtnhover Is Nothing Then Else skinclosebutton(1) = Skins.closebtnhover.Clone + If Skins.closebtnclick Is Nothing Then Else skinclosebutton(2) = Skins.closebtnclick.Clone + skinclosebuttonstyle = Skins.closebtnlayout + + If Skins.titlebar Is Nothing Then Else shifterskintitlebar(0) = Skins.titlebar.Clone + ' Are we really doing states for the titlebar? + 'If ShiftOSDesktop.skintitlebar(1) Is Nothing Then Else shifterskintitlebar(1) = ShiftOSDesktop.skintitlebar(1).Clone + 'If ShiftOSDesktop.skintitlebar(2) Is Nothing Then Else shifterskintitlebar(2) = ShiftOSDesktop.skintitlebar(2).Clone + skintitlebarstyle = Skins.titlebarlayout + + If Skins.desktopbackground Is Nothing Then Else skindesktopbackground(0) = Skins.desktopbackground.Clone + 'If ShiftOSDesktop.skindesktopbackground(1) Is Nothing Then Else skindesktopbackground(1) = ShiftOSDesktop.skindesktopbackground(1).Clone + 'If ShiftOSDesktop.skindesktopbackground(2) Is Nothing Then Else skindesktopbackground(2) = ShiftOSDesktop.skindesktopbackground(2).Clone + skindesktopbackgroundstyle = Skins.desktopbackgroundlayout + + If Skins.rollbtn Is Nothing Then Else skinrollupbutton(0) = Skins.rollbtn.Clone + If Skins.rollbtnhover Is Nothing Then Else skinrollupbutton(1) = rollbtnhover.Clone + If Skins.rollbtnclick Is Nothing Then Else skinrollupbutton(2) = rollbtnclick.Clone + skinrollupbuttonstyle = Skins.rollbtnlayout + + If Skins.rightcorner Is Nothing Then Else skintitlebarrightcorner(0) = Skins.rightcorner.Clone + 'If ShiftOSDesktop.skintitlebarrightcorner(1) Is Nothing Then Else skintitlebarrightcorner(1) = ShiftOSDesktop.skintitlebarrightcorner(1).Clone + 'If ShiftOSDesktop.skintitlebarrightcorner(2) Is Nothing Then Else skintitlebarrightcorner(2) = ShiftOSDesktop.skintitlebarrightcorner(2).Clone + skintitlebarrightcornerstyle = Skins.rightcornerlayout + + If Skins.leftcorner Is Nothing Then Else skintitlebarleftcorner(0) = Skins.leftcorner.Clone + 'If ShiftOSDesktop.skintitlebarleftcorner(1) Is Nothing Then Else skintitlebarleftcorner(1) = ShiftOSDesktop.skintitlebarleftcorner(1).Clone + 'If ShiftOSDesktop.skintitlebarleftcorner(2) Is Nothing Then Else skintitlebarleftcorner(2) = ShiftOSDesktop.skintitlebarleftcorner(2).Clone + skintitlebarleftcornerstyle = Skins.leftcornerlayout + + If Skins.desktoppanel Is Nothing Then Else skindesktoppanel(0) = Skins.desktoppanel.Clone + 'If ShiftOSDesktop.skindesktoppanel(1) Is Nothing Then Else skindesktoppanel(1) = ShiftOSDesktop.skindesktoppanel(1).Clone + 'If ShiftOSDesktop.skindesktoppanel(2) Is Nothing Then Else skindesktoppanel(2) = ShiftOSDesktop.skindesktoppanel(2).Clone + skindesktoppanelstyle = Skins.desktoppanellayout + + If Skins.panelclock Is Nothing Then Else skindesktoppaneltime(0) = Skins.panelclock.Clone + 'If ShiftOSDesktop.skindesktoppaneltime(1) Is Nothing Then Else skindesktoppaneltime(1) = ShiftOSDesktop.skindesktoppaneltime(1).Clone + 'If ShiftOSDesktop.skindesktoppaneltime(2) Is Nothing Then Else skindesktoppaneltime(2) = ShiftOSDesktop.skindesktoppaneltime(2).Clone + skindesktoppaneltimestyle = Skins.panelclocklayout + + If Skins.applauncher Is Nothing Then Else skinapplauncherbutton(0) = Skins.applauncher.Clone + If Skins.applaunchermouseover Is Nothing Then Else skinapplauncherbutton(1) = Skins.applaunchermouseover.Clone + If Skins.applauncherclick Is Nothing Then Else skinapplauncherbutton(2) = Skins.applauncherclick.Clone + skinapplauncherbuttonstyle = Skins.applauncherlayout + + If Skins.borderleft Is Nothing Then Else skinwindowborderleft(0) = Skins.borderleft.Clone + 'If ShiftOSDesktop.skinwindowborderleft(1) Is Nothing Then Else skinwindowborderleft(1) = ShiftOSDesktop.skinwindowborderleft(1).Clone + 'If ShiftOSDesktop.skinwindowborderleft(2) Is Nothing Then Else skinwindowborderleft(2) = ShiftOSDesktop.skinwindowborderleft(2).Clone + skinwindowborderleftstyle = Skins.borderleftlayout + + If Skins.borderright Is Nothing Then Else skinwindowborderright(0) = Skins.borderright.Clone + 'If ShiftOSDesktop.skinwindowborderright(1) Is Nothing Then Else skinwindowborderright(1) = ShiftOSDesktop.skinwindowborderright(1).Clone + 'If ShiftOSDesktop.skinwindowborderright(2) Is Nothing Then Else skinwindowborderright(2) = ShiftOSDesktop.skinwindowborderright(2).Clone + skinwindowborderrightstyle = Skins.borderrightlayout + + If Skins.borderbottom Is Nothing Then Else skinwindowborderbottom(0) = Skins.borderbottom.Clone + 'If ShiftOSDesktop.skinwindowborderbottom(1) Is Nothing Then Else skinwindowborderbottom(1) = ShiftOSDesktop.skinwindowborderbottom(1).Clone + 'If ShiftOSDesktop.skinwindowborderbottom(2) Is Nothing Then Else skinwindowborderbottom(2) = ShiftOSDesktop.skinwindowborderbottom(2).Clone + skinwindowborderbottomstyle = Skins.borderbottomlayout + + If Skins.bottomrightcorner Is Nothing Then Else skinwindowborderbottomright(0) = Skins.bottomrightcorner + 'If ShiftOSDesktop.skinwindowborderbottomright(1) Is Nothing Then Else skinwindowborderbottomright(1) = ShiftOSDesktop.skinwindowborderbottomright(1).Clone + 'If ShiftOSDesktop.skinwindowborderbottomright(2) Is Nothing Then Else skinwindowborderbottomright(2) = ShiftOSDesktop.skinwindowborderbottomright(2).Clone + skinwindowborderbottomrightstyle = Skins.bottomrightcornerlayout + + If Skins.bottomleftcorner Is Nothing Then Else skinwindowborderbottomleft(0) = Skins.bottomleftcorner + 'If ShiftOSDesktop.skinwindowborderbottomleft(1) Is Nothing Then Else skinwindowborderbottomleft(1) = ShiftOSDesktop.skinwindowborderbottomleft(1).Clone + 'If ShiftOSDesktop.skinwindowborderbottomleft(2) Is Nothing Then Else skinwindowborderbottomleft(2) = ShiftOSDesktop.skinwindowborderbottomleft(2).Clone + skinwindowborderbottomleftstyle = Skins.bottomleftcornerlayout + + If Skins.panelbutton Is Nothing Then Else skinpanelbutton(0) = Skins.panelbutton.Clone + 'If ShiftOSDesktop.skinpanelbutton(1) Is Nothing Then Else skinpanelbutton(1) = ShiftOSDesktop.skinpanelbutton(1).Clone + 'If ShiftOSDesktop.skinpanelbutton(2) Is Nothing Then Else skinpanelbutton(2) = ShiftOSDesktop.skinpanelbutton(2).Clone + skinpanelbuttonstyle = Skins.panelbuttonlayout + + If Skins.minbtn Is Nothing Then Else skinminimizebutton(0) = Skins.minbtn.Clone + If Skins.minbtnhover Is Nothing Then Else skinminimizebutton(1) = Skins.minbtnhover.Clone + If Skins.minbtnclick Is Nothing Then Else skinminimizebutton(2) = Skins.minbtnclick.Clone + skinminimizebuttonstyle = Skins.minbtnlayout + + Select Case Skins.launcheritemstyle + Case FontStyle.Bold + launcheritemstyle.Text = "Bold" + Case FontStyle.Italic + launcheritemstyle.Text = "Italic" + Case FontStyle.Regular + launcheritemstyle.Text = "Regular" + Case FontStyle.Strikeout + launcheritemstyle.Text = "Strikeout" + Case FontStyle.Underline + launcheritemstyle.Text = "Underline" + End Select + + End Sub + + Public Sub determinevisibleobjects() + If ShiftOSDesktop.boughttitlebar = True Then pretitlebar.Show() Else pretitlebar.Hide() + If ShiftOSDesktop.boughtwindowborders = True Then + prepgright.Show() + prepgleft.Show() + prepgbottom.Show() + Else + prepgright.Hide() + prepgleft.Hide() + prepgbottom.Hide() + End If + If ShiftOSDesktop.boughtclosebutton = True Then preclosebutton.Show() Else preclosebutton.Hide() + If ShiftOSDesktop.boughttitletext = True Then pretitletext.Show() Else pretitletext.Hide() + If ShiftOSDesktop.boughtdesktoppanel = True Then predesktoppanel.Show() Else predesktoppanel.Hide() + If ShiftOSDesktop.boughtdesktoppanelclock = True Then prepaneltimetext.Show() Else prepaneltimetext.Hide() + If ShiftOSDesktop.boughtapplaunchermenu = True Then preapplaunchermenuholder.Show() Else preapplaunchermenuholder.Hide() + If ShiftOSDesktop.boughtrollupbutton = True Then prerollupbutton.Show() Else prerollupbutton.Hide() + If ShiftOSDesktop.boughtknowledgeinputicon = True Then prepnlicon.Show() Else prepnlicon.Hide() + If ShiftOSDesktop.boughtpanelbuttons = True Then prepnlpanelbutton.Show() Else prepnlpanelbutton.Hide() + If ShiftOSDesktop.boughtminimizebutton = True Then preminimizebutton.Show() Else preminimizebutton.Hide() + End Sub + + Public Sub setupbuttons() + If ShiftOSDesktop.boughttitlebar = True Then + btntitlebar.Text = "Title Bar" + Else + btntitlebar.Text = "???" + End If + If ShiftOSDesktop.boughttitletext = True Then + btntitletext.Text = "Title Text" + Else + btntitletext.Text = "???" + End If + If ShiftOSDesktop.boughtclosebutton = True OrElse ShiftOSDesktop.boughtrollupbutton = True Then + btnbuttons.Text = "Buttons" + combobuttonoption.Items.Clear() + If ShiftOSDesktop.boughtclosebutton = True Then combobuttonoption.Items.Add("Close Button") + If ShiftOSDesktop.boughtrollupbutton = True Then combobuttonoption.Items.Add("Roll Up Button") + If ShiftOSDesktop.boughtminimizebutton = True Then combobuttonoption.Items.Add("Minimize Button") + Else + btnbuttons.Text = "???" + End If + If ShiftOSDesktop.boughtwindowborders = True Then + btnborders.Text = "Borders" + Else + btnborders.Text = "???" + End If + If ShiftOSDesktop.boughtdesktoppanel = True Then + btndesktoppanel.Text = "Desktop Panel" + Else + btndesktoppanel.Text = "???" + End If + If ShiftOSDesktop.boughtapplaunchermenu = True Then + btnapplauncher.Text = "App Launcher" + Else + btnapplauncher.Text = "???" + End If + If ShiftOSDesktop.boughtdesktoppanelclock = True Then + btnpanelclock.Text = "Panel Clock" + Else + btnpanelclock.Text = "???" + End If + If ShiftOSDesktop.boughtpanelbuttons = True Then + btnpanelbuttons.Show() + Else + btnpanelbuttons.Hide() + End If + If ShiftOSDesktop.boughtknowledgeinputicon Then + Label78.Show() + Label79.Show() + Label80.Show() + Label81.Show() + txticonfromside.Show() + txticonfromtop.Show() + Else + Label78.Hide() + Label79.Hide() + Label80.Hide() + Label81.Hide() + txticonfromside.Hide() + txticonfromtop.Hide() + End If + cbindividualbordercolours.Checked = Skins.enablebordercorners + End Sub + + Public Sub setuppreshifterstuff() + pretitlebar.BackColor = titlebarcolour + prepgtoplcorner.BackColor = titlebarcolour + prepgtoprcorner.BackColor = titlebarcolour + prepgleft.BackColor = windowborderleftcolour + prepgright.BackColor = windowborderrightcolour + prepgbottom.BackColor = windowborderbottomcolour + prepgbottomlcorner.BackColor = windowborderbottomleftcolour + prepgbottomrcorner.BackColor = windowborderbottomrightcolour + pretitlebar.Height = titlebarheight + preclosebutton.BackColor = closebuttoncolour + preclosebutton.Height = closebuttonheight + preclosebutton.Width = closebuttonwidth + prepgleft.Width = windowbordersize + prepgright.Width = windowbordersize + prepgbottom.Height = windowbordersize + preminimizebutton.BackColor = minimizebuttoncolour + preminimizebutton.Height = minimizebuttonheight + preminimizebutton.Width = minimizebuttonwidth + Select Case titletextposition + Case "Left" + pretitletext.Location = New Point(titletextside, titletexttop) + Case "Centre" + pretitletext.Location = New Point((pretitlebar.Width / 2) - pretitletext.Width / 2, titletexttop) + End Select + pretitletext.ForeColor = titletextcolour + + On Error Resume Next + pretitletext.Font = New Font(titletextfont, titletextsize, titletextstyle) + + pnldesktoppreview.BackColor = desktopbackgroundcolour + predesktoppanel.Height = desktoppanelheight + setclocktime() + prepaneltimetext.ForeColor = clocktextcolour + pretimepanel.BackColor = clockbackgroundcolor + prepaneltimetext.Font = New Font(panelclocktextfont, panelclocktextsize, panelclocktextstyle) + prepaneltimetext.Location = New Point() + pretimepanel.Size = New Size(prepaneltimetext.Width + 3, pretimepanel.Height) + prepaneltimetext.Location = New Point(0, panelclocktexttop) + ApplicationsToolStripMenuItem.Text = applicationlaunchername + ApplicationsToolStripMenuItem.Font = New Font(applicationbuttontextfont, applicationbuttontextsize, applicationbuttontextstyle) + preapplaunchermenuholder.Size = ApplicationsToolStripMenuItem.Size + ToolStripManager.Renderer = New MyPreviewToolStripRenderer() + 'ShiftOSDesktop.ApplicationsToolStripMenuItem.BackColor = ShiftOSDesktop.applauncherbuttoncolour + ApplicationsToolStripMenuItem.BackColor = Color.Transparent + ApplicationsToolStripMenuItem.ForeColor = applicationsbuttontextcolour + preapplaunchermenuholder.Height = applicationbuttonheight + predesktopappmenu.Height = applicationbuttonheight + ApplicationsToolStripMenuItem.Height = applicationbuttonheight + prerollupbutton.BackColor = rollupbuttoncolour + prerollupbutton.Height = rollupbuttonheight + prerollupbutton.Width = rollupbuttonwidth + predesktoppanel.BackColor = desktoppanelcolour + pnldesktoppreview.BackColor = desktopbackgroundcolour + prepnlicon.Location = New Point(titlebariconside, titlebaricontop) + prepgtoplcorner.BackColor = titlebarleftcornercolour + prepgtoprcorner.BackColor = titlebarrightcornercolour + prepgtoplcorner.Width = titlebarcornerwidth + prepgtoprcorner.Width = titlebarcornerwidth + + If ShiftOSDesktop.boughtpanelbuttons = True Then prepnlpanelbutton.Show() + pretbicon.Location = New Point(panelbuttoniconside, panelbuttonicontop) + pretbicon.Size = New Size(panelbuttoniconsize, panelbuttoniconsize) + prepnlpanelbutton.Size = New Size(panelbuttonwidth, panelbuttonheight) + prepnlpanelbutton.BackColor = panelbuttoncolour + If skinpanelbutton(0) Is Nothing Then Else prepnlpanelbutton.BackgroundImage = skinpanelbutton(0) + prepnlpanelbutton.BackgroundImageLayout = skinpanelbuttonstyle + pretbctext.ForeColor = panelbuttontextcolour + pretbctext.Font = New Font(panelbuttontextfont, panelbuttontextsize, panelbuttontextstyle) + pretbctext.Location = New Point(panelbuttontextside, panelbuttontexttop) + prepnlpanelbuttonholder.Padding = New Padding(panelbuttoninitialgap, 0, 0, 0) + prepnlpanelbutton.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) + If skinpanelbutton(0) Is Nothing Then Else prepnlpanelbutton.BackColor = Color.Transparent + + Select Case desktoppanelposition + Case "Top" + predesktoppanel.Dock = DockStyle.Top + predesktopappmenu.Dock = DockStyle.Top + Case "Bottom" + predesktoppanel.Dock = DockStyle.Bottom + predesktopappmenu.Dock = DockStyle.Bottom + End Select + + If skindesktoppanel(0) Is Nothing Then + predesktoppanel.BackColor = desktoppanelcolour + predesktoppanel.BackgroundImage = Nothing + Else + predesktoppanel.BackgroundImage = skindesktoppanel(0) + predesktoppanel.BackgroundImageLayout = skindesktoppanelstyle + predesktoppanel.BackColor = Color.Transparent + End If + + If ShiftOSDesktop.boughtdesktoppanelclock = True Then + setclocktime() + prepaneltimetext.ForeColor = clocktextcolour + If skindesktoppaneltime(0) Is Nothing Then + pretimepanel.BackColor = clockbackgroundcolor + pretimepanel.BackgroundImage = Nothing + Else + pretimepanel.BackColor = Color.Transparent + If skindesktoppaneltime(0) Is Nothing Then Else pretimepanel.BackgroundImage = skindesktoppaneltime(0) + pretimepanel.BackgroundImageLayout = skindesktoppaneltimestyle + End If + prepaneltimetext.Font = New Font(panelclocktextfont, panelclocktextsize, panelclocktextstyle) + pretimepanel.Size = New Size(prepaneltimetext.Width + 3, pretimepanel.Height) + prepaneltimetext.Location = New Point(0, panelclocktexttop) + pretimepanel.Show() + Else + pretimepanel.Hide() + End If + + If showwindowcorners = True Then + cboxtitlebarcorners.CheckState = CheckState.Checked + Else + cboxtitlebarcorners.CheckState = CheckState.Unchecked + End If + + If cboxtitlebarcorners.CheckState = CheckState.Checked Then + prepgtoplcorner.Show() + prepgtoprcorner.Show() + pnltitlebarleftcornercolour.Show() + pnltitlebarrightcornercolour.Show() + txttitlebarcornerwidth.Show() + lbcornerwidth.Show() + lbcornerwidthpx.Show() + lbleftcornercolor.Show() + lbrightcornercolor.Show() + Else + prepgtoplcorner.Hide() + prepgtoprcorner.Hide() + pnltitlebarleftcornercolour.Hide() + pnltitlebarrightcornercolour.Hide() + txttitlebarcornerwidth.Hide() + lbcornerwidth.Hide() + lbcornerwidthpx.Hide() + lbleftcornercolor.Hide() + lbrightcornercolor.Hide() + End If + + If cbindividualbordercolours.CheckState = CheckState.Checked Then + Label73.Show() + Label74.Show() + Label75.Show() + Label76.Show() + Label77.Show() + pnlborderleftcolour.Show() + pnlborderrightcolour.Show() + pnlborderbottomcolour.Show() + pnlborderbottomrightcolour.Show() + pnlborderbottomleftcolour.Show() + Else + Label73.Hide() + Label74.Hide() + Label75.Hide() + Label76.Hide() + Label77.Hide() + pnlborderleftcolour.Hide() + pnlborderrightcolour.Hide() + pnlborderbottomcolour.Hide() + pnlborderbottomrightcolour.Hide() + pnlborderbottomleftcolour.Hide() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + preclosebutton.Location = New Point(pretitlebar.Size.Width - closebuttonside - preclosebutton.Size.Width, closebuttontop) + prerollupbutton.Location = New Point(pretitlebar.Size.Width - rollupbuttonside - prerollupbutton.Size.Width, rollupbuttontop) + preminimizebutton.Location = New Point(pretitlebar.Size.Width - minimizebuttonside - preminimizebutton.Size.Width, minimizebuttontop) + Else + preclosebutton.Location = New Point(pretitlebar.Size.Width - closebuttonside - prepgtoplcorner.Width - prepgtoprcorner.Width - preclosebutton.Size.Width, closebuttontop) + prerollupbutton.Location = New Point(pretitlebar.Size.Width - rollupbuttonside - prepgtoplcorner.Width - prepgtoprcorner.Width - prerollupbutton.Size.Width, rollupbuttontop) + preminimizebutton.Location = New Point(pretitlebar.Size.Width - minimizebuttonside - prepgtoplcorner.Width - prepgtoprcorner.Width - preminimizebutton.Size.Width, minimizebuttontop) + End If + + preapplaunchermenuholder.Width = applaunchermenuholderwidth + predesktopappmenu.Width = applaunchermenuholderwidth + ApplicationsToolStripMenuItem.Width = applaunchermenuholderwidth + + If skinapplauncherbutton(0) Is Nothing Then + ApplicationsToolStripMenuItem.BackgroundImage = Nothing + ApplicationsToolStripMenuItem.BackColor = applauncherbuttoncolour + Else + ApplicationsToolStripMenuItem.BackColor = Color.Transparent + predesktopappmenu.BackColor = Color.Transparent + ApplicationsToolStripMenuItem.BackgroundImage = skinapplauncherbutton(0) + ApplicationsToolStripMenuItem.Text = "" + End If + + pnltitlebarcolour.BackColor = titlebarcolour + pnlbordercolour.BackColor = windowbordercolour + pnlclosebuttoncolour.BackColor = closebuttoncolour + pnltitletextcolour.BackColor = titletextcolour + pnldesktoppanelcolour.BackColor = desktoppanelcolour + pnldesktopcolour.BackColor = desktopbackgroundcolour + pnlpanelclocktextcolour.BackColor = clocktextcolour + pnlclockbackgroundcolour.BackColor = clockbackgroundcolor + pnlmaintextcolour.BackColor = applicationsbuttontextcolour + pnlmainbuttoncolour.BackColor = applauncherbuttoncolour + pnlmainbuttonactivated.BackColor = applauncherbuttonclickedcolour + pnlmenuitemscolour.BackColor = applauncherbackgroundcolour + pnlmenuitemsmouseover.BackColor = applaunchermouseovercolour + pnlrollupbuttoncolour.BackColor = rollupbuttoncolour + pnltitlebarleftcornercolour.BackColor = titlebarleftcornercolour + pnltitlebarrightcornercolour.BackColor = titlebarrightcornercolour + pnlborderleftcolour.BackColor = windowborderleftcolour + pnlborderrightcolour.BackColor = windowborderrightcolour + pnlborderbottomcolour.BackColor = windowborderbottomcolour + pnlborderbottomrightcolour.BackColor = windowborderbottomrightcolour + pnlborderbottomleftcolour.BackColor = windowborderbottomleftcolour + pnlminimizebuttoncolour.BackColor = minimizebuttoncolour + pnlpanelbuttoncolour.BackColor = panelbuttoncolour + pnlpanelbuttontextcolour.BackColor = panelbuttontextcolour + + 'skins + preclosebutton.BackgroundImage = skinclosebutton(0) + preclosebutton.BackgroundImageLayout = skinclosebuttonstyle + pretitlebar.BackgroundImage = shifterskintitlebar(0) + pretitlebar.BackgroundImageLayout = skintitlebarstyle + pnldesktoppreview.BackgroundImage = skindesktopbackground(0) + pnldesktoppreview.BackgroundImageLayout = skindesktopbackgroundstyle + pnlmainbuttoncolour.BackgroundImage = skinapplauncherbutton(0) + pnlmainbuttoncolour.BackgroundImageLayout = skinapplauncherbuttonstyle + prerollupbutton.BackgroundImage = skinrollupbutton(0) + prerollupbutton.BackgroundImageLayout = skinrollupbuttonstyle + prepgtoprcorner.BackgroundImage = skintitlebarrightcorner(0) + prepgtoprcorner.BackgroundImageLayout = skintitlebarrightcornerstyle + prepgtoplcorner.BackgroundImage = skintitlebarleftcorner(0) + prepgtoplcorner.BackgroundImageLayout = skintitlebarleftcornerstyle + predesktoppanel.BackgroundImage = skindesktoppanel(0) + predesktoppanel.BackgroundImageLayout = skindesktoppanelstyle + pretimepanel.BackgroundImage = skindesktoppaneltime(0) + pretimepanel.BackgroundImageLayout = skindesktoppaneltimestyle + prepgleft.BackgroundImage = skinwindowborderleft(0) + prepgleft.BackgroundImageLayout = skinwindowborderleftstyle + prepgright.BackgroundImage = skinwindowborderright(0) + prepgright.BackgroundImageLayout = skinwindowborderrightstyle + prepgbottom.BackgroundImage = skinwindowborderbottom(0) + prepgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + prepgbottomlcorner.BackgroundImage = skinwindowborderbottomleft(0) + prepgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + prepgbottomrcorner.BackgroundImage = skinwindowborderbottomright(0) + prepgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + prepgbottomlcorner.Height = windowbordersize + prepgbottomrcorner.Height = windowbordersize + preminimizebutton.BackgroundImage = skinminimizebutton(0) + preminimizebutton.BackgroundImageLayout = skinminimizebuttonstyle + + 'invisible backgrounds + If preclosebutton.BackgroundImage Is Nothing Then Else preclosebutton.BackColor = Color.Transparent + If pretitlebar.BackgroundImage Is Nothing Then Else pretitlebar.BackColor = Color.Transparent + If prerollupbutton.BackgroundImage Is Nothing Then Else prerollupbutton.BackColor = Color.Transparent + If prepgtoplcorner.BackgroundImage Is Nothing Then Else prepgtoplcorner.BackColor = Color.Transparent + If prepgtoprcorner.BackgroundImage Is Nothing Then Else prepgtoprcorner.BackColor = Color.Transparent + If prepnlpanelbutton.BackgroundImage Is Nothing Then Else prepnlpanelbutton.BackColor = Color.Transparent + If preminimizebutton.BackgroundImage Is Nothing Then Else preminimizebutton.BackColor = Color.Transparent + + 'pallet skins + pnlclosebuttoncolour.BackgroundImage = skinclosebutton(0) + pnltitlebarcolour.BackgroundImage = shifterskintitlebar(0) + pnldesktopcolour.BackgroundImage = skindesktopbackground(0) + pnlrollupbuttoncolour.BackgroundImage = skinrollupbutton(0) + pnltitlebarrightcornercolour.BackgroundImage = skintitlebarrightcorner(0) + pnltitlebarleftcornercolour.BackgroundImage = skintitlebarleftcorner(0) + pnldesktoppanelcolour.BackgroundImage = skindesktoppanel(0) + pnlclockbackgroundcolour.BackgroundImage = skindesktoppaneltime(0) + pnlborderbottomcolour.BackgroundImage = skinwindowborderbottom(0) + pnlborderleftcolour.BackgroundImage = skinwindowborderleft(0) + pnlborderrightcolour.BackgroundImage = skinwindowborderright(0) + pnlborderbottomrightcolour.BackgroundImage = skinwindowborderbottomright(0) + pnlborderbottomleftcolour.BackgroundImage = skinwindowborderbottomleft(0) + pnlminimizebuttoncolour.BackgroundImage = skinminimizebutton(0) + pnlpanelbuttoncolour.BackgroundImage = skinpanelbutton(0) + + txttitlebarheight.Text = titlebarheight + txtclosebuttonheight.Text = closebuttonheight + txtclosebuttonwidth.Text = closebuttonwidth + txtclosebuttonfromtop.Text = closebuttontop + txtclosebuttonfromside.Text = closebuttonside + txtbordersize.Text = windowbordersize + txttitletexttop.Text = titletexttop + txttitletextside.Text = titletextside + txttitletextsize.Text = titletextsize + combotitletextfont.Text = titletextfont + txtdesktoppanelheight.Text = desktoppanelheight + combodesktoppanelposition.Text = desktoppanelposition + comboclocktextfont.Text = panelclocktextfont + txtclocktextsize.Text = panelclocktextsize + txtclocktextfromtop.Text = panelclocktexttop + txtappbuttonlabel.Text = applicationlaunchername + txtapplicationsbuttonheight.Text = applicationbuttonheight + txtappbuttontextsize.Text = applicationbuttontextsize + comboappbuttontextfont.Text = applicationbuttontextfont + txtrollupbuttonheight.Text = rollupbuttonheight + txtrollupbuttonwidth.Text = rollupbuttonwidth + txtrollupbuttontop.Text = rollupbuttontop + txtrollupbuttonside.Text = rollupbuttonside + txttitlebarcornerwidth.Text = titlebarcornerwidth + txtapplauncherwidth.Text = applaunchermenuholderwidth + txticonfromside.Text = titlebariconside + txticonfromtop.Text = titlebaricontop + txtpanelbuttoninitalgap.Text = panelbuttoninitialgap + txtpanelbuttontop.Text = panelbuttonfromtop + txtpanelbuttonwidth.Text = panelbuttonwidth + txtpanelbuttonheight.Text = panelbuttonheight + txtpanelbuttongap.Text = panelbuttongap + cbpanelbuttonfont.Text = panelbuttontextfont + txtpaneltextbuttonsize.Text = panelbuttontextsize + cbpanelbuttontextstyle.Text = panelbuttontextstyle + txtpanelbuttontextside.Text = panelbuttontextside + txtpanelbuttontexttop.Text = panelbuttontexttop + txtpanelbuttoniconsize.Text = panelbuttoniconsize + txtpanelbuttoniconsize.Text = panelbuttoniconsize + txtpanelbuttoniconside.Text = panelbuttoniconside + txtpanelbuttonicontop.Text = panelbuttonicontop + + txtminimizebuttonheight.Text = minimizebuttonheight + txtminimizebuttonwidth.Text = minimizebuttonwidth + txtminimizebuttontop.Text = minimizebuttontop + txtminimizebuttonside.Text = minimizebuttonside + + Select Case titletextstyle + Case FontStyle.Bold + combotitletextstyle.Text = "Bold" + Case FontStyle.Italic + combotitletextstyle.Text = "Italic" + Case FontStyle.Regular + combotitletextstyle.Text = "Regular" + Case FontStyle.Strikeout + combotitletextstyle.Text = "Strikeout" + Case FontStyle.Underline + combotitletextstyle.Text = "Underline" + End Select + + Select Case panelclocktextstyle + Case FontStyle.Bold + comboclocktextstyle.Text = "Bold" + Case FontStyle.Italic + comboclocktextstyle.Text = "Italic" + Case FontStyle.Regular + comboclocktextstyle.Text = "Regular" + Case FontStyle.Strikeout + comboclocktextstyle.Text = "Strikeout" + Case FontStyle.Underline + comboclocktextstyle.Text = "Underline" + End Select + + Select Case applicationbuttontextstyle + Case FontStyle.Bold + comboappbuttontextstyle.Text = "Bold" + Case FontStyle.Italic + comboappbuttontextstyle.Text = "Italic" + Case FontStyle.Regular + comboappbuttontextstyle.Text = "Regular" + Case FontStyle.Strikeout + comboappbuttontextstyle.Text = "Strikeout" + Case FontStyle.Underline + comboappbuttontextstyle.Text = "Underline" + End Select + + Select Case panelbuttontextstyle + Case FontStyle.Bold + cbpanelbuttontextstyle.Text = "Bold" + Case FontStyle.Italic + cbpanelbuttontextstyle.Text = "Italic" + Case FontStyle.Regular + cbpanelbuttontextstyle.Text = "Regular" + Case FontStyle.Strikeout + cbpanelbuttontextstyle.Text = "Strikeout" + Case FontStyle.Underline + cbpanelbuttontextstyle.Text = "Underline" + End Select + + Select Case titletextposition + Case "Left" + combotitletextposition.Text = "Left" + Case "Centre" + combotitletextposition.Text = "Centre" + End Select + + If combotitletextposition.Text = "Centre" Then + txttitletextside.Visible = False + Else + txttitletextside.Visible = True + End If + + Dim itemstyle As FontStyle = FontStyle.Regular + Select Case launcheritemstyle.SelectedItem.ToString + Case "Bold" + itemstyle = FontStyle.Bold + Case "Italic" + itemstyle = FontStyle.Italic + Case "Regular" + itemstyle = FontStyle.Regular + Case "Strikeout" + itemstyle = FontStyle.Strikeout + Case "Underline" + itemstyle = FontStyle.Underline + End Select + + Dim itemsize As Integer + If Not txtlauncheritemtxtsize.Text = "" Then itemsize = txtlauncheritemtxtsize.Text Else itemsize = Skins.launcheritemsize + + KnowledgeInputToolStripMenuItem.Font = New Font(launcheritemfont.Text, itemsize, itemstyle) + TerminalToolStripMenuItem.Font = New Font(launcheritemfont.Text, itemsize, itemstyle) + ClockToolStripMenuItem.Font = New Font(launcheritemfont.Text, itemsize, itemstyle) + ShiftoriumToolStripMenuItem.Font = New Font(launcheritemfont.Text, itemsize, itemstyle) + ShifterToolStripMenuItem.Font = New Font(launcheritemfont.Text, itemsize, itemstyle) + ShutdownToolStripMenuItem.Font = New Font(launcheritemfont.Text, itemsize, itemstyle) + KnowledgeInputToolStripMenuItem.ForeColor = launcheritemtxtcolour.BackColor + TerminalToolStripMenuItem.ForeColor = launcheritemtxtcolour.BackColor + ClockToolStripMenuItem.ForeColor = launcheritemtxtcolour.BackColor + ShiftoriumToolStripMenuItem.ForeColor = launcheritemtxtcolour.BackColor + ShifterToolStripMenuItem.ForeColor = launcheritemtxtcolour.BackColor + ShutdownToolStripMenuItem.ForeColor = launcheritemtxtcolour.BackColor + + customizationsdone = customizationsdone + 1 + End Sub + + Private Sub AddFonts() + ' Get the installed fonts collection. + Dim allFonts As New Drawing.Text.InstalledFontCollection + + ' Get an array of the system's font familiies. + Dim fontFamilies() As FontFamily = allFonts.Families() + + ' Display the font families. + For Each myFont As FontFamily In fontFamilies + combotitletextfont.Items.Add(myFont.Name) + comboclocktextfont.Items.Add(myFont.Name) + comboappbuttontextfont.Items.Add(myFont.Name) + cbpanelbuttonfont.Items.Add(myFont.Name) + launcheritemfont.Items.Add(myFont.Name) + cmbaalusrfont.Items.Add(myFont.Name) + Next 'font_family + End Sub + + Private Sub btnapply_Click(sender As Object, e As EventArgs) Handles btnapply.Click + If Skin_Loader.Visible = True Then + infobox.title = "Shifter - Error" + infobox.textinfo = "It appears that the Skin Loader application is currently open." & Environment.NewLine & Environment.NewLine & "Due to system stability issues you must close it before applying your changes!" + infobox.Show() + Else + ' Set skinning varibles to new values + ' WINDOWS + ' Image + If Not IsNothing(pretitlebar.BackgroundImage) Then Skins.titlebar = pretitlebar.BackgroundImage Else Skins.titlebar = Nothing + Skins.titlebarlayout = pretitlebar.BackgroundImageLayout + If Not IsNothing(prepgleft.BackgroundImage) Then Skins.borderleft = prepgleft.BackgroundImage Else Skins.borderleft = Nothing + Skins.borderleftlayout = prepgleft.BackgroundImageLayout + If Not IsNothing(prepgright.BackgroundImage) Then Skins.borderright = prepgright.BackgroundImage Else Skins.borderright = Nothing + Skins.borderrightlayout = prepgright.BackgroundImageLayout + If Not IsNothing(prepgbottom.BackgroundImage) Then Skins.borderbottom = prepgbottom.BackgroundImage Else Skins.borderbottom = Nothing + Skins.borderbottomlayout = prepgbottom.BackgroundImageLayout + If Not IsNothing(preclosebutton.BackgroundImage) Then Skins.closebtn = preclosebutton.BackgroundImage Else Skins.closebtn = Nothing + Skins.closebtnlayout = preclosebutton.BackgroundImageLayout + If Not IsNothing(preclosebutton.BackgroundImage) Then Skins.closebtnhover = preclosebutton.BackgroundImage Else Skins.closebtnhover = Nothing + If Not IsNothing(preclosebutton.BackgroundImage) Then Skins.closebtnclick = preclosebutton.BackgroundImage Else Skins.closebtnclick = Nothing + If Not IsNothing(prerollupbutton.BackgroundImage) Then Skins.rollbtn = prerollupbutton.BackgroundImage Else Skins.rollbtn = Nothing + Skins.rollbtnlayout = prerollupbutton.BackgroundImageLayout + If Not IsNothing(prerollupbutton.BackgroundImage) Then Skins.rollbtnhover = prerollupbutton.BackgroundImage Else Skins.rollbtnhover = Nothing + If Not IsNothing(prerollupbutton.BackgroundImage) Then Skins.rollbtnclick = prerollupbutton.BackgroundImage Else Skins.rollbtnclick = Nothing + If Not IsNothing(preminimizebutton.BackgroundImage) Then Skins.minbtn = preminimizebutton.BackgroundImage Else Skins.minbtn = Nothing + Skins.minbtnlayout = preminimizebutton.BackgroundImageLayout + If Not IsNothing(preminimizebutton.BackgroundImage) Then Skins.minbtnhover = preminimizebutton.BackgroundImage Else Skins.minbtnhover = Nothing + If Not IsNothing(preminimizebutton.BackgroundImage) Then Skins.minbtnclick = preminimizebutton.BackgroundImage Else Skins.minbtnclick = Nothing + If Not IsNothing(prepgbottomrcorner.BackgroundImage) Then Skins.rightcorner = prepgbottomrcorner.BackgroundImage Else Skins.rightcorner = Nothing + Skins.rightcornerlayout = prepgbottomrcorner.BackgroundImageLayout + If Not IsNothing(prepgbottomlcorner.BackgroundImage) Then Skins.leftcorner = prepgbottomlcorner.BackgroundImage Else Skins.leftcorner = Nothing + Skins.leftcornerlayout = prepgbottomlcorner.BackgroundImageLayout + 'Colours + Skins.titlebarcolour = pretitlebar.BackColor + Skins.borderleftcolour = prepgleft.BackColor + Skins.borderrightcolour = prepgright.BackColor + Skins.borderbottomcolour = prepgbottom.BackColor + Skins.closebtncolour = preclosebutton.BackColor + Skins.closebtnhovercolour = preclosebutton.BackColor + Skins.closebtnclickcolour = preclosebutton.BackColor + Skins.rollbtncolour = prerollupbutton.BackColor + Skins.rollbtnhovercolour = prerollupbutton.BackColor + Skins.rollbtnclickcolour = prerollupbutton.BackColor + Skins.minbtncolour = preminimizebutton.BackColor + Skins.minbtnhovercolour = preminimizebutton.BackColor + Skins.minbtnclickcolour = preminimizebutton.BackColor + Skins.rightcornercolour = prepgtoprcorner.BackColor + Skins.leftcornercolour = prepgtoplcorner.BackColor + Skins.bottomrightcornercolour = prepgbottomrcorner.BackColor + Skins.bottomleftcornercolour = prepgbottomlcorner.BackColor + ' Settings + Skins.closebtnsize = preclosebutton.Size + Skins.rollbtnsize = prerollupbutton.Size + Skins.minbtnsize = preminimizebutton.Size + Skins.titlebarheight = pretitlebar.Height + Skins.closebtnfromtop = closebuttontop + Skins.closebtnfromside = closebuttonside + Skins.rollbtnfromtop = rollupbuttontop + Skins.rollbtnfromside = rollupbuttonside + Skins.minbtnfromtop = minimizebuttontop + Skins.minbtnfromside = minimizebuttonside + Skins.borderwidth = prepgleft.Width + Skins.titlebarcornerwidth = prepgtoplcorner.Width + Skins.enablecorners = showwindowcorners + ' Text + Skins.titletextfontfamily = pretitletext.Font.FontFamily.Name + Skins.titletextfontsize = pretitletext.Font.Size + Skins.titletextfontstyle = pretitletext.Font.Style + Skins.titletextpos = titletextposition + Skins.titletextfromtop = titletexttop + Skins.titletextfromside = titletextside + Skins.titletextcolour = pretitletext.ForeColor + + Skins.launcheritemcolour = launcheritemtxtcolour.BackColor + Skins.launcheritemfont = launcheritemfont.Text + Select Case launcheritemstyle.SelectedItem.ToString + Case "Bold" + Skins.launcheritemstyle = FontStyle.Bold + Case "Italic" + Skins.launcheritemstyle = FontStyle.Italic + Case "Regular" + Skins.launcheritemstyle = FontStyle.Regular + Case "Strikeout" + Skins.launcheritemstyle = FontStyle.Strikeout + Case "Underline" + Skins.launcheritemstyle = FontStyle.Underline + End Select + Skins.launcheritemsize = txtlauncheritemtxtsize.Text + + ' DESKTOP + Skins.desktoppanelcolour = desktoppanelcolour + Skins.desktopbackgroundcolour = desktopbackgroundcolour + Skins.desktoppanelheight = desktoppanelheight + Skins.desktoppanelposition = desktoppanelposition + Skins.clocktextcolour = clocktextcolour + Skins.clockbackgroundcolor = clockbackgroundcolor + Skins.panelclocktexttop = panelclocktexttop + Skins.panelclocktextsize = panelclocktextsize + Skins.panelclocktextfont = panelclocktextfont + Skins.panelclocktextstyle = panelclocktextstyle + Skins.applauncherbuttoncolour = applauncherbuttoncolour + Skins.applauncherbuttonclickedcolour = applauncherbuttonclickedcolour + Skins.applauncherbackgroundcolour = applauncherbackgroundcolour + Skins.applaunchermouseovercolour = applaunchermouseovercolour + Skins.applicationsbuttontextcolour = applicationsbuttontextcolour + Skins.applicationbuttonheight = applicationbuttonheight + Skins.applicationbuttontextsize = applicationbuttontextsize + Skins.applicationbuttontextfont = applicationbuttontextfont + Skins.applicationbuttontextstyle = applicationbuttontextstyle + Skins.applicationlaunchername = applicationlaunchername + Skins.titletextposition = titletextposition + Skins.applaunchermenuholderwidth = applaunchermenuholderwidth + Skins.panelbuttonicontop = panelbuttonicontop + Skins.panelbuttoniconside = panelbuttoniconside + Skins.panelbuttoniconsize = panelbuttoniconsize + Skins.panelbuttonheight = panelbuttonheight + Skins.panelbuttonwidth = panelbuttonwidth + Skins.panelbuttoncolour = panelbuttoncolour + Skins.panelbuttontextcolour = panelbuttontextcolour + Skins.panelbuttontextsize = panelbuttontextsize + Skins.panelbuttontextfont = panelbuttontextfont + Skins.panelbuttontextstyle = panelbuttontextstyle + Skins.panelbuttontextside = panelbuttontextside + Skins.panelbuttontexttop = panelbuttontexttop + Skins.panelbuttongap = panelbuttongap + Skins.panelbuttonfromtop = panelbuttonfromtop + Skins.panelbuttoninitialgap = panelbuttoninitialgap + ' images + Skins.desktoppanel = predesktoppanel.BackgroundImage + Skins.desktoppanellayout = predesktoppanel.BackgroundImageLayout + Skins.desktopbackground = pnldesktoppreview.BackgroundImage + Skins.desktopbackgroundlayout = pnldesktoppreview.BackgroundImageLayout + Skins.panelclock = pretimepanel.BackgroundImage + Skins.panelclocklayout = pretimepanel.BackgroundImageLayout + Skins.applaunchermouseover = skinapplauncherbutton(1) + Skins.applauncher = skinapplauncherbutton(0) + Skins.applauncherlayout = skinapplauncherbuttonstyle + Skins.applauncherclick = skinapplauncherbutton(2) + Skins.panelbutton = prepnlpanelbutton.BackgroundImage + Skins.panelbuttonlayout = prepnlpanelbutton.BackgroundImageLayout + Skins.leftcorner = prepgtoplcorner.BackgroundImage + Skins.rightcorner = prepgtoprcorner.BackgroundImage + + Skins.bottomleftcorner = prepgbottomlcorner.BackgroundImage + Skins.bottomleftcornerlayout = prepgbottomlcorner.BackgroundImageLayout + Skins.bottomrightcorner = prepgbottomrcorner.BackgroundImage + Skins.bottomrightcornerlayout = prepgbottomrcorner.BackgroundImageLayout + Skins.enablebordercorners = cbindividualbordercolours.Checked + Skins.titleiconfromside = titlebariconside + Skins.titleiconfromtop = titlebaricontop + Skins.enabledraggableicons = CheckBox1.Checked + Skins.icontextcolor = icontextcolor + + 'Adv App Launcher - Suggested by DevX + + Skins.usernametextcolor = usernametextcolor + Skins.usernamefont = usernamefont + Skins.usernamefontsize = usernamefontsize + Skins.usernamefontstyle = usernamefontstyle + Skins.userNamePanelBackgroundColor = usernamebgcolor + Try + Skins.userNamePanelBackground = skinuserpanel(0) + Catch + Skins.userNamePanelBackground = Nothing + End Try + Skins.powerPanelBackgroundColor = powerpanelbgcolor + Try + Skins.powerPanelBackgroundImage = skinshutdownbutton(0) + Catch + Skins.powerPanelBackgroundImage = Nothing + End Try + Skins.pwrPanelBackgroundLayout = pwrbglayout + ' APPLY + Skins.saveskinfiles(True) + 'windows resize fix + ' earn code points + customizationpointsearned = customizationtimepoints + If customizationsdone < 0 Then customizationpointsearned = customizationpointsearned - Math.Abs(customizationsdone) + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + customizationpointsearned + btnapply.Text = "Earned " & customizationpointsearned & " CP" + btnapply.BackColor = Color.Black + btnapply.ForeColor = Color.White + customizationtimepoints = 0 + customizationsdone = 0 + customizationpointsearned = 0 + timerearned.Start() + End If + + End Sub + + Dim timingissuefixer As Integer = 0 + Public Sub applysettings() + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) + saveskintocurrentskin() + + 'delay fixes timing issue + tmrdelay.Start() + If timingissuefixer > 10 Then + tmrdelay.Stop() + + 'quick fixes + If titlebarheight > 500 Then + titlebarheight = 500 + txttitlebarheight.Text = "500" + End If + + If windowbordersize > 500 Then + windowbordersize = 500 + txtbordersize.Text = "500" + End If + + If desktoppanelheight > 500 Then + desktoppanelheight = 500 + txtdesktoppanelheight.Text = "500" + End If + + 'ShiftOSDesktop.titlebarcolour = titlebarcolour + 'ShiftOSDesktop.windowbordercolour = windowbordercolour + 'ShiftOSDesktop.windowbordersize = windowbordersize + 'ShiftOSDesktop.titlebarheight = titlebarheight + 'ShiftOSDesktop.closebuttoncolour = closebuttoncolour + 'ShiftOSDesktop.closebuttonheight = closebuttonheight + 'ShiftOSDesktop.closebuttonwidth = closebuttonwidth + 'ShiftOSDesktop.closebuttontop = closebuttontop + 'ShiftOSDesktop.closebuttonside = closebuttonside + 'ShiftOSDesktop.titletextcolour = titletextcolour + 'ShiftOSDesktop.titletexttop = titletexttop + 'ShiftOSDesktop.titletextside = titletextside + 'ShiftOSDesktop.titletextsize = titletextsize + 'ShiftOSDesktop.titletextfont = titletextfont + 'ShiftOSDesktop.titletextstyle = titletextstyle + 'ShiftOSDesktop.desktoppanelcolour = desktoppanelcolour + 'ShiftOSDesktop.desktopbackgroundcolour = desktopbackgroundcolour + 'ShiftOSDesktop.desktoppanelheight = desktoppanelheight + 'ShiftOSDesktop.desktoppanelposition = desktoppanelposition + 'ShiftOSDesktop.clocktextcolour = clocktextcolour + 'ShiftOSDesktop.clockbackgroundcolor = clockbackgroundcolor + 'ShiftOSDesktop.panelclocktexttop = panelclocktexttop + 'ShiftOSDesktop.panelclocktextsize = panelclocktextsize + 'ShiftOSDesktop.panelclocktextfont = panelclocktextfont + 'ShiftOSDesktop.panelclocktextstyle = panelclocktextstyle + 'ShiftOSDesktop.applauncherbuttoncolour = applauncherbuttoncolour + 'ShiftOSDesktop.applauncherbuttonclickedcolour = applauncherbuttonclickedcolour + 'ShiftOSDesktop.applauncherbackgroundcolour = applauncherbackgroundcolour + 'ShiftOSDesktop.applaunchermouseovercolour = applaunchermouseovercolour + 'ShiftOSDesktop.ApplicationsToolStripMenuItem.BackColor = Color.Transparent + 'ShiftOSDesktop.applicationsbuttontextcolour = applicationsbuttontextcolour + 'ShiftOSDesktop.applicationbuttonheight = applicationbuttonheight + 'ShiftOSDesktop.applicationbuttontextsize = applicationbuttontextsize + 'ShiftOSDesktop.applicationbuttontextfont = applicationbuttontextfont + 'ShiftOSDesktop.applicationbuttontextstyle = applicationbuttontextstyle + 'ShiftOSDesktop.applicationlaunchername = applicationlaunchername + 'ShiftOSDesktop.titletextposition = titletextposition + 'ShiftOSDesktop.rollupbuttoncolour = rollupbuttoncolour + 'ShiftOSDesktop.rollupbuttonheight = rollupbuttonheight + 'ShiftOSDesktop.rollupbuttonwidth = rollupbuttonwidth + 'ShiftOSDesktop.rollupbuttonside = rollupbuttonside + 'ShiftOSDesktop.rollupbuttontop = rollupbuttontop + 'ShiftOSDesktop.titlebariconside = titlebariconside + 'ShiftOSDesktop.titlebaricontop = titlebaricontop + 'ShiftOSDesktop.showwindowcorners = showwindowcorners + 'ShiftOSDesktop.titlebarcornerwidth = titlebarcornerwidth + 'ShiftOSDesktop.titlebarrightcornercolour = titlebarrightcornercolour + 'ShiftOSDesktop.titlebarleftcornercolour = titlebarleftcornercolour + 'ShiftOSDesktop.applaunchermenuholderwidth = applaunchermenuholderwidth + 'ShiftOSDesktop.windowborderleftcolour = windowborderleftcolour + 'ShiftOSDesktop.windowborderrightcolour = windowborderrightcolour + 'ShiftOSDesktop.windowborderbottomcolour = windowborderbottomcolour + 'ShiftOSDesktop.windowborderbottomrightcolour = windowborderbottomrightcolour + 'ShiftOSDesktop.windowborderbottomleftcolour = windowborderbottomleftcolour + 'ShiftOSDesktop.panelbuttonicontop = panelbuttonicontop + 'ShiftOSDesktop.panelbuttoniconside = panelbuttoniconside + 'ShiftOSDesktop.panelbuttoniconsize = panelbuttoniconsize + 'ShiftOSDesktop.panelbuttoniconsize = panelbuttoniconsize + 'ShiftOSDesktop.panelbuttonheight = panelbuttonheight + 'ShiftOSDesktop.panelbuttonwidth = panelbuttonwidth + 'ShiftOSDesktop.panelbuttoncolour = panelbuttoncolour + 'ShiftOSDesktop.panelbuttontextcolour = panelbuttontextcolour + 'ShiftOSDesktop.panelbuttontextsize = panelbuttontextsize + 'ShiftOSDesktop.panelbuttontextfont = panelbuttontextfont + 'ShiftOSDesktop.panelbuttontextstyle = panelbuttontextstyle + 'ShiftOSDesktop.panelbuttontextside = panelbuttontextside + 'ShiftOSDesktop.panelbuttontexttop = panelbuttontexttop + 'ShiftOSDesktop.panelbuttongap = panelbuttongap + 'ShiftOSDesktop.panelbuttonfromtop = panelbuttonfromtop + 'ShiftOSDesktop.panelbuttoninitialgap = panelbuttoninitialgap + 'ShiftOSDesktop.minimizebuttoncolour = minimizebuttoncolour + 'ShiftOSDesktop.minimizebuttonheight = minimizebuttonheight + 'ShiftOSDesktop.minimizebuttonwidth = minimizebuttonwidth + 'ShiftOSDesktop.minimizebuttonside = minimizebuttonside + 'ShiftOSDesktop.minimizebuttontop = minimizebuttontop + + If shifterskinimages(0) = Nothing Then Else skinclosebutton(0) = GetImage(shifterskinimages(0)) + If shifterskinimages(1) = Nothing Then Else skinclosebutton(1) = GetImage(shifterskinimages(1)) + If shifterskinimages(2) = Nothing Then Else skinclosebutton(2) = GetImage(shifterskinimages(2)) + If shifterskinimages(3) = Nothing Then Else shifterskintitlebar(0) = GetImage(shifterskinimages(3)) + If shifterskinimages(4) = Nothing Then Else shifterskintitlebar(1) = GetImage(shifterskinimages(4)) + If shifterskinimages(5) = Nothing Then Else shifterskintitlebar(2) = GetImage(shifterskinimages(5)) + If shifterskinimages(6) = Nothing Then Else skindesktopbackground(0) = GetImage(shifterskinimages(6)) + If shifterskinimages(7) = Nothing Then Else skindesktopbackground(1) = GetImage(shifterskinimages(7)) + If shifterskinimages(8) = Nothing Then Else skindesktopbackground(2) = GetImage(shifterskinimages(8)) + If shifterskinimages(9) = Nothing Then Else skinrollupbutton(0) = GetImage(shifterskinimages(9)) + If shifterskinimages(10) = Nothing Then Else skinrollupbutton(1) = GetImage(shifterskinimages(10)) + If shifterskinimages(11) = Nothing Then Else skinrollupbutton(2) = GetImage(shifterskinimages(11)) + If shifterskinimages(12) = Nothing Then Else skintitlebarrightcorner(0) = GetImage(shifterskinimages(12)) + If shifterskinimages(13) = Nothing Then Else skintitlebarrightcorner(1) = GetImage(shifterskinimages(13)) + If shifterskinimages(14) = Nothing Then Else skintitlebarrightcorner(2) = GetImage(shifterskinimages(14)) + If shifterskinimages(15) = Nothing Then Else skintitlebarleftcorner(0) = GetImage(shifterskinimages(15)) + If shifterskinimages(16) = Nothing Then Else skintitlebarleftcorner(1) = GetImage(shifterskinimages(16)) + If shifterskinimages(17) = Nothing Then Else skintitlebarleftcorner(2) = GetImage(shifterskinimages(17)) + If shifterskinimages(18) = Nothing Then Else skindesktoppanel(0) = GetImage(shifterskinimages(18)) + If shifterskinimages(19) = Nothing Then Else skindesktoppanel(1) = GetImage(shifterskinimages(19)) + If shifterskinimages(20) = Nothing Then Else skindesktoppanel(2) = GetImage(shifterskinimages(20)) + If shifterskinimages(21) = Nothing Then Else skindesktoppaneltime(0) = GetImage(shifterskinimages(21)) + If shifterskinimages(22) = Nothing Then Else skindesktoppaneltime(1) = GetImage(shifterskinimages(22)) + If shifterskinimages(23) = Nothing Then Else skindesktoppaneltime(2) = GetImage(shifterskinimages(23)) + If shifterskinimages(24) = Nothing Then Else skinapplauncherbutton(0) = GetImage(shifterskinimages(24)) + If shifterskinimages(25) = Nothing Then Else skinapplauncherbutton(1) = GetImage(shifterskinimages(25)) + If shifterskinimages(26) = Nothing Then Else skinapplauncherbutton(2) = GetImage(shifterskinimages(26)) + If shifterskinimages(27) = Nothing Then Else skinwindowborderleft(0) = GetImage(shifterskinimages(27)) + If shifterskinimages(28) = Nothing Then Else skinwindowborderleft(1) = GetImage(shifterskinimages(28)) + If shifterskinimages(29) = Nothing Then Else skinwindowborderleft(2) = GetImage(shifterskinimages(29)) + If shifterskinimages(30) = Nothing Then Else skinwindowborderright(0) = GetImage(shifterskinimages(30)) + If shifterskinimages(31) = Nothing Then Else skinwindowborderright(1) = GetImage(shifterskinimages(31)) + If shifterskinimages(32) = Nothing Then Else skinwindowborderright(2) = GetImage(shifterskinimages(32)) + If shifterskinimages(33) = Nothing Then Else skinwindowborderbottom(0) = GetImage(shifterskinimages(33)) + If shifterskinimages(34) = Nothing Then Else skinwindowborderbottom(1) = GetImage(shifterskinimages(34)) + If shifterskinimages(35) = Nothing Then Else skinwindowborderbottom(2) = GetImage(shifterskinimages(35)) + If shifterskinimages(36) = Nothing Then Else skinwindowborderbottomright(0) = GetImage(shifterskinimages(36)) + If shifterskinimages(37) = Nothing Then Else skinwindowborderbottomright(1) = GetImage(shifterskinimages(37)) + If shifterskinimages(38) = Nothing Then Else skinwindowborderbottomright(2) = GetImage(shifterskinimages(38)) + If shifterskinimages(39) = Nothing Then Else skinwindowborderbottomleft(0) = GetImage(shifterskinimages(39)) + If shifterskinimages(40) = Nothing Then Else skinwindowborderbottomleft(1) = GetImage(shifterskinimages(40)) + If shifterskinimages(41) = Nothing Then Else skinwindowborderbottomleft(2) = GetImage(shifterskinimages(41)) + If shifterskinimages(42) = Nothing Then Else skinminimizebutton(0) = GetImage(shifterskinimages(42)) + If shifterskinimages(43) = Nothing Then Else skinminimizebutton(1) = GetImage(shifterskinimages(43)) + If shifterskinimages(44) = Nothing Then Else skinminimizebutton(2) = GetImage(shifterskinimages(44)) + If shifterskinimages(45) = Nothing Then Else skinpanelbutton(0) = GetImage(shifterskinimages(45)) + If shifterskinimages(46) = Nothing Then Else skinpanelbutton(1) = GetImage(shifterskinimages(46)) + If shifterskinimages(47) = Nothing Then Else skinpanelbutton(2) = GetImage(shifterskinimages(47)) + + ''skins + 'Array.Copy(shifterskinimages, ShiftOSDesktop.skinimages, ShiftOSDesktop.skinimages.Length) + + 'If skinclosebutton(0) Is Nothing Then Else ShiftOSDesktop.skinclosebutton(0) = skinclosebutton(0).Clone + 'If skinclosebutton(1) Is Nothing Then Else ShiftOSDesktop.skinclosebutton(1) = skinclosebutton(1).Clone + 'If skinclosebutton(2) Is Nothing Then Else ShiftOSDesktop.skinclosebutton(2) = skinclosebutton(2).Clone + 'ShiftOSDesktop.skinclosebuttonstyle = skinclosebuttonstyle + + 'If shifterskintitlebar(0) Is Nothing Then Else ShiftOSDesktop.skintitlebar(0) = shifterskintitlebar(0).Clone + 'If shifterskintitlebar(1) Is Nothing Then Else ShiftOSDesktop.skintitlebar(1) = shifterskintitlebar(1).Clone + 'If shifterskintitlebar(2) Is Nothing Then Else ShiftOSDesktop.skintitlebar(2) = shifterskintitlebar(2).Clone + 'ShiftOSDesktop.skintitlebarstyle = skintitlebarstyle + + 'If skindesktopbackground(0) Is Nothing Then Else ShiftOSDesktop.skindesktopbackground(0) = skindesktopbackground(0).Clone + 'If skindesktopbackground(1) Is Nothing Then Else ShiftOSDesktop.skindesktopbackground(1) = skindesktopbackground(1).Clone + 'If skindesktopbackground(2) Is Nothing Then Else ShiftOSDesktop.skindesktopbackground(2) = skindesktopbackground(2).Clone + 'ShiftOSDesktop.skindesktopbackgroundstyle = skindesktopbackgroundstyle + + 'If skinrollupbutton(0) Is Nothing Then Else ShiftOSDesktop.skinrollupbutton(0) = skinrollupbutton(0).Clone + 'If skinrollupbutton(1) Is Nothing Then Else ShiftOSDesktop.skinrollupbutton(1) = skinrollupbutton(1).Clone + 'If skinrollupbutton(2) Is Nothing Then Else ShiftOSDesktop.skinrollupbutton(2) = skinrollupbutton(2).Clone + 'ShiftOSDesktop.skinrollupbuttonstyle = skinrollupbuttonstyle + + 'If skintitlebarrightcorner(0) Is Nothing Then Else ShiftOSDesktop.skintitlebarrightcorner(0) = skintitlebarrightcorner(0).Clone + 'If skintitlebarrightcorner(1) Is Nothing Then Else ShiftOSDesktop.skintitlebarrightcorner(1) = skintitlebarrightcorner(1).Clone + 'If skintitlebarrightcorner(2) Is Nothing Then Else ShiftOSDesktop.skintitlebarrightcorner(2) = skintitlebarrightcorner(2).Clone + 'ShiftOSDesktop.skintitlebarrightcornerstyle = skintitlebarrightcornerstyle + + 'If skintitlebarleftcorner(0) Is Nothing Then Else ShiftOSDesktop.skintitlebarleftcorner(0) = skintitlebarleftcorner(0).Clone + 'If skintitlebarleftcorner(1) Is Nothing Then Else ShiftOSDesktop.skintitlebarleftcorner(1) = skintitlebarleftcorner(1).Clone + 'If skintitlebarleftcorner(2) Is Nothing Then Else ShiftOSDesktop.skintitlebarleftcorner(2) = skintitlebarleftcorner(2).Clone + 'ShiftOSDesktop.skintitlebarleftcornerstyle = skintitlebarleftcornerstyle + + 'If skindesktoppanel(0) Is Nothing Then Else ShiftOSDesktop.skindesktoppanel(0) = skindesktoppanel(0).Clone + 'If skindesktoppanel(1) Is Nothing Then Else ShiftOSDesktop.skindesktoppanel(1) = skindesktoppanel(1).Clone + 'If skindesktoppanel(2) Is Nothing Then Else ShiftOSDesktop.skindesktoppanel(2) = skindesktoppanel(2).Clone + 'ShiftOSDesktop.skindesktoppanelstyle = skindesktoppanelstyle + + 'If skindesktoppaneltime(0) Is Nothing Then Else ShiftOSDesktop.skindesktoppaneltime(0) = skindesktoppaneltime(0).Clone + 'If skindesktoppaneltime(1) Is Nothing Then Else ShiftOSDesktop.skindesktoppaneltime(1) = skindesktoppaneltime(1).Clone + 'If skindesktoppaneltime(2) Is Nothing Then Else ShiftOSDesktop.skindesktoppaneltime(2) = skindesktoppaneltime(2).Clone + 'ShiftOSDesktop.skindesktoppaneltimestyle = skindesktoppaneltimestyle + + 'If skinapplauncherbutton(0) Is Nothing Then Else ShiftOSDesktop.skinapplauncherbutton(0) = skinapplauncherbutton(0).Clone + 'If skinapplauncherbutton(1) Is Nothing Then Else ShiftOSDesktop.skinapplauncherbutton(1) = skinapplauncherbutton(1).Clone + 'If skinapplauncherbutton(2) Is Nothing Then Else ShiftOSDesktop.skinapplauncherbutton(2) = skinapplauncherbutton(2).Clone + 'ShiftOSDesktop.skinapplauncherbuttonstyle = skinapplauncherbuttonstyle + + 'If skinwindowborderleft(0) Is Nothing Then Else ShiftOSDesktop.skinwindowborderleft(0) = skinwindowborderleft(0).Clone + 'If skinwindowborderleft(1) Is Nothing Then Else ShiftOSDesktop.skinwindowborderleft(1) = skinwindowborderleft(1).Clone + 'If skinwindowborderleft(2) Is Nothing Then Else ShiftOSDesktop.skinwindowborderleft(2) = skinwindowborderleft(2).Clone + 'ShiftOSDesktop.skinwindowborderleftstyle = skinwindowborderleftstyle + + 'If skinwindowborderright(0) Is Nothing Then Else ShiftOSDesktop.skinwindowborderright(0) = skinwindowborderright(0).Clone + 'If skinwindowborderright(1) Is Nothing Then Else ShiftOSDesktop.skinwindowborderright(1) = skinwindowborderright(1).Clone + 'If skinwindowborderright(2) Is Nothing Then Else ShiftOSDesktop.skinwindowborderright(2) = skinwindowborderright(2).Clone + 'ShiftOSDesktop.skinwindowborderrightstyle = skinwindowborderrightstyle + + 'If skinwindowborderbottom(0) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottom(0) = skinwindowborderbottom(0).Clone + 'If skinwindowborderbottom(1) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottom(1) = skinwindowborderbottom(1).Clone + 'If skinwindowborderbottom(2) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottom(2) = skinwindowborderbottom(2).Clone + 'ShiftOSDesktop.skinwindowborderbottomstyle = skinwindowborderbottomstyle + + 'If skinwindowborderbottomright(0) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottomright(0) = skinwindowborderbottomright(0).Clone + 'If skinwindowborderbottomright(1) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottomright(1) = skinwindowborderbottomright(1).Clone + 'If skinwindowborderbottomright(2) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottomright(2) = skinwindowborderbottomright(2).Clone + 'ShiftOSDesktop.skinwindowborderbottomrightstyle = skinwindowborderbottomrightstyle + + 'If skinwindowborderbottomleft(0) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottomleft(0) = skinwindowborderbottomleft(0).Clone + 'If skinwindowborderbottomleft(1) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottomleft(1) = skinwindowborderbottomleft(1).Clone + 'If skinwindowborderbottomleft(2) Is Nothing Then Else ShiftOSDesktop.skinwindowborderbottomleft(2) = skinwindowborderbottomleft(2).Clone + 'ShiftOSDesktop.skinwindowborderbottomleftstyle = skinwindowborderbottomleftstyle + + 'If skinpanelbutton(0) Is Nothing Then Else ShiftOSDesktop.skinpanelbutton(0) = skinpanelbutton(0).Clone + 'If skinpanelbutton(1) Is Nothing Then Else ShiftOSDesktop.skinpanelbutton(1) = skinpanelbutton(1).Clone + 'If skinpanelbutton(2) Is Nothing Then Else ShiftOSDesktop.skinpanelbutton(2) = skinpanelbutton(2).Clone + 'ShiftOSDesktop.skinpanelbuttonstyle = skinpanelbuttonstyle + + 'If skinminimizebutton(0) Is Nothing Then Else ShiftOSDesktop.skinminimizebutton(0) = skinminimizebutton(0).Clone + 'If skinminimizebutton(1) Is Nothing Then Else ShiftOSDesktop.skinminimizebutton(1) = skinminimizebutton(1).Clone + 'If skinminimizebutton(2) Is Nothing Then Else ShiftOSDesktop.skinminimizebutton(2) = skinminimizebutton(2).Clone + 'ShiftOSDesktop.skinminimizebuttonstyle = skinminimizebuttonstyle + + 'GC.Collect() + + 'ShiftOSDesktop.setcolours() + ShiftOSDesktop.setupdesktop() + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.Invalidate() + + customizationpointsearned = customizationtimepoints + If customizationsdone < 0 Then customizationpointsearned = customizationpointsearned - Math.Abs(customizationsdone) + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + customizationpointsearned + btnapply.Text = "Earned " & customizationpointsearned & " CP" + btnapply.BackColor = Color.Black + btnapply.ForeColor = Color.White + customizationtimepoints = 0 + customizationsdone = 0 + customizationpointsearned = 0 + timerearned.Start() + + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) + loadclone() + + Me.Invalidate() + + End If + + End Sub + + Private Function GetImage(ByVal fileName As String) As Bitmap + Dim ret As Bitmap + Using img As Image = Image.FromFile(fileName) + ret = New Bitmap(img) + End Using + Return ret + End Function + + Public Sub saveskintocurrentskin() + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\Current\") Then Else My.Computer.FileSystem.CreateDirectory(ShiftOSPath + "Shiftum42\Skins\Current\") + My.Computer.FileSystem.CopyDirectory(ShiftOSPath + "Shiftum42\Skins\Current\", ShiftOSPath + "Shiftum42\Skins\CurrentCopy\") + 'ShiftOSDesktop.disposeoldskindata("shifterapply") + + For i = 0 To 50 + If shifterskinimages(i) Is Nothing Then Else If shifterskinimages(i).Contains(ShiftOSPath + "Shiftum42\Skins\Current\") Then shifterskinimages(i) = shifterskinimages(i).Replace("Current", "CurrentCopy") + Next + + 'My.Computer.FileSystem.CopyDirectory(ShiftOSPath + "Shiftum42\Skins\ChangeOverTempFiles", ShiftOSPath + "Shiftum42\Skins\Current\") + + + + skinlines(0) = titlebarcolour.ToArgb + skinlines(1) = windowbordercolour.ToArgb + skinlines(2) = windowbordersize + skinlines(3) = titlebarheight + skinlines(4) = closebuttoncolour.ToArgb + skinlines(5) = closebuttonheight + skinlines(6) = closebuttonwidth + skinlines(7) = closebuttonside + skinlines(8) = closebuttontop + skinlines(9) = titletextcolour.ToArgb + skinlines(10) = titletexttop + skinlines(11) = titletextside + skinlines(12) = titletextsize + skinlines(13) = titletextfont + skinlines(14) = titletextstyle + skinlines(15) = desktoppanelcolour.ToArgb + skinlines(16) = desktopbackgroundcolour.ToArgb + skinlines(17) = desktoppanelheight + skinlines(18) = desktoppanelposition + skinlines(19) = clocktextcolour.ToArgb + skinlines(20) = clockbackgroundcolor.ToArgb + skinlines(21) = panelclocktexttop + skinlines(22) = panelclocktextsize + skinlines(23) = panelclocktextfont + skinlines(24) = panelclocktextstyle + skinlines(25) = applauncherbuttoncolour.ToArgb + skinlines(26) = applauncherbuttonclickedcolour.ToArgb + skinlines(27) = applauncherbackgroundcolour.ToArgb + skinlines(28) = applaunchermouseovercolour.ToArgb + skinlines(29) = applicationsbuttontextcolour.ToArgb + skinlines(30) = applicationbuttonheight + skinlines(31) = applicationbuttontextsize + skinlines(32) = applicationbuttontextfont + skinlines(33) = applicationbuttontextstyle + skinlines(34) = applicationlaunchername + skinlines(35) = titletextposition + skinlines(36) = rollupbuttoncolour.ToArgb + skinlines(37) = rollupbuttonheight + skinlines(38) = rollupbuttonwidth + skinlines(39) = rollupbuttonside + skinlines(40) = rollupbuttontop + skinlines(41) = titlebariconside + skinlines(42) = titlebaricontop + skinlines(43) = showwindowcorners + skinlines(44) = titlebarcornerwidth + skinlines(45) = titlebarrightcornercolour.ToArgb + skinlines(46) = titlebarleftcornercolour.ToArgb + skinlines(47) = applaunchermenuholderwidth + skinlines(48) = windowborderleftcolour.ToArgb + skinlines(49) = windowborderrightcolour.ToArgb + skinlines(50) = windowborderbottomcolour.ToArgb + skinlines(51) = windowborderbottomrightcolour.ToArgb + skinlines(52) = windowborderbottomleftcolour.ToArgb + skinlines(50) = windowborderbottomcolour.ToArgb + skinlines(51) = windowborderbottomrightcolour.ToArgb + skinlines(52) = windowborderbottomleftcolour.ToArgb + skinlines(50) = windowborderbottomcolour.ToArgb + skinlines(51) = windowborderbottomrightcolour.ToArgb + skinlines(52) = windowborderbottomleftcolour.ToArgb + skinlines(50) = windowborderbottomcolour.ToArgb + skinlines(51) = windowborderbottomrightcolour.ToArgb + skinlines(52) = windowborderbottomleftcolour.ToArgb + skinlines(50) = windowborderbottomcolour.ToArgb + skinlines(51) = windowborderbottomrightcolour.ToArgb + skinlines(52) = windowborderbottomleftcolour.ToArgb + skinlines(50) = windowborderbottomcolour.ToArgb + skinlines(51) = windowborderbottomrightcolour.ToArgb + skinlines(52) = windowborderbottomleftcolour.ToArgb + skinlines(53) = panelbuttonicontop + skinlines(54) = panelbuttoniconside + skinlines(55) = panelbuttoniconsize + skinlines(56) = panelbuttoniconsize + skinlines(57) = panelbuttonheight + skinlines(58) = panelbuttonwidth + skinlines(59) = panelbuttoncolour.ToArgb + skinlines(60) = panelbuttontextcolour.ToArgb + skinlines(61) = panelbuttontextsize + skinlines(62) = panelbuttontextfont + skinlines(63) = panelbuttontextstyle + skinlines(64) = panelbuttontextside + skinlines(65) = panelbuttontexttop + skinlines(66) = panelbuttongap + skinlines(67) = panelbuttonfromtop + skinlines(68) = panelbuttoninitialgap + skinlines(69) = minimizebuttoncolour.ToArgb + skinlines(70) = minimizebuttonheight + skinlines(71) = minimizebuttonwidth + skinlines(72) = minimizebuttonside + skinlines(73) = minimizebuttontop + + 'convert real locations to currentskin folder + Dim folderdivider As String = "\" + For i = 0 To 50 + If shifterskinimages(i) = "" Then + Else + If shifterskinimages(i).Contains("\") Then folderdivider = "\" Else folderdivider = "/" + If IO.File.Exists(shifterskinimages(i)) = True Then + IO.File.Copy(shifterskinimages(i), ShiftOSPath + "Shiftum42\Skins\Current\" & shifterskinimages(i).Substring(shifterskinimages(i).LastIndexOf(folderdivider)), True) + shifterskinimages(i) = ShiftOSPath + "Shiftum42\Skins\Current\" & shifterskinimages(i).Substring(shifterskinimages(i).LastIndexOf(folderdivider) + 1) + Else + infobox.showinfo("Skinning Error", "It seems that the images used by this skin have been deleted. The file " & shifterskinimages(i) & " cannot be found.") + End If + End If + + Next + + skinlines(100) = shifterskinimages(0) + skinlines(101) = shifterskinimages(1) + skinlines(102) = shifterskinimages(2) + skinlines(103) = shifterskinimages(3) + skinlines(104) = shifterskinimages(4) + skinlines(105) = shifterskinimages(5) + skinlines(106) = shifterskinimages(6) + skinlines(107) = shifterskinimages(7) + skinlines(108) = shifterskinimages(8) + skinlines(109) = shifterskinimages(9) + skinlines(110) = shifterskinimages(10) + skinlines(111) = shifterskinimages(11) + skinlines(112) = shifterskinimages(12) + skinlines(113) = shifterskinimages(13) + skinlines(114) = shifterskinimages(14) + skinlines(115) = shifterskinimages(15) + skinlines(116) = shifterskinimages(16) + skinlines(117) = shifterskinimages(17) + skinlines(118) = shifterskinimages(18) + skinlines(119) = shifterskinimages(19) + skinlines(120) = shifterskinimages(20) + skinlines(121) = shifterskinimages(21) + skinlines(122) = shifterskinimages(22) + skinlines(123) = shifterskinimages(23) + skinlines(124) = shifterskinimages(24) + skinlines(125) = shifterskinimages(25) + skinlines(126) = shifterskinimages(26) + skinlines(127) = shifterskinimages(27) + skinlines(128) = shifterskinimages(28) + skinlines(129) = shifterskinimages(29) + skinlines(130) = shifterskinimages(30) + skinlines(131) = shifterskinimages(31) + skinlines(132) = shifterskinimages(32) + skinlines(133) = shifterskinimages(33) + skinlines(134) = shifterskinimages(34) + skinlines(135) = shifterskinimages(35) + skinlines(136) = shifterskinimages(36) + skinlines(137) = shifterskinimages(37) + skinlines(138) = shifterskinimages(38) + skinlines(139) = shifterskinimages(39) + skinlines(140) = shifterskinimages(40) + skinlines(141) = shifterskinimages(41) + skinlines(142) = shifterskinimages(42) + skinlines(143) = shifterskinimages(43) + skinlines(144) = shifterskinimages(44) + skinlines(145) = shifterskinimages(45) + skinlines(146) = shifterskinimages(46) + skinlines(147) = shifterskinimages(47) + skinlines(148) = shifterskinimages(48) + skinlines(149) = shifterskinimages(49) + skinlines(150) = shifterskinimages(50) + + IO.File.WriteAllLines(ShiftOSPath + "Shiftum42\Skins\Current\skindata.dat", skinlines) + End Sub + + Private Sub setclocktime() + If ShiftOSDesktop.boughtsplitsecondtime = True Then + prepaneltimetext.Text = TimeOfDay + Else + If ShiftOSDesktop.boughtminuteaccuracytime = True Then + If Date.Now.Hour < 12 Then + prepaneltimetext.Text = TimeOfDay.Hour & ":" & Format(TimeOfDay.Minute, "00") & " AM" + Else + prepaneltimetext.Text = TimeOfDay.Hour - 12 & ":" & Format(TimeOfDay.Minute, "00") & " PM" + End If + Else + If ShiftOSDesktop.boughtpmandam = True Then + If Date.Now.Hour < 12 Then + prepaneltimetext.Text = TimeOfDay.Hour & " AM" + Else + prepaneltimetext.Text = TimeOfDay.Hour - 12 & " PM" + End If + Else + If ShiftOSDesktop.boughthourspastmidnight = True Then + prepaneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60 / 60) + Else + If ShiftOSDesktop.boughtminutespastmidnight = True Then + prepaneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60) + Else + If ShiftOSDesktop.boughtsecondspastmidnight = True Then + prepaneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds) + End If + End If + End If + End If + End If + End If + End Sub + + Private Sub pnlwindowsoptions_Paint(sender As Object, e As PaintEventArgs) Handles pnlwindowsoptions.Paint + 'e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlwindowsobjects.ClientRectangle) + End Sub + + Private Sub catholder_Paint(sender As Object, e As PaintEventArgs) Handles catholder.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), catholder.ClientRectangle) + End Sub + + Private Sub btnwindows_Click(sender As Object, e As EventArgs) Handles btnwindows.Click + pnlwindowsoptions.Location = New Point(133, 6) + pnlwindowsoptions.Size = New Size(458, 297) + pnlwindowsoptions.Show() + pnlwindowsoptions.BringToFront() + + End Sub + + + + Private Sub btnreset_Click(sender As Object, e As EventArgs) Handles btnreset.Click + pnlreset.Location = New Point(133, 6) + pnlreset.Size = New Size(458, 297) + pnlreset.Show() + pnlreset.BringToFront() + + End Sub + + Private Sub pnltitlebarcolour_Click(sender As Object, e As MouseEventArgs) Handles pnltitlebarcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Title Bar Colour" + Colour_Picker.oldcolour = titlebarcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Title Bar" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlbordercolour_Click(sender As Object, e As EventArgs) Handles pnlbordercolour.Click + Colour_Picker.colourtochange = "Window Border Colour" + Colour_Picker.oldcolour = windowbordercolour + Colour_Picker.Show() + End Sub + + Private Sub pnlclosebuttoncolour_Click(sender As Object, e As MouseEventArgs) Handles pnlclosebuttoncolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Close Button Colour" + Colour_Picker.oldcolour = closebuttoncolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Close Button" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlborderrightcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlborderrightcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Border Right Colour" + Colour_Picker.oldcolour = windowborderrightcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Border Right" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlborderleftcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlborderleftcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Border Left Colour" + Colour_Picker.oldcolour = windowborderleftcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Border Left" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlborderbottomcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlborderbottomcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Border Bottom Colour" + Colour_Picker.oldcolour = windowborderbottomcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Border Bottom" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlborderbottomleftcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlborderbottomleftcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Border Bottom Left Colour" + Colour_Picker.oldcolour = windowborderbottomleftcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Border Bottom Left" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlborderbottomrightcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlborderbottomrightcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Border Bottom Right Colour" + Colour_Picker.oldcolour = windowborderbottomrightcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Border Bottom Right" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnltitletextcolour_click(sender As Object, e As EventArgs) Handles pnltitletextcolour.Click + Colour_Picker.colourtochange = "Title Text Colour" + Colour_Picker.oldcolour = titletextcolour + Colour_Picker.Show() + End Sub + + Private Sub pnldesktoppanelcolour_Click(sender As Object, e As MouseEventArgs) Handles pnldesktoppanelcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Desktop Panel Colour" + Colour_Picker.oldcolour = desktoppanelcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Desktop Panel" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlpanelclocktextcolour_Click(sender As Object, e As EventArgs) Handles pnlpanelclocktextcolour.Click + Colour_Picker.colourtochange = "Clock Text Colour" + Colour_Picker.oldcolour = clocktextcolour + Colour_Picker.Show() + End Sub + + Private Sub pnlclockbackgroundcolour_Click(sender As Object, e As MouseEventArgs) Handles pnlclockbackgroundcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Clock Background Colour" + Colour_Picker.oldcolour = clockbackgroundcolor + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Clock Background" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnldesktopcolour_Click(sender As Object, e As MouseEventArgs) Handles pnldesktopcolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Desktop Background Colour" + Colour_Picker.oldcolour = desktopbackgroundcolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Desktop Background" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlmainbuttoncolour_Click(sender As Object, e As MouseEventArgs) Handles pnlmainbuttoncolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "App Launcher Button Colour" + Colour_Picker.oldcolour = applauncherbuttoncolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "App Launcher Button" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlmainbuttonactivated_Click(sender As Object, e As EventArgs) Handles pnlmainbuttonactivated.Click + Colour_Picker.colourtochange = "App Launcher Button Clicked Colour" + Colour_Picker.oldcolour = applauncherbuttonclickedcolour + Colour_Picker.Show() + End Sub + + Private Sub pnlmenuitemsmouseover_Click(sender As Object, e As EventArgs) Handles pnlmenuitemsmouseover.Click + Colour_Picker.colourtochange = "App Launcher Mouse Over Colour" + Colour_Picker.oldcolour = applaunchermouseovercolour + Colour_Picker.Show() + End Sub + + Private Sub pnlrollupbuttoncolour_Click(sender As Object, e As MouseEventArgs) Handles pnlrollupbuttoncolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Roll Up Button Colour" + Colour_Picker.oldcolour = rollupbuttoncolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Roll Up Button" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlmaintextcolour_Click(sender As Object, e As EventArgs) Handles pnlmaintextcolour.Click + Colour_Picker.colourtochange = "App Launcher Button Text Colour" + Colour_Picker.oldcolour = applicationsbuttontextcolour + Colour_Picker.Show() + End Sub + + Private Sub pnlpanelbuttontextcolour_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttontextcolour.Click + Colour_Picker.colourtochange = "Panel Button Text Colour" + Colour_Picker.oldcolour = panelbuttontextcolour + Colour_Picker.Show() + End Sub + + Private Sub pnlmenuitemscolour_Click(sender As Object, e As EventArgs) Handles pnlmenuitemscolour.Click + Colour_Picker.colourtochange = "App Launcher Items Background Colour" + Colour_Picker.oldcolour = applauncherbackgroundcolour + Colour_Picker.Show() + End Sub + + Private Sub pnltitlebarleftcornercolour_Click(sender As Object, e As MouseEventArgs) Handles pnltitlebarleftcornercolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Title Bar Left Corner Colour" + Colour_Picker.oldcolour = titlebarleftcornercolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Title Bar Left Corner" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnltitlebarrightcornercolour_Click(sender As Object, e As MouseEventArgs) Handles pnltitlebarrightcornercolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Title Bar Right Corner Colour" + Colour_Picker.oldcolour = titlebarrightcornercolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Title Bar Right Corner" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlminimizebuttoncolour_Click(sender As Object, e As MouseEventArgs) Handles pnlminimizebuttoncolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Minimize Button Colour" + Colour_Picker.oldcolour = minimizebuttoncolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Minimize Button" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnlpanelbuttoncolour_Click(sender As Object, e As MouseEventArgs) Handles pnlpanelbuttoncolour.Click + If e.Button = Windows.Forms.MouseButtons.Left Then + Colour_Picker.colourtochange = "Panel Button Colour" + Colour_Picker.oldcolour = panelbuttoncolour + Colour_Picker.Show() + Else + If ShiftOSDesktop.boughtskinning = True Then + Graphic_Picker.graphictochange = "Panel Button" + Graphic_Picker.Show() + End If + End If + End Sub + + Private Sub pnltitlebarcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnltitlebarcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnltitlebarcolour.ClientRectangle) + End Sub + + Private Sub pnltitlebaroptions_Paint(sender As Object, e As PaintEventArgs) Handles pnltitlebaroptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnltitlebaroptions.ClientRectangle) + End Sub + + Private Sub pnlbordercolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlbordercolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlbordercolour.ClientRectangle) + End Sub + + Private Sub pnlborderoptions_Paint(sender As Object, e As PaintEventArgs) Handles pnlborderoptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlborderoptions.ClientRectangle) + End Sub + + Private Sub btntitlebar_Click(sender As Object, e As EventArgs) Handles btntitlebar.Click + If ShiftOSDesktop.boughtshifttitlebar Then + pnltitlebaroptions.Show() + pnltitlebaroptions.Size = New Size(317, 134) + pnltitlebaroptions.Location = New Point(136, 159) + pnltitlebaroptions.BringToFront() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub btnborders_Click(sender As Object, e As EventArgs) Handles btnborders.Click + If ShiftOSDesktop.boughtshiftborders Then + pnlborderoptions.Show() + pnlborderoptions.Size = New Size(317, 134) + pnlborderoptions.Location = New Point(136, 159) + pnlborderoptions.BringToFront() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub txttitlebarheight_KeyPress(sender As Object, e As KeyPressEventArgs) Handles txttitlebarheight.KeyPress, txtclosebuttonheight.KeyPress, txtclosebuttonwidth.KeyPress, txtclosebuttonfromtop.KeyPress, txtclosebuttonfromside.KeyPress, txtbordersize.KeyPress, txttitletexttop.KeyPress, txttitletextside.KeyPress, txttitletextsize.KeyPress, txtdesktoppanelheight.KeyPress, txtclocktextsize.KeyPress, txtclocktextfromtop.KeyPress, txtapplicationsbuttonheight.KeyPress, txtappbuttontextsize.KeyPress, txtrollupbuttonheight.KeyPress, txtrollupbuttonwidth.KeyPress, txtrollupbuttontop.KeyPress, txtrollupbuttonside.KeyPress, txttitlebarcornerwidth.KeyPress, txtapplauncherwidth.KeyPress, txticonfromside.KeyPress, txticonfromtop.KeyPress, txtminimizebuttonheight.KeyPress, txtminimizebuttonwidth.KeyPress, txtminimizebuttonside.KeyPress, txtminimizebuttontop.KeyPress, txtpanelbuttoninitalgap.KeyPress, txtpanelbuttontop.KeyPress, txtpanelbuttonwidth.KeyPress, txtpanelbuttonheight.KeyPress, txtpanelbuttongap.KeyPress, txtpaneltextbuttonsize.KeyPress, txtpanelbuttontextside.KeyPress, txtpanelbuttontexttop.KeyPress, txtpanelbuttoniconsize.KeyPress, txtpanelbuttoniconsize.KeyPress, txtpanelbuttoniconside.KeyPress, txtpanelbuttonicontop.KeyPress + + If Asc(e.KeyChar) <> 8 Then + If Asc(e.KeyChar) < 48 Or Asc(e.KeyChar) > 57 Then + e.Handled = True + End If + End If + End Sub + + Private Sub txttitlebarheight_TextChanged(sender As Object, e As EventArgs) Handles txttitlebarheight.TextChanged + If txttitlebarheight.Text = "" Then + Else + titlebarheight = txttitlebarheight.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub btnclosebutton_Click(sender As Object, e As EventArgs) Handles btnbuttons.Click + If ShiftOSDesktop.boughtshifttitlebuttons Then + pnlbuttonoptions.Show() + pnlbuttonoptions.Size = New Size(317, 134) + pnlbuttonoptions.Location = New Point(136, 159) + pnlbuttonoptions.BringToFront() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub pnlclosebuttonoptions_Paint(sender As Object, e As PaintEventArgs) Handles pnlbuttonoptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlbuttonoptions.ClientRectangle) + End Sub + + Private Sub pnlclosebuttoncolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlclosebuttoncolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlclosebuttoncolour.ClientRectangle) + End Sub + + Private Sub txtclosebuttonheight_TextChanged(sender As Object, e As EventArgs) Handles txtclosebuttonheight.TextChanged + If txtclosebuttonheight.Text = "" Then + Else + closebuttonheight = txtclosebuttonheight.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtclosebuttonwidth_TextChanged(sender As Object, e As EventArgs) Handles txtclosebuttonwidth.TextChanged + If txtclosebuttonwidth.Text = "" Then + Else + closebuttonwidth = txtclosebuttonwidth.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtclosebuttonfromtop_TextChanged(sender As Object, e As EventArgs) Handles txtclosebuttonfromtop.TextChanged + If txtclosebuttonfromtop.Text = "" Then + Else + closebuttontop = txtclosebuttonfromtop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtclosebuttonfromside_TextChanged(sender As Object, e As EventArgs) Handles txtclosebuttonfromside.TextChanged + If txtclosebuttonfromside.Text = "" Then + Else + closebuttonside = txtclosebuttonfromside.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtbordersize_TextChanged(sender As Object, e As EventArgs) Handles txtbordersize.TextChanged + If txtbordersize.Text = "" Then + Else + windowbordersize = txtbordersize.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub btntitletext_Click(sender As Object, e As EventArgs) Handles btntitletext.Click + If ShiftOSDesktop.boughtshifttitletext Then + pnltitletextoptions.Show() + pnltitletextoptions.Size = New Size(317, 134) + pnltitletextoptions.Location = New Point(136, 159) + pnltitletextoptions.BringToFront() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub txttitletexttop_TextChanged(sender As Object, e As EventArgs) Handles txttitletexttop.TextChanged + If txttitletexttop.Text = "" Then + Else + titletexttop = txttitletexttop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txttitletextside_TextChanged(sender As Object, e As EventArgs) Handles txttitletextside.TextChanged + If txttitletextside.Text = "" Then + Else + titletextside = txttitletextside.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub pnltitletextcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnltitletextcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnltitletextcolour.ClientRectangle) + End Sub + + Private Sub combotitletextfont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles combotitletextfont.SelectedIndexChanged + If combotitletextfont.Text = "" Then + Else + titletextfont = combotitletextfont.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub cbpanelbuttonfont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbpanelbuttonfont.SelectedIndexChanged + If cbpanelbuttonfont.Text = "" Then + Else + panelbuttontextfont = cbpanelbuttonfont.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub pnltitletextoptions_Paint(sender As Object, e As PaintEventArgs) Handles pnltitletextoptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnltitletextoptions.ClientRectangle) + End Sub + + Private Sub txttitletextsize_TextChanged(sender As Object, e As EventArgs) Handles txttitletextsize.TextChanged + If txttitletextsize.Text = "" OrElse txttitletextsize.Text = "0" Then + Else + titletextsize = txttitletextsize.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub combotitletextstyle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles combotitletextstyle.SelectedIndexChanged + Select Case combotitletextstyle.Text + Case "Bold" + titletextstyle = FontStyle.Bold + Case "Italic" + titletextstyle = FontStyle.Italic + Case "Regular" + titletextstyle = FontStyle.Regular + Case "Strikeout" + titletextstyle = FontStyle.Strikeout + Case "Underline" + titletextstyle = FontStyle.Underline + End Select + setuppreshifterstuff() + + End Sub + + Private Sub btndesktop_Click(sender As Object, e As EventArgs) Handles btndesktop.Click + pnldesktopoptions.Location = New Point(133, 6) + pnldesktopoptions.Size = New Size(458, 297) + pnldesktopoptions.Show() + pnldesktopoptions.BringToFront() + End Sub + + Private Sub btndesktoppanel_Click(sender As Object, e As EventArgs) Handles btndesktoppanel.Click + If ShiftOSDesktop.boughtshiftdesktoppanel Then + Try + pnldesktoppaneloptions.Show() + pnldesktoppaneloptions.Size = New Size(317, 134) + pnldesktoppaneloptions.Location = New Point(136, 159) + pnldesktoppaneloptions.BringToFront() + Catch ex As OutOfMemoryException + infobox.showinfo("Memory Error", "There has been a memory error while accessing the desktop settings. Operation aborted.") + End Try + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub btnpanelbuttons_Click(sender As Object, e As EventArgs) Handles btnpanelbuttons.Click + If ShiftOSDesktop.boughtshiftpanelbuttons Then + pnlpanelbuttonsoptions.Show() + pnlpanelbuttonsoptions.Size = New Size(317, 134) + pnlpanelbuttonsoptions.Location = New Point(136, 159) + pnlpanelbuttonsoptions.BringToFront() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub pnldesktoppanelcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnldesktoppanelcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnldesktoppanelcolour.ClientRectangle) + End Sub + + Private Sub pnldesktoppaneloptions_Paint(sender As Object, e As PaintEventArgs) Handles pnldesktoppaneloptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnldesktoppaneloptions.ClientRectangle) + End Sub + + Private Sub pnldesktopbackgroundoptions_Paint(sender As Object, e As PaintEventArgs) Handles pnldesktopbackgroundoptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnldesktopbackgroundoptions.ClientRectangle) + End Sub + + Private Sub pnldesktopcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnldesktopcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnldesktopcolour.ClientRectangle) + End Sub + + Private Sub pnlpanelclockoptions_Paint(sender As Object, e As PaintEventArgs) Handles pnlpanelclockoptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlpanelclockoptions.ClientRectangle) + End Sub + + Private Sub pnlpanelclockcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlpanelclocktextcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlpanelclocktextcolour.ClientRectangle) + End Sub + + Private Sub pnlclockbackgroundcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlclockbackgroundcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlclockbackgroundcolour.ClientRectangle) + End Sub + + Private Sub pnltitlebarleftcornercolour_Paint(sender As Object, e As PaintEventArgs) Handles pnltitlebarleftcornercolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnltitlebarleftcornercolour.ClientRectangle) + End Sub + + Private Sub pnltitlebarrightcornercolour_Paint(sender As Object, e As PaintEventArgs) Handles pnltitlebarrightcornercolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnltitlebarrightcornercolour.ClientRectangle) + End Sub + + Private Sub pnlapplauncheroptions_Paint(sender As Object, e As PaintEventArgs) Handles pnlapplauncheroptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlapplauncheroptions.ClientRectangle) + End Sub + + Private Sub Panel5_Paint(sender As Object, e As PaintEventArgs) Handles pnlmainbuttoncolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlmainbuttoncolour.ClientRectangle) + End Sub + + Private Sub Panel1_Paint(sender As Object, e As PaintEventArgs) Handles pnlmainbuttonactivated.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlmainbuttonactivated.ClientRectangle) + End Sub + + Private Sub Panel3_Paint(sender As Object, e As PaintEventArgs) Handles pnlmenuitemscolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlmenuitemscolour.ClientRectangle) + End Sub + + Private Sub Panel2_Paint(sender As Object, e As PaintEventArgs) Handles pnlmenuitemsmouseover.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlmenuitemsmouseover.ClientRectangle) + End Sub + + Private Sub pnlmaintextcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlmaintextcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlmaintextcolour.ClientRectangle) + End Sub + + Private Sub pnlborderbottomcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlborderbottomcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlborderbottomcolour.ClientRectangle) + End Sub + + Private Sub pnlborderleftcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlborderleftcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlborderleftcolour.ClientRectangle) + End Sub + + Private Sub pnlborderrightcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlborderrightcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlborderrightcolour.ClientRectangle) + End Sub + + Private Sub pnlborderbottomleftcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlborderbottomleftcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlborderbottomleftcolour.ClientRectangle) + End Sub + + Private Sub pnlborderbottomrightcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlborderbottomrightcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlborderbottomrightcolour.ClientRectangle) + End Sub + + Private Sub pnlpanelbuttonsoptions_Paint(sender As Object, e As PaintEventArgs) Handles pnlpanelbuttonsoptions.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlpanelbuttonsoptions.ClientRectangle) + End Sub + + Private Sub pnlpanelbuttoncolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlpanelbuttoncolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlpanelbuttoncolour.ClientRectangle) + End Sub + + Private Sub pnlpanelbuttontextcolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlpanelbuttontextcolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlpanelbuttontextcolour.ClientRectangle) + End Sub + + Private Sub btndesktopitself_Click(sender As Object, e As EventArgs) Handles btndesktopitself.Click + If ShiftOSDesktop.boughtshiftdesktop Then + pnldesktopbackgroundoptions.Show() + pnldesktopbackgroundoptions.Size = New Size(317, 134) + pnldesktopbackgroundoptions.Location = New Point(136, 159) + pnldesktopbackgroundoptions.BringToFront() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub txtdesktoppanelheight_TextChanged(sender As Object, e As EventArgs) Handles txtdesktoppanelheight.TextChanged + If txtdesktoppanelheight.Text = "" Then + Else + desktoppanelheight = txtdesktoppanelheight.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub combodesktoppanelposition_SelectedIndexChanged(sender As Object, e As EventArgs) Handles combodesktoppanelposition.SelectedIndexChanged + Select Case combodesktoppanelposition.Text + Case "Top" + desktoppanelposition = "Top" + Case "Bottom" + desktoppanelposition = "Bottom" + End Select + setuppreshifterstuff() + End Sub + + Private Sub btnpanelclock_Click(sender As Object, e As EventArgs) Handles btnpanelclock.Click + If ShiftOSDesktop.boughtshiftpanelclock Then + pnlpanelclockoptions.Show() + pnlpanelclockoptions.Size = New Size(317, 134) + pnlpanelclockoptions.Location = New Point(136, 159) + pnlpanelclockoptions.BringToFront() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub comboclocktextfont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles comboclocktextfont.SelectedIndexChanged + If comboclocktextfont.Text = "" Then + Else + panelclocktextfont = comboclocktextfont.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub comboclocktextstyle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles comboclocktextstyle.SelectedIndexChanged + Select Case comboclocktextstyle.Text + Case "Bold" + panelclocktextstyle = FontStyle.Bold + Case "Italic" + panelclocktextstyle = FontStyle.Italic + Case "Regular" + panelclocktextstyle = FontStyle.Regular + Case "Strikeout" + panelclocktextstyle = FontStyle.Strikeout + Case "Underline" + panelclocktextstyle = FontStyle.Underline + End Select + setuppreshifterstuff() + End Sub + + Private Sub txtclocktextfromtop_TextChanged(sender As Object, e As EventArgs) Handles txtclocktextfromtop.TextChanged + If txtclocktextfromtop.Text = "" Then + Else + panelclocktexttop = txtclocktextfromtop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtclocktextsize_TextChanged(sender As Object, e As EventArgs) Handles txtclocktextsize.TextChanged + If txtclocktextsize.Text = "" OrElse txtclocktextsize.Text = "0" Then + Else + panelclocktextsize = txtclocktextsize.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txttitlebarnornerwidth_TextChanged(sender As Object, e As EventArgs) Handles txttitlebarcornerwidth.TextChanged + If txttitlebarcornerwidth.Text = "" OrElse txttitlebarcornerwidth.Text = "0" Then + Else + titlebarcornerwidth = txttitlebarcornerwidth.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub btnapplauncher_Click(sender As Object, e As EventArgs) Handles btnapplauncher.Click + If ShiftOSDesktop.boughtshiftapplauncher Then + pnlapplauncheroptions.Show() + pnlapplauncheroptions.Size = New Size(317, 134) + pnlapplauncheroptions.Location = New Point(136, 159) + pnlapplauncheroptions.BringToFront() + pnllauncheritems.Hide() + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Private Sub predesktopappmenu_MouseEnter(sender As Object, e As EventArgs) Handles predesktopappmenu.MouseEnter + Me.Focus() + End Sub + + Private Sub Shifter_MouseEnter(sender As Object, e As EventArgs) Handles ApplicationsToolStripMenuItem.MouseEnter + ToolStripManager.Renderer = New MyPreviewToolStripRenderer() + 'ShiftOSDesktop.ApplicationsToolStripMenuItem.BackColor = ShiftOSDesktop.applauncherbuttoncolour + End Sub + + Private Sub txtapplicationsbuttonheight_TextChanged(sender As Object, e As EventArgs) Handles txtapplicationsbuttonheight.TextChanged + If txtapplicationsbuttonheight.Text = "" Then + Else + If txtapplicationsbuttonheight.Text > desktoppanelheight Then + infobox.title = "Shifter - Illegal Setting!" + infobox.textinfo = "The height of the application menu button can not exceed the height of the desktop panel." & Environment.NewLine & Environment.NewLine & "The application menu button height has been automatically reduced." + infobox.Show() + txtapplicationsbuttonheight.Text = applicationbuttonheight + Else + applicationbuttonheight = txtapplicationsbuttonheight.Text + setuppreshifterstuff() + End If + End If + End Sub + + Private Sub txtappbuttontextsize_TextChanged(sender As Object, e As EventArgs) Handles txtappbuttontextsize.TextChanged + If txtappbuttontextsize.Text = "" OrElse txtappbuttontextsize.Text = "0" Then + Else + applicationbuttontextsize = txtappbuttontextsize.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub comboappbuttontextstyle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles comboappbuttontextstyle.SelectedIndexChanged + Select Case comboappbuttontextstyle.Text + Case "Bold" + applicationbuttontextstyle = FontStyle.Bold + Case "Italic" + applicationbuttontextstyle = FontStyle.Italic + Case "Regular" + applicationbuttontextstyle = FontStyle.Regular + Case "Strikeout" + applicationbuttontextstyle = FontStyle.Strikeout + Case "Underline" + applicationbuttontextstyle = FontStyle.Underline + End Select + setuppreshifterstuff() + End Sub + + Private Sub cbpanelbuttontextstyle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbpanelbuttontextstyle.SelectedIndexChanged + Select Case cbpanelbuttontextstyle.Text + Case "Bold" + panelbuttontextstyle = FontStyle.Bold + Case "Italic" + panelbuttontextstyle = FontStyle.Italic + Case "Regular" + panelbuttontextstyle = FontStyle.Regular + Case "Strikeout" + panelbuttontextstyle = FontStyle.Strikeout + Case "Underline" + panelbuttontextstyle = FontStyle.Underline + End Select + setuppreshifterstuff() + End Sub + + Private Sub comboappbuttontextfont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles comboappbuttontextfont.SelectedIndexChanged + If comboappbuttontextfont.Text = "" Then + Else + applicationbuttontextfont = comboappbuttontextfont.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtappbuttonlabel_TextChanged(sender As Object, e As EventArgs) Handles txtappbuttonlabel.TextChanged + If txtappbuttonlabel.Text = "" Then + Else + applicationlaunchername = txtappbuttonlabel.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub combotitletextposition_SelectedIndexChanged(sender As Object, e As EventArgs) Handles combotitletextposition.SelectedIndexChanged + Select Case combotitletextposition.Text + Case "Left" + titletextposition = "Left" + Case "Centre" + titletextposition = "Centre" + End Select + setuppreshifterstuff() + End Sub + + Private Sub pnlrollupbuttoncolour_Paint(sender As Object, e As PaintEventArgs) Handles pnlrollupbuttoncolour.Paint + e.Graphics.DrawRectangle(New Pen(Color.Black, 2), pnlrollupbuttoncolour.ClientRectangle) + End Sub + + Private Sub combobuttonoption_SelectedIndexChanged(sender As Object, e As EventArgs) Handles combobuttonoption.SelectedIndexChanged + Select Case combobuttonoption.Text + Case "Close Button" + pnlclosebuttonoptions.Show() + pnlclosebuttonoptions.BringToFront() + pnlclosebuttonoptions.Location = New Point(1, 27) + pnlclosebuttonoptions.Size = New Size(315, 104) + Case "Roll Up Button" + pnlrollupbuttonoptions.Show() + pnlrollupbuttonoptions.BringToFront() + pnlrollupbuttonoptions.Location = New Point(1, 27) + pnlrollupbuttonoptions.Size = New Size(315, 104) + Case "Minimize Button" + pnlminimizebuttonoptions.Show() + pnlminimizebuttonoptions.BringToFront() + pnlminimizebuttonoptions.Location = New Point(1, 27) + pnlminimizebuttonoptions.Size = New Size(315, 104) + End Select + setuppreshifterstuff() + End Sub + + Private Sub txtrollupbuttonheight_TextChanged(sender As Object, e As EventArgs) Handles txtrollupbuttonheight.TextChanged + If txtrollupbuttonheight.Text = "" Then + Else + rollupbuttonheight = txtrollupbuttonheight.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtrollupbuttonwidth_TextChanged(sender As Object, e As EventArgs) Handles txtrollupbuttonwidth.TextChanged + If txtrollupbuttonwidth.Text = "" Then + Else + rollupbuttonwidth = txtrollupbuttonwidth.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtrollupbuttontop_TextChanged(sender As Object, e As EventArgs) Handles txtrollupbuttontop.TextChanged + If txtrollupbuttontop.Text = "" Then + Else + rollupbuttontop = txtrollupbuttontop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtrollupbuttonside_TextChanged(sender As Object, e As EventArgs) Handles txtrollupbuttonside.TextChanged + If txtrollupbuttonside.Text = "" Then + Else + rollupbuttonside = txtrollupbuttonside.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtapplauncherwidth_TextChanged(sender As Object, e As EventArgs) Handles txtapplauncherwidth.TextChanged + If txtapplauncherwidth.Text = "" Then + Else + applaunchermenuholderwidth = txtapplauncherwidth.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txticonfromside_TextChanged(sender As Object, e As EventArgs) Handles txticonfromside.TextChanged + If txticonfromside.Text = "" Then + Else + titlebariconside = txticonfromside.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txticonfromtop_TextChanged(sender As Object, e As EventArgs) Handles txticonfromtop.TextChanged + If txticonfromtop.Text = "" Then + Else + titlebaricontop = txticonfromtop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtminimizebuttonheight_TextChanged(sender As Object, e As EventArgs) Handles txtminimizebuttonheight.TextChanged + If txtminimizebuttonheight.Text = "" Then + Else + minimizebuttonheight = txtminimizebuttonheight.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtminimizebuttonwidth_TextChanged(sender As Object, e As EventArgs) Handles txtminimizebuttonwidth.TextChanged + If txtminimizebuttonwidth.Text = "" Then + Else + minimizebuttonwidth = txtminimizebuttonwidth.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtminimizebuttontop_TextChanged(sender As Object, e As EventArgs) Handles txtminimizebuttontop.TextChanged + If txtminimizebuttontop.Text = "" Then + Else + minimizebuttontop = txtminimizebuttontop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtminimizebuttonside_TextChanged(sender As Object, e As EventArgs) Handles txtminimizebuttonside.TextChanged + If txtminimizebuttonside.Text = "" Then + Else + minimizebuttonside = txtminimizebuttonside.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttoninitalgap_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttoninitalgap.TextChanged + If txtpanelbuttoninitalgap.Text = "" Then + Else + panelbuttoninitialgap = txtpanelbuttoninitalgap.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttontop_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttontop.TextChanged + If txtpanelbuttontop.Text = "" Then + Else + panelbuttonfromtop = txtpanelbuttontop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttonwidth_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttonwidth.TextChanged + If txtpanelbuttonwidth.Text = "" Then + Else + panelbuttonwidth = txtpanelbuttonwidth.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttonheight_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttonheight.TextChanged + If txtpanelbuttonheight.Text = "" Then + Else + panelbuttonheight = txtpanelbuttonheight.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttongap_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttongap.TextChanged + If txtpanelbuttongap.Text = "" Then + Else + panelbuttongap = txtpanelbuttongap.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpaneltextbuttonsize_TextChanged(sender As Object, e As EventArgs) Handles txtpaneltextbuttonsize.TextChanged + If txtpaneltextbuttonsize.Text = "" Then + Else + panelbuttontextsize = txtpaneltextbuttonsize.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttontextside_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttontextside.TextChanged + If txtpanelbuttontextside.Text = "" Then + Else + panelbuttontextside = txtpanelbuttontextside.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttontexttop_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttontexttop.TextChanged + If txtpanelbuttontexttop.Text = "" Then + Else + panelbuttontexttop = txtpanelbuttontexttop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttoniconsize_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttoniconsize.TextChanged + If txtpanelbuttoniconsize.Text = "" Then + Else + panelbuttoniconsize = txtpanelbuttoniconsize.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttoniconside_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttoniconside.TextChanged + If txtpanelbuttoniconside.Text = "" Then + Else + panelbuttoniconside = txtpanelbuttoniconside.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub txtpanelbuttonicontop_TextChanged(sender As Object, e As EventArgs) Handles txtpanelbuttonicontop.TextChanged + If txtpanelbuttonicontop.Text = "" Then + Else + panelbuttonicontop = txtpanelbuttonicontop.Text + setuppreshifterstuff() + End If + End Sub + + Private Sub customizationtime_Tick(sender As Object, e As EventArgs) Handles customizationtime.Tick + If customizationsdone > -10 Then + customizationtimepoints = customizationtimepoints + 1 + customizationsdone = customizationsdone - 1 + End If + End Sub + + Private Sub timerearned_Tick(sender As Object, e As EventArgs) Handles timerearned.Tick + btnapply.Text = "Apply Changes" + btnapply.BackColor = Color.White + btnapply.ForeColor = Color.Black + timerearned.Stop() + End Sub + + Private Sub cboxtitlebarcorners_CheckedChanged(sender As Object, e As EventArgs) Handles cboxtitlebarcorners.CheckedChanged + If cboxtitlebarcorners.CheckState = CheckState.Checked Then + prepgtoplcorner.Show() + prepgtoprcorner.Show() + pnltitlebarleftcornercolour.Show() + pnltitlebarrightcornercolour.Show() + txttitlebarcornerwidth.Show() + lbcornerwidth.Show() + lbcornerwidthpx.Show() + lbleftcornercolor.Show() + lbrightcornercolor.Show() + showwindowcorners = True + Else + prepgtoplcorner.Hide() + prepgtoprcorner.Hide() + pnltitlebarleftcornercolour.Hide() + pnltitlebarrightcornercolour.Hide() + txttitlebarcornerwidth.Hide() + lbcornerwidth.Hide() + lbcornerwidthpx.Hide() + lbleftcornercolor.Hide() + lbrightcornercolor.Hide() + showwindowcorners = False + End If + End Sub + + Private Sub cbindividualbordercolours_CheckedChanged(sender As Object, e As EventArgs) Handles cbindividualbordercolours.CheckedChanged + If cbindividualbordercolours.CheckState = CheckState.Checked Then + Label73.Show() + Label74.Show() + Label75.Show() + Label76.Show() + Label77.Show() + pnlborderleftcolour.Show() + pnlborderrightcolour.Show() + pnlborderbottomcolour.Show() + pnlborderbottomrightcolour.Show() + pnlborderbottomleftcolour.Show() + Else + Label73.Hide() + Label74.Hide() + Label75.Hide() + Label76.Hide() + Label77.Hide() + pnlborderleftcolour.Hide() + pnlborderrightcolour.Hide() + pnlborderbottomcolour.Hide() + pnlborderbottomrightcolour.Hide() + pnlborderbottomleftcolour.Hide() + End If + End Sub + + Private Sub btnresetallsettings_Click(sender As Object, e As EventArgs) Handles btnresetallsettings.Click + Skins.setupdefaults() + + Skins.saveskinfiles(False) + + setupbuttons() + initialsetup() + determinevisibleobjects() + setuppreshifterstuff() + AddFonts() + justopened = True + ShiftOSDesktop.setupdesktop() + + 'postsettings() + 'If ShiftOSDesktop.boughtknowledgeinputicon = True Then titletextside = titletextside + 22 + 'setuppreshifterstuff() + 'applysettings() + End Sub + + 'required to fix flashing applauncher button problem + Public Sub ApplicationsToolStripMenuItem_Paint(sender As Object, e As PaintEventArgs) Handles ApplicationsToolStripMenuItem.Paint + If ApplicationsToolStripMenuItem.BackgroundImage Is Nothing Then + Else + e.Graphics.DrawImage(ApplicationsToolStripMenuItem.BackgroundImage, 0, 0, ApplicationsToolStripMenuItem.BackgroundImage.Width, ApplicationsToolStripMenuItem.BackgroundImage.Height) + End If + End Sub + + Private Sub tmrfix_Tick(sender As Object, e As EventArgs) Handles tmrfix.Tick + + + + tmrfix.Stop() + End Sub + + Private Sub tmrdelay_Tick(sender As Object, e As EventArgs) Handles tmrdelay.Tick + timingissuefixer = +1 + End Sub + + Private Sub btnshowlauncheritems_Click(sender As Object, e As EventArgs) Handles btnshowlauncheritems.Click + If ShiftOSDesktop.boughtshiftapplauncheritems Then + pnllauncheritems.Dock = DockStyle.Fill + pnllauncheritems.Show() + pnllauncheritems.BringToFront() + + + Else + infobox.title = "Shifter - Setting not found!" + infobox.textinfo = "This setting can not be altered due to no system configuration files matching this option." & Environment.NewLine & Environment.NewLine & "The system files required are either corrupt or do not exist!" + infobox.Show() + End If + End Sub + + Dim oldlaunchervalue As Integer = 10 + Private Sub txtlauncheritemtxtsize_TextChanged(sender As Object, e As EventArgs) Handles txtlauncheritemtxtsize.TextChanged + If txtlauncheritemtxtsize.Text = "" Then txtlauncheritemtxtsize.Text = 1 + If Not IsNumeric(txtlauncheritemtxtsize.Text) Then txtlauncheritemtxtsize.Text = oldlaunchervalue + If txtlauncheritemtxtsize.Text < 1 Then txtlauncheritemtxtsize.Text = 1 + If txtlauncheritemtxtsize.Text > 100 Then txtlauncheritemtxtsize.Text = 100 + oldlaunchervalue = txtlauncheritemtxtsize.Text + setuppreshifterstuff() + End Sub + + Private Sub launchercolourclick() Handles launcheritemtxtcolour.Click + Colour_Picker.Show() + Colour_Picker.colourtochange = "launcher items text colour" + End Sub + + Private Sub launcheritemfont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles launcheritemfont.SelectedIndexChanged + setuppreshifterstuff() + End Sub + + Private Sub launcheritemstyle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles launcheritemstyle.SelectedIndexChanged + setuppreshifterstuff() + End Sub + + Private Sub btndeskdoubleplus_Click(sender As Object, e As EventArgs) Handles btndeskdoubleplus.Click + pnldeskdoubleplus.BringToFront() + End Sub + + + + Public Sub refreshIcons() + desktopiconspreview.Items.Clear() + If Skins.showicons = True Then + desktopiconspreview.LargeImageList = File_Skimmer.ImageList1 + desktopiconspreview.SmallImageList = File_Skimmer.ImageList1 + + Dim dir As New IO.DirectoryInfo("C:\ShiftOS\Home\Desktop") + Dim files As IO.FileInfo() = dir.GetFiles() + Dim file As IO.FileInfo + Dim folders As IO.DirectoryInfo() = dir.GetDirectories() + Dim folder As IO.DirectoryInfo + Dim filetype As Integer + For Each folder In folders + Dim Str(3) As String + + Str(0) = folder.Name + Str(1) = folder.LastAccessTime + Str(2) = "Directory" + + Dim folderIcon As New ListViewItem + folderIcon.Text = Str(0) + folderIcon.Tag = folder.FullName + folderIcon.SubItems.Add(Str(1)) + folderIcon.SubItems.Add(Str(2)) + folderIcon.ImageIndex = 0 + + desktopiconspreview.Items.Add(folderIcon) + Next + + For Each file In files + Dim filename As String = file.Name + Dim fileex As String = file.Extension + Dim program As String + Dim item As New ListViewItem + + item.Text = filename + item.Tag = file.FullName + item.SubItems.Add(file.LastWriteTime) + + filetype = File_Skimmer.getExType(fileex)(0) + program = File_Skimmer.getExType(fileex)(1) + + item.SubItems.Add(program) + item.ImageIndex = filetype + desktopiconspreview.Items.Add(item) + Next + End If + End Sub + + Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged + + End Sub + + Private Sub btndppfunctions_Click(sender As Object, e As EventArgs) Handles btndppfunctions.Click + pnldppfunctions.BringToFront() + End Sub + + Private Sub btndppicons_Click(sender As Object, e As EventArgs) Handles btndppicons.Click + pnldppicons.BringToFront() + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + Colour_Picker.colourtochange = "Desktop Icon Text Color" + Colour_Picker.oldcolour = icontextcolor + Colour_Picker.Show() + Button1.BackColor = icontextcolor + desktopiconspreview.ForeColor = icontextcolor + End Sub + + Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click + pnlshiftadvapplauncher.BringToFront() + + End Sub + + Private Sub Button8_Click(sender As Object, e As EventArgs) Handles btnaalusrtextcolor.Click + Colour_Picker.colourtochange = "Username Text Color" + Colour_Picker.oldcolour = usernametextcolor + Colour_Picker.Show() + btnaalusrtextcolor.BackColor = usernametextcolor + End Sub + + Private Sub cmbaalusrfont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbaalusrfont.SelectedIndexChanged + usernamefont = cmbaalusrfont.SelectedItem + End Sub + + Private Sub nudusrsize_ValueChanged(sender As Object, e As EventArgs) Handles nudusrsize.ValueChanged + If Not nudusrsize.Value = 0 Then + usernamefontsize = nudusrsize.Value + Else + nudusrsize.Value = 1 + End If + + End Sub + + Private Sub cmbaalusrstyle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbaalusrstyle.SelectedIndexChanged + Select Case cmbaalusrstyle.SelectedItem + Case "Regular" + usernamefontstyle = FontStyle.Regular + Case "Bold" + usernamefontstyle = FontStyle.Bold + Case "Italic" + usernamefontstyle = FontStyle.Italic + Case "Underline" + usernamefontstyle = FontStyle.Underline + Case Else + usernamefontstyle = FontStyle.Regular + End Select + End Sub + + + Private Sub btnaalusrpnlbg_Click(sender As Object, e As MouseEventArgs) Handles btnaalusrpnlbg.MouseDown + If e.Button = Windows.Forms.MouseButtons.Right Then + Graphic_Picker.graphictochange = "Username Panel Background" + Graphic_Picker.ShowDialog() + Try + btnaalusrpnlbg.BackgroundImage = skinuserpanel(0) + Catch + btnaalusrpnlbg.BackgroundImage = Nothing + End Try + btnaalusrpnlbg.BackgroundImageLayout = usrbglayout + Else + Colour_Picker.colourtochange = "Username Panel Background" + Colour_Picker.oldcolour = usernamebgcolor + Colour_Picker.ShowDialog() + btnaalusrpnlbg.BackColor = usernamebgcolor + End If + End Sub + + Private Sub btnaalpwrpnlbg_Click(sender As Object, e As MouseEventArgs) Handles btnaalpwrpnlbg.MouseDown + If e.Button = Windows.Forms.MouseButtons.Right Then + Graphic_Picker.graphictochange = "Shutdown Button Background" + Graphic_Picker.ShowDialog() + Try + btnaalpwrpnlbg.BackgroundImage = skinshutdownbutton(0) + Catch + btnaalpwrpnlbg.BackgroundImage = Nothing + End Try + btnaalpwrpnlbg.BackgroundImageLayout = usrbglayout + Else + Colour_Picker.colourtochange = "Shutdown Button Background" + Colour_Picker.oldcolour = powerpanelbgcolor + Colour_Picker.ShowDialog() + btnaalpwrpnlbg.BackColor = usernamebgcolor + End If + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Shiftnet.Designer.vb b/ShiftOS/Shiftnet.Designer.vb new file mode 100644 index 0000000..36b53cd --- /dev/null +++ b/ShiftOS/Shiftnet.Designer.vb @@ -0,0 +1,4842 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Shiftnet + 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() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Shiftnet)) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlquickchat = New System.Windows.Forms.Panel() + Me.pnlquickchathome = New System.Windows.Forms.Panel() + Me.Panel7 = New System.Windows.Forms.Panel() + Me.tbqcusers = New System.Windows.Forms.ListView() + Me.tbqcchat = New System.Windows.Forms.TextBox() + Me.tbqctype = New System.Windows.Forms.TextBox() + Me.qchome = New System.Windows.Forms.Label() + Me.pnlquickchatoffline = New System.Windows.Forms.Panel() + Me.qcpanel = New System.Windows.Forms.Panel() + Me.tbqcochat = New System.Windows.Forms.TextBox() + Me.Label24 = New System.Windows.Forms.Label() + Me.tbqchomebtn = New System.Windows.Forms.Label() + Me.pnlxenonh = New System.Windows.Forms.Panel() + Me.pnlxenonhhome = New System.Windows.Forms.Panel() + Me.tbxenonhquickchat = New System.Windows.Forms.Label() + Me.Label10 = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.Label19 = New System.Windows.Forms.Label() + Me.Label18 = New System.Windows.Forms.Label() + Me.Label17 = New System.Windows.Forms.Label() + Me.Label16 = New System.Windows.Forms.Label() + Me.Label15 = New System.Windows.Forms.Label() + Me.Label14 = New System.Windows.Forms.Label() + Me.pnlpostspot = New System.Windows.Forms.Panel() + Me.pnlpostspothome = New System.Windows.Forms.Panel() + Me.tbxenonhurl = New System.Windows.Forms.Label() + Me.tbpostspothomeshifterhackerlink = New System.Windows.Forms.Label() + Me.tbpostspothomecontent = New System.Windows.Forms.Label() + Me.tbpostspothomead = New System.Windows.Forms.Label() + Me.tbpostspothomesubtext = New System.Windows.Forms.Label() + Me.tbpostspothomepostspot = New System.Windows.Forms.Label() + Me.pnlpirateboat = New System.Windows.Forms.Panel() + Me.pnlpirateboatmain = New System.Windows.Forms.Panel() + Me.tpbsearchresults = New System.Windows.Forms.ListView() + Me.tpbsearch = New System.Windows.Forms.TextBox() + Me.TextBox4 = New System.Windows.Forms.TextBox() + Me.TextBox3 = New System.Windows.Forms.TextBox() + Me.Label23 = New System.Windows.Forms.Label() + Me.Label22 = New System.Windows.Forms.Label() + Me.TextBox2 = New System.Windows.Forms.TextBox() + Me.tbpbfglink1 = New System.Windows.Forms.Label() + Me.Label13 = New System.Windows.Forms.Label() + Me.tbpbWarning = New System.Windows.Forms.Label() + Me.tbpbMSG = New System.Windows.Forms.Label() + Me.tbdnlfloodgate = New System.Windows.Forms.Label() + Me.tbPirateBoat = New System.Windows.Forms.Label() + Me.pnlpirateboatdownlaod = New System.Windows.Forms.Panel() + Me.tpbbackbtn = New System.Windows.Forms.Button() + Me.tpbfloodgate = New System.Windows.Forms.Button() + Me.tpburlbox = New System.Windows.Forms.TextBox() + Me.pnlhome = New System.Windows.Forms.Panel() + Me.pnlhomehome = New System.Windows.Forms.Panel() + Me.lblhomehomehistorylink = New System.Windows.Forms.Label() + Me.lblhomehomebackuplink = New System.Windows.Forms.Label() + Me.lblhomehomebitnotelink = New System.Windows.Forms.Label() + Me.lblhomehomeminimatchlink = New System.Windows.Forms.Label() + Me.lblhomehomeappscapelink = New System.Windows.Forms.Label() + Me.lblhomehomedescription = New System.Windows.Forms.Label() + Me.pichomehomeicon = New System.Windows.Forms.PictureBox() + Me.tbhomehomewelcome = New System.Windows.Forms.Label() + Me.pnlhomehistory = New System.Windows.Forms.Panel() + Me.lbhomehistoryhistory = New System.Windows.Forms.ListView() + Me.pnlmainsiteappscape = New System.Windows.Forms.Panel() + Me.pnlappscapedeposit = New System.Windows.Forms.Panel() + Me.appscapedepositestep3 = New System.Windows.Forms.Label() + Me.appscapedepositestep2 = New System.Windows.Forms.Label() + Me.appscapedepositestep1 = New System.Windows.Forms.Label() + Me.picappscapedepositeinfobitnotescreenshot = New System.Windows.Forms.PictureBox() + Me.lblappscapedepositpasteinfo = New System.Windows.Forms.Label() + Me.txtappscapedepositeaddress = New System.Windows.Forms.TextBox() + Me.lblappscapecopyaddressinfo = New System.Windows.Forms.Label() + Me.Label9 = New System.Windows.Forms.Label() + Me.Panel46 = New System.Windows.Forms.Panel() + Me.btnappscapedepositeback = New System.Windows.Forms.Panel() + Me.Panel47 = New System.Windows.Forms.Panel() + Me.lbappscapepayinfohello = New System.Windows.Forms.Label() + Me.appscapehomepage = New System.Windows.Forms.Panel() + Me.Label1 = New System.Windows.Forms.Label() + Me.Panel20 = New System.Windows.Forms.Panel() + Me.btnbuymoresoftware2 = New System.Windows.Forms.Panel() + Me.btnmoresoftware2info = New System.Windows.Forms.Panel() + Me.Panel17 = New System.Windows.Forms.Panel() + Me.btnbuyorcwrite = New System.Windows.Forms.Panel() + Me.btnmoresoftware1info = New System.Windows.Forms.Panel() + Me.Panel14 = New System.Windows.Forms.Panel() + Me.btnbuycalculator = New System.Windows.Forms.Panel() + Me.btncalculatorinfo = New System.Windows.Forms.Panel() + Me.Panel11 = New System.Windows.Forms.Panel() + Me.btnbuywebbrowser = New System.Windows.Forms.Panel() + Me.btnwebbrowserinfo = New System.Windows.Forms.Panel() + Me.Panel8 = New System.Windows.Forms.Panel() + Me.btnbuyvideoplayer = New System.Windows.Forms.Panel() + Me.btnvideoplayerinfo = New System.Windows.Forms.Panel() + Me.Panel5 = New System.Windows.Forms.Panel() + Me.btnbuyaudioplayer = New System.Windows.Forms.Panel() + Me.btnaudioplayerinfo = New System.Windows.Forms.Panel() + Me.Panel4 = New System.Windows.Forms.Panel() + Me.Panel3 = New System.Windows.Forms.Panel() + Me.lbappscapehello = New System.Windows.Forms.Label() + Me.btnappscapedeposit = New System.Windows.Forms.Panel() + Me.pnlappscapeoprcwrite = New System.Windows.Forms.Panel() + Me.Panel16 = New System.Windows.Forms.Panel() + Me.btnappscapeorcwritebuy = New System.Windows.Forms.Panel() + Me.btnappscapeorcwriteback = New System.Windows.Forms.Panel() + Me.Panel22 = New System.Windows.Forms.Panel() + Me.Panel23 = New System.Windows.Forms.Panel() + Me.lblappscapeorcwritehellotext = New System.Windows.Forms.Label() + Me.btnappscapeorcwritedeposit = New System.Windows.Forms.Panel() + Me.Label5 = New System.Windows.Forms.Label() + Me.appscapewebbrowserinfopage = New System.Windows.Forms.Panel() + Me.Panel19 = New System.Windows.Forms.Panel() + Me.btnwebbrowserinfobuy = New System.Windows.Forms.Panel() + Me.btnwebbrowserinfoback = New System.Windows.Forms.Panel() + Me.Panel24 = New System.Windows.Forms.Panel() + Me.Panel25 = New System.Windows.Forms.Panel() + Me.lbappscapewebbroswerinfohello = New System.Windows.Forms.Label() + Me.appscapewebbrowserinfodepositbtn = New System.Windows.Forms.Panel() + Me.Label6 = New System.Windows.Forms.Label() + Me.appscapevideoplayerinfopage = New System.Windows.Forms.Panel() + Me.Panel9 = New System.Windows.Forms.Panel() + Me.btnvideoplayerinfobuy = New System.Windows.Forms.Panel() + Me.btnvideoplayerinfoback = New System.Windows.Forms.Panel() + Me.Panel13 = New System.Windows.Forms.Panel() + Me.Panel15 = New System.Windows.Forms.Panel() + Me.lbappscapevideoplayerinfohello = New System.Windows.Forms.Label() + Me.appscapevideoplayerinfodepositbtn = New System.Windows.Forms.Panel() + Me.Label4 = New System.Windows.Forms.Label() + Me.appscapecalculatorinfopage = New System.Windows.Forms.Panel() + Me.Panel28 = New System.Windows.Forms.Panel() + Me.btncalculatorinfobuy = New System.Windows.Forms.Panel() + Me.btncalculatorinfoback = New System.Windows.Forms.Panel() + Me.Panel34 = New System.Windows.Forms.Panel() + Me.Panel35 = New System.Windows.Forms.Panel() + Me.lbappscapecalculatorinfohello = New System.Windows.Forms.Label() + Me.appscapecalcinfodepositbtn = New System.Windows.Forms.Panel() + Me.Label8 = New System.Windows.Forms.Label() + Me.appscapeaudioplayerinfopage = New System.Windows.Forms.Panel() + Me.Panel6 = New System.Windows.Forms.Panel() + Me.btnaudioplayerinfobuy = New System.Windows.Forms.Panel() + Me.btnaudioplayerinfoback = New System.Windows.Forms.Panel() + Me.Panel31 = New System.Windows.Forms.Panel() + Me.Panel32 = New System.Windows.Forms.Panel() + Me.lbappscapeaudioplayerinfohello = New System.Windows.Forms.Label() + Me.appscapeaudioplayerinfodepositbtn = New System.Windows.Forms.Panel() + Me.Label2 = New System.Windows.Forms.Label() + Me.pnlmainsiteminimatch = New System.Windows.Forms.Panel() + Me.pnlminimatchlabyrinth = New System.Windows.Forms.Panel() + Me.Label20 = New System.Windows.Forms.Label() + Me.Panel10 = New System.Windows.Forms.Panel() + Me.txtminimatchlabrinthaddress = New System.Windows.Forms.TextBox() + Me.lblminimatchinfopagebuy = New System.Windows.Forms.Label() + Me.lblminimatchlabyrinthbuyinstuct = New System.Windows.Forms.Label() + Me.Label26 = New System.Windows.Forms.Label() + Me.PictureBox2 = New System.Windows.Forms.PictureBox() + Me.Label27 = New System.Windows.Forms.Label() + Me.Panel12 = New System.Windows.Forms.Panel() + Me.Label28 = New System.Windows.Forms.Label() + Me.Label29 = New System.Windows.Forms.Label() + Me.Label30 = New System.Windows.Forms.Label() + Me.PictureBox3 = New System.Windows.Forms.PictureBox() + Me.PictureBox6 = New System.Windows.Forms.PictureBox() + Me.pnlminimatchhomepage = New System.Windows.Forms.Panel() + Me.lblminimatchcopyright = New System.Windows.Forms.Label() + Me.pnlminimatchcomingsoon2 = New System.Windows.Forms.Panel() + Me.pnlminimatchcomingsoonbuy2 = New System.Windows.Forms.Label() + Me.pnlminimatchcomingsooninfo2 = New System.Windows.Forms.Label() + Me.pnlminimatchcomingsoondescription2 = New System.Windows.Forms.Label() + Me.pnlminimatchcomingsoontitle2 = New System.Windows.Forms.Label() + Me.pnlminimatchcomingsoon = New System.Windows.Forms.Panel() + Me.bntminimatchcomingsoonbuy = New System.Windows.Forms.Label() + Me.bntminimatchcomingsooninfo = New System.Windows.Forms.Label() + Me.lblminimatchcomingsoondescription = New System.Windows.Forms.Label() + Me.lblminimatchcomingsoontitle = New System.Windows.Forms.Label() + Me.pnlminimatchdodgepreview = New System.Windows.Forms.Panel() + Me.bntminimatchdodgebuy = New System.Windows.Forms.Label() + Me.bntminimatchdodgeinfo = New System.Windows.Forms.Label() + Me.lblminimatchdodgedescription = New System.Windows.Forms.Label() + Me.lblminimatchdodgetitle = New System.Windows.Forms.Label() + Me.picbitnotesaccepted = New System.Windows.Forms.PictureBox() + Me.lblminimatchmainpagewelcome = New System.Windows.Forms.Label() + Me.PictureBox5 = New System.Windows.Forms.PictureBox() + Me.pnlminimatchdodgeinfopage = New System.Windows.Forms.Panel() + Me.lblminimatchuserwelcome = New System.Windows.Forms.Label() + Me.pnlminimatchdodgepagebuy = New System.Windows.Forms.Panel() + Me.txtminimatchbitnoteaddress = New System.Windows.Forms.TextBox() + Me.btnminimatchdodgepagebuy = New System.Windows.Forms.Label() + Me.lblminimatchdodgehow2buydetails = New System.Windows.Forms.Label() + Me.lblminimatchdodgehow2buy = New System.Windows.Forms.Label() + Me.picminimatchdodgepreview = New System.Windows.Forms.PictureBox() + Me.lblminimatchcopyrightdodgepage = New System.Windows.Forms.Label() + Me.pnlminimatchdodgeinfodetails = New System.Windows.Forms.Panel() + Me.bntminimatchdodgepageback = New System.Windows.Forms.Label() + Me.lblminimatchaboutdetails = New System.Windows.Forms.Label() + Me.lblminimatchdodgeabout = New System.Windows.Forms.Label() + Me.picminimatchbtnaccepted = New System.Windows.Forms.PictureBox() + Me.PictureBox4 = New System.Windows.Forms.PictureBox() + Me.pnlshiftomizer = New System.Windows.Forms.Panel() + Me.pnlshiftomizerhome = New System.Windows.Forms.Panel() + Me.btnshiftomizerhomecheckout = New System.Windows.Forms.Button() + Me.lblshiftomizerhomeskinsliderdownload = New System.Windows.Forms.Label() + Me.picshiftomizerhomeappslidernext = New System.Windows.Forms.PictureBox() + Me.picshiftomizerhomeappsliderback = New System.Windows.Forms.PictureBox() + Me.lblshiftomizerhomeappdescription = New System.Windows.Forms.Label() + Me.picshiftomizerhomeappsliderimg = New System.Windows.Forms.PictureBox() + Me.lblshiftomizerhomeappname = New System.Windows.Forms.Label() + Me.picshiftomizerhomeskinsliderright = New System.Windows.Forms.PictureBox() + Me.picshiftomizerhomeskinssliderleft = New System.Windows.Forms.PictureBox() + Me.lblshiftomizerhomeskinname = New System.Windows.Forms.Label() + Me.lblshiftomizerhomeappdownload = New System.Windows.Forms.Label() + Me.lblshiftomizerhomeskinsliderdescription = New System.Windows.Forms.Label() + Me.picshiftomizerhomeskinsliderimage = New System.Windows.Forms.PictureBox() + Me.lblshiftomizerhomedescription = New System.Windows.Forms.Label() + Me.lblshiftomizerhometitle = New System.Windows.Forms.Label() + Me.pnlshiftomizerpayments = New System.Windows.Forms.Panel() + Me.lblshiftomizerpaymentsclear = New System.Windows.Forms.Label() + Me.lblshiftomizerpaymentsback = New System.Windows.Forms.Label() + Me.lblshiftomizerpaymentinstruct = New System.Windows.Forms.Label() + Me.lblshiftomizerpaymentorder = New System.Windows.Forms.Label() + Me.lblshiftomizerpaymentstitle = New System.Windows.Forms.Label() + Me.pnlbitnotemainpage = New System.Windows.Forms.Panel() + Me.pnlbitnotedigger = New System.Windows.Forms.Panel() + Me.btnbitnotediggergrade5buy = New System.Windows.Forms.Button() + Me.btnbitnotediggergrade4buy = New System.Windows.Forms.Button() + Me.btnbitnotediggergrade3buy = New System.Windows.Forms.Button() + Me.btnbitnotediggergrade2buy = New System.Windows.Forms.Button() + Me.btnbitnotediggergrade1buy = New System.Windows.Forms.Button() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.pnlbitnotediggerfooter = New System.Windows.Forms.Panel() + Me.lblbitnotediggerfooterhomelink = New System.Windows.Forms.Label() + Me.lblbitnotediggerfootercopyright = New System.Windows.Forms.Label() + Me.lblbitnotediggerfootergetlink = New System.Windows.Forms.Label() + Me.lblbitnotediggerfooterdiggerlink = New System.Windows.Forms.Label() + Me.lblbitnotediggerfooterwalletlink = New System.Windows.Forms.Label() + Me.lblbitnotediggerfootergettitle = New System.Windows.Forms.Label() + Me.lblbitnotediggerfooterdownloadstitle = New System.Windows.Forms.Label() + Me.lblbitnotediggerfooterabouttitle = New System.Windows.Forms.Label() + Me.pnlbitnotediggersideright = New System.Windows.Forms.Panel() + Me.pnlbitnotediggersideleft = New System.Windows.Forms.Panel() + Me.lblbitnotediggerdescription = New System.Windows.Forms.Label() + Me.lblbitnotediggertitle = New System.Windows.Forms.Label() + Me.picbitnotediggertitlelogo = New System.Windows.Forms.PictureBox() + Me.pnlbitnotecurrencyexchange = New System.Windows.Forms.Panel() + Me.btnbitnotecurrencyexchangebuy = New System.Windows.Forms.Button() + Me.txtbitnotecurrencyexchangebitnoteamout = New System.Windows.Forms.TextBox() + Me.lblbitnotecurrencyexchangeprice = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangebuytitle = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangetodaysrate = New System.Windows.Forms.Label() + Me.pnlbitnotecurrencyexchangefooter = New System.Windows.Forms.Panel() + Me.lblbitnotecurrencyexchangefooterhomelink = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangefootercopyright = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangefootergetlink = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangefooterdiggerlink = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangefooterwalletlink = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangefootergettitle = New System.Windows.Forms.Label() + Me.bitnotecurrencyexchangefooterdownloadstitle = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangefooterabouttitle = New System.Windows.Forms.Label() + Me.pnlbitnotecurrencyexchangerightside = New System.Windows.Forms.Panel() + Me.pnlbitnotecurrencyexchangeleftside = New System.Windows.Forms.Panel() + Me.lblbitnotecurrencyexchangedescription = New System.Windows.Forms.Label() + Me.lblbitnotecurrencyexchangetitle = New System.Windows.Forms.Label() + Me.picbitnotecurrencyexchangetitle = New System.Windows.Forms.PictureBox() + Me.pnlbitnotebuywallet = New System.Windows.Forms.Panel() + Me.picbitnotewalletdownloadbtn = New System.Windows.Forms.PictureBox() + Me.lblbitnotewalletdescription2 = New System.Windows.Forms.Label() + Me.lblbitnotewalletdescription1 = New System.Windows.Forms.Label() + Me.picbitnotewalletpagescreenshot = New System.Windows.Forms.PictureBox() + Me.pnlbitnotewalletfooter = New System.Windows.Forms.Panel() + Me.lblbitnotewalletpagefooterhomelink = New System.Windows.Forms.Label() + Me.lblbitnotewalletcopyrighttitle = New System.Windows.Forms.Label() + Me.lblbitnotewalletfootergetlink = New System.Windows.Forms.Label() + Me.lblbitnotewalletdiggerdownloadlink = New System.Windows.Forms.Label() + Me.lblbitnotewalletwalletdownloadlink = New System.Windows.Forms.Label() + Me.lblbitnotewalletpagegettitle = New System.Windows.Forms.Label() + Me.lblbitnotewalletpagedownloadstitle = New System.Windows.Forms.Label() + Me.lblbitnotewalletpageabouttitle = New System.Windows.Forms.Label() + Me.pnlbitnotewalletpagerightside = New System.Windows.Forms.Panel() + Me.pnlbitnotewalletpageleftside = New System.Windows.Forms.Panel() + Me.Label21 = New System.Windows.Forms.Label() + Me.picbitnotewalletpagelogo = New System.Windows.Forms.PictureBox() + Me.pnlbitnotehome = New System.Windows.Forms.Panel() + Me.pnlbitnotehomefooter = New System.Windows.Forms.Panel() + Me.lblbitnotehomehomebtn = New System.Windows.Forms.Label() + Me.lblbitnotehomecopyright = New System.Windows.Forms.Label() + Me.lblbitnotehomefootergetlink = New System.Windows.Forms.Label() + Me.lblbitnotehomediggerlink = New System.Windows.Forms.Label() + Me.lblbitnotehomewalletlink = New System.Windows.Forms.Label() + Me.lblbitnotehomefootergettitle = New System.Windows.Forms.Label() + Me.lblbitnotehomedownloadlink = New System.Windows.Forms.Label() + Me.lblbitnotehomeaboutlink = New System.Windows.Forms.Label() + Me.pnlbitnotesideright = New System.Windows.Forms.Panel() + Me.pnlbitnotesideleft = New System.Windows.Forms.Panel() + Me.lblbitnotehowgettxt = New System.Windows.Forms.Label() + Me.lblbitnotehowgettitle = New System.Windows.Forms.Label() + Me.lblbitnoteabouttxt = New System.Windows.Forms.Label() + Me.lblbitnoteabouttitle = New System.Windows.Forms.Label() + Me.picbitnotewebsitetitle = New System.Windows.Forms.PictureBox() + Me.pnlshifterhacker = New System.Windows.Forms.Panel() + Me.pnlshifterhackerhome = New System.Windows.Forms.Panel() + Me.tbshifterhackerhomefloodgatelink1 = New System.Windows.Forms.Label() + Me.TextBox1 = New System.Windows.Forms.TextBox() + Me.tbshifterhackerhomeblogpost1 = New System.Windows.Forms.Label() + Me.tbshifterhackerhomefloodgatead = New System.Windows.Forms.Label() + Me.tbshifterhackerhomepostspotwatermark = New System.Windows.Forms.Label() + Me.tbshifterhackerhomeh1 = New System.Windows.Forms.Label() + Me.pnlutilsweb = New System.Windows.Forms.Panel() + Me.pnlutilswebhome = New System.Windows.Forms.Panel() + Me.utilswebhomewip = New System.Windows.Forms.Label() + Me.utilswebvirusscanner = New System.Windows.Forms.Label() + Me.utilswebbackuputil = New System.Windows.Forms.Label() + Me.pnlutilswebbackuputility = New System.Windows.Forms.Panel() + Me.lbl_backuputility_soon = New System.Windows.Forms.Label() + Me.pnlutilswebvirusscan = New System.Windows.Forms.Panel() + Me.pnlnotfound = New System.Windows.Forms.Panel() + Me.pnlnotfoundsite = New System.Windows.Forms.Panel() + Me.tbnotfound = New System.Windows.Forms.Label() + Me.pnlshiftnet = New System.Windows.Forms.Panel() + Me.pnlshiftnethome = New System.Windows.Forms.Panel() + Me.Label11 = New System.Windows.Forms.Label() + Me.homenetsite = New System.Windows.Forms.Label() + Me.homedefaultpage = New System.Windows.Forms.Label() + Me.hometitle = New System.Windows.Forms.Label() + Me.pnl404 = New System.Windows.Forms.Panel() + Me.pnl404home = New System.Windows.Forms.Panel() + Me.tb404homenotfound = New System.Windows.Forms.Label() + Me.tb404home404 = New System.Windows.Forms.Label() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.Label12 = New System.Windows.Forms.Label() + Me.btnhome = New System.Windows.Forms.Button() + Me.txtlocation = New System.Windows.Forms.TextBox() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.lbldevdockingwarning = New System.Windows.Forms.Label() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.tmrloadsite = New System.Windows.Forms.Timer(Me.components) + Me.AllLinksMustHaveATooltipForTheirUrl = New System.Windows.Forms.ToolTip(Me.components) + Me.tmrshiftomizerwaitinglist = New System.Windows.Forms.Timer(Me.components) + Me.qctext = New System.Windows.Forms.Timer(Me.components) + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnlquickchat.SuspendLayout() + Me.pnlquickchathome.SuspendLayout() + Me.Panel7.SuspendLayout() + Me.pnlquickchatoffline.SuspendLayout() + Me.qcpanel.SuspendLayout() + Me.pnlxenonh.SuspendLayout() + Me.pnlxenonhhome.SuspendLayout() + Me.pnlpostspot.SuspendLayout() + Me.pnlpostspothome.SuspendLayout() + Me.pnlpirateboat.SuspendLayout() + Me.pnlpirateboatmain.SuspendLayout() + Me.pnlpirateboatdownlaod.SuspendLayout() + Me.pnlhome.SuspendLayout() + Me.pnlhomehome.SuspendLayout() + CType(Me.pichomehomeicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlhomehistory.SuspendLayout() + Me.pnlmainsiteappscape.SuspendLayout() + Me.pnlappscapedeposit.SuspendLayout() + CType(Me.picappscapedepositeinfobitnotescreenshot, System.ComponentModel.ISupportInitialize).BeginInit() + Me.Panel46.SuspendLayout() + Me.Panel47.SuspendLayout() + Me.appscapehomepage.SuspendLayout() + Me.Panel20.SuspendLayout() + Me.Panel17.SuspendLayout() + Me.Panel14.SuspendLayout() + Me.Panel11.SuspendLayout() + Me.Panel8.SuspendLayout() + Me.Panel5.SuspendLayout() + Me.Panel3.SuspendLayout() + Me.pnlappscapeoprcwrite.SuspendLayout() + Me.Panel16.SuspendLayout() + Me.Panel23.SuspendLayout() + Me.appscapewebbrowserinfopage.SuspendLayout() + Me.Panel19.SuspendLayout() + Me.Panel25.SuspendLayout() + Me.appscapevideoplayerinfopage.SuspendLayout() + Me.Panel9.SuspendLayout() + Me.Panel15.SuspendLayout() + Me.appscapecalculatorinfopage.SuspendLayout() + Me.Panel28.SuspendLayout() + Me.Panel35.SuspendLayout() + Me.appscapeaudioplayerinfopage.SuspendLayout() + Me.Panel6.SuspendLayout() + Me.Panel32.SuspendLayout() + Me.pnlmainsiteminimatch.SuspendLayout() + Me.pnlminimatchlabyrinth.SuspendLayout() + Me.Panel10.SuspendLayout() + CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit() + Me.Panel12.SuspendLayout() + CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.PictureBox6, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlminimatchhomepage.SuspendLayout() + Me.pnlminimatchcomingsoon2.SuspendLayout() + Me.pnlminimatchcomingsoon.SuspendLayout() + Me.pnlminimatchdodgepreview.SuspendLayout() + CType(Me.picbitnotesaccepted, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlminimatchdodgeinfopage.SuspendLayout() + Me.pnlminimatchdodgepagebuy.SuspendLayout() + CType(Me.picminimatchdodgepreview, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlminimatchdodgeinfodetails.SuspendLayout() + CType(Me.picminimatchbtnaccepted, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlshiftomizer.SuspendLayout() + Me.pnlshiftomizerhome.SuspendLayout() + CType(Me.picshiftomizerhomeappslidernext, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picshiftomizerhomeappsliderback, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picshiftomizerhomeappsliderimg, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picshiftomizerhomeskinsliderright, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picshiftomizerhomeskinssliderleft, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picshiftomizerhomeskinsliderimage, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlshiftomizerpayments.SuspendLayout() + Me.pnlbitnotemainpage.SuspendLayout() + Me.pnlbitnotedigger.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlbitnotediggerfooter.SuspendLayout() + CType(Me.picbitnotediggertitlelogo, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlbitnotecurrencyexchange.SuspendLayout() + Me.pnlbitnotecurrencyexchangefooter.SuspendLayout() + CType(Me.picbitnotecurrencyexchangetitle, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlbitnotebuywallet.SuspendLayout() + CType(Me.picbitnotewalletdownloadbtn, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.picbitnotewalletpagescreenshot, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlbitnotewalletfooter.SuspendLayout() + CType(Me.picbitnotewalletpagelogo, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlbitnotehome.SuspendLayout() + Me.pnlbitnotehomefooter.SuspendLayout() + CType(Me.picbitnotewebsitetitle, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlshifterhacker.SuspendLayout() + Me.pnlshifterhackerhome.SuspendLayout() + Me.pnlutilsweb.SuspendLayout() + Me.pnlutilswebhome.SuspendLayout() + Me.pnlutilswebbackuputility.SuspendLayout() + Me.pnlnotfound.SuspendLayout() + Me.pnlnotfoundsite.SuspendLayout() + Me.pnlshiftnet.SuspendLayout() + Me.pnlshiftnethome.SuspendLayout() + Me.pnl404.SuspendLayout() + Me.pnl404home.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 598) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(816, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 568) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(818, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 570) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(65, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Shiftnet" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(818, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 568) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlquickchat) + Me.pgcontents.Controls.Add(Me.pnlxenonh) + Me.pgcontents.Controls.Add(Me.pnlpostspot) + Me.pgcontents.Controls.Add(Me.pnlpirateboat) + Me.pgcontents.Controls.Add(Me.pnlhome) + Me.pgcontents.Controls.Add(Me.pnlmainsiteappscape) + Me.pgcontents.Controls.Add(Me.pnlmainsiteminimatch) + Me.pgcontents.Controls.Add(Me.pnlshiftomizer) + Me.pgcontents.Controls.Add(Me.pnlbitnotemainpage) + Me.pgcontents.Controls.Add(Me.pnlshifterhacker) + Me.pgcontents.Controls.Add(Me.pnlutilsweb) + Me.pgcontents.Controls.Add(Me.pnlnotfound) + Me.pgcontents.Controls.Add(Me.pnlshiftnet) + Me.pgcontents.Controls.Add(Me.pnl404) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(816, 568) + Me.pgcontents.TabIndex = 20 + ' + 'pnlquickchat + ' + Me.pnlquickchat.AutoScroll = True + Me.pnlquickchat.BackColor = System.Drawing.Color.White + Me.pnlquickchat.Controls.Add(Me.pnlquickchathome) + Me.pnlquickchat.Controls.Add(Me.pnlquickchatoffline) + Me.pnlquickchat.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlquickchat.Location = New System.Drawing.Point(0, 35) + Me.pnlquickchat.Name = "pnlquickchat" + Me.pnlquickchat.Size = New System.Drawing.Size(816, 533) + Me.pnlquickchat.TabIndex = 21 + Me.pnlquickchat.Visible = False + ' + 'pnlquickchathome + ' + Me.pnlquickchathome.Controls.Add(Me.Panel7) + Me.pnlquickchathome.Controls.Add(Me.qchome) + Me.pnlquickchathome.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlquickchathome.Location = New System.Drawing.Point(0, 0) + Me.pnlquickchathome.Name = "pnlquickchathome" + Me.pnlquickchathome.Size = New System.Drawing.Size(816, 533) + Me.pnlquickchathome.TabIndex = 4 + ' + 'Panel7 + ' + Me.Panel7.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Panel7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel7.Controls.Add(Me.tbqcusers) + Me.Panel7.Controls.Add(Me.tbqcchat) + Me.Panel7.Controls.Add(Me.tbqctype) + Me.Panel7.Location = New System.Drawing.Point(10, 61) + Me.Panel7.Name = "Panel7" + Me.Panel7.Size = New System.Drawing.Size(796, 463) + Me.Panel7.TabIndex = 2 + ' + 'tbqcusers + ' + Me.tbqcusers.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.tbqcusers.Location = New System.Drawing.Point(643, 10) + Me.tbqcusers.Name = "tbqcusers" + Me.tbqcusers.Size = New System.Drawing.Size(145, 419) + Me.tbqcusers.TabIndex = 3 + Me.tbqcusers.UseCompatibleStateImageBehavior = False + ' + 'tbqcchat + ' + Me.tbqcchat.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.tbqcchat.BackColor = System.Drawing.Color.White + Me.tbqcchat.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.tbqcchat.Location = New System.Drawing.Point(5, 9) + Me.tbqcchat.Multiline = True + Me.tbqcchat.Name = "tbqcchat" + Me.tbqcchat.ReadOnly = True + Me.tbqcchat.ScrollBars = System.Windows.Forms.ScrollBars.Vertical + Me.tbqcchat.Size = New System.Drawing.Size(629, 420) + Me.tbqcchat.TabIndex = 2 + ' + 'tbqctype + ' + Me.tbqctype.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.tbqctype.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.tbqctype.Enabled = False + Me.tbqctype.Location = New System.Drawing.Point(5, 436) + Me.tbqctype.Name = "tbqctype" + Me.tbqctype.Size = New System.Drawing.Size(783, 20) + Me.tbqctype.TabIndex = 1 + ' + 'qchome + ' + Me.qchome.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.qchome.AutoSize = True + Me.qchome.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.qchome.ForeColor = System.Drawing.Color.Gray + Me.qchome.Location = New System.Drawing.Point(321, 10) + Me.qchome.Name = "qchome" + Me.qchome.Size = New System.Drawing.Size(167, 37) + Me.qchome.TabIndex = 1 + Me.qchome.Text = "QuickChat" + ' + 'pnlquickchatoffline + ' + Me.pnlquickchatoffline.Controls.Add(Me.qcpanel) + Me.pnlquickchatoffline.Controls.Add(Me.tbqchomebtn) + Me.pnlquickchatoffline.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlquickchatoffline.Location = New System.Drawing.Point(0, 0) + Me.pnlquickchatoffline.Name = "pnlquickchatoffline" + Me.pnlquickchatoffline.Size = New System.Drawing.Size(816, 533) + Me.pnlquickchatoffline.TabIndex = 5 + ' + 'qcpanel + ' + Me.qcpanel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.qcpanel.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.qcpanel.Controls.Add(Me.tbqcochat) + Me.qcpanel.Controls.Add(Me.Label24) + Me.qcpanel.Location = New System.Drawing.Point(10, 60) + Me.qcpanel.Name = "qcpanel" + Me.qcpanel.Size = New System.Drawing.Size(796, 463) + Me.qcpanel.TabIndex = 1 + ' + 'tbqcochat + ' + Me.tbqcochat.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.tbqcochat.Enabled = False + Me.tbqcochat.Location = New System.Drawing.Point(5, 436) + Me.tbqcochat.Name = "tbqcochat" + Me.tbqcochat.Size = New System.Drawing.Size(783, 20) + Me.tbqcochat.TabIndex = 1 + ' + 'Label24 + ' + Me.Label24.AutoSize = True + Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label24.Location = New System.Drawing.Point(5, 10) + Me.Label24.Name = "Label24" + Me.Label24.Size = New System.Drawing.Size(115, 13) + Me.Label24.TabIndex = 0 + Me.Label24.Text = "This chatroom is empty" + ' + 'tbqchomebtn + ' + Me.tbqchomebtn.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbqchomebtn.AutoSize = True + Me.tbqchomebtn.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbqchomebtn.ForeColor = System.Drawing.Color.Gray + Me.tbqchomebtn.Location = New System.Drawing.Point(330, 13) + Me.tbqchomebtn.Name = "tbqchomebtn" + Me.tbqchomebtn.Size = New System.Drawing.Size(167, 37) + Me.tbqchomebtn.TabIndex = 0 + Me.tbqchomebtn.Text = "QuickChat" + ' + 'pnlxenonh + ' + Me.pnlxenonh.AutoScroll = True + Me.pnlxenonh.BackColor = System.Drawing.Color.White + Me.pnlxenonh.Controls.Add(Me.pnlxenonhhome) + Me.pnlxenonh.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlxenonh.Location = New System.Drawing.Point(0, 35) + Me.pnlxenonh.Name = "pnlxenonh" + Me.pnlxenonh.Size = New System.Drawing.Size(816, 533) + Me.pnlxenonh.TabIndex = 20 + Me.pnlxenonh.Visible = False + ' + 'pnlxenonhhome + ' + Me.pnlxenonhhome.Controls.Add(Me.tbxenonhquickchat) + Me.pnlxenonhhome.Controls.Add(Me.Label10) + Me.pnlxenonhhome.Controls.Add(Me.Label3) + Me.pnlxenonhhome.Controls.Add(Me.Label7) + Me.pnlxenonhhome.Controls.Add(Me.Label19) + Me.pnlxenonhhome.Controls.Add(Me.Label18) + Me.pnlxenonhhome.Controls.Add(Me.Label17) + Me.pnlxenonhhome.Controls.Add(Me.Label16) + Me.pnlxenonhhome.Controls.Add(Me.Label15) + Me.pnlxenonhhome.Controls.Add(Me.Label14) + Me.pnlxenonhhome.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlxenonhhome.Location = New System.Drawing.Point(0, 0) + Me.pnlxenonhhome.Name = "pnlxenonhhome" + Me.pnlxenonhhome.Size = New System.Drawing.Size(816, 533) + Me.pnlxenonhhome.TabIndex = 4 + ' + 'tbxenonhquickchat + ' + Me.tbxenonhquickchat.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbxenonhquickchat.AutoSize = True + Me.tbxenonhquickchat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbxenonhquickchat.Location = New System.Drawing.Point(360, 238) + Me.tbxenonhquickchat.Name = "tbxenonhquickchat" + Me.tbxenonhquickchat.Size = New System.Drawing.Size(57, 13) + Me.tbxenonhquickchat.TabIndex = 9 + Me.tbxenonhquickchat.Text = "QuickChat" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.tbxenonhquickchat, "shiftnet.quickchat/user/xenonh.rnp") + ' + 'Label10 + ' + Me.Label10.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label10.AutoSize = True + Me.Label10.Location = New System.Drawing.Point(278, 238) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(83, 13) + Me.Label10.TabIndex = 8 + Me.Label10.Text = "Chat with me on" + ' + 'Label3 + ' + Me.Label3.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(289, 179) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(377, 13) + Me.Label3.TabIndex = 7 + Me.Label3.Text = "- Save shiftnet and Web Browser websites to .URL or .URLS files to open later" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + ' + 'Label7 + ' + Me.Label7.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(250, 179) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(39, 13) + Me.Label7.TabIndex = 6 + Me.Label7.Text = ".URLS" + ' + 'Label19 + ' + Me.Label19.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label19.AutoSize = True + Me.Label19.Location = New System.Drawing.Point(297, 164) + Me.Label19.Name = "Label19" + Me.Label19.Size = New System.Drawing.Size(382, 13) + Me.Label19.TabIndex = 5 + Me.Label19.Text = "- Currently only converts TRM to SSA, but may convert much more in the future!" + ' + 'Label18 + ' + Me.Label18.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label18.AutoSize = True + Me.Label18.Location = New System.Drawing.Point(249, 164) + Me.Label18.Name = "Label18" + Me.Label18.Size = New System.Drawing.Size(53, 13) + Me.Label18.TabIndex = 4 + Me.Label18.Text = "Convert It" + ' + 'Label17 + ' + Me.Label17.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label17.AutoSize = True + Me.Label17.Location = New System.Drawing.Point(298, 150) + Me.Label17.Name = "Label17" + Me.Label17.Size = New System.Drawing.Size(304, 13) + Me.Label17.TabIndex = 3 + Me.Label17.Text = "- A useful dock addon for ShiftOS (Front paged on shiftomizer!!)" + ' + 'Label16 + ' + Me.Label16.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label16.AutoSize = True + Me.Label16.Location = New System.Drawing.Point(249, 150) + Me.Label16.Name = "Label16" + Me.Label16.Size = New System.Drawing.Size(54, 13) + Me.Label16.TabIndex = 2 + Me.Label16.Text = "ShiftDock" + ' + 'Label15 + ' + Me.Label15.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label15.AutoSize = True + Me.Label15.Location = New System.Drawing.Point(433, 57) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(108, 13) + Me.Label15.TabIndex = 1 + Me.Label15.Text = "powered by PostSpot" + ' + 'Label14 + ' + Me.Label14.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label14.AutoSize = True + Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label14.Location = New System.Drawing.Point(190, 22) + Me.Label14.Name = "Label14" + Me.Label14.Size = New System.Drawing.Size(450, 37) + Me.Label14.TabIndex = 0 + Me.Label14.Text = "Xenon H's Customization Blog" + ' + 'pnlpostspot + ' + Me.pnlpostspot.AutoScroll = True + Me.pnlpostspot.BackColor = System.Drawing.Color.White + Me.pnlpostspot.Controls.Add(Me.pnlpostspothome) + Me.pnlpostspot.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlpostspot.Location = New System.Drawing.Point(0, 35) + Me.pnlpostspot.Name = "pnlpostspot" + Me.pnlpostspot.Size = New System.Drawing.Size(816, 533) + Me.pnlpostspot.TabIndex = 19 + Me.pnlpostspot.Visible = False + ' + 'pnlpostspothome + ' + Me.pnlpostspothome.Controls.Add(Me.tbxenonhurl) + Me.pnlpostspothome.Controls.Add(Me.tbpostspothomeshifterhackerlink) + Me.pnlpostspothome.Controls.Add(Me.tbpostspothomecontent) + Me.pnlpostspothome.Controls.Add(Me.tbpostspothomead) + Me.pnlpostspothome.Controls.Add(Me.tbpostspothomesubtext) + Me.pnlpostspothome.Controls.Add(Me.tbpostspothomepostspot) + Me.pnlpostspothome.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlpostspothome.Location = New System.Drawing.Point(0, 0) + Me.pnlpostspothome.Name = "pnlpostspothome" + Me.pnlpostspothome.Size = New System.Drawing.Size(816, 533) + Me.pnlpostspothome.TabIndex = 4 + ' + 'tbxenonhurl + ' + Me.tbxenonhurl.AutoSize = True + Me.tbxenonhurl.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbxenonhurl.Location = New System.Drawing.Point(24, 198) + Me.tbxenonhurl.Name = "tbxenonhurl" + Me.tbxenonhurl.Size = New System.Drawing.Size(145, 13) + Me.tbxenonhurl.TabIndex = 11 + Me.tbxenonhurl.Text = "XenonH's Customization Blog" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.tbxenonhurl, "shiftnet.main.xenonh/home.rnp") + ' + 'tbpostspothomeshifterhackerlink + ' + Me.tbpostspothomeshifterhackerlink.AutoSize = True + Me.tbpostspothomeshifterhackerlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbpostspothomeshifterhackerlink.Location = New System.Drawing.Point(24, 179) + Me.tbpostspothomeshifterhackerlink.Name = "tbpostspothomeshifterhackerlink" + Me.tbpostspothomeshifterhackerlink.Size = New System.Drawing.Size(103, 13) + Me.tbpostspothomeshifterhackerlink.TabIndex = 10 + Me.tbpostspothomeshifterhackerlink.Text = "ShifterHacker's Blog" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.tbpostspothomeshifterhackerlink, "shiftnet.shifterhacker/home.rnp") + ' + 'tbpostspothomecontent + ' + Me.tbpostspothomecontent.AutoSize = True + Me.tbpostspothomecontent.Location = New System.Drawing.Point(24, 75) + Me.tbpostspothomecontent.Name = "tbpostspothomecontent" + Me.tbpostspothomecontent.Size = New System.Drawing.Size(252, 91) + Me.tbpostspothomecontent.TabIndex = 8 + Me.tbpostspothomecontent.Text = "Customize your website however you want." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Include:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ShiftLinks NetAds" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Comment Wi" & _ + "gets" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "And much more when customizing your website." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Below are some blogs that " & _ + "other people have made:" + ' + 'tbpostspothomead + ' + Me.tbpostspothomead.AutoSize = True + Me.tbpostspothomead.Dock = System.Windows.Forms.DockStyle.Bottom + Me.tbpostspothomead.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbpostspothomead.Location = New System.Drawing.Point(0, 507) + Me.tbpostspothomead.Name = "tbpostspothomead" + Me.tbpostspothomead.Size = New System.Drawing.Size(328, 26) + Me.tbpostspothomead.TabIndex = 7 + Me.tbpostspothomead.Text = "Install FloodgateManager: The best flood downloader on the shiftnet" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ShiftLinks N" & _ + "etAds" + ' + 'tbpostspothomesubtext + ' + Me.tbpostspothomesubtext.AutoSize = True + Me.tbpostspothomesubtext.BackColor = System.Drawing.Color.White + Me.tbpostspothomesubtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbpostspothomesubtext.ForeColor = System.Drawing.Color.Black + Me.tbpostspothomesubtext.Location = New System.Drawing.Point(172, 48) + Me.tbpostspothomesubtext.Name = "tbpostspothomesubtext" + Me.tbpostspothomesubtext.Size = New System.Drawing.Size(157, 13) + Me.tbpostspothomesubtext.TabIndex = 6 + Me.tbpostspothomesubtext.Text = "The best blogger on the shiftnet" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.tbpostspothomesubtext, "shiftnet.main.floodgate/filetrans.dwnld?file=FloodGate.stp") + ' + 'tbpostspothomepostspot + ' + Me.tbpostspothomepostspot.AutoSize = True + Me.tbpostspothomepostspot.BackColor = System.Drawing.Color.Transparent + Me.tbpostspothomepostspot.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbpostspothomepostspot.Location = New System.Drawing.Point(116, 17) + Me.tbpostspothomepostspot.Name = "tbpostspothomepostspot" + Me.tbpostspothomepostspot.Size = New System.Drawing.Size(147, 37) + Me.tbpostspothomepostspot.TabIndex = 5 + Me.tbpostspothomepostspot.Text = "PostSpot" + ' + 'pnlpirateboat + ' + Me.pnlpirateboat.AutoScroll = True + Me.pnlpirateboat.BackColor = System.Drawing.Color.White + Me.pnlpirateboat.Controls.Add(Me.pnlpirateboatmain) + Me.pnlpirateboat.Controls.Add(Me.pnlpirateboatdownlaod) + Me.pnlpirateboat.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlpirateboat.Location = New System.Drawing.Point(0, 35) + Me.pnlpirateboat.Name = "pnlpirateboat" + Me.pnlpirateboat.Size = New System.Drawing.Size(816, 533) + Me.pnlpirateboat.TabIndex = 17 + Me.pnlpirateboat.Visible = False + ' + 'pnlpirateboatmain + ' + Me.pnlpirateboatmain.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pnlpirateboatmain.Controls.Add(Me.tpbsearchresults) + Me.pnlpirateboatmain.Controls.Add(Me.tpbsearch) + Me.pnlpirateboatmain.Controls.Add(Me.TextBox4) + Me.pnlpirateboatmain.Controls.Add(Me.TextBox3) + Me.pnlpirateboatmain.Controls.Add(Me.Label23) + Me.pnlpirateboatmain.Controls.Add(Me.Label22) + Me.pnlpirateboatmain.Controls.Add(Me.TextBox2) + Me.pnlpirateboatmain.Controls.Add(Me.tbpbfglink1) + Me.pnlpirateboatmain.Controls.Add(Me.Label13) + Me.pnlpirateboatmain.Controls.Add(Me.tbpbWarning) + Me.pnlpirateboatmain.Controls.Add(Me.tbpbMSG) + Me.pnlpirateboatmain.Controls.Add(Me.tbdnlfloodgate) + Me.pnlpirateboatmain.Controls.Add(Me.tbPirateBoat) + Me.pnlpirateboatmain.Location = New System.Drawing.Point(0, 0) + Me.pnlpirateboatmain.Name = "pnlpirateboatmain" + Me.pnlpirateboatmain.Size = New System.Drawing.Size(816, 533) + Me.pnlpirateboatmain.TabIndex = 4 + ' + 'tpbsearchresults + ' + Me.tpbsearchresults.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.tpbsearchresults.Location = New System.Drawing.Point(226, 223) + Me.tpbsearchresults.Name = "tpbsearchresults" + Me.tpbsearchresults.Size = New System.Drawing.Size(329, 269) + Me.tpbsearchresults.TabIndex = 17 + Me.tpbsearchresults.UseCompatibleStateImageBehavior = False + ' + 'tpbsearch + ' + Me.tpbsearch.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.tpbsearch.Location = New System.Drawing.Point(219, 503) + Me.tpbsearch.Name = "tpbsearch" + Me.tpbsearch.Size = New System.Drawing.Size(350, 20) + Me.tpbsearch.TabIndex = 12 + ' + 'TextBox4 + ' + Me.TextBox4.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.TextBox4.BackColor = System.Drawing.Color.White + Me.TextBox4.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.TextBox4.Location = New System.Drawing.Point(244, 201) + Me.TextBox4.Name = "TextBox4" + Me.TextBox4.ReadOnly = True + Me.TextBox4.Size = New System.Drawing.Size(209, 13) + Me.TextBox4.TabIndex = 16 + Me.TextBox4.Text = "shiftnet.pirate.piratebay/floods/virusscanner" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + ' + 'TextBox3 + ' + Me.TextBox3.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.TextBox3.BackColor = System.Drawing.Color.White + Me.TextBox3.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.TextBox3.Location = New System.Drawing.Point(244, 184) + Me.TextBox3.Name = "TextBox3" + Me.TextBox3.ReadOnly = True + Me.TextBox3.Size = New System.Drawing.Size(178, 13) + Me.TextBox3.TabIndex = 15 + Me.TextBox3.Text = "shiftnet.pirate.piratebay/floods/dodge" + ' + 'Label23 + ' + Me.Label23.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label23.AutoSize = True + Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label23.Location = New System.Drawing.Point(455, 201) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(73, 13) + Me.Label23.TabIndex = 14 + Me.Label23.Text = "Floodgate link" + ' + 'Label22 + ' + Me.Label22.AutoSize = True + Me.Label22.Location = New System.Drawing.Point(241, 202) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(0, 13) + Me.Label22.TabIndex = 13 + ' + 'TextBox2 + ' + Me.TextBox2.Location = New System.Drawing.Point(219, 503) + Me.TextBox2.Name = "TextBox2" + Me.TextBox2.Size = New System.Drawing.Size(350, 20) + Me.TextBox2.TabIndex = 12 + ' + 'tbpbfglink1 + ' + Me.tbpbfglink1.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbpbfglink1.AutoSize = True + Me.tbpbfglink1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbpbfglink1.Location = New System.Drawing.Point(437, 185) + Me.tbpbfglink1.Name = "tbpbfglink1" + Me.tbpbfglink1.Size = New System.Drawing.Size(73, 13) + Me.tbpbfglink1.TabIndex = 11 + Me.tbpbfglink1.Text = "Floodgate link" + ' + 'Label13 + ' + Me.Label13.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label13.AutoSize = True + Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label13.Location = New System.Drawing.Point(283, 140) + Me.Label13.Name = "Label13" + Me.Label13.Size = New System.Drawing.Size(191, 29) + Me.Label13.TabIndex = 9 + Me.Label13.Text = "Featured Pirates" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.Label13, "floodgate--""shiftnet.pirate.piratebay/floods/dodge""") + ' + 'tbpbWarning + ' + Me.tbpbWarning.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbpbWarning.AutoSize = True + Me.tbpbWarning.Location = New System.Drawing.Point(189, 114) + Me.tbpbWarning.Name = "tbpbWarning" + Me.tbpbWarning.Size = New System.Drawing.Size(478, 13) + Me.tbpbWarning.TabIndex = 8 + Me.tbpbWarning.Text = "Most pirates are submitted by users, they may contain malware/viruses. USE AT YO" & _ + "UR OWN RISK" + ' + 'tbpbMSG + ' + Me.tbpbMSG.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbpbMSG.AutoSize = True + Me.tbpbMSG.Location = New System.Drawing.Point(229, 71) + Me.tbpbMSG.Name = "tbpbMSG" + Me.tbpbMSG.Size = New System.Drawing.Size(365, 26) + Me.tbpbMSG.TabIndex = 7 + Me.tbpbMSG.Text = "FloodGate is REQUIRED (or any other program that can install .flood files) to" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "do" & _ + "wnload anything on this page." + ' + 'tbdnlfloodgate + ' + Me.tbdnlfloodgate.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbdnlfloodgate.AutoSize = True + Me.tbdnlfloodgate.BackColor = System.Drawing.Color.White + Me.tbdnlfloodgate.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbdnlfloodgate.ForeColor = System.Drawing.Color.Gray + Me.tbdnlfloodgate.Location = New System.Drawing.Point(229, 54) + Me.tbdnlfloodgate.Name = "tbdnlfloodgate" + Me.tbdnlfloodgate.Size = New System.Drawing.Size(107, 13) + Me.tbdnlfloodgate.TabIndex = 6 + Me.tbdnlfloodgate.Text = "Download FloodGate" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.tbdnlfloodgate, "shiftnet.main.floodgate/filetrans.dwnld?file=FloodGate.stp") + ' + 'tbPirateBoat + ' + Me.tbPirateBoat.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbPirateBoat.AutoSize = True + Me.tbPirateBoat.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbPirateBoat.Location = New System.Drawing.Point(222, 13) + Me.tbPirateBoat.Name = "tbPirateBoat" + Me.tbPirateBoat.Size = New System.Drawing.Size(400, 37) + Me.tbPirateBoat.TabIndex = 5 + Me.tbPirateBoat.Text = "Welcome to the pirate boat" + ' + 'pnlpirateboatdownlaod + ' + Me.pnlpirateboatdownlaod.Controls.Add(Me.tpbbackbtn) + Me.pnlpirateboatdownlaod.Controls.Add(Me.tpbfloodgate) + Me.pnlpirateboatdownlaod.Controls.Add(Me.tpburlbox) + Me.pnlpirateboatdownlaod.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlpirateboatdownlaod.Location = New System.Drawing.Point(0, 0) + Me.pnlpirateboatdownlaod.Name = "pnlpirateboatdownlaod" + Me.pnlpirateboatdownlaod.Size = New System.Drawing.Size(816, 533) + Me.pnlpirateboatdownlaod.TabIndex = 18 + ' + 'tpbbackbtn + ' + Me.tpbbackbtn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.tpbbackbtn.Location = New System.Drawing.Point(0, 35) + Me.tpbbackbtn.Name = "tpbbackbtn" + Me.tpbbackbtn.Size = New System.Drawing.Size(75, 23) + Me.tpbbackbtn.TabIndex = 2 + Me.tpbbackbtn.Text = "Back" + Me.tpbbackbtn.UseVisualStyleBackColor = True + ' + 'tpbfloodgate + ' + Me.tpbfloodgate.Dock = System.Windows.Forms.DockStyle.Top + Me.tpbfloodgate.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.tpbfloodgate.Location = New System.Drawing.Point(0, 13) + Me.tpbfloodgate.Name = "tpbfloodgate" + Me.tpbfloodgate.Size = New System.Drawing.Size(816, 23) + Me.tpbfloodgate.TabIndex = 1 + Me.tpbfloodgate.Text = "Download with FloodGate" + Me.tpbfloodgate.UseVisualStyleBackColor = True + ' + 'tpburlbox + ' + Me.tpburlbox.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.tpburlbox.Dock = System.Windows.Forms.DockStyle.Top + Me.tpburlbox.Location = New System.Drawing.Point(0, 0) + Me.tpburlbox.Name = "tpburlbox" + Me.tpburlbox.Size = New System.Drawing.Size(816, 13) + Me.tpburlbox.TabIndex = 0 + ' + 'pnlhome + ' + Me.pnlhome.AutoScroll = True + Me.pnlhome.BackColor = System.Drawing.Color.White + Me.pnlhome.Controls.Add(Me.pnlhomehome) + Me.pnlhome.Controls.Add(Me.pnlhomehistory) + Me.pnlhome.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlhome.Location = New System.Drawing.Point(0, 35) + Me.pnlhome.Name = "pnlhome" + Me.pnlhome.Size = New System.Drawing.Size(816, 533) + Me.pnlhome.TabIndex = 12 + Me.pnlhome.Visible = False + ' + 'pnlhomehome + ' + Me.pnlhomehome.Controls.Add(Me.lblhomehomehistorylink) + Me.pnlhomehome.Controls.Add(Me.lblhomehomebackuplink) + Me.pnlhomehome.Controls.Add(Me.lblhomehomebitnotelink) + Me.pnlhomehome.Controls.Add(Me.lblhomehomeminimatchlink) + Me.pnlhomehome.Controls.Add(Me.lblhomehomeappscapelink) + Me.pnlhomehome.Controls.Add(Me.lblhomehomedescription) + Me.pnlhomehome.Controls.Add(Me.pichomehomeicon) + Me.pnlhomehome.Controls.Add(Me.tbhomehomewelcome) + Me.pnlhomehome.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlhomehome.Location = New System.Drawing.Point(0, 0) + Me.pnlhomehome.Name = "pnlhomehome" + Me.pnlhomehome.Size = New System.Drawing.Size(816, 533) + Me.pnlhomehome.TabIndex = 4 + ' + 'lblhomehomehistorylink + ' + Me.lblhomehomehistorylink.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblhomehomehistorylink.AutoSize = True + Me.lblhomehomehistorylink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblhomehomehistorylink.Location = New System.Drawing.Point(24, 323) + Me.lblhomehomehistorylink.Name = "lblhomehomehistorylink" + Me.lblhomehomehistorylink.Size = New System.Drawing.Size(345, 13) + Me.lblhomehomehistorylink.TabIndex = 10 + Me.lblhomehomehistorylink.Text = "history:shiftnet - any websites you visit will be added to your history here." + ' + 'lblhomehomebackuplink + ' + Me.lblhomehomebackuplink.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblhomehomebackuplink.AutoSize = True + Me.lblhomehomebackuplink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblhomehomebackuplink.Location = New System.Drawing.Point(24, 300) + Me.lblhomehomebackuplink.Name = "lblhomehomebackuplink" + Me.lblhomehomebackuplink.Size = New System.Drawing.Size(484, 13) + Me.lblhomehomebackuplink.TabIndex = 9 + Me.lblhomehomebackuplink.Text = "shiftnet.main.shiftomizer/home.rnp - a site allowing you to download skins and cu" & _ + "stomization programs" + ' + 'lblhomehomebitnotelink + ' + Me.lblhomehomebitnotelink.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblhomehomebitnotelink.AutoSize = True + Me.lblhomehomebitnotelink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblhomehomebitnotelink.Location = New System.Drawing.Point(24, 276) + Me.lblhomehomebitnotelink.Name = "lblhomehomebitnotelink" + Me.lblhomehomebitnotelink.Size = New System.Drawing.Size(429, 13) + Me.lblhomehomebitnotelink.TabIndex = 8 + Me.lblhomehomebitnotelink.Text = "shiftnet.main.bitnote/home.rnp - a site allowing you to trade in Bitnotes, an onl" & _ + "ine currency" + ' + 'lblhomehomeminimatchlink + ' + Me.lblhomehomeminimatchlink.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblhomehomeminimatchlink.AutoSize = True + Me.lblhomehomeminimatchlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblhomehomeminimatchlink.Location = New System.Drawing.Point(24, 253) + Me.lblhomehomeminimatchlink.Name = "lblhomehomeminimatchlink" + Me.lblhomehomeminimatchlink.Size = New System.Drawing.Size(409, 13) + Me.lblhomehomeminimatchlink.TabIndex = 7 + Me.lblhomehomeminimatchlink.Text = "shiftnet.main.minimatch/home.rnp - a site selling games that can earn you code po" & _ + "ints" + ' + 'lblhomehomeappscapelink + ' + Me.lblhomehomeappscapelink.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblhomehomeappscapelink.AutoSize = True + Me.lblhomehomeappscapelink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblhomehomeappscapelink.Location = New System.Drawing.Point(24, 231) + Me.lblhomehomeappscapelink.Name = "lblhomehomeappscapelink" + Me.lblhomehomeappscapelink.Size = New System.Drawing.Size(361, 13) + Me.lblhomehomeappscapelink.TabIndex = 6 + Me.lblhomehomeappscapelink.Text = "shiftnet.main.appscape/home.rnp - a site to buy useful programs for your pc" + ' + 'lblhomehomedescription + ' + Me.lblhomehomedescription.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblhomehomedescription.Location = New System.Drawing.Point(24, 86) + Me.lblhomehomedescription.Name = "lblhomehomedescription" + Me.lblhomehomedescription.Size = New System.Drawing.Size(767, 140) + Me.lblhomehomedescription.TabIndex = 5 + Me.lblhomehomedescription.Text = resources.GetString("lblhomehomedescription.Text") + ' + 'pichomehomeicon + ' + Me.pichomehomeicon.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pichomehomeicon.Image = Global.ShiftOS.My.Resources.Resources.iconShiftnet + Me.pichomehomeicon.Location = New System.Drawing.Point(537, 31) + Me.pichomehomeicon.Name = "pichomehomeicon" + Me.pichomehomeicon.Size = New System.Drawing.Size(16, 16) + Me.pichomehomeicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pichomehomeicon.TabIndex = 4 + Me.pichomehomeicon.TabStop = False + ' + 'tbhomehomewelcome + ' + Me.tbhomehomewelcome.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.tbhomehomewelcome.AutoSize = True + Me.tbhomehomewelcome.BackColor = System.Drawing.Color.Transparent + Me.tbhomehomewelcome.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbhomehomewelcome.Location = New System.Drawing.Point(244, 37) + Me.tbhomehomewelcome.Name = "tbhomehomewelcome" + Me.tbhomehomewelcome.Size = New System.Drawing.Size(303, 37) + Me.tbhomehomewelcome.TabIndex = 3 + Me.tbhomehomewelcome.Text = "Welcome to Shiftnet" + ' + 'pnlhomehistory + ' + Me.pnlhomehistory.Controls.Add(Me.lbhomehistoryhistory) + Me.pnlhomehistory.Location = New System.Drawing.Point(344, 323) + Me.pnlhomehistory.Name = "pnlhomehistory" + Me.pnlhomehistory.Size = New System.Drawing.Size(156, 136) + Me.pnlhomehistory.TabIndex = 11 + ' + 'lbhomehistoryhistory + ' + Me.lbhomehistoryhistory.Dock = System.Windows.Forms.DockStyle.Fill + Me.lbhomehistoryhistory.Location = New System.Drawing.Point(0, 0) + Me.lbhomehistoryhistory.Name = "lbhomehistoryhistory" + Me.lbhomehistoryhistory.Size = New System.Drawing.Size(156, 136) + Me.lbhomehistoryhistory.TabIndex = 1 + Me.lbhomehistoryhistory.UseCompatibleStateImageBehavior = False + ' + 'pnlmainsiteappscape + ' + Me.pnlmainsiteappscape.BackColor = System.Drawing.Color.White + Me.pnlmainsiteappscape.Controls.Add(Me.pnlappscapedeposit) + Me.pnlmainsiteappscape.Controls.Add(Me.appscapehomepage) + Me.pnlmainsiteappscape.Controls.Add(Me.pnlappscapeoprcwrite) + Me.pnlmainsiteappscape.Controls.Add(Me.appscapewebbrowserinfopage) + Me.pnlmainsiteappscape.Controls.Add(Me.appscapevideoplayerinfopage) + Me.pnlmainsiteappscape.Controls.Add(Me.appscapecalculatorinfopage) + Me.pnlmainsiteappscape.Controls.Add(Me.appscapeaudioplayerinfopage) + Me.pnlmainsiteappscape.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlmainsiteappscape.Location = New System.Drawing.Point(0, 35) + Me.pnlmainsiteappscape.Name = "pnlmainsiteappscape" + Me.pnlmainsiteappscape.Size = New System.Drawing.Size(816, 533) + Me.pnlmainsiteappscape.TabIndex = 2 + Me.pnlmainsiteappscape.Visible = False + ' + 'pnlappscapedeposit + ' + Me.pnlappscapedeposit.AutoScroll = True + Me.pnlappscapedeposit.BackColor = System.Drawing.Color.White + Me.pnlappscapedeposit.Controls.Add(Me.appscapedepositestep3) + Me.pnlappscapedeposit.Controls.Add(Me.appscapedepositestep2) + Me.pnlappscapedeposit.Controls.Add(Me.appscapedepositestep1) + Me.pnlappscapedeposit.Controls.Add(Me.picappscapedepositeinfobitnotescreenshot) + Me.pnlappscapedeposit.Controls.Add(Me.lblappscapedepositpasteinfo) + Me.pnlappscapedeposit.Controls.Add(Me.txtappscapedepositeaddress) + Me.pnlappscapedeposit.Controls.Add(Me.lblappscapecopyaddressinfo) + Me.pnlappscapedeposit.Controls.Add(Me.Label9) + Me.pnlappscapedeposit.Controls.Add(Me.Panel46) + Me.pnlappscapedeposit.Controls.Add(Me.Panel47) + Me.pnlappscapedeposit.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlappscapedeposit.Location = New System.Drawing.Point(0, 0) + Me.pnlappscapedeposit.Name = "pnlappscapedeposit" + Me.pnlappscapedeposit.Size = New System.Drawing.Size(816, 533) + Me.pnlappscapedeposit.TabIndex = 8 + Me.pnlappscapedeposit.Visible = False + ' + 'appscapedepositestep3 + ' + Me.appscapedepositestep3.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.appscapedepositestep3.AutoSize = True + Me.appscapedepositestep3.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.appscapedepositestep3.Location = New System.Drawing.Point(247, 472) + Me.appscapedepositestep3.Name = "appscapedepositestep3" + Me.appscapedepositestep3.Size = New System.Drawing.Size(510, 25) + Me.appscapedepositestep3.TabIndex = 13 + Me.appscapedepositestep3.Text = "...Select the desired amount and press ""Send."" " + ' + 'appscapedepositestep2 + ' + Me.appscapedepositestep2.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.appscapedepositestep2.AutoSize = True + Me.appscapedepositestep2.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.appscapedepositestep2.Location = New System.Drawing.Point(247, 189) + Me.appscapedepositestep2.Name = "appscapedepositestep2" + Me.appscapedepositestep2.Size = New System.Drawing.Size(426, 25) + Me.appscapedepositestep2.TabIndex = 12 + Me.appscapedepositestep2.Text = "...And paste it into your bitnote wallet..." + ' + 'appscapedepositestep1 + ' + Me.appscapedepositestep1.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.appscapedepositestep1.AutoSize = True + Me.appscapedepositestep1.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.appscapedepositestep1.Location = New System.Drawing.Point(243, 119) + Me.appscapedepositestep1.Name = "appscapedepositestep1" + Me.appscapedepositestep1.Size = New System.Drawing.Size(367, 25) + Me.appscapedepositestep1.TabIndex = 11 + Me.appscapedepositestep1.Text = "Copy the Bitnote address below..." + ' + 'picappscapedepositeinfobitnotescreenshot + ' + Me.picappscapedepositeinfobitnotescreenshot.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picappscapedepositeinfobitnotescreenshot.Image = Global.ShiftOS.My.Resources.Resources.appscapedepositbitnotewalletscreenshot + Me.picappscapedepositeinfobitnotescreenshot.Location = New System.Drawing.Point(248, 227) + Me.picappscapedepositeinfobitnotescreenshot.Name = "picappscapedepositeinfobitnotescreenshot" + Me.picappscapedepositeinfobitnotescreenshot.Size = New System.Drawing.Size(451, 226) + Me.picappscapedepositeinfobitnotescreenshot.TabIndex = 10 + Me.picappscapedepositeinfobitnotescreenshot.TabStop = False + ' + 'lblappscapedepositpasteinfo + ' + Me.lblappscapedepositpasteinfo.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblappscapedepositpasteinfo.BackColor = System.Drawing.Color.Transparent + Me.lblappscapedepositpasteinfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblappscapedepositpasteinfo.Location = New System.Drawing.Point(1576, 190) + Me.lblappscapedepositpasteinfo.Name = "lblappscapedepositpasteinfo" + Me.lblappscapedepositpasteinfo.Size = New System.Drawing.Size(545, 57) + Me.lblappscapedepositpasteinfo.TabIndex = 9 + Me.lblappscapedepositpasteinfo.Text = "...And paste it into your Bitnote wallet. Choose the desired amount and click sen" & _ + "d!" + Me.lblappscapedepositpasteinfo.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'txtappscapedepositeaddress + ' + Me.txtappscapedepositeaddress.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.txtappscapedepositeaddress.Location = New System.Drawing.Point(244, 149) + Me.txtappscapedepositeaddress.Name = "txtappscapedepositeaddress" + Me.txtappscapedepositeaddress.Size = New System.Drawing.Size(541, 20) + Me.txtappscapedepositeaddress.TabIndex = 8 + Me.txtappscapedepositeaddress.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'lblappscapecopyaddressinfo + ' + Me.lblappscapecopyaddressinfo.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblappscapecopyaddressinfo.BackColor = System.Drawing.Color.Transparent + Me.lblappscapecopyaddressinfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblappscapecopyaddressinfo.Location = New System.Drawing.Point(1576, 124) + Me.lblappscapecopyaddressinfo.Name = "lblappscapecopyaddressinfo" + Me.lblappscapecopyaddressinfo.Size = New System.Drawing.Size(432, 23) + Me.lblappscapecopyaddressinfo.TabIndex = 7 + Me.lblappscapecopyaddressinfo.Text = "Copy the following Bitnote address:" + Me.lblappscapecopyaddressinfo.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'Label9 + ' + Me.Label9.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label9.Location = New System.Drawing.Point(1351, 511) + Me.Label9.Name = "Label9" + Me.Label9.Size = New System.Drawing.Size(768, 23) + Me.Label9.TabIndex = 5 + Me.Label9.Text = "© Copyright Aiden Nirh - Do Not Reproduce" + Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel46 + ' + Me.Panel46.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel46.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositinfo + Me.Panel46.Controls.Add(Me.btnappscapedepositeback) + Me.Panel46.Location = New System.Drawing.Point(10, 98) + Me.Panel46.Name = "Panel46" + Me.Panel46.Size = New System.Drawing.Size(202, 407) + Me.Panel46.TabIndex = 1 + ' + 'btnappscapedepositeback + ' + Me.btnappscapedepositeback.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobackbutton + Me.btnappscapedepositeback.Location = New System.Drawing.Point(41, 361) + Me.btnappscapedepositeback.Name = "btnappscapedepositeback" + Me.btnappscapedepositeback.Size = New System.Drawing.Size(100, 35) + Me.btnappscapedepositeback.TabIndex = 0 + ' + 'Panel47 + ' + Me.Panel47.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel47.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapetitlebanner + Me.Panel47.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel47.Controls.Add(Me.lbappscapepayinfohello) + Me.Panel47.Location = New System.Drawing.Point(10, 6) + Me.Panel47.Name = "Panel47" + Me.Panel47.Size = New System.Drawing.Size(770, 88) + Me.Panel47.TabIndex = 0 + ' + 'lbappscapepayinfohello + ' + Me.lbappscapepayinfohello.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lbappscapepayinfohello.BackColor = System.Drawing.Color.Transparent + Me.lbappscapepayinfohello.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbappscapepayinfohello.Location = New System.Drawing.Point(335, 5) + Me.lbappscapepayinfohello.Name = "lbappscapepayinfohello" + Me.lbappscapepayinfohello.Size = New System.Drawing.Size(432, 23) + Me.lbappscapepayinfohello.TabIndex = 6 + Me.lbappscapepayinfohello.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" + Me.lbappscapepayinfohello.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'appscapehomepage + ' + Me.appscapehomepage.AutoScroll = True + Me.appscapehomepage.BackColor = System.Drawing.Color.White + Me.appscapehomepage.Controls.Add(Me.Label1) + Me.appscapehomepage.Controls.Add(Me.Panel20) + Me.appscapehomepage.Controls.Add(Me.Panel17) + Me.appscapehomepage.Controls.Add(Me.Panel14) + Me.appscapehomepage.Controls.Add(Me.Panel11) + Me.appscapehomepage.Controls.Add(Me.Panel8) + Me.appscapehomepage.Controls.Add(Me.Panel5) + Me.appscapehomepage.Controls.Add(Me.Panel4) + Me.appscapehomepage.Controls.Add(Me.Panel3) + Me.appscapehomepage.Dock = System.Windows.Forms.DockStyle.Fill + Me.appscapehomepage.Location = New System.Drawing.Point(0, 0) + Me.appscapehomepage.Name = "appscapehomepage" + Me.appscapehomepage.Size = New System.Drawing.Size(816, 533) + Me.appscapehomepage.TabIndex = 3 + Me.appscapehomepage.Visible = False + ' + 'Label1 + ' + Me.Label1.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(24, 511) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(768, 23) + Me.Label1.TabIndex = 5 + Me.Label1.Text = "© Copyright Aiden Nirh - Do Not Reproduce" + Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Panel20 + ' + Me.Panel20.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel20.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapemoresoftware + Me.Panel20.Controls.Add(Me.btnbuymoresoftware2) + Me.Panel20.Controls.Add(Me.btnmoresoftware2info) + Me.Panel20.Location = New System.Drawing.Point(610, 308) + Me.Panel20.Name = "Panel20" + Me.Panel20.Size = New System.Drawing.Size(182, 200) + Me.Panel20.TabIndex = 3 + ' + 'btnbuymoresoftware2 + ' + Me.btnbuymoresoftware2.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeundefinedprice + Me.btnbuymoresoftware2.Location = New System.Drawing.Point(73, 161) + Me.btnbuymoresoftware2.Name = "btnbuymoresoftware2" + Me.btnbuymoresoftware2.Size = New System.Drawing.Size(102, 30) + Me.btnbuymoresoftware2.TabIndex = 1 + ' + 'btnmoresoftware2info + ' + Me.btnmoresoftware2info.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobutton + Me.btnmoresoftware2info.Location = New System.Drawing.Point(10, 161) + Me.btnmoresoftware2info.Name = "btnmoresoftware2info" + Me.btnmoresoftware2info.Size = New System.Drawing.Size(57, 30) + Me.btnmoresoftware2info.TabIndex = 0 + ' + 'Panel17 + ' + Me.Panel17.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel17.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeorcwrite + Me.Panel17.Controls.Add(Me.btnbuyorcwrite) + Me.Panel17.Controls.Add(Me.btnmoresoftware1info) + Me.Panel17.Location = New System.Drawing.Point(421, 308) + Me.Panel17.Name = "Panel17" + Me.Panel17.Size = New System.Drawing.Size(182, 200) + Me.Panel17.TabIndex = 4 + ' + 'btnbuyorcwrite + ' + Me.btnbuyorcwrite.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapevideoplayerprice + Me.btnbuyorcwrite.Location = New System.Drawing.Point(73, 161) + Me.btnbuyorcwrite.Name = "btnbuyorcwrite" + Me.btnbuyorcwrite.Size = New System.Drawing.Size(102, 30) + Me.btnbuyorcwrite.TabIndex = 1 + ' + 'btnmoresoftware1info + ' + Me.btnmoresoftware1info.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobutton + Me.btnmoresoftware1info.Location = New System.Drawing.Point(10, 161) + Me.btnmoresoftware1info.Name = "btnmoresoftware1info" + Me.btnmoresoftware1info.Size = New System.Drawing.Size(57, 30) + Me.btnmoresoftware1info.TabIndex = 0 + ' + 'Panel14 + ' + Me.Panel14.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel14.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapecalculator + Me.Panel14.Controls.Add(Me.btnbuycalculator) + Me.Panel14.Controls.Add(Me.btncalculatorinfo) + Me.Panel14.Location = New System.Drawing.Point(232, 308) + Me.Panel14.Name = "Panel14" + Me.Panel14.Size = New System.Drawing.Size(182, 200) + Me.Panel14.TabIndex = 3 + ' + 'btnbuycalculator + ' + Me.btnbuycalculator.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapecalculatorprice + Me.btnbuycalculator.Location = New System.Drawing.Point(73, 161) + Me.btnbuycalculator.Name = "btnbuycalculator" + Me.btnbuycalculator.Size = New System.Drawing.Size(102, 30) + Me.btnbuycalculator.TabIndex = 1 + ' + 'btncalculatorinfo + ' + Me.btncalculatorinfo.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobutton + Me.btncalculatorinfo.Location = New System.Drawing.Point(10, 161) + Me.btncalculatorinfo.Name = "btncalculatorinfo" + Me.btncalculatorinfo.Size = New System.Drawing.Size(57, 30) + Me.btncalculatorinfo.TabIndex = 0 + ' + 'Panel11 + ' + Me.Panel11.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel11.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapewebbrowser + Me.Panel11.Controls.Add(Me.btnbuywebbrowser) + Me.Panel11.Controls.Add(Me.btnwebbrowserinfo) + Me.Panel11.Location = New System.Drawing.Point(610, 101) + Me.Panel11.Name = "Panel11" + Me.Panel11.Size = New System.Drawing.Size(182, 200) + Me.Panel11.TabIndex = 3 + ' + 'btnbuywebbrowser + ' + Me.btnbuywebbrowser.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapewebbrowserprice + Me.btnbuywebbrowser.Location = New System.Drawing.Point(73, 161) + Me.btnbuywebbrowser.Name = "btnbuywebbrowser" + Me.btnbuywebbrowser.Size = New System.Drawing.Size(102, 30) + Me.btnbuywebbrowser.TabIndex = 1 + ' + 'btnwebbrowserinfo + ' + Me.btnwebbrowserinfo.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobutton + Me.btnwebbrowserinfo.Location = New System.Drawing.Point(10, 161) + Me.btnwebbrowserinfo.Name = "btnwebbrowserinfo" + Me.btnwebbrowserinfo.Size = New System.Drawing.Size(57, 30) + Me.btnwebbrowserinfo.TabIndex = 0 + ' + 'Panel8 + ' + Me.Panel8.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel8.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapevideoplayer + Me.Panel8.Controls.Add(Me.btnbuyvideoplayer) + Me.Panel8.Controls.Add(Me.btnvideoplayerinfo) + Me.Panel8.Location = New System.Drawing.Point(421, 101) + Me.Panel8.Name = "Panel8" + Me.Panel8.Size = New System.Drawing.Size(182, 200) + Me.Panel8.TabIndex = 3 + ' + 'btnbuyvideoplayer + ' + Me.btnbuyvideoplayer.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapevideoplayerprice + Me.btnbuyvideoplayer.Location = New System.Drawing.Point(73, 161) + Me.btnbuyvideoplayer.Name = "btnbuyvideoplayer" + Me.btnbuyvideoplayer.Size = New System.Drawing.Size(102, 30) + Me.btnbuyvideoplayer.TabIndex = 1 + ' + 'btnvideoplayerinfo + ' + Me.btnvideoplayerinfo.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobutton + Me.btnvideoplayerinfo.Location = New System.Drawing.Point(10, 161) + Me.btnvideoplayerinfo.Name = "btnvideoplayerinfo" + Me.btnvideoplayerinfo.Size = New System.Drawing.Size(57, 30) + Me.btnvideoplayerinfo.TabIndex = 0 + ' + 'Panel5 + ' + Me.Panel5.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel5.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeaudioplayerbox + Me.Panel5.Controls.Add(Me.btnbuyaudioplayer) + Me.Panel5.Controls.Add(Me.btnaudioplayerinfo) + Me.Panel5.Location = New System.Drawing.Point(232, 101) + Me.Panel5.Name = "Panel5" + Me.Panel5.Size = New System.Drawing.Size(182, 200) + Me.Panel5.TabIndex = 2 + ' + 'btnbuyaudioplayer + ' + Me.btnbuyaudioplayer.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeaudioplayerprice + Me.btnbuyaudioplayer.Location = New System.Drawing.Point(73, 161) + Me.btnbuyaudioplayer.Name = "btnbuyaudioplayer" + Me.btnbuyaudioplayer.Size = New System.Drawing.Size(102, 30) + Me.btnbuyaudioplayer.TabIndex = 1 + ' + 'btnaudioplayerinfo + ' + Me.btnaudioplayerinfo.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobutton + Me.btnaudioplayerinfo.Location = New System.Drawing.Point(10, 161) + Me.btnaudioplayerinfo.Name = "btnaudioplayerinfo" + Me.btnaudioplayerinfo.Size = New System.Drawing.Size(57, 30) + Me.btnaudioplayerinfo.TabIndex = 0 + ' + 'Panel4 + ' + Me.Panel4.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel4.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapewelcometoappscape + Me.Panel4.Location = New System.Drawing.Point(23, 101) + Me.Panel4.Name = "Panel4" + Me.Panel4.Size = New System.Drawing.Size(202, 407) + Me.Panel4.TabIndex = 1 + ' + 'Panel3 + ' + Me.Panel3.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel3.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapetitlebanner + Me.Panel3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel3.Controls.Add(Me.lbappscapehello) + Me.Panel3.Controls.Add(Me.btnappscapedeposit) + Me.Panel3.Location = New System.Drawing.Point(23, 5) + Me.Panel3.Name = "Panel3" + Me.Panel3.Size = New System.Drawing.Size(770, 88) + Me.Panel3.TabIndex = 0 + ' + 'lbappscapehello + ' + Me.lbappscapehello.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lbappscapehello.BackColor = System.Drawing.Color.Transparent + Me.lbappscapehello.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbappscapehello.Location = New System.Drawing.Point(335, 5) + Me.lbappscapehello.Name = "lbappscapehello" + Me.lbappscapehello.Size = New System.Drawing.Size(432, 23) + Me.lbappscapehello.TabIndex = 6 + Me.lbappscapehello.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" + Me.lbappscapehello.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'btnappscapedeposit + ' + Me.btnappscapedeposit.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnappscapedeposit.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton + Me.btnappscapedeposit.Location = New System.Drawing.Point(678, 33) + Me.btnappscapedeposit.Name = "btnappscapedeposit" + Me.btnappscapedeposit.Size = New System.Drawing.Size(82, 47) + Me.btnappscapedeposit.TabIndex = 0 + ' + 'pnlappscapeoprcwrite + ' + Me.pnlappscapeoprcwrite.AutoScroll = True + Me.pnlappscapeoprcwrite.BackColor = System.Drawing.Color.White + Me.pnlappscapeoprcwrite.Controls.Add(Me.Panel16) + Me.pnlappscapeoprcwrite.Controls.Add(Me.Panel22) + Me.pnlappscapeoprcwrite.Controls.Add(Me.Panel23) + Me.pnlappscapeoprcwrite.Controls.Add(Me.Label5) + Me.pnlappscapeoprcwrite.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlappscapeoprcwrite.Location = New System.Drawing.Point(0, 0) + Me.pnlappscapeoprcwrite.Name = "pnlappscapeoprcwrite" + Me.pnlappscapeoprcwrite.Size = New System.Drawing.Size(816, 533) + Me.pnlappscapeoprcwrite.TabIndex = 9 + Me.pnlappscapeoprcwrite.Visible = False + ' + 'Panel16 + ' + Me.Panel16.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel16.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfoorcwritevisualpreview + Me.Panel16.Controls.Add(Me.btnappscapeorcwritebuy) + Me.Panel16.Controls.Add(Me.btnappscapeorcwriteback) + Me.Panel16.Location = New System.Drawing.Point(224, 99) + Me.Panel16.Name = "Panel16" + Me.Panel16.Size = New System.Drawing.Size(561, 414) + Me.Panel16.TabIndex = 2 + ' + 'btnappscapeorcwritebuy + ' + Me.btnappscapeorcwritebuy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnappscapeorcwritebuy.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobuybutton + Me.btnappscapeorcwritebuy.Location = New System.Drawing.Point(439, 366) + Me.btnappscapeorcwritebuy.Name = "btnappscapeorcwritebuy" + Me.btnappscapeorcwritebuy.Size = New System.Drawing.Size(102, 37) + Me.btnappscapeorcwritebuy.TabIndex = 2 + ' + 'btnappscapeorcwriteback + ' + Me.btnappscapeorcwriteback.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnappscapeorcwriteback.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobackbutton + Me.btnappscapeorcwriteback.Location = New System.Drawing.Point(20, 366) + Me.btnappscapeorcwriteback.Name = "btnappscapeorcwriteback" + Me.btnappscapeorcwriteback.Size = New System.Drawing.Size(102, 37) + Me.btnappscapeorcwriteback.TabIndex = 1 + ' + 'Panel22 + ' + Me.Panel22.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel22.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfoorcwritetext + Me.Panel22.Location = New System.Drawing.Point(15, 99) + Me.Panel22.Name = "Panel22" + Me.Panel22.Size = New System.Drawing.Size(202, 414) + Me.Panel22.TabIndex = 1 + ' + 'Panel23 + ' + Me.Panel23.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel23.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapetitlebanner + Me.Panel23.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel23.Controls.Add(Me.lblappscapeorcwritehellotext) + Me.Panel23.Controls.Add(Me.btnappscapeorcwritedeposit) + Me.Panel23.Location = New System.Drawing.Point(15, 5) + Me.Panel23.Name = "Panel23" + Me.Panel23.Size = New System.Drawing.Size(770, 88) + Me.Panel23.TabIndex = 0 + ' + 'lblappscapeorcwritehellotext + ' + Me.lblappscapeorcwritehellotext.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblappscapeorcwritehellotext.BackColor = System.Drawing.Color.Transparent + Me.lblappscapeorcwritehellotext.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblappscapeorcwritehellotext.Location = New System.Drawing.Point(335, 5) + Me.lblappscapeorcwritehellotext.Name = "lblappscapeorcwritehellotext" + Me.lblappscapeorcwritehellotext.Size = New System.Drawing.Size(432, 23) + Me.lblappscapeorcwritehellotext.TabIndex = 6 + Me.lblappscapeorcwritehellotext.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" + Me.lblappscapeorcwritehellotext.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'btnappscapeorcwritedeposit + ' + Me.btnappscapeorcwritedeposit.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnappscapeorcwritedeposit.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton + Me.btnappscapeorcwritedeposit.Location = New System.Drawing.Point(678, 33) + Me.btnappscapeorcwritedeposit.Name = "btnappscapeorcwritedeposit" + Me.btnappscapeorcwritedeposit.Size = New System.Drawing.Size(82, 47) + Me.btnappscapeorcwritedeposit.TabIndex = 0 + ' + 'Label5 + ' + Me.Label5.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.Location = New System.Drawing.Point(12, 511) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(768, 23) + Me.Label5.TabIndex = 5 + Me.Label5.Text = "© Copyright Aiden Nirh - Do Not Reproduce" + Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'appscapewebbrowserinfopage + ' + Me.appscapewebbrowserinfopage.AutoScroll = True + Me.appscapewebbrowserinfopage.BackColor = System.Drawing.Color.White + Me.appscapewebbrowserinfopage.Controls.Add(Me.Panel19) + Me.appscapewebbrowserinfopage.Controls.Add(Me.Panel24) + Me.appscapewebbrowserinfopage.Controls.Add(Me.Panel25) + Me.appscapewebbrowserinfopage.Controls.Add(Me.Label6) + Me.appscapewebbrowserinfopage.Location = New System.Drawing.Point(483, 241) + Me.appscapewebbrowserinfopage.Name = "appscapewebbrowserinfopage" + Me.appscapewebbrowserinfopage.Size = New System.Drawing.Size(333, 292) + Me.appscapewebbrowserinfopage.TabIndex = 6 + Me.appscapewebbrowserinfopage.Visible = False + ' + 'Panel19 + ' + Me.Panel19.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel19.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfowebbrowservisualpreview + Me.Panel19.Controls.Add(Me.btnwebbrowserinfobuy) + Me.Panel19.Controls.Add(Me.btnwebbrowserinfoback) + Me.Panel19.Location = New System.Drawing.Point(-9, 99) + Me.Panel19.Name = "Panel19" + Me.Panel19.Size = New System.Drawing.Size(561, 414) + Me.Panel19.TabIndex = 2 + ' + 'btnwebbrowserinfobuy + ' + Me.btnwebbrowserinfobuy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnwebbrowserinfobuy.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobuybutton + Me.btnwebbrowserinfobuy.Location = New System.Drawing.Point(439, 366) + Me.btnwebbrowserinfobuy.Name = "btnwebbrowserinfobuy" + Me.btnwebbrowserinfobuy.Size = New System.Drawing.Size(102, 37) + Me.btnwebbrowserinfobuy.TabIndex = 2 + ' + 'btnwebbrowserinfoback + ' + Me.btnwebbrowserinfoback.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnwebbrowserinfoback.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobackbutton + Me.btnwebbrowserinfoback.Location = New System.Drawing.Point(20, 366) + Me.btnwebbrowserinfoback.Name = "btnwebbrowserinfoback" + Me.btnwebbrowserinfoback.Size = New System.Drawing.Size(102, 37) + Me.btnwebbrowserinfoback.TabIndex = 1 + ' + 'Panel24 + ' + Me.Panel24.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel24.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfowebbrowsertext + Me.Panel24.Location = New System.Drawing.Point(-218, 99) + Me.Panel24.Name = "Panel24" + Me.Panel24.Size = New System.Drawing.Size(202, 414) + Me.Panel24.TabIndex = 1 + ' + 'Panel25 + ' + Me.Panel25.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel25.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapetitlebanner + Me.Panel25.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel25.Controls.Add(Me.lbappscapewebbroswerinfohello) + Me.Panel25.Controls.Add(Me.appscapewebbrowserinfodepositbtn) + Me.Panel25.Location = New System.Drawing.Point(-218, 5) + Me.Panel25.Name = "Panel25" + Me.Panel25.Size = New System.Drawing.Size(770, 88) + Me.Panel25.TabIndex = 0 + ' + 'lbappscapewebbroswerinfohello + ' + Me.lbappscapewebbroswerinfohello.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lbappscapewebbroswerinfohello.BackColor = System.Drawing.Color.Transparent + Me.lbappscapewebbroswerinfohello.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbappscapewebbroswerinfohello.Location = New System.Drawing.Point(335, 5) + Me.lbappscapewebbroswerinfohello.Name = "lbappscapewebbroswerinfohello" + Me.lbappscapewebbroswerinfohello.Size = New System.Drawing.Size(432, 23) + Me.lbappscapewebbroswerinfohello.TabIndex = 6 + Me.lbappscapewebbroswerinfohello.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" + Me.lbappscapewebbroswerinfohello.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'appscapewebbrowserinfodepositbtn + ' + Me.appscapewebbrowserinfodepositbtn.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.appscapewebbrowserinfodepositbtn.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton + Me.appscapewebbrowserinfodepositbtn.Location = New System.Drawing.Point(678, 33) + Me.appscapewebbrowserinfodepositbtn.Name = "appscapewebbrowserinfodepositbtn" + Me.appscapewebbrowserinfodepositbtn.Size = New System.Drawing.Size(82, 47) + Me.appscapewebbrowserinfodepositbtn.TabIndex = 0 + ' + 'Label6 + ' + Me.Label6.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label6.Location = New System.Drawing.Point(-221, 511) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(768, 23) + Me.Label6.TabIndex = 5 + Me.Label6.Text = "© Copyright Aiden Nirh - Do Not Reproduce" + Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'appscapevideoplayerinfopage + ' + Me.appscapevideoplayerinfopage.AutoScroll = True + Me.appscapevideoplayerinfopage.BackColor = System.Drawing.Color.White + Me.appscapevideoplayerinfopage.Controls.Add(Me.Panel9) + Me.appscapevideoplayerinfopage.Controls.Add(Me.Panel13) + Me.appscapevideoplayerinfopage.Controls.Add(Me.Panel15) + Me.appscapevideoplayerinfopage.Controls.Add(Me.Label4) + Me.appscapevideoplayerinfopage.Location = New System.Drawing.Point(347, 125) + Me.appscapevideoplayerinfopage.Name = "appscapevideoplayerinfopage" + Me.appscapevideoplayerinfopage.Size = New System.Drawing.Size(469, 408) + Me.appscapevideoplayerinfopage.TabIndex = 5 + Me.appscapevideoplayerinfopage.Visible = False + ' + 'Panel9 + ' + Me.Panel9.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel9.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfovideoplayervisualpreview + Me.Panel9.Controls.Add(Me.btnvideoplayerinfobuy) + Me.Panel9.Controls.Add(Me.btnvideoplayerinfoback) + Me.Panel9.Location = New System.Drawing.Point(59, 99) + Me.Panel9.Name = "Panel9" + Me.Panel9.Size = New System.Drawing.Size(561, 414) + Me.Panel9.TabIndex = 2 + ' + 'btnvideoplayerinfobuy + ' + Me.btnvideoplayerinfobuy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnvideoplayerinfobuy.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobuybutton + Me.btnvideoplayerinfobuy.Location = New System.Drawing.Point(439, 366) + Me.btnvideoplayerinfobuy.Name = "btnvideoplayerinfobuy" + Me.btnvideoplayerinfobuy.Size = New System.Drawing.Size(102, 37) + Me.btnvideoplayerinfobuy.TabIndex = 2 + ' + 'btnvideoplayerinfoback + ' + Me.btnvideoplayerinfoback.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnvideoplayerinfoback.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobackbutton + Me.btnvideoplayerinfoback.Location = New System.Drawing.Point(20, 366) + Me.btnvideoplayerinfoback.Name = "btnvideoplayerinfoback" + Me.btnvideoplayerinfoback.Size = New System.Drawing.Size(102, 37) + Me.btnvideoplayerinfoback.TabIndex = 1 + ' + 'Panel13 + ' + Me.Panel13.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel13.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfovideoplayertext + Me.Panel13.Location = New System.Drawing.Point(-150, 99) + Me.Panel13.Name = "Panel13" + Me.Panel13.Size = New System.Drawing.Size(202, 414) + Me.Panel13.TabIndex = 1 + ' + 'Panel15 + ' + Me.Panel15.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel15.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapetitlebanner + Me.Panel15.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel15.Controls.Add(Me.lbappscapevideoplayerinfohello) + Me.Panel15.Controls.Add(Me.appscapevideoplayerinfodepositbtn) + Me.Panel15.Location = New System.Drawing.Point(-150, 5) + Me.Panel15.Name = "Panel15" + Me.Panel15.Size = New System.Drawing.Size(770, 88) + Me.Panel15.TabIndex = 0 + ' + 'lbappscapevideoplayerinfohello + ' + Me.lbappscapevideoplayerinfohello.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lbappscapevideoplayerinfohello.BackColor = System.Drawing.Color.Transparent + Me.lbappscapevideoplayerinfohello.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbappscapevideoplayerinfohello.Location = New System.Drawing.Point(335, 5) + Me.lbappscapevideoplayerinfohello.Name = "lbappscapevideoplayerinfohello" + Me.lbappscapevideoplayerinfohello.Size = New System.Drawing.Size(432, 23) + Me.lbappscapevideoplayerinfohello.TabIndex = 6 + Me.lbappscapevideoplayerinfohello.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" + Me.lbappscapevideoplayerinfohello.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'appscapevideoplayerinfodepositbtn + ' + Me.appscapevideoplayerinfodepositbtn.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.appscapevideoplayerinfodepositbtn.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton + Me.appscapevideoplayerinfodepositbtn.Location = New System.Drawing.Point(678, 33) + Me.appscapevideoplayerinfodepositbtn.Name = "appscapevideoplayerinfodepositbtn" + Me.appscapevideoplayerinfodepositbtn.Size = New System.Drawing.Size(82, 47) + Me.appscapevideoplayerinfodepositbtn.TabIndex = 0 + ' + 'Label4 + ' + Me.Label4.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(-153, 511) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(768, 23) + Me.Label4.TabIndex = 5 + Me.Label4.Text = "© Copyright Aiden Nirh - Do Not Reproduce" + Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'appscapecalculatorinfopage + ' + Me.appscapecalculatorinfopage.AutoScroll = True + Me.appscapecalculatorinfopage.BackColor = System.Drawing.Color.White + Me.appscapecalculatorinfopage.Controls.Add(Me.Panel28) + Me.appscapecalculatorinfopage.Controls.Add(Me.Panel34) + Me.appscapecalculatorinfopage.Controls.Add(Me.Panel35) + Me.appscapecalculatorinfopage.Controls.Add(Me.Label8) + Me.appscapecalculatorinfopage.Location = New System.Drawing.Point(279, 86) + Me.appscapecalculatorinfopage.Name = "appscapecalculatorinfopage" + Me.appscapecalculatorinfopage.Size = New System.Drawing.Size(537, 447) + Me.appscapecalculatorinfopage.TabIndex = 7 + Me.appscapecalculatorinfopage.Visible = False + ' + 'Panel28 + ' + Me.Panel28.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel28.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfocalculatorvisualpreview + Me.Panel28.Controls.Add(Me.btncalculatorinfobuy) + Me.Panel28.Controls.Add(Me.btncalculatorinfoback) + Me.Panel28.Location = New System.Drawing.Point(93, 99) + Me.Panel28.Name = "Panel28" + Me.Panel28.Size = New System.Drawing.Size(561, 414) + Me.Panel28.TabIndex = 2 + ' + 'btncalculatorinfobuy + ' + Me.btncalculatorinfobuy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btncalculatorinfobuy.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobuybutton + Me.btncalculatorinfobuy.Location = New System.Drawing.Point(439, 366) + Me.btncalculatorinfobuy.Name = "btncalculatorinfobuy" + Me.btncalculatorinfobuy.Size = New System.Drawing.Size(102, 37) + Me.btncalculatorinfobuy.TabIndex = 2 + ' + 'btncalculatorinfoback + ' + Me.btncalculatorinfoback.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btncalculatorinfoback.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobackbutton + Me.btncalculatorinfoback.Location = New System.Drawing.Point(20, 366) + Me.btncalculatorinfoback.Name = "btncalculatorinfoback" + Me.btncalculatorinfoback.Size = New System.Drawing.Size(102, 37) + Me.btncalculatorinfoback.TabIndex = 1 + ' + 'Panel34 + ' + Me.Panel34.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel34.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfocalculatortext + Me.Panel34.Location = New System.Drawing.Point(-116, 99) + Me.Panel34.Name = "Panel34" + Me.Panel34.Size = New System.Drawing.Size(202, 414) + Me.Panel34.TabIndex = 1 + ' + 'Panel35 + ' + Me.Panel35.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel35.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapetitlebanner + Me.Panel35.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel35.Controls.Add(Me.lbappscapecalculatorinfohello) + Me.Panel35.Controls.Add(Me.appscapecalcinfodepositbtn) + Me.Panel35.Location = New System.Drawing.Point(-116, 5) + Me.Panel35.Name = "Panel35" + Me.Panel35.Size = New System.Drawing.Size(770, 88) + Me.Panel35.TabIndex = 0 + ' + 'lbappscapecalculatorinfohello + ' + Me.lbappscapecalculatorinfohello.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lbappscapecalculatorinfohello.BackColor = System.Drawing.Color.Transparent + Me.lbappscapecalculatorinfohello.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbappscapecalculatorinfohello.Location = New System.Drawing.Point(335, 5) + Me.lbappscapecalculatorinfohello.Name = "lbappscapecalculatorinfohello" + Me.lbappscapecalculatorinfohello.Size = New System.Drawing.Size(432, 23) + Me.lbappscapecalculatorinfohello.TabIndex = 6 + Me.lbappscapecalculatorinfohello.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" + Me.lbappscapecalculatorinfohello.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'appscapecalcinfodepositbtn + ' + Me.appscapecalcinfodepositbtn.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.appscapecalcinfodepositbtn.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton + Me.appscapecalcinfodepositbtn.Location = New System.Drawing.Point(678, 33) + Me.appscapecalcinfodepositbtn.Name = "appscapecalcinfodepositbtn" + Me.appscapecalcinfodepositbtn.Size = New System.Drawing.Size(82, 47) + Me.appscapecalcinfodepositbtn.TabIndex = 0 + ' + 'Label8 + ' + Me.Label8.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label8.Location = New System.Drawing.Point(-119, 511) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(768, 23) + Me.Label8.TabIndex = 5 + Me.Label8.Text = "© Copyright Aiden Nirh - Do Not Reproduce" + Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'appscapeaudioplayerinfopage + ' + Me.appscapeaudioplayerinfopage.AutoScroll = True + Me.appscapeaudioplayerinfopage.BackColor = System.Drawing.Color.White + Me.appscapeaudioplayerinfopage.Controls.Add(Me.Panel6) + Me.appscapeaudioplayerinfopage.Controls.Add(Me.Panel31) + Me.appscapeaudioplayerinfopage.Controls.Add(Me.Panel32) + Me.appscapeaudioplayerinfopage.Controls.Add(Me.Label2) + Me.appscapeaudioplayerinfopage.Location = New System.Drawing.Point(80, 452) + Me.appscapeaudioplayerinfopage.Name = "appscapeaudioplayerinfopage" + Me.appscapeaudioplayerinfopage.Size = New System.Drawing.Size(111, 66) + Me.appscapeaudioplayerinfopage.TabIndex = 4 + Me.appscapeaudioplayerinfopage.Visible = False + ' + 'Panel6 + ' + Me.Panel6.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel6.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfoaudioplayervisualpreview + Me.Panel6.Controls.Add(Me.btnaudioplayerinfobuy) + Me.Panel6.Controls.Add(Me.btnaudioplayerinfoback) + Me.Panel6.Location = New System.Drawing.Point(-120, 99) + Me.Panel6.Name = "Panel6" + Me.Panel6.Size = New System.Drawing.Size(561, 414) + Me.Panel6.TabIndex = 2 + ' + 'btnaudioplayerinfobuy + ' + Me.btnaudioplayerinfobuy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnaudioplayerinfobuy.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobuybutton + Me.btnaudioplayerinfobuy.Location = New System.Drawing.Point(439, 366) + Me.btnaudioplayerinfobuy.Name = "btnaudioplayerinfobuy" + Me.btnaudioplayerinfobuy.Size = New System.Drawing.Size(102, 37) + Me.btnaudioplayerinfobuy.TabIndex = 2 + ' + 'btnaudioplayerinfoback + ' + Me.btnaudioplayerinfoback.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnaudioplayerinfoback.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfobackbutton + Me.btnaudioplayerinfoback.Location = New System.Drawing.Point(20, 366) + Me.btnaudioplayerinfoback.Name = "btnaudioplayerinfoback" + Me.btnaudioplayerinfoback.Size = New System.Drawing.Size(102, 37) + Me.btnaudioplayerinfoback.TabIndex = 1 + ' + 'Panel31 + ' + Me.Panel31.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel31.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeinfoaudioplayertext + Me.Panel31.Location = New System.Drawing.Point(-329, 99) + Me.Panel31.Name = "Panel31" + Me.Panel31.Size = New System.Drawing.Size(202, 414) + Me.Panel31.TabIndex = 1 + ' + 'Panel32 + ' + Me.Panel32.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel32.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapetitlebanner + Me.Panel32.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.Panel32.Controls.Add(Me.lbappscapeaudioplayerinfohello) + Me.Panel32.Controls.Add(Me.appscapeaudioplayerinfodepositbtn) + Me.Panel32.Location = New System.Drawing.Point(-329, 5) + Me.Panel32.Name = "Panel32" + Me.Panel32.Size = New System.Drawing.Size(770, 88) + Me.Panel32.TabIndex = 0 + ' + 'lbappscapeaudioplayerinfohello + ' + Me.lbappscapeaudioplayerinfohello.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lbappscapeaudioplayerinfohello.BackColor = System.Drawing.Color.Transparent + Me.lbappscapeaudioplayerinfohello.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbappscapeaudioplayerinfohello.Location = New System.Drawing.Point(335, 5) + Me.lbappscapeaudioplayerinfohello.Name = "lbappscapeaudioplayerinfohello" + Me.lbappscapeaudioplayerinfohello.Size = New System.Drawing.Size(432, 23) + Me.lbappscapeaudioplayerinfohello.TabIndex = 6 + Me.lbappscapeaudioplayerinfohello.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" + Me.lbappscapeaudioplayerinfohello.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'appscapeaudioplayerinfodepositbtn + ' + Me.appscapeaudioplayerinfodepositbtn.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.appscapeaudioplayerinfodepositbtn.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton + Me.appscapeaudioplayerinfodepositbtn.Location = New System.Drawing.Point(678, 33) + Me.appscapeaudioplayerinfodepositbtn.Name = "appscapeaudioplayerinfodepositbtn" + Me.appscapeaudioplayerinfodepositbtn.Size = New System.Drawing.Size(82, 47) + Me.appscapeaudioplayerinfodepositbtn.TabIndex = 0 + ' + 'Label2 + ' + Me.Label2.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(-333, 511) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(768, 23) + Me.Label2.TabIndex = 5 + Me.Label2.Text = "© Copyright Aiden Nirh - Do Not Reproduce" + Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlmainsiteminimatch + ' + Me.pnlmainsiteminimatch.AutoScroll = True + Me.pnlmainsiteminimatch.BackColor = System.Drawing.Color.White + Me.pnlmainsiteminimatch.Controls.Add(Me.pnlminimatchlabyrinth) + Me.pnlmainsiteminimatch.Controls.Add(Me.pnlminimatchhomepage) + Me.pnlmainsiteminimatch.Controls.Add(Me.pnlminimatchdodgeinfopage) + Me.pnlmainsiteminimatch.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlmainsiteminimatch.Location = New System.Drawing.Point(0, 35) + Me.pnlmainsiteminimatch.Name = "pnlmainsiteminimatch" + Me.pnlmainsiteminimatch.Size = New System.Drawing.Size(816, 533) + Me.pnlmainsiteminimatch.TabIndex = 9 + Me.pnlmainsiteminimatch.Visible = False + ' + 'pnlminimatchlabyrinth + ' + Me.pnlminimatchlabyrinth.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlminimatchlabyrinth.Controls.Add(Me.Label20) + Me.pnlminimatchlabyrinth.Controls.Add(Me.Panel10) + Me.pnlminimatchlabyrinth.Controls.Add(Me.PictureBox2) + Me.pnlminimatchlabyrinth.Controls.Add(Me.Label27) + Me.pnlminimatchlabyrinth.Controls.Add(Me.Panel12) + Me.pnlminimatchlabyrinth.Controls.Add(Me.PictureBox3) + Me.pnlminimatchlabyrinth.Controls.Add(Me.PictureBox6) + Me.pnlminimatchlabyrinth.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlminimatchlabyrinth.Location = New System.Drawing.Point(0, 0) + Me.pnlminimatchlabyrinth.Name = "pnlminimatchlabyrinth" + Me.pnlminimatchlabyrinth.Size = New System.Drawing.Size(816, 533) + Me.pnlminimatchlabyrinth.TabIndex = 2 + ' + 'Label20 + ' + Me.Label20.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label20.BackColor = System.Drawing.Color.Transparent + Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label20.Location = New System.Drawing.Point(13, 10) + Me.Label20.Name = "Label20" + Me.Label20.Size = New System.Drawing.Size(197, 47) + Me.Label20.TabIndex = 7 + Me.Label20.Text = "Welcome William," & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Your balance is 1.65BTN" + ' + 'Panel10 + ' + Me.Panel10.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel10.BackColor = System.Drawing.Color.LightGray + Me.Panel10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel10.Controls.Add(Me.txtminimatchlabrinthaddress) + Me.Panel10.Controls.Add(Me.lblminimatchinfopagebuy) + Me.Panel10.Controls.Add(Me.lblminimatchlabyrinthbuyinstuct) + Me.Panel10.Controls.Add(Me.Label26) + Me.Panel10.Location = New System.Drawing.Point(561, 167) + Me.Panel10.Name = "Panel10" + Me.Panel10.Size = New System.Drawing.Size(242, 338) + Me.Panel10.TabIndex = 6 + ' + 'txtminimatchlabrinthaddress + ' + Me.txtminimatchlabrinthaddress.Location = New System.Drawing.Point(22, 262) + Me.txtminimatchlabrinthaddress.Name = "txtminimatchlabrinthaddress" + Me.txtminimatchlabrinthaddress.Size = New System.Drawing.Size(204, 20) + Me.txtminimatchlabrinthaddress.TabIndex = 4 + ' + 'lblminimatchinfopagebuy + ' + Me.lblminimatchinfopagebuy.BackColor = System.Drawing.Color.Gray + Me.lblminimatchinfopagebuy.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lblminimatchinfopagebuy.ForeColor = System.Drawing.Color.White + Me.lblminimatchinfopagebuy.Location = New System.Drawing.Point(5, 310) + Me.lblminimatchinfopagebuy.Name = "lblminimatchinfopagebuy" + Me.lblminimatchinfopagebuy.Size = New System.Drawing.Size(232, 21) + Me.lblminimatchinfopagebuy.TabIndex = 3 + Me.lblminimatchinfopagebuy.Text = "Buy for 1.32 BNT" + Me.lblminimatchinfopagebuy.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblminimatchlabyrinthbuyinstuct + ' + Me.lblminimatchlabyrinthbuyinstuct.Location = New System.Drawing.Point(23, 62) + Me.lblminimatchlabyrinthbuyinstuct.Name = "lblminimatchlabyrinthbuyinstuct" + Me.lblminimatchlabyrinthbuyinstuct.Size = New System.Drawing.Size(203, 193) + Me.lblminimatchlabyrinthbuyinstuct.TabIndex = 1 + Me.lblminimatchlabyrinthbuyinstuct.Text = resources.GetString("lblminimatchlabyrinthbuyinstuct.Text") + ' + 'Label26 + ' + Me.Label26.AutoSize = True + Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label26.Location = New System.Drawing.Point(36, 20) + Me.Label26.Name = "Label26" + Me.Label26.Size = New System.Drawing.Size(169, 31) + Me.Label26.TabIndex = 0 + Me.Label26.Text = "How to buy:" + ' + 'PictureBox2 + ' + Me.PictureBox2.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.PictureBox2.Image = Global.ShiftOS.My.Resources.Resources.minimatchlabyrinthpreview + Me.PictureBox2.Location = New System.Drawing.Point(277, 167) + Me.PictureBox2.Name = "PictureBox2" + Me.PictureBox2.Size = New System.Drawing.Size(253, 338) + Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.PictureBox2.TabIndex = 5 + Me.PictureBox2.TabStop = False + ' + 'Label27 + ' + Me.Label27.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label27.AutoSize = True + Me.Label27.Location = New System.Drawing.Point(309, 511) + Me.Label27.Name = "Label27" + Me.Label27.Size = New System.Drawing.Size(168, 13) + Me.Label27.TabIndex = 4 + Me.Label27.Text = "Copyright © - Minimatch CO. 2014" + ' + 'Panel12 + ' + Me.Panel12.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Panel12.BackColor = System.Drawing.Color.LightGray + Me.Panel12.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel12.Controls.Add(Me.Label28) + Me.Panel12.Controls.Add(Me.Label29) + Me.Panel12.Controls.Add(Me.Label30) + Me.Panel12.Location = New System.Drawing.Point(10, 167) + Me.Panel12.Name = "Panel12" + Me.Panel12.Size = New System.Drawing.Size(242, 338) + Me.Panel12.TabIndex = 1 + ' + 'Label28 + ' + Me.Label28.BackColor = System.Drawing.Color.Gray + Me.Label28.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Label28.ForeColor = System.Drawing.Color.White + Me.Label28.Location = New System.Drawing.Point(5, 310) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(232, 21) + Me.Label28.TabIndex = 4 + Me.Label28.Text = "<- Back" + Me.Label28.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label29 + ' + Me.Label29.Location = New System.Drawing.Point(19, 61) + Me.Label29.Name = "Label29" + Me.Label29.Size = New System.Drawing.Size(203, 244) + Me.Label29.TabIndex = 1 + Me.Label29.Text = resources.GetString("Label29.Text") + ' + 'Label30 + ' + Me.Label30.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label30.AutoSize = True + Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label30.Location = New System.Drawing.Point(11, 17) + Me.Label30.Name = "Label30" + Me.Label30.Size = New System.Drawing.Size(219, 31) + Me.Label30.TabIndex = 0 + Me.Label30.Text = "About Labyrinth" + ' + 'PictureBox3 + ' + Me.PictureBox3.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.PictureBox3.Image = Global.ShiftOS.My.Resources.Resources.BitnotesAcceptedHereLogo + Me.PictureBox3.Location = New System.Drawing.Point(16, 71) + Me.PictureBox3.Name = "PictureBox3" + Me.PictureBox3.Size = New System.Drawing.Size(200, 44) + Me.PictureBox3.TabIndex = 0 + Me.PictureBox3.TabStop = False + ' + 'PictureBox6 + ' + Me.PictureBox6.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.PictureBox6.BackgroundImage = Global.ShiftOS.My.Resources.Resources.Minimatchbackground + Me.PictureBox6.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.PictureBox6.Location = New System.Drawing.Point(5, 6) + Me.PictureBox6.Name = "PictureBox6" + Me.PictureBox6.Size = New System.Drawing.Size(806, 524) + Me.PictureBox6.TabIndex = 8 + Me.PictureBox6.TabStop = False + ' + 'pnlminimatchhomepage + ' + Me.pnlminimatchhomepage.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.pnlminimatchhomepage.Controls.Add(Me.lblminimatchcopyright) + Me.pnlminimatchhomepage.Controls.Add(Me.pnlminimatchcomingsoon2) + Me.pnlminimatchhomepage.Controls.Add(Me.pnlminimatchcomingsoon) + Me.pnlminimatchhomepage.Controls.Add(Me.pnlminimatchdodgepreview) + Me.pnlminimatchhomepage.Controls.Add(Me.picbitnotesaccepted) + Me.pnlminimatchhomepage.Controls.Add(Me.lblminimatchmainpagewelcome) + Me.pnlminimatchhomepage.Controls.Add(Me.PictureBox5) + Me.pnlminimatchhomepage.Location = New System.Drawing.Point(79, 288) + Me.pnlminimatchhomepage.Name = "pnlminimatchhomepage" + Me.pnlminimatchhomepage.Size = New System.Drawing.Size(271, 197) + Me.pnlminimatchhomepage.TabIndex = 0 + ' + 'lblminimatchcopyright + ' + Me.lblminimatchcopyright.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblminimatchcopyright.AutoSize = True + Me.lblminimatchcopyright.Location = New System.Drawing.Point(36, 512) + Me.lblminimatchcopyright.Name = "lblminimatchcopyright" + Me.lblminimatchcopyright.Size = New System.Drawing.Size(168, 13) + Me.lblminimatchcopyright.TabIndex = 4 + Me.lblminimatchcopyright.Text = "Copyright © - Minimatch CO. 2014" + ' + 'pnlminimatchcomingsoon2 + ' + Me.pnlminimatchcomingsoon2.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pnlminimatchcomingsoon2.BackColor = System.Drawing.Color.LightGray + Me.pnlminimatchcomingsoon2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlminimatchcomingsoon2.Controls.Add(Me.pnlminimatchcomingsoonbuy2) + Me.pnlminimatchcomingsoon2.Controls.Add(Me.pnlminimatchcomingsooninfo2) + Me.pnlminimatchcomingsoon2.Controls.Add(Me.pnlminimatchcomingsoondescription2) + Me.pnlminimatchcomingsoon2.Controls.Add(Me.pnlminimatchcomingsoontitle2) + Me.pnlminimatchcomingsoon2.Location = New System.Drawing.Point(271, 223) + Me.pnlminimatchcomingsoon2.Name = "pnlminimatchcomingsoon2" + Me.pnlminimatchcomingsoon2.Size = New System.Drawing.Size(254, 289) + Me.pnlminimatchcomingsoon2.TabIndex = 3 + ' + 'pnlminimatchcomingsoonbuy2 + ' + Me.pnlminimatchcomingsoonbuy2.BackColor = System.Drawing.Color.Gray + Me.pnlminimatchcomingsoonbuy2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlminimatchcomingsoonbuy2.ForeColor = System.Drawing.Color.White + Me.pnlminimatchcomingsoonbuy2.Location = New System.Drawing.Point(126, 122) + Me.pnlminimatchcomingsoonbuy2.Name = "pnlminimatchcomingsoonbuy2" + Me.pnlminimatchcomingsoonbuy2.Size = New System.Drawing.Size(100, 21) + Me.pnlminimatchcomingsoonbuy2.TabIndex = 3 + Me.pnlminimatchcomingsoonbuy2.Text = "----" + Me.pnlminimatchcomingsoonbuy2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlminimatchcomingsooninfo2 + ' + Me.pnlminimatchcomingsooninfo2.BackColor = System.Drawing.Color.Gray + Me.pnlminimatchcomingsooninfo2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlminimatchcomingsooninfo2.ForeColor = System.Drawing.Color.White + Me.pnlminimatchcomingsooninfo2.Location = New System.Drawing.Point(20, 122) + Me.pnlminimatchcomingsooninfo2.Name = "pnlminimatchcomingsooninfo2" + Me.pnlminimatchcomingsooninfo2.Size = New System.Drawing.Size(100, 21) + Me.pnlminimatchcomingsooninfo2.TabIndex = 2 + Me.pnlminimatchcomingsooninfo2.Text = "----" + Me.pnlminimatchcomingsooninfo2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlminimatchcomingsoondescription2 + ' + Me.pnlminimatchcomingsoondescription2.Location = New System.Drawing.Point(23, 62) + Me.pnlminimatchcomingsoondescription2.Name = "pnlminimatchcomingsoondescription2" + Me.pnlminimatchcomingsoondescription2.Size = New System.Drawing.Size(203, 41) + Me.pnlminimatchcomingsoondescription2.TabIndex = 1 + Me.pnlminimatchcomingsoondescription2.Text = "Minimatch is constantly adding new software to it's store. Make sure you check ba" & _ + "ck for more..." + ' + 'pnlminimatchcomingsoontitle2 + ' + Me.pnlminimatchcomingsoontitle2.AutoSize = True + Me.pnlminimatchcomingsoontitle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.pnlminimatchcomingsoontitle2.Location = New System.Drawing.Point(20, 18) + Me.pnlminimatchcomingsoontitle2.Name = "pnlminimatchcomingsoontitle2" + Me.pnlminimatchcomingsoontitle2.Size = New System.Drawing.Size(106, 31) + Me.pnlminimatchcomingsoontitle2.TabIndex = 0 + Me.pnlminimatchcomingsoontitle2.Text = "More..." + ' + 'pnlminimatchcomingsoon + ' + Me.pnlminimatchcomingsoon.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pnlminimatchcomingsoon.BackColor = System.Drawing.Color.LightGray + Me.pnlminimatchcomingsoon.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlminimatchcomingsoon.Controls.Add(Me.bntminimatchcomingsoonbuy) + Me.pnlminimatchcomingsoon.Controls.Add(Me.bntminimatchcomingsooninfo) + Me.pnlminimatchcomingsoon.Controls.Add(Me.lblminimatchcomingsoondescription) + Me.pnlminimatchcomingsoon.Controls.Add(Me.lblminimatchcomingsoontitle) + Me.pnlminimatchcomingsoon.Location = New System.Drawing.Point(9, 223) + Me.pnlminimatchcomingsoon.Name = "pnlminimatchcomingsoon" + Me.pnlminimatchcomingsoon.Size = New System.Drawing.Size(250, 289) + Me.pnlminimatchcomingsoon.TabIndex = 2 + ' + 'bntminimatchcomingsoonbuy + ' + Me.bntminimatchcomingsoonbuy.BackColor = System.Drawing.Color.Gray + Me.bntminimatchcomingsoonbuy.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntminimatchcomingsoonbuy.ForeColor = System.Drawing.Color.White + Me.bntminimatchcomingsoonbuy.Location = New System.Drawing.Point(126, 122) + Me.bntminimatchcomingsoonbuy.Name = "bntminimatchcomingsoonbuy" + Me.bntminimatchcomingsoonbuy.Size = New System.Drawing.Size(100, 21) + Me.bntminimatchcomingsoonbuy.TabIndex = 3 + Me.bntminimatchcomingsoonbuy.Text = "1 BNT" + Me.bntminimatchcomingsoonbuy.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'bntminimatchcomingsooninfo + ' + Me.bntminimatchcomingsooninfo.BackColor = System.Drawing.Color.Gray + Me.bntminimatchcomingsooninfo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntminimatchcomingsooninfo.ForeColor = System.Drawing.Color.White + Me.bntminimatchcomingsooninfo.Location = New System.Drawing.Point(20, 122) + Me.bntminimatchcomingsooninfo.Name = "bntminimatchcomingsooninfo" + Me.bntminimatchcomingsooninfo.Size = New System.Drawing.Size(100, 21) + Me.bntminimatchcomingsooninfo.TabIndex = 2 + Me.bntminimatchcomingsooninfo.Text = "INFO" + Me.bntminimatchcomingsooninfo.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblminimatchcomingsoondescription + ' + Me.lblminimatchcomingsoondescription.Location = New System.Drawing.Point(23, 62) + Me.lblminimatchcomingsoondescription.Name = "lblminimatchcomingsoondescription" + Me.lblminimatchcomingsoondescription.Size = New System.Drawing.Size(203, 41) + Me.lblminimatchcomingsoondescription.TabIndex = 1 + Me.lblminimatchcomingsoondescription.Text = "Run through a maze as fast as you can without touching walls. Every time you win," & _ + " you get some codepoints" + ' + 'lblminimatchcomingsoontitle + ' + Me.lblminimatchcomingsoontitle.AutoSize = True + Me.lblminimatchcomingsoontitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblminimatchcomingsoontitle.Location = New System.Drawing.Point(20, 18) + Me.lblminimatchcomingsoontitle.Name = "lblminimatchcomingsoontitle" + Me.lblminimatchcomingsoontitle.Size = New System.Drawing.Size(135, 31) + Me.lblminimatchcomingsoontitle.TabIndex = 0 + Me.lblminimatchcomingsoontitle.Text = "Labyrinth" + ' + 'pnlminimatchdodgepreview + ' + Me.pnlminimatchdodgepreview.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pnlminimatchdodgepreview.BackColor = System.Drawing.Color.LightGray + Me.pnlminimatchdodgepreview.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlminimatchdodgepreview.Controls.Add(Me.bntminimatchdodgebuy) + Me.pnlminimatchdodgepreview.Controls.Add(Me.bntminimatchdodgeinfo) + Me.pnlminimatchdodgepreview.Controls.Add(Me.lblminimatchdodgedescription) + Me.pnlminimatchdodgepreview.Controls.Add(Me.lblminimatchdodgetitle) + Me.pnlminimatchdodgepreview.Location = New System.Drawing.Point(-255, 223) + Me.pnlminimatchdodgepreview.Name = "pnlminimatchdodgepreview" + Me.pnlminimatchdodgepreview.Size = New System.Drawing.Size(253, 289) + Me.pnlminimatchdodgepreview.TabIndex = 1 + ' + 'bntminimatchdodgebuy + ' + Me.bntminimatchdodgebuy.BackColor = System.Drawing.Color.Gray + Me.bntminimatchdodgebuy.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntminimatchdodgebuy.ForeColor = System.Drawing.Color.White + Me.bntminimatchdodgebuy.Location = New System.Drawing.Point(126, 122) + Me.bntminimatchdodgebuy.Name = "bntminimatchdodgebuy" + Me.bntminimatchdodgebuy.Size = New System.Drawing.Size(100, 21) + Me.bntminimatchdodgebuy.TabIndex = 3 + Me.bntminimatchdodgebuy.Text = "1.32 BNT" + Me.bntminimatchdodgebuy.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'bntminimatchdodgeinfo + ' + Me.bntminimatchdodgeinfo.BackColor = System.Drawing.Color.Gray + Me.bntminimatchdodgeinfo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntminimatchdodgeinfo.ForeColor = System.Drawing.Color.White + Me.bntminimatchdodgeinfo.Location = New System.Drawing.Point(20, 122) + Me.bntminimatchdodgeinfo.Name = "bntminimatchdodgeinfo" + Me.bntminimatchdodgeinfo.Size = New System.Drawing.Size(100, 21) + Me.bntminimatchdodgeinfo.TabIndex = 2 + Me.bntminimatchdodgeinfo.Text = "INFO" + Me.bntminimatchdodgeinfo.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblminimatchdodgedescription + ' + Me.lblminimatchdodgedescription.Location = New System.Drawing.Point(23, 62) + Me.lblminimatchdodgedescription.Name = "lblminimatchdodgedescription" + Me.lblminimatchdodgedescription.Size = New System.Drawing.Size(203, 41) + Me.lblminimatchdodgedescription.TabIndex = 1 + Me.lblminimatchdodgedescription.Text = "Dodge falling objects and stay alive as long as you can. Play this fun and exciti" & _ + "ng game while earning code points!" + ' + 'lblminimatchdodgetitle + ' + Me.lblminimatchdodgetitle.AutoSize = True + Me.lblminimatchdodgetitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblminimatchdodgetitle.Location = New System.Drawing.Point(65, 18) + Me.lblminimatchdodgetitle.Name = "lblminimatchdodgetitle" + Me.lblminimatchdodgetitle.Size = New System.Drawing.Size(99, 31) + Me.lblminimatchdodgetitle.TabIndex = 0 + Me.lblminimatchdodgetitle.Text = "Dodge" + ' + 'picbitnotesaccepted + ' + Me.picbitnotesaccepted.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picbitnotesaccepted.BackColor = System.Drawing.Color.Transparent + Me.picbitnotesaccepted.Image = Global.ShiftOS.My.Resources.Resources.BitnotesAcceptedHereLogo + Me.picbitnotesaccepted.Location = New System.Drawing.Point(-246, 88) + Me.picbitnotesaccepted.Name = "picbitnotesaccepted" + Me.picbitnotesaccepted.Size = New System.Drawing.Size(209, 50) + Me.picbitnotesaccepted.TabIndex = 0 + Me.picbitnotesaccepted.TabStop = False + ' + 'lblminimatchmainpagewelcome + ' + Me.lblminimatchmainpagewelcome.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblminimatchmainpagewelcome.BackColor = System.Drawing.Color.Transparent + Me.lblminimatchmainpagewelcome.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblminimatchmainpagewelcome.Location = New System.Drawing.Point(-249, 26) + Me.lblminimatchmainpagewelcome.Name = "lblminimatchmainpagewelcome" + Me.lblminimatchmainpagewelcome.Size = New System.Drawing.Size(239, 58) + Me.lblminimatchmainpagewelcome.TabIndex = 8 + Me.lblminimatchmainpagewelcome.Text = "Welcome William," & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Your balance is 1.65BTN" + ' + 'PictureBox5 + ' + Me.PictureBox5.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.PictureBox5.BackgroundImage = Global.ShiftOS.My.Resources.Resources.Minimatchbackground + Me.PictureBox5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.PictureBox5.Location = New System.Drawing.Point(-267, 5) + Me.PictureBox5.Name = "PictureBox5" + Me.PictureBox5.Size = New System.Drawing.Size(804, 524) + Me.PictureBox5.TabIndex = 9 + Me.PictureBox5.TabStop = False + ' + 'pnlminimatchdodgeinfopage + ' + Me.pnlminimatchdodgeinfopage.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlminimatchdodgeinfopage.Controls.Add(Me.lblminimatchuserwelcome) + Me.pnlminimatchdodgeinfopage.Controls.Add(Me.pnlminimatchdodgepagebuy) + Me.pnlminimatchdodgeinfopage.Controls.Add(Me.picminimatchdodgepreview) + Me.pnlminimatchdodgeinfopage.Controls.Add(Me.lblminimatchcopyrightdodgepage) + Me.pnlminimatchdodgeinfopage.Controls.Add(Me.pnlminimatchdodgeinfodetails) + Me.pnlminimatchdodgeinfopage.Controls.Add(Me.picminimatchbtnaccepted) + Me.pnlminimatchdodgeinfopage.Controls.Add(Me.PictureBox4) + Me.pnlminimatchdodgeinfopage.Location = New System.Drawing.Point(79, 124) + Me.pnlminimatchdodgeinfopage.Name = "pnlminimatchdodgeinfopage" + Me.pnlminimatchdodgeinfopage.Size = New System.Drawing.Size(187, 105) + Me.pnlminimatchdodgeinfopage.TabIndex = 1 + ' + 'lblminimatchuserwelcome + ' + Me.lblminimatchuserwelcome.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblminimatchuserwelcome.BackColor = System.Drawing.Color.Transparent + Me.lblminimatchuserwelcome.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblminimatchuserwelcome.Location = New System.Drawing.Point(-302, 10) + Me.lblminimatchuserwelcome.Name = "lblminimatchuserwelcome" + Me.lblminimatchuserwelcome.Size = New System.Drawing.Size(197, 47) + Me.lblminimatchuserwelcome.TabIndex = 7 + Me.lblminimatchuserwelcome.Text = "Welcome William," & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Your balance is 1.65BTN" + ' + 'pnlminimatchdodgepagebuy + ' + Me.pnlminimatchdodgepagebuy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pnlminimatchdodgepagebuy.BackColor = System.Drawing.Color.LightGray + Me.pnlminimatchdodgepagebuy.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlminimatchdodgepagebuy.Controls.Add(Me.txtminimatchbitnoteaddress) + Me.pnlminimatchdodgepagebuy.Controls.Add(Me.btnminimatchdodgepagebuy) + Me.pnlminimatchdodgepagebuy.Controls.Add(Me.lblminimatchdodgehow2buydetails) + Me.pnlminimatchdodgepagebuy.Controls.Add(Me.lblminimatchdodgehow2buy) + Me.pnlminimatchdodgepagebuy.Location = New System.Drawing.Point(246, 167) + Me.pnlminimatchdodgepagebuy.Name = "pnlminimatchdodgepagebuy" + Me.pnlminimatchdodgepagebuy.Size = New System.Drawing.Size(242, 338) + Me.pnlminimatchdodgepagebuy.TabIndex = 6 + ' + 'txtminimatchbitnoteaddress + ' + Me.txtminimatchbitnoteaddress.Location = New System.Drawing.Point(22, 262) + Me.txtminimatchbitnoteaddress.Name = "txtminimatchbitnoteaddress" + Me.txtminimatchbitnoteaddress.Size = New System.Drawing.Size(204, 20) + Me.txtminimatchbitnoteaddress.TabIndex = 4 + ' + 'btnminimatchdodgepagebuy + ' + Me.btnminimatchdodgepagebuy.BackColor = System.Drawing.Color.Gray + Me.btnminimatchdodgepagebuy.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.btnminimatchdodgepagebuy.ForeColor = System.Drawing.Color.White + Me.btnminimatchdodgepagebuy.Location = New System.Drawing.Point(5, 310) + Me.btnminimatchdodgepagebuy.Name = "btnminimatchdodgepagebuy" + Me.btnminimatchdodgepagebuy.Size = New System.Drawing.Size(232, 21) + Me.btnminimatchdodgepagebuy.TabIndex = 3 + Me.btnminimatchdodgepagebuy.Text = "Buy for 1.32 BNT" + Me.btnminimatchdodgepagebuy.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblminimatchdodgehow2buydetails + ' + Me.lblminimatchdodgehow2buydetails.Location = New System.Drawing.Point(23, 62) + Me.lblminimatchdodgehow2buydetails.Name = "lblminimatchdodgehow2buydetails" + Me.lblminimatchdodgehow2buydetails.Size = New System.Drawing.Size(203, 193) + Me.lblminimatchdodgehow2buydetails.TabIndex = 1 + Me.lblminimatchdodgehow2buydetails.Text = resources.GetString("lblminimatchdodgehow2buydetails.Text") + ' + 'lblminimatchdodgehow2buy + ' + Me.lblminimatchdodgehow2buy.AutoSize = True + Me.lblminimatchdodgehow2buy.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblminimatchdodgehow2buy.Location = New System.Drawing.Point(36, 20) + Me.lblminimatchdodgehow2buy.Name = "lblminimatchdodgehow2buy" + Me.lblminimatchdodgehow2buy.Size = New System.Drawing.Size(169, 31) + Me.lblminimatchdodgehow2buy.TabIndex = 0 + Me.lblminimatchdodgehow2buy.Text = "How to buy:" + ' + 'picminimatchdodgepreview + ' + Me.picminimatchdodgepreview.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picminimatchdodgepreview.Image = Global.ShiftOS.My.Resources.Resources.minimatchdodgepreviewimage + Me.picminimatchdodgepreview.Location = New System.Drawing.Point(-38, 167) + Me.picminimatchdodgepreview.Name = "picminimatchdodgepreview" + Me.picminimatchdodgepreview.Size = New System.Drawing.Size(253, 338) + Me.picminimatchdodgepreview.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picminimatchdodgepreview.TabIndex = 5 + Me.picminimatchdodgepreview.TabStop = False + ' + 'lblminimatchcopyrightdodgepage + ' + Me.lblminimatchcopyrightdodgepage.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblminimatchcopyrightdodgepage.AutoSize = True + Me.lblminimatchcopyrightdodgepage.Location = New System.Drawing.Point(-6, 511) + Me.lblminimatchcopyrightdodgepage.Name = "lblminimatchcopyrightdodgepage" + Me.lblminimatchcopyrightdodgepage.Size = New System.Drawing.Size(168, 13) + Me.lblminimatchcopyrightdodgepage.TabIndex = 4 + Me.lblminimatchcopyrightdodgepage.Text = "Copyright © - Minimatch CO. 2014" + ' + 'pnlminimatchdodgeinfodetails + ' + Me.pnlminimatchdodgeinfodetails.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pnlminimatchdodgeinfodetails.BackColor = System.Drawing.Color.LightGray + Me.pnlminimatchdodgeinfodetails.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlminimatchdodgeinfodetails.Controls.Add(Me.bntminimatchdodgepageback) + Me.pnlminimatchdodgeinfodetails.Controls.Add(Me.lblminimatchaboutdetails) + Me.pnlminimatchdodgeinfodetails.Controls.Add(Me.lblminimatchdodgeabout) + Me.pnlminimatchdodgeinfodetails.Location = New System.Drawing.Point(-305, 167) + Me.pnlminimatchdodgeinfodetails.Name = "pnlminimatchdodgeinfodetails" + Me.pnlminimatchdodgeinfodetails.Size = New System.Drawing.Size(242, 338) + Me.pnlminimatchdodgeinfodetails.TabIndex = 1 + ' + 'bntminimatchdodgepageback + ' + Me.bntminimatchdodgepageback.BackColor = System.Drawing.Color.Gray + Me.bntminimatchdodgepageback.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.bntminimatchdodgepageback.ForeColor = System.Drawing.Color.White + Me.bntminimatchdodgepageback.Location = New System.Drawing.Point(5, 310) + Me.bntminimatchdodgepageback.Name = "bntminimatchdodgepageback" + Me.bntminimatchdodgepageback.Size = New System.Drawing.Size(232, 21) + Me.bntminimatchdodgepageback.TabIndex = 4 + Me.bntminimatchdodgepageback.Text = "<- Back" + Me.bntminimatchdodgepageback.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblminimatchaboutdetails + ' + Me.lblminimatchaboutdetails.Location = New System.Drawing.Point(19, 61) + Me.lblminimatchaboutdetails.Name = "lblminimatchaboutdetails" + Me.lblminimatchaboutdetails.Size = New System.Drawing.Size(203, 244) + Me.lblminimatchaboutdetails.TabIndex = 1 + Me.lblminimatchaboutdetails.Text = resources.GetString("lblminimatchaboutdetails.Text") + ' + 'lblminimatchdodgeabout + ' + Me.lblminimatchdodgeabout.AutoSize = True + Me.lblminimatchdodgeabout.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblminimatchdodgeabout.Location = New System.Drawing.Point(24, 17) + Me.lblminimatchdodgeabout.Name = "lblminimatchdodgeabout" + Me.lblminimatchdodgeabout.Size = New System.Drawing.Size(192, 31) + Me.lblminimatchdodgeabout.TabIndex = 0 + Me.lblminimatchdodgeabout.Text = "About Dodge:" + ' + 'picminimatchbtnaccepted + ' + Me.picminimatchbtnaccepted.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picminimatchbtnaccepted.Image = Global.ShiftOS.My.Resources.Resources.BitnotesAcceptedHereLogo + Me.picminimatchbtnaccepted.Location = New System.Drawing.Point(-299, 71) + Me.picminimatchbtnaccepted.Name = "picminimatchbtnaccepted" + Me.picminimatchbtnaccepted.Size = New System.Drawing.Size(200, 44) + Me.picminimatchbtnaccepted.TabIndex = 0 + Me.picminimatchbtnaccepted.TabStop = False + ' + 'PictureBox4 + ' + Me.PictureBox4.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.PictureBox4.BackgroundImage = Global.ShiftOS.My.Resources.Resources.Minimatchbackground + Me.PictureBox4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.PictureBox4.Location = New System.Drawing.Point(-309, 6) + Me.PictureBox4.Name = "PictureBox4" + Me.PictureBox4.Size = New System.Drawing.Size(806, 523) + Me.PictureBox4.TabIndex = 8 + Me.PictureBox4.TabStop = False + ' + 'pnlshiftomizer + ' + Me.pnlshiftomizer.Controls.Add(Me.pnlshiftomizerhome) + Me.pnlshiftomizer.Controls.Add(Me.pnlshiftomizerpayments) + Me.pnlshiftomizer.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlshiftomizer.Location = New System.Drawing.Point(0, 35) + Me.pnlshiftomizer.Name = "pnlshiftomizer" + Me.pnlshiftomizer.Size = New System.Drawing.Size(816, 533) + Me.pnlshiftomizer.TabIndex = 8 + ' + 'pnlshiftomizerhome + ' + Me.pnlshiftomizerhome.Controls.Add(Me.btnshiftomizerhomecheckout) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhomeskinsliderdownload) + Me.pnlshiftomizerhome.Controls.Add(Me.picshiftomizerhomeappslidernext) + Me.pnlshiftomizerhome.Controls.Add(Me.picshiftomizerhomeappsliderback) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhomeappdescription) + Me.pnlshiftomizerhome.Controls.Add(Me.picshiftomizerhomeappsliderimg) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhomeappname) + Me.pnlshiftomizerhome.Controls.Add(Me.picshiftomizerhomeskinsliderright) + Me.pnlshiftomizerhome.Controls.Add(Me.picshiftomizerhomeskinssliderleft) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhomeskinname) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhomeappdownload) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhomeskinsliderdescription) + Me.pnlshiftomizerhome.Controls.Add(Me.picshiftomizerhomeskinsliderimage) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhomedescription) + Me.pnlshiftomizerhome.Controls.Add(Me.lblshiftomizerhometitle) + Me.pnlshiftomizerhome.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlshiftomizerhome.Location = New System.Drawing.Point(0, 0) + Me.pnlshiftomizerhome.Name = "pnlshiftomizerhome" + Me.pnlshiftomizerhome.Size = New System.Drawing.Size(816, 533) + Me.pnlshiftomizerhome.TabIndex = 9 + ' + 'btnshiftomizerhomecheckout + ' + Me.btnshiftomizerhomecheckout.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnshiftomizerhomecheckout.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnshiftomizerhomecheckout.Location = New System.Drawing.Point(731, 6) + Me.btnshiftomizerhomecheckout.Name = "btnshiftomizerhomecheckout" + Me.btnshiftomizerhomecheckout.Size = New System.Drawing.Size(75, 23) + Me.btnshiftomizerhomecheckout.TabIndex = 31 + Me.btnshiftomizerhomecheckout.Text = "Checkout (0) items" + Me.btnshiftomizerhomecheckout.UseVisualStyleBackColor = True + ' + 'lblshiftomizerhomeskinsliderdownload + ' + Me.lblshiftomizerhomeskinsliderdownload.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhomeskinsliderdownload.AutoSize = True + Me.lblshiftomizerhomeskinsliderdownload.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerhomeskinsliderdownload.Location = New System.Drawing.Point(347, 291) + Me.lblshiftomizerhomeskinsliderdownload.Name = "lblshiftomizerhomeskinsliderdownload" + Me.lblshiftomizerhomeskinsliderdownload.Size = New System.Drawing.Size(137, 13) + Me.lblshiftomizerhomeskinsliderdownload.TabIndex = 30 + Me.lblshiftomizerhomeskinsliderdownload.Text = "Download <program name>" + ' + 'picshiftomizerhomeappslidernext + ' + Me.picshiftomizerhomeappslidernext.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picshiftomizerhomeappslidernext.Image = Global.ShiftOS.My.Resources.Resources.shiftomizersliderrightarrow + Me.picshiftomizerhomeappslidernext.Location = New System.Drawing.Point(612, 343) + Me.picshiftomizerhomeappslidernext.Name = "picshiftomizerhomeappslidernext" + Me.picshiftomizerhomeappslidernext.Size = New System.Drawing.Size(33, 118) + Me.picshiftomizerhomeappslidernext.TabIndex = 29 + Me.picshiftomizerhomeappslidernext.TabStop = False + ' + 'picshiftomizerhomeappsliderback + ' + Me.picshiftomizerhomeappsliderback.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picshiftomizerhomeappsliderback.Image = Global.ShiftOS.My.Resources.Resources.shiftomizersliderleftarrow + Me.picshiftomizerhomeappsliderback.Location = New System.Drawing.Point(171, 343) + Me.picshiftomizerhomeappsliderback.Name = "picshiftomizerhomeappsliderback" + Me.picshiftomizerhomeappsliderback.Size = New System.Drawing.Size(33, 118) + Me.picshiftomizerhomeappsliderback.TabIndex = 28 + Me.picshiftomizerhomeappsliderback.TabStop = False + ' + 'lblshiftomizerhomeappdescription + ' + Me.lblshiftomizerhomeappdescription.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhomeappdescription.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerhomeappdescription.Location = New System.Drawing.Point(216, 464) + Me.lblshiftomizerhomeappdescription.Name = "lblshiftomizerhomeappdescription" + Me.lblshiftomizerhomeappdescription.Size = New System.Drawing.Size(393, 36) + Me.lblshiftomizerhomeappdescription.TabIndex = 27 + Me.lblshiftomizerhomeappdescription.Text = "Skin description - changed by code" + ' + 'picshiftomizerhomeappsliderimg + ' + Me.picshiftomizerhomeappsliderimg.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picshiftomizerhomeappsliderimg.Location = New System.Drawing.Point(213, 343) + Me.picshiftomizerhomeappsliderimg.Name = "picshiftomizerhomeappsliderimg" + Me.picshiftomizerhomeappsliderimg.Size = New System.Drawing.Size(393, 118) + Me.picshiftomizerhomeappsliderimg.TabIndex = 26 + Me.picshiftomizerhomeappsliderimg.TabStop = False + ' + 'lblshiftomizerhomeappname + ' + Me.lblshiftomizerhomeappname.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhomeappname.AutoSize = True + Me.lblshiftomizerhomeappname.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerhomeappname.Location = New System.Drawing.Point(211, 315) + Me.lblshiftomizerhomeappname.Name = "lblshiftomizerhomeappname" + Me.lblshiftomizerhomeappname.Size = New System.Drawing.Size(310, 25) + Me.lblshiftomizerhomeappname.TabIndex = 25 + Me.lblshiftomizerhomeappname.Text = "Programs - <program name>" + ' + 'picshiftomizerhomeskinsliderright + ' + Me.picshiftomizerhomeskinsliderright.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picshiftomizerhomeskinsliderright.Image = Global.ShiftOS.My.Resources.Resources.shiftomizersliderrightarrow + Me.picshiftomizerhomeskinsliderright.Location = New System.Drawing.Point(612, 122) + Me.picshiftomizerhomeskinsliderright.Name = "picshiftomizerhomeskinsliderright" + Me.picshiftomizerhomeskinsliderright.Size = New System.Drawing.Size(33, 118) + Me.picshiftomizerhomeskinsliderright.TabIndex = 24 + Me.picshiftomizerhomeskinsliderright.TabStop = False + ' + 'picshiftomizerhomeskinssliderleft + ' + Me.picshiftomizerhomeskinssliderleft.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picshiftomizerhomeskinssliderleft.Image = Global.ShiftOS.My.Resources.Resources.shiftomizersliderleftarrow + Me.picshiftomizerhomeskinssliderleft.Location = New System.Drawing.Point(173, 122) + Me.picshiftomizerhomeskinssliderleft.Name = "picshiftomizerhomeskinssliderleft" + Me.picshiftomizerhomeskinssliderleft.Size = New System.Drawing.Size(33, 118) + Me.picshiftomizerhomeskinssliderleft.TabIndex = 23 + Me.picshiftomizerhomeskinssliderleft.TabStop = False + ' + 'lblshiftomizerhomeskinname + ' + Me.lblshiftomizerhomeskinname.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhomeskinname.AutoSize = True + Me.lblshiftomizerhomeskinname.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerhomeskinname.Location = New System.Drawing.Point(211, 97) + Me.lblshiftomizerhomeskinname.Name = "lblshiftomizerhomeskinname" + Me.lblshiftomizerhomeskinname.Size = New System.Drawing.Size(231, 25) + Me.lblshiftomizerhomeskinname.TabIndex = 22 + Me.lblshiftomizerhomeskinname.Text = "Skins - <Skin Name>" + ' + 'lblshiftomizerhomeappdownload + ' + Me.lblshiftomizerhomeappdownload.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhomeappdownload.AutoSize = True + Me.lblshiftomizerhomeappdownload.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerhomeappdownload.Location = New System.Drawing.Point(347, 506) + Me.lblshiftomizerhomeappdownload.Name = "lblshiftomizerhomeappdownload" + Me.lblshiftomizerhomeappdownload.Size = New System.Drawing.Size(137, 13) + Me.lblshiftomizerhomeappdownload.TabIndex = 21 + Me.lblshiftomizerhomeappdownload.Text = "Download <program name>" + ' + 'lblshiftomizerhomeskinsliderdescription + ' + Me.lblshiftomizerhomeskinsliderdescription.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhomeskinsliderdescription.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerhomeskinsliderdescription.Location = New System.Drawing.Point(213, 244) + Me.lblshiftomizerhomeskinsliderdescription.Name = "lblshiftomizerhomeskinsliderdescription" + Me.lblshiftomizerhomeskinsliderdescription.Size = New System.Drawing.Size(393, 36) + Me.lblshiftomizerhomeskinsliderdescription.TabIndex = 20 + Me.lblshiftomizerhomeskinsliderdescription.Text = "Skin description - changed by code" + ' + 'picshiftomizerhomeskinsliderimage + ' + Me.picshiftomizerhomeskinsliderimage.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picshiftomizerhomeskinsliderimage.Image = Global.ShiftOS.My.Resources.Resources.shiftomizerlinuxmintskinpreview + Me.picshiftomizerhomeskinsliderimage.Location = New System.Drawing.Point(212, 122) + Me.picshiftomizerhomeskinsliderimage.Name = "picshiftomizerhomeskinsliderimage" + Me.picshiftomizerhomeskinsliderimage.Size = New System.Drawing.Size(393, 118) + Me.picshiftomizerhomeskinsliderimage.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.picshiftomizerhomeskinsliderimage.TabIndex = 19 + Me.picshiftomizerhomeskinsliderimage.TabStop = False + ' + 'lblshiftomizerhomedescription + ' + Me.lblshiftomizerhomedescription.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhomedescription.AutoSize = True + Me.lblshiftomizerhomedescription.Location = New System.Drawing.Point(209, 58) + Me.lblshiftomizerhomedescription.Name = "lblshiftomizerhomedescription" + Me.lblshiftomizerhomedescription.Size = New System.Drawing.Size(334, 26) + Me.lblshiftomizerhomedescription.TabIndex = 18 + Me.lblshiftomizerhomedescription.Text = "Here you can find epic skins, and some modifications to your ShiftOS." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "You can se" & _ + "e some of our best skins below" + ' + 'lblshiftomizerhometitle + ' + Me.lblshiftomizerhometitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerhometitle.AutoSize = True + Me.lblshiftomizerhometitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerhometitle.Location = New System.Drawing.Point(209, 13) + Me.lblshiftomizerhometitle.Name = "lblshiftomizerhometitle" + Me.lblshiftomizerhometitle.Size = New System.Drawing.Size(408, 37) + Me.lblshiftomizerhometitle.TabIndex = 17 + Me.lblshiftomizerhometitle.Text = "Welcome to the Shiftomizer" + ' + 'pnlshiftomizerpayments + ' + Me.pnlshiftomizerpayments.Controls.Add(Me.lblshiftomizerpaymentsclear) + Me.pnlshiftomizerpayments.Controls.Add(Me.lblshiftomizerpaymentsback) + Me.pnlshiftomizerpayments.Controls.Add(Me.lblshiftomizerpaymentinstruct) + Me.pnlshiftomizerpayments.Controls.Add(Me.lblshiftomizerpaymentorder) + Me.pnlshiftomizerpayments.Controls.Add(Me.lblshiftomizerpaymentstitle) + Me.pnlshiftomizerpayments.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlshiftomizerpayments.Location = New System.Drawing.Point(0, 0) + Me.pnlshiftomizerpayments.Name = "pnlshiftomizerpayments" + Me.pnlshiftomizerpayments.Size = New System.Drawing.Size(816, 533) + Me.pnlshiftomizerpayments.TabIndex = 10 + ' + 'lblshiftomizerpaymentsclear + ' + Me.lblshiftomizerpaymentsclear.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerpaymentsclear.AutoSize = True + Me.lblshiftomizerpaymentsclear.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerpaymentsclear.Location = New System.Drawing.Point(373, 507) + Me.lblshiftomizerpaymentsclear.Name = "lblshiftomizerpaymentsclear" + Me.lblshiftomizerpaymentsclear.Size = New System.Drawing.Size(96, 13) + Me.lblshiftomizerpaymentsclear.TabIndex = 21 + Me.lblshiftomizerpaymentsclear.Text = "Clear all purchases" + ' + 'lblshiftomizerpaymentsback + ' + Me.lblshiftomizerpaymentsback.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerpaymentsback.AutoSize = True + Me.lblshiftomizerpaymentsback.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerpaymentsback.Location = New System.Drawing.Point(224, 506) + Me.lblshiftomizerpaymentsback.Name = "lblshiftomizerpaymentsback" + Me.lblshiftomizerpaymentsback.Size = New System.Drawing.Size(41, 13) + Me.lblshiftomizerpaymentsback.TabIndex = 20 + Me.lblshiftomizerpaymentsback.Text = "< Back" + ' + 'lblshiftomizerpaymentinstruct + ' + Me.lblshiftomizerpaymentinstruct.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerpaymentinstruct.Location = New System.Drawing.Point(226, 370) + Me.lblshiftomizerpaymentinstruct.Name = "lblshiftomizerpaymentinstruct" + Me.lblshiftomizerpaymentinstruct.Size = New System.Drawing.Size(318, 122) + Me.lblshiftomizerpaymentinstruct.TabIndex = 19 + Me.lblshiftomizerpaymentinstruct.Text = resources.GetString("lblshiftomizerpaymentinstruct.Text") + ' + 'lblshiftomizerpaymentorder + ' + Me.lblshiftomizerpaymentorder.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerpaymentorder.AutoSize = True + Me.lblshiftomizerpaymentorder.Location = New System.Drawing.Point(224, 56) + Me.lblshiftomizerpaymentorder.Name = "lblshiftomizerpaymentorder" + Me.lblshiftomizerpaymentorder.Size = New System.Drawing.Size(150, 78) + Me.lblshiftomizerpaymentorder.TabIndex = 18 + Me.lblshiftomizerpaymentorder.Text = "Order details:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "1x Icon Manager 2 BTN" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "1x Name Changer 1.5 BTN" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Tota" & _ + "l: 3.5 BTN" + ' + 'lblshiftomizerpaymentstitle + ' + Me.lblshiftomizerpaymentstitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblshiftomizerpaymentstitle.AutoSize = True + Me.lblshiftomizerpaymentstitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblshiftomizerpaymentstitle.Location = New System.Drawing.Point(224, 11) + Me.lblshiftomizerpaymentstitle.Name = "lblshiftomizerpaymentstitle" + Me.lblshiftomizerpaymentstitle.Size = New System.Drawing.Size(327, 37) + Me.lblshiftomizerpaymentstitle.TabIndex = 17 + Me.lblshiftomizerpaymentstitle.Text = "Shiftomizer Payments" + ' + 'pnlbitnotemainpage + ' + Me.pnlbitnotemainpage.AutoScroll = True + Me.pnlbitnotemainpage.BackColor = System.Drawing.Color.White + Me.pnlbitnotemainpage.Controls.Add(Me.pnlbitnotedigger) + Me.pnlbitnotemainpage.Controls.Add(Me.pnlbitnotecurrencyexchange) + Me.pnlbitnotemainpage.Controls.Add(Me.pnlbitnotebuywallet) + Me.pnlbitnotemainpage.Controls.Add(Me.pnlbitnotehome) + Me.pnlbitnotemainpage.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlbitnotemainpage.Location = New System.Drawing.Point(0, 35) + Me.pnlbitnotemainpage.Name = "pnlbitnotemainpage" + Me.pnlbitnotemainpage.Size = New System.Drawing.Size(816, 533) + Me.pnlbitnotemainpage.TabIndex = 10 + Me.pnlbitnotemainpage.Visible = False + ' + 'pnlbitnotedigger + ' + Me.pnlbitnotedigger.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.pnlbitnotedigger.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlbitnotedigger.Controls.Add(Me.btnbitnotediggergrade5buy) + Me.pnlbitnotedigger.Controls.Add(Me.btnbitnotediggergrade4buy) + Me.pnlbitnotedigger.Controls.Add(Me.btnbitnotediggergrade3buy) + Me.pnlbitnotedigger.Controls.Add(Me.btnbitnotediggergrade2buy) + Me.pnlbitnotedigger.Controls.Add(Me.btnbitnotediggergrade1buy) + Me.pnlbitnotedigger.Controls.Add(Me.PictureBox1) + Me.pnlbitnotedigger.Controls.Add(Me.pnlbitnotediggerfooter) + Me.pnlbitnotedigger.Controls.Add(Me.pnlbitnotediggersideright) + Me.pnlbitnotedigger.Controls.Add(Me.pnlbitnotediggersideleft) + Me.pnlbitnotedigger.Controls.Add(Me.lblbitnotediggerdescription) + Me.pnlbitnotedigger.Controls.Add(Me.lblbitnotediggertitle) + Me.pnlbitnotedigger.Controls.Add(Me.picbitnotediggertitlelogo) + Me.pnlbitnotedigger.Location = New System.Drawing.Point(0, 0) + Me.pnlbitnotedigger.Name = "pnlbitnotedigger" + Me.pnlbitnotedigger.Size = New System.Drawing.Size(816, 533) + Me.pnlbitnotedigger.TabIndex = 3 + ' + 'btnbitnotediggergrade5buy + ' + Me.btnbitnotediggergrade5buy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnbitnotediggergrade5buy.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbitnotediggergrade5buy.Location = New System.Drawing.Point(586, 427) + Me.btnbitnotediggergrade5buy.Name = "btnbitnotediggergrade5buy" + Me.btnbitnotediggergrade5buy.Size = New System.Drawing.Size(75, 23) + Me.btnbitnotediggergrade5buy.TabIndex = 13 + Me.btnbitnotediggergrade5buy.Text = "35 BTN" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.btnbitnotediggergrade5buy, "app://bitnotedigger:setgrade5") + Me.btnbitnotediggergrade5buy.UseVisualStyleBackColor = True + ' + 'btnbitnotediggergrade4buy + ' + Me.btnbitnotediggergrade4buy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnbitnotediggergrade4buy.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbitnotediggergrade4buy.Location = New System.Drawing.Point(470, 427) + Me.btnbitnotediggergrade4buy.Name = "btnbitnotediggergrade4buy" + Me.btnbitnotediggergrade4buy.Size = New System.Drawing.Size(75, 23) + Me.btnbitnotediggergrade4buy.TabIndex = 12 + Me.btnbitnotediggergrade4buy.Text = "20 BTN" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.btnbitnotediggergrade4buy, "app://bitnotedigger:setgrade4") + Me.btnbitnotediggergrade4buy.UseVisualStyleBackColor = True + ' + 'btnbitnotediggergrade3buy + ' + Me.btnbitnotediggergrade3buy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnbitnotediggergrade3buy.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbitnotediggergrade3buy.Location = New System.Drawing.Point(363, 427) + Me.btnbitnotediggergrade3buy.Name = "btnbitnotediggergrade3buy" + Me.btnbitnotediggergrade3buy.Size = New System.Drawing.Size(75, 23) + Me.btnbitnotediggergrade3buy.TabIndex = 11 + Me.btnbitnotediggergrade3buy.Text = "10 BTN" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.btnbitnotediggergrade3buy, "app://bitnotedigger:setgrade3") + Me.btnbitnotediggergrade3buy.UseVisualStyleBackColor = True + ' + 'btnbitnotediggergrade2buy + ' + Me.btnbitnotediggergrade2buy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnbitnotediggergrade2buy.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbitnotediggergrade2buy.Location = New System.Drawing.Point(254, 427) + Me.btnbitnotediggergrade2buy.Name = "btnbitnotediggergrade2buy" + Me.btnbitnotediggergrade2buy.Size = New System.Drawing.Size(75, 23) + Me.btnbitnotediggergrade2buy.TabIndex = 10 + Me.btnbitnotediggergrade2buy.Text = "5 BTN" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.btnbitnotediggergrade2buy, "app://bitnotedigger:setgrade2") + Me.btnbitnotediggergrade2buy.UseVisualStyleBackColor = True + ' + 'btnbitnotediggergrade1buy + ' + Me.btnbitnotediggergrade1buy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnbitnotediggergrade1buy.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbitnotediggergrade1buy.Location = New System.Drawing.Point(139, 427) + Me.btnbitnotediggergrade1buy.Name = "btnbitnotediggergrade1buy" + Me.btnbitnotediggergrade1buy.Size = New System.Drawing.Size(75, 23) + Me.btnbitnotediggergrade1buy.TabIndex = 9 + Me.btnbitnotediggergrade1buy.Text = "Free" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.btnbitnotediggergrade1buy, "shiftnet.main.bitnote/filetrans.dwnld?file=BitnoteDigger.stp") + Me.btnbitnotediggergrade1buy.UseVisualStyleBackColor = True + ' + 'PictureBox1 + ' + Me.PictureBox1.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.PictureBox1.Image = Global.ShiftOS.My.Resources.Resources.bitnotediggergradetable + Me.PictureBox1.Location = New System.Drawing.Point(126, 238) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(554, 190) + Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize + Me.PictureBox1.TabIndex = 8 + Me.PictureBox1.TabStop = False + ' + 'pnlbitnotediggerfooter + ' + Me.pnlbitnotediggerfooter.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotediggerfooter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfooterhomelink) + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfootercopyright) + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfootergetlink) + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfooterdiggerlink) + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfooterwalletlink) + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfootergettitle) + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfooterdownloadstitle) + Me.pnlbitnotediggerfooter.Controls.Add(Me.lblbitnotediggerfooterabouttitle) + Me.pnlbitnotediggerfooter.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlbitnotediggerfooter.Location = New System.Drawing.Point(100, 453) + Me.pnlbitnotediggerfooter.Name = "pnlbitnotediggerfooter" + Me.pnlbitnotediggerfooter.Size = New System.Drawing.Size(616, 80) + Me.pnlbitnotediggerfooter.TabIndex = 7 + ' + 'lblbitnotediggerfooterhomelink + ' + Me.lblbitnotediggerfooterhomelink.AutoSize = True + Me.lblbitnotediggerfooterhomelink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfooterhomelink.Location = New System.Drawing.Point(29, 27) + Me.lblbitnotediggerfooterhomelink.Name = "lblbitnotediggerfooterhomelink" + Me.lblbitnotediggerfooterhomelink.Size = New System.Drawing.Size(35, 13) + Me.lblbitnotediggerfooterhomelink.TabIndex = 7 + Me.lblbitnotediggerfooterhomelink.Text = "Home" + ' + 'lblbitnotediggerfootercopyright + ' + Me.lblbitnotediggerfootercopyright.AutoSize = True + Me.lblbitnotediggerfootercopyright.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfootercopyright.Location = New System.Drawing.Point(438, 60) + Me.lblbitnotediggerfootercopyright.Name = "lblbitnotediggerfootercopyright" + Me.lblbitnotediggerfootercopyright.Size = New System.Drawing.Size(174, 16) + Me.lblbitnotediggerfootercopyright.TabIndex = 6 + Me.lblbitnotediggerfootercopyright.Text = "Copyright © Bitnote inc. 2014" + ' + 'lblbitnotediggerfootergetlink + ' + Me.lblbitnotediggerfootergetlink.AutoSize = True + Me.lblbitnotediggerfootergetlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfootergetlink.Location = New System.Drawing.Point(337, 28) + Me.lblbitnotediggerfootergetlink.Name = "lblbitnotediggerfootergetlink" + Me.lblbitnotediggerfootergetlink.Size = New System.Drawing.Size(100, 13) + Me.lblbitnotediggerfootergetlink.TabIndex = 5 + Me.lblbitnotediggerfootergetlink.Text = "Currency Exchange" + ' + 'lblbitnotediggerfooterdiggerlink + ' + Me.lblbitnotediggerfooterdiggerlink.AutoSize = True + Me.lblbitnotediggerfooterdiggerlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfooterdiggerlink.Location = New System.Drawing.Point(168, 52) + Me.lblbitnotediggerfooterdiggerlink.Name = "lblbitnotediggerfooterdiggerlink" + Me.lblbitnotediggerfooterdiggerlink.Size = New System.Drawing.Size(38, 13) + Me.lblbitnotediggerfooterdiggerlink.TabIndex = 4 + Me.lblbitnotediggerfooterdiggerlink.Text = "Digger" + ' + 'lblbitnotediggerfooterwalletlink + ' + Me.lblbitnotediggerfooterwalletlink.AutoSize = True + Me.lblbitnotediggerfooterwalletlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfooterwalletlink.Location = New System.Drawing.Point(168, 30) + Me.lblbitnotediggerfooterwalletlink.Name = "lblbitnotediggerfooterwalletlink" + Me.lblbitnotediggerfooterwalletlink.Size = New System.Drawing.Size(37, 13) + Me.lblbitnotediggerfooterwalletlink.TabIndex = 3 + Me.lblbitnotediggerfooterwalletlink.Text = "Wallet" + ' + 'lblbitnotediggerfootergettitle + ' + Me.lblbitnotediggerfootergettitle.AutoSize = True + Me.lblbitnotediggerfootergettitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfootergettitle.Location = New System.Drawing.Point(314, 5) + Me.lblbitnotediggerfootergettitle.Name = "lblbitnotediggerfootergettitle" + Me.lblbitnotediggerfootergettitle.Size = New System.Drawing.Size(89, 13) + Me.lblbitnotediggerfootergettitle.TabIndex = 2 + Me.lblbitnotediggerfootergettitle.Text = "GET BITNOTES:" + ' + 'lblbitnotediggerfooterdownloadstitle + ' + Me.lblbitnotediggerfooterdownloadstitle.AutoSize = True + Me.lblbitnotediggerfooterdownloadstitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfooterdownloadstitle.Location = New System.Drawing.Point(151, 7) + Me.lblbitnotediggerfooterdownloadstitle.Name = "lblbitnotediggerfooterdownloadstitle" + Me.lblbitnotediggerfooterdownloadstitle.Size = New System.Drawing.Size(81, 13) + Me.lblbitnotediggerfooterdownloadstitle.TabIndex = 1 + Me.lblbitnotediggerfooterdownloadstitle.Text = "DOWNLOADS:" + ' + 'lblbitnotediggerfooterabouttitle + ' + Me.lblbitnotediggerfooterabouttitle.AutoSize = True + Me.lblbitnotediggerfooterabouttitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggerfooterabouttitle.Location = New System.Drawing.Point(22, 7) + Me.lblbitnotediggerfooterabouttitle.Name = "lblbitnotediggerfooterabouttitle" + Me.lblbitnotediggerfooterabouttitle.Size = New System.Drawing.Size(44, 13) + Me.lblbitnotediggerfooterabouttitle.TabIndex = 0 + Me.lblbitnotediggerfooterabouttitle.Text = "ABOUT" + ' + 'pnlbitnotediggersideright + ' + Me.pnlbitnotediggersideright.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotediggersideright.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotediggersideright.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotediggersideright.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlbitnotediggersideright.Location = New System.Drawing.Point(716, 0) + Me.pnlbitnotediggersideright.Name = "pnlbitnotediggersideright" + Me.pnlbitnotediggersideright.Size = New System.Drawing.Size(100, 533) + Me.pnlbitnotediggersideright.TabIndex = 6 + ' + 'pnlbitnotediggersideleft + ' + Me.pnlbitnotediggersideleft.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotediggersideleft.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotediggersideleft.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotediggersideleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pnlbitnotediggersideleft.Location = New System.Drawing.Point(0, 0) + Me.pnlbitnotediggersideleft.Name = "pnlbitnotediggersideleft" + Me.pnlbitnotediggersideleft.Size = New System.Drawing.Size(100, 533) + Me.pnlbitnotediggersideleft.TabIndex = 5 + ' + 'lblbitnotediggerdescription + ' + Me.lblbitnotediggerdescription.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotediggerdescription.Location = New System.Drawing.Point(119, 195) + Me.lblbitnotediggerdescription.Name = "lblbitnotediggerdescription" + Me.lblbitnotediggerdescription.Size = New System.Drawing.Size(575, 43) + Me.lblbitnotediggerdescription.TabIndex = 2 + Me.lblbitnotediggerdescription.Text = resources.GetString("lblbitnotediggerdescription.Text") + ' + 'lblbitnotediggertitle + ' + Me.lblbitnotediggertitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotediggertitle.AutoSize = True + Me.lblbitnotediggertitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotediggertitle.Location = New System.Drawing.Point(250, 168) + Me.lblbitnotediggertitle.Name = "lblbitnotediggertitle" + Me.lblbitnotediggertitle.Size = New System.Drawing.Size(291, 29) + Me.lblbitnotediggertitle.TabIndex = 1 + Me.lblbitnotediggertitle.Text = "THE BITNOTE DIGGER" + ' + 'picbitnotediggertitlelogo + ' + Me.picbitnotediggertitlelogo.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picbitnotediggertitlelogo.Image = Global.ShiftOS.My.Resources.Resources.bitnotewebsitetitle + Me.picbitnotediggertitlelogo.Location = New System.Drawing.Point(108, 15) + Me.picbitnotediggertitlelogo.Name = "picbitnotediggertitlelogo" + Me.picbitnotediggertitlelogo.Size = New System.Drawing.Size(600, 150) + Me.picbitnotediggertitlelogo.TabIndex = 0 + Me.picbitnotediggertitlelogo.TabStop = False + ' + 'pnlbitnotecurrencyexchange + ' + Me.pnlbitnotecurrencyexchange.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.btnbitnotecurrencyexchangebuy) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.txtbitnotecurrencyexchangebitnoteamout) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.lblbitnotecurrencyexchangeprice) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.lblbitnotecurrencyexchangebuytitle) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.lblbitnotecurrencyexchangetodaysrate) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.pnlbitnotecurrencyexchangefooter) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.pnlbitnotecurrencyexchangerightside) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.pnlbitnotecurrencyexchangeleftside) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.lblbitnotecurrencyexchangedescription) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.lblbitnotecurrencyexchangetitle) + Me.pnlbitnotecurrencyexchange.Controls.Add(Me.picbitnotecurrencyexchangetitle) + Me.pnlbitnotecurrencyexchange.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlbitnotecurrencyexchange.Location = New System.Drawing.Point(0, 0) + Me.pnlbitnotecurrencyexchange.Name = "pnlbitnotecurrencyexchange" + Me.pnlbitnotecurrencyexchange.Size = New System.Drawing.Size(816, 533) + Me.pnlbitnotecurrencyexchange.TabIndex = 4 + ' + 'btnbitnotecurrencyexchangebuy + ' + Me.btnbitnotecurrencyexchangebuy.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.btnbitnotecurrencyexchangebuy.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbitnotecurrencyexchangebuy.Location = New System.Drawing.Point(292, 342) + Me.btnbitnotecurrencyexchangebuy.Name = "btnbitnotecurrencyexchangebuy" + Me.btnbitnotecurrencyexchangebuy.Size = New System.Drawing.Size(202, 23) + Me.btnbitnotecurrencyexchangebuy.TabIndex = 12 + Me.btnbitnotecurrencyexchangebuy.Text = "Purchase" + Me.btnbitnotecurrencyexchangebuy.UseVisualStyleBackColor = True + ' + 'txtbitnotecurrencyexchangebitnoteamout + ' + Me.txtbitnotecurrencyexchangebitnoteamout.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.txtbitnotecurrencyexchangebitnoteamout.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtbitnotecurrencyexchangebitnoteamout.Location = New System.Drawing.Point(318, 317) + Me.txtbitnotecurrencyexchangebitnoteamout.Name = "txtbitnotecurrencyexchangebitnoteamout" + Me.txtbitnotecurrencyexchangebitnoteamout.Size = New System.Drawing.Size(100, 20) + Me.txtbitnotecurrencyexchangebitnoteamout.TabIndex = 11 + Me.txtbitnotecurrencyexchangebitnoteamout.Text = "1" + Me.txtbitnotecurrencyexchangebitnoteamout.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'lblbitnotecurrencyexchangeprice + ' + Me.lblbitnotecurrencyexchangeprice.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotecurrencyexchangeprice.AutoSize = True + Me.lblbitnotecurrencyexchangeprice.Location = New System.Drawing.Point(421, 320) + Me.lblbitnotecurrencyexchangeprice.Name = "lblbitnotecurrencyexchangeprice" + Me.lblbitnotecurrencyexchangeprice.Size = New System.Drawing.Size(76, 13) + Me.lblbitnotecurrencyexchangeprice.TabIndex = 10 + Me.lblbitnotecurrencyexchangeprice.Text = "BTN for 22 CP" + ' + 'lblbitnotecurrencyexchangebuytitle + ' + Me.lblbitnotecurrencyexchangebuytitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotecurrencyexchangebuytitle.AutoSize = True + Me.lblbitnotecurrencyexchangebuytitle.Location = New System.Drawing.Point(289, 320) + Me.lblbitnotecurrencyexchangebuytitle.Name = "lblbitnotecurrencyexchangebuytitle" + Me.lblbitnotecurrencyexchangebuytitle.Size = New System.Drawing.Size(25, 13) + Me.lblbitnotecurrencyexchangebuytitle.TabIndex = 9 + Me.lblbitnotecurrencyexchangebuytitle.Text = "Buy" + ' + 'lblbitnotecurrencyexchangetodaysrate + ' + Me.lblbitnotecurrencyexchangetodaysrate.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotecurrencyexchangetodaysrate.AutoSize = True + Me.lblbitnotecurrencyexchangetodaysrate.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangetodaysrate.Location = New System.Drawing.Point(271, 269) + Me.lblbitnotecurrencyexchangetodaysrate.Name = "lblbitnotecurrencyexchangetodaysrate" + Me.lblbitnotecurrencyexchangetodaysrate.Size = New System.Drawing.Size(257, 13) + Me.lblbitnotecurrencyexchangetodaysrate.TabIndex = 8 + Me.lblbitnotecurrencyexchangetodaysrate.Text = "Exchange rate for 21st Nov - 1 BTN : 22 CP" + ' + 'pnlbitnotecurrencyexchangefooter + ' + Me.pnlbitnotecurrencyexchangefooter.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotecurrencyexchangefooter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.lblbitnotecurrencyexchangefooterhomelink) + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.lblbitnotecurrencyexchangefootercopyright) + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.lblbitnotecurrencyexchangefootergetlink) + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.lblbitnotecurrencyexchangefooterdiggerlink) + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.lblbitnotecurrencyexchangefooterwalletlink) + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.lblbitnotecurrencyexchangefootergettitle) + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.bitnotecurrencyexchangefooterdownloadstitle) + Me.pnlbitnotecurrencyexchangefooter.Controls.Add(Me.lblbitnotecurrencyexchangefooterabouttitle) + Me.pnlbitnotecurrencyexchangefooter.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlbitnotecurrencyexchangefooter.Location = New System.Drawing.Point(100, 453) + Me.pnlbitnotecurrencyexchangefooter.Name = "pnlbitnotecurrencyexchangefooter" + Me.pnlbitnotecurrencyexchangefooter.Size = New System.Drawing.Size(616, 80) + Me.pnlbitnotecurrencyexchangefooter.TabIndex = 7 + ' + 'lblbitnotecurrencyexchangefooterhomelink + ' + Me.lblbitnotecurrencyexchangefooterhomelink.AutoSize = True + Me.lblbitnotecurrencyexchangefooterhomelink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangefooterhomelink.Location = New System.Drawing.Point(29, 27) + Me.lblbitnotecurrencyexchangefooterhomelink.Name = "lblbitnotecurrencyexchangefooterhomelink" + Me.lblbitnotecurrencyexchangefooterhomelink.Size = New System.Drawing.Size(35, 13) + Me.lblbitnotecurrencyexchangefooterhomelink.TabIndex = 7 + Me.lblbitnotecurrencyexchangefooterhomelink.Text = "Home" + ' + 'lblbitnotecurrencyexchangefootercopyright + ' + Me.lblbitnotecurrencyexchangefootercopyright.AutoSize = True + Me.lblbitnotecurrencyexchangefootercopyright.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangefootercopyright.Location = New System.Drawing.Point(438, 60) + Me.lblbitnotecurrencyexchangefootercopyright.Name = "lblbitnotecurrencyexchangefootercopyright" + Me.lblbitnotecurrencyexchangefootercopyright.Size = New System.Drawing.Size(174, 16) + Me.lblbitnotecurrencyexchangefootercopyright.TabIndex = 6 + Me.lblbitnotecurrencyexchangefootercopyright.Text = "Copyright © Bitnote inc. 2014" + ' + 'lblbitnotecurrencyexchangefootergetlink + ' + Me.lblbitnotecurrencyexchangefootergetlink.AutoSize = True + Me.lblbitnotecurrencyexchangefootergetlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangefootergetlink.Location = New System.Drawing.Point(337, 28) + Me.lblbitnotecurrencyexchangefootergetlink.Name = "lblbitnotecurrencyexchangefootergetlink" + Me.lblbitnotecurrencyexchangefootergetlink.Size = New System.Drawing.Size(100, 13) + Me.lblbitnotecurrencyexchangefootergetlink.TabIndex = 5 + Me.lblbitnotecurrencyexchangefootergetlink.Text = "Currency Exchange" + ' + 'lblbitnotecurrencyexchangefooterdiggerlink + ' + Me.lblbitnotecurrencyexchangefooterdiggerlink.AutoSize = True + Me.lblbitnotecurrencyexchangefooterdiggerlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangefooterdiggerlink.Location = New System.Drawing.Point(168, 52) + Me.lblbitnotecurrencyexchangefooterdiggerlink.Name = "lblbitnotecurrencyexchangefooterdiggerlink" + Me.lblbitnotecurrencyexchangefooterdiggerlink.Size = New System.Drawing.Size(38, 13) + Me.lblbitnotecurrencyexchangefooterdiggerlink.TabIndex = 4 + Me.lblbitnotecurrencyexchangefooterdiggerlink.Text = "Digger" + ' + 'lblbitnotecurrencyexchangefooterwalletlink + ' + Me.lblbitnotecurrencyexchangefooterwalletlink.AutoSize = True + Me.lblbitnotecurrencyexchangefooterwalletlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangefooterwalletlink.Location = New System.Drawing.Point(168, 30) + Me.lblbitnotecurrencyexchangefooterwalletlink.Name = "lblbitnotecurrencyexchangefooterwalletlink" + Me.lblbitnotecurrencyexchangefooterwalletlink.Size = New System.Drawing.Size(37, 13) + Me.lblbitnotecurrencyexchangefooterwalletlink.TabIndex = 3 + Me.lblbitnotecurrencyexchangefooterwalletlink.Text = "Wallet" + ' + 'lblbitnotecurrencyexchangefootergettitle + ' + Me.lblbitnotecurrencyexchangefootergettitle.AutoSize = True + Me.lblbitnotecurrencyexchangefootergettitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangefootergettitle.Location = New System.Drawing.Point(314, 5) + Me.lblbitnotecurrencyexchangefootergettitle.Name = "lblbitnotecurrencyexchangefootergettitle" + Me.lblbitnotecurrencyexchangefootergettitle.Size = New System.Drawing.Size(89, 13) + Me.lblbitnotecurrencyexchangefootergettitle.TabIndex = 2 + Me.lblbitnotecurrencyexchangefootergettitle.Text = "GET BITNOTES:" + ' + 'bitnotecurrencyexchangefooterdownloadstitle + ' + Me.bitnotecurrencyexchangefooterdownloadstitle.AutoSize = True + Me.bitnotecurrencyexchangefooterdownloadstitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.bitnotecurrencyexchangefooterdownloadstitle.Location = New System.Drawing.Point(151, 7) + Me.bitnotecurrencyexchangefooterdownloadstitle.Name = "bitnotecurrencyexchangefooterdownloadstitle" + Me.bitnotecurrencyexchangefooterdownloadstitle.Size = New System.Drawing.Size(81, 13) + Me.bitnotecurrencyexchangefooterdownloadstitle.TabIndex = 1 + Me.bitnotecurrencyexchangefooterdownloadstitle.Text = "DOWNLOADS:" + ' + 'lblbitnotecurrencyexchangefooterabouttitle + ' + Me.lblbitnotecurrencyexchangefooterabouttitle.AutoSize = True + Me.lblbitnotecurrencyexchangefooterabouttitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangefooterabouttitle.Location = New System.Drawing.Point(22, 7) + Me.lblbitnotecurrencyexchangefooterabouttitle.Name = "lblbitnotecurrencyexchangefooterabouttitle" + Me.lblbitnotecurrencyexchangefooterabouttitle.Size = New System.Drawing.Size(44, 13) + Me.lblbitnotecurrencyexchangefooterabouttitle.TabIndex = 0 + Me.lblbitnotecurrencyexchangefooterabouttitle.Text = "ABOUT" + ' + 'pnlbitnotecurrencyexchangerightside + ' + Me.pnlbitnotecurrencyexchangerightside.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotecurrencyexchangerightside.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotecurrencyexchangerightside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotecurrencyexchangerightside.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlbitnotecurrencyexchangerightside.Location = New System.Drawing.Point(716, 0) + Me.pnlbitnotecurrencyexchangerightside.Name = "pnlbitnotecurrencyexchangerightside" + Me.pnlbitnotecurrencyexchangerightside.Size = New System.Drawing.Size(100, 533) + Me.pnlbitnotecurrencyexchangerightside.TabIndex = 6 + ' + 'pnlbitnotecurrencyexchangeleftside + ' + Me.pnlbitnotecurrencyexchangeleftside.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotecurrencyexchangeleftside.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotecurrencyexchangeleftside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotecurrencyexchangeleftside.Dock = System.Windows.Forms.DockStyle.Left + Me.pnlbitnotecurrencyexchangeleftside.Location = New System.Drawing.Point(0, 0) + Me.pnlbitnotecurrencyexchangeleftside.Name = "pnlbitnotecurrencyexchangeleftside" + Me.pnlbitnotecurrencyexchangeleftside.Size = New System.Drawing.Size(100, 533) + Me.pnlbitnotecurrencyexchangeleftside.TabIndex = 5 + ' + 'lblbitnotecurrencyexchangedescription + ' + Me.lblbitnotecurrencyexchangedescription.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotecurrencyexchangedescription.Location = New System.Drawing.Point(119, 215) + Me.lblbitnotecurrencyexchangedescription.Name = "lblbitnotecurrencyexchangedescription" + Me.lblbitnotecurrencyexchangedescription.Size = New System.Drawing.Size(575, 43) + Me.lblbitnotecurrencyexchangedescription.TabIndex = 2 + Me.lblbitnotecurrencyexchangedescription.Text = resources.GetString("lblbitnotecurrencyexchangedescription.Text") + ' + 'lblbitnotecurrencyexchangetitle + ' + Me.lblbitnotecurrencyexchangetitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotecurrencyexchangetitle.AutoSize = True + Me.lblbitnotecurrencyexchangetitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotecurrencyexchangetitle.Location = New System.Drawing.Point(250, 178) + Me.lblbitnotecurrencyexchangetitle.Name = "lblbitnotecurrencyexchangetitle" + Me.lblbitnotecurrencyexchangetitle.Size = New System.Drawing.Size(305, 29) + Me.lblbitnotecurrencyexchangetitle.TabIndex = 1 + Me.lblbitnotecurrencyexchangetitle.Text = "CURRENCY EXCHANGE" + ' + 'picbitnotecurrencyexchangetitle + ' + Me.picbitnotecurrencyexchangetitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picbitnotecurrencyexchangetitle.Image = Global.ShiftOS.My.Resources.Resources.bitnotewebsitetitle + Me.picbitnotecurrencyexchangetitle.Location = New System.Drawing.Point(108, 15) + Me.picbitnotecurrencyexchangetitle.Name = "picbitnotecurrencyexchangetitle" + Me.picbitnotecurrencyexchangetitle.Size = New System.Drawing.Size(600, 150) + Me.picbitnotecurrencyexchangetitle.TabIndex = 0 + Me.picbitnotecurrencyexchangetitle.TabStop = False + ' + 'pnlbitnotebuywallet + ' + Me.pnlbitnotebuywallet.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlbitnotebuywallet.Controls.Add(Me.picbitnotewalletdownloadbtn) + Me.pnlbitnotebuywallet.Controls.Add(Me.lblbitnotewalletdescription2) + Me.pnlbitnotebuywallet.Controls.Add(Me.lblbitnotewalletdescription1) + Me.pnlbitnotebuywallet.Controls.Add(Me.picbitnotewalletpagescreenshot) + Me.pnlbitnotebuywallet.Controls.Add(Me.pnlbitnotewalletfooter) + Me.pnlbitnotebuywallet.Controls.Add(Me.pnlbitnotewalletpagerightside) + Me.pnlbitnotebuywallet.Controls.Add(Me.pnlbitnotewalletpageleftside) + Me.pnlbitnotebuywallet.Controls.Add(Me.Label21) + Me.pnlbitnotebuywallet.Controls.Add(Me.picbitnotewalletpagelogo) + Me.pnlbitnotebuywallet.Location = New System.Drawing.Point(10, 32) + Me.pnlbitnotebuywallet.Name = "pnlbitnotebuywallet" + Me.pnlbitnotebuywallet.Size = New System.Drawing.Size(270, 185) + Me.pnlbitnotebuywallet.TabIndex = 2 + ' + 'picbitnotewalletdownloadbtn + ' + Me.picbitnotewalletdownloadbtn.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picbitnotewalletdownloadbtn.Image = Global.ShiftOS.My.Resources.Resources.bitnotewalletdownload + Me.picbitnotewalletdownloadbtn.Location = New System.Drawing.Point(17, 374) + Me.picbitnotewalletdownloadbtn.Name = "picbitnotewalletdownloadbtn" + Me.picbitnotewalletdownloadbtn.Size = New System.Drawing.Size(200, 50) + Me.picbitnotewalletdownloadbtn.TabIndex = 11 + Me.picbitnotewalletdownloadbtn.TabStop = False + ' + 'lblbitnotewalletdescription2 + ' + Me.lblbitnotewalletdescription2.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotewalletdescription2.Location = New System.Drawing.Point(-166, 335) + Me.lblbitnotewalletdescription2.Name = "lblbitnotewalletdescription2" + Me.lblbitnotewalletdescription2.Size = New System.Drawing.Size(603, 36) + Me.lblbitnotewalletdescription2.TabIndex = 10 + Me.lblbitnotewalletdescription2.Text = "service. You can easily transfer money to family and friends, what's more, it's a" & _ + "bsolutely FREE, download it now and it won't cost you a cent." + ' + 'lblbitnotewalletdescription1 + ' + Me.lblbitnotewalletdescription1.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotewalletdescription1.Location = New System.Drawing.Point(266, 222) + Me.lblbitnotewalletdescription1.Name = "lblbitnotewalletdescription1" + Me.lblbitnotewalletdescription1.Size = New System.Drawing.Size(170, 107) + Me.lblbitnotewalletdescription1.TabIndex = 9 + Me.lblbitnotewalletdescription1.Text = resources.GetString("lblbitnotewalletdescription1.Text") + ' + 'picbitnotewalletpagescreenshot + ' + Me.picbitnotewalletpagescreenshot.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picbitnotewalletpagescreenshot.Image = Global.ShiftOS.My.Resources.Resources.bitnotewalletpreviewscreenshot + Me.picbitnotewalletpagescreenshot.Location = New System.Drawing.Point(-163, 220) + Me.picbitnotewalletpagescreenshot.Name = "picbitnotewalletpagescreenshot" + Me.picbitnotewalletpagescreenshot.Size = New System.Drawing.Size(419, 109) + Me.picbitnotewalletpagescreenshot.TabIndex = 8 + Me.picbitnotewalletpagescreenshot.TabStop = False + ' + 'pnlbitnotewalletfooter + ' + Me.pnlbitnotewalletfooter.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotewalletfooter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletpagefooterhomelink) + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletcopyrighttitle) + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletfootergetlink) + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletdiggerdownloadlink) + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletwalletdownloadlink) + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletpagegettitle) + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletpagedownloadstitle) + Me.pnlbitnotewalletfooter.Controls.Add(Me.lblbitnotewalletpageabouttitle) + Me.pnlbitnotewalletfooter.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlbitnotewalletfooter.Location = New System.Drawing.Point(100, 100) + Me.pnlbitnotewalletfooter.Name = "pnlbitnotewalletfooter" + Me.pnlbitnotewalletfooter.Size = New System.Drawing.Size(70, 85) + Me.pnlbitnotewalletfooter.TabIndex = 7 + ' + 'lblbitnotewalletpagefooterhomelink + ' + Me.lblbitnotewalletpagefooterhomelink.AutoSize = True + Me.lblbitnotewalletpagefooterhomelink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletpagefooterhomelink.Location = New System.Drawing.Point(35, 27) + Me.lblbitnotewalletpagefooterhomelink.Name = "lblbitnotewalletpagefooterhomelink" + Me.lblbitnotewalletpagefooterhomelink.Size = New System.Drawing.Size(35, 13) + Me.lblbitnotewalletpagefooterhomelink.TabIndex = 7 + Me.lblbitnotewalletpagefooterhomelink.Text = "Home" + ' + 'lblbitnotewalletcopyrighttitle + ' + Me.lblbitnotewalletcopyrighttitle.AutoSize = True + Me.lblbitnotewalletcopyrighttitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletcopyrighttitle.Location = New System.Drawing.Point(438, 65) + Me.lblbitnotewalletcopyrighttitle.Name = "lblbitnotewalletcopyrighttitle" + Me.lblbitnotewalletcopyrighttitle.Size = New System.Drawing.Size(174, 16) + Me.lblbitnotewalletcopyrighttitle.TabIndex = 6 + Me.lblbitnotewalletcopyrighttitle.Text = "Copyright © Bitnote inc. 2014" + ' + 'lblbitnotewalletfootergetlink + ' + Me.lblbitnotewalletfootergetlink.AutoSize = True + Me.lblbitnotewalletfootergetlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletfootergetlink.Location = New System.Drawing.Point(337, 28) + Me.lblbitnotewalletfootergetlink.Name = "lblbitnotewalletfootergetlink" + Me.lblbitnotewalletfootergetlink.Size = New System.Drawing.Size(100, 13) + Me.lblbitnotewalletfootergetlink.TabIndex = 5 + Me.lblbitnotewalletfootergetlink.Text = "Currency Exchange" + ' + 'lblbitnotewalletdiggerdownloadlink + ' + Me.lblbitnotewalletdiggerdownloadlink.AutoSize = True + Me.lblbitnotewalletdiggerdownloadlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletdiggerdownloadlink.Location = New System.Drawing.Point(168, 52) + Me.lblbitnotewalletdiggerdownloadlink.Name = "lblbitnotewalletdiggerdownloadlink" + Me.lblbitnotewalletdiggerdownloadlink.Size = New System.Drawing.Size(38, 13) + Me.lblbitnotewalletdiggerdownloadlink.TabIndex = 4 + Me.lblbitnotewalletdiggerdownloadlink.Text = "Digger" + ' + 'lblbitnotewalletwalletdownloadlink + ' + Me.lblbitnotewalletwalletdownloadlink.AutoSize = True + Me.lblbitnotewalletwalletdownloadlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletwalletdownloadlink.Location = New System.Drawing.Point(168, 30) + Me.lblbitnotewalletwalletdownloadlink.Name = "lblbitnotewalletwalletdownloadlink" + Me.lblbitnotewalletwalletdownloadlink.Size = New System.Drawing.Size(37, 13) + Me.lblbitnotewalletwalletdownloadlink.TabIndex = 3 + Me.lblbitnotewalletwalletdownloadlink.Text = "Wallet" + ' + 'lblbitnotewalletpagegettitle + ' + Me.lblbitnotewalletpagegettitle.AutoSize = True + Me.lblbitnotewalletpagegettitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletpagegettitle.Location = New System.Drawing.Point(314, 5) + Me.lblbitnotewalletpagegettitle.Name = "lblbitnotewalletpagegettitle" + Me.lblbitnotewalletpagegettitle.Size = New System.Drawing.Size(89, 13) + Me.lblbitnotewalletpagegettitle.TabIndex = 2 + Me.lblbitnotewalletpagegettitle.Text = "GET BITNOTES:" + ' + 'lblbitnotewalletpagedownloadstitle + ' + Me.lblbitnotewalletpagedownloadstitle.AutoSize = True + Me.lblbitnotewalletpagedownloadstitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletpagedownloadstitle.Location = New System.Drawing.Point(151, 7) + Me.lblbitnotewalletpagedownloadstitle.Name = "lblbitnotewalletpagedownloadstitle" + Me.lblbitnotewalletpagedownloadstitle.Size = New System.Drawing.Size(81, 13) + Me.lblbitnotewalletpagedownloadstitle.TabIndex = 1 + Me.lblbitnotewalletpagedownloadstitle.Text = "DOWNLOADS:" + ' + 'lblbitnotewalletpageabouttitle + ' + Me.lblbitnotewalletpageabouttitle.AutoSize = True + Me.lblbitnotewalletpageabouttitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotewalletpageabouttitle.Location = New System.Drawing.Point(22, 7) + Me.lblbitnotewalletpageabouttitle.Name = "lblbitnotewalletpageabouttitle" + Me.lblbitnotewalletpageabouttitle.Size = New System.Drawing.Size(44, 13) + Me.lblbitnotewalletpageabouttitle.TabIndex = 0 + Me.lblbitnotewalletpageabouttitle.Text = "ABOUT" + ' + 'pnlbitnotewalletpagerightside + ' + Me.pnlbitnotewalletpagerightside.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotewalletpagerightside.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotewalletpagerightside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotewalletpagerightside.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlbitnotewalletpagerightside.Location = New System.Drawing.Point(170, 0) + Me.pnlbitnotewalletpagerightside.Name = "pnlbitnotewalletpagerightside" + Me.pnlbitnotewalletpagerightside.Size = New System.Drawing.Size(100, 185) + Me.pnlbitnotewalletpagerightside.TabIndex = 6 + ' + 'pnlbitnotewalletpageleftside + ' + Me.pnlbitnotewalletpageleftside.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotewalletpageleftside.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotewalletpageleftside.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotewalletpageleftside.Dock = System.Windows.Forms.DockStyle.Left + Me.pnlbitnotewalletpageleftside.Location = New System.Drawing.Point(0, 0) + Me.pnlbitnotewalletpageleftside.Name = "pnlbitnotewalletpageleftside" + Me.pnlbitnotewalletpageleftside.Size = New System.Drawing.Size(100, 185) + Me.pnlbitnotewalletpageleftside.TabIndex = 5 + ' + 'Label21 + ' + Me.Label21.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.Label21.AutoSize = True + Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label21.Location = New System.Drawing.Point(-37, 184) + Me.Label21.Name = "Label21" + Me.Label21.Size = New System.Drawing.Size(294, 29) + Me.Label21.TabIndex = 1 + Me.Label21.Text = "THE BITNOTE WALLET" + ' + 'picbitnotewalletpagelogo + ' + Me.picbitnotewalletpagelogo.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picbitnotewalletpagelogo.Image = Global.ShiftOS.My.Resources.Resources.bitnotewebsitetitle + Me.picbitnotewalletpagelogo.Location = New System.Drawing.Point(-163, 17) + Me.picbitnotewalletpagelogo.Name = "picbitnotewalletpagelogo" + Me.picbitnotewalletpagelogo.Size = New System.Drawing.Size(600, 150) + Me.picbitnotewalletpagelogo.TabIndex = 0 + Me.picbitnotewalletpagelogo.TabStop = False + ' + 'pnlbitnotehome + ' + Me.pnlbitnotehome.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pnlbitnotehome.Controls.Add(Me.pnlbitnotehomefooter) + Me.pnlbitnotehome.Controls.Add(Me.pnlbitnotesideright) + Me.pnlbitnotehome.Controls.Add(Me.pnlbitnotesideleft) + Me.pnlbitnotehome.Controls.Add(Me.lblbitnotehowgettxt) + Me.pnlbitnotehome.Controls.Add(Me.lblbitnotehowgettitle) + Me.pnlbitnotehome.Controls.Add(Me.lblbitnoteabouttxt) + Me.pnlbitnotehome.Controls.Add(Me.lblbitnoteabouttitle) + Me.pnlbitnotehome.Controls.Add(Me.picbitnotewebsitetitle) + Me.pnlbitnotehome.Location = New System.Drawing.Point(380, 17) + Me.pnlbitnotehome.Name = "pnlbitnotehome" + Me.pnlbitnotehome.Size = New System.Drawing.Size(324, 164) + Me.pnlbitnotehome.TabIndex = 1 + ' + 'pnlbitnotehomefooter + ' + Me.pnlbitnotehomefooter.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotehomefooter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomehomebtn) + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomecopyright) + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomefootergetlink) + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomediggerlink) + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomewalletlink) + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomefootergettitle) + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomedownloadlink) + Me.pnlbitnotehomefooter.Controls.Add(Me.lblbitnotehomeaboutlink) + Me.pnlbitnotehomefooter.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlbitnotehomefooter.Location = New System.Drawing.Point(100, 79) + Me.pnlbitnotehomefooter.Name = "pnlbitnotehomefooter" + Me.pnlbitnotehomefooter.Size = New System.Drawing.Size(124, 85) + Me.pnlbitnotehomefooter.TabIndex = 7 + ' + 'lblbitnotehomehomebtn + ' + Me.lblbitnotehomehomebtn.AutoSize = True + Me.lblbitnotehomehomebtn.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomehomebtn.Location = New System.Drawing.Point(29, 27) + Me.lblbitnotehomehomebtn.Name = "lblbitnotehomehomebtn" + Me.lblbitnotehomehomebtn.Size = New System.Drawing.Size(35, 13) + Me.lblbitnotehomehomebtn.TabIndex = 7 + Me.lblbitnotehomehomebtn.Text = "Home" + ' + 'lblbitnotehomecopyright + ' + Me.lblbitnotehomecopyright.AutoSize = True + Me.lblbitnotehomecopyright.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomecopyright.Location = New System.Drawing.Point(438, 65) + Me.lblbitnotehomecopyright.Name = "lblbitnotehomecopyright" + Me.lblbitnotehomecopyright.Size = New System.Drawing.Size(174, 16) + Me.lblbitnotehomecopyright.TabIndex = 6 + Me.lblbitnotehomecopyright.Text = "Copyright © Bitnote inc. 2014" + ' + 'lblbitnotehomefootergetlink + ' + Me.lblbitnotehomefootergetlink.AutoSize = True + Me.lblbitnotehomefootergetlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomefootergetlink.Location = New System.Drawing.Point(337, 28) + Me.lblbitnotehomefootergetlink.Name = "lblbitnotehomefootergetlink" + Me.lblbitnotehomefootergetlink.Size = New System.Drawing.Size(100, 13) + Me.lblbitnotehomefootergetlink.TabIndex = 5 + Me.lblbitnotehomefootergetlink.Text = "Currency Exchange" + ' + 'lblbitnotehomediggerlink + ' + Me.lblbitnotehomediggerlink.AutoSize = True + Me.lblbitnotehomediggerlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomediggerlink.Location = New System.Drawing.Point(168, 52) + Me.lblbitnotehomediggerlink.Name = "lblbitnotehomediggerlink" + Me.lblbitnotehomediggerlink.Size = New System.Drawing.Size(38, 13) + Me.lblbitnotehomediggerlink.TabIndex = 4 + Me.lblbitnotehomediggerlink.Text = "Digger" + ' + 'lblbitnotehomewalletlink + ' + Me.lblbitnotehomewalletlink.AutoSize = True + Me.lblbitnotehomewalletlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomewalletlink.Location = New System.Drawing.Point(168, 30) + Me.lblbitnotehomewalletlink.Name = "lblbitnotehomewalletlink" + Me.lblbitnotehomewalletlink.Size = New System.Drawing.Size(37, 13) + Me.lblbitnotehomewalletlink.TabIndex = 3 + Me.lblbitnotehomewalletlink.Text = "Wallet" + ' + 'lblbitnotehomefootergettitle + ' + Me.lblbitnotehomefootergettitle.AutoSize = True + Me.lblbitnotehomefootergettitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomefootergettitle.Location = New System.Drawing.Point(314, 5) + Me.lblbitnotehomefootergettitle.Name = "lblbitnotehomefootergettitle" + Me.lblbitnotehomefootergettitle.Size = New System.Drawing.Size(89, 13) + Me.lblbitnotehomefootergettitle.TabIndex = 2 + Me.lblbitnotehomefootergettitle.Text = "GET BITNOTES:" + ' + 'lblbitnotehomedownloadlink + ' + Me.lblbitnotehomedownloadlink.AutoSize = True + Me.lblbitnotehomedownloadlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomedownloadlink.Location = New System.Drawing.Point(151, 7) + Me.lblbitnotehomedownloadlink.Name = "lblbitnotehomedownloadlink" + Me.lblbitnotehomedownloadlink.Size = New System.Drawing.Size(81, 13) + Me.lblbitnotehomedownloadlink.TabIndex = 1 + Me.lblbitnotehomedownloadlink.Text = "DOWNLOADS:" + ' + 'lblbitnotehomeaboutlink + ' + Me.lblbitnotehomeaboutlink.AutoSize = True + Me.lblbitnotehomeaboutlink.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehomeaboutlink.Location = New System.Drawing.Point(22, 7) + Me.lblbitnotehomeaboutlink.Name = "lblbitnotehomeaboutlink" + Me.lblbitnotehomeaboutlink.Size = New System.Drawing.Size(44, 13) + Me.lblbitnotehomeaboutlink.TabIndex = 0 + Me.lblbitnotehomeaboutlink.Text = "ABOUT" + ' + 'pnlbitnotesideright + ' + Me.pnlbitnotesideright.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotesideright.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotesideright.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotesideright.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlbitnotesideright.Location = New System.Drawing.Point(224, 0) + Me.pnlbitnotesideright.Name = "pnlbitnotesideright" + Me.pnlbitnotesideright.Size = New System.Drawing.Size(100, 164) + Me.pnlbitnotesideright.TabIndex = 6 + ' + 'pnlbitnotesideleft + ' + Me.pnlbitnotesideleft.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) + Me.pnlbitnotesideleft.BackgroundImage = Global.ShiftOS.My.Resources.Resources.bitnoteswebsidepnl + Me.pnlbitnotesideleft.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlbitnotesideleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pnlbitnotesideleft.Location = New System.Drawing.Point(0, 0) + Me.pnlbitnotesideleft.Name = "pnlbitnotesideleft" + Me.pnlbitnotesideleft.Size = New System.Drawing.Size(100, 164) + Me.pnlbitnotesideleft.TabIndex = 5 + ' + 'lblbitnotehowgettxt + ' + Me.lblbitnotehowgettxt.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotehowgettxt.Location = New System.Drawing.Point(-126, 348) + Me.lblbitnotehowgettxt.Name = "lblbitnotehowgettxt" + Me.lblbitnotehowgettxt.Size = New System.Drawing.Size(579, 78) + Me.lblbitnotehowgettxt.TabIndex = 4 + Me.lblbitnotehowgettxt.Text = resources.GetString("lblbitnotehowgettxt.Text") + ' + 'lblbitnotehowgettitle + ' + Me.lblbitnotehowgettitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnotehowgettitle.AutoSize = True + Me.lblbitnotehowgettitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnotehowgettitle.Location = New System.Drawing.Point(-28, 313) + Me.lblbitnotehowgettitle.Name = "lblbitnotehowgettitle" + Me.lblbitnotehowgettitle.Size = New System.Drawing.Size(344, 29) + Me.lblbitnotehowgettitle.TabIndex = 3 + Me.lblbitnotehowgettitle.Text = "HOW DO I GET BITNOTES?" + ' + 'lblbitnoteabouttxt + ' + Me.lblbitnoteabouttxt.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnoteabouttxt.Location = New System.Drawing.Point(-127, 234) + Me.lblbitnoteabouttxt.Name = "lblbitnoteabouttxt" + Me.lblbitnoteabouttxt.Size = New System.Drawing.Size(575, 53) + Me.lblbitnoteabouttxt.TabIndex = 2 + Me.lblbitnoteabouttxt.Text = resources.GetString("lblbitnoteabouttxt.Text") + ' + 'lblbitnoteabouttitle + ' + Me.lblbitnoteabouttitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.lblbitnoteabouttitle.AutoSize = True + Me.lblbitnoteabouttitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblbitnoteabouttitle.Location = New System.Drawing.Point(4, 196) + Me.lblbitnoteabouttitle.Name = "lblbitnoteabouttitle" + Me.lblbitnoteabouttitle.Size = New System.Drawing.Size(275, 29) + Me.lblbitnoteabouttitle.TabIndex = 1 + Me.lblbitnoteabouttitle.Text = "WHAT IS A BITNOTE?" + ' + 'picbitnotewebsitetitle + ' + Me.picbitnotewebsitetitle.Anchor = System.Windows.Forms.AnchorStyles.Top + Me.picbitnotewebsitetitle.Image = Global.ShiftOS.My.Resources.Resources.bitnotewebsitetitle + Me.picbitnotewebsitetitle.Location = New System.Drawing.Point(-138, 15) + Me.picbitnotewebsitetitle.Name = "picbitnotewebsitetitle" + Me.picbitnotewebsitetitle.Size = New System.Drawing.Size(600, 150) + Me.picbitnotewebsitetitle.TabIndex = 0 + Me.picbitnotewebsitetitle.TabStop = False + ' + 'pnlshifterhacker + ' + Me.pnlshifterhacker.AutoScroll = True + Me.pnlshifterhacker.BackColor = System.Drawing.Color.White + Me.pnlshifterhacker.Controls.Add(Me.pnlshifterhackerhome) + Me.pnlshifterhacker.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlshifterhacker.Location = New System.Drawing.Point(0, 35) + Me.pnlshifterhacker.Name = "pnlshifterhacker" + Me.pnlshifterhacker.Size = New System.Drawing.Size(816, 533) + Me.pnlshifterhacker.TabIndex = 18 + Me.pnlshifterhacker.Visible = False + ' + 'pnlshifterhackerhome + ' + Me.pnlshifterhackerhome.Controls.Add(Me.tbshifterhackerhomefloodgatelink1) + Me.pnlshifterhackerhome.Controls.Add(Me.TextBox1) + Me.pnlshifterhackerhome.Controls.Add(Me.tbshifterhackerhomeblogpost1) + Me.pnlshifterhackerhome.Controls.Add(Me.tbshifterhackerhomefloodgatead) + Me.pnlshifterhackerhome.Controls.Add(Me.tbshifterhackerhomepostspotwatermark) + Me.pnlshifterhackerhome.Controls.Add(Me.tbshifterhackerhomeh1) + Me.pnlshifterhackerhome.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlshifterhackerhome.Location = New System.Drawing.Point(0, 0) + Me.pnlshifterhackerhome.Name = "pnlshifterhackerhome" + Me.pnlshifterhackerhome.Size = New System.Drawing.Size(816, 533) + Me.pnlshifterhackerhome.TabIndex = 4 + ' + 'tbshifterhackerhomefloodgatelink1 + ' + Me.tbshifterhackerhomefloodgatelink1.AutoSize = True + Me.tbshifterhackerhomefloodgatelink1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbshifterhackerhomefloodgatelink1.Location = New System.Drawing.Point(262, 127) + Me.tbshifterhackerhomefloodgatelink1.Name = "tbshifterhackerhomefloodgatelink1" + Me.tbshifterhackerhomefloodgatelink1.Size = New System.Drawing.Size(75, 13) + Me.tbshifterhackerhomefloodgatelink1.TabIndex = 10 + Me.tbshifterhackerhomefloodgatelink1.Text = "FloodGate link" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.tbshifterhackerhomefloodgatelink1, "fgmlink--shiftnet.shifterhacker/hacks/codepointhack.flood") + ' + 'TextBox1 + ' + Me.TextBox1.BackColor = System.Drawing.Color.White + Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.TextBox1.Location = New System.Drawing.Point(27, 127) + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.ReadOnly = True + Me.TextBox1.Size = New System.Drawing.Size(239, 13) + Me.TextBox1.TabIndex = 9 + Me.TextBox1.Text = "shiftnet.shifterhacker/hacks/codepointhack.flood" + ' + 'tbshifterhackerhomeblogpost1 + ' + Me.tbshifterhackerhomeblogpost1.AutoSize = True + Me.tbshifterhackerhomeblogpost1.Location = New System.Drawing.Point(24, 75) + Me.tbshifterhackerhomeblogpost1.Name = "tbshifterhackerhomeblogpost1" + Me.tbshifterhackerhomeblogpost1.Size = New System.Drawing.Size(343, 52) + Me.tbshifterhackerhomeblogpost1.TabIndex = 8 + Me.tbshifterhackerhomeblogpost1.Text = "10/24/2013" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "First hack released: The bitnote hack." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "This hack will give you 5 bit" & _ + "notes." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Download it by pasting the link below into your preferred flood manager:" & _ + "" + ' + 'tbshifterhackerhomefloodgatead + ' + Me.tbshifterhackerhomefloodgatead.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.tbshifterhackerhomefloodgatead.AutoSize = True + Me.tbshifterhackerhomefloodgatead.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbshifterhackerhomefloodgatead.Location = New System.Drawing.Point(470, 9) + Me.tbshifterhackerhomefloodgatead.Name = "tbshifterhackerhomefloodgatead" + Me.tbshifterhackerhomefloodgatead.Size = New System.Drawing.Size(328, 26) + Me.tbshifterhackerhomefloodgatead.TabIndex = 7 + Me.tbshifterhackerhomefloodgatead.Text = "Install FloodgateManager: The best flood downloader on the shiftnet" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ShiftLinks N" & _ + "etAds" + ' + 'tbshifterhackerhomepostspotwatermark + ' + Me.tbshifterhackerhomepostspotwatermark.AutoSize = True + Me.tbshifterhackerhomepostspotwatermark.BackColor = System.Drawing.Color.White + Me.tbshifterhackerhomepostspotwatermark.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbshifterhackerhomepostspotwatermark.ForeColor = System.Drawing.Color.Gray + Me.tbshifterhackerhomepostspotwatermark.Location = New System.Drawing.Point(205, 2) + Me.tbshifterhackerhomepostspotwatermark.Name = "tbshifterhackerhomepostspotwatermark" + Me.tbshifterhackerhomepostspotwatermark.Size = New System.Drawing.Size(109, 13) + Me.tbshifterhackerhomepostspotwatermark.TabIndex = 6 + Me.tbshifterhackerhomepostspotwatermark.Text = "Powered by PostSpot" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.tbshifterhackerhomepostspotwatermark, "shiftnet.main.floodgate/filetrans.dwnld?file=FloodGate.stp") + ' + 'tbshifterhackerhomeh1 + ' + Me.tbshifterhackerhomeh1.AutoSize = True + Me.tbshifterhackerhomeh1.BackColor = System.Drawing.Color.Transparent + Me.tbshifterhackerhomeh1.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbshifterhackerhomeh1.Location = New System.Drawing.Point(20, 11) + Me.tbshifterhackerhomeh1.Name = "tbshifterhackerhomeh1" + Me.tbshifterhackerhomeh1.Size = New System.Drawing.Size(291, 37) + Me.tbshifterhackerhomeh1.TabIndex = 5 + Me.tbshifterhackerhomeh1.Text = "ShifterHacker's site" + ' + 'pnlutilsweb + ' + Me.pnlutilsweb.Controls.Add(Me.pnlutilswebhome) + Me.pnlutilsweb.Controls.Add(Me.pnlutilswebbackuputility) + Me.pnlutilsweb.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlutilsweb.Location = New System.Drawing.Point(0, 35) + Me.pnlutilsweb.Name = "pnlutilsweb" + Me.pnlutilsweb.Size = New System.Drawing.Size(816, 533) + Me.pnlutilsweb.TabIndex = 15 + ' + 'pnlutilswebhome + ' + Me.pnlutilswebhome.Controls.Add(Me.utilswebhomewip) + Me.pnlutilswebhome.Controls.Add(Me.utilswebvirusscanner) + Me.pnlutilswebhome.Controls.Add(Me.utilswebbackuputil) + Me.pnlutilswebhome.Location = New System.Drawing.Point(0, 425) + Me.pnlutilswebhome.Name = "pnlutilswebhome" + Me.pnlutilswebhome.Size = New System.Drawing.Size(816, 108) + Me.pnlutilswebhome.TabIndex = 1 + ' + 'utilswebhomewip + ' + Me.utilswebhomewip.AutoSize = True + Me.utilswebhomewip.Location = New System.Drawing.Point(276, 49) + Me.utilswebhomewip.Name = "utilswebhomewip" + Me.utilswebhomewip.Size = New System.Drawing.Size(90, 13) + Me.utilswebhomewip.TabIndex = 2 + Me.utilswebhomewip.Text = "Work in progress!" + ' + 'utilswebvirusscanner + ' + Me.utilswebvirusscanner.AutoSize = True + Me.utilswebvirusscanner.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.utilswebvirusscanner.Location = New System.Drawing.Point(277, 93) + Me.utilswebvirusscanner.Name = "utilswebvirusscanner" + Me.utilswebvirusscanner.Size = New System.Drawing.Size(73, 13) + Me.utilswebvirusscanner.TabIndex = 1 + Me.utilswebvirusscanner.Text = "Virus Scanner" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.utilswebvirusscanner, "shiftnet.main.utilsweb/virusutil.rnp") + ' + 'utilswebbackuputil + ' + Me.utilswebbackuputil.AutoSize = True + Me.utilswebbackuputil.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.utilswebbackuputil.Location = New System.Drawing.Point(277, 70) + Me.utilswebbackuputil.Name = "utilswebbackuputil" + Me.utilswebbackuputil.Size = New System.Drawing.Size(72, 13) + Me.utilswebbackuputil.TabIndex = 0 + Me.utilswebbackuputil.Text = "Backup Utility" + Me.AllLinksMustHaveATooltipForTheirUrl.SetToolTip(Me.utilswebbackuputil, "shiftnet.main.utilsweb/backuputility.rnp") + ' + 'pnlutilswebbackuputility + ' + Me.pnlutilswebbackuputility.Controls.Add(Me.lbl_backuputility_soon) + Me.pnlutilswebbackuputility.Controls.Add(Me.pnlutilswebvirusscan) + Me.pnlutilswebbackuputility.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlutilswebbackuputility.Location = New System.Drawing.Point(0, 0) + Me.pnlutilswebbackuputility.Name = "pnlutilswebbackuputility" + Me.pnlutilswebbackuputility.Size = New System.Drawing.Size(816, 533) + Me.pnlutilswebbackuputility.TabIndex = 0 + ' + 'lbl_backuputility_soon + ' + Me.lbl_backuputility_soon.AutoSize = True + Me.lbl_backuputility_soon.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_backuputility_soon.Location = New System.Drawing.Point(313, 93) + Me.lbl_backuputility_soon.Name = "lbl_backuputility_soon" + Me.lbl_backuputility_soon.Size = New System.Drawing.Size(106, 16) + Me.lbl_backuputility_soon.TabIndex = 0 + Me.lbl_backuputility_soon.Text = "COMING SOON!" + ' + 'pnlutilswebvirusscan + ' + Me.pnlutilswebvirusscan.Location = New System.Drawing.Point(591, 72) + Me.pnlutilswebvirusscan.Name = "pnlutilswebvirusscan" + Me.pnlutilswebvirusscan.Size = New System.Drawing.Size(200, 100) + Me.pnlutilswebvirusscan.TabIndex = 18 + ' + 'pnlnotfound + ' + Me.pnlnotfound.AutoScroll = True + Me.pnlnotfound.BackColor = System.Drawing.Color.White + Me.pnlnotfound.Controls.Add(Me.pnlnotfoundsite) + Me.pnlnotfound.Location = New System.Drawing.Point(282, 55) + Me.pnlnotfound.Name = "pnlnotfound" + Me.pnlnotfound.Size = New System.Drawing.Size(139, 122) + Me.pnlnotfound.TabIndex = 13 + Me.pnlnotfound.Visible = False + ' + 'pnlnotfoundsite + ' + Me.pnlnotfoundsite.Controls.Add(Me.tbnotfound) + Me.pnlnotfoundsite.Location = New System.Drawing.Point(27, 67) + Me.pnlnotfoundsite.Name = "pnlnotfoundsite" + Me.pnlnotfoundsite.Size = New System.Drawing.Size(789, 466) + Me.pnlnotfoundsite.TabIndex = 4 + ' + 'tbnotfound + ' + Me.tbnotfound.AutoSize = True + Me.tbnotfound.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tbnotfound.Location = New System.Drawing.Point(4, 3) + Me.tbnotfound.Name = "tbnotfound" + Me.tbnotfound.Size = New System.Drawing.Size(420, 37) + Me.tbnotfound.TabIndex = 3 + Me.tbnotfound.Text = "You should not ever see this" + ' + 'pnlshiftnet + ' + Me.pnlshiftnet.AutoScroll = True + Me.pnlshiftnet.BackColor = System.Drawing.Color.White + Me.pnlshiftnet.Controls.Add(Me.pnlshiftnethome) + Me.pnlshiftnet.Location = New System.Drawing.Point(27, 358) + Me.pnlshiftnet.Name = "pnlshiftnet" + Me.pnlshiftnet.Size = New System.Drawing.Size(135, 91) + Me.pnlshiftnet.TabIndex = 14 + Me.pnlshiftnet.Visible = False + ' + 'pnlshiftnethome + ' + Me.pnlshiftnethome.Controls.Add(Me.Label11) + Me.pnlshiftnethome.Controls.Add(Me.homenetsite) + Me.pnlshiftnethome.Controls.Add(Me.homedefaultpage) + Me.pnlshiftnethome.Controls.Add(Me.hometitle) + Me.pnlshiftnethome.Location = New System.Drawing.Point(27, 35) + Me.pnlshiftnethome.Name = "pnlshiftnethome" + Me.pnlshiftnethome.Size = New System.Drawing.Size(789, 498) + Me.pnlshiftnethome.TabIndex = 4 + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.Location = New System.Drawing.Point(11, 67) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(64, 13) + Me.Label11.TabIndex = 3 + Me.Label11.Text = "ShiftSite 4.2" + ' + 'homenetsite + ' + Me.homenetsite.AutoSize = True + Me.homenetsite.Location = New System.Drawing.Point(11, 50) + Me.homenetsite.Name = "homenetsite" + Me.homenetsite.Size = New System.Drawing.Size(347, 13) + Me.homenetsite.TabIndex = 2 + Me.homenetsite.Text = "The web server software is running but no content has been added, yet." + ' + 'homedefaultpage + ' + Me.homedefaultpage.AutoSize = True + Me.homedefaultpage.Location = New System.Drawing.Point(10, 37) + Me.homedefaultpage.Name = "homedefaultpage" + Me.homedefaultpage.Size = New System.Drawing.Size(205, 13) + Me.homedefaultpage.TabIndex = 1 + Me.homedefaultpage.Text = "This is the default web page for the server" + ' + 'hometitle + ' + Me.hometitle.AutoSize = True + Me.hometitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.hometitle.Location = New System.Drawing.Point(3, 2) + Me.hometitle.Name = "hometitle" + Me.hometitle.Size = New System.Drawing.Size(136, 37) + Me.hometitle.TabIndex = 0 + Me.hometitle.Text = "It works!" + ' + 'pnl404 + ' + Me.pnl404.AutoScroll = True + Me.pnl404.BackColor = System.Drawing.Color.White + Me.pnl404.Controls.Add(Me.pnl404home) + Me.pnl404.Location = New System.Drawing.Point(654, 432) + Me.pnl404.Name = "pnl404" + Me.pnl404.Size = New System.Drawing.Size(162, 136) + Me.pnl404.TabIndex = 16 + Me.pnl404.Visible = False + ' + 'pnl404home + ' + Me.pnl404home.Controls.Add(Me.tb404homenotfound) + Me.pnl404home.Controls.Add(Me.tb404home404) + Me.pnl404home.Location = New System.Drawing.Point(44, 14) + Me.pnl404home.Name = "pnl404home" + Me.pnl404home.Size = New System.Drawing.Size(772, 519) + Me.pnl404home.TabIndex = 4 + ' + 'tb404homenotfound + ' + Me.tb404homenotfound.AutoSize = True + Me.tb404homenotfound.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tb404homenotfound.Location = New System.Drawing.Point(8, 35) + Me.tb404homenotfound.Name = "tb404homenotfound" + Me.tb404homenotfound.Size = New System.Drawing.Size(509, 15) + Me.tb404homenotfound.TabIndex = 4 + Me.tb404homenotfound.Text = "The requested page /XYZ.rnp can not be found on our server. Make sure you typed i" & _ + "t correctly" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + ' + 'tb404home404 + ' + Me.tb404home404.AutoSize = True + Me.tb404home404.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.tb404home404.Location = New System.Drawing.Point(4, 3) + Me.tb404home404.Name = "tb404home404" + Me.tb404home404.Size = New System.Drawing.Size(71, 37) + Me.tb404home404.TabIndex = 3 + Me.tb404home404.Text = "404" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + ' + 'Panel1 + ' + Me.Panel1.Controls.Add(Me.Label12) + Me.Panel1.Controls.Add(Me.btnhome) + Me.Panel1.Controls.Add(Me.txtlocation) + Me.Panel1.Controls.Add(Me.Panel2) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(816, 35) + Me.Panel1.TabIndex = 1 + ' + 'Label12 + ' + Me.Label12.AutoSize = True + Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label12.Location = New System.Drawing.Point(23, 6) + Me.Label12.Name = "Label12" + Me.Label12.Size = New System.Drawing.Size(736, 20) + Me.Label12.TabIndex = 25 + Me.Label12.Text = "Use the document outline instead of undocking everything (View > Other Windows > " & _ + "Document Outline)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + Me.Label12.Visible = False + ' + 'btnhome + ' + Me.btnhome.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnhome.BackColor = System.Drawing.Color.White + Me.btnhome.BackgroundImage = Global.ShiftOS.My.Resources.Resources.webhome + Me.btnhome.FlatAppearance.BorderSize = 0 + Me.btnhome.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnhome.Location = New System.Drawing.Point(781, 5) + Me.btnhome.Name = "btnhome" + Me.btnhome.Size = New System.Drawing.Size(30, 25) + Me.btnhome.TabIndex = 10 + Me.btnhome.UseVisualStyleBackColor = False + ' + 'txtlocation + ' + Me.txtlocation.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtlocation.BackColor = System.Drawing.Color.White + Me.txtlocation.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtlocation.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtlocation.Location = New System.Drawing.Point(5, 5) + Me.txtlocation.Multiline = True + Me.txtlocation.Name = "txtlocation" + Me.txtlocation.Size = New System.Drawing.Size(772, 25) + Me.txtlocation.TabIndex = 9 + ' + 'Panel2 + ' + Me.Panel2.BackColor = System.Drawing.Color.Black + Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel2.Location = New System.Drawing.Point(0, 34) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(816, 1) + Me.Panel2.TabIndex = 6 + ' + 'lbldevdockingwarning + ' + Me.lbldevdockingwarning.AutoSize = True + Me.lbldevdockingwarning.Location = New System.Drawing.Point(327, 9) + Me.lbldevdockingwarning.Name = "lbldevdockingwarning" + Me.lbldevdockingwarning.Size = New System.Drawing.Size(490, 13) + Me.lbldevdockingwarning.TabIndex = 18 + Me.lbldevdockingwarning.Text = "Dock all sites inside pgcontants. Don't dock sites inside other sites (this warni" & _ + "ng has visible set to false)" + Me.lbldevdockingwarning.Visible = False + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 570) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.lbldevdockingwarning) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(820, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'tmrloadsite + ' + Me.tmrloadsite.Enabled = True + ' + 'tmrshiftomizerwaitinglist + ' + Me.tmrshiftomizerwaitinglist.Interval = 1000 + ' + 'qctext + ' + ' + 'Shiftnet + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(1, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(1, Byte), Integer)) + Me.ClientSize = New System.Drawing.Size(820, 600) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Shiftnet" + Me.Text = "Shiftnet" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pnlquickchat.ResumeLayout(False) + Me.pnlquickchathome.ResumeLayout(False) + Me.pnlquickchathome.PerformLayout() + Me.Panel7.ResumeLayout(False) + Me.Panel7.PerformLayout() + Me.pnlquickchatoffline.ResumeLayout(False) + Me.pnlquickchatoffline.PerformLayout() + Me.qcpanel.ResumeLayout(False) + Me.qcpanel.PerformLayout() + Me.pnlxenonh.ResumeLayout(False) + Me.pnlxenonhhome.ResumeLayout(False) + Me.pnlxenonhhome.PerformLayout() + Me.pnlpostspot.ResumeLayout(False) + Me.pnlpostspothome.ResumeLayout(False) + Me.pnlpostspothome.PerformLayout() + Me.pnlpirateboat.ResumeLayout(False) + Me.pnlpirateboatmain.ResumeLayout(False) + Me.pnlpirateboatmain.PerformLayout() + Me.pnlpirateboatdownlaod.ResumeLayout(False) + Me.pnlpirateboatdownlaod.PerformLayout() + Me.pnlhome.ResumeLayout(False) + Me.pnlhomehome.ResumeLayout(False) + Me.pnlhomehome.PerformLayout() + CType(Me.pichomehomeicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlhomehistory.ResumeLayout(False) + Me.pnlmainsiteappscape.ResumeLayout(False) + Me.pnlappscapedeposit.ResumeLayout(False) + Me.pnlappscapedeposit.PerformLayout() + CType(Me.picappscapedepositeinfobitnotescreenshot, System.ComponentModel.ISupportInitialize).EndInit() + Me.Panel46.ResumeLayout(False) + Me.Panel47.ResumeLayout(False) + Me.appscapehomepage.ResumeLayout(False) + Me.Panel20.ResumeLayout(False) + Me.Panel17.ResumeLayout(False) + Me.Panel14.ResumeLayout(False) + Me.Panel11.ResumeLayout(False) + Me.Panel8.ResumeLayout(False) + Me.Panel5.ResumeLayout(False) + Me.Panel3.ResumeLayout(False) + Me.pnlappscapeoprcwrite.ResumeLayout(False) + Me.Panel16.ResumeLayout(False) + Me.Panel23.ResumeLayout(False) + Me.appscapewebbrowserinfopage.ResumeLayout(False) + Me.Panel19.ResumeLayout(False) + Me.Panel25.ResumeLayout(False) + Me.appscapevideoplayerinfopage.ResumeLayout(False) + Me.Panel9.ResumeLayout(False) + Me.Panel15.ResumeLayout(False) + Me.appscapecalculatorinfopage.ResumeLayout(False) + Me.Panel28.ResumeLayout(False) + Me.Panel35.ResumeLayout(False) + Me.appscapeaudioplayerinfopage.ResumeLayout(False) + Me.Panel6.ResumeLayout(False) + Me.Panel32.ResumeLayout(False) + Me.pnlmainsiteminimatch.ResumeLayout(False) + Me.pnlminimatchlabyrinth.ResumeLayout(False) + Me.pnlminimatchlabyrinth.PerformLayout() + Me.Panel10.ResumeLayout(False) + Me.Panel10.PerformLayout() + CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit() + Me.Panel12.ResumeLayout(False) + Me.Panel12.PerformLayout() + CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.PictureBox6, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlminimatchhomepage.ResumeLayout(False) + Me.pnlminimatchhomepage.PerformLayout() + Me.pnlminimatchcomingsoon2.ResumeLayout(False) + Me.pnlminimatchcomingsoon2.PerformLayout() + Me.pnlminimatchcomingsoon.ResumeLayout(False) + Me.pnlminimatchcomingsoon.PerformLayout() + Me.pnlminimatchdodgepreview.ResumeLayout(False) + Me.pnlminimatchdodgepreview.PerformLayout() + CType(Me.picbitnotesaccepted, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlminimatchdodgeinfopage.ResumeLayout(False) + Me.pnlminimatchdodgeinfopage.PerformLayout() + Me.pnlminimatchdodgepagebuy.ResumeLayout(False) + Me.pnlminimatchdodgepagebuy.PerformLayout() + CType(Me.picminimatchdodgepreview, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlminimatchdodgeinfodetails.ResumeLayout(False) + Me.pnlminimatchdodgeinfodetails.PerformLayout() + CType(Me.picminimatchbtnaccepted, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlshiftomizer.ResumeLayout(False) + Me.pnlshiftomizerhome.ResumeLayout(False) + Me.pnlshiftomizerhome.PerformLayout() + CType(Me.picshiftomizerhomeappslidernext, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picshiftomizerhomeappsliderback, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picshiftomizerhomeappsliderimg, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picshiftomizerhomeskinsliderright, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picshiftomizerhomeskinssliderleft, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picshiftomizerhomeskinsliderimage, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlshiftomizerpayments.ResumeLayout(False) + Me.pnlshiftomizerpayments.PerformLayout() + Me.pnlbitnotemainpage.ResumeLayout(False) + Me.pnlbitnotedigger.ResumeLayout(False) + Me.pnlbitnotedigger.PerformLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlbitnotediggerfooter.ResumeLayout(False) + Me.pnlbitnotediggerfooter.PerformLayout() + CType(Me.picbitnotediggertitlelogo, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlbitnotecurrencyexchange.ResumeLayout(False) + Me.pnlbitnotecurrencyexchange.PerformLayout() + Me.pnlbitnotecurrencyexchangefooter.ResumeLayout(False) + Me.pnlbitnotecurrencyexchangefooter.PerformLayout() + CType(Me.picbitnotecurrencyexchangetitle, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlbitnotebuywallet.ResumeLayout(False) + Me.pnlbitnotebuywallet.PerformLayout() + CType(Me.picbitnotewalletdownloadbtn, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.picbitnotewalletpagescreenshot, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlbitnotewalletfooter.ResumeLayout(False) + Me.pnlbitnotewalletfooter.PerformLayout() + CType(Me.picbitnotewalletpagelogo, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlbitnotehome.ResumeLayout(False) + Me.pnlbitnotehome.PerformLayout() + Me.pnlbitnotehomefooter.ResumeLayout(False) + Me.pnlbitnotehomefooter.PerformLayout() + CType(Me.picbitnotewebsitetitle, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlshifterhacker.ResumeLayout(False) + Me.pnlshifterhackerhome.ResumeLayout(False) + Me.pnlshifterhackerhome.PerformLayout() + Me.pnlutilsweb.ResumeLayout(False) + Me.pnlutilswebhome.ResumeLayout(False) + Me.pnlutilswebhome.PerformLayout() + Me.pnlutilswebbackuputility.ResumeLayout(False) + Me.pnlutilswebbackuputility.PerformLayout() + Me.pnlnotfound.ResumeLayout(False) + Me.pnlnotfoundsite.ResumeLayout(False) + Me.pnlnotfoundsite.PerformLayout() + Me.pnlshiftnet.ResumeLayout(False) + Me.pnlshiftnethome.ResumeLayout(False) + Me.pnlshiftnethome.PerformLayout() + Me.pnl404.ResumeLayout(False) + Me.pnl404home.ResumeLayout(False) + Me.pnl404home.PerformLayout() + Me.Panel1.ResumeLayout(False) + Me.Panel1.PerformLayout() + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents btnhome As System.Windows.Forms.Button + Friend WithEvents txtlocation As System.Windows.Forms.TextBox + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents pnlmainsiteappscape As System.Windows.Forms.Panel + Friend WithEvents appscapehomepage As System.Windows.Forms.Panel + Friend WithEvents Panel3 As System.Windows.Forms.Panel + Friend WithEvents Panel4 As System.Windows.Forms.Panel + Friend WithEvents Panel5 As System.Windows.Forms.Panel + Friend WithEvents btnaudioplayerinfo As System.Windows.Forms.Panel + Friend WithEvents Panel11 As System.Windows.Forms.Panel + Friend WithEvents btnbuywebbrowser As System.Windows.Forms.Panel + Friend WithEvents btnwebbrowserinfo As System.Windows.Forms.Panel + Friend WithEvents Panel8 As System.Windows.Forms.Panel + Friend WithEvents btnbuyvideoplayer As System.Windows.Forms.Panel + Friend WithEvents btnvideoplayerinfo As System.Windows.Forms.Panel + Friend WithEvents btnbuyaudioplayer As System.Windows.Forms.Panel + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Panel20 As System.Windows.Forms.Panel + Friend WithEvents btnbuymoresoftware2 As System.Windows.Forms.Panel + Friend WithEvents btnmoresoftware2info As System.Windows.Forms.Panel + Friend WithEvents Panel17 As System.Windows.Forms.Panel + Friend WithEvents btnbuyorcwrite As System.Windows.Forms.Panel + Friend WithEvents btnmoresoftware1info As System.Windows.Forms.Panel + Friend WithEvents Panel14 As System.Windows.Forms.Panel + Friend WithEvents btnbuycalculator As System.Windows.Forms.Panel + Friend WithEvents btncalculatorinfo As System.Windows.Forms.Panel + Friend WithEvents lbappscapehello As System.Windows.Forms.Label + Friend WithEvents btnappscapedeposit As System.Windows.Forms.Panel + Friend WithEvents tmrloadsite As System.Windows.Forms.Timer + Friend WithEvents appscapecalculatorinfopage As System.Windows.Forms.Panel + Friend WithEvents Panel28 As System.Windows.Forms.Panel + Friend WithEvents btncalculatorinfobuy As System.Windows.Forms.Panel + Friend WithEvents btncalculatorinfoback As System.Windows.Forms.Panel + Friend WithEvents Panel34 As System.Windows.Forms.Panel + Friend WithEvents Panel35 As System.Windows.Forms.Panel + Friend WithEvents lbappscapecalculatorinfohello As System.Windows.Forms.Label + Friend WithEvents appscapecalcinfodepositbtn As System.Windows.Forms.Panel + Friend WithEvents Label8 As System.Windows.Forms.Label + Friend WithEvents appscapewebbrowserinfopage As System.Windows.Forms.Panel + Friend WithEvents Panel19 As System.Windows.Forms.Panel + Friend WithEvents btnwebbrowserinfobuy As System.Windows.Forms.Panel + Friend WithEvents btnwebbrowserinfoback As System.Windows.Forms.Panel + Friend WithEvents Panel24 As System.Windows.Forms.Panel + Friend WithEvents Panel25 As System.Windows.Forms.Panel + Friend WithEvents lbappscapewebbroswerinfohello As System.Windows.Forms.Label + Friend WithEvents appscapewebbrowserinfodepositbtn As System.Windows.Forms.Panel + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents appscapevideoplayerinfopage As System.Windows.Forms.Panel + Friend WithEvents Panel9 As System.Windows.Forms.Panel + Friend WithEvents btnvideoplayerinfobuy As System.Windows.Forms.Panel + Friend WithEvents btnvideoplayerinfoback As System.Windows.Forms.Panel + Friend WithEvents Panel13 As System.Windows.Forms.Panel + Friend WithEvents Panel15 As System.Windows.Forms.Panel + Friend WithEvents lbappscapevideoplayerinfohello As System.Windows.Forms.Label + Friend WithEvents appscapevideoplayerinfodepositbtn As System.Windows.Forms.Panel + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents appscapeaudioplayerinfopage As System.Windows.Forms.Panel + Friend WithEvents Panel6 As System.Windows.Forms.Panel + Friend WithEvents btnaudioplayerinfobuy As System.Windows.Forms.Panel + Friend WithEvents btnaudioplayerinfoback As System.Windows.Forms.Panel + Friend WithEvents Panel31 As System.Windows.Forms.Panel + Friend WithEvents Panel32 As System.Windows.Forms.Panel + Friend WithEvents lbappscapeaudioplayerinfohello As System.Windows.Forms.Label + Friend WithEvents appscapeaudioplayerinfodepositbtn As System.Windows.Forms.Panel + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents pnlmainsiteminimatch As System.Windows.Forms.Panel + Friend WithEvents pnlminimatchhomepage As System.Windows.Forms.Panel + Friend WithEvents picbitnotesaccepted As System.Windows.Forms.PictureBox + Friend WithEvents lblminimatchcopyright As System.Windows.Forms.Label + Friend WithEvents pnlminimatchcomingsoon2 As System.Windows.Forms.Panel + Friend WithEvents pnlminimatchcomingsoonbuy2 As System.Windows.Forms.Label + Friend WithEvents pnlminimatchcomingsooninfo2 As System.Windows.Forms.Label + Friend WithEvents pnlminimatchcomingsoondescription2 As System.Windows.Forms.Label + Friend WithEvents pnlminimatchcomingsoontitle2 As System.Windows.Forms.Label + Friend WithEvents pnlminimatchcomingsoon As System.Windows.Forms.Panel + Friend WithEvents bntminimatchcomingsoonbuy As System.Windows.Forms.Label + Friend WithEvents bntminimatchcomingsooninfo As System.Windows.Forms.Label + Friend WithEvents lblminimatchcomingsoondescription As System.Windows.Forms.Label + Friend WithEvents lblminimatchcomingsoontitle As System.Windows.Forms.Label + Friend WithEvents pnlminimatchdodgepreview As System.Windows.Forms.Panel + Friend WithEvents bntminimatchdodgebuy As System.Windows.Forms.Label + Friend WithEvents bntminimatchdodgeinfo As System.Windows.Forms.Label + Friend WithEvents lblminimatchdodgedescription As System.Windows.Forms.Label + Friend WithEvents lblminimatchdodgetitle As System.Windows.Forms.Label + Friend WithEvents pnlminimatchdodgeinfopage As System.Windows.Forms.Panel + Friend WithEvents lblminimatchcopyrightdodgepage As System.Windows.Forms.Label + Friend WithEvents pnlminimatchdodgeinfodetails As System.Windows.Forms.Panel + Friend WithEvents lblminimatchaboutdetails As System.Windows.Forms.Label + Friend WithEvents lblminimatchdodgeabout As System.Windows.Forms.Label + Friend WithEvents picminimatchbtnaccepted As System.Windows.Forms.PictureBox + Friend WithEvents picminimatchdodgepreview As System.Windows.Forms.PictureBox + Friend WithEvents pnlminimatchdodgepagebuy As System.Windows.Forms.Panel + Friend WithEvents btnminimatchdodgepagebuy As System.Windows.Forms.Label + Friend WithEvents lblminimatchdodgehow2buydetails As System.Windows.Forms.Label + Friend WithEvents lblminimatchdodgehow2buy As System.Windows.Forms.Label + Friend WithEvents bntminimatchdodgepageback As System.Windows.Forms.Label + Friend WithEvents lblminimatchuserwelcome As System.Windows.Forms.Label + Friend WithEvents lblminimatchmainpagewelcome As System.Windows.Forms.Label + Friend WithEvents txtminimatchbitnoteaddress As System.Windows.Forms.TextBox + Friend WithEvents pnlappscapedeposit As System.Windows.Forms.Panel + Friend WithEvents Label9 As System.Windows.Forms.Label + Friend WithEvents Panel46 As System.Windows.Forms.Panel + Friend WithEvents Panel47 As System.Windows.Forms.Panel + Friend WithEvents lbappscapepayinfohello As System.Windows.Forms.Label + Friend WithEvents txtappscapedepositeaddress As System.Windows.Forms.TextBox + Friend WithEvents lblappscapecopyaddressinfo As System.Windows.Forms.Label + Friend WithEvents picappscapedepositeinfobitnotescreenshot As System.Windows.Forms.PictureBox + Friend WithEvents lblappscapedepositpasteinfo As System.Windows.Forms.Label + Friend WithEvents appscapedepositestep3 As System.Windows.Forms.Label + Friend WithEvents appscapedepositestep2 As System.Windows.Forms.Label + Friend WithEvents appscapedepositestep1 As System.Windows.Forms.Label + Friend WithEvents pnlbitnotemainpage As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotehome As System.Windows.Forms.Panel + Friend WithEvents picbitnotewebsitetitle As System.Windows.Forms.PictureBox + Friend WithEvents lblbitnotehowgettxt As System.Windows.Forms.Label + Friend WithEvents lblbitnotehowgettitle As System.Windows.Forms.Label + Friend WithEvents lblbitnoteabouttxt As System.Windows.Forms.Label + Friend WithEvents lblbitnoteabouttitle As System.Windows.Forms.Label + Friend WithEvents pnlbitnotesideright As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotesideleft As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotehomefooter As System.Windows.Forms.Panel + Friend WithEvents lblbitnotehomefootergettitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotehomedownloadlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotehomeaboutlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotehomecopyright As System.Windows.Forms.Label + Friend WithEvents lblbitnotehomefootergetlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotehomediggerlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotehomewalletlink As System.Windows.Forms.Label + Friend WithEvents pnlbitnotebuywallet As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotewalletfooter As System.Windows.Forms.Panel + Friend WithEvents lblbitnotewalletcopyrighttitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotewalletfootergetlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotewalletdiggerdownloadlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotewalletwalletdownloadlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotewalletpagegettitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotewalletpagedownloadstitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotewalletpageabouttitle As System.Windows.Forms.Label + Friend WithEvents pnlbitnotewalletpagerightside As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotewalletpageleftside As System.Windows.Forms.Panel + Friend WithEvents Label21 As System.Windows.Forms.Label + Friend WithEvents picbitnotewalletpagelogo As System.Windows.Forms.PictureBox + Friend WithEvents picbitnotewalletpagescreenshot As System.Windows.Forms.PictureBox + Friend WithEvents lblbitnotewalletdescription2 As System.Windows.Forms.Label + Friend WithEvents lblbitnotewalletdescription1 As System.Windows.Forms.Label + Friend WithEvents picbitnotewalletdownloadbtn As System.Windows.Forms.PictureBox + Friend WithEvents lblbitnotewalletpagefooterhomelink As System.Windows.Forms.Label + Friend WithEvents pnlhome As System.Windows.Forms.Panel + Friend WithEvents pnlhomehome As System.Windows.Forms.Panel + Friend WithEvents tbhomehomewelcome As System.Windows.Forms.Label + Friend WithEvents pnlnotfound As System.Windows.Forms.Panel + Friend WithEvents pnlnotfoundsite As System.Windows.Forms.Panel + Friend WithEvents tbnotfound As System.Windows.Forms.Label + Friend WithEvents lblbitnotehomehomebtn As System.Windows.Forms.Label + Friend WithEvents pnlbitnotedigger As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotediggerfooter As System.Windows.Forms.Panel + Friend WithEvents lblbitnotediggerfooterhomelink As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggerfootercopyright As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggerfootergetlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggerfooterdiggerlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggerfooterwalletlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggerfootergettitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggerfooterdownloadstitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggerfooterabouttitle As System.Windows.Forms.Label + Friend WithEvents pnlbitnotediggersideright As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotediggersideleft As System.Windows.Forms.Panel + Friend WithEvents lblbitnotediggerdescription As System.Windows.Forms.Label + Friend WithEvents lblbitnotediggertitle As System.Windows.Forms.Label + Friend WithEvents picbitnotediggertitlelogo As System.Windows.Forms.PictureBox + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents btnbitnotediggergrade5buy As System.Windows.Forms.Button + Friend WithEvents btnbitnotediggergrade4buy As System.Windows.Forms.Button + Friend WithEvents btnbitnotediggergrade3buy As System.Windows.Forms.Button + Friend WithEvents btnbitnotediggergrade2buy As System.Windows.Forms.Button + Friend WithEvents btnbitnotediggergrade1buy As System.Windows.Forms.Button + Friend WithEvents pnlutilsweb As System.Windows.Forms.Panel + Friend WithEvents pnlutilswebbackuputility As System.Windows.Forms.Panel + Friend WithEvents lbl_backuputility_soon As System.Windows.Forms.Label + Friend WithEvents pnl404 As System.Windows.Forms.Panel + Friend WithEvents pnl404home As System.Windows.Forms.Panel + Friend WithEvents tb404homenotfound As System.Windows.Forms.Label + Friend WithEvents tb404home404 As System.Windows.Forms.Label + Friend WithEvents pnlshiftnet As System.Windows.Forms.Panel + Friend WithEvents pnlshiftnethome As System.Windows.Forms.Panel + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents homenetsite As System.Windows.Forms.Label + Friend WithEvents homedefaultpage As System.Windows.Forms.Label + Friend WithEvents hometitle As System.Windows.Forms.Label + Friend WithEvents pnlpirateboat As System.Windows.Forms.Panel + Friend WithEvents pnlpirateboatmain As System.Windows.Forms.Panel + Friend WithEvents tbpbMSG As System.Windows.Forms.Label + Friend WithEvents tbdnlfloodgate As System.Windows.Forms.Label + Friend WithEvents tbPirateBoat As System.Windows.Forms.Label + Friend WithEvents lbldevdockingwarning As System.Windows.Forms.Label + Friend WithEvents pnlbitnotecurrencyexchange As System.Windows.Forms.Panel + Friend WithEvents btnbitnotecurrencyexchangebuy As System.Windows.Forms.Button + Friend WithEvents txtbitnotecurrencyexchangebitnoteamout As System.Windows.Forms.TextBox + Friend WithEvents lblbitnotecurrencyexchangeprice As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangebuytitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangetodaysrate As System.Windows.Forms.Label + Friend WithEvents pnlbitnotecurrencyexchangefooter As System.Windows.Forms.Panel + Friend WithEvents lblbitnotecurrencyexchangefooterhomelink As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangefootercopyright As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangefootergetlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangefooterdiggerlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangefooterwalletlink As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangefootergettitle As System.Windows.Forms.Label + Friend WithEvents bitnotecurrencyexchangefooterdownloadstitle As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangefooterabouttitle As System.Windows.Forms.Label + Friend WithEvents pnlbitnotecurrencyexchangerightside As System.Windows.Forms.Panel + Friend WithEvents pnlbitnotecurrencyexchangeleftside As System.Windows.Forms.Panel + Friend WithEvents lblbitnotecurrencyexchangedescription As System.Windows.Forms.Label + Friend WithEvents lblbitnotecurrencyexchangetitle As System.Windows.Forms.Label + Friend WithEvents picbitnotecurrencyexchangetitle As System.Windows.Forms.PictureBox + Friend WithEvents pichomehomeicon As System.Windows.Forms.PictureBox + Friend WithEvents lblhomehomedescription As System.Windows.Forms.Label + Friend WithEvents lblhomehomebitnotelink As System.Windows.Forms.Label + Friend WithEvents lblhomehomeminimatchlink As System.Windows.Forms.Label + Friend WithEvents lblhomehomeappscapelink As System.Windows.Forms.Label + Friend WithEvents lblhomehomebackuplink As System.Windows.Forms.Label + Friend WithEvents lblhomehomehistorylink As System.Windows.Forms.Label + Friend WithEvents pnlhomehistory As System.Windows.Forms.Panel + Friend WithEvents lbhomehistoryhistory As System.Windows.Forms.ListView + Friend WithEvents AllLinksMustHaveATooltipForTheirUrl As System.Windows.Forms.ToolTip + Friend WithEvents pnlutilswebhome As System.Windows.Forms.Panel + Friend WithEvents pnlutilswebvirusscan As System.Windows.Forms.Panel + Friend WithEvents Label12 As System.Windows.Forms.Label + Friend WithEvents utilswebhomewip As System.Windows.Forms.Label + Friend WithEvents utilswebvirusscanner As System.Windows.Forms.Label + Friend WithEvents utilswebbackuputil As System.Windows.Forms.Label + Friend WithEvents pnlshiftomizer As System.Windows.Forms.Panel + Friend WithEvents pnlshiftomizerhome As System.Windows.Forms.Panel + Friend WithEvents lblshiftomizerhomeskinsliderdownload As System.Windows.Forms.Label + Friend WithEvents picshiftomizerhomeappslidernext As System.Windows.Forms.PictureBox + Friend WithEvents picshiftomizerhomeappsliderback As System.Windows.Forms.PictureBox + Friend WithEvents lblshiftomizerhomeappdescription As System.Windows.Forms.Label + Friend WithEvents picshiftomizerhomeappsliderimg As System.Windows.Forms.PictureBox + Friend WithEvents lblshiftomizerhomeappname As System.Windows.Forms.Label + Friend WithEvents picshiftomizerhomeskinsliderright As System.Windows.Forms.PictureBox + Friend WithEvents picshiftomizerhomeskinssliderleft As System.Windows.Forms.PictureBox + Friend WithEvents lblshiftomizerhomeskinname As System.Windows.Forms.Label + Friend WithEvents lblshiftomizerhomeappdownload As System.Windows.Forms.Label + Friend WithEvents lblshiftomizerhomeskinsliderdescription As System.Windows.Forms.Label + Friend WithEvents picshiftomizerhomeskinsliderimage As System.Windows.Forms.PictureBox + Friend WithEvents lblshiftomizerhomedescription As System.Windows.Forms.Label + Friend WithEvents lblshiftomizerhometitle As System.Windows.Forms.Label + Friend WithEvents pnlshifterhacker As System.Windows.Forms.Panel + Friend WithEvents pnlshifterhackerhome As System.Windows.Forms.Panel + Friend WithEvents tbshifterhackerhomefloodgatead As System.Windows.Forms.Label + Friend WithEvents tbshifterhackerhomepostspotwatermark As System.Windows.Forms.Label + Friend WithEvents tbshifterhackerhomeh1 As System.Windows.Forms.Label + Friend WithEvents tbshifterhackerhomeblogpost1 As System.Windows.Forms.Label + Friend WithEvents TextBox1 As System.Windows.Forms.TextBox + Friend WithEvents tbshifterhackerhomefloodgatelink1 As System.Windows.Forms.Label + Friend WithEvents pnlpostspot As System.Windows.Forms.Panel + Friend WithEvents pnlpostspothome As System.Windows.Forms.Panel + Friend WithEvents tbpostspothomeshifterhackerlink As System.Windows.Forms.Label + Friend WithEvents tbpostspothomecontent As System.Windows.Forms.Label + Friend WithEvents tbpostspothomead As System.Windows.Forms.Label + Friend WithEvents tbpostspothomesubtext As System.Windows.Forms.Label + Friend WithEvents tbpostspothomepostspot As System.Windows.Forms.Label + Friend WithEvents pnlxenonh As System.Windows.Forms.Panel + Friend WithEvents pnlxenonhhome As System.Windows.Forms.Panel + Friend WithEvents Label15 As System.Windows.Forms.Label + Friend WithEvents Label14 As System.Windows.Forms.Label + Friend WithEvents Label19 As System.Windows.Forms.Label + Friend WithEvents Label18 As System.Windows.Forms.Label + Friend WithEvents Label17 As System.Windows.Forms.Label + Friend WithEvents Label16 As System.Windows.Forms.Label + Friend WithEvents tbpbWarning As System.Windows.Forms.Label + Friend WithEvents Label13 As System.Windows.Forms.Label + Friend WithEvents tbpbfglink1 As System.Windows.Forms.Label + Friend WithEvents tpbsearch As System.Windows.Forms.TextBox + Friend WithEvents Label22 As System.Windows.Forms.Label + Friend WithEvents TextBox2 As System.Windows.Forms.TextBox + + Friend WithEvents Label23 As System.Windows.Forms.Label + Friend WithEvents TextBox4 As System.Windows.Forms.TextBox + Friend WithEvents TextBox3 As System.Windows.Forms.TextBox + Friend WithEvents pnlshiftomizerpayments As System.Windows.Forms.Panel + Friend WithEvents lblshiftomizerpaymentorder As System.Windows.Forms.Label + Friend WithEvents lblshiftomizerpaymentstitle As System.Windows.Forms.Label + Friend WithEvents lblshiftomizerpaymentinstruct As System.Windows.Forms.Label + Friend WithEvents btnshiftomizerhomecheckout As System.Windows.Forms.Button + '<<<<< HEAD + Friend WithEvents pnlminimatchlabyrinth As System.Windows.Forms.Panel + Friend WithEvents Label20 As System.Windows.Forms.Label + Friend WithEvents Panel10 As System.Windows.Forms.Panel + Friend WithEvents txtminimatchlabrinthaddress As System.Windows.Forms.TextBox + Friend WithEvents lblminimatchinfopagebuy As System.Windows.Forms.Label + Friend WithEvents lblminimatchlabyrinthbuyinstuct As System.Windows.Forms.Label + Friend WithEvents Label26 As System.Windows.Forms.Label + Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox + Friend WithEvents Label27 As System.Windows.Forms.Label + Friend WithEvents Panel12 As System.Windows.Forms.Panel + Friend WithEvents Label28 As System.Windows.Forms.Label + Friend WithEvents Label29 As System.Windows.Forms.Label + Friend WithEvents Label30 As System.Windows.Forms.Label + Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox + '====== + Friend WithEvents tpbsearchresults As System.Windows.Forms.ListView + Friend WithEvents pnlpirateboatdownlaod As System.Windows.Forms.Panel + Friend WithEvents tpburlbox As System.Windows.Forms.TextBox + Friend WithEvents tpbfloodgate As System.Windows.Forms.Button + Friend WithEvents tpbbackbtn As System.Windows.Forms.Button + Friend WithEvents tmrshiftomizerwaitinglist As System.Windows.Forms.Timer + Friend WithEvents lblshiftomizerpaymentsback As System.Windows.Forms.Label + Friend WithEvents lblshiftomizerpaymentsclear As System.Windows.Forms.Label + Friend WithEvents PictureBox4 As System.Windows.Forms.PictureBox + Friend WithEvents PictureBox5 As System.Windows.Forms.PictureBox + Friend WithEvents PictureBox6 As System.Windows.Forms.PictureBox + Friend WithEvents pnlappscapeoprcwrite As System.Windows.Forms.Panel + Friend WithEvents Panel16 As System.Windows.Forms.Panel + Friend WithEvents btnappscapeorcwritebuy As System.Windows.Forms.Panel + Friend WithEvents btnappscapeorcwriteback As System.Windows.Forms.Panel + Friend WithEvents Panel22 As System.Windows.Forms.Panel + Friend WithEvents Panel23 As System.Windows.Forms.Panel + Friend WithEvents lblappscapeorcwritehellotext As System.Windows.Forms.Label + Friend WithEvents btnappscapeorcwritedeposit As System.Windows.Forms.Panel + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents btnappscapedepositeback As System.Windows.Forms.Panel + Friend WithEvents tbxenonhurl As System.Windows.Forms.Label + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents Label10 As System.Windows.Forms.Label + Friend WithEvents tbxenonhquickchat As System.Windows.Forms.Label + Friend WithEvents pnlquickchat As System.Windows.Forms.Panel + Friend WithEvents pnlquickchathome As System.Windows.Forms.Panel + Friend WithEvents pnlquickchatoffline As System.Windows.Forms.Panel + Friend WithEvents tbqchomebtn As System.Windows.Forms.Label + Friend WithEvents qcpanel As System.Windows.Forms.Panel + Friend WithEvents Label24 As System.Windows.Forms.Label + Friend WithEvents tbqcochat As System.Windows.Forms.TextBox + Friend WithEvents Panel7 As System.Windows.Forms.Panel + Friend WithEvents tbqctype As System.Windows.Forms.TextBox + Friend WithEvents qchome As System.Windows.Forms.Label + Friend WithEvents tbqcchat As System.Windows.Forms.TextBox + Friend WithEvents tbqcusers As System.Windows.Forms.ListView + Friend WithEvents qctext As System.Windows.Forms.Timer + '>>>>> ce0a6a37176ae3b3ae83961966eacc02ee9487c1 +End Class diff --git a/ShiftOS/Shiftnet.resx b/ShiftOS/Shiftnet.resx new file mode 100644 index 0000000..25394ce --- /dev/null +++ b/ShiftOS/Shiftnet.resx @@ -0,0 +1,209 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>130, 17</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>224, 17</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>308, 17</value> + </metadata> + <metadata name="AllLinksMustHaveATooltipForTheirUrl.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>421, 17</value> + </metadata> + <data name="lblhomehomedescription.Text" xml:space="preserve"> + <value>Shiftnet is a network hosted on the ShiftOS servers, it is only available to ShiftOS users, so you should feel privileged. The Shiftnet has some great websites, but you've probably already gone to explore them without reading this. If so, good luck, if not, here are some tips: + +All Shiftnet domains are as follow: + - They start with shiftnet, followed by a dot and the server they are hosted on, after this, another dot and the website name. The address then has a slash and the page name followed by a dot and 'rnp' + - The 'rnp' stands for remote network page + - shiftnet.main means the site is on the main ShiftOS servers and is guaranteed to be safe, anywhere else could be dangerous and give you a virus - be warned + +Here are a few website we recommend to get you started:</value> + </data> + <data name="lblminimatchlabyrinthbuyinstuct.Text" xml:space="preserve"> + <value>Dodge can be purchased using Bitnotes, to buy Dodge, simply send Bitnotes the minimatch website Bitnote address, puting your account in credit. You should see you balance in the top lefthand corner and below. + +Your current balance is: </value> + </data> + <data name="Label29.Text" xml:space="preserve"> + <value>Labyrinth is a maze escape game with a 100 second time limit. The aim of the game is to get through as many mazes as you can before the timer runs out. Earn 2 Code Point for each maze you pass! + + Requirements: + +- Download Manager +- Software Installer +- Gray</value> + </data> + <data name="lblminimatchdodgehow2buydetails.Text" xml:space="preserve"> + <value>Dodge can be purchased using Bitnotes, to buy Dodge, simply send Bitnotes the minimatch website Bitnote address, puting your account in credit. You should see you balance in the top lefthand corner and below. + +Your current balance is: </value> + </data> + <data name="lblminimatchaboutdetails.Text" xml:space="preserve"> + <value>Dodge in simple, quick and fun to earn a few extra codepoint! Basically, all you need to do is dodge the falling objects as for as long as you can. + + Requirements: + + - Download Manager + - Software Installer</value> + </data> + <data name="lblshiftomizerpaymentinstruct.Text" xml:space="preserve"> + <value>Please complete your payment by sending <total> Bitnotes to <bitnote address> + +We do not give change, overpayment will be counted as a tip towards the developers. + +Once we have recived <total> bitnotes and verified the senders ip as yours, a download link will appear on screen.</value> + </data> + <data name="lblbitnotediggerdescription.Text" xml:space="preserve"> + <value>Bitnote digging is the process of processing Bitnote payments, for each 'block' of transactions processed, the you will be awarded a certain amount of Bitnotes. Digging is one way to earn Bitnotes. The speed will depend the grade of digger you use. Prices for each grade of digger are listed below:</value> + </data> + <data name="lblbitnotecurrencyexchangedescription.Text" xml:space="preserve"> + <value>Haven't got a fast Digger? Better at earning Code Points than Bitnotes? Wish you could exchange them? You've come the right place. This currency exchange web page allows you to swap your Code Points for Bitnotes depending on the exchange rate of the day.</value> + </data> + <data name="lblbitnotewalletdescription1.Text" xml:space="preserve"> + <value>The Bitnote Wallet is an application designed to allow users to transfer Bitnotes with ease. +It automatically keeps a record of your balance and all your transactions, it allows you to quickly pay for a product or </value> + </data> + <data name="lblbitnotehowgettxt.Text" xml:space="preserve"> + <value>Bitnotes are managed through the Bitnote Wallet, this can be freely download from this site. +There are two ways to get Bitnotes into your wallet. The first is a currency exchange, allowing you to exchange Code Points for Bitnotes depending on the exchange rate of the day. This can be done on the exchange page of our website. +The other way to get Bitnotes is digging them the Bitnote Digger. This can be freely downloaded off our website, however, it is recommended that you upgrade it a faster digging speed. You can view prices and speeds on the digger download page.</value> + </data> + <data name="lblbitnoteabouttxt.Text" xml:space="preserve"> + <value>Bitnotes are a virtual currency used for worldwide transactions. It uses the latest shiftnet peer networking technologies to keep all payments secure, fast, anonymous and absolutely free. Bitnotes are the payment network of the future, the future starts here - download now!</value> + </data> + <metadata name="tmrloadsite.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> + <metadata name="AllLinksMustHaveATooltipForTheirUrl.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>421, 17</value> + </metadata> + <metadata name="tmrshiftomizerwaitinglist.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>676, 17</value> + </metadata> + <metadata name="qctext.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>862, 17</value> + </metadata> + <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> + <value>41</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Shiftnet.vb b/ShiftOS/Shiftnet.vb new file mode 100644 index 0000000..614e105 --- /dev/null +++ b/ShiftOS/Shiftnet.vb @@ -0,0 +1,1518 @@ +Public Class Shiftnet + + +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 500 'replace with minimum size + Public minimumsizeheight As Integer = 300 'replace with minimum size + Public loadsitenow As Boolean = False + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.ShiftNetCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + If IO.File.Exists(ShiftOSDesktop.ShiftOSPath & "SoftwareData\Shiftnet\History.lst") Then + Dim sr As New IO.StreamReader(ShiftOSDesktop.ShiftOSPath & "SoftwareData\Shiftnet\History.lst") + Dim lineCount As Integer = System.Text.RegularExpressions.Regex.Split(sr.ReadToEnd(), Environment.NewLine).Length + sr.Close() + Dim hist() As String = IO.File.ReadAllLines(ShiftOSDesktop.ShiftOSPath & "SoftwareData\Shiftnet\History.lst") + Try + For a As Integer = 0 To lineCount + lbhomehistoryhistory.Items.Add(hist(a)) + Next + Catch ex As Exception + End Try + End If + + loadsite("home:shiftnet") + 'ShiftOSDesktop.setcolours() + shiftomizerupdatesliders() + + ShiftOSDesktop.pnlpanelbuttonshiftnet.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftnet, ShiftOSDesktop.tbshiftneticon, ShiftOSDesktop.tbshiftnettext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(820, 600) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.shiftnetname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.shiftneticontitlebar 'Replace with the correct icon for the program. + End If + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + + Dim histsave(lbhomehistoryhistory.Items.Count) As String + Try + For a As Integer = 0 To (lbhomehistoryhistory.Items.Count) + histsave(a) = lbhomehistoryhistory.Items(a).Text + Next + Catch ex As Exception + End Try + If IO.Directory.Exists(ShiftOSDesktop.ShiftOSPath & "SoftwareData\Shiftnet\") Then IO.File.WriteAllLines(ShiftOSDesktop.ShiftOSPath & "SoftwareData\Shiftnet\History.lst", histsave) Else IO.Directory.CreateDirectory(ShiftOSDesktop.ShiftOSPath & "SoftwareData\Shiftnet\") : IO.File.WriteAllLines(ShiftOSDesktop.ShiftOSPath & "SoftwareData\Shiftnet\History.lst", histsave) + End Sub + + 'end of general setup +#End Region + + Private Sub txtlocation_KeyDown(sender As Object, e As KeyEventArgs) Handles txtlocation.KeyDown + If e.KeyCode = Keys.Enter Then + loadsitenow = True + End If + End Sub + + Private Sub hideallsites() + pnlmainsiteappscape.Hide() + appscapehomepage.Hide() + appscapeaudioplayerinfopage.Hide() + End Sub + + Private Sub opensite(ByVal mainsite As Panel, ByVal page As Panel, ByVal site As String) + hideallsites() + mainsite.Show() + mainsite.BringToFront() + mainsite.Dock = DockStyle.Fill + page.Show() + page.BringToFront() + page.Dock = DockStyle.Fill + txtlocation.Clear() + txtlocation.Text = site + addToHistory(mainsite, page, site) + End Sub + + Private Sub btnhome_Click(sender As Object, e As EventArgs) Handles btnhome.Click + hideallsites() + txtlocation.Text = "" + opensite(pnlhome, pnlhomehome, "home:shiftnet") + End Sub +#Region "Define Websites" + Public Sub loadsite(url As String) + + + + Me.Show() + Me.BringToFront() + + url = Replace$(url, vbCrLf, "") + url = url.ToLower + ShiftOSDesktop.logit("Shiftnet went to: " + url) + Select Case url + Case "shiftnet.main.appscape/home.rnp" + opensite(pnlmainsiteappscape, appscapehomepage, url) + setupappscapeaccountinfo() + Case "shiftnet.main.appscape/audioplayerinfo.rnp" + opensite(pnlmainsiteappscape, appscapeaudioplayerinfopage, url) + setupappscapeaccountinfo() + Case "shiftnet.main.appscape/videoplayerinfo.rnp" + opensite(pnlmainsiteappscape, appscapevideoplayerinfopage, url) + setupappscapeaccountinfo() + Case "shiftnet.main.appscape/calculatorinfo.rnp" + opensite(pnlmainsiteappscape, appscapecalculatorinfopage, url) + setupappscapeaccountinfo() + Case "shiftnet.main.appscape/webbrowserinfo.rnp" + opensite(pnlmainsiteappscape, appscapewebbrowserinfopage, url) + setupappscapeaccountinfo() + Case "shiftnet.main.appscape/deposit.rnp" + opensite(pnlmainsiteappscape, pnlappscapedeposit, url) + setupappscapeaccountinfo() + Case "shiftnet.main.appscape/orcwrite.rnp" + opensite(pnlmainsiteappscape, pnlappscapeoprcwrite, url) + setupappscapeaccountinfo() + Case "shiftnet.main.minimatch/home.rnp" + opensite(pnlmainsiteminimatch, pnlminimatchhomepage, url) + minimatchinfosetup() + Case "shiftnet.main.minimatch/dodge.rnp" + opensite(pnlmainsiteminimatch, pnlminimatchdodgeinfopage, url) + minimatchinfosetup() + 'opensite(pnl404, pnl404home, url) + Case "shiftnet.main.minimatch/labyrinth.rnp" + opensite(pnlmainsiteminimatch, pnlminimatchlabyrinth, "shiftnet.main.minimatch/labyrinth.rnp") + minimatchinfosetup() + Case "shiftnet.main.bitnote/home.rnp" + opensite(pnlbitnotemainpage, pnlbitnotehome, url) + Case "shiftnet.main.bitnote/wallet.rnp" + opensite(pnlbitnotemainpage, pnlbitnotebuywallet, url) + Case "shiftnet.main.bitnote/digger.rnp" + opensite(pnlbitnotemainpage, pnlbitnotedigger, url) + Case "shiftnet.main.bitnote/currencyexchange.rnp" + opensite(pnlbitnotemainpage, pnlbitnotecurrencyexchange, url) + updatecurrencyexchange() + Case "shiftnet.pirateboat" + loadsite("shiftnet.pirateboat/home.rnp") + Case "shiftnet.pirateboat/home.rnp" + FloodRegistry.registerItems() + opensite(pnlpirateboat, pnlpirateboatmain, url) + Case "shiftnet.main.floodnet/home.rnp" + opensite(pnlshiftnet, pnlshiftnethome, url) + Case "shiftnet.main.shiftnet/home.rnp" + opensite(pnlshiftnet, pnlshiftnethome, url) + Case "shiftnet.main.utilsweb/home.rnp" + opensite(pnlutilsweb, pnlutilswebhome, url) + Case "shiftnet.main.utilsweb/backuputility.rnp" + opensite(pnlutilsweb, pnlutilswebbackuputility, url) + Case "shiftnet.main.utilsweb/virusutil.rnp" + opensite(pnlutilsweb, pnlutilswebvirusscan, url) + Case "shiftnet.main.shiftomizer/home.rnp" + opensite(pnlshiftomizer, pnlshiftomizerhome, url) + lblshiftomizerpaymentsclear_Click() + Case "shiftnet.main.shiftomizer/payment.rnp" + opensite(pnlshiftomizer, pnlshiftomizerpayments, url) + lblshiftomizerpaymentsclear_Click() + Case "shiftnet.shifterhacker/home.rnp" + opensite(pnlshifterhacker, pnlshifterhackerhome, url) + Case "shiftnet.main.postspot/home.rnp" + opensite(pnlpostspot, pnlpostspothome, url) + Case "shiftnet.main.xenonh/home.rnp" + opensite(pnlxenonh, pnlxenonhhome, url) + Case "shiftnet.quickchat/home.rnp" + opensite(pnlquickchat, pnlquickchathome, url) + qcmain() + Case "shiftnet.quickchat/user/xenonh.rnp" + opensite(pnlquickchat, pnlquickchatoffline, url) + Case "home:shiftnet" + opensite(pnlhome, pnlhomehome, "home:shiftnet") + Case "history:shiftnet" + opensite(pnlhome, pnlhomehistory, "history:shiftnet") + Case "download:shiftnet.main.floodgate/install.stp" + infobox.showinfo("Shiftnet - Allow Download", "Would you like to download the file 'Floodgate.stp' from shiftnet.pirateboat/filetrans.dwnld?file=floodgate") + infobox.showyesno() + infobox.sendyesno = "shiftnetfloodgate" + Case Else + If (url.Contains("/")) And url.StartsWith("shiftnet.main.utilsweb") Or url.StartsWith("shiftnet.pirateboat") Or url.StartsWith("shiftnet.main.floodnet") Or (url.StartsWith("shiftnet.main.appscape") Or url.StartsWith("shiftnet.main.minimatch") Or url.StartsWith("shiftnet.main.bitnote") Or url.StartsWith("shiftnet.floodnet") Or url.StartsWith("shiftnet.main.shiftnet")) Then + opensite(pnl404, pnl404home, url) + Try + tb404homenotfound.Text = "The requested page /" & url.Split("/")(1) & " can not be found on our server. Make sure you typed it correctly" + Catch ex As Exception + tb404homenotfound.Text = "The requested page / can not be found on our server. Make sure you typed it correctly" + End Try + Else + opensite(pnlnotfound, pnlnotfoundsite, url) + Try + tbnotfound.Text = "Shiftnet can not find the web server at " & url.Split("/")(0) + Catch ex As Exception + tbnotfound.Text = "Shiftnet can not find the web server at " & url + End Try + End If + End Select + End Sub +#End Region + + Private Sub tmrloadsite_Tick(sender As Object, e As EventArgs) Handles tmrloadsite.Tick + If loadsitenow = True Then + loadsite(txtlocation.Text) + loadsitenow = False + btnhome.Focus() + End If + End Sub + +#Region "Appscape Functions" + 'Appscape Website functions + + Public Sub setupappscapeaccountinfo() + lbappscapehello.Text = "Hello " & ShiftOSDesktop.username & " - Your Account Contains " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalanceappscape, 5), 5) & " BTN" + lbappscapeaudioplayerinfohello.Text = "Hello " & ShiftOSDesktop.username & " - Your Account Contains " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalanceappscape, 5), 5) & " BTN" + lbappscapecalculatorinfohello.Text = "Hello " & ShiftOSDesktop.username & " - Your Account Contains " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalanceappscape, 5), 5) & " BTN" + lbappscapevideoplayerinfohello.Text = "Hello " & ShiftOSDesktop.username & " - Your Account Contains " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalanceappscape, 5), 5) & " BTN" + lbappscapepayinfohello.Text = "Hello " & ShiftOSDesktop.username & " - Your Account Contains " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalanceappscape, 5), 5) & " BTN" + lbappscapewebbroswerinfohello.Text = "Hello " & ShiftOSDesktop.username & " - Your Account Contains " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalanceappscape, 5), 5) & " BTN" + lblappscapeorcwritehellotext.Text = "Hello " & ShiftOSDesktop.username & " - Your Account Contains " & FormatNumber(Math.Round(ShiftOSDesktop.bitnotebalanceappscape, 5), 5) & " BTN" + txtappscapedepositeaddress.Text = ShiftOSDesktop.bitnoteaddressappscape + End Sub + + Private Sub btnaudioplayerinfo_MouseEnter(sender As Object, e As EventArgs) Handles btnaudioplayerinfo.MouseEnter + btnaudioplayerinfo.BackgroundImage = My.Resources.appscapeinfobuttonpressed + End Sub + + Private Sub btnaudioplayerinfo_MouseLeave(sender As Object, e As EventArgs) Handles btnaudioplayerinfo.MouseLeave + btnaudioplayerinfo.BackgroundImage = My.Resources.appscapeinfobutton + End Sub + + Private Sub btnvideolayerinfo_MouseEnter(sender As Object, e As EventArgs) Handles btnvideoplayerinfo.MouseEnter + btnvideoplayerinfo.BackgroundImage = My.Resources.appscapeinfobuttonpressed + End Sub + + Private Sub btnvideoplayerinfo_MouseLeave(sender As Object, e As EventArgs) Handles btnvideoplayerinfo.MouseLeave + btnvideoplayerinfo.BackgroundImage = My.Resources.appscapeinfobutton + End Sub + + Private Sub btnwebbrowserinfo_MouseEnter(sender As Object, e As EventArgs) Handles btnwebbrowserinfo.MouseEnter + btnwebbrowserinfo.BackgroundImage = My.Resources.appscapeinfobuttonpressed + End Sub + + Private Sub btnwebbrowserinfo_MouseLeave(sender As Object, e As EventArgs) Handles btnwebbrowserinfo.MouseLeave + btnwebbrowserinfo.BackgroundImage = My.Resources.appscapeinfobutton + End Sub + + Private Sub btncalculatorinfo_MouseEnter(sender As Object, e As EventArgs) Handles btncalculatorinfo.MouseEnter + btncalculatorinfo.BackgroundImage = My.Resources.appscapeinfobuttonpressed + End Sub + + Private Sub btncalculatorinfo_MouseLeave(sender As Object, e As EventArgs) Handles btncalculatorinfo.MouseLeave + btncalculatorinfo.BackgroundImage = My.Resources.appscapeinfobutton + End Sub + + Private Sub btnmoresoftware1info_MouseEnter(sender As Object, e As EventArgs) Handles btnmoresoftware1info.MouseEnter + btnmoresoftware1info.BackgroundImage = My.Resources.appscapeinfobuttonpressed + End Sub + + Private Sub btnmoresoftware1info_MouseLeave(sender As Object, e As EventArgs) Handles btnmoresoftware1info.MouseLeave + btnmoresoftware1info.BackgroundImage = My.Resources.appscapeinfobutton + End Sub + + Private Sub btnmoresoftware2info_MouseEnter(sender As Object, e As EventArgs) Handles btnmoresoftware2info.MouseEnter + btnmoresoftware2info.BackgroundImage = My.Resources.appscapeinfobuttonpressed + End Sub + + Private Sub btnmoresoftware2info_MouseLeave(sender As Object, e As EventArgs) Handles btnmoresoftware2info.MouseLeave + btnmoresoftware2info.BackgroundImage = My.Resources.appscapeinfobutton + End Sub + + Private Sub btnbuyaudioplayer_MouseEnter(sender As Object, e As EventArgs) Handles btnbuyaudioplayer.MouseEnter + btnbuyaudioplayer.BackgroundImage = My.Resources.appscapeaudioplayerpricepressed + End Sub + + Private Sub btnbuyaudioplayer_MouseLeave(sender As Object, e As EventArgs) Handles btnbuyaudioplayer.MouseLeave + btnbuyaudioplayer.BackgroundImage = My.Resources.appscapeaudioplayerprice + End Sub + + Private Sub btnbuyvideoplayer_MouseEnter(sender As Object, e As EventArgs) Handles btnbuyvideoplayer.MouseEnter + btnbuyvideoplayer.BackgroundImage = My.Resources.appscapevideoplayerpricepressed + End Sub + + Private Sub btnbuyvideoplayer_MouseLeave(sender As Object, e As EventArgs) Handles btnbuyvideoplayer.MouseLeave + btnbuyvideoplayer.BackgroundImage = My.Resources.appscapevideoplayerprice + End Sub + + Private Sub btnbuywebbrowser_MouseEnter(sender As Object, e As EventArgs) Handles btnbuywebbrowser.MouseEnter + btnbuywebbrowser.BackgroundImage = My.Resources.appscapewebbrowserpricepressed + End Sub + + Private Sub btnbuywebbrowser_MouseLeave(sender As Object, e As EventArgs) Handles btnbuywebbrowser.MouseLeave + btnbuywebbrowser.BackgroundImage = My.Resources.appscapewebbrowserprice + End Sub + + Private Sub btnbuycalculator_MouseEnter(sender As Object, e As EventArgs) Handles btnbuycalculator.MouseEnter + btnbuycalculator.BackgroundImage = My.Resources.appscapecalculatorpricepressed + End Sub + + Private Sub btnbuycalculator_MouseLeave(sender As Object, e As EventArgs) Handles btnbuycalculator.MouseLeave + btnbuycalculator.BackgroundImage = My.Resources.appscapecalculatorprice + End Sub + + Private Sub btnbuymoresoftware1_MouseEnter(sender As Object, e As EventArgs) Handles btnbuyorcwrite.MouseEnter + btnbuyorcwrite.BackgroundImage = My.Resources.appscapevideoplayerpricepressed + End Sub + + Private Sub btnbuymoresoftware1_MouseLeave(sender As Object, e As EventArgs) Handles btnbuyorcwrite.MouseLeave + btnbuyorcwrite.BackgroundImage = My.Resources.appscapevideoplayerprice + End Sub + + Private Sub btnbuymoresoftware2_MouseEnter(sender As Object, e As EventArgs) Handles btnbuymoresoftware2.MouseEnter + btnbuymoresoftware2.BackgroundImage = My.Resources.appscapeundefinedpricepressed + End Sub + + Private Sub btnbuymoresoftware2_MouseLeave(sender As Object, e As EventArgs) Handles btnbuymoresoftware2.MouseLeave + btnbuymoresoftware2.BackgroundImage = My.Resources.appscapeundefinedprice + End Sub + + Private Sub btnaudioplayerinfoback_Click(sender As Object, e As EventArgs) Handles btnaudioplayerinfoback.Click + loadsite("shiftnet.main.appscape/home.rnp") + End Sub + + Private Sub btnaudioplayerinfo_Click(sender As Object, e As EventArgs) Handles btnaudioplayerinfo.Click + loadsite("shiftnet.main.appscape/audioplayerinfo.rnp") + End Sub + + Private Sub btnvideoplayerinfoback_Click(sender As Object, e As EventArgs) Handles btnvideoplayerinfoback.Click + loadsite("shiftnet.main.appscape/home.rnp") + End Sub + + Private Sub btnvideoplayerinfo_Click(sender As Object, e As EventArgs) Handles btnvideoplayerinfo.Click + loadsite("shiftnet.main.appscape/videoplayerinfo.rnp") + End Sub + + Private Sub btncalculatorinfoback_Click(sender As Object, e As EventArgs) Handles btncalculatorinfoback.Click + loadsite("shiftnet.main.appscape/home.rnp") + End Sub + + Private Sub btncalculatorinfo_Click(sender As Object, e As EventArgs) Handles btncalculatorinfo.Click + loadsite("shiftnet.main.appscape/calculatorinfo.rnp") + End Sub + + Private Sub btnwebbrowserinfoback_Click(sender As Object, e As EventArgs) Handles btnwebbrowserinfoback.Click + loadsite("shiftnet.main.appscape/home.rnp") + End Sub + + Private Sub btnwebbrowserinfo_Click(sender As Object, e As EventArgs) Handles btnwebbrowserinfo.Click + loadsite("shiftnet.main.appscape/webbrowserinfo.rnp") + End Sub + + Private Sub btnappscapedeposit_Click(sender As Object, e As EventArgs) Handles btnappscapedeposit.Click + loadsite("shiftnet.main.appscape/deposit.rnp") + End Sub + + Private Sub homepageorcwritebuyclicked() Handles btnbuyorcwrite.Click + appscapebuy("orcwrite", 2.5, ShiftOSDesktop.boughtorcwrite) + End Sub + + Private Sub btnappscapeorcwritedeposit_Paint(sender As Object, e As EventArgs) Handles btnappscapeorcwritedeposit.Click + loadsite("shiftnet.main.appscape/deposit.rnp") + End Sub + + Private Sub Panel21_Paint(sender As Object, e As EventArgs) Handles btnappscapeorcwriteback.Click + loadsite("shiftnet.main.appscape/home.rnp") + End Sub + + Private Sub Panel18_Paint(sender As Object, e As EventArgs) Handles btnappscapeorcwritebuy.Click + appscapebuy("orcwrite", 2.5, ShiftOSDesktop.boughtorcwrite) + End Sub + + Private Sub btnmoresoftware1info_Paint(sender As Object, e As EventArgs) Handles btnmoresoftware1info.Click + loadsite("shiftnet.main.appscape/orcwrite.rnp") + End Sub + + Private Sub appscapebuy(ByVal item As String, ByVal price As Decimal, ByVal bought As Boolean) + If bought = False Then + If price <= ShiftOSDesktop.bitnotebalanceappscape Then + Select Case item + Case "webbrowser" + ShiftOSDesktop.boughtwebbrowser = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Thanks you shopping with Appscape, " & price & " has been subtracted from your account." & Environment.NewLine & Environment.NewLine & "Would you like to download WebBrowser.stp using the Download Manager?" + infobox.sendyesno = "shiftnetwebbrowser" + infobox.showyesno() + infobox.Show() + Case "audioplayer" + ShiftOSDesktop.boughtaudioplayer = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Thanks you shopping with Appscape, " & price & " has been subtracted from your account." & Environment.NewLine & Environment.NewLine & "Would you like to download AudioPlayer.stp using the Download Manager?" + infobox.sendyesno = "shiftnetaudioplayer" + infobox.showyesno() + infobox.Show() + Case "videoplayer" + ShiftOSDesktop.boughtvideoplayer = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Thanks you shopping with Appscape, " & price & " has been subtracted from your account." & Environment.NewLine & Environment.NewLine & "Would you like to download VideoPlayer.stp using the Download Manager?" + infobox.sendyesno = "shiftnetvideoplayer" + infobox.showyesno() + infobox.Show() + Case "calculator" + ShiftOSDesktop.boughtcalculator = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Thanks you shopping with Appscape, " & price & " has been subtracted from your account." & Environment.NewLine & Environment.NewLine & "Would you like to download Calculator.stp using the Download Manager?" + infobox.sendyesno = "shiftnetcalculator" + infobox.showyesno() + infobox.Show() + Case "orcwrite" + ShiftOSDesktop.boughtorcwrite = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Thanks you shopping with Appscape, " & price & " has been subtracted from your account." & Environment.NewLine & Environment.NewLine & "Would you like to download OrcWrite.stp using the Download Manager?" + infobox.sendyesno = "shiftnetorcwrite" + infobox.showyesno() + infobox.Show() + End Select + ShiftOSDesktop.bitnotebalanceappscape = ShiftOSDesktop.bitnotebalanceappscape - price + Else + infobox.title = "Shiftnet - Message from webpage:" + infobox.textinfo = "Error, insuficent funds. Please send more bitnotes to " & ShiftOSDesktop.bitnoteaddressappscape + infobox.Show() + End If + Else + Select Case item + Case "webbrowser" + ShiftOSDesktop.boughtwebbrowser = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "You all ready own this app!" & Environment.NewLine & Environment.NewLine & "Would you like to download the stp package now?" + infobox.sendyesno = "shiftnetwebbrowser" + infobox.showyesno() + infobox.Show() + Case "audioplayer" + ShiftOSDesktop.boughtaudioplayer = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "You all ready own this app!" & Environment.NewLine & Environment.NewLine & "Would you like to download the stp package now?" + infobox.sendyesno = "shiftnetaudioplayer" + infobox.showyesno() + infobox.Show() + Case "videoplayer" + ShiftOSDesktop.boughtvideoplayer = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "You all ready own this app!" & Environment.NewLine & Environment.NewLine & "Would you like to download the stp package now?" + infobox.sendyesno = "shiftnetvideoplayer" + infobox.showyesno() + infobox.Show() + Case "calculator" + ShiftOSDesktop.boughtcalculator = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "You all ready own this app!" & Environment.NewLine & Environment.NewLine & "Would you like to download the stp package now?" + infobox.sendyesno = "shiftnetcalculator" + infobox.showyesno() + infobox.Show() + Case "orcwrite" + ShiftOSDesktop.boughtorcwrite = True + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "You all ready own this app!" & Environment.NewLine & Environment.NewLine & "Would you like to download the stp package now?" + infobox.sendyesno = "shiftnetorcwrite" + infobox.showyesno() + infobox.Show() + End Select + End If + End Sub + + Private Sub btnbuyaudioplayer_Click(sender As Object, e As EventArgs) Handles btnbuyaudioplayer.Click + appscapebuy("audioplayer", 1, ShiftOSDesktop.boughtaudioplayer) + End Sub + + Private Sub btnbuywebbrowser_Click(sender As Object, e As EventArgs) Handles btnbuywebbrowser.Click + appscapebuy("webbrowser", 5, ShiftOSDesktop.boughtwebbrowser) + End Sub + + Private Sub btnbuyvideoplayer_Click(sender As Object, e As EventArgs) Handles btnbuyvideoplayer.Click + appscapebuy("videoplayer", 2.5, ShiftOSDesktop.boughtvideoplayer) + End Sub + + Private Sub btnbuycalculator_Click(sender As Object, e As EventArgs) Handles btnbuycalculator.Click + appscapebuy("calculator", 0.2, ShiftOSDesktop.boughtcalculator) + End Sub + + Private Sub btnaudioplayerinfobuy_Click(sender As Object, e As EventArgs) Handles btnaudioplayerinfobuy.Click + appscapebuy("audioplayer", 1, ShiftOSDesktop.boughtaudioplayer) + End Sub + + Private Sub btnwebbrowserinfobuy_Click(sender As Object, e As EventArgs) Handles btnwebbrowserinfobuy.Click + appscapebuy("webbrowser", 5, ShiftOSDesktop.boughtwebbrowser) + End Sub + + Private Sub btnvideoplayerinfobuy_Click(sender As Object, e As EventArgs) Handles btnvideoplayerinfobuy.Click + appscapebuy("videoplayer", 2.5, ShiftOSDesktop.boughtvideoplayer) + End Sub + + Private Sub btncalculatorinfobuy_Click(sender As Object, e As EventArgs) Handles btncalculatorinfobuy.Click + appscapebuy("calculator", 0.2, ShiftOSDesktop.boughtcalculator) + End Sub + + Private Sub btnappscapedepositeback_Click(sender As Object, e As EventArgs) Handles btnappscapedepositeback.Click + loadsite("shiftnet.main.appscape/home.rnp") + End Sub + + Private Sub appscapeaudioplayerinfodepositbtn_Click(sender As Object, e As EventArgs) Handles appscapeaudioplayerinfodepositbtn.Click + loadsite("shiftnet.main.appscape/deposit.rnp") + End Sub + + Private Sub appscapevideoplayerinfodepositbtn_Click(sender As Object, e As EventArgs) Handles appscapevideoplayerinfodepositbtn.Click + loadsite("shiftnet.main.appscape/deposit.rnp") + End Sub + + Private Sub appscapewebbrowserinfodepositbtn_Click(sender As Object, e As EventArgs) Handles appscapewebbrowserinfodepositbtn.Click + loadsite("shiftnet.main.appscape/deposit.rnp") + End Sub + + Private Sub appscapecalcinfodepositbtn_Click(sender As Object, e As EventArgs) Handles appscapecalcinfodepositbtn.Click + loadsite("shiftnet.main.appscape/deposit.rnp") + End Sub +#End Region + +#Region "Minimatch Functions" + + 'Minimatch variables + Public minimatchbitnoteaddress As String = "PU4GisNT30UkOQBOkqcyWUhoW" + Public minimatchdodgeprice As Decimal = 1.59 + Dim tpbitems As String() + Dim tpburls As String() + Dim minimatchitem As String + + + 'Minimatch functions + + Private Sub minimatchinfosetup() + lblminimatchuserwelcome.Text = "Welcome " & ShiftOSDesktop.username & vbCrLf & vbCrLf & "Your balance is: " & Math.Round(ShiftOSDesktop.bitnotebalanceminimatch, 2) & " BTN" + Label20.Text = "Welcome " & ShiftOSDesktop.username & vbCrLf & vbCrLf & "Your balance is: " & Math.Round(ShiftOSDesktop.bitnotebalanceminimatch, 2) & " BTN" + lblminimatchdodgehow2buydetails.Text = "Dodge can be purchased using Bitnotes, to buy Dodge, simply send Bitnotes the minimatch website Bitnote address, puting your account in credit. You should see you balance in the top left hand corner and below." & vbCrLf & vbCrLf & "Your current balance is: " & ShiftOSDesktop.bitnotebalanceminimatch & vbCrLf & vbCrLf & vbCrLf & vbCrLf & "Below is the Minimatch bitnote address, to send bitnote to your account, simply copy and paste it to your bitnote wallet." + txtminimatchbitnoteaddress.Text = minimatchbitnoteaddress + lblminimatchmainpagewelcome.Text = "Welcome " & ShiftOSDesktop.username & vbCrLf & vbCrLf & "Your balance is: " & Math.Round(ShiftOSDesktop.bitnotebalanceminimatch, 2) & " BTN" + btnminimatchdodgepagebuy.Text = minimatchdodgeprice & " BTN" + bntminimatchdodgebuy.Text = minimatchdodgeprice & " BTN" + lblminimatchlabyrinthbuyinstuct.Text = "Labyrinth can be purchased using Bitnotes, to buy Labyrinth, simply send Bitnotes the minimatch website Bitnote address, puting your account in credit. You should see you balance in the top left hand corner and below." & vbCrLf & vbCrLf & "Your current balance is: " & ShiftOSDesktop.bitnotebalanceminimatch & vbCrLf & vbCrLf & vbCrLf & vbCrLf & "Below is the Minimatch bitnote address, to send bitnote to your account, simply copy and paste it to your bitnote wallet." + txtminimatchlabrinthaddress.Text = minimatchbitnoteaddress + If ShiftOSDesktop.boughtdodge = True Then + bntminimatchdodgebuy.Text = "Already Bought" + btnminimatchdodgepagebuy.Text = "Already Bought" + End If + If ShiftOSDesktop.boughtmaze = True Then + lblminimatchinfopagebuy.Text = "Already Bought" + bntminimatchcomingsoonbuy.Text = "Already Bought" + End If + End Sub + + Private Sub minimatchbuy(ByVal item As String, ByVal price As Decimal, ByVal paid As Boolean) + If price <= ShiftOSDesktop.bitnotebalanceminimatch Or paid = True Then + Select Case item + Case "dodge" + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Would you like to download Dodge.stp using the Download Manager?" + infobox.sendyesno = "shiftnetdodge" + infobox.showyesno() + infobox.Show() + Case "labyrinth" + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Would you like to download Labyrinth.stp using the Download Manager?" + infobox.sendyesno = "shiftnetmaze" + infobox.showyesno() + infobox.Show() + End Select + If paid = False Then + ShiftOSDesktop.bitnotebalanceminimatch = ShiftOSDesktop.bitnotebalanceminimatch - price + End If + Else + infobox.title = "Shiftnet - Message from webpage:" + infobox.textinfo = "Error, insufficient funds. Please send more bitnotes to " & minimatchbitnoteaddress + infobox.Show() + End If + End Sub + + Private Sub bntminimatchdodgeinfo_Click(sender As Object, e As EventArgs) Handles bntminimatchdodgeinfo.Click + opensite(pnlmainsiteminimatch, pnlminimatchdodgeinfopage, "shiftnet.main.minimatch/dodge.rnp") 'opens site(panel) + End Sub + + Private Sub bntminimatchdodgepageback_Click(sender As Object, e As EventArgs) Handles bntminimatchdodgepageback.Click + opensite(pnlmainsiteminimatch, pnlminimatchhomepage, "shiftnet.main.minimatch/home.rnp") + End Sub + + Private Sub bntminimatchdodgepagebuy_Click(sender As Object, e As EventArgs) Handles btnminimatchdodgepagebuy.Click + minimatchitem = "dodge" + minimatchbuy(minimatchitem, minimatchdodgeprice, ShiftOSDesktop.boughtdodge) + End Sub + + Private Sub bntminimatchdodgebuy_Click(sender As Object, e As EventArgs) Handles bntminimatchdodgebuy.Click + minimatchitem = "dodge" + minimatchbuy(minimatchitem, minimatchdodgeprice, ShiftOSDesktop.boughtdodge) + End Sub + + Private Sub bntminimatchcomingsoonbuy_Click(sender As Object, e As EventArgs) Handles bntminimatchcomingsoonbuy.Click + minimatchitem = "labyrinth" + minimatchbuy(minimatchitem, 1, ShiftOSDesktop.boughtmaze) + End Sub + Private Sub Label28_Click(sender As Object, e As EventArgs) Handles Label28.Click + opensite(pnlmainsiteminimatch, pnlminimatchhomepage, "shiftnet.main.minimatch/home.rnp") + End Sub + Private Sub bntminimatchcomingsooninfo_Click(sender As Object, e As EventArgs) Handles bntminimatchcomingsooninfo.Click + opensite(pnlmainsiteminimatch, pnlminimatchlabyrinth, "shiftnet.main.minimatch/labyrinth.rnp") + End Sub + + Private Sub lblminimatchinfopagebuy_Click(sender As Object, e As EventArgs) Handles lblminimatchinfopagebuy.Click + minimatchitem = "labyrinth" + minimatchbuy(minimatchitem, 1, ShiftOSDesktop.boughtmaze) + End Sub +#End Region + +#Region "Bitnote Functions" + 'Bitnote website functions + + Dim bitnoteexchangerate As Integer = (17 + (Math.Ceiling(Rnd() * 6))) + + Public Sub bitnotebuy(ByVal item As String, ByVal price As Decimal, ByVal paid As Boolean) + If price <= ShiftOSDesktop.bitnotebalanceminimatch Or paid = True Then + Select Case item + Case "wallet" + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Would you like to download BitnoteWallet.stp using the Download Manager?" + infobox.sendyesno = "shiftnetwallet" + infobox.showyesno() + infobox.Show() + Case "digger" + infobox.title = "Shiftnet - Allow Download?" + infobox.textinfo = "Would you like to download BitnoteDigger.stp using the Download Manager?" + infobox.sendyesno = "shiftnetdigger" + infobox.showyesno() + infobox.Show() + End Select + If paid = False Then + ShiftOSDesktop.bitnotebalanceminimatch = ShiftOSDesktop.bitnotebalanceminimatch - price + End If + Else + infobox.title = "Shiftnet - Message from webpage:" + infobox.textinfo = "Error, insufficient funds." + infobox.Show() + End If + End Sub + + Private Sub updatecurrencyexchange() + lblbitnotecurrencyexchangetodaysrate.Text = "Exchange rate for " & Date.Today & " - 1 BTN : " & bitnoteexchangerate & " CP" + lblbitnotecurrencyexchangeprice.Text = "BTN for " & (txtbitnotecurrencyexchangebitnoteamout.Text * bitnoteexchangerate) & " CP" + End Sub + + Private Sub txtbitnotecurrencyexchangebitnoteamout_TextChanged(sender As Object, e As EventArgs) Handles txtbitnotecurrencyexchangebitnoteamout.TextChanged + If IsNumeric(txtbitnotecurrencyexchangebitnoteamout.Text) Then + lblbitnotecurrencyexchangeprice.Text = "BTN for " & (txtbitnotecurrencyexchangebitnoteamout.Text * bitnoteexchangerate) & " CP" + Else + txtbitnotecurrencyexchangebitnoteamout.Text = 1 + End If + End Sub + + Private Sub btnbitnotecurrencyexchangebuy_Click(sender As Object, e As EventArgs) Handles btnbitnotecurrencyexchangebuy.Click + If ShiftOSDesktop.codepoints >= (txtbitnotecurrencyexchangebitnoteamout.Text * bitnoteexchangerate) Then + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints - (txtbitnotecurrencyexchangebitnoteamout.Text * bitnoteexchangerate) + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance + txtbitnotecurrencyexchangebitnoteamout.Text + Bitnote_Wallet.logtransaction(txtbitnotecurrencyexchangebitnoteamout.Text, " Credit From ", "Bitnote Currency Exchnage") + Bitnote_Wallet.setupbitnotestats() + infobox.showinfo("Message from website:", "Your purchase has been successful!" & Environment.NewLine & Environment.NewLine & "You updated Bitnote balance is " & ShiftOSDesktop.bitnotebalance & " BTN. You have " & ShiftOSDesktop.codepoints & " CP remaining.") + Else + infobox.title = "Insuficent Funds" + infobox.textinfo = "You do not currently have enough Code Points to complete this purchase. Please come back latter" + infobox.Show() + End If + End Sub + + Private Sub lblbitnotehomewalletlink_Click(sender As Object, e As EventArgs) Handles lblbitnotehomewalletlink.Click + loadsite("shiftnet.main.bitnote/wallet.rnp") + End Sub + + Private Sub lblbitnotewalletpagefooterhomelink_Click(sender As Object, e As EventArgs) Handles lblbitnotewalletpagefooterhomelink.Click + loadsite("shiftnet.main.bitnote/home.rnp") + End Sub + + Private Sub lblbitnotewalletwalletdownloadlink_Click(sender As Object, e As EventArgs) Handles lblbitnotewalletwalletdownloadlink.Click + loadsite("shiftnet.main.bitnote/wallet.rnp") + End Sub + + Private Sub lblbitnotewalletdiggerdownloadlink_Click(sender As Object, e As EventArgs) Handles lblbitnotewalletdiggerdownloadlink.Click + loadsite("shiftnet.main.bitnote/digger.rnp") + End Sub + + Private Sub lblbitnotehomediggerdownloadlink_Click(sender As Object, e As EventArgs) Handles lblbitnotehomediggerlink.Click + loadsite("shiftnet.main.bitnote/digger.rnp") + End Sub + + Private Sub lblbitnotediggerfooterhomelink_Click(sender As Object, e As EventArgs) Handles lblbitnotediggerfooterhomelink.Click + loadsite("shiftnet.main.bitnote/home.rnp") + End Sub + + Private Sub lblbitnotediggerfooterwalletlink_Click(sender As Object, e As EventArgs) Handles lblbitnotediggerfooterwalletlink.Click + loadsite("shiftnet.main.bitnote/wallet.rnp") + End Sub + + Private Sub lblbitnotediggerfooterdiggerlink_Click(sender As Object, e As EventArgs) Handles lblbitnotediggerfooterdiggerlink.Click + loadsite("shiftnet.main.bitnote/digger.rnp") + End Sub + + Private Sub lblbitnotehomefootergetlink_Click(sender As Object, e As EventArgs) Handles lblbitnotehomefootergetlink.Click + loadsite("shiftnet.main.bitnote/currencyexchange.rnp") + updatecurrencyexchange() + End Sub + + Private Sub lblbitnotewalletfootergetlink_Click(sender As Object, e As EventArgs) Handles lblbitnotewalletfootergetlink.Click + loadsite("shiftnet.main.bitnote/currencyexchange.rnp") + updatecurrencyexchange() + End Sub + + Private Sub lblbitnotediggerfootergetlink_Click(sender As Object, e As EventArgs) Handles lblbitnotediggerfootergetlink.Click + loadsite("shiftnet.main.bitnote/currencyexchange.rnp") + updatecurrencyexchange() + End Sub + + Private Sub lblbitnotecurrencyexchangefootergetlink_Click(sender As Object, e As EventArgs) Handles lblbitnotecurrencyexchangefootergetlink.Click + loadsite("shiftnet.main.bitnote/currencyexchange.rnp") + updatecurrencyexchange() + End Sub + + Private Sub lblbitnotecurrencyexchangefooterhomelink_Click(sender As Object, e As EventArgs) Handles lblbitnotecurrencyexchangefooterhomelink.Click + loadsite("shiftnet.main.bitnote/home.rnp") + End Sub + + Private Sub lblbitnotecurrencyexchangefooterwalletlink_Click(sender As Object, e As EventArgs) Handles lblbitnotecurrencyexchangefooterwalletlink.Click + loadsite("shiftnet.main.bitnote/wallet.rnp") + End Sub + + Private Sub lblbitnotecurrencyexchangefooterdiggerlink_Click(sender As Object, e As EventArgs) Handles lblbitnotecurrencyexchangefooterdiggerlink.Click + loadsite("shiftnet.main.bitnote/digger.rnp") + End Sub + + Private Sub picbitnotewalletdownloadbtn_Click(sender As Object, e As EventArgs) Handles picbitnotewalletdownloadbtn.Click + bitnotebuy("wallet", 0, True) + End Sub + + ' Buy bitnote digger / upgrades + Private Sub btnbitnotediggergrade1buy_Click(sender As Object, e As EventArgs) Handles btnbitnotediggergrade1buy.Click + bitnotebuy("digger", 0, True) + 'Bitnote_Digger.updategrade(1, 0, "Surface Scratcher") + Bitnote_Digger.updatestats() + End Sub + + Private Sub btnbitnotediggergrade2buy_Click(sender As Object, e As EventArgs) Handles btnbitnotediggergrade2buy.Click + Bitnote_Digger.updategrade(2, 5, "Sediment Mover") + Bitnote_Digger.updatestats() + End Sub + + Private Sub btnbitnotediggergrade3buy_Click(sender As Object, e As EventArgs) Handles btnbitnotediggergrade3buy.Click + Bitnote_Digger.updategrade(3, 10, "Rock Crusher") + Bitnote_Digger.updatestats() + End Sub + + Private Sub btnbitnotediggergrade4buy_Click(sender As Object, e As EventArgs) Handles btnbitnotediggergrade4buy.Click + Bitnote_Digger.updategrade(4, 20, "Massive Drill") + Bitnote_Digger.updatestats() + End Sub + + Private Sub btnbitnotediggergrade5buy_Click(sender As Object, e As EventArgs) Handles btnbitnotediggergrade5buy.Click + Bitnote_Digger.updategrade(5, 35, "Kola") + Bitnote_Digger.updatestats() + End Sub + +#End Region + +#Region "FloodGate/Pirate Boat Functions" + + Private Sub tbdnlfloodgate_Click(sender As Object, e As EventArgs) Handles tbdnlfloodgate.Click + loadsite("download:shiftnet.main.floodgate/install.stp") + End Sub + + Private Sub Label12_Click(sender As Object, e As EventArgs) + loadsite("download:shiftnet.main.floodgate/install.stp") + End Sub + + Private Sub tbpbfglink1_Click(sender As Object, e As EventArgs) Handles tbpbfglink1.Click + FloodGate_Manager.download("shiftnet.pirate.pirateboat/floods/dodge") + End Sub + + Private Sub Label23_Click(sender As Object, e As EventArgs) Handles Label23.Click + FloodGate_Manager.download("shiftnet.pirate.pirateboat/floods/virusscanner") + End Sub + + Public Sub tpb_addItem(name As String, url As String) + ReDim Preserve tpbitems(0 To tpbitems.Length) + ReDim Preserve tpburls(0 To tpbitems.Length) + tpbitems(tpbitems.Length - 2) = name + tpburls(tpbitems.Length - 2) = url + tpbsearchresults.Items.Add(name) + tpbsearchresults.View = View.List + End Sub + Public Sub tpbsetup() + tpbsearchresults.Items.Clear() + ReDim tpbitems(0 To 0) + End Sub + + Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles tpbsearch.TextChanged + tpbsearchresults.Items.Clear() + For Each name As String In tpbitems + If (name = Nothing) Then + Else + If (tpbsearch.Text = "") Then + tpbsearchresults.Items.Add(name) + Else + If (name.Contains(tpbsearch.Text)) Then + tpbsearchresults.Items.Add(name) + End If + End If + End If + Next + End Sub + Private Sub tpbsearchresults_SelectedIndexChanged(sender As Object, e As EventArgs) Handles tpbsearchresults.Click + Try + Dim item As Integer = tpbsearchresults.FocusedItem.Index + Dim itemname As String = tpbsearchresults.FocusedItem.Name + pnlpirateboatdownlaod.BringToFront() + tpburlbox.Text = tpburls(item) + Catch ex As Exception + infobox.showinfo("RNP Error", "The remote network page 'home' failed to display the selected item") + End Try + End Sub + + Private Sub tpbfloodgate_Click(sender As Object, e As EventArgs) Handles tpbfloodgate.Click + FloodGate_Manager.download(tpburlbox.Text) + End Sub + Private Sub tpbbackbtn_Click(sender As Object, e As EventArgs) Handles tpbbackbtn.Click + pnlpirateboatmain.BringToFront() + End Sub +#End Region + +#Region "Home Page Functions" + 'Home page Functions + Private Sub lblhomehomeappscapelink_Click(sender As Object, e As EventArgs) Handles lblhomehomeappscapelink.Click + loadsite("shiftnet.main.appscape/home.rnp") + End Sub + + Private Sub lblhomehomeminimatchlink_Click(sender As Object, e As EventArgs) Handles lblhomehomeminimatchlink.Click + loadsite("shiftnet.main.minimatch/home.rnp") + End Sub + + Private Sub lblhomehomebitnotelink_Click(sender As Object, e As EventArgs) Handles lblhomehomebitnotelink.Click + loadsite("shiftnet.main.bitnote/home.rnp") + End Sub + + Private Sub lblhomehomebackuplink_Click(sender As Object, e As EventArgs) Handles lblhomehomebackuplink.Click + loadsite("shiftnet.main.shiftomizer/home.rnp") + End Sub + + Private Sub lblhomehomehistorylink_Click(sender As Object, e As EventArgs) Handles lblhomehomehistorylink.Click + loadsite("history:shiftnet") + End Sub + 'History + Private Sub addToHistory(ByVal mainsite As Panel, ByVal page As Panel, url As String) + lbhomehistoryhistory.Items.Add(url) + 'Does not save yet + lbhomehistoryhistory.View = View.List + End Sub + + Private Sub lbhomehistoryhistory_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lbhomehistoryhistory.SelectedIndexChanged + loadsite(lbhomehistoryhistory.FocusedItem.Text) + End Sub +#End Region + +#Region "UtilsWeb Functions" + Private Sub utilswebbackuputil_Click(sender As Object, e As EventArgs) Handles utilswebbackuputil.Click + loadsite("shiftnet.main.utilsweb/backuputility.rnp") + End Sub + + Private Sub utilswebvirusscanner_Click(sender As Object, e As EventArgs) Handles utilswebvirusscanner.Click + loadsite("shiftnet.main.utilsweb/virusutil.rnp") + End Sub +#End Region + +#Region "Shiftomizer Functions" + + Dim shiftomizerskinsliderimageindex As Integer = 0 + Dim shiftomizerboughtprogram(2) As Boolean + Private Sub Label18_Click(sender As Object, e As EventArgs) + ShiftDock.Show() + End Sub + + Private Sub picshiftomizerhomeskinsliderright_Click(sender As Object, e As EventArgs) Handles picshiftomizerhomeskinsliderright.Click + shiftomizerskinsliderimageindex = +1 + shiftomizerupdatesliders() + End Sub + + Private Sub picshiftomizerhomeskinssliderleft_Click(sender As Object, e As EventArgs) Handles picshiftomizerhomeskinssliderleft.Click + shiftomizerskinsliderimageindex = +-1 + shiftomizerupdatesliders() + End Sub + + Private Sub shiftomizerupdatesliders() + ReDim Preserve shiftomizerboughtprogram(2) + Select Case shiftomizerskinsliderimageindex + Case 0 + picshiftomizerhomeskinsliderimage.Image = My.Resources.shiftomizerlinuxmintskinpreview + lblshiftomizerhomeskinname.Text = "Skins - Linux Mint 7 Skin" + lblshiftomizerhomeskinsliderdescription.Text = "This skin was ripped from another operating system known as Linux Mint. Luckly, you can now expirance its theme directly from ShiftOS" + lblshiftomizerhomeskinsliderdownload.Text = "Download Linux Mint 7 skin" + Case 1 + picshiftomizerhomeskinsliderimage.Image = My.Resources.shiftomizerindustrialskinpreview + lblshiftomizerhomeskinname.Text = "Skins - Industrial Skin" + lblshiftomizerhomeskinsliderdescription.Text = "This skin is a remake of Ubuntu and Tails. It gives an industrial theme to you desktop." + lblshiftomizerhomeskinsliderdownload.Text = "Download Industrial skin" + Case Else + shiftomizerskinsliderimageindex = 0 + shiftomizerupdatesliders() + End Select + Select Case shiftomizerappsliderimageindex + Case 0 + picshiftomizerhomeappsliderimg.BackgroundImage = My.Resources.shiftomizerskinchangerpreview + lblshiftomizerhomeappname.Text = "Programs - Skin Shifter" + lblshiftomizerhomeappdescription.Text = "This program can changes your skin every few seconds, allowing you to have an ever changing desktop." + If shiftomizerboughtprogram(0) Then lblshiftomizerhomeappdownload.Text = "Bought - Go to checkout" Else lblshiftomizerhomeappdownload.Text = "Buy Skin Shifter program" + Case 1 + picshiftomizerhomeappsliderimg.BackgroundImage = My.Resources.shiftomizernamechangerpreview + lblshiftomizerhomeappname.Text = "Programs - Name Changer" + lblshiftomizerhomeappdescription.Text = "Don't like boring names like knowledge input, what to change it to 'EPiCquIZ4u' Well, now you can! Name chnager changes the name of ShiftOS programs." + If shiftomizerboughtprogram(1) Then lblshiftomizerhomeappdownload.Text = "Bought - Go to checkout" Else lblshiftomizerhomeappdownload.Text = "Buy Name Changer program" + Case 2 + picshiftomizerhomeappsliderimg.BackgroundImage = My.Resources.shiftomizericonpreview + lblshiftomizerhomeappname.Text = "Programs - Icon Manager" + lblshiftomizerhomeappdescription.Text = "Sick of have the same old black and white icons? With Icon Manager, you can change the icons to whatever you like. Make sure you swap them out for something a little more colourful!" + If shiftomizerboughtprogram(2) Then lblshiftomizerhomeappdownload.Text = "Bought - Go to checkout" Else lblshiftomizerhomeappdownload.Text = "Buy Icon Manager program" + 'Case 3 + ' picshiftomizerhomeappsliderimg.BackgroundImage = My.Resources.shiftomizericonpreview + ' lblshiftomizerhomeappname.Text = "Programs - Dock" + ' lblshiftomizerhomeappdescription.Text = "Need a simple place to store your programs? With the dock, you can open a program right from the bottom of your screen!" + ' lblshiftomizerhomeappdownload.Text = "Buy Dock program" + Case Else + shiftomizerappsliderimageindex = 0 + shiftomizerupdatesliders() + End Select + picshiftomizerhomeappsliderimg.BackgroundImageLayout = ImageLayout.Stretch + picshiftomizerhomeappsliderimg.Image = Nothing + lblshiftomizerhomeappdescription.Size = New Size(393, 50) + lblshiftomizerhomeappdownload.Location = New Point(347, 512) + End Sub + + Private Sub lblshiftomizerhomeskinsliderdownload_Click(sender As Object, e As EventArgs) Handles lblshiftomizerhomeskinsliderdownload.Click + Select Case shiftomizerskinsliderimageindex + Case 0 + infobox.title = "Shiftnet - allow download?" + infobox.textinfo = "Would you like to download LinuxMint7.skn from shiftnet.main.shiftomizer/filetrans.dwnld?file=LinuxMint7.skn" + infobox.showyesno() + infobox.sendyesno = "shiftnetlinuxmintskn" + infobox.Show() + Case 1 + infobox.title = "Shiftnet - allow download?" + infobox.textinfo = "Would you like to download Industrial.skn from shiftnet.main.shiftomizer/filetrans.dwnld?file=Industrial.skn" + infobox.showyesno() + infobox.sendyesno = "shiftnetindustrialskn" + infobox.Show() + End Select + End Sub + + Dim shiftomizerappsliderimageindex As Integer + Private Sub picshiftomizerhomeappsliderback_Click(sender As Object, e As EventArgs) Handles picshiftomizerhomeappsliderback.Click + shiftomizerappsliderimageindex = shiftomizerappsliderimageindex - 1 + shiftomizerupdatesliders() + End Sub + + Private Sub picshiftomizerhomeappslidernext_Click(sender As Object, e As EventArgs) Handles picshiftomizerhomeappslidernext.Click + shiftomizerappsliderimageindex = shiftomizerappsliderimageindex + 1 + shiftomizerupdatesliders() + End Sub + + Private Sub lblshiftomizerhomappdownload_Click(sender As Object, e As EventArgs) Handles lblshiftomizerhomeappdownload.Click + ReDim Preserve shiftomizerboughtprogram(2) + Select Case lblshiftomizerhomeappdownload.Text + Case "Buy Skin Shifter program" + makeshiftomizerpayment(2, "Skin Changer") + lblshiftomizerhomeappdownload.Text = "Bought - Go to checkout" + shiftomizerboughtprogram(0) = True + Case "Buy Name Changer program" + makeshiftomizerpayment(1, "Name Changer") + lblshiftomizerhomeappdownload.Text = "Bought - Go to checkout" + shiftomizerboughtprogram(1) = True + Case "Buy Icon Manager program" + makeshiftomizerpayment(1.5, "Icon Manager") + lblshiftomizerhomeappdownload.Text = "Bought - Go to checkout" + shiftomizerboughtprogram(2) = True + Case "Bought - Go to checkout" + opensite(pnlshiftomizer, pnlshiftomizerpayments, "shiftnet.main.shiftomizer/payment.rnp") + End Select + End Sub + + Dim shiftomizerpaymenttotal As Decimal + Dim shiftomizerpaymentitemprice(10) As String + Dim shiftomizerpaymentname(10) As String + Dim shiftomizerpaymentitemnumber As Integer = -1 + Public shiftomizeractivepayment As Boolean = False + + Private Sub makeshiftomizerpayment(ByVal price As Decimal, ByVal name As String) + ReDim Preserve shiftomizerpaymentname(9) + ReDim Preserve shiftomizerpaymentitemprice(9) + shiftomizeractivepayment = True + shiftomizerpaymentitemnumber = shiftomizerpaymentitemnumber + 1 + shiftomizerpaymentname(shiftomizerpaymentitemnumber) = name + shiftomizerpaymentitemprice(shiftomizerpaymentitemnumber) = price + shiftomizerpaymenttotal = shiftomizerpaymenttotal + shiftomizerpaymentitemprice(shiftomizerpaymentitemnumber) + lblshiftomizerpaymentorder.Text = "Order details" & Environment.NewLine & Environment.NewLine & shiftomizerpaymentname(0) & " " & shiftomizerpaymentitemprice(0) & Environment.NewLine & shiftomizerpaymentname(1) & " " & shiftomizerpaymentitemprice(1) & Environment.NewLine & shiftomizerpaymentname(2) & " " & shiftomizerpaymentitemprice(2) & Environment.NewLine & shiftomizerpaymentname(3) & " " & shiftomizerpaymentitemprice(3) & Environment.NewLine & shiftomizerpaymentname(4) & " " & shiftomizerpaymentitemprice(4) & Environment.NewLine & shiftomizerpaymentname(5) & " " & shiftomizerpaymentitemprice(5) & Environment.NewLine & shiftomizerpaymentname(6) & " " & shiftomizerpaymentitemprice(6) & Environment.NewLine & shiftomizerpaymentname(7) & " " & shiftomizerpaymentitemprice(7) & Environment.NewLine & shiftomizerpaymentname(8) & " " & shiftomizerpaymentitemprice(8) & Environment.NewLine & shiftomizerpaymentname(9) & " " & shiftomizerpaymentitemprice(9) & Environment.NewLine & Environment.NewLine & "Total Cost: " & shiftomizerpaymenttotal + lblshiftomizerpaymentinstruct.Text = "Complete payment by sending " & shiftomizerpaymenttotal & " Bitnotes to " & ShiftOSDesktop.bitnoteaddressshiftomizer & Environment.NewLine & Environment.NewLine & "We do not give change, overpayment will be counted as a tip towards the developers." & Environment.NewLine & Environment.NewLine & "Once we have recived " & shiftomizerpaymenttotal & " bitnotes and verified the senders ip as yours, a download link will appear on screen." + 'opensite(pnlshiftomizer, pnlshiftomizerpayments, "shiftnet.main.shiftomizer/payment.rnp") + End Sub + + Dim i As Integer + Public Sub completeshiftomizerpayment(ByVal credit As Decimal) + If credit >= shiftomizerpaymenttotal Then + shiftomizeractivepayment = False + If Not infobox.Visible Then + Select Case shiftomizerpaymentname(i) + Case "Skin Changer" + infobox.title = "Shiftnet - allow download?" + infobox.textinfo = "Would you like to download SkinChnager.skn from shiftnet.main.shiftomizer/filetrans.dwnld?file=SC.skn" + infobox.showyesno() + infobox.sendyesno = "shiftnetskinchanger" + infobox.Show() + Case "Name Changer" + infobox.title = "Shiftnet - allow download?" + infobox.textinfo = "Would you like to download NameChanger.stp from shiftnet.main.shiftomizer/filetrans.dwnld?file=NC" + infobox.showyesno() + infobox.sendyesno = "shiftnetnamechanger" + infobox.Show() + Case "Icon Manager" + infobox.title = "Shiftnet - allow download?" + infobox.textinfo = "Would you like to download IconManager.stp from shiftnet.main.shiftomizer/filetrans.dwnld?file=IM" + infobox.showyesno() + infobox.sendyesno = "shiftneticonmanager" + infobox.Show() + End Select + If i = 0 Then tmrshiftomizerwaitinglist.Start() + i = i + 1 + End If + End If + End Sub + + Private Sub tmrshiftomizerwaitinglist_Tick(sender As Object, e As EventArgs) Handles tmrshiftomizerwaitinglist.Tick + If i = 11 Then + tmrshiftomizerwaitinglist.Stop() + Else + completeshiftomizerpayment(shiftomizerpaymenttotal) + End If + End Sub + + Private Sub btnshiftomizerhomecheckout_Click(sender As Object, e As EventArgs) Handles btnshiftomizerhomecheckout.Click + opensite(pnlshiftomizer, pnlshiftomizerpayments, "shiftnet.main.shiftomizer/payment.rnp") + End Sub + + Private Sub lblshiftomizerpaymentsback_Click(sender As Object, e As EventArgs) Handles lblshiftomizerpaymentsback.Click + opensite(pnlshiftomizer, pnlshiftomizerhome, "shiftnet.main.shiftomizer/home.rnp") + End Sub + + Private Sub lblshiftomizerpaymentsclear_Click() Handles lblshiftomizerpaymentsclear.Click + shiftomizeractivepayment = False + shiftomizerpaymentitemnumber = 0 + shiftomizerpaymentname = Nothing + shiftomizerpaymentitemprice = Nothing + shiftomizerpaymenttotal = 0 + shiftomizerboughtprogram = Nothing + shiftomizerupdatesliders() + lblshiftomizerpaymentorder.Text = "order details" & Environment.NewLine & Environment.NewLine & "Not Items in cart." & Environment.NewLine & "Total Cost: " & shiftomizerpaymenttotal + lblshiftomizerpaymentinstruct.Text = "Complete payment by sending " & shiftomizerpaymenttotal & " Bitnotes to " & ShiftOSDesktop.bitnoteaddressshiftomizer & Environment.NewLine & Environment.NewLine & "We do not give change, overpayment will be counted as a tip towards the developers." & Environment.NewLine & Environment.NewLine & "Once we have recived " & shiftomizerpaymenttotal & " bitnotes and verified the senders ip as yours, a download link will appear on screen." + End Sub + +#End Region + +#Region "ShifterHacker Functions" + Private Sub tbshifterhackerhomefloodgatead_Click(sender As Object, e As EventArgs) Handles tbshifterhackerhomefloodgatead.Click + loadsite("download:shiftnet.main.floodgate/install.stp") + End Sub + + Private Sub tbshifterhackerhomepostspotwatermark_Click(sender As Object, e As EventArgs) Handles tbshifterhackerhomepostspotwatermark.Click + loadsite("shiftnet.main.postspot/home.rnp") + End Sub + Private Sub tbxenonhurl_Click(sender As Object, e As EventArgs) Handles tbxenonhurl.Click + loadsite("shiftnet.main.xenonh/home.rnp") + End Sub + + Private Sub tbshifterhackerhomefloodgatelink1_Click(sender As Object, e As EventArgs) Handles tbshifterhackerhomefloodgatelink1.Click + FloodGate_Manager.download("shiftnet.shifterhacker/hacks/codepointhack.flood") + End Sub +#End Region + +#Region "XenonH Functions" + Private Sub tbxenonhquickchat_Click(sender As Object, e As EventArgs) Handles tbxenonhquickchat.Click + loadsite("shiftnet.quickchat/user/xenonh.rnp") + End Sub +#End Region + +#Region "QuickChat Functions" + Private Sub qchome_Click(sender As Object, e As EventArgs) Handles qchome.Click + loadsite("shiftnet.quickchat/user/xenonh.rnp") + End Sub + + Private Sub qchomebtn_Click(sender As Object, e As EventArgs) Handles tbqchomebtn.Click + loadsite("shiftnet.quickchat/home.rnp") + End Sub + + Private Sub qcmain() + qctext.Start() + For Each story As String In QuickChatStory.qcmain + tbqcchat.Text = tbqcchat.Text & ControlChars.NewLine & story + tbqcchat.Select(tbqcchat.TextLength, 0) + tbqcchat.ScrollToCaret() + Next + End Sub + + Private Sub qctext_Tick(sender As Object, e As EventArgs) Handles qctext.Tick + QuickChatStory.i = QuickChatStory.i + 1 + qctext.Stop() + + End Sub +#End Region + +#Region "PostSpot Functions" + Private Sub tbpostspothomeshifterhackerlink_Click(sender As Object, e As EventArgs) Handles tbpostspothomeshifterhackerlink.Click + loadsite("shiftnet.shifterhacker/home.rnp") + End Sub +#End Region + + + + + Private Sub homepageorcwritebuyclicked(sender As Object, e As EventArgs) Handles btnbuyorcwrite.Click + + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Shiftorium.Designer.vb b/ShiftOS/Shiftorium.Designer.vb new file mode 100644 index 0000000..5f4da80 --- /dev/null +++ b/ShiftOS/Shiftorium.Designer.vb @@ -0,0 +1,419 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Shiftorium + 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() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Shiftorium)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.lbcodepoints = New System.Windows.Forms.Label() + Me.lbupgrades = New System.Windows.Forms.ListBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.pnlinfo = New System.Windows.Forms.Panel() + Me.pnlintro = New System.Windows.Forms.Panel() + Me.Label4 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.btnbuy = New System.Windows.Forms.Button() + Me.lbprice = New System.Windows.Forms.Label() + Me.picpreview = New System.Windows.Forms.PictureBox() + Me.lbudescription = New System.Windows.Forms.Label() + Me.lbupgradename = New System.Windows.Forms.Label() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.tmrcodepointsupdate = New System.Windows.Forms.Timer(Me.components) + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents.SuspendLayout() + Me.pnlinfo.SuspendLayout() + Me.pnlintro.SuspendLayout() + CType(Me.picpreview, System.ComponentModel.ISupportInitialize).BeginInit() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.lbcodepoints) + Me.pgcontents.Controls.Add(Me.lbupgrades) + Me.pgcontents.Controls.Add(Me.Label1) + Me.pgcontents.Controls.Add(Me.pnlinfo) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(697, 430) + Me.pgcontents.TabIndex = 0 + Me.pgcontents.TabStop = True + ' + 'lbcodepoints + ' + Me.lbcodepoints.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbcodepoints.ForeColor = System.Drawing.Color.Black + Me.lbcodepoints.Location = New System.Drawing.Point(16, 372) + Me.lbcodepoints.Name = "lbcodepoints" + Me.lbcodepoints.Size = New System.Drawing.Size(309, 43) + Me.lbcodepoints.TabIndex = 8 + Me.lbcodepoints.Text = "Codepoints: 25" + Me.lbcodepoints.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbupgrades + ' + Me.lbupgrades.BackColor = System.Drawing.Color.White + Me.lbupgrades.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lbupgrades.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed + Me.lbupgrades.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbupgrades.ForeColor = System.Drawing.Color.Black + Me.lbupgrades.FormattingEnabled = True + Me.lbupgrades.ItemHeight = 19 + Me.lbupgrades.Items.AddRange(New Object() {"Title Bar - 80 CP", "Program Titles - 60 CP", "Seconds Since Midnight - 10 CP", "Close Button - 100 CP", "Shifter - 500 CP", "Gray - 50 CP"}) + Me.lbupgrades.Location = New System.Drawing.Point(21, 70) + Me.lbupgrades.Name = "lbupgrades" + Me.lbupgrades.Size = New System.Drawing.Size(304, 285) + Me.lbupgrades.TabIndex = 0 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 26.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.ForeColor = System.Drawing.Color.Black + Me.Label1.Location = New System.Drawing.Point(85, 17) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(175, 39) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "Upgrades" + ' + 'pnlinfo + ' + Me.pnlinfo.Controls.Add(Me.pnlintro) + Me.pnlinfo.Controls.Add(Me.btnbuy) + Me.pnlinfo.Controls.Add(Me.lbprice) + Me.pnlinfo.Controls.Add(Me.picpreview) + Me.pnlinfo.Controls.Add(Me.lbudescription) + Me.pnlinfo.Controls.Add(Me.lbupgradename) + Me.pnlinfo.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlinfo.Location = New System.Drawing.Point(328, 0) + Me.pnlinfo.Name = "pnlinfo" + Me.pnlinfo.Size = New System.Drawing.Size(369, 430) + Me.pnlinfo.TabIndex = 0 + ' + 'pnlintro + ' + Me.pnlintro.Controls.Add(Me.Label4) + Me.pnlintro.Controls.Add(Me.Label2) + Me.pnlintro.Controls.Add(Me.Label5) + Me.pnlintro.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlintro.Location = New System.Drawing.Point(0, 0) + Me.pnlintro.Name = "pnlintro" + Me.pnlintro.Size = New System.Drawing.Size(369, 430) + Me.pnlintro.TabIndex = 8 + Me.pnlintro.TabStop = True + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.Location = New System.Drawing.Point(-3, 397) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(358, 18) + Me.Label4.TabIndex = 7 + Me.Label4.Text = "Select an upgrade on the left to view its details" + ' + 'Label2 + ' + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(3, 53) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(340, 341) + Me.Label2.TabIndex = 5 + Me.Label2.Text = resources.GetString("Label2.Text") + Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label5.ForeColor = System.Drawing.Color.Black + Me.Label5.Location = New System.Drawing.Point(-4, 14) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(355, 31) + Me.Label5.TabIndex = 4 + Me.Label5.Text = "Welcome to the Shiftorium" + ' + 'btnbuy + ' + Me.btnbuy.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnbuy.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnbuy.ForeColor = System.Drawing.Color.Black + Me.btnbuy.Location = New System.Drawing.Point(160, 362) + Me.btnbuy.Name = "btnbuy" + Me.btnbuy.Size = New System.Drawing.Size(185, 56) + Me.btnbuy.TabIndex = 7 + Me.btnbuy.Text = "Buy" + Me.btnbuy.UseVisualStyleBackColor = True + ' + 'lbprice + ' + Me.lbprice.Font = New System.Drawing.Font("Microsoft Sans Serif", 26.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbprice.ForeColor = System.Drawing.Color.Black + Me.lbprice.Location = New System.Drawing.Point(15, 362) + Me.lbprice.Name = "lbprice" + Me.lbprice.Size = New System.Drawing.Size(139, 59) + Me.lbprice.TabIndex = 6 + Me.lbprice.Text = "50 CP" + Me.lbprice.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'picpreview + ' + Me.picpreview.Image = Global.ShiftOS.My.Resources.Resources.upgradegray + Me.picpreview.Location = New System.Drawing.Point(25, 218) + Me.picpreview.Name = "picpreview" + Me.picpreview.Size = New System.Drawing.Size(320, 130) + Me.picpreview.TabIndex = 5 + Me.picpreview.TabStop = False + ' + 'lbudescription + ' + Me.lbudescription.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbudescription.ForeColor = System.Drawing.Color.Black + Me.lbudescription.Location = New System.Drawing.Point(24, 63) + Me.lbudescription.Name = "lbudescription" + Me.lbudescription.Size = New System.Drawing.Size(321, 144) + Me.lbudescription.TabIndex = 4 + Me.lbudescription.Text = resources.GetString("lbudescription.Text") + Me.lbudescription.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbupgradename + ' + Me.lbupgradename.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbupgradename.ForeColor = System.Drawing.Color.Black + Me.lbupgradename.Location = New System.Drawing.Point(5, 17) + Me.lbupgradename.Name = "lbupgradename" + Me.lbupgradename.Size = New System.Drawing.Size(361, 43) + Me.lbupgradename.TabIndex = 3 + Me.lbupgradename.Text = "Upgradename" + Me.lbupgradename.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(701, 30) + Me.titlebar.TabIndex = 11 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(283, 2) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconShiftorium + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(311, 4) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(339, 4) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 21 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(85, 18) + Me.lbtitletext.TabIndex = 20 + Me.lbtitletext.Text = "Shiftorium" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 19 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(699, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 18 + ' + 'tmrcodepointsupdate + ' + Me.tmrcodepointsupdate.Enabled = True + Me.tmrcodepointsupdate.Interval = 1000 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 432) + Me.pgleft.TabIndex = 12 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 430) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(699, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 432) + Me.pgright.TabIndex = 13 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 430) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 460) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(697, 2) + Me.pgbottom.TabIndex = 14 + ' + 'Shiftorium + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(701, 462) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.KeyPreview = True + Me.Name = "Shiftorium" + Me.Text = "Shiftorium" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.pnlinfo.ResumeLayout(False) + Me.pnlintro.ResumeLayout(False) + Me.pnlintro.PerformLayout() + CType(Me.picpreview, System.ComponentModel.ISupportInitialize).EndInit() + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents lbupgrades As System.Windows.Forms.ListBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents pnlinfo As System.Windows.Forms.Panel + Friend WithEvents lbcodepoints As System.Windows.Forms.Label + Friend WithEvents btnbuy As System.Windows.Forms.Button + Friend WithEvents lbprice As System.Windows.Forms.Label + Friend WithEvents picpreview As System.Windows.Forms.PictureBox + Friend WithEvents lbudescription As System.Windows.Forms.Label + Friend WithEvents lbupgradename As System.Windows.Forms.Label + Friend WithEvents pnlintro As System.Windows.Forms.Panel + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents tmrcodepointsupdate As System.Windows.Forms.Timer + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Shiftorium.resx b/ShiftOS/Shiftorium.resx new file mode 100644 index 0000000..47bcfd4 --- /dev/null +++ b/ShiftOS/Shiftorium.resx @@ -0,0 +1,137 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <data name="Label2.Text" xml:space="preserve"> + <value>The shiftorium allows you to buy a range of upgrades that expand and enhance ShiftOS. Everything from system wide GUI and functionality improvements to new programs and program addons can be found here. + +Buying GUI and functionality improvements can be very welcoming as they make the operating system easier and faster to use as well as better looking. Buying new programs and addons open up oportunities to earn codepoints and customise your system further. + +Spending all your codepoints on GUI and functionality improvements can be dangerous however as you may find yourself with a good looking easy to use interface yet you may be unable to earn more codepoints. + +Remember to close all programs after upgrading for full changes to take effect and that any attempt to modify system codepoints manually will result in curruption of the system, the lose of all your codepoints and potentially leave you unable to earn more codepoints.</value> + </data> + <data name="lbudescription.Text" xml:space="preserve"> + <value>"Everything doesn't always have to be black and white. Give your programs and GUI some depth by mixing black and white together to form grey." + +Note: You are unable to make controls grey until you buy the Shifter</value> + </data> + <metadata name="tmrcodepointsupdate.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>102, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Shiftorium.vb b/ShiftOS/Shiftorium.vb new file mode 100644 index 0000000..b693560 --- /dev/null +++ b/ShiftOS/Shiftorium.vb @@ -0,0 +1,1669 @@ +Imports System.IO + +Public Class Shiftorium + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + + Dim pricegrab As String + Dim started As Boolean = False + Dim fs As FileStream + + + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + handleupgradelist() + If ShiftOSDesktop.ShiftoriumCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonshiftorium.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftorium, ShiftOSDesktop.tbshiftoriumicon, ShiftOSDesktop.tbshiftoriumtext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Public Sub loadclone() + setuptitlebar() + setupborders() + 'ShiftOSDesktop.setcolours() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + 'End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(701, 462) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.shiftoriumname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftoriumicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.shiftoriumicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub lbupgrades_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles lbupgrades.DrawItem + e.DrawBackground() + If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then + e.Graphics.FillRectangle(Brushes.Black, e.Bounds) + End If + Dim sf As New StringFormat + sf.Alignment = StringAlignment.Center + On Error Resume Next + Using b As New SolidBrush(e.ForeColor) + e.Graphics.DrawString(lbupgrades.GetItemText(lbupgrades.Items(e.Index)), e.Font, b, e.Bounds, sf) + End Using + e.DrawFocusRectangle() + End Sub + + Private Sub lbupgrades_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lbupgrades.SelectedIndexChanged + If Me.lbupgrades.SelectedIndex >= 0 Then + If started = False Then + pnlinfo.Location = New Point(351, 0) + pnlintro.Hide() + started = True + End If + + handleupgradedescription("Gray - 20 CP", My.Resources.upgradegray, "Everything doesn't always have to be black and white. Give your programs and GUI some depth by mixing black and white together to form grey." & Environment.NewLine & Environment.NewLine & "Note: You are unable to make controls grey until you buy the Shifter.") + handleupgradedescription("Title Bar - 80 CP", My.Resources.upgradetitlebar, "Your windows are looking extremely bare right now. You know what they need? A gray bar on top of them! What is the gray bar for you ask?" & Environment.NewLine & Environment.NewLine & "Depending on what kind of person you are it either ""Does Nothing"" or ""Looks Pretty"". The Title Bar has a lot of future potential though…") + handleupgradedescription("Seconds Since Midnight - 10 CP", My.Resources.upgradesecondssincemidnight, "Ever wondered how many seconds have passed since the clock struck midnight? No?" & Environment.NewLine & Environment.NewLine & "Well for just 9.99 codepoints (rounded to the nearest codepoint) you will finally have the answer to that question you have no intention of knowing the answer to.") + handleupgradedescription("Minutes Since Midnight - 20 CP", My.Resources.upgrademinutesssincemidnight, "Most people would find looking out their window a better indication of what time it is than being told how many seconds have passed since midnight." & Environment.NewLine & Environment.NewLine & "If you are like most people then enhancing the computers ability to tell the time is critical.") + handleupgradedescription("Hours Since Midnight - 40 CP", My.Resources.upgradehoursssincemidnight, "Need a somewhat normal method of time tracking? Well now you can have it with the Hours Past Midnight time format." & Environment.NewLine & Environment.NewLine & "It's not perfectly accurate but it's easier than trying to work out the time from how many seconds or minutes have passed since midnight.") + handleupgradedescription("Custom Username - 15 CP", My.Resources.upgradecustomusername, "Sick of being known as ""User""? Want to be recognized and labeled? Then you need to replace the default username with your own!" & Environment.NewLine & Environment.NewLine & "If you want ShiftOS to refer to you by name then you are going to need this upgrade.") + handleupgradedescription("Windows Anywhere - 25 CP", My.Resources.upgradewindowsanywhere, "Having all windows open in the center of the screen is seriously limiting when it comes to multitasking." & Environment.NewLine & Environment.NewLine & "Buying this upgrade is essential if you plan on multitasking or even if you just hate having windows centered in the middle of screen.") + handleupgradedescription("Multitasking - 50 CP", My.Resources.upgrademultitasking, "These days people have many windows up on their computer so they can edit photos while they watch videos and chat to their friends about how good at multitasking they are." & Environment.NewLine & Environment.NewLine & "If you like multitasking and having lots of windows open then buy this upgrade!") + handleupgradedescription("Auto Scroll Terminal - 5 CP", My.Resources.upgradeautoscrollterminal, "Getting sick of the terminal filling up with text leaving you not knowing what you have typed unless you start typing more?" & Environment.NewLine & Environment.NewLine & "Then buy this upgrade to keep the terminal scrolled to the bottom so you can always see the latest stuff you've typed.") + handleupgradedescription("Movable Windows - 75 CP", My.Resources.upgrademoveablewindows, "Although it's nice to be able to type commands in the terminal to teleport windows to any spot on the screen it’s a little time consuming and difficult at times." & Environment.NewLine & Environment.NewLine & "Well, with Movable Windows you can move Windows with the keyboard WASD keys.") + handleupgradedescription("Draggable Windows - 150 CP", My.Resources.upgradedraggablewindows, "So... I heard you have a Title Bar? I also heard that you have Movable Windows. Although Movable Windows are nice they aren't perfect." & Environment.NewLine & Environment.NewLine & "Buy this upgrade if you want to drag windows around by their Title Bar! Trust me... Its ultra-efficient!") + handleupgradedescription("Window Borders - 40 CP", My.Resources.upgradewindowborders, "A borderless window on your desktop is like a picture hung on the wall without a frame. It looks completely out of place and awful!" & Environment.NewLine & Environment.NewLine & "Without this upgrade your overlapping windows will look extremely messy and appear to merge with each other,") + handleupgradedescription("PM and AM - 60 CP", My.Resources.upgradeamandpm, "You may be able read the time as it is now but by splitting the time into two 12 hour periods other less intelligent people around you will have an easier time reading the time." & Environment.NewLine & Environment.NewLine & "This upgrade is necessary to stop your families and friends brains exploding!") + handleupgradedescription("Minute Accuracy Time - 80 CP", My.Resources.upgrademinuteaccuracytime, "Want to be completely normal for once? Well Shift your time format into one 60x more accurate. " & Environment.NewLine & Environment.NewLine & "Most people these days make plans to meet at certain times such as 5:30pm so knowing the exact minute of the exact hour is very important.") + handleupgradedescription("Split Second Time - 100 CP", My.Resources.upgradesplitsecondaccuracy, "You already know the exact time down to the very last minute. Do you really need to know the exact second?" & Environment.NewLine & Environment.NewLine & "If so then give this upgrade a whirl but I'm sure you have better things to do than throw 100 codepoints away like this.") + handleupgradedescription("Title Text - 40 CP", My.Resources.upgradetitletext, "Since looking at a program won't tell you the name of it you need Title Text. Unless of course you want to go through the trouble of remembering the name of the program..." & Environment.NewLine & Environment.NewLine & "Title Text sits in the top left hand corner of the title bar to label each program.") + handleupgradedescription("Close Button - 90 CP", My.Resources.upgradeclosebutton, "Closing a program should be as easy as pressing a button. Opening up the terminal and typing ""Close [Program name]"" is just Ridiculous." & Environment.NewLine & Environment.NewLine & "Please, for your own sake... Buy this close button before you waste another second opening up that terminal!") + handleupgradedescription("Desktop Panel - 150 CP", My.Resources.upgradedesktoppanel, "Got a boring blank desktop? Feel it doesn't really serve a purpose? Then you need a desktop panel!" & Environment.NewLine & Environment.NewLine & "This beautiful gray desktop panel will sit at the top of your desktop and do absolutely nothing for only 150 codepoints!") + handleupgradedescription("Clock - 50 CP", My.Resources.upgradeclock, "You could type ""time"" in the terminal every time you wanted to know what the time was but that's a little inefficient don't you think?" & Environment.NewLine & Environment.NewLine & "Ever wish you could just have the time on the screen all the time? Well, there’s an app for that!") + handleupgradedescription("App Launcher Menu - 120 CP", My.Resources.upgradeapplaunchermenu, "Launching programs by typing their names in the terminal is very counterproductive especially if you are bad at spelling." & Environment.NewLine & Environment.NewLine & "A menu on the desktop that displays all programs on your computer and allows you to launch them would be a huge time saver.") + handleupgradedescription("AL Knowledge Input - 20 CP", My.Resources.upgradeknowledgeinput, "What's the point of an App Launcher if it can't launch all your apps?" & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to knowledge input in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("AL Clock - 20 CP", My.Resources.upgradealclock, "What's the point of an App Launcher if it can't launch all your apps?" & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to the clock in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("AL Shiftorium - 20 CP", My.Resources.upgradealshiftorium, "What's the point of an App Launcher if it can't launch all your apps?" & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to shiftorium in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("App Launcher Shutdown - 40 CP", My.Resources.upgradeapplaunchershutdown, "You want a complete graphical interface with no reliance on the terminal right? That means every possible function of the operating system must be achievable graphically." & Environment.NewLine & Environment.NewLine & "You may not shut down too often but hey, it beats opening the terminal...") + handleupgradedescription("Windowed Terminal - 45 CP", My.Resources.upgradewindowedterminal, "A nice big terminal is useful however it can sometimes get in the way of what you are doing." & Environment.NewLine & Environment.NewLine & "With a few tweaks we may be able to program a command that allows the terminal to switch between a full screen and windowed state.") + handleupgradedescription("Desktop Panel Clock - 75 CP", My.Resources.upgradedesktoppanelclock, "Want to always know what the time is without typing ""time"" in the terminal or opening up an entire application?" & Environment.NewLine & Environment.NewLine & "Well, with this somewhat expensive but extremely affordable clock you will know what the time is no matter what you are doing.") + handleupgradedescription("Terminal Scrollbar - 20 CP", My.Resources.upgradeterminalscrollbar, "It’s great having the terminal windowed so it doesn't block the view of your desktop but at the same time size can be an issue." & Environment.NewLine & Environment.NewLine & "This problem can easily be fixed however by adding a scrollbar to the terminal when it's windowed.") + handleupgradedescription("KI Addons - 15 CP", My.Resources.upgradekiaddons, "Knowledge input is a great game to play if you want to earn codepoints but what happens when you run out of things to guess?" & Environment.NewLine & Environment.NewLine & "This upgrade will allow you to install add-ons for knowledge input.") + handleupgradedescription("KI Car Brands - 10 CP", My.Resources.upgradeskicarbrands, "Need some more lists for Knowledge input? Why not add a list of automobile manufacturers to guess?" & Environment.NewLine & Environment.NewLine & "You know the brand of car you drive right? Toyota Maybe? Suzuki? Or maybe you have a Ferrari... come on you can do this!") + handleupgradedescription("KI Game Consoles - 10 CP", My.Resources.upgradesgameconsoles, "Need some more lists for Knowledge input? Why not add a list of game consoles to guess?" & Environment.NewLine & Environment.NewLine & "You know the name of your game console right? Playstation 4 Maybe? Xbox one? Or maybe you have a Ouya... come on you can do this!") + handleupgradedescription("Gray Shades - 40 CP", My.Resources.upgradegrayshades, "Seeing gray on your computer screen may be a nice break from black and white but why have just one shade of gray when you can have 3?" & Environment.NewLine & Environment.NewLine & "More shades of gray increase the uniqueness of your ShiftOS interface by expanding your range of colour options in the Shifter.") + handleupgradedescription("Full Gray Shade Set - 60 CP", My.Resources.upgradegrayshadeset, "3 Shades of gray may be better than 1 shade but why not get a full gray shade set complete with 8 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of gray.") + handleupgradedescription("Custom Gray Shades - 100 CP", My.Resources.upgradegraycustom, "Forget about having 8 shades of gray because this upgrade will allow you to crack the colour value code giving you the ability to create your own custom shades of gray." & Environment.NewLine & Environment.NewLine & "Further research may even allow us to create other basic colours.") + handleupgradedescription("Purple - 20 CP", My.Resources.upgradepurple, "Now that we have the RBG colours ""Red"" and ""Blue"" we are able to mix them together to form purple which symbolizes spirituality, royalty, magic and mystery." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to Purple.") + handleupgradedescription("Purple Shades - 40 CP", My.Resources.upgradepurpleshades, "Having a splash of purple may be cool but why have just one shade of purple when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of purple.") + handleupgradedescription("Full Purple Shade Set - 60 CP", My.Resources.upgradepurpleshadeset, "3 Shades of purple may be better than 1 shade but why not get a full purple shade set complete with 16 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of purple.") + handleupgradedescription("Custom Purple Shades - 100 CP", My.Resources.upgradepurplecustom, "16 shades of purple gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own purple shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Blue - 20 CP", My.Resources.upgradeblue, "Blue may be the colour of the sky and the ocean but it’s also an important colour that may allow us to create more colours if we mix it with red." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to Blue.") + handleupgradedescription("Blue Shades - 40 CP", My.Resources.upgradeblueshades, "Having a splash of blue may be cool but why have just one shade of blue when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of blue.") + handleupgradedescription("Full Blue Shade Set - 60 CP", My.Resources.upgradeblueshadeset, "3 Shades of blue may be better than 1 shade but why not get a full blue shade set complete with 16 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of blue.") + handleupgradedescription("Custom Blue Shades - 100 CP", My.Resources.upgradebluecustom, "16 shades of blue gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own blue shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Green - 20 CP", My.Resources.upgradegreen, "Green may be the colour of nature and life but it’s also an important colour that may allow us to create more colours if we mix it with red." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to Green.") + handleupgradedescription("Green Shades - 40 CP", My.Resources.upgradegreenshades, "Having a splash of green may be cool but why have just one shade of green when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of green.") + handleupgradedescription("Full Green Shade Set - 60 CP", My.Resources.upgradegreenshadeset, "3 Shades of green may be better than 1 shade but why not get a full green shade set complete with 16 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of green.") + handleupgradedescription("Custom Green Shades - 100 CP", My.Resources.upgradegreencustom, "16 shades of green gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own green shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Yellow - 20 CP", My.Resources.upgradeyellow, "Now that we have the RBG colours ""Red"" and ""Green"" we are able to mix them together to form yellow which symbolizes happiness, creativity and high intellect." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to Yellow.") + handleupgradedescription("Yellow Shades - 40 CP", My.Resources.upgradeyellowshades, "Having a splash of yellow may be cool but why have just one shade of yellow when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of yellow.") + handleupgradedescription("Full Yellow Shade Set - 60 CP", My.Resources.upgradeyellowshadeset, "3 Shades of yellow may be better than 1 shade but why not get a full yellow shade set complete with 10 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of yellow.") + handleupgradedescription("Custom Yellow Shades - 100 CP", My.Resources.upgradeyellowcustom, "10 shades of yellow gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own yellow shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Orange - 20 CP", My.Resources.upgradeorange, "Now that we have the RBG colours ""Red"" and ""Green"" we are able to mix them together to form orange which symbolizes enthusiasm and creativity." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to Orange.") + handleupgradedescription("Orange Shades - 40 CP", My.Resources.upgradeorangeshades, "Having a splash of orange may be cool but why have just one shade of orange when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of orange.") + handleupgradedescription("Full Orange Shade Set - 60 CP", My.Resources.upgradeorangeshadeset, "3 Shades of orange may be better than 1 shade but why not get a full orange shade set complete with 6 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of orange.") + handleupgradedescription("Custom Orange Shades - 100 CP", My.Resources.upgradeorangecustom, "6 shades of orange gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own orange shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Brown - 20 CP", My.Resources.upgradebrown, "Now that we have the all the RBG colours we are able to mix them together to form brown which symbolizes laziness and the earth." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to Brown.") + handleupgradedescription("Brown Shades - 40 CP", My.Resources.upgradebrownshades, "Having a splash of brown may be cool but why have just one shade of brown when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of brown.") + handleupgradedescription("Full Brown Shade Set - 60 CP", My.Resources.upgradebrownshadeset, "3 Shades of brown may be better than 1 shade but why not get a full brown shade set complete with 16 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of brown.") + handleupgradedescription("Custom Brown Shades - 100 CP", My.Resources.upgradebrowncustom, "16 shades of brown gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own brown shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Red - 20 CP", My.Resources.upgradered, "Red may be a demonic and evil colour that symbolizes hate and rage but it’s a very important colour that may allow us to create more colours if we mix it with Blue or Green." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to red.") + handleupgradedescription("Red Shades - 40 CP", My.Resources.upgraderedshades, "Having a splash of red may be cool but why have just one shade of red when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of red.") + handleupgradedescription("Full Red Shade Set - 60 CP", My.Resources.upgraderedshadeset, "3 Shades of red may be better than 1 shade but why not get a full red shade set complete with 9 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of red.") + handleupgradedescription("Custom Red Shades - 100 CP", My.Resources.upgraderedcustom, "9 shades of red gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own red shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Pink - 20 CP", My.Resources.upgradepink, "Now that we have the all the RBG colours we are able to mix them together to form pink which symbolizes universal love and beauty." & Environment.NewLine & Environment.NewLine & "Buying this upgrade would enable you to set various UI elements in ShiftOS to Pink.") + handleupgradedescription("Pink Shades - 40 CP", My.Resources.upgradepinkshades, "Having a splash of pink may be cool but why have just one shade of pink when you can have 3?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to get more shades of pink.") + handleupgradedescription("Full Pink Shade Set - 60 CP", My.Resources.upgradepinkshadeset, "3 Shades of pink may be better than 1 shade but why not get a full pink shade set complete with 6 shades?" & Environment.NewLine & Environment.NewLine & "Further upgrades may even allow you to create your own custom shades of pink.") + handleupgradedescription("Custom Pink Shades - 100 CP", My.Resources.upgradepinkcustom, "6 shades of pink gives you plenty of customization options but further investigation into the RBG colour system will allow you to make your own pink shades." & Environment.NewLine & Environment.NewLine & "Eventually we may be able to limitlessly create shades of any colour.") + handleupgradedescription("Basic Custom shade - 50 CP", My.Resources.upgradeanycolourshade, "Now that we can create shades of colours based on certain rules our level of customization is very high." & Environment.NewLine & Environment.NewLine & "With further research ShiftOS may be able to support the ability to make a shade not linked to the rules of a certain colour.") + handleupgradedescription("General Custom Shades - 100 CP", My.Resources.upgradeanycolourshade2, "There isn’t much use making a single custom colour that looks mostly gray. Further research into optimizing ShiftOS may improve its compatibility with the RGB colour system." & Environment.NewLine & Environment.NewLine & "This would lead to a higher range in values and shades being stored.") + handleupgradedescription("Advanced Custom Shades - 250 CP", My.Resources.upgradeanycolourshade3, "4 savable shade spaces is nowhere near decent for storing custom colours and with RGB limits of 100 to 200 the colours are still looking quite dull." & Environment.NewLine & Environment.NewLine & "More research into optimizing ShiftOS may further break these limits.") + handleupgradedescription("Limitless Custom Shades - 500 CP", My.Resources.upgradeanycolourshade4, "It’s time to break all RGB colour limits forever! This upgrade may be expensive but it will allow us to master the RGB colour system." & Environment.NewLine & Environment.NewLine & "With total native RGB colour support in ShiftOS we will limitlessly be able to make millions of shades of colours.") + handleupgradedescription("Shifter - 40 CP", My.Resources.upgradeshifter, "For system compatibility reasons practically all ShiftOS elements are designed to display in gray style and look dull." & Environment.NewLine & Environment.NewLine & "We may be able to overcome this dull interface however if the user is given the option to customize it through the use of an application.") + handleupgradedescription("AL Shifter - 20 CP", My.Resources.upgradealshifter, "What's the point of an App Launcher if it can't launch all your apps? " & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to the shifter in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("Roll Up Command - 10 CP", My.Resources.upgraderollupcommand, "Running out of space on your desktop? Wish you could keep a window running in the background without completely closing it?" & Environment.NewLine & Environment.NewLine & "Well you 're in luck. The roll up command will allow you to roll windows up to their title bar when you want to save space.") + handleupgradedescription("Roll Up Button - 45 CP", My.Resources.upgraderollupbutton, "Are you a fan of the Roll Up functionality? Are you absolutely sick of opening up the terminal and typing in a command every time you want to roll up a window?" & Environment.NewLine & Environment.NewLine & "This upgrade will making rolling up windows much quicker!") + handleupgradedescription("Shift Desktop - 20 CP", My.Resources.upgradeshiftdesktop, "The shifter is currently unable to change any settings but this simple upgrade may be able to add a module that allows you to change the colour of the desktop background." & Environment.NewLine & Environment.NewLine & "This may even unlock further Shifter functionality.") + handleupgradedescription("Shift Panel Clock - 20 CP", My.Resources.upgradeshiftpanelclock, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the Desktop Panel Clock.") + handleupgradedescription("Shift App Launcher - 20 CP", My.Resources.upgradeshiftapplauncher, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the App Launcher.") + handleupgradedescription("Shift Desktop Panel - 20 CP", My.Resources.upgradeshiftdesktoppanel, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the Desktop Panel.") + handleupgradedescription("Shift Title Bar - 20 CP", My.Resources.upgradeshifttitlebar, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the Title Bar.") + handleupgradedescription("Shift Title Text - 20 CP", My.Resources.upgradeshifttitletext, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the Title Text.") + handleupgradedescription("Shift Title Buttons - 20 CP", My.Resources.upgradeshiftbuttons, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the Title Buttons.") + handleupgradedescription("Shift Borders - 20 CP", My.Resources.upgradeshiftborders, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the Window Borders.") + handleupgradedescription("Pong - 70 CP", My.Resources.upgradepong, "Finding it difficult to list more words with knowledge input? Everyone has their limits right? Well how about a game of pong?" & Environment.NewLine & Environment.NewLine & "This game is sure to get your adrenalin going and you can earn codepoints as you play it!") + handleupgradedescription("Knowledge Input Icon - 15 CP", My.Resources.upgradeknowledgeinputicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for knowledge input.") + handleupgradedescription("Shifter Icon - 15 CP", My.Resources.upgradeshiftericon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for shifter.") + handleupgradedescription("Shiftorium Icon - 15 CP", My.Resources.upgradeshiftoriumicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for shiftorium.") + handleupgradedescription("Clock Icon - 15 CP", My.Resources.upgradeclockicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for clock.") + handleupgradedescription("Shutdown Icon - 15 CP", My.Resources.upgradeshutdownicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for shutdown.") + handleupgradedescription("Pong Icon - 15 CP", My.Resources.upgradepongicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for pong.") + handleupgradedescription("Terminal Icon - 15 CP", My.Resources.upgradeterminalicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for terminal.") + handleupgradedescription("File Skimmer Icon - 15 CP", My.Resources.upgradefileskimmericon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for file skimmer.") + handleupgradedescription("Textpad Icon - 15 CP", My.Resources.upgradetextpadicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for textpad.") + handleupgradedescription("AL Pong - 20 CP", My.Resources.upgradealpong, "What's the point of an App Launcher if it can't launch all your apps? " & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to pong in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("AL File Skimmer - 20 CP", My.Resources.upgradealfileskimmer, "What's the point of an App Launcher if it can't launch all your apps? " & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to the file skimmer in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("AL Textpad - 20 CP", My.Resources.upgradealtextpad, "What's the point of an App Launcher if it can't launch all your apps? " & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to textpad in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("File Skimmer - 60 CP", My.Resources.upgradefileskimmer, "Almost all computers come with some form of permanent data storage." & Environment.NewLine & Environment.NewLine & "ShiftOS is storing data on your storage device (e.g. HDD or SSD) however without a way to view and browse through these files you are practically locked out of your own computer.") + handleupgradedescription("Textpad - 65 CP", My.Resources.upgradetextpad, "Need to quickly jot down something but you can’t find a pen and paper nearby? There’s an app for that!" & Environment.NewLine & Environment.NewLine & "With the Textpad you will be able to jot down whatever you like and have it displayed in all its glory on your computer screen.") + handleupgradedescription("Textpad New - 25 CP", My.Resources.upgradetextpadnew, "Have you ever been typing a document and thought ‘I don’t like what I’m writing’. Closing and opening the entire application to clear the text is too much effort right?" & Environment.NewLine & Environment.NewLine & "Well if you get this upgrade clearing the text can be as easy as pressing a button.") + handleupgradedescription("Textpad Save - 25 CP", My.Resources.upgradetextpadsave, "Have you just written something worth keeping with Textpad? Well, what a shame you can’t save it…" & Environment.NewLine & Environment.NewLine & "Or can you? That’s right, with this upgrade your award winning documents can sit safely on your storage device.") + handleupgradedescription("Textpad Open - 25 CP", My.Resources.upgradetextpadopen, "Sure you can open your text files by going to all the effort of opening File Skimmer and then clicking on the file you want to open but it doesn’t have to be that hard." & Environment.NewLine & Environment.NewLine & "Wouldn't an open button make life much easier?") + handleupgradedescription("FS New Folder - 25 CP", My.Resources.upgradefileskimmernew, "There are a few folders within the ShiftOS file system that you can sort your data into but why limit yourself?" & Environment.NewLine & Environment.NewLine & "In an operating system that you can shift to your liking surely you should be able to create your own folders right?") + handleupgradedescription("FS Delete - 25 CP", My.Resources.upgradefileskimmerdelete, "You’re not a hoarder are you? If you are stop reading this and go look for another upgrade." & Environment.NewLine & Environment.NewLine & "If you keep every file you create your storage device is sure to get cluttered… seriously, you need a delete button!") + handleupgradedescription("KI Elements - 10 CP", My.Resources.upgradekielements, "Need some more lists for Knowledge input? Why not add a list of Elements to guess?" & Environment.NewLine & Environment.NewLine & "You studied the periodic table of elements in highschool right? Hydrogen, oxygen, lead, silver… you can do this!") + handleupgradedescription("Colour Picker Icon - 15 CP", My.Resources.upgradecolourpickericon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for the Colour Picker.") + handleupgradedescription("Infobox Icon - 15 CP", My.Resources.upgradeinfoboxicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for the InfoBox.") + 'new + handleupgradedescription("Panel Buttons - 75 CP", My.Resources.upgradepanelbuttons, "A desktop panel seems like it could be useful for a variety of different features." & Environment.NewLine & Environment.NewLine & "Maybe with a little more research we could find a way to display the names of all your open programs in the desktop panel") + handleupgradedescription("Minimize Command - 20 CP", My.Resources.upgrademinimizecommand, "Ever wanted to completely remove a program from the screen without actually closing it?" & Environment.NewLine & Environment.NewLine & "Well with a minimize command this may actually become possible and allow you to save the state of hidden programs in the process!") + handleupgradedescription("Minimize Button - 50 CP", My.Resources.upgrademinimizebutton, "As useful as the minimize feature is you still have to go to all the effort of opening the terminal and typing in a command to use it." & Environment.NewLine & Environment.NewLine & "Wouldn’t a button in the title of each window be more efficient?") + handleupgradedescription("Useful Panel Buttons - 40 CP", My.Resources.upgradeusefulpanelbuttons, "How can you call those things on the desktop panel ‘panel buttons’ when they aren’t even clickable?." & Environment.NewLine & Environment.NewLine & "A graphical unminimize feature would be handy and those panel buttons might help us…") + handleupgradedescription("Artpad - 75 CP", My.Resources.upgradeartpad, "Ever wanted to play around with pixels on your screen?" & Environment.NewLine & Environment.NewLine & "Well it looks like your newest companion may become the Artpad but be sure you know your x and y coordinates!") + handleupgradedescription("Artpad Pixel Limit 4 - 10 CP", My.Resources.upgradeartpadpixellimit4, "With just two pixels you can’t make very interesting artworks." & Environment.NewLine & Environment.NewLine & "Doubling the pixel limit to 4 should more than double the variety of unique creations you can make with the artpad.") + handleupgradedescription("Artpad Pixel Limit 8 - 20 CP", My.Resources.upgradeartpadpixellimit8, "Earlier I lied about 4 pixels giving you many different types of unique artistic opportunities." & Environment.NewLine & Environment.NewLine & "A pixel limit of 8 may be a little limiting though and its still dirt cheap.") + handleupgradedescription("Artpad Pixel Limit 16 - 30 CP", My.Resources.upgradeartpadpixellimit16, "8 pixels may not be great but 16 is looking a little more pristine." & Environment.NewLine & Environment.NewLine & "It may be a silly rhyme but it’s true.") + handleupgradedescription("Artpad Pixel Limit 64 - 50 CP", My.Resources.upgradeartpadpixellimit64, "Step right up to a pixel limit 4x greater than your current one." & Environment.NewLine & Environment.NewLine & "Isn’t it usually double you say? Well this time around its quadruple but unfortunately it does come with a dearer price.") + handleupgradedescription("Artpad Pixel Limit 256 - 75 CP", My.Resources.upgradeartpadpixellimit256, "Finally we are on the verge on a decent pixel limit. Think of what you could do with 256 pixels" & Environment.NewLine & Environment.NewLine & "The width and height of your canvas could be huge!") + handleupgradedescription("Artpad Pixel Limit 1024 - 100 CP", My.Resources.upgradeartpadpixellimit1024, "Ahh, now we’re talking. This is an upgrade that will do you a world of good." & Environment.NewLine & Environment.NewLine & "It’s a shame it’s is so expensive but good things always come at a cost.") + handleupgradedescription("Artpad Pixel Limit 4096 - 150 CP", My.Resources.upgradeartpadpixellimit4096, " With a pixel limit of 4096 you would have the ability to make canvases 64 by 64 pixels." & Environment.NewLine & Environment.NewLine & "Do you really think you will need this high of a pixel limit?") + handleupgradedescription("Artpad Pixel Limit 16384 - 200 CP", My.Resources.upgradeartpadpixellimit16384, "You may think your current pixel limit is good but you aren’t seen nothing yet." & Environment.NewLine & Environment.NewLine & "For some true 4x zoomed freehand drawing don’t miss this upgrade.") + handleupgradedescription("Artpad Pixel Limit 65536 - 250 CP", My.Resources.upgradeartpadpixellimit65536, "Oh come on how much higher can the pixel limit go?" & Environment.NewLine & Environment.NewLine & "I doubt you actually need it but aren’t you curious how much higher this goes?") + handleupgradedescription("Artpad Limitless Pixels - 350 CP", My.Resources.upgradeartpadlimitlesspixels, "This is what you’ve been waiting for all this time after purchasing all those pixel limit upgrades" & Environment.NewLine & Environment.NewLine & "It may be ultra-expensive but you won’t have to ever get another after this one.") + handleupgradedescription("Artpad New - 10 CP", My.Resources.upgradeartpadnew, "Ever wanted to start a fresh with a new canvas without restarting Artpad" & Environment.NewLine & Environment.NewLine & "With a little research it may be possible to add a button to do just that whenever you want.") + handleupgradedescription("Artpad Save - 50 CP", My.Resources.upgradeartpadsave, "Artpad may be fun to play around with but wouldn’t saving be an amazing feature?" & Environment.NewLine & Environment.NewLine & "Saving your pictures may even generate codepoints and the saved pictures might be able to be used for something.") + handleupgradedescription("Artpad Load - 50 CP", My.Resources.upgradeartpadload, "Sometimes after making something and saving it you wish to alter it slightly to enhance it" & Environment.NewLine & Environment.NewLine & "A load feature in the Artpad should let you modify saved .pic files by allowing you to load them up again with the click of a button.") + handleupgradedescription("Artpad Undo - 40 CP", My.Resources.upgradeartpadundo, "Ever spilt your paint over your masterpiece? It’s an awful feeling right?" & Environment.NewLine & Environment.NewLine & "Well in situations like these an undo feature would be very useful so for backup I would definitely get this upgrade.") + handleupgradedescription("Artpad Redo - 40 CP", My.Resources.upgradeartpadredo, "Ever clicked undo too many times and found that you have lost a large portion of work" & Environment.NewLine & Environment.NewLine & "For cases like these a redo button can be quite handy but obviously you could save your codepoints by just being careful with the undo button.") + handleupgradedescription("Artpad Pixel Placer - 20 CP", My.Resources.upgradeartpadpixelplacer, "The pixel setter allows you to set pixels but do you really want to go around trying to pinpoint and calculate x and y coordinates" & Environment.NewLine & Environment.NewLine & "Clicking the pixel you want to change directly would be much more efficient don’t you agree?") + handleupgradedescription("Artpad PP Movement Mode - 20 CP", My.Resources.upgradeartpadpixelplacermovementmode, "Constantly clicking each individual pixel on your canvas using the Pixel Placer can be very time consuming and tiring for your hands" & Environment.NewLine & Environment.NewLine & "Wouldn’t it be easier to just click and drag? Well there’s an upgrade for that!") + handleupgradedescription("Artpad Pencil - 30 CP", My.Resources.upgradeartpadpenciltool, "Does the buggy Pixel placer movement mode annoy you when it skips pixels?" & Environment.NewLine & Environment.NewLine & "Well with a little more research we may be able to develop a new tool that can draw much more smoothly.") + handleupgradedescription("Artpad Paint Brush - 30 CP", My.Resources.upgradeartpadpaintbrushtool, "Ever wanted to paint with a tool that can paint free handedly and be big, small, circular or square?" & Environment.NewLine & Environment.NewLine & "This paint brush tool may be the tool you want then and its pretty cheap too.") + handleupgradedescription("Artpad Line Tool - 30 CP", My.Resources.upgradeartpadlinetool, "Having difficulty drawing strait lines? Then you obviously need a line tool." & Environment.NewLine & Environment.NewLine & "With a line tool you will be able to draw straight lines from any point to any point on your canvas.") + handleupgradedescription("Artpad Oval Tool - 40 CP", My.Resources.upgradeartpadovaltool, "Drawing perfect circles is a very tricky process especially if zoomed right in on the canvas" & Environment.NewLine & Environment.NewLine & "With a bit of research we may be able to discover a tool that calculates how to draw circles without much effort on our side.") + handleupgradedescription("Artpad Rectangle Tool - 40 CP", My.Resources.upgradeartpadrectangletool, "Drawing perfect squares is a time consuming process especially if you are trying to draw them perfectly straight" & Environment.NewLine & Environment.NewLine & "With a bit of research we may be able to discover a tool that calculates how to draw squares without much effort on our side.") + handleupgradedescription("Artpad Eraser - 20 CP", My.Resources.upgradeartpaderaser, "Made a little mistake and want to erase it? Sounds like you need an eraser" & Environment.NewLine & Environment.NewLine & "With a little bit of research an eraser tool may not be too far away as overall its just a paintbrush set to the colour of the canvas.") + handleupgradedescription("Artpad Fill Tool - 60 CP", My.Resources.upgradeartpadfilltool, "Instead of coloring in every single individual pixel sometimes it is more appropriate to simply draw an outline and instantly fill a space in." & Environment.NewLine & Environment.NewLine & "If that’s a feature you’re interested in then you should definitely buy this upgrade.") + handleupgradedescription("Artpad Text Tool - 45 CP", My.Resources.upgradeartpadtexttool, "drawing text is very difficult but if you can pull it off then well done, nice accomplishment!" & Environment.NewLine & Environment.NewLine & "For those who can’t though research into a text drawing tool would be very handy unless you don’t require text in your artwork.") + handleupgradedescription("Artpad 4 Color Pallets - 10 CP", My.Resources.upgradeartpad4colorpallets, "Having just 2 colours in your work may give it an interesting style but overall its very limiting." & Environment.NewLine & Environment.NewLine & "This upgrade will double the amount of usable colour pallets in the Artpad to allow you quick access to a wider range of colours.") + handleupgradedescription("Artpad 8 Color Pallets - 20 CP", My.Resources.upgradeartpad8colorpallets, "4 colour pallets is still very limiting and a lot less than your average paint program." & Environment.NewLine & Environment.NewLine & "This upgrade will double the amount of usable colour pallets in the Artpad to allow you quick access to a wider range of colours.") + handleupgradedescription("Artpad 16 Color Pallets - 35 CP", My.Resources.upgradeartpad16colorpallets, "8 colours is still going to leave you changing the colour of your pallets quite often." & Environment.NewLine & Environment.NewLine & "This upgrade will double the amount of usable colour pallets in the Artpad to allow you quick access to a wider range of colours.") + handleupgradedescription("Artpad 32 Color Pallets - 50 CP", My.Resources.upgradeartpad32colorpallets, "16 colours is definitely usable but it certainly could get better than that right?" & Environment.NewLine & Environment.NewLine & "This upgrade will double the amount of usable colour pallets in the Artpad to allow you quick access to a wider range of colours.") + handleupgradedescription("Artpad 64 Color Pallets - 100 CP", My.Resources.upgradeartpad64colorpallets, "32 colours is slightly more than average for a paint program but don’t you want extreme?" & Environment.NewLine & Environment.NewLine & "This upgrade will double the amount of usable colour pallets in the Artpad to allow you quick access to a wider range of colours.") + handleupgradedescription("Artpad 128 Color Pallets - 150 CP", My.Resources.upgradeartpad128colorpallets, "For some people 64 colour pallets may already be overkill but for the extremists like yourself it’s just not enough." & Environment.NewLine & Environment.NewLine & "This upgrade will double the amount of usable colour pallets in the Artpad to allow you quick access to a wider range of colours.") + handleupgradedescription("Artpad Custom Pallets - 75 CP", My.Resources.updatecustomcolourpallets, "It can be annoying when things are set in stone and can’t be changed." & Environment.NewLine & Environment.NewLine & "Let’s not let that happen to the Artpad by programming the colour pallets to be resizable by the user.") + handleupgradedescription("Skinning - 80 CP", My.Resources.upgradeskinning, "Static colours of the windows and desktop in ShiftOS are beginning to look boring and unprofessional." & Environment.NewLine & Environment.NewLine & "Since the artpad is able to save .pic file we may be able to use them as UI elements.") + handleupgradedescription("Unity Mode - 1000 CP", My.Resources.upgradeunitymode, "ShiftOS uses Microsoft Windows as nothing more than supportive boot code however further research could enhance interactivity between operating systems." & Environment.NewLine & Environment.NewLine & "The Full RGB colour system support should enable better compatibility allowing ShiftOS to run in Unity with Windows.") + handleupgradedescription("AL Artpad - 20 CP", My.Resources.upgradealartpad, "What's the point of an App Launcher if it can't launch all your apps? " & Environment.NewLine & Environment.NewLine & "Use this tweak to add a shortcut to artpad in your app launcher so you can launch it at any time with just a few clicks.") + handleupgradedescription("Artpad Icon - 15 CP", My.Resources.upgradeartpadicon, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for artpad.") + handleupgradedescription("Shift Panel Buttons - 20 CP", My.Resources.upgradeshiftpanelbuttons, "The Shifter may have some functionality but why not add more modules to it so you can customize even more elements of ShiftOS?" & Environment.NewLine & Environment.NewLine & "This module will allow you to modify the Desktop Panel Buttons.") + ' 0.0.8 + handleupgradedescription("Resizable Windows - 40 CP", My.Resources.upgraderesize, "You can move and rollup windows, but with a few more Code Point, we may be able to let you change their size!" & Environment.NewLine & Environment.NewLine & "This upgrade will allow you to resize any resizable window.") + handleupgradedescription("Change OS Name - 15 CP", My.Resources.upgradeosname, "Getting sick of being 'user@shiftos $>' Well now you can change that, how about 'user@ThEBesToSEver'?" & Environment.NewLine & Environment.NewLine & "(We like self adverising here)") + handleupgradedescription("System Information - 40 CP", My.Resources.upgradesysinfo, "Don't know your PC specs? Need to find out? want to know what version of ShiftOS your running?" & Environment.NewLine & Environment.NewLine & "Well, this is the app for you. May I present: the System Information App!") + handleupgradedescription("AL Unity Mode - 20 CP", My.Resources.upgradealunitymode, "So you like to use ShiftOS along side Microsoft Windows? Sick of typing 'unity mode on'? Well, this is the alternative!" & Environment.NewLine & Environment.NewLine & "This little upgrade gives you Unity Mode, right from the Applications Launcher, hassle free!") + handleupgradedescription("Unity Mode Icon - 15 CP", My.Resources.upgradeiconunitymode, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for Unity Mode.") + handleupgradedescription("TRM Files - 50 CP", My.Resources.upgradetrm, "Typing commands into the terminal is all very well, but what about pre-writing the commands so you can use them at any time? What about the ability to create terminal files?" & Environment.NewLine & Environment.NewLine & "This upgrade will allow you to save textpad documents in .trm format, meaning they will run in the terminal if valid.") + handleupgradedescription("Shift Launcher Items - 20 CP", My.Resources.upgradeshiftitems, "So you can shift the Applications Launcher button. Great, but arn't the menu items a little boring?" & Environment.NewLine & Environment.NewLine & "The Shift Launcher Items upgrade allow you to customize launcher items, as well as the button.") + handleupgradedescription("Virus Scanner - 200 CP", My.Resources.upgradevirusscanner, "ShiftOS is the most secure operating system ever made, but here's a virus scanner in case you feeling extra cautious..." & Environment.NewLine & Environment.NewLine & "Just making sure you're aware, this scans for viruses, it doesn't remove them...") + handleupgradedescription("VS Removal Grade 1 - 100 CP", My.Resources.upgraderemoveth1, "If your doing things properly, there is no need for this... But wounldn't it be good to remove viruses if you did find them?" & Environment.NewLine & Environment.NewLine & "This extention for the Virus Scanner will give it the ablitity to remove level 1 viruses.") + handleupgradedescription("VS Removal Grade 2 - 100 CP", My.Resources.upgraderemoveth2, "Wow, DevX better see this, still buying virus protection? You must be doing something dodgy..." & Environment.NewLine & Environment.NewLine & "This extention for the Virus Scanner will give it the ablitity to remove level 2 viruses.") + handleupgradedescription("VS Removal Grade 3 - 100 CP", My.Resources.upgraderemoveth3, "Ok, I'm calling DevX now! Seroiusly, you really don't need this... But give me your Code Points anyway!" & Environment.NewLine & Environment.NewLine & "This extention for the Virus Scanner will give it the ablitity to remove level 3 viruses.") + handleupgradedescription("VS Removal Grade 4 - 100 CP", My.Resources.upgraderemoveth4, "Fine, whatever. I'll stop warning you against useless upgrades. Why should I care. Just gime the money OK?" & Environment.NewLine & Environment.NewLine & "This extention for the Virus Scanner will give it the ablitity to remove level 4 viruses.") + handleupgradedescription("System Information Icon - 15 CP", My.Resources.upgradesysinfo, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for System Information.") + handleupgradedescription("Virus Scanner Icon - 15 CP", My.Resources.upgradevirusscanner, "Having the name of a program in its title bar or in an app launcher is always great as it helps you remember what each program is." & Environment.NewLine & Environment.NewLine & "Text however is a little plain don’t you think? What we really need is an icon for virus scanner.") + End If + End Sub + + Private Sub btnbuy_Click(sender As Object, e As EventArgs) Handles btnbuy.Click + If Me.lbupgrades.SelectedIndex >= 0 Then + 'Include upgradetype at end. 0 is not worth changing version number, 1 is minor, 2 is major + handlebuy("Gray - 20 CP", ShiftOSDesktop.boughtgray, "Originally the screen could only display black and white but now with the ability to display gray it's easier and more efficient to display more information and controls on the screen." & Environment.NewLine & Environment.NewLine & "You can now set the colour of screen controls including the background to gray using Shifter and even draw in gray within Artpad.", 2) + handlebuy("Title Bar - 80 CP", ShiftOSDesktop.boughttitlebar, "Congratulations, windows will now have a gray, 30 pixel high title bar at the top of them!" & Environment.NewLine & Environment.NewLine & "It may not seem like much now but you've just opened up the ShiftOS GUI to a huge range of future upgrades that could turn this title bar into a very useful tool for window information and enhanced control.", 2) + handlebuy("Seconds Since Midnight - 10 CP", ShiftOSDesktop.boughtsecondspastmidnight, "Interesting, the bios appears to have the ability to track how many seconds have passed since midnight. With further calculations we may be able to convert this format of time tracking to a more convenient one." & Environment.NewLine & Environment.NewLine & "You can now find out how many seconds have passed since midnight by typing ""time"" in the terminal.", 1) + handlebuy("Minutes Since Midnight - 20 CP", ShiftOSDesktop.boughtminutespastmidnight, "Wow, isn't this amazing? Simply by dividing how many seconds have passed since midnight by 60 the computer is now able to tell you how many minutes have passed since midnight." & Environment.NewLine & Environment.NewLine & "Typing ""time"" in the terminal will now give you a better indication of what time it is.", 1) + handlebuy("Hours Since Midnight - 40 CP", ShiftOSDesktop.boughthourspastmidnight, "Incredible! If you divide the amount of minutes that have passed since midnight by 60 you are able to determine a somewhat proper time in 24 hour format." & Environment.NewLine & Environment.NewLine & "Typing ""time"" in the terminal will now tell you the time in a not so accurate but very understandable format.", 1) + handlebuy("Custom Username - 15 CP", ShiftOSDesktop.boughtcustomusername, "Well, isn't this special? The terminal will now display any name you want it to. Even the ShiftOS desktop and some other applications will refer to you by the username you set." & Environment.NewLine & Environment.NewLine & "To set your username simply type ""set username"" in the terminal followed by the name you want (spaces not allowed).", 0) + handlebuy("Windows Anywhere - 25 CP", ShiftOSDesktop.boughtwindowsanywhere, "Congratulations! You can now move windows to any point on the screen... As long as you understand the concept of X and Y coordinates and screen resolution." & Environment.NewLine & Environment.NewLine & "Type ""Move [insert program name here] to [xcoordinate],[ycoordinate]"" to teleport windows to any point on the screen.", 2) + handlebuy("Multitasking - 50 CP", ShiftOSDesktop.boughtmultitasking, "Congratulations! You can now open as many applications as you want on your computer. Remember that all applications are 'single instance applications' so you can't open two versions of the same application." & Environment.NewLine & Environment.NewLine & "To switch between open programs/bring a window to the front type ""switch to"" followed by the application name.", 2) + handlebuy("Auto Scroll Terminal - 5 CP", ShiftOSDesktop.boughtautoscrollterminal, "Buggy terminal Fixed! Although your terminal may not get filled up that much when it's full screen it certainly will if you find a way to make the terminal smaller." & Environment.NewLine & Environment.NewLine & "Every time you press enter the terminal will now automatically scroll you to bottom so you can always see the latest terminal output.", 1) + handlebuy("Movable Windows - 75 CP", ShiftOSDesktop.boughtmovablewindows, "You can now move windows without total reliance on the terminal however movement is far from smooth and not fully efficient." & Environment.NewLine & Environment.NewLine & "To move windows simply click once anywhere on the window you wish to move and hold the Ctrl key while tapping the WASD keys to move it 50 (customizable in Shifter) pixels in that direction.", 1) + handlebuy("Draggable Windows - 150 CP", ShiftOSDesktop.boughtdraggablewindows, "You have just taken a major step in the right direction. You no longer have to worry about relying on the keyboard to move windows around on the screen." & Environment.NewLine & Environment.NewLine & "From this point on you can use the pin point accuracy of your mouse to smoothly drag windows to any spot on the screen by pulling on their title bars.", 2) + handlebuy("Window Borders - 40 CP", ShiftOSDesktop.boughtwindowborders, "Now with your freshly framed windows you will no longer have issues distinguishing them from each other. Those borders may even perform a function other than looking pretty in a future upgrade." & Environment.NewLine & Environment.NewLine & "Borders only cover the right, left and bottom of windows so if you haven't bought a Title Bar your windows won't have a top border.", 1) + handlebuy("PM and AM - 60 CP", ShiftOSDesktop.boughtpmandam, "Congratulations, you have just saved anyone who looks at your computer for the time a few seconds converting it from 24 hour time to 12 hour time. Good Job!" & Environment.NewLine & Environment.NewLine & "It may not be totally accurate but now people won't think you are a complete nerd with a strange time format.", 1) + handlebuy("Minute Accuracy Time - 80 CP", ShiftOSDesktop.boughtminuteaccuracytime, "Finally you have a great time format. You may not know the exact second of each minute but knowing the minute of the hour is good enough right?" & Environment.NewLine & Environment.NewLine & "If you haven't already buy a desktop clock or title bar clock to show off the time so you don't have to type ""time"" in the terminal all the time.", 1) + handlebuy("Split Second Time - 100 CP", ShiftOSDesktop.boughtsplitsecondtime, "Ok, looks like you just couldn't resist so here you go... Typing ""time"" in the terminal will now tell you the hour, minute and second of the day." & Environment.NewLine & Environment.NewLine & "If you have any other clock like programs these will also now tell you the time to the exact second. Now go upgrade something that matters!", 0) + handlebuy("Title Text - 40 CP", ShiftOSDesktop.boughttitletext, "Fantastic! You now have some beautiful title text that sits in the title bar and tells you the name of all open programs." & Environment.NewLine & Environment.NewLine & "If you are unhappy with the font, size, colour or even position of the Title Text you are free to change it in the Shifter or even turn off Title Text all together if you don't like it.", 2) + handlebuy("Close Button - 90 CP", ShiftOSDesktop.boughtclosebutton, "What a relief! Finally programs can be closed with the click of a button. This is a big step forwards towards total graphical functionality without a terminal." & Environment.NewLine & Environment.NewLine & "If you havn't already now would be a great time to start building up a desktop interface to free yourself from the terminal.", 2) + handlebuy("Desktop Panel - 150 CP", ShiftOSDesktop.boughtdesktoppanel, "Now wasn't that worth it? Your desktop looks like it could actually do something now even though it can't. Doesn't this make your life feel totally complete now?" & Environment.NewLine & Environment.NewLine & "No? Well then... go buy some more upgrades and maybe that gray bar at the top of the screen will actually serve a purpose!", 2) + handlebuy("Clock - 50 CP", ShiftOSDesktop.boughtclock, "Great Work! You can now use your expensive computer as a cheap clock that hopefully displays the time in a nice format." & Environment.NewLine & Environment.NewLine & "Now you can sit back spending the day watching the time or even play knowledge input while the time is being displayed if your computer can multitask.", 2) + handlebuy("App Launcher Menu - 120 CP", ShiftOSDesktop.boughtapplaunchermenu, "Fantastic! Your desktop panel now contains an application launcher. You can now use it at any time to open the terminal by clicking the application launcher menu and then selecting terminal from the dropdown list." & Environment.NewLine & Environment.NewLine & "Further upgrades may add more programs you have installed on your computer to the launcher.", 2) + handlebuy("AL Knowledge Input - 20 CP", ShiftOSDesktop.boughtalknowledgeinput, "Your App Launcher is now more complete and will allow you to launch Knowledge input at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 1) + handlebuy("AL Clock - 20 CP", ShiftOSDesktop.boughtalclock, "Your App Launcher is now more complete and will allow you to launch the clock at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 1) + handlebuy("AL Shiftorium - 20 CP", ShiftOSDesktop.boughtalshiftorium, "Your App Launcher is now more complete and will allow you to launch shiftorium at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 1) + handlebuy("App Launcher Shutdown - 40 CP", ShiftOSDesktop.boughtapplaunchershutdown, "Congratulations! Under your programs in the program launcher you will now see an option to shut down your computer." & Environment.NewLine & Environment.NewLine & "You may now instantly shutdown ShiftOS any time you want with just a few clicks! Be sure not to accidently click it though otherwise you may lose unsaved work or exit out of something before you're done.", 1) + handlebuy("Windowed Terminal - 45 CP", ShiftOSDesktop.boughtwindowedterminal, "Excellent! The terminal no longer has to be a huge barrier between you and your desktop." & Environment.NewLine & Environment.NewLine & "You can now type ""windowed terminal"" to turn the terminal into a normal windowed program. You can also type ""fullscreen terminal"" to restore the terminal to it’s original state.", 2) + handlebuy("Desktop Panel Clock - 75 CP", ShiftOSDesktop.boughtdesktoppanelclock, "Well Done! You now will know what the time is whenever you want as long as the desktop panel is visible." & Environment.NewLine & Environment.NewLine & "Feel free to spend the next hour starring at the top right corner of your desktop panel admiring your new clock. At least you will know how much time is passing...", 1) + handlebuy("Terminal Scrollbar - 20 CP", ShiftOSDesktop.boughtterminalscrollbar, "Well, Isn't this heaven! The terminal will now display a scroll bar when windowed! It may not seem like much but it will certainly help if you need to backtrack on previous output in the terminal." & Environment.NewLine & Environment.NewLine & "Please note that the scrollbar will only appear when the terminal is windowed and can't display all text at once.", 1) + handlebuy("KI Addons - 15 CP", ShiftOSDesktop.boughtkiaddons, "Fantastic! Knowledge input can now be expanded with Add-ons. If you ever run out of Fruits, Countries or Animals to guess you will be able to buy more lists in the Shiftorium." & Environment.NewLine & Environment.NewLine & "Be careful not to spend all your codepoints on lists you can't guess otherwise you will be losing rather than earning codepoints!", 0) + handlebuy("KI Car Brands - 10 CP", ShiftOSDesktop.boughtkicarbrands, "Now that you have added a list of car brands/companies to Knowledge Input open it now and start guessing as many car brands as you can think of!" & Environment.NewLine & Environment.NewLine & "If you are playing on a tablet computer take a walk down the road looking at the backs or fronts of cars for their names/brands.", 0) + handlebuy("KI Game Consoles - 10 CP", ShiftOSDesktop.boughtkigameconsoles, "Now that you have added a list of video game consoles to Knowledge Input open it now and start guessing as many game consoles as you can think of!" & Environment.NewLine & Environment.NewLine & "If you are playing on a tablet computer take a walk down to the shops and see what consoles you can find there.", 0) + handlebuy("Gray Shades - 40 CP", ShiftOSDesktop.boughtgray2, "Now with a more lively, illuminated light gray and a more dramatic dim gray your interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "To use these new shades of gray just open the shifter and click on a colour customization box. Once the colour picker appears you will see these new shades of gray ready to be used wherever you want.", 2) + handlebuy("Full Gray Shade Set - 60 CP", ShiftOSDesktop.boughtgray3, "Now with the complete gray shade set you can greatly alter the appearance of your ShiftOS desktop." & Environment.NewLine & Environment.NewLine & "It appears that there is a pattern with these different shades of gray. The higher the numeric RGB value is the lighter the shade is. Further research may allow us to make our own custom shades of gray.", 2) + handlebuy("Custom Gray Shades - 100 CP", ShiftOSDesktop.boughtgray4, "It appears black has an RGB value of 0 and white has an RGB value of 255. Values between 0 – 255 are different shades of gray from 0 being the darkest to 255 being the lightest." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of gray in the colour picker by typing in a custom value and then right clicking any colour box in the gray shades area.", 2) + handlebuy("Purple - 20 CP", ShiftOSDesktop.boughtpurple, "Purple is an interesting colour as it is a mix of the warmest red colour and coolest blue colour. Now that you have it you are free to use it throughout ShiftOS." & Environment.NewLine & Environment.NewLine & "Once we have discovered all the basic colours we may be able to use our knowledge to create more shades of the colours we have.", 2) + handlebuy("Purple Shades - 40 CP", ShiftOSDesktop.boughtpurple2, "Now with a darker purple and lighter purple shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Purple Shade Set - 60 CP", ShiftOSDesktop.boughtpurple3, "Now with the complete purple shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this purple set we are very close to discovering how to make our own custom shades of purple.", 2) + handlebuy("Custom Purple Shades - 100 CP", ShiftOSDesktop.boughtpurple4, "To make a purple shade with the RGB colour system Blue must have the highest value followed by red. Green must then have the lowest value." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of purple in the colour picker by typing in custom values that follow the purple rules.", 2) + handlebuy("Blue - 20 CP", ShiftOSDesktop.boughtblue, "Blue is a vital part of the RGB colour system and now that we can use it we should be able to create Purple if we mix it with red." & Environment.NewLine & Environment.NewLine & "With all 3 RGB colours we may be able to start creating different shades of various other colours.", 2) + handlebuy("Blue Shades - 40 CP", ShiftOSDesktop.boughtblue2, "Now with a darker blue and lighter blue shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Blue Shade Set - 60 CP", ShiftOSDesktop.boughtblue3, "Now with the complete blue shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this blue set we are very close to discovering how to make our own custom shades of blue.", 2) + handlebuy("Custom Blue Shades - 100 CP", ShiftOSDesktop.boughtblue4, "To make a Blue shade with the RGB colour system blue must have the highest value followed by red. Green must then have the lowest value." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of blue in the colour picker by typing in custom values that follow the blue rules.", 2) + handlebuy("Green - 20 CP", ShiftOSDesktop.boughtgreen, "Green is a vital part of the RGB colour system and now that we can use it we should be able to create yellow and orange if we mix it with red." & Environment.NewLine & Environment.NewLine & "With all 3 RGB colours we may be able to start creating different shades of various other colours.", 2) + handlebuy("Green Shades - 40 CP", ShiftOSDesktop.boughtgreen2, "Now with a darker green and lighter green shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Green Shade Set - 60 CP", ShiftOSDesktop.boughtgreen3, "Now with the complete green shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this green set we are very close to discovering how to make our own custom shades of green.", 2) + handlebuy("Custom Green Shades - 100 CP", ShiftOSDesktop.boughtgreen4, "To make a green shade with the RGB colour system green must have the highest value. Red and Blue need to have values within 150 of each other." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of green in the colour picker by typing in custom values that follow the green rules.", 2) + handlebuy("Yellow - 20 CP", ShiftOSDesktop.boughtyellow, "Yellow is a great colour to have up on your screen to improve your concentration and make you more alert. Now that you have it you are free to use it throughout ShiftOS." & Environment.NewLine & Environment.NewLine & "Once we have discovered all the basic colours we may be able to use our knowledge to create more shades of the colours we have.", 2) + handlebuy("Yellow Shades - 40 CP", ShiftOSDesktop.boughtyellow2, "Now with a darker yellow and lighter yellow shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Yellow Shade Set - 60 CP", ShiftOSDesktop.boughtyellow3, "Now with the complete yellow shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this yellow set we are very close to discovering how to make our own custom shades of yellow.", 2) + handlebuy("Custom Yellow Shades - 100 CP", ShiftOSDesktop.boughtyellow4, "To make a yellow shade with the RGB colour system red must have the highest value and be over 180. Green must be within 30 values of red. Blue must be the lowest value." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of yellow in the colour picker by typing in custom values that follow the yellow rules.", 2) + handlebuy("Orange - 20 CP", ShiftOSDesktop.boughtorange, "Orange is apparently a color that can increase the desire for humans to eat food. Now that you have it you are free to eat, er… use it throughout ShiftOS." & Environment.NewLine & Environment.NewLine & "Once we have discovered all the basic colours we may be able to use our knowledge to create more shades of the colours we have.", 2) + handlebuy("Orange Shades - 40 CP", ShiftOSDesktop.boughtorange2, "Now with a darker orange and lighter orange shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Orange Shade Set - 60 CP", ShiftOSDesktop.boughtorange3, "Now with the complete orange shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this orange set we are very close to discovering how to make our own custom shades of orange.", 2) + handlebuy("Custom Orange Shades - 100 CP", ShiftOSDesktop.boughtorange4, "To make an orange shade with the RGB colour system red must have a value of 255. Green must be 100 or more values less than red. Blue must be 30 or more values less than green." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of orange in the colour picker by typing in custom values that follow the orange rules.", 2) + handlebuy("Brown - 20 CP", ShiftOSDesktop.boughtbrown, "People who like brown are usually conventional, orderly and sometimes lazy and repressed. Use it in ShiftOS if you must..." & Environment.NewLine & Environment.NewLine & "Once we have discovered all the basic colours we may be able to use our knowledge to create more shades of the colours we have.", 2) + handlebuy("Brown Shades - 40 CP", ShiftOSDesktop.boughtbrown2, "Now with a darker brown and lighter brown shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Brown Shade Set - 60 CP", ShiftOSDesktop.boughtbrown3, "Now with the complete brown shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this brown set we are very close to discovering how to make our own custom shades of brown.", 2) + handlebuy("Custom Brown Shades - 100 CP", ShiftOSDesktop.boughtbrown4, "To make a brown shade with the RGB colour system red must have the highest value. Green must be 30 - 128 values lower than red. Blue must be 60 or more values less than green." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of brown in the colour picker by typing in custom values that follow the brown rules.", 2) + handlebuy("Red - 20 CP", ShiftOSDesktop.boughtred, "Red is a vital part of the RGB colour system and now that we can use it we may be able to create Purple if we mix it with Blue. If we mix it with Green we may be able to create yellow and orange." & Environment.NewLine & Environment.NewLine & "With all 3 RGB colours we may be able to start creating different shades of various other colours.", 2) + handlebuy("Red Shades - 40 CP", ShiftOSDesktop.boughtred2, "Now with a darker red and lighter red shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Red Shade Set - 60 CP", ShiftOSDesktop.boughtred3, "Now with the complete red shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this red set we are very close to discovering how to make our own custom shades of red.", 2) + handlebuy("Custom Red Shades - 100 CP", ShiftOSDesktop.boughtred4, "To make a red shade with the RGB colour system red must have the highest value. Green and blue must be 80 or more values less than red but within 50 values of each other." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of red in the colour picker by typing in custom values that follow the red rules.", 2) + handlebuy("Pink - 20 CP", ShiftOSDesktop.boughtpink, "Pink is apparently a color that can decrease aggressive behavior. Now that you have it you are free use it throughout ShiftOS if you can handle it ;)" & Environment.NewLine & Environment.NewLine & "Once we have discovered all the basic colours we may be able to use our knowledge to create more shades of the colours we have.", 2) + handlebuy("Pink Shades - 40 CP", ShiftOSDesktop.boughtpink2, "Now with a darker pink and lighter pink shade at your disposal your ShiftOS interface can be designed with more depth and variety." & Environment.NewLine & Environment.NewLine & "Discovering more of these predefined colour shades may allow us to eventually use the RGB colour system to limitlessly create our own custom colours.", 2) + handlebuy("Full Pink Shade Set - 60 CP", ShiftOSDesktop.boughtpink3, "Now with the complete pink shade set you can seriously customize your ShiftOS desktop to your liking." & Environment.NewLine & Environment.NewLine & "With the knowledge of the RGB values of this pink set we are very close to discovering how to make our own custom shades of pink.", 2) + handlebuy("Custom Pink Shades - 100 CP", ShiftOSDesktop.boughtpink4, "To make a pink shade with the RGB colour system red must have the highest value. Blue must be 50 or more values less than red. Green must have the lowest value." & Environment.NewLine & Environment.NewLine & "Now you can make your own shades of pink in the colour picker by typing in custom values that follow the pink rules.", 2) + handlebuy("Basic Custom shade - 50 CP", ShiftOSDesktop.boughtanycolour, "Amazing! The colour picker can now support the ability to make a single shade not linked to any colour rules." & Environment.NewLine & Environment.NewLine & "Due to system limitations though only one custom shade can be stored and that shade must have an RGB value between 100 and 150. Further research may improve this systems compatibility with the RGB colour system.", 2) + handlebuy("General Custom Shades - 100 CP", ShiftOSDesktop.boughtanycolour2, "Fantastic, We are now one step closer to complete control over the RGB colour system without any limitations." & Environment.NewLine & Environment.NewLine & "We can now have up to 4 custom shades not linked to certain colour rules. The custom RGB range has now increased to values between 100 and 200. A little more research will continue to break these limits.", 2) + handlebuy("Advanced Custom Shades - 250 CP", ShiftOSDesktop.boughtanycolour3, "Brilliant! It looks like we are just around the corner from having the full RGB colour system supported natively in ShiftOS." & Environment.NewLine & Environment.NewLine & "You can now have up to 8 custom colours stored in the colour picker but they must have RGB values of 75 to 225.", 2) + handlebuy("Limitless Custom Shades - 500 CP", ShiftOSDesktop.boughtanycolour4, "This is EPIC! ShiftOS now supports the ability to display 16,777,216 shades of colour. Yes many of them may look the same but now you can have them all!" & Environment.NewLine & Environment.NewLine & "You can now have a full set of 16 stored colours in the colour picker set to any RGB values between 0 and 255. This native RGB support opens up a lot of cross compatibility opportunities in the future.", 2) + handlebuy("Shifter - 40 CP", ShiftOSDesktop.boughtshifter, "Fantastic! The Shifter can now be opened by typing 'open shifter' in the terminal. In its current state the shifter is simply a basic layout that has no UI Shifting functionality." & Environment.NewLine & Environment.NewLine & "With further research we may be able to add some functionally to it allowing the user to modify the sizes and colours of various UI elements.", 2) + handlebuy("AL Shifter - 20 CP", ShiftOSDesktop.boughtalshifter, "Your App Launcher is now more complete and will allow you to launch the shifter at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 1) + handlebuy("Roll Up Command - 10 CP", ShiftOSDesktop.boughtrollupcommand, "Great! You can now roll windows up to their title bar whenever you want simply by bringing up the terminal and typing 'roll' followed by the program you want to roll up." & Environment.NewLine & Environment.NewLine & "Typing 'roll shiftorium' will roll the shiftorium application up to its title bar while keeping all its data stored safely. Typing the command again will roll the shiftorium back down.", 2) + handlebuy("Roll Up Button - 45 CP", ShiftOSDesktop.boughtrollupbutton, "Now isn’t this nice? All your windows now have a black square button on them that will roll windows up and down if you click on it." & Environment.NewLine & Environment.NewLine & "It functions well but if I were you I would attempt to alter its appearance or change its colour so you can better distinguish it from any other buttons you may or may not have.", 2) + handlebuy("Shift Desktop - 20 CP", ShiftOSDesktop.boughtshiftdesktop, "Brilliant! The Shifter can change your desktop background colour but unfortunately you only use the colours 'Black', 'Gray' and 'White'." & Environment.NewLine & Environment.NewLine & "Further research may allow us to decipher the mysterious colour code allowing us to use more colours throughout ShiftOS with the Colour Picker application.", 1) + handlebuy("Shift Panel Clock - 20 CP", ShiftOSDesktop.boughtshiftpanelclock, "You can now click on the Panel clock option within the main desktop options to modify various features of the desktop panel clock such as the text size, font and colour." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 1) + handlebuy("Shift App Launcher - 20 CP", ShiftOSDesktop.boughtshiftapplauncher, "You can now click on the App Launcher option within the main desktop options to modify various features of the App Launcher such as its name, font and colour." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 1) + handlebuy("Shift Desktop Panel - 20 CP", ShiftOSDesktop.boughtshiftdesktoppanel, "You can now click on the Desktop Panel option within the main desktop options to modify various features of the desktop panel such as the position, colour and height." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 1) + handlebuy("Shift Title Bar - 20 CP", ShiftOSDesktop.boughtshifttitlebar, "You can now click on the Title Bar option within the Windows options to modify various features of the Title Bar such as the colour and height." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 1) + handlebuy("Shift Title Text - 20 CP", ShiftOSDesktop.boughtshifttitletext, "You can now click on the Title Text option within the Windows options to modify various features of the Title Text such as the text size, font and colour." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 1) + handlebuy("Shift Title Buttons - 20 CP", ShiftOSDesktop.boughtshifttitlebuttons, "You can now click on the Buttons option within the Windows options to modify various features of the Title Buttons such as their colour and size." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 1) + handlebuy("Shift Borders - 20 CP", ShiftOSDesktop.boughtshiftborders, "You can now click on the Borders option within the Windows options to modify various features of the Window Borders such as the colour and size." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 1) + handlebuy("Pong - 70 CP", ShiftOSDesktop.boughtpong, "Now, finally time to have a bit of fun! It’s you vs the computer in this mouse controlled game of pong. Simply move your paddle on the left up and down to prevent the ball going past it." & Environment.NewLine & Environment.NewLine & "The longer you survive the faster the ball will get. Survive a minute to make it to the next level. The higher the level you make it to the more codepoints you will earn.", 0) + handlebuy("Knowledge Input Icon - 15 CP", ShiftOSDesktop.boughtknowledgeinputicon, "Fantastic! We now have an icon for knowledge input that will appear on the left side of the knowledge input window. If you have bought an app launcher with knowledge input on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Shifter Icon - 15 CP", ShiftOSDesktop.boughtshiftericon, "Fantastic! We now have an icon for shifter that will appear on the left side of the shifter window. If you have bought an app launcher with shifter on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Shiftorium Icon - 15 CP", ShiftOSDesktop.boughtshiftoriumicon, "Fantastic! We now have an icon for shiftorium that will appear on the left side of the shiftorium window. If you have bought an app launcher with shiftorium on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Clock Icon - 15 CP", ShiftOSDesktop.boughtclockicon, "Fantastic! We now have an icon for clock that will appear on the left side of the clock window. If you have bought an app launcher with clock on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Shutdown Icon - 15 CP", ShiftOSDesktop.boughtshutdownicon, "Fantastic! We now have an icon for shutdown that will appear on the left side of the shutdown window. If you have bought an app launcher with shutdown on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Pong Icon - 15 CP", ShiftOSDesktop.boughtpongicon, "Fantastic! We now have an icon for pong that will appear on the left side of the pong window. If you have bought an app launcher with pong on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Terminal Icon - 15 CP", ShiftOSDesktop.boughtterminalicon, "Fantastic! We now have an icon for terminal that will appear on the left side of the terminal window. If you have bought an app launcher with terminal on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("File Skimmer Icon - 15 CP", ShiftOSDesktop.boughtfileskimmericon, "Fantastic! We now have an icon for file skimmer that will appear on the left side of the file skimmer window. If you have bought an app launcher with file skimmer on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Textpad Icon - 15 CP", ShiftOSDesktop.boughttextpadicon, "Fantastic! We now have an icon for textpad that will appear on the left side of the textpad window. If you have bought an app launcher with textpad on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("AL Pong - 20 CP", ShiftOSDesktop.boughtalpong, "Your App Launcher is now more complete and will allow you to launch Knowledge input at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 0) + handlebuy("AL File Skimmer - 20 CP", ShiftOSDesktop.boughtalfileskimmer, "Your App Launcher is now more complete and will allow you to launch Knowledge input at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 0) + handlebuy("AL Textpad - 20 CP", ShiftOSDesktop.boughtaltextpad, "Your App Launcher is now more complete and will allow you to launch Knowledge input at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 0) + handlebuy("File Skimmer - 60 CP", ShiftOSDesktop.boughtfileskimmer, "With the File Skimmer application you can freely browse through the files stored on your computer as long as they aren’t system files due to the closed source nature of ShiftOS." & Environment.NewLine & Environment.NewLine & "If you had a text or image editing application you could save files onto your storage device and use the file skimmer to load them up whenever you want.", 2) + handlebuy("Textpad - 65 CP", ShiftOSDesktop.boughttextpad, "Now whenever you need to remember something or you just feel like writing stuff down you are free to open the Textpad application and type away." & Environment.NewLine & Environment.NewLine & "If you have a program that allows you to access and manage the files on your storage device then with further upgrades you may be able to save and load text files.", 1) + handlebuy("Textpad New - 25 CP", ShiftOSDesktop.boughttextpadnew, "Gone are the days you need to backspace your text document until all the text is removed. Gone are the days when you used to have to open and close the textpad every time you wanted to write a new document." & Environment.NewLine & Environment.NewLine & "Click the arrow at the bottom of textpad to display a button that will clear your entire text document the moment you click on it.", 0) + handlebuy("Textpad Save - 25 CP", ShiftOSDesktop.boughttextpadsave, "Now you can save your precious text files onto your storage device knowing that they are totally safe unless you throw your computer out of the window or kick it while its running." & Environment.NewLine & Environment.NewLine & "Click the expander arrow at the bottom of textpad to display the save button. After clicking save simply name your file and it’s yours to keep forever.", 1) + handlebuy("Textpad Open - 25 CP", ShiftOSDesktop.boughttextpadopen, "See, I know you couldn’t resist making it a few seconds quicker to open your text documents. Either that or you think Textpad looks better with more options at the bottom…" & Environment.NewLine & Environment.NewLine & "To open a file click the expander arrow at the bottom of textpad to display the open button. After clicking open select the file that you wish to view.", 0) + handlebuy("FS New Folder - 25 CP", ShiftOSDesktop.boughtfileskimmernewfolder, "Now this is more like it! Let’s say you have a few categories of documents. You can now create folders to store them in within the documents folder. Same goes for whatever other files you can think of." & Environment.NewLine & Environment.NewLine & "Simply open File Skimmer and click on the expander arrow at the bottom of the window to find the new folder button.", 1) + handlebuy("FS Delete - 25 CP", ShiftOSDesktop.boughtfileskimmerdelete, "You now have the power to delete files on your hard drive however proceed with caution because deleting system files will corrupt vital parts of your system causing you to lose your save data." & Environment.NewLine & Environment.NewLine & "At the bottom of the file skimmer click the expander arrow to see delete button. Click a folder or file and then click delete to delete it.", 1) + handlebuy("KI Elements - 10 CP", ShiftOSDesktop.boughtkielements, "Now that you have added a list of elements to Knowledge Input open it and start guessing as many elements as you can think of!" & Environment.NewLine & Environment.NewLine & "If you still have your old highschool notes from science class have a little skim through them and I’m sure you will strike gold.", 0) + handlebuy("Colour Picker Icon - 15 CP", ShiftOSDesktop.boughtcolourpickericon, "Fantastic! We now have an icon for colour picker that will appear on the left side of the Colour Picker window. Since the colour picker isn’t a part of the app launcher the icon won’t appear on the app launcher." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Infobox Icon - 15 CP", ShiftOSDesktop.boughtinfoboxicon, "Fantastic! We now have an icon for the Infobox that will appear on the left side of its window. Since the InfoBox isn’t a part of the app launcher the icon won’t appear on the app launcher." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + 'new + handlebuy("Panel Buttons - 75 CP", ShiftOSDesktop.boughtpanelbuttons, "Great! From now on you can simply look at the panel buttons on your desktop panel to see what programs you have open." & Environment.NewLine & Environment.NewLine & "That’s right, the panel buttons don’t do anything when you click them but maybe they will after a few more upgrades…", 2) + handlebuy("Minimize Command - 20 CP", ShiftOSDesktop.boughtminimizecommand, "Now whenever you have a program open that you wish to hide simply type 'minimize [program name]' and it will be hidden." & Environment.NewLine & Environment.NewLine & "To unhide a program just type the same command again and it will be reappear in the same state you left it in earlier.", 2) + handlebuy("Minimize Button - 50 CP", ShiftOSDesktop.boughtminimizebutton, "Isn’t this nifty! Each window now has its own minimize button in its title bar so hiding windows is a breeze." & Environment.NewLine & Environment.NewLine & "Unfortunately to you will still need to use the terminal to make windows reappear but maybe another upgrade could provide an alternative.", 2) + handlebuy("Useful Panel Buttons - 40 CP", ShiftOSDesktop.boughtusefulpanelbuttons, "Finally the panel buttons have a purpose. You can now click on them to unminimize minimized programs." & Environment.NewLine & Environment.NewLine & "Simply click on the panel button labeled with the program you want to unminimize and it will reappear before your eyes.", 2) + handlebuy("Artpad - 75 CP", ShiftOSDesktop.boughtartpad, "Ah, I knew you were an artist at heart. Get your pixel setter ready and your magnifying glass, you’ll need it to see your 2 pixel masterpiece." & Environment.NewLine & Environment.NewLine & "More tools, more pixels and more colours would be helpful though so be on the lookout for more upgrades.", 0) + handlebuy("Artpad Pixel Limit 4 - 10 CP", ShiftOSDesktop.boughtartpadpixellimit4, "This increased pixel limit has unlocked the ability to make canvases in artpad totaling 4 whole pixels." & Environment.NewLine & Environment.NewLine & "You can make a variety of interesting artworks such as um, a 4 pixel high tower or a 4 pixel tower lying on its side and err, other stuff.", 0) + handlebuy("Artpad Pixel Limit 8 - 20 CP", ShiftOSDesktop.boughtartpadpixellimit8, "Great you can now have canvases with a total of 8 pixels." & Environment.NewLine & Environment.NewLine & "It may not seem like much but… oh I give up, it’s still hopeless. On the bright side you can always buy another upgrade.", 0) + handlebuy("Artpad Pixel Limit 16 - 30 CP", ShiftOSDesktop.boughtartpadpixellimit16, "You’ve just doubled your pixel limit from 8 to 16." & Environment.NewLine & Environment.NewLine & "You can now make a very cramped smiley face without a nose or a quarter of a chess board if you put your mind to it.", 0) + handlebuy("Artpad Pixel Limit 64 - 50 CP", ShiftOSDesktop.boughtartpadpixellimit64, "Finally you are starting to make it into deeper waters." & Environment.NewLine & Environment.NewLine & "I’m not quite sure what I meant by that but if you’re drawing ocean scenes you could make them deeper and if you’re up to it you could draw a full chessboard without and pieces on it.", 0) + handlebuy("Artpad Pixel Limit 256 - 75 CP", ShiftOSDesktop.boughtartpadpixellimit256, "Actually I just realized that with 256 pixels the biggest canvas size you can make is 16 by 16 pixels." & Environment.NewLine & Environment.NewLine & "Still that’s enough pixels to make a picture of a grave yard with gravestones and sad faces right?", 0) + handlebuy("Artpad Pixel Limit 1024 - 100 CP", ShiftOSDesktop.boughtartpadpixellimit1024, "Designing things like UI elements should be a breeze with this limit." & Environment.NewLine & Environment.NewLine & "Many icon designers used to make their icons at a resolution of 32 by 32 pixels so if you want to make those kind of icons then you’re all set.", 0) + handlebuy("Artpad Pixel Limit 4096 - 150 CP", ShiftOSDesktop.boughtartpadpixellimit4096, "Finally we are nearing the point where you are able to draw freely at a zoom level of 1x." & Environment.NewLine & Environment.NewLine & "Overall though 4096 pixels is still not good for large free hand sketch-like drawings.", 0) + handlebuy("Artpad Pixel Limit 16384 - 200 CP", ShiftOSDesktop.boughtartpadpixellimit16384, "Awesome! Now you can try and do some free hand drawing at 4x magnification with a canvas size of 160 by 100" & Environment.NewLine & Environment.NewLine & "You may even be able to design tiny website banners.", 0) + handlebuy("Artpad Pixel Limit 65536 - 250 CP", ShiftOSDesktop.boughtartpadpixellimit65536, "Go ahead and celebrate your seemingly limitless pixel limit for a moment and don’t look at the upgrade list." & Environment.NewLine & Environment.NewLine & "You couldn’t resist looking and making this upgrade seem so small could you? That’s right, you’re an upgrade away from truly limitless pixels.", 0) + handlebuy("Artpad Limitless Pixels - 350 CP", ShiftOSDesktop.boughtartpadlimitlesspixels, "Congratulations you now have absolutely no pixel limit and can create canvases as big as you want as long as your own computer can handle it." & Environment.NewLine & Environment.NewLine & "Go ahead and make yourself a native resolution desktop background to celebrate!", 0) + handlebuy("Artpad New - 10 CP", ShiftOSDesktop.boughtartpadnew, "Much better. A new button that looks like a folded page should now be in your tool set." & Environment.NewLine & Environment.NewLine & "By clicking the button you should be able create a new canvas and even type in a new size for it as many times as you like without opening and closing Artpad.", 0) + handlebuy("Artpad Save - 50 CP", ShiftOSDesktop.boughtartpadsave, "Now with your new saving ability you can save all those amazing artpad creations to be viewed at any point in the future" & Environment.NewLine & Environment.NewLine & "Every time you save a picture the amount of codepoints you earned for making it will appear briefly as title text or in an info box.", 0) + handlebuy("Artpad Load - 50 CP", ShiftOSDesktop.boughtartpadload, "You should now be able to load old .pic files by clicking the load button in your tool box and choosing the file you want with the file opener" & Environment.NewLine & Environment.NewLine & "The image will then pop up in artpad and you can get right to editing.", 0) + handlebuy("Artpad Undo - 40 CP", ShiftOSDesktop.boughtartpadundo, "From now on a line draw too long or the wrong splash of colour can’t hurt you anymore." & Environment.NewLine & Environment.NewLine & "An undo button has been added to your toolbox and any time you make a mistake on your canvas you can fix it with a single click of that button.", 0) + handlebuy("Artpad Redo - 40 CP", ShiftOSDesktop.boughtartpadredo, "Now that you can redo any undone actions you are totally free to cycle forwards and backwards through your work." & Environment.NewLine & Environment.NewLine & "If you really wanted you could undo all your work then keep clicking redo to watch the creation of your entire picture.", 0) + handlebuy("Artpad Pixel Placer - 20 CP", ShiftOSDesktop.boughtartpadpixelplacer, "Now with the new Pixel Placer you have the power to simply click any pixel to change its colour." & Environment.NewLine & Environment.NewLine & "Simply left click a colour pallet then click any pixel on your canvas to set it to that colour. You can also right click your colour pallets to change their colour.", 0) + handlebuy("Artpad PP Movement Mode - 20 CP", ShiftOSDesktop.boughtartpadpixelplacermovementmode, "The Pixel Placer now has a movement mode option. Simply Click the Pixel Placer tool and you will see the Movement Mode Switch in the options panel." & Environment.NewLine & Environment.NewLine & "When movement mode is on you can click and drag slowly to draw pixels with the mouse. Be slow otherwise it may skip pixels though.", 0) + handlebuy("Artpad Pencil - 30 CP", ShiftOSDesktop.boughtartpadpencil, "Fantastic! You now have a new pencil tool which you can access from the toolbox." & Environment.NewLine & Environment.NewLine & "You can now draw as fast as you want freehand and it won’t skip a single pixel. You can also draw with three different levels of thickness which can be set in the pencil’s option panel.", 0) + handlebuy("Artpad Paint Brush - 30 CP", ShiftOSDesktop.boughtartpadpaintbrush, "You now have access to the paintbrush tool which you can use simply by clicking on its icon in the tool box." & Environment.NewLine & Environment.NewLine & "A good thing about the paint brush is that you can set its size to a specific value in pixels making it perfect for a variety of different situations.", 0) + handlebuy("Artpad Line Tool - 30 CP", ShiftOSDesktop.boughtartpadlinetool, "Great! You got a line tool. You can begin using it by selecting the tool from your toolbox." & Environment.NewLine & Environment.NewLine & "Simply click and drag on your canvas to draw a horizontal, vertical or diagonal line on your canvas.", 0) + handlebuy("Artpad Oval Tool - 40 CP", ShiftOSDesktop.boughtartpadovaltool, "The new oval tool now allows you to draw circles and ovals with the mouse just by clicking and dragging on the canvas." & Environment.NewLine & Environment.NewLine & "You can also change the inside and outside colour of the ovals and change their border width in the options panel.", 0) + handlebuy("Artpad Rectangle Tool - 40 CP", ShiftOSDesktop.boughtartpadrectangletool, "The new rectangle tool now allows you to draw squares and rectangles with the mouse just by clicking and dragging on the canvas." & Environment.NewLine & Environment.NewLine & "You can also change the inside and outside colour of the rectangles and change their border width in the options panel.", 0) + handlebuy("Artpad Eraser - 20 CP", ShiftOSDesktop.boughtartpaderaser, "Your toolbox now has a new addition to it, An Eraser!" & Environment.NewLine & Environment.NewLine & "The eraser tool can be circular or square and any size you want. Clicking and dragging on the canvas will remove any colour on it and replace it with the default canvas colour which in most cases will be white.", 0) + handlebuy("Artpad Fill Tool - 60 CP", ShiftOSDesktop.boughtartpadfilltool, "Fantastic! You now have a new fill tool which you can access from the toolbox." & Environment.NewLine & Environment.NewLine & "To use the fill tool you simply have to click it, choose a colour then click a pixel on the canvas and it and every surrounding pixel matching its colour will become the new colour you set.", 0) + handlebuy("Artpad Text Tool - 45 CP", ShiftOSDesktop.boughtartpadtexttool, "A text tool is now sitting in your toolbox waiting patiently for you to use it." & Environment.NewLine & Environment.NewLine & "Simply choose a font, colour and size then type something in and click and drag the mouse to move the text around on the canvas until you are happy with its position. Once you’re done release the mouse and the text will be placed in the spot you chose.", 0) + handlebuy("Artpad 4 Color Pallets - 10 CP", ShiftOSDesktop.boughtartpad4colorpallets, "Two new black colour pallets are available for you to use in the artpad." & Environment.NewLine & Environment.NewLine & "If you would like to change the colour of any of the colour pallets you can do so by right clicking them and then selecting a colour you would like to be from the colour picker.", 0) + handlebuy("Artpad 8 Color Pallets - 20 CP", ShiftOSDesktop.boughtartpad8colorpallets, "Four new black colour pallets are available for you to use in the artpad." & Environment.NewLine & Environment.NewLine & "If you would like to change the colour of any of the colour pallets you can do so by right clicking them and then selecting a colour you would like to be from the colour picker.", 0) + handlebuy("Artpad 16 Color Pallets - 35 CP", ShiftOSDesktop.boughtartpad16colorpallets, "Eight new black colour pallets are available for you to use in the artpad." & Environment.NewLine & Environment.NewLine & "If you would like to change the colour of any of the colour pallets you can do so by right clicking them and then selecting a colour you would like to be from the colour picker.", 0) + handlebuy("Artpad 32 Color Pallets - 50 CP", ShiftOSDesktop.boughtartpad32colorpallets, "Sixteen new black colour pallets are available for you to use in the artpad." & Environment.NewLine & Environment.NewLine & "If you would like to change the colour of any of the colour pallets you can do so by right clicking them and then selecting a colour you would like to be from the colour picker.", 0) + handlebuy("Artpad 64 Color Pallets - 100 CP", ShiftOSDesktop.boughtartpad64colorpallets, "Thirty Two new black colour pallets are available for you to use in the artpad." & Environment.NewLine & Environment.NewLine & "If you would like to change the colour of any of the colour pallets you can do so by right clicking them and then selecting a colour you would like to be from the colour picker.", 0) + handlebuy("Artpad 128 Color Pallets - 150 CP", ShiftOSDesktop.boughtartpad128colorpallets, "Sixty Four new black colour pallets are available for you to use in the artpad." & Environment.NewLine & Environment.NewLine & "If you would like to change the colour of any of the colour pallets you can do so by right clicking them and then selecting a colour you would like to be from the colour picker.", 0) + handlebuy("Artpad Custom Pallets - 75 CP", ShiftOSDesktop.boughtartpadcustompallets, "Nice! The colour pallets are now able to be resized any time you like and you can even adjust the spaces between pallets." & Environment.NewLine & Environment.NewLine & "To resize the colour pallets simply middle click any of them and a special settings window will pop up.", 0) + handlebuy("Skinning - 80 CP", ShiftOSDesktop.boughtskinning, "Brilliant! A skinning system is now in place. You now have a new graphic picker and skin loader at your disposal." & Environment.NewLine & Environment.NewLine & "Right click colour boxes in the Shifter to bring up the graphic picker instead of the colour picker.", 0) + handlebuy("Unity Mode - 1000 CP", ShiftOSDesktop.boughtunitymode, "Amazing! A new mode called ‘unity mode’ can be turned on and off in the terminal by typing ‘unity mode on’ or ‘unity mode off’." & Environment.NewLine & Environment.NewLine & "With unity mode on you should be able to run ShiftOS applications and Windows applications side by side.", 0) + handlebuy("AL Artpad - 20 CP", ShiftOSDesktop.boughtalartpad, "Your App Launcher is now more complete and will allow you to launch artpad at any time you like." & Environment.NewLine & Environment.NewLine & "Be sure to buy tweaks to add all your installed programs to the app launcher so you never have to use the terminal to open up a program ever again!", 0) + handlebuy("Artpad Icon - 15 CP", ShiftOSDesktop.boughtartpadicon, "Fantastic! We now have an icon for artpad that will appear on the left side of the artpad window. If you have bought an app launcher with clock on it then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("Shift Panel Buttons - 20 CP", ShiftOSDesktop.boughtshiftpanelbuttons, "You can now click on the Panel Buttons option within the desktop panel options to modify various features of the panel buttons such as the text size, font and colour." & Environment.NewLine & Environment.NewLine & "Modifying these various settings will earn you codepoints. The longer spend tinkering with the options the more codepoints you will earn when you click 'Apply Changes.", 0) + '0.0.8 + handlebuy("Resizable Windows - 40 CP", ShiftOSDesktop.boughtresizablewindows, "Fantastic! Windows are no longer stay at their preset size." & Environment.NewLine & Environment.NewLine & "Modify the size by dragging the window border or corner", 1) + handlebuy("Change OS Name - 15 CP", ShiftOSDesktop.boughtchangeosnamecommand, "So you got sick of the name 'ShiftOS' Great you can now change it to whatever you please. Just type 'set osname [Name]' into the terminal and your set!" & Environment.NewLine & Environment.NewLine & "Note: changing the name of ShiftOS, only changes what it is called by the terminal, it will not change how other people or programs refer to it.", 1) + handlebuy("System Information - 40 CP", ShiftOSDesktop.installedsysinfo, "Congrats! you now have an app that doesn't do anything. Well, except find information about you PC that you all ready know." & Environment.NewLine & Environment.NewLine & "At least the learning curve isn't too much, just open the app and read the info, your good to go!", 0) + handlebuy("AL Unity Mode - 20 CP", ShiftOSDesktop.boughtunitymodetoggle, "Great, you can now toggle Unity Mode on and off with the click of a button, no more typing silly commands!" & Environment.NewLine & Environment.NewLine & "Next, we may even be able to get you a fancy icon for it, check the upgrade list and go earn some more Code Points!", 0) + handlebuy("Unity Mode Icon - 15 CP", ShiftOSDesktop.boughtunitytoggleicon, "Brilliant! You now have an icon to go with that fancy Unity Mode toggle button!" & Environment.NewLine & Environment.NewLine & "This opens the Windows to huge new possibilities! (OK, OK, bad joke)", 0) + handlebuy("TRM Files - 50 CP", ShiftOSDesktop.boughttextpadtrm, "Amazing! No more typing commands, but I'll let you into a secret, a sort of free upgrade that comes with this upgrade:" & Environment.NewLine & Environment.NewLine & "If you title your trm file 'autorun' and save it in shuftum42, it will automatically run every time ShiftOS is started. Very useful!", 1) + handlebuy("Shift Launcher Items - 20 CP", ShiftOSDesktop.boughtshiftapplauncheritems, "You can now customize ShiftOS to the nth degree!" & Environment.NewLine & Environment.NewLine & "So, lets see, have a little go in the Shifter, you will find the new setting under the 'Items' button in the Applications Launcher", 0) + handlebuy("Virus Scanner - 200 CP", ShiftOSDesktop.installedvirusscanner, "Great, you just waste you money on a program that can't remove a single virus." & Environment.NewLine & Environment.NewLine & "Well, at least you'll know if you've got any!", 0) + handlebuy("VS Removal Grade 1 - 100 CP", ShiftOSDesktop.installedvirusscanner, "So your getting worried about viruses huh? I asure you, ShiftOS is the safest system there is." & Environment.NewLine & Environment.NewLine & "But anyway... thanks for them money!", 0) + handlebuy("VS Removal Grade 2 - 100 CP", ShiftOSDesktop.installedvirusscanner, "This is getting ridiculous, you must be doing really bad things. If it wasn't for the money I'll call DevX right now..." & Environment.NewLine & Environment.NewLine & "You can now remove level two viruses!", 0) + handlebuy("VS Removal Grade 3 - 100 CP", ShiftOSDesktop.installedvirusscanner, "OK, I see your a bit paranoid about protection, oh well, at least that's profitable!" & Environment.NewLine & Environment.NewLine & "You can now remove level three viruses!", 0) + handlebuy("VS Removal Grade 4 - 100 CP", ShiftOSDesktop.installedvirusscanner, "Now you have it, the final level of protection. I guess being hacked and have an exprimental operating system installed makes you a little cautious" & Environment.NewLine & Environment.NewLine & "You can now remove level four viruses!", 0) + handlebuy("Virus Scanner Icon - 15 CP", ShiftOSDesktop.boughtvirusscannericon, "Fantastic! We now have an icon for the Virus Scanner that will appear on the left side of the Virus Scanner window. If you have bought an app launcher then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handlebuy("System Information Icon - 15 CP", ShiftOSDesktop.boughtsysinfoicon, "Fantastic! We now have an icon for system information that will appear on the left side of the system information window. If you have bought an app launcher then an icon will appear there as well." & Environment.NewLine & Environment.NewLine & "The occasional icon here and there looks a little out of place though so be sure to buy more icons for the other programs!", 0) + handleupgradelist() + End If + End Sub + + Private Sub handleupgradelist() + lbupgrades.Items.Clear() + lbcodepoints.Text = "Codepoints: " & ShiftOSDesktop.codepoints + If ShiftOSDesktop.boughtgray = False Then lbupgrades.Items.Add("Gray - 20 CP") + If ShiftOSDesktop.boughtsecondspastmidnight = False Then lbupgrades.Items.Add("Seconds Since Midnight - 10 CP") + If ShiftOSDesktop.boughtcustomusername = False Then lbupgrades.Items.Add("Custom Username - 15 CP") + If ShiftOSDesktop.boughtwindowsanywhere = False Then lbupgrades.Items.Add("Windows Anywhere - 25 CP") + If ShiftOSDesktop.boughtmultitasking = False Then lbupgrades.Items.Add("Multitasking - 50 CP") + If ShiftOSDesktop.boughtautoscrollterminal = False Then lbupgrades.Items.Add("Auto Scroll Terminal - 5 CP") + If ShiftOSDesktop.boughtkiaddons = False Then lbupgrades.Items.Add("KI Addons - 15 CP") + If ShiftOSDesktop.boughtpong = False Then lbupgrades.Items.Add("Pong - 70 CP") + If ShiftOSDesktop.boughttextpad = False Then lbupgrades.Items.Add("Textpad - 65 CP") + + If ShiftOSDesktop.boughttextpad = True Then + If ShiftOSDesktop.boughttextpadnew = False Then lbupgrades.Items.Add("Textpad New - 25 CP") + If ShiftOSDesktop.boughtfileskimmer = True Then + If ShiftOSDesktop.boughttextpadsave = False Then lbupgrades.Items.Add("Textpad Save - 25 CP") + If ShiftOSDesktop.boughttextpadopen = False Then lbupgrades.Items.Add("Textpad Open - 25 CP") + If ShiftOSDesktop.boughttextpadsave Then + If ShiftOSDesktop.boughttextpadtrm = False Then lbupgrades.Items.Add("TRM Files - 50 CP") + End If + End If + End If + + If ShiftOSDesktop.boughtfileskimmer = True Then + If ShiftOSDesktop.boughtfileskimmernewfolder = False Then lbupgrades.Items.Add("FS New Folder - 25 CP") + If ShiftOSDesktop.boughtfileskimmerdelete = False Then lbupgrades.Items.Add("FS Delete - 25 CP") + End If + + If ShiftOSDesktop.boughtkiaddons = True Then + If ShiftOSDesktop.boughtkicarbrands = False Then lbupgrades.Items.Add("KI Car Brands - 10 CP") + If ShiftOSDesktop.boughtkigameconsoles = False Then lbupgrades.Items.Add("KI Game Consoles - 10 CP") + If ShiftOSDesktop.boughtkielements = False Then lbupgrades.Items.Add("KI Elements - 10 CP") + End If + + If ShiftOSDesktop.boughtmultitasking = True Then + If ShiftOSDesktop.boughtwindowedterminal = False Then lbupgrades.Items.Add("Windowed Terminal - 45 CP") + If ShiftOSDesktop.boughtwindowedterminal = True Then + If ShiftOSDesktop.boughtterminalscrollbar = False Then lbupgrades.Items.Add("Terminal Scrollbar - 20 CP") + End If + End If + + If ShiftOSDesktop.boughtgray = True Then + If ShiftOSDesktop.boughtfileskimmer = False Then lbupgrades.Items.Add("File Skimmer - 60 CP") + If ShiftOSDesktop.boughtshifter = False Then lbupgrades.Items.Add("Shifter - 40 CP") + If ShiftOSDesktop.boughtshifter = True Then + If ShiftOSDesktop.boughtshiftdesktop = False Then lbupgrades.Items.Add("Shift Desktop - 20 CP") + If ShiftOSDesktop.boughtshiftdesktop = True Then + If ShiftOSDesktop.boughtdesktoppanelclock = True Then + If ShiftOSDesktop.boughtshiftpanelclock = False Then lbupgrades.Items.Add("Shift Panel Clock - 20 CP") + End If + If ShiftOSDesktop.boughtapplaunchermenu = True Then + If ShiftOSDesktop.boughtshiftapplauncher = False Then lbupgrades.Items.Add("Shift App Launcher - 20 CP") + End If + If ShiftOSDesktop.boughtdesktoppanel = True Then + If ShiftOSDesktop.boughtshiftdesktoppanel = False Then lbupgrades.Items.Add("Shift Desktop Panel - 20 CP") + End If + If ShiftOSDesktop.boughttitlebar = True Then + If ShiftOSDesktop.boughtshifttitlebar = False Then lbupgrades.Items.Add("Shift Title Bar - 20 CP") + End If + If ShiftOSDesktop.boughttitletext = True Then + If ShiftOSDesktop.boughtshifttitletext = False Then lbupgrades.Items.Add("Shift Title Text - 20 CP") + End If + If ShiftOSDesktop.boughtclosebutton = True OrElse ShiftOSDesktop.boughtrollupbutton = True Then + If ShiftOSDesktop.boughtshifttitlebuttons = False Then lbupgrades.Items.Add("Shift Title Buttons - 20 CP") + End If + If ShiftOSDesktop.boughtwindowborders = True Then + If ShiftOSDesktop.boughtshiftborders = False Then lbupgrades.Items.Add("Shift Borders - 20 CP") + End If + End If + End If + If ShiftOSDesktop.boughttitlebar = False Then lbupgrades.Items.Add("Title Bar - 80 CP") + If ShiftOSDesktop.boughtdesktoppanel = False Then lbupgrades.Items.Add("Desktop Panel - 150 CP") + If ShiftOSDesktop.boughtwindowborders = False Then lbupgrades.Items.Add("Window Borders - 40 CP") + If ShiftOSDesktop.boughtshiftdesktop = True Then + If ShiftOSDesktop.boughtgray2 = False Then lbupgrades.Items.Add("Gray Shades - 40 CP") + End If + If ShiftOSDesktop.boughtgray2 = True Then + If ShiftOSDesktop.boughtgray3 = False Then lbupgrades.Items.Add("Full Gray Shade Set - 60 CP") + If ShiftOSDesktop.boughtgray3 = True Then + If ShiftOSDesktop.boughtgray4 = False Then lbupgrades.Items.Add("Custom Gray Shades - 100 CP") + End If + End If + End If + + If ShiftOSDesktop.boughtgray4 = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpurple = False Then lbupgrades.Items.Add("Purple - 20 CP") + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtpurple2 = False Then lbupgrades.Items.Add("Purple Shades - 40 CP") + If ShiftOSDesktop.boughtpurple2 = True Then + If ShiftOSDesktop.boughtpurple3 = False Then lbupgrades.Items.Add("Full Purple Shade Set - 60 CP") + If ShiftOSDesktop.boughtpurple3 = True Then + If ShiftOSDesktop.boughtpurple4 = False Then lbupgrades.Items.Add("Custom Purple Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtblue = False Then lbupgrades.Items.Add("Blue - 20 CP") + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtblue2 = False Then lbupgrades.Items.Add("Blue Shades - 40 CP") + If ShiftOSDesktop.boughtblue2 = True Then + If ShiftOSDesktop.boughtblue3 = False Then lbupgrades.Items.Add("Full Blue Shade Set - 60 CP") + If ShiftOSDesktop.boughtblue3 = True Then + If ShiftOSDesktop.boughtblue4 = False Then lbupgrades.Items.Add("Custom Blue Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + + If ShiftOSDesktop.boughtgreen = False Then lbupgrades.Items.Add("Green - 20 CP") + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtgreen2 = False Then lbupgrades.Items.Add("Green Shades - 40 CP") + If ShiftOSDesktop.boughtgreen2 = True Then + If ShiftOSDesktop.boughtgreen3 = False Then lbupgrades.Items.Add("Full Green Shade Set - 60 CP") + If ShiftOSDesktop.boughtgreen3 = True Then + If ShiftOSDesktop.boughtgreen4 = False Then lbupgrades.Items.Add("Custom Green Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtyellow = False Then lbupgrades.Items.Add("Yellow - 20 CP") + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtyellow2 = False Then lbupgrades.Items.Add("Yellow Shades - 40 CP") + If ShiftOSDesktop.boughtyellow2 = True Then + If ShiftOSDesktop.boughtyellow3 = False Then lbupgrades.Items.Add("Full Yellow Shade Set - 60 CP") + If ShiftOSDesktop.boughtyellow3 = True Then + If ShiftOSDesktop.boughtyellow4 = False Then lbupgrades.Items.Add("Custom Yellow Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtorange = False Then lbupgrades.Items.Add("Orange - 20 CP") + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtorange2 = False Then lbupgrades.Items.Add("Orange Shades - 40 CP") + If ShiftOSDesktop.boughtorange2 = True Then + If ShiftOSDesktop.boughtorange3 = False Then lbupgrades.Items.Add("Full Orange Shade Set - 60 CP") + If ShiftOSDesktop.boughtorange3 = True Then + If ShiftOSDesktop.boughtorange4 = False Then lbupgrades.Items.Add("Custom Orange Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtbrown = False Then lbupgrades.Items.Add("Brown - 20 CP") + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtbrown2 = False Then lbupgrades.Items.Add("Brown Shades - 40 CP") + If ShiftOSDesktop.boughtbrown2 = True Then + If ShiftOSDesktop.boughtbrown3 = False Then lbupgrades.Items.Add("Full Brown Shade Set - 60 CP") + If ShiftOSDesktop.boughtbrown3 = True Then + If ShiftOSDesktop.boughtbrown4 = False Then lbupgrades.Items.Add("Custom Brown Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtred = False Then lbupgrades.Items.Add("Red - 20 CP") + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtred2 = False Then lbupgrades.Items.Add("Red Shades - 40 CP") + If ShiftOSDesktop.boughtred2 = True Then + If ShiftOSDesktop.boughtred3 = False Then lbupgrades.Items.Add("Full Red Shade Set - 60 CP") + If ShiftOSDesktop.boughtred3 = True Then + If ShiftOSDesktop.boughtred4 = False Then lbupgrades.Items.Add("Custom Red Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtpink = False Then lbupgrades.Items.Add("Pink - 20 CP") + If ShiftOSDesktop.boughtpurple = True Then + If ShiftOSDesktop.boughtblue = True Then + If ShiftOSDesktop.boughtgreen = True Then + If ShiftOSDesktop.boughtyellow = True Then + If ShiftOSDesktop.boughtorange = True Then + If ShiftOSDesktop.boughtbrown = True Then + If ShiftOSDesktop.boughtred = True Then + If ShiftOSDesktop.boughtpink = True Then + If ShiftOSDesktop.boughtpink2 = False Then lbupgrades.Items.Add("Pink Shades - 40 CP") + If ShiftOSDesktop.boughtpink2 = True Then + If ShiftOSDesktop.boughtpink3 = False Then lbupgrades.Items.Add("Full Pink Shade Set - 60 CP") + If ShiftOSDesktop.boughtpink3 = True Then + If ShiftOSDesktop.boughtpink4 = False Then lbupgrades.Items.Add("Custom Pink Shades - 100 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtpurple4 = True Then + If ShiftOSDesktop.boughtblue4 = True Then + If ShiftOSDesktop.boughtgreen4 = True Then + If ShiftOSDesktop.boughtyellow4 = True Then + If ShiftOSDesktop.boughtorange4 = True Then + If ShiftOSDesktop.boughtbrown4 = True Then + If ShiftOSDesktop.boughtred4 = True Then + If ShiftOSDesktop.boughtpink4 = True Then + If ShiftOSDesktop.boughtanycolour = False Then lbupgrades.Items.Add("Basic Custom shade - 50 CP") + If ShiftOSDesktop.boughtanycolour = True Then + If ShiftOSDesktop.boughtanycolour2 = False Then lbupgrades.Items.Add("General Custom Shades - 100 CP") + If ShiftOSDesktop.boughtanycolour2 = True Then + If ShiftOSDesktop.boughtanycolour3 = False Then lbupgrades.Items.Add("Advanced Custom Shades - 250 CP") + If ShiftOSDesktop.boughtanycolour3 = True Then + If ShiftOSDesktop.boughtanycolour4 = False Then lbupgrades.Items.Add("Limitless Custom Shades - 500 CP") + If ShiftOSDesktop.boughtanycolour4 = True Then + If ShiftOSDesktop.boughtunitymode = False Then lbupgrades.Items.Add("Unity Mode - 1000 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + End If + + + If ShiftOSDesktop.boughtdesktoppanel = True Then + If ShiftOSDesktop.boughtapplaunchermenu = False Then lbupgrades.Items.Add("App Launcher Menu - 120 CP") + If ShiftOSDesktop.boughtsecondspastmidnight = True Then + If ShiftOSDesktop.boughtdesktoppanelclock = False Then lbupgrades.Items.Add("Desktop Panel Clock - 75 CP") + End If + If ShiftOSDesktop.boughtpanelbuttons = False Then lbupgrades.Items.Add("Panel Buttons - 75 CP") + If ShiftOSDesktop.boughtpanelbuttons = True Then + If ShiftOSDesktop.boughtusefulpanelbuttons = False Then lbupgrades.Items.Add("Useful Panel Buttons - 40 CP") + If ShiftOSDesktop.boughtshiftpanelbuttons = False Then lbupgrades.Items.Add("Shift Panel Buttons - 20 CP") + End If + End If + + If ShiftOSDesktop.boughtapplaunchermenu = True Then + If ShiftOSDesktop.boughtalknowledgeinput = False Then lbupgrades.Items.Add("AL Knowledge Input - 20 CP") + If ShiftOSDesktop.boughtclock = True Then + If ShiftOSDesktop.boughtalclock = False Then lbupgrades.Items.Add("AL Clock - 20 CP") + End If + If ShiftOSDesktop.boughtpong = True Then + If ShiftOSDesktop.boughtalpong = False Then lbupgrades.Items.Add("AL Pong - 20 CP") + End If + If ShiftOSDesktop.boughtfileskimmer = True Then + If ShiftOSDesktop.boughtalfileskimmer = False Then lbupgrades.Items.Add("AL File Skimmer - 20 CP") + End If + If ShiftOSDesktop.boughttextpad = True Then + If ShiftOSDesktop.boughtaltextpad = False Then lbupgrades.Items.Add("AL Textpad - 20 CP") + End If + If ShiftOSDesktop.boughtartpad = True Then + If ShiftOSDesktop.boughtalartpad = False Then lbupgrades.Items.Add("AL Artpad - 20 CP") + End If + If ShiftOSDesktop.boughtshifter = True Then + If ShiftOSDesktop.boughtalshifter = False Then lbupgrades.Items.Add("AL Shifter - 20 CP") + End If + If ShiftOSDesktop.boughtalshiftorium = False Then lbupgrades.Items.Add("AL Shiftorium - 20 CP") + If ShiftOSDesktop.boughtapplaunchershutdown = False Then lbupgrades.Items.Add("App Launcher Shutdown - 40 CP") + End If + + If ShiftOSDesktop.boughtsecondspastmidnight = True Then + If ShiftOSDesktop.boughtclock = False Then lbupgrades.Items.Add("Clock - 50 CP") + If ShiftOSDesktop.boughtminutespastmidnight = False Then lbupgrades.Items.Add("Minutes Since Midnight - 20 CP") + If ShiftOSDesktop.boughtminutespastmidnight = True Then + If ShiftOSDesktop.boughthourspastmidnight = False Then lbupgrades.Items.Add("Hours Since Midnight - 40 CP") + If ShiftOSDesktop.boughthourspastmidnight = True Then + If ShiftOSDesktop.boughtpmandam = False Then lbupgrades.Items.Add("PM and AM - 60 CP") + If ShiftOSDesktop.boughtpmandam = True Then + If ShiftOSDesktop.boughtminuteaccuracytime = False Then lbupgrades.Items.Add("Minute Accuracy Time - 80 CP") + If ShiftOSDesktop.boughtminuteaccuracytime = True Then + If ShiftOSDesktop.boughtsplitsecondtime = False Then lbupgrades.Items.Add("Split Second Time - 100 CP") + End If + End If + End If + End If + End If + + If ShiftOSDesktop.boughtwindowsanywhere = True Then + If ShiftOSDesktop.boughtmovablewindows = False Then lbupgrades.Items.Add("Movable Windows - 75 CP") + End If + + If ShiftOSDesktop.boughttitlebar = True Then + If ShiftOSDesktop.boughttitletext = False Then lbupgrades.Items.Add("Title Text - 40 CP") + If ShiftOSDesktop.boughtclosebutton = False Then lbupgrades.Items.Add("Close Button - 90 CP") + If ShiftOSDesktop.boughtrollupcommand = False Then lbupgrades.Items.Add("Roll Up Command - 10 CP") + If ShiftOSDesktop.boughtrollupcommand = True Then + If ShiftOSDesktop.boughtrollupbutton = False Then lbupgrades.Items.Add("Roll Up Button - 45 CP") + If ShiftOSDesktop.boughtminimizecommand = False Then lbupgrades.Items.Add("Minimize Command - 20 CP") + If ShiftOSDesktop.boughtminimizecommand = True Then + If ShiftOSDesktop.boughtminimizebutton = False Then lbupgrades.Items.Add("Minimize Button - 50 CP") + End If + End If + If ShiftOSDesktop.boughtmovablewindows = True Then + If ShiftOSDesktop.boughtdraggablewindows = False Then lbupgrades.Items.Add("Draggable Windows - 150 CP") + End If + End If + + If ShiftOSDesktop.boughttitletext = True Then + If ShiftOSDesktop.boughtknowledgeinputicon = False Then lbupgrades.Items.Add("Knowledge Input Icon - 15 CP") + If ShiftOSDesktop.boughtknowledgeinputicon = True Then + If ShiftOSDesktop.boughtshiftoriumicon = False Then lbupgrades.Items.Add("Shiftorium Icon - 15 CP") + If ShiftOSDesktop.boughtterminalicon = False Then lbupgrades.Items.Add("Terminal Icon - 15 CP") + If ShiftOSDesktop.boughtshifter = True Then + If ShiftOSDesktop.boughtshiftericon = False Then lbupgrades.Items.Add("Shifter Icon - 15 CP") + If ShiftOSDesktop.boughtinfoboxicon = False Then lbupgrades.Items.Add("Infobox Icon - 15 CP") + If ShiftOSDesktop.boughtcolourpickericon = False Then lbupgrades.Items.Add("Colour Picker Icon - 15 CP") + End If + If ShiftOSDesktop.boughtclock = True Then + If ShiftOSDesktop.boughtclockicon = False Then lbupgrades.Items.Add("Clock Icon - 15 CP") + End If + If ShiftOSDesktop.boughtapplaunchershutdown = True Then + If ShiftOSDesktop.boughtshutdownicon = False Then lbupgrades.Items.Add("Shutdown Icon - 15 CP") + End If + If ShiftOSDesktop.boughtpong = True Then + If ShiftOSDesktop.boughtpongicon = False Then lbupgrades.Items.Add("Pong Icon - 15 CP") + End If + If ShiftOSDesktop.boughttextpad = True Then + If ShiftOSDesktop.boughttextpadicon = False Then lbupgrades.Items.Add("Textpad Icon - 15 CP") + End If + If ShiftOSDesktop.boughtfileskimmer = True Then + If ShiftOSDesktop.boughtfileskimmericon = False Then lbupgrades.Items.Add("File Skimmer Icon - 15 CP") + End If + If ShiftOSDesktop.boughtartpad = True Then + If ShiftOSDesktop.boughtartpadicon = False Then lbupgrades.Items.Add("Artpad Icon - 15 CP") + End If + End If + End If + + If ShiftOSDesktop.boughtgray = True Then + If ShiftOSDesktop.boughtartpad = False Then lbupgrades.Items.Add("Artpad - 75 CP") + If ShiftOSDesktop.boughtartpad = True Then + If ShiftOSDesktop.boughtartpadnew = False Then lbupgrades.Items.Add("Artpad New - 10 CP") + If ShiftOSDesktop.boughtartpadpixelplacer = False Then lbupgrades.Items.Add("Artpad Pixel Placer - 20 CP") + If ShiftOSDesktop.boughtartpadpixelplacer = True Then + If ShiftOSDesktop.boughtartpadpixelplacermovementmode = False Then lbupgrades.Items.Add("Artpad PP Movement Mode - 20 CP") + If ShiftOSDesktop.boughtartpadpixelplacermovementmode = True Then + If ShiftOSDesktop.boughtartpadpencil = False Then lbupgrades.Items.Add("Artpad Pencil - 30 CP") + If ShiftOSDesktop.boughtartpadpencil = True Then + If ShiftOSDesktop.boughtartpadpaintbrush = False Then lbupgrades.Items.Add("Artpad Paint Brush - 30 CP") + If ShiftOSDesktop.boughtartpadlinetool = False Then lbupgrades.Items.Add("Artpad Line Tool - 30 CP") + If ShiftOSDesktop.boughtartpadovaltool = False Then lbupgrades.Items.Add("Artpad Oval Tool - 40 CP") + If ShiftOSDesktop.boughtartpadrectangletool = False Then lbupgrades.Items.Add("Artpad Rectangle Tool - 40 CP") + If ShiftOSDesktop.boughtartpaderaser = False Then lbupgrades.Items.Add("Artpad Eraser - 20 CP") + If ShiftOSDesktop.boughtartpadfilltool = False Then lbupgrades.Items.Add("Artpad Fill Tool - 60 CP") + If ShiftOSDesktop.boughtartpadtexttool = False Then lbupgrades.Items.Add("Artpad Text Tool - 45 CP") + End If + End If + If ShiftOSDesktop.boughtartpadundo = False Then lbupgrades.Items.Add("Artpad Undo - 40 CP") + If ShiftOSDesktop.boughtartpadundo = True Then + If ShiftOSDesktop.boughtartpadredo = False Then lbupgrades.Items.Add("Artpad Redo - 40 CP") + End If + If ShiftOSDesktop.boughtartpadsave = False Then lbupgrades.Items.Add("Artpad Save - 50 CP") + If ShiftOSDesktop.boughtartpadsave = True Then + If ShiftOSDesktop.boughtartpadload = False Then lbupgrades.Items.Add("Artpad Load - 50 CP") + If ShiftOSDesktop.boughtskinning = False Then lbupgrades.Items.Add("Skinning - 80 CP") + End If + End If + If ShiftOSDesktop.boughtartpadpixellimit4 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 4 - 10 CP") + If ShiftOSDesktop.boughtartpadpixellimit4 = True Then + If ShiftOSDesktop.boughtartpadpixellimit8 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 8 - 20 CP") + If ShiftOSDesktop.boughtartpadpixellimit8 = True Then + If ShiftOSDesktop.boughtartpadpixellimit16 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 16 - 30 CP") + If ShiftOSDesktop.boughtartpadpixellimit16 = True Then + If ShiftOSDesktop.boughtartpadpixellimit64 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 64 - 50 CP") + If ShiftOSDesktop.boughtartpadpixellimit64 = True Then + If ShiftOSDesktop.boughtartpadpixellimit256 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 256 - 75 CP") + If ShiftOSDesktop.boughtartpadpixellimit256 = True Then + If ShiftOSDesktop.boughtartpadpixellimit1024 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 1024 - 100 CP") + If ShiftOSDesktop.boughtartpadpixellimit1024 = True Then + If ShiftOSDesktop.boughtartpadpixellimit4096 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 4096 - 150 CP") + If ShiftOSDesktop.boughtartpadpixellimit4096 = True Then + If ShiftOSDesktop.boughtartpadpixellimit16384 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 16384 - 200 CP") + If ShiftOSDesktop.boughtartpadpixellimit16384 = True Then + If ShiftOSDesktop.boughtartpadpixellimit65536 = False Then lbupgrades.Items.Add("Artpad Pixel Limit 65536 - 250 CP") + If ShiftOSDesktop.boughtartpadpixellimit65536 = True Then + If ShiftOSDesktop.boughtartpadlimitlesspixels = False Then lbupgrades.Items.Add("Artpad Limitless Pixels - 350 CP") + End If + End If + End If + End If + End If + End If + End If + End If + End If + + + If ShiftOSDesktop.boughtartpad4colorpallets = False Then lbupgrades.Items.Add("Artpad 4 Color Pallets - 10 CP") + If ShiftOSDesktop.boughtartpad4colorpallets = True Then + If ShiftOSDesktop.boughtartpad8colorpallets = False Then lbupgrades.Items.Add("Artpad 8 Color Pallets - 20 CP") + If ShiftOSDesktop.boughtartpad8colorpallets = True Then + If ShiftOSDesktop.boughtartpad16colorpallets = False Then lbupgrades.Items.Add("Artpad 16 Color Pallets - 35 CP") + If ShiftOSDesktop.boughtartpad16colorpallets = True Then + If ShiftOSDesktop.boughtartpad32colorpallets = False Then lbupgrades.Items.Add("Artpad 32 Color Pallets - 50 CP") + If ShiftOSDesktop.boughtartpad32colorpallets = True Then + If ShiftOSDesktop.boughtartpadcustompallets = False Then lbupgrades.Items.Add("Artpad Custom Pallets - 75 CP") + If ShiftOSDesktop.boughtartpad64colorpallets = False Then lbupgrades.Items.Add("Artpad 64 Color Pallets - 100 CP") + If ShiftOSDesktop.boughtartpad64colorpallets = True Then + If ShiftOSDesktop.boughtartpad128colorpallets = False Then lbupgrades.Items.Add("Artpad 128 Color Pallets - 150 CP") + End If + + End If + End If + End If + End If + End If + End If + '0.0.8 + If ShiftOSDesktop.boughtwindowborders = True Then + If ShiftOSDesktop.boughtmovablewindows = True Then + If ShiftOSDesktop.boughtrollupcommand = True Then + If ShiftOSDesktop.boughtresizablewindows = False Then lbupgrades.Items.Add("Resizable Windows - 40 CP") + End If + End If + End If + If ShiftOSDesktop.boughtchangeosnamecommand = False Then lbupgrades.Items.Add("Change OS Name - 15 CP") + If ShiftOSDesktop.installedsysinfo = False Then lbupgrades.Items.Add("System Information - 40 CP") + If ShiftOSDesktop.boughtunitymode = True Then + If ShiftOSDesktop.boughtunitymodetoggle Then + If ShiftOSDesktop.boughtunitytoggleicon = False Then lbupgrades.Items.Add("Unity Mode Icon - 15 CP") + Else + lbupgrades.Items.Add("AL Unity Mode - 20 CP") + End If + End If + If ShiftOSDesktop.boughtshiftapplauncher = True Then + If ShiftOSDesktop.boughtshiftapplauncheritems = False Then lbupgrades.Items.Add("Shift Launcher Items - 20 CP") + End If + If ShiftOSDesktop.boughtshiftnet = True And ShiftOSDesktop.installedvirusscanner = False Then lbupgrades.Items.Add("Virus Scanner - 200 CP") + If ShiftOSDesktop.installedvirusscanner = True And ShiftOSDesktop.virusscannergrade = 0 Then lbupgrades.Items.Add("VS Removal Grade 1 - 100 CP") + If ShiftOSDesktop.installedvirusscanner = True And ShiftOSDesktop.virusscannergrade = 1 Then lbupgrades.Items.Add("VS Removal Grade 2 - 100 CP") + If ShiftOSDesktop.installedvirusscanner = True And ShiftOSDesktop.virusscannergrade = 2 Then lbupgrades.Items.Add("VS Removal Grade 3 - 100 CP") + If ShiftOSDesktop.installedvirusscanner = True And ShiftOSDesktop.virusscannergrade = 3 Then lbupgrades.Items.Add("VS Removal Grade 4 - 100 CP") + If ShiftOSDesktop.installedvirusscanner = True And ShiftOSDesktop.boughtvirusscannericon = False Then lbupgrades.Items.Add("Virus Scanner Icon - 15 CP") + If ShiftOSDesktop.installedsysinfo = True And ShiftOSDesktop.boughtsysinfoicon = False Then lbupgrades.Items.Add("System Information Icon - 15 CP") + lbupgrades.Sorted = True + End Sub + + ' New function for The New Calassic: decreases the font size until the whole string fits on the label. + ' This fixes the long-standing issue of upgrade descriptions cutting off. + Private Sub SetUpgradeDescription(ByRef Text As String) + Dim MaxHeight = lbudescription.Height + lbudescription.Text = Text + lbudescription.Font = New Font("Microsoft Sans Serif", 12, FontStyle.Italic, GraphicsUnit.Point) + lbudescription.MaximumSize = New Size(321, 0) + lbudescription.AutoSize = True + While lbudescription.Height > 144 And lbudescription.Font.Size > 9 + lbudescription.Font = New Font(lbudescription.Font.FontFamily, lbudescription.Font.Size - 1, lbudescription.Font.Style, lbudescription.Font.Unit) + End While + Dim FinalSize = lbudescription.Size + lbudescription.AutoSize = False + lbudescription.MaximumSize = New Size(0, 0) + lbudescription.Size = FinalSize + End Sub + + Private Sub handlebuy(ByVal name As String, ByRef bought As Boolean, ByVal boughttutorial As String, ByVal upgradetype As Integer) + + On Error Resume Next + If lbupgrades.SelectedItem.ToString = name Then + If btnbuy.Text = "Buy" Then + If name = "Title Bar - 80 CP" Then Skins.setupdefaults() + pricegrab = lbprice.Text.Substring(0, lbprice.Text.Length - 3) + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints - Convert.ToInt32(pricegrab) + bought = True + lbupgradename.Font = New Font("teen", 13, FontStyle.Bold) + lbupgradename.Text = "Purchased " & lbupgrades.SelectedItem.ToString.Substring(0, lbupgrades.SelectedItem.ToString.IndexOf("-")) + lbudescription.Size = New Size(321, 180) + lbudescription.Location = New Point(24, 47) + SetUpgradeDescription(boughttutorial) + lbprice.Size = New Size(340, 49) + lbprice.Location = New Point(10, 372) + lbprice.Font = New Font("teen", 16, FontStyle.Bold) + picpreview.Location = New Point(25, 237) + lbprice.Text = "Bought for " & lbprice.Text.Substring(0, lbprice.Text.IndexOf(" ")) & " codepoints" + btnbuy.Hide() + lbupgradename.Location = New Point(5, 10) + checkspecial() + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " Used Shiftorium to buy: " & name & Environment.NewLine + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User has " & ShiftOSDesktop.codepoints & " Code Points!" & Environment.NewLine + 'UPDATE VERSION NUMBER + Dim i() As String = Split(ShiftOSDesktop.ingameversion, ".") 'temp varible + Select Case upgradetype + Case 1 + If i(3) = 9 Then + If i(2) = 9 Then + If i(1) = 9 Then + i(0) = i(0) + 1 + i(1) = 0 + Else + i(1) = i(1) + 1 + i(2) = 0 + End If + Else + i(2) = i(2) + 1 + i(3) = 0 + End If + Else + i(3) = i(3) + 1 + End If + Case 2 + If i(2) = 9 Then + If i(1) = 9 Then + i(0) = i(0) + 1 + i(1) = 0 + Else + i(1) = i(1) + 1 + i(2) = 0 + End If + Else + i(2) = i(2) + 1 + End If + End Select + ShiftOSDesktop.ingameversion = i(0) & "." & i(1) & "." & i(2) & "." & i(3) + systeminfo.updateinfo() + End If + End If + End Sub + + Private Sub handleupgradedescription(ByVal itemname As String, ByVal itempic As Image, ByVal itemdescription As String) + On Error Resume Next + If lbupgrades.SelectedItem.ToString = itemname Then + lbupgradename.Font = New Font("teen", 20, FontStyle.Bold) + lbupgradename.Text = lbupgrades.SelectedItem.ToString.Substring(0, lbupgrades.SelectedItem.ToString.IndexOf("-")) + picpreview.Image = itempic + lbprice.Text = lbupgrades.SelectedItem.ToString.Substring(lbupgrades.SelectedItem.ToString.IndexOf("-") + 2, lbupgrades.SelectedItem.ToString.Length - lbupgradename.Text.Length - 2) + lbprice.Size = New Size(139, 59) + lbprice.Location = New Point(3, 362) + lbprice.Font = New Font("teen", 26, FontStyle.Bold) + picpreview.Location = New Point(25, 218) + lbudescription.Location = New Point(24, 61) + lbudescription.Size = New Size(321, 144) + SetUpgradeDescription(itemdescription) + lbupgradename.Location = New Point(5, 17) + btnbuy.Show() + If ShiftOSDesktop.codepoints > Convert.ToInt32(lbprice.Text.Substring(0, lbprice.Text.Length - 3) - 1) Then + btnbuy.Text = "Buy" + Else + btnbuy.Text = "Can't Afford" + End If + End If + End Sub + + Private Sub tmrcodepointsupdate_Tick(sender As Object, e As EventArgs) Handles tmrcodepointsupdate.Tick + lbcodepoints.Text = "Codepoints: " & ShiftOSDesktop.codepoints + End Sub + + Private Sub checkspecial() + If lbupgrades.SelectedItem.ToString = "System Information - 40 CP" Or lbupgrades.SelectedItem.ToString = "AL Unity Mode - 20 CP" Or lbupgrades.SelectedItem.ToString = "Unity Mode Icon - 15 CP" Or lbupgrades.SelectedItem.ToString = "Virus Scanner - 200 CP" Or lbupgrades.SelectedItem.ToString = "System Information Icon - 15 CP" Or lbupgrades.SelectedItem.ToString = "Virus Scanner Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + End If + If lbupgrades.SelectedItem.ToString = "VS Removal Grade 1 - 100 CP" Then ShiftOSDesktop.virusscannergrade = 1 + If lbupgrades.SelectedItem.ToString = "VS Removal Grade 2 - 100 CP" Then ShiftOSDesktop.virusscannergrade = 2 + If lbupgrades.SelectedItem.ToString = "VS Removal Grade 3 - 100 CP" Then ShiftOSDesktop.virusscannergrade = 3 + If lbupgrades.SelectedItem.ToString = "VS Removal Grade 4 - 100 CP" Then ShiftOSDesktop.virusscannergrade = 4 + If lbupgrades.SelectedItem.ToString = "Title Bar - 80 CP" Then + ShiftOSDesktop.titlebarheight = 30 + ShiftOSDesktop.addtitlebars() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + ShiftOSDesktop.setupdesktop() + End If + If lbupgrades.SelectedItem.ToString = "Window Borders - 40 CP" Then + ShiftOSDesktop.windowbordersize = 2 + ShiftOSDesktop.addborders() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + ShiftOSDesktop.setupdesktop() + End If + If lbupgrades.SelectedItem.ToString = "Title Text - 40 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "Close Button - 90 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "Desktop Panel - 150 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "App Launcher Menu - 120 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "Desktop Panel Clock - 75 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "Skinning - 80 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "Panel Buttons - 75 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + Skin_Loader.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "Roll Up Button - 45 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "Minimize Button - 50 CP" Then + ShiftOSDesktop.setupdesktop() + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + Skin_Loader.determinevisibleobjects() + End If + If lbupgrades.SelectedItem.ToString = "AL Knowledge Input - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "AL Clock - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "AL Shiftorium - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "AL Shifter - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "AL Pong - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "AL File Skimmer - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "AL Textpad - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "AL Artpad - 20 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "App Launcher Shutdown - 40 CP" Then ShiftOSDesktop.setupdesktop() + If lbupgrades.SelectedItem.ToString = "Windowed Terminal - 45 CP" Then + ShiftOSDesktop.terminalfullscreen = False + Terminal.miniterminal() + End If + If lbupgrades.SelectedItem.ToString = "Terminal Scrollbar - 20 CP" Then + If ShiftOSDesktop.terminalfullscreen = False Then Terminal.txtterm.ScrollBars = ScrollBars.Vertical + End If + + If lbupgrades.SelectedItem.ToString = "KI Car Brands - 10 CP" Then + If System.IO.File.Exists("C:/ShiftOS/SoftwareData/KnowledgeInput/Car Brands.lst") Then + Else + fs = File.Create("C:/ShiftOS/SoftwareData/KnowledgeInput/Car Brands.lst") + fs.Close() + Knowledge_Input.ListBox1.Items.Add("Car Brands") + Knowledge_Input.makecarbrandslist() + End If + End If + If lbupgrades.SelectedItem.ToString = "KI Game Consoles - 10 CP" Then + If System.IO.File.Exists("C:/ShiftOS/SoftwareData/KnowledgeInput/Game Consoles.lst") Then + Else + fs = File.Create("C:/ShiftOS/SoftwareData/KnowledgeInput/Game Consoles.lst") + fs.Close() + Knowledge_Input.ListBox1.Items.Add("Game Consoles") + Knowledge_Input.makegameconsoleslist() + End If + End If + If lbupgrades.SelectedItem.ToString = "KI Elements - 10 CP" Then + If System.IO.File.Exists("C:/ShiftOS/SoftwareData/KnowledgeInput/Elements.lst") Then + Else + fs = File.Create("C:/ShiftOS/SoftwareData/KnowledgeInput/Elements.lst") + fs.Close() + Knowledge_Input.ListBox1.Items.Add("Elements") + Knowledge_Input.makeelementslist() + End If + End If + If lbupgrades.SelectedItem.ToString = "Knowledge Input Icon - 15 CP" Then + ShiftOSDesktop.titletextside = ShiftOSDesktop.titletextside + 22 + Shifter.setupbuttons() + Shifter.determinevisibleobjects() + ShiftOSDesktop.setupdesktop() + If Knowledge_Input.Visible = True Then Knowledge_Input.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Shifter Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If Shifter.Visible = True Then Shifter.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Shiftorium Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If Me.Visible = True Then Me.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Clock Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If Clock.Visible = True Then Clock.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Shutdown Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + End If + If lbupgrades.SelectedItem.ToString = "Pong Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If Pong.Visible = True Then Pong.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Terminal Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If Terminal.Visible = True Then Terminal.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "File Skimmer Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If File_Skimmer.Visible = True Then File_Skimmer.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Textpad Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If TextPad.Visible = True Then TextPad.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Artpad Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If ArtPad.Visible = True Then ArtPad.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Colour Picker Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If Colour_Picker.Visible = True Then Colour_Picker.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "Infobox Icon - 15 CP" Then + ShiftOSDesktop.setupdesktop() + If infobox.Visible = True Then infobox.pnlicon.Show() + End If + If lbupgrades.SelectedItem.ToString = "FS New Folder - 25 CP" Then + If File_Skimmer.Visible = True Then File_Skimmer.btnnewfolder.Show() + If File_Skimmer.pnlbreak.Visible = False Then File_Skimmer.pnlbreak.Show() + End If + If lbupgrades.SelectedItem.ToString = "FS Delete - 25 CP" Then + If File_Skimmer.Visible = True Then File_Skimmer.btndeletefile.Show() + If File_Skimmer.pnlbreak.Visible = False Then File_Skimmer.pnlbreak.Show() + End If + If lbupgrades.SelectedItem.ToString = "Textpad New - 25 CP" Then + If TextPad.Visible = True Then TextPad.btnnew.Show() + If TextPad.pnlbreak.Visible = False Then TextPad.pnlbreak.Show() + End If + If lbupgrades.SelectedItem.ToString = "Textpad Save - 25 CP" Then + If TextPad.Visible = True Then TextPad.btnsave.Show() + If TextPad.pnlbreak.Visible = False Then TextPad.pnlbreak.Show() + End If + If lbupgrades.SelectedItem.ToString = "Textpad Open - 25 CP" Then + If TextPad.Visible = True Then TextPad.btnopen.Show() + If TextPad.pnlbreak.Visible = False Then TextPad.pnlbreak.Show() + End If + + If lbupgrades.SelectedItem.ToString = "Artpad 4 Color Pallets - 10 CP" Then + ShiftOSDesktop.artpadcolorpalletwidth = 105 + ShiftOSDesktop.artpadcolorpalletheight = 32 + ShiftOSDesktop.artpadcolorpalletsidegap = 4 + ShiftOSDesktop.artpadcolorpallettopgap = 4 + ShiftOSDesktop.artpadvisiblepallets = 4 + ArtPad.determinevisiblepallets() + ArtPad.setuppallets() + End If + If lbupgrades.SelectedItem.ToString = "Artpad 8 Color Pallets - 20 CP" Then + ShiftOSDesktop.artpadcolorpalletwidth = 50 + ShiftOSDesktop.artpadcolorpalletheight = 32 + ShiftOSDesktop.artpadcolorpalletsidegap = 4 + ShiftOSDesktop.artpadcolorpallettopgap = 4 + ShiftOSDesktop.artpadvisiblepallets = 8 + ArtPad.determinevisiblepallets() + ArtPad.setuppallets() + End If + If lbupgrades.SelectedItem.ToString = "Artpad 16 Color Pallets - 35 CP" Then + ShiftOSDesktop.artpadcolorpalletwidth = 50 + ShiftOSDesktop.artpadcolorpalletheight = 14 + ShiftOSDesktop.artpadcolorpalletsidegap = 4 + ShiftOSDesktop.artpadcolorpallettopgap = 4 + ShiftOSDesktop.artpadvisiblepallets = 16 + ArtPad.determinevisiblepallets() + ArtPad.setuppallets() + End If + If lbupgrades.SelectedItem.ToString = "Artpad 32 Color Pallets - 50 CP" Then + ShiftOSDesktop.artpadcolorpalletwidth = 23 + ShiftOSDesktop.artpadcolorpalletheight = 14 + ShiftOSDesktop.artpadcolorpalletsidegap = 4 + ShiftOSDesktop.artpadcolorpallettopgap = 4 + ShiftOSDesktop.artpadvisiblepallets = 32 + ArtPad.determinevisiblepallets() + ArtPad.setuppallets() + End If + If lbupgrades.SelectedItem.ToString = "Artpad 64 Color Pallets - 100 CP" Then + ShiftOSDesktop.artpadcolorpalletwidth = 23 + ShiftOSDesktop.artpadcolorpalletheight = 7 + ShiftOSDesktop.artpadcolorpalletsidegap = 4 + ShiftOSDesktop.artpadcolorpallettopgap = 2 + ShiftOSDesktop.artpadvisiblepallets = 64 + ArtPad.determinevisiblepallets() + ArtPad.setuppallets() + End If + If lbupgrades.SelectedItem.ToString = "Artpad 128 Color Pallets - 150 CP" Then + ShiftOSDesktop.artpadcolorpalletwidth = 12 + ShiftOSDesktop.artpadcolorpalletheight = 8 + ShiftOSDesktop.artpadcolorpalletsidegap = 1 + ShiftOSDesktop.artpadcolorpallettopgap = 1 + ShiftOSDesktop.artpadvisiblepallets = 128 + ArtPad.determinevisiblepallets() + ArtPad.setuppallets() + End If + + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 4 - 10 CP" Then ShiftOSDesktop.artpadpixellimit = 4 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 8 - 20 CP" Then ShiftOSDesktop.artpadpixellimit = 8 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 16 - 30 CP" Then ShiftOSDesktop.artpadpixellimit = 16 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 64 - 50 CP" Then ShiftOSDesktop.artpadpixellimit = 64 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 256 - 75 CP" Then ShiftOSDesktop.artpadpixellimit = 256 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 1024 - 100 CP" Then ShiftOSDesktop.artpadpixellimit = 1024 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 4096 - 150 CP" Then ShiftOSDesktop.artpadpixellimit = 4096 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 16384 - 200 CP" Then ShiftOSDesktop.artpadpixellimit = 16384 + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Limit 65536 - 250 CP" Then ShiftOSDesktop.artpadpixellimit = 65536 + If lbupgrades.SelectedItem.ToString = "Artpad Limitless Pixels - 350 CP" Then ShiftOSDesktop.artpadpixellimit = 1000000 + + If lbupgrades.SelectedItem.ToString = "Artpad New - 10 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Pixel Placer - 20 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad PP Movement Mode - 20 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Pencil - 30 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Paint Brush - 30 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Line Tool - 30 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Oval Tool - 40 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Rectangle Tool - 40 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Eraser - 20 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Fill Tool - 60 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Text Tool - 45 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Undo - 40 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Redo - 40 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Save - 50 CP" Then ArtPad.setuptoolbox() + If lbupgrades.SelectedItem.ToString = "Artpad Load - 50 CP" Then ArtPad.setuptoolbox() + + 'ShiftOSDesktop.setcolours() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Skin Loader.Designer.vb b/ShiftOS/Skin Loader.Designer.vb new file mode 100644 index 0000000..1a0616a --- /dev/null +++ b/ShiftOS/Skin Loader.Designer.vb @@ -0,0 +1,722 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Skin_Loader + 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() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.btnapplyskin = New System.Windows.Forms.Button() + Me.btnsaveskin = New System.Windows.Forms.Button() + Me.btnloadskin = New System.Windows.Forms.Button() + Me.Label2 = New System.Windows.Forms.Label() + Me.btnclose = New System.Windows.Forms.Button() + Me.pnldesktoppreview = New System.Windows.Forms.Panel() + Me.predesktoppanel = New System.Windows.Forms.Panel() + Me.prepnlpanelbuttonholder = New System.Windows.Forms.FlowLayoutPanel() + Me.prepnlpanelbutton = New System.Windows.Forms.Panel() + Me.pretbicon = New System.Windows.Forms.PictureBox() + Me.pretbctext = New System.Windows.Forms.Label() + Me.pretimepanel = New System.Windows.Forms.Panel() + Me.prepaneltimetext = New System.Windows.Forms.Label() + Me.preapplaunchermenuholder = New System.Windows.Forms.Panel() + Me.predesktopappmenu = New System.Windows.Forms.MenuStrip() + Me.ApplicationsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.KnowledgeInputToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShiftoriumToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ClockToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TerminalToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShifterToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.ShutdownToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.Label1 = New System.Windows.Forms.Label() + Me.pnlwindowpreview = New System.Windows.Forms.Panel() + Me.prepgcontent = New System.Windows.Forms.Panel() + Me.prepgbottom = New System.Windows.Forms.Panel() + Me.prepgleft = New System.Windows.Forms.Panel() + Me.prepgbottomlcorner = New System.Windows.Forms.Panel() + Me.prepgright = New System.Windows.Forms.Panel() + Me.prepgbottomrcorner = New System.Windows.Forms.Panel() + Me.pretitlebar = New System.Windows.Forms.Panel() + Me.preminimizebutton = New System.Windows.Forms.Panel() + Me.prepnlicon = New System.Windows.Forms.PictureBox() + Me.prerollupbutton = New System.Windows.Forms.Panel() + Me.preclosebutton = New System.Windows.Forms.Panel() + Me.pretitletext = New System.Windows.Forms.Label() + Me.prepgtoplcorner = New System.Windows.Forms.Panel() + Me.prepgtoprcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents.SuspendLayout() + Me.pnldesktoppreview.SuspendLayout() + Me.predesktoppanel.SuspendLayout() + Me.prepnlpanelbuttonholder.SuspendLayout() + Me.prepnlpanelbutton.SuspendLayout() + CType(Me.pretbicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pretimepanel.SuspendLayout() + Me.preapplaunchermenuholder.SuspendLayout() + Me.predesktopappmenu.SuspendLayout() + Me.pnlwindowpreview.SuspendLayout() + Me.prepgleft.SuspendLayout() + Me.prepgright.SuspendLayout() + Me.pretitlebar.SuspendLayout() + CType(Me.prepnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.btnapplyskin) + Me.pgcontents.Controls.Add(Me.btnsaveskin) + Me.pgcontents.Controls.Add(Me.btnloadskin) + Me.pgcontents.Controls.Add(Me.Label2) + Me.pgcontents.Controls.Add(Me.btnclose) + Me.pgcontents.Controls.Add(Me.pnldesktoppreview) + Me.pgcontents.Controls.Add(Me.Label1) + Me.pgcontents.Controls.Add(Me.pnlwindowpreview) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(472, 430) + Me.pgcontents.TabIndex = 20 + ' + 'btnapplyskin + ' + Me.btnapplyskin.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnapplyskin.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnapplyskin.Location = New System.Drawing.Point(352, 389) + Me.btnapplyskin.Name = "btnapplyskin" + Me.btnapplyskin.Size = New System.Drawing.Size(107, 32) + Me.btnapplyskin.TabIndex = 9 + Me.btnapplyskin.Text = "Apply Skin" + Me.btnapplyskin.UseVisualStyleBackColor = True + ' + 'btnsaveskin + ' + Me.btnsaveskin.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsaveskin.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsaveskin.Location = New System.Drawing.Point(239, 389) + Me.btnsaveskin.Name = "btnsaveskin" + Me.btnsaveskin.Size = New System.Drawing.Size(107, 32) + Me.btnsaveskin.TabIndex = 8 + Me.btnsaveskin.Text = "Save Skin" + Me.btnsaveskin.UseVisualStyleBackColor = True + ' + 'btnloadskin + ' + Me.btnloadskin.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnloadskin.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnloadskin.Location = New System.Drawing.Point(126, 389) + Me.btnloadskin.Name = "btnloadskin" + Me.btnloadskin.Size = New System.Drawing.Size(107, 32) + Me.btnloadskin.TabIndex = 7 + Me.btnloadskin.Text = "Load Skin" + Me.btnloadskin.UseVisualStyleBackColor = True + ' + 'Label2 + ' + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(4, 200) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(464, 30) + Me.Label2.TabIndex = 6 + Me.Label2.Text = "Desktop Preview" + Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnclose + ' + Me.btnclose.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnclose.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnclose.Location = New System.Drawing.Point(13, 389) + Me.btnclose.Name = "btnclose" + Me.btnclose.Size = New System.Drawing.Size(107, 32) + Me.btnclose.TabIndex = 5 + Me.btnclose.Text = "Close" + Me.btnclose.UseVisualStyleBackColor = True + ' + 'pnldesktoppreview + ' + Me.pnldesktoppreview.Controls.Add(Me.predesktoppanel) + Me.pnldesktoppreview.Location = New System.Drawing.Point(13, 233) + Me.pnldesktoppreview.Name = "pnldesktoppreview" + Me.pnldesktoppreview.Size = New System.Drawing.Size(448, 148) + Me.pnldesktoppreview.TabIndex = 4 + ' + 'predesktoppanel + ' + Me.predesktoppanel.BackColor = System.Drawing.Color.Gray + Me.predesktoppanel.Controls.Add(Me.prepnlpanelbuttonholder) + Me.predesktoppanel.Controls.Add(Me.pretimepanel) + Me.predesktoppanel.Controls.Add(Me.preapplaunchermenuholder) + Me.predesktoppanel.Dock = System.Windows.Forms.DockStyle.Top + Me.predesktoppanel.Location = New System.Drawing.Point(0, 0) + Me.predesktoppanel.Name = "predesktoppanel" + Me.predesktoppanel.Size = New System.Drawing.Size(448, 25) + Me.predesktoppanel.TabIndex = 1 + ' + 'prepnlpanelbuttonholder + ' + Me.prepnlpanelbuttonholder.BackColor = System.Drawing.Color.Transparent + Me.prepnlpanelbuttonholder.Controls.Add(Me.prepnlpanelbutton) + Me.prepnlpanelbuttonholder.Dock = System.Windows.Forms.DockStyle.Fill + Me.prepnlpanelbuttonholder.Location = New System.Drawing.Point(116, 0) + Me.prepnlpanelbuttonholder.Name = "prepnlpanelbuttonholder" + Me.prepnlpanelbuttonholder.Padding = New System.Windows.Forms.Padding(2, 0, 0, 0) + Me.prepnlpanelbuttonholder.Size = New System.Drawing.Size(235, 25) + Me.prepnlpanelbuttonholder.TabIndex = 7 + ' + 'prepnlpanelbutton + ' + Me.prepnlpanelbutton.BackColor = System.Drawing.Color.Black + Me.prepnlpanelbutton.Controls.Add(Me.pretbicon) + Me.prepnlpanelbutton.Controls.Add(Me.pretbctext) + Me.prepnlpanelbutton.Location = New System.Drawing.Point(5, 3) + Me.prepnlpanelbutton.Name = "prepnlpanelbutton" + Me.prepnlpanelbutton.Size = New System.Drawing.Size(126, 20) + Me.prepnlpanelbutton.TabIndex = 18 + Me.prepnlpanelbutton.Visible = False + ' + 'pretbicon + ' + Me.pretbicon.BackColor = System.Drawing.Color.Transparent + Me.pretbicon.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch + Me.pretbicon.Image = Global.ShiftOS.My.Resources.Resources.iconShifter + Me.pretbicon.Location = New System.Drawing.Point(4, 2) + Me.pretbicon.Name = "pretbicon" + Me.pretbicon.Size = New System.Drawing.Size(16, 16) + Me.pretbicon.TabIndex = 1 + Me.pretbicon.TabStop = False + ' + 'pretbctext + ' + Me.pretbctext.AutoSize = True + Me.pretbctext.BackColor = System.Drawing.Color.Transparent + Me.pretbctext.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.pretbctext.ForeColor = System.Drawing.Color.White + Me.pretbctext.Location = New System.Drawing.Point(24, 2) + Me.pretbctext.Name = "pretbctext" + Me.pretbctext.Size = New System.Drawing.Size(45, 16) + Me.pretbctext.TabIndex = 0 + Me.pretbctext.Text = "Shifter" + ' + 'pretimepanel + ' + Me.pretimepanel.Controls.Add(Me.prepaneltimetext) + Me.pretimepanel.Dock = System.Windows.Forms.DockStyle.Right + Me.pretimepanel.Location = New System.Drawing.Point(351, 0) + Me.pretimepanel.Name = "pretimepanel" + Me.pretimepanel.Size = New System.Drawing.Size(97, 25) + Me.pretimepanel.TabIndex = 5 + ' + 'prepaneltimetext + ' + Me.prepaneltimetext.AutoSize = True + Me.prepaneltimetext.BackColor = System.Drawing.Color.Transparent + Me.prepaneltimetext.Font = New System.Drawing.Font("Trebuchet MS", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.prepaneltimetext.Location = New System.Drawing.Point(5, 0) + Me.prepaneltimetext.Name = "prepaneltimetext" + Me.prepaneltimetext.Size = New System.Drawing.Size(80, 24) + Me.prepaneltimetext.TabIndex = 1 + Me.prepaneltimetext.Text = "5000023" + Me.prepaneltimetext.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'preapplaunchermenuholder + ' + Me.preapplaunchermenuholder.Controls.Add(Me.predesktopappmenu) + Me.preapplaunchermenuholder.Dock = System.Windows.Forms.DockStyle.Left + Me.preapplaunchermenuholder.Location = New System.Drawing.Point(0, 0) + Me.preapplaunchermenuholder.Name = "preapplaunchermenuholder" + Me.preapplaunchermenuholder.Size = New System.Drawing.Size(116, 25) + Me.preapplaunchermenuholder.TabIndex = 4 + ' + 'predesktopappmenu + ' + Me.predesktopappmenu.AutoSize = False + Me.predesktopappmenu.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ApplicationsToolStripMenuItem}) + Me.predesktopappmenu.LayoutStyle = System.Windows.Forms.ToolStripLayoutStyle.HorizontalStackWithOverflow + Me.predesktopappmenu.Location = New System.Drawing.Point(0, 0) + Me.predesktopappmenu.Name = "predesktopappmenu" + Me.predesktopappmenu.Padding = New System.Windows.Forms.Padding(0) + Me.predesktopappmenu.Size = New System.Drawing.Size(116, 24) + Me.predesktopappmenu.TabIndex = 0 + Me.predesktopappmenu.Text = "MenuStrip1" + ' + 'ApplicationsToolStripMenuItem + ' + Me.ApplicationsToolStripMenuItem.AutoSize = False + Me.ApplicationsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.KnowledgeInputToolStripMenuItem, Me.ShiftoriumToolStripMenuItem, Me.ClockToolStripMenuItem, Me.TerminalToolStripMenuItem, Me.ShifterToolStripMenuItem, Me.ToolStripSeparator1, Me.ShutdownToolStripMenuItem}) + Me.ApplicationsToolStripMenuItem.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.749999!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.ApplicationsToolStripMenuItem.Name = "ApplicationsToolStripMenuItem" + Me.ApplicationsToolStripMenuItem.Padding = New System.Windows.Forms.Padding(2, 0, 2, 0) + Me.ApplicationsToolStripMenuItem.ShowShortcutKeys = False + Me.ApplicationsToolStripMenuItem.Size = New System.Drawing.Size(102, 24) + Me.ApplicationsToolStripMenuItem.Text = "Applications" + Me.ApplicationsToolStripMenuItem.TextDirection = System.Windows.Forms.ToolStripTextDirection.Horizontal + Me.ApplicationsToolStripMenuItem.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage + ' + 'KnowledgeInputToolStripMenuItem + ' + Me.KnowledgeInputToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.KnowledgeInputToolStripMenuItem.Name = "KnowledgeInputToolStripMenuItem" + Me.KnowledgeInputToolStripMenuItem.ShowShortcutKeys = False + Me.KnowledgeInputToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.KnowledgeInputToolStripMenuItem.Text = "Knowledge Input" + ' + 'ShiftoriumToolStripMenuItem + ' + Me.ShiftoriumToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShiftoriumToolStripMenuItem.Name = "ShiftoriumToolStripMenuItem" + Me.ShiftoriumToolStripMenuItem.ShowShortcutKeys = False + Me.ShiftoriumToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ShiftoriumToolStripMenuItem.Text = "Shiftorium" + ' + 'ClockToolStripMenuItem + ' + Me.ClockToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ClockToolStripMenuItem.Name = "ClockToolStripMenuItem" + Me.ClockToolStripMenuItem.ShowShortcutKeys = False + Me.ClockToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ClockToolStripMenuItem.Text = "Clock" + ' + 'TerminalToolStripMenuItem + ' + Me.TerminalToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.TerminalToolStripMenuItem.Name = "TerminalToolStripMenuItem" + Me.TerminalToolStripMenuItem.ShowShortcutKeys = False + Me.TerminalToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.TerminalToolStripMenuItem.Text = "Terminal" + ' + 'ShifterToolStripMenuItem + ' + Me.ShifterToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShifterToolStripMenuItem.Name = "ShifterToolStripMenuItem" + Me.ShifterToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ShifterToolStripMenuItem.Text = "Shifter" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.BackColor = System.Drawing.Color.Transparent + Me.ToolStripSeparator1.ForeColor = System.Drawing.Color.White + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(178, 6) + ' + 'ShutdownToolStripMenuItem + ' + Me.ShutdownToolStripMenuItem.BackColor = System.Drawing.Color.Transparent + Me.ShutdownToolStripMenuItem.Name = "ShutdownToolStripMenuItem" + Me.ShutdownToolStripMenuItem.Size = New System.Drawing.Size(181, 22) + Me.ShutdownToolStripMenuItem.Text = "Shut Down" + ' + 'Label1 + ' + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(4, 6) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(464, 30) + Me.Label1.TabIndex = 2 + Me.Label1.Text = "Window Preview" + Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'pnlwindowpreview + ' + Me.pnlwindowpreview.Controls.Add(Me.prepgcontent) + Me.pnlwindowpreview.Controls.Add(Me.prepgbottom) + Me.pnlwindowpreview.Controls.Add(Me.prepgleft) + Me.pnlwindowpreview.Controls.Add(Me.prepgright) + Me.pnlwindowpreview.Controls.Add(Me.pretitlebar) + Me.pnlwindowpreview.Location = New System.Drawing.Point(13, 39) + Me.pnlwindowpreview.Name = "pnlwindowpreview" + Me.pnlwindowpreview.Size = New System.Drawing.Size(448, 148) + Me.pnlwindowpreview.TabIndex = 1 + ' + 'prepgcontent + ' + Me.prepgcontent.Dock = System.Windows.Forms.DockStyle.Fill + Me.prepgcontent.Location = New System.Drawing.Point(2, 30) + Me.prepgcontent.Name = "prepgcontent" + Me.prepgcontent.Size = New System.Drawing.Size(444, 116) + Me.prepgcontent.TabIndex = 20 + ' + 'prepgbottom + ' + Me.prepgbottom.BackColor = System.Drawing.Color.Gray + Me.prepgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.prepgbottom.Location = New System.Drawing.Point(2, 146) + Me.prepgbottom.Name = "prepgbottom" + Me.prepgbottom.Size = New System.Drawing.Size(444, 2) + Me.prepgbottom.TabIndex = 23 + ' + 'prepgleft + ' + Me.prepgleft.BackColor = System.Drawing.Color.Gray + Me.prepgleft.Controls.Add(Me.prepgbottomlcorner) + Me.prepgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.prepgleft.Location = New System.Drawing.Point(0, 30) + Me.prepgleft.Name = "prepgleft" + Me.prepgleft.Size = New System.Drawing.Size(2, 118) + Me.prepgleft.TabIndex = 21 + ' + 'prepgbottomlcorner + ' + Me.prepgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.prepgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.prepgbottomlcorner.Location = New System.Drawing.Point(0, 116) + Me.prepgbottomlcorner.Name = "prepgbottomlcorner" + Me.prepgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.prepgbottomlcorner.TabIndex = 14 + ' + 'prepgright + ' + Me.prepgright.BackColor = System.Drawing.Color.Gray + Me.prepgright.Controls.Add(Me.prepgbottomrcorner) + Me.prepgright.Dock = System.Windows.Forms.DockStyle.Right + Me.prepgright.Location = New System.Drawing.Point(446, 30) + Me.prepgright.Name = "prepgright" + Me.prepgright.Size = New System.Drawing.Size(2, 118) + Me.prepgright.TabIndex = 22 + ' + 'prepgbottomrcorner + ' + Me.prepgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.prepgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.prepgbottomrcorner.Location = New System.Drawing.Point(0, 116) + Me.prepgbottomrcorner.Name = "prepgbottomrcorner" + Me.prepgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.prepgbottomrcorner.TabIndex = 15 + ' + 'pretitlebar + ' + Me.pretitlebar.BackColor = System.Drawing.Color.Gray + Me.pretitlebar.Controls.Add(Me.preminimizebutton) + Me.pretitlebar.Controls.Add(Me.prepnlicon) + Me.pretitlebar.Controls.Add(Me.prerollupbutton) + Me.pretitlebar.Controls.Add(Me.preclosebutton) + Me.pretitlebar.Controls.Add(Me.pretitletext) + Me.pretitlebar.Controls.Add(Me.prepgtoplcorner) + Me.pretitlebar.Controls.Add(Me.prepgtoprcorner) + Me.pretitlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.pretitlebar.ForeColor = System.Drawing.Color.White + Me.pretitlebar.Location = New System.Drawing.Point(0, 0) + Me.pretitlebar.Name = "pretitlebar" + Me.pretitlebar.Size = New System.Drawing.Size(448, 30) + Me.pretitlebar.TabIndex = 19 + ' + 'preminimizebutton + ' + Me.preminimizebutton.BackColor = System.Drawing.Color.Black + Me.preminimizebutton.Location = New System.Drawing.Point(362, 5) + Me.preminimizebutton.Name = "preminimizebutton" + Me.preminimizebutton.Size = New System.Drawing.Size(22, 22) + Me.preminimizebutton.TabIndex = 32 + ' + 'prepnlicon + ' + Me.prepnlicon.BackColor = System.Drawing.Color.Transparent + Me.prepnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconSkinLoader + Me.prepnlicon.Location = New System.Drawing.Point(8, 8) + Me.prepnlicon.Name = "prepnlicon" + Me.prepnlicon.Size = New System.Drawing.Size(16, 16) + Me.prepnlicon.TabIndex = 32 + Me.prepnlicon.TabStop = False + Me.prepnlicon.Visible = False + ' + 'prerollupbutton + ' + Me.prerollupbutton.BackColor = System.Drawing.Color.Black + Me.prerollupbutton.Location = New System.Drawing.Point(390, 5) + Me.prerollupbutton.Name = "prerollupbutton" + Me.prerollupbutton.Size = New System.Drawing.Size(22, 22) + Me.prerollupbutton.TabIndex = 31 + ' + 'preclosebutton + ' + Me.preclosebutton.BackColor = System.Drawing.Color.Black + Me.preclosebutton.Location = New System.Drawing.Point(419, 5) + Me.preclosebutton.Name = "preclosebutton" + Me.preclosebutton.Size = New System.Drawing.Size(22, 22) + Me.preclosebutton.TabIndex = 20 + ' + 'pretitletext + ' + Me.pretitletext.AutoSize = True + Me.pretitletext.BackColor = System.Drawing.Color.Transparent + Me.pretitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.pretitletext.Location = New System.Drawing.Point(29, 7) + Me.pretitletext.Name = "pretitletext" + Me.pretitletext.Size = New System.Drawing.Size(77, 18) + Me.pretitletext.TabIndex = 19 + Me.pretitletext.Text = "Template" + ' + 'prepgtoplcorner + ' + Me.prepgtoplcorner.BackColor = System.Drawing.Color.Red + Me.prepgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.prepgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.prepgtoplcorner.Name = "prepgtoplcorner" + Me.prepgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.prepgtoplcorner.TabIndex = 17 + ' + 'prepgtoprcorner + ' + Me.prepgtoprcorner.BackColor = System.Drawing.Color.Red + Me.prepgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.prepgtoprcorner.Location = New System.Drawing.Point(446, 0) + Me.prepgtoprcorner.Name = "prepgtoprcorner" + Me.prepgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.prepgtoprcorner.TabIndex = 16 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 432) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 430) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(474, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 432) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 430) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(476, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(391, 2) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconSkinLoader + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(419, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(447, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(98, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Skin Loader" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(474, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 460) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(472, 2) + Me.pgbottom.TabIndex = 23 + ' + 'Skin_Loader + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(476, 462) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Skin_Loader" + Me.Text = "Skin_Loader" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnldesktoppreview.ResumeLayout(False) + Me.predesktoppanel.ResumeLayout(False) + Me.prepnlpanelbuttonholder.ResumeLayout(False) + Me.prepnlpanelbutton.ResumeLayout(False) + Me.prepnlpanelbutton.PerformLayout() + CType(Me.pretbicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pretimepanel.ResumeLayout(False) + Me.pretimepanel.PerformLayout() + Me.preapplaunchermenuholder.ResumeLayout(False) + Me.predesktopappmenu.ResumeLayout(False) + Me.predesktopappmenu.PerformLayout() + Me.pnlwindowpreview.ResumeLayout(False) + Me.prepgleft.ResumeLayout(False) + Me.prepgright.ResumeLayout(False) + Me.pretitlebar.ResumeLayout(False) + Me.pretitlebar.PerformLayout() + CType(Me.prepnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents pnlwindowpreview As System.Windows.Forms.Panel + Friend WithEvents prepgcontent As System.Windows.Forms.Panel + Friend WithEvents prepgbottom As System.Windows.Forms.Panel + Friend WithEvents prepgleft As System.Windows.Forms.Panel + Friend WithEvents prepgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents prepgright As System.Windows.Forms.Panel + Friend WithEvents prepgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pretitlebar As System.Windows.Forms.Panel + Friend WithEvents prepnlicon As System.Windows.Forms.PictureBox + Friend WithEvents prerollupbutton As System.Windows.Forms.Panel + Friend WithEvents preclosebutton As System.Windows.Forms.Panel + Friend WithEvents pretitletext As System.Windows.Forms.Label + Friend WithEvents prepgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents prepgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents btnapplyskin As System.Windows.Forms.Button + Friend WithEvents btnsaveskin As System.Windows.Forms.Button + Friend WithEvents btnloadskin As System.Windows.Forms.Button + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents btnclose As System.Windows.Forms.Button + Friend WithEvents pnldesktoppreview As System.Windows.Forms.Panel + Friend WithEvents predesktoppanel As System.Windows.Forms.Panel + Friend WithEvents pretimepanel As System.Windows.Forms.Panel + Friend WithEvents prepaneltimetext As System.Windows.Forms.Label + Friend WithEvents preapplaunchermenuholder As System.Windows.Forms.Panel + Friend WithEvents predesktopappmenu As System.Windows.Forms.MenuStrip + Friend WithEvents ApplicationsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents KnowledgeInputToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShiftoriumToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ClockToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TerminalToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ShifterToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ShutdownToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents preminimizebutton As System.Windows.Forms.Panel + Friend WithEvents prepnlpanelbuttonholder As System.Windows.Forms.FlowLayoutPanel + Friend WithEvents prepnlpanelbutton As System.Windows.Forms.Panel + Friend WithEvents pretbicon As System.Windows.Forms.PictureBox + Friend WithEvents pretbctext As System.Windows.Forms.Label +End Class diff --git a/ShiftOS/Skin Loader.resx b/ShiftOS/Skin Loader.resx new file mode 100644 index 0000000..d6335c3 --- /dev/null +++ b/ShiftOS/Skin Loader.resx @@ -0,0 +1,123 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="predesktopappmenu.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Skin Loader.vb b/ShiftOS/Skin Loader.vb new file mode 100644 index 0000000..c05e6ad --- /dev/null +++ b/ShiftOS/Skin Loader.vb @@ -0,0 +1,1569 @@ +Imports System.IO + +Public Class Skin_Loader + ' Variables + Public rolldownsize As Integer ' Roll down size + Public oldbordersize As Integer ' Old border size + Public oldtitlebarheight As Integer ' Old title bar height + Public justopened As Boolean = False ' Just opened? + Public needtorollback As Boolean = False ' Need to roll back? + Public minimumsizewidth As Integer = 0 ' Minimum size width + Public minimumsizeheight As Integer = 0 ' Minimum size height + Public ShiftOSPath As String = "C:\ShiftOS\" + Dim firstload As Boolean = True + + Public oldpreheight As Integer = 40 + + ' Has a skin been loaded? + Public skinloaded As Boolean = False + + Public savelines(200) As String + Public loadlines(200) As String + + Dim titlebarcolour As Color ' Title bar colour + Dim windowbordercolour As Color ' Window border colour + Dim windowbordersize As Integer ' Window border size + Dim titlebarheight As Integer ' Title bar height + Dim closebuttoncolour As Color ' Close button colour + Dim closebuttonheight As Integer ' Close button height + Dim closebuttonwidth As Integer ' Close button width + Dim closebuttonside As Integer ' How many pixels away the close button is from the side of the window border edge + Dim closebuttontop As Integer ' How many pixels away the close button is from the top of the window bordeer + Dim titletextcolour As Color ' Title bar text colour + Dim titletexttop As Integer ' How many pixels away the title bar text is from the top of the window border + Dim titletextside As Integer ' How many pixels away the title bar text is from the side of the window border + Dim titletextsize As Integer ' The font size of the title bar text + Dim titletextfont As String ' The font of the title bar + Dim titletextstyle As FontStyle ' The title bar text's font style + Dim desktoppanelcolour As Color ' The desktop panel colour + Dim desktopbackgroundcolour As Color ' The desktop background colour + Dim desktoppanelheight As Integer ' The desktop panel's height + Dim desktoppanelposition As String ' The desktop panel's position (top, bottom) + Dim clocktextcolour As Color ' The clock's text colour + Dim clockbackgroundcolor As Color ' The clock background colour. + Dim panelclocktexttop As Integer ' How many pixels away the panel clock text is from the top of the desktop panel + Dim panelclocktextsize As Integer ' Font size of the panel clock + Dim panelclocktextfont As String ' The panel clock's font (Wingdings/Webdings = fun clock) + Dim panelclocktextstyle As FontStyle ' The panel clock's font style + Dim applauncherbuttoncolour As Color ' The button colour in the Application Launcher + Dim applauncherbuttonclickedcolour As Color ' The colour that the button in the App Launcher will be when clicked + Dim applauncherbackgroundcolour As Color ' Application Launcher background colour + Dim applaunchermouseovercolour As Color ' When the mouse is over the App Launcher, it's colour will be this + Dim applicationsbuttontextcolour As Color ' The "Applications" button's text colour + Dim applicationbuttonheight As Integer ' The height of the "Applications" button + Dim applicationbuttontextsize As Integer ' The font size of the "Applications" button + Dim applicationbuttontextfont As String ' The font used by the "Applications" button + Dim applicationbuttontextstyle As FontStyle ' The font style used by the "Applications" button + Dim applicationlaunchername As String ' The name of the application launcher + Dim titletextposition As String ' A window's title bar text position (string) + Dim rollupbuttoncolour As Color ' The colour of the roll-up button + Dim rollupbuttonheight As Integer ' The height of the roll-up button + Dim rollupbuttonwidth As Integer ' The width of the roll-up button + Dim rollupbuttonside As Integer ' How far away the roll-up button is from the side of the title bar (in pixels) + Dim rollupbuttontop As Integer ' How far away the roll-up button is from the top of the title bar (in pixels) + Dim titlebariconside As Integer ' How far away the title bar icon is from the side of the title bar (in pixels) + Dim titlebaricontop As Integer ' How far away the title bar icon is from the top of the title bar (in pixels) + Dim showwindowcorners As Boolean ' Show window corners? + Dim titlebarcornerwidth As Integer ' The width of the title bar corner + Dim titlebarrightcornercolour As Color ' The right corner of the title bar's colour + Dim titlebarleftcornercolour As Color ' The left corner of the title bar's colour + Dim applaunchermenuholderwidth As Integer ' The application launcher's holder's width + Dim windowborderleftcolour As Color ' The left side of the window border's colour + Dim windowborderrightcolour As Color ' The right side of the window border's colour + Dim windowborderbottomcolour As Color ' The bottom portion of the window border's colour + Dim windowborderbottomrightcolour As Color ' The bottom right corner of the window border's colour + Dim windowborderbottomleftcolour As Color ' The bottom left corner of the window border's colour + + Dim panelbuttonicontop As Integer ' How far the panel button icon is from the top of the panel (in pixels) + Dim panelbuttoniconside As Integer ' How far the panel button is from the sides of the panel (in pixels) + Dim panelbuttoniconsize As Integer ' The size of the panel button's icon + Dim panelbuttonheight As Integer ' The panel button's height + Dim panelbuttonwidth As Integer ' The panel button's width + Dim panelbuttoncolour As Color ' The panel button's colour + Dim panelbuttontextcolour As Color ' The panel button's text colour + Dim panelbuttontextsize As Integer ' The panel button's text size + Dim panelbuttontextfont As String ' The panel button's text font + Dim panelbuttontextstyle As FontStyle ' The panel button's font style + Dim panelbuttontextside As Integer ' How many pixels away the panel button text is from the side + Dim panelbuttontexttop As Integer ' How many pixels away the panel button text is from the top + Dim panelbuttongap As Integer ' The panel button gap + Dim panelbuttonfromtop As Integer ' How far away the panel button is from the top (in pixels) + Dim panelbuttoninitialgap As Integer ' Initial panel button gap + Dim minimizebuttoncolour As Color ' Minimize button colour + Dim minimizebuttonheight As Integer ' Minimize button height + Dim minimizebuttonwidth As Integer ' Minimize button width + Dim minimizebuttonside As Integer ' How far away the minimize button is from the side of the window border (pixels) + Dim minimizebuttontop As Integer ' How far away the minimize button is from the top of the window border (pixels) + + 'skins + Dim skinloaderskinimages(100) As String + Dim skinloaderskinclosebutton(2) As Image + Dim skinclosebuttonstyle As ImageLayout + Dim skinloaderskintitlebar(2) As Image + Dim skintitlebarstyle As ImageLayout + Dim skinloaderskindesktopbackground(2) As Image + Dim skindesktopbackgroundstyle As ImageLayout + Dim skinloaderskinrollupbutton(2) As Image + Dim skinrollupbuttonstyle As ImageLayout + Dim skinloaderskintitlebarrightcorner(2) As Image + Dim skintitlebarrightcornerstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskintitlebarleftcorner(2) As Image + Dim skintitlebarleftcornerstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskindesktoppanel(2) As Image + Dim skindesktoppanelstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskindesktoppaneltime(2) As Image + Dim skindesktoppaneltimestyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinapplauncherbutton(2) As Image + Dim skinapplauncherbuttonstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinwindowborderleft(2) As Image + Dim skinwindowborderleftstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinwindowborderright(2) As Image + Dim skinwindowborderrightstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinwindowborderbottom(2) As Image + Dim skinwindowborderbottomstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinwindowborderbottomright(2) As Image + Dim skinwindowborderbottomrightstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinwindowborderbottomleft(2) As Image + Dim skinwindowborderbottomleftstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinpanelbutton(2) As Image + Dim skinpanelbuttonstyle As ImageLayout = ImageLayout.Stretch + Dim skinloaderskinminimizebutton(2) As Image + Dim skinminimizebuttonstyle As ImageLayout = ImageLayout.Stretch + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.SkinLoaderCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonskinloader.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonskinloader, ShiftOSDesktop.tbskinloadericon, ShiftOSDesktop.tbskinloadertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + initialsetup() + setpreviewtocurrentskin() + determinevisibleobjects() + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + Try + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + + If justopened = True Then + Me.Size = New Size(476, 462) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), ((Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + (pretitlebar.Size.Height + predesktoppanel.Size.Height - oldpreheight)) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.skinloadername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtskinning = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.skinloadericontitlebar 'Replace with the correct icon for the program. + End If + + Catch ex As Exception + End Try + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub initialsetup() + titlebarcolour = Skins.titlebarcolour + windowbordercolour = Skins.borderleftcolour + windowbordersize = Skins.borderwidth + titlebarheight = Skins.titlebarheight + closebuttoncolour = Skins.closebtncolour + closebuttonheight = Skins.closebtnsize.Height + closebuttonwidth = Skins.closebtnsize.Width + closebuttontop = Skins.closebtnfromtop + closebuttonside = Skins.closebtnfromside + titletextcolour = Skins.closebtncolour + titletexttop = Skins.titletextfromtop + titletextside = Skins.titletextfromside + titletextsize = Skins.titletextfontsize + titletextfont = Skins.titletextfontfamily + titletextstyle = Skins.titletextfontstyle + desktoppanelcolour = Skins.desktoppanelcolour + desktopbackgroundcolour = Skins.desktopbackgroundcolour + desktoppanelheight = Skins.desktoppanelheight + desktoppanelposition = Skins.desktoppanelposition + clocktextcolour = Skins.clocktextcolour + clockbackgroundcolor = Skins.clockbackgroundcolor + panelclocktexttop = Skins.panelclocktexttop + panelclocktextsize = Skins.panelclocktextsize + panelclocktextfont = Skins.panelclocktextfont + panelclocktextstyle = Skins.panelclocktextstyle + applauncherbuttoncolour = Skins.applauncherbuttoncolour + applauncherbuttonclickedcolour = Skins.applauncherbuttonclickedcolour + applauncherbackgroundcolour = Skins.applauncherbackgroundcolour + applaunchermouseovercolour = Skins.applaunchermouseovercolour + applicationsbuttontextcolour = Skins.applicationsbuttontextcolour + applicationbuttonheight = Skins.applicationbuttonheight + applicationbuttontextsize = Skins.applicationbuttontextsize + applicationbuttontextfont = Skins.applicationbuttontextfont + applicationbuttontextstyle = Skins.applicationbuttontextstyle + applicationlaunchername = Skins.applicationlaunchername + titletextposition = Skins.titletextpos + rollupbuttoncolour = Skins.rollbtncolour + rollupbuttonheight = Skins.rollbtnsize.Height + rollupbuttonwidth = Skins.rollbtnsize.Width + rollupbuttonside = Skins.rollbtnfromside + rollupbuttontop = Skins.rollbtnfromtop + titlebariconside = Skins.titleiconfromside + titlebaricontop = Skins.titleiconfromtop + titlebarcornerwidth = Skins.titlebarcornerwidth + titlebarrightcornercolour = Skins.rightcornercolour + titlebarleftcornercolour = Skins.leftcornercolour + showwindowcorners = Skins.enablecorners + applaunchermenuholderwidth = Skins.applaunchermenuholderwidth + windowborderleftcolour = Skins.borderleftcolour + windowborderrightcolour = Skins.borderrightcolour + windowborderbottomcolour = Skins.borderbottomcolour + windowborderbottomrightcolour = Skins.bottomrightcornercolour + windowborderbottomleftcolour = Skins.bottomleftcornercolour + panelbuttonicontop = Skins.panelbuttonicontop + panelbuttoniconside = Skins.panelbuttoniconside + panelbuttoniconsize = Skins.panelbuttoniconsize + panelbuttoniconsize = Skins.panelbuttoniconsize + panelbuttonheight = Skins.panelbuttonheight + panelbuttonwidth = Skins.panelbuttonwidth + panelbuttoncolour = Skins.panelbuttoncolour + panelbuttontextcolour = Skins.panelbuttontextcolour + panelbuttontextsize = Skins.panelbuttontextsize + panelbuttontextfont = Skins.panelbuttontextfont + panelbuttontextstyle = Skins.panelbuttontextstyle + panelbuttontextside = Skins.panelbuttontextside + panelbuttontexttop = Skins.panelbuttontexttop + panelbuttongap = Skins.panelbuttongap + panelbuttonfromtop = Skins.panelbuttonfromtop + panelbuttoninitialgap = Skins.panelbuttoninitialgap + minimizebuttoncolour = Skins.minbtncolour + minimizebuttonheight = Skins.minbtnsize.Height + minimizebuttonwidth = Skins.minbtnsize.Width + minimizebuttonside = Skins.minbtnfromside + minimizebuttontop = Skins.minbtnfromtop + + 'skins + 'Array.Copy(ShiftOSDesktop.skinimages, skinloaderskinimages, skinloaderskinimages.Length) + + If Skins.closebtn Is Nothing Then Else skinloaderskinclosebutton(0) = Skins.closebtn.Clone + If Skins.closebtnhover Is Nothing Then Else skinloaderskinclosebutton(1) = Skins.closebtnhover.Clone + If Skins.closebtnclick Is Nothing Then Else skinloaderskinclosebutton(2) = Skins.closebtnclick.Clone + skinclosebuttonstyle = Skins.closebtnlayout + + If Skins.titlebar Is Nothing Then Else skinloaderskintitlebar(0) = Skins.titlebar.Clone + 'If ShiftOSDesktop.skintitlebar(1) Is Nothing Then Else skinloaderskintitlebar(1) = ShiftOSDesktop.skintitlebar(1).Clone + 'If ShiftOSDesktop.skintitlebar(2) Is Nothing Then Else skinloaderskintitlebar(2) = ShiftOSDesktop.skintitlebar(2).Clone + skintitlebarstyle = Skins.titlebarlayout + + If Skins.desktopbackground Is Nothing Then Else skinloaderskindesktopbackground(0) = Skins.desktopbackground.Clone + 'If ShiftOSDesktop.skindesktopbackground(1) Is Nothing Then Else skinloaderskindesktopbackground(1) = ShiftOSDesktop.skindesktopbackground(1).Clone + 'If ShiftOSDesktop.skindesktopbackground(2) Is Nothing Then Else skinloaderskindesktopbackground(2) = ShiftOSDesktop.skindesktopbackground(2).Clone + skindesktopbackgroundstyle = Skins.desktopbackgroundlayout + + If Skins.rollbtn Is Nothing Then Else skinloaderskinrollupbutton(0) = Skins.rollbtn.Clone + If Skins.rollbtnhover Is Nothing Then Else skinloaderskinrollupbutton(1) = Skins.rollbtnhover.Clone + If Skins.rollbtnclick Is Nothing Then Else skinloaderskinrollupbutton(2) = Skins.rollbtnclick.Clone + skinrollupbuttonstyle = Skins.rollbtnlayout + + If Skins.rightcorner Is Nothing Then Else skinloaderskintitlebarrightcorner(0) = Skins.rightcorner.Clone + 'If ShiftOSDesktop.skintitlebarrightcorner(1) Is Nothing Then Else skinloaderskintitlebarrightcorner(1) = ShiftOSDesktop.skintitlebarrightcorner(1).Clone + 'If ShiftOSDesktop.skintitlebarrightcorner(2) Is Nothing Then Else skinloaderskintitlebarrightcorner(2) = ShiftOSDesktop.skintitlebarrightcorner(2).Clone + skintitlebarrightcornerstyle = Skins.rightcornerlayout + + If Skins.leftcorner Is Nothing Then Else skinloaderskintitlebarleftcorner(0) = Skins.leftcorner.Clone + 'If ShiftOSDesktop.skintitlebarleftcorner(1) Is Nothing Then Else skinloaderskintitlebarleftcorner(1) = ShiftOSDesktop.skintitlebarleftcorner(1).Clone + 'If ShiftOSDesktop.skintitlebarleftcorner(2) Is Nothing Then Else skinloaderskintitlebarleftcorner(2) = ShiftOSDesktop.skintitlebarleftcorner(2).Clone + skintitlebarleftcornerstyle = Skins.leftcornerlayout + + If Skins.desktoppanel Is Nothing Then Else skinloaderskindesktoppanel(0) = Skins.desktoppanel.Clone + 'If ShiftOSDesktop.skindesktoppanel(1) Is Nothing Then Else skinloaderskindesktoppanel(1) = ShiftOSDesktop.skindesktoppanel(1).Clone + 'If ShiftOSDesktop.skindesktoppanel(2) Is Nothing Then Else skinloaderskindesktoppanel(2) = ShiftOSDesktop.skindesktoppanel(2).Clone + skindesktoppanelstyle = Skins.desktoppanellayout + + If Skins.panelclock Is Nothing Then Else skinloaderskindesktoppaneltime(0) = Skins.panelclock.Clone + 'If ShiftOSDesktop.skindesktoppaneltime(1) Is Nothing Then Else skinloaderskindesktoppaneltime(1) = ShiftOSDesktop.skindesktoppaneltime(1).Clone + 'If ShiftOSDesktop.skindesktoppaneltime(2) Is Nothing Then Else skinloaderskindesktoppaneltime(2) = ShiftOSDesktop.skindesktoppaneltime(2).Clone + skindesktoppaneltimestyle = Skins.panelclocklayout + + If Skins.applauncher Is Nothing Then Else skinloaderskinapplauncherbutton(0) = Skins.applauncher.Clone + If Skins.applaunchermouseover Is Nothing Then Else skinloaderskinapplauncherbutton(1) = Skins.applaunchermouseover.Clone + If Skins.applauncherclick Is Nothing Then Else skinloaderskinapplauncherbutton(2) = Skins.applauncherclick.Clone + skinapplauncherbuttonstyle = Skins.applauncherlayout + + If Skins.borderleft Is Nothing Then Else skinloaderskinwindowborderleft(0) = Skins.borderleft.Clone + 'If ShiftOSDesktop.skinwindowborderleft(1) Is Nothing Then Else skinloaderskinwindowborderleft(1) = ShiftOSDesktop.skinwindowborderleft(1).Clone + 'If ShiftOSDesktop.skinwindowborderleft(2) Is Nothing Then Else skinloaderskinwindowborderleft(2) = ShiftOSDesktop.skinwindowborderleft(2).Clone + skinwindowborderleftstyle = Skins.borderleftlayout + + If Skins.borderleft Is Nothing Then Else skinloaderskinwindowborderright(0) = Skins.borderleft.Clone + 'If ShiftOSDesktop.skinwindowborderright(1) Is Nothing Then Else skinloaderskinwindowborderright(1) = ShiftOSDesktop.skinwindowborderright(1).Clone + 'If ShiftOSDesktop.skinwindowborderright(2) Is Nothing Then Else skinloaderskinwindowborderright(2) = ShiftOSDesktop.skinwindowborderright(2).Clone + skinwindowborderrightstyle = Skins.borderrightlayout + + If Skins.borderbottom Is Nothing Then Else skinloaderskinwindowborderbottom(0) = Skins.borderbottom.Clone + 'If ShiftOSDesktop.skinwindowborderbottom(1) Is Nothing Then Else skinloaderskinwindowborderbottom(1) = ShiftOSDesktop.skinwindowborderbottom(1).Clone + 'If ShiftOSDesktop.skinwindowborderbottom(2) Is Nothing Then Else skinloaderskinwindowborderbottom(2) = ShiftOSDesktop.skinwindowborderbottom(2).Clone + skinwindowborderbottomstyle = Skins.borderbottomlayout + + If Skins.bottomrightcorner Is Nothing Then Else skinloaderskinwindowborderbottomright(0) = Skins.bottomrightcorner.Clone + 'If ShiftOSDesktop.skinwindowborderbottomright(1) Is Nothing Then Else skinloaderskinwindowborderbottomright(1) = ShiftOSDesktop.skinwindowborderbottomright(1).Clone + 'If ShiftOSDesktop.skinwindowborderbottomright(2) Is Nothing Then Else skinloaderskinwindowborderbottomright(2) = ShiftOSDesktop.skinwindowborderbottomright(2).Clone + skinwindowborderbottomrightstyle = Skins.bottomrightcornerlayout + + If Skins.bottomleftcorner Is Nothing Then Else skinloaderskinwindowborderbottomleft(0) = Skins.bottomleftcorner.Clone + 'If ShiftOSDesktop.skinwindowborderbottomleft(1) Is Nothing Then Else skinloaderskinwindowborderbottomleft(1) = ShiftOSDesktop.skinwindowborderbottomleft(1).Clone + 'If ShiftOSDesktop.skinwindowborderbottomleft(2) Is Nothing Then Else skinloaderskinwindowborderbottomleft(2) = ShiftOSDesktop.skinwindowborderbottomleft(2).Clone + skinwindowborderbottomleftstyle = Skins.bottomleftcornerlayout + + If Skins.panelbutton Is Nothing Then Else skinloaderskinpanelbutton(0) = Skins.panelbutton.Clone + 'If ShiftOSDesktop.skinpanelbutton(1) Is Nothing Then Else skinloaderskinpanelbutton(1) = ShiftOSDesktop.skinpanelbutton(1).Clone + 'If ShiftOSDesktop.skinpanelbutton(2) Is Nothing Then Else skinloaderskinpanelbutton(2) = ShiftOSDesktop.skinpanelbutton(2).Clone + skinpanelbuttonstyle = Skins.panelbuttonlayout + + If Skins.minbtn Is Nothing Then Else skinloaderskinminimizebutton(0) = Skins.minbtn.Clone + If Skins.minbtnhover Is Nothing Then Else skinloaderskinminimizebutton(1) = Skins.minbtnhover.Clone + If Skins.minbtnclick Is Nothing Then Else skinloaderskinminimizebutton(2) = Skins.minbtnclick.Clone + skinminimizebuttonstyle = Skins.minbtnlayout + + If Skins.closebtn Is Nothing Then preclosebutton.BackColor = Skins.closebtncolour Else preclosebutton.BackgroundImage = Skins.closebtn + preclosebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then pretitlebar.BackColor = Skins.titlebarcolour Else pretitlebar.BackgroundImage = Skins.titlebar + pretitlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then prerollupbutton.BackColor = Skins.rollbtncolour Else prerollupbutton.BackgroundImage = Skins.rollbtn + prerollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then prepgtoplcorner.BackColor = Skins.leftcornercolour Else prepgtoplcorner.BackgroundImage = Skins.leftcorner + prepgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then prepgtoprcorner.BackColor = Skins.rightcornercolour Else prepgtoprcorner.BackgroundImage = Skins.rightcorner + prepgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then preminimizebutton.BackColor = Skins.minbtncolour Else preminimizebutton.BackgroundImage = Skins.minbtn + preminimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then prepgleft.BackColor = Skins.borderleftcolour Else prepgleft.BackgroundImage = Skins.borderleft + prepgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then prepgright.BackColor = Skins.borderrightcolour Else prepgright.BackgroundImage = Skins.borderright + prepgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then prepgbottom.BackColor = Skins.borderbottomcolour Else prepgbottom.BackgroundImage = Skins.borderbottom + prepgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then prepgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else prepgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + prepgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then prepgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else prepgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + prepgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + prepgbottomlcorner.BackColor = Skins.borderrightcolour + prepgbottomrcorner.BackColor = Skins.borderrightcolour + prepgbottomlcorner.BackgroundImage = Nothing + prepgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + pnldesktoppreview.BackgroundImage = Skins.desktopbackground + End Sub + + Public Sub determinevisibleobjects() + If ShiftOSDesktop.boughttitlebar = True Then pretitlebar.Show() Else pretitlebar.Hide() + If ShiftOSDesktop.boughtwindowborders = True Then + prepgright.Show() + prepgleft.Show() + prepgbottom.Show() + Else + prepgright.Hide() + prepgleft.Hide() + prepgbottom.Hide() + End If + If ShiftOSDesktop.boughtclosebutton = True Then preclosebutton.Show() Else preclosebutton.Hide() + If ShiftOSDesktop.boughttitletext = True Then pretitletext.Show() Else pretitletext.Hide() + If ShiftOSDesktop.boughtdesktoppanel = True Then predesktoppanel.Show() Else predesktoppanel.Hide() + If ShiftOSDesktop.boughtdesktoppanelclock = True Then prepaneltimetext.Show() Else prepaneltimetext.Hide() + If ShiftOSDesktop.boughtapplaunchermenu = True Then preapplaunchermenuholder.Show() Else preapplaunchermenuholder.Hide() + If ShiftOSDesktop.boughtrollupbutton = True Then prerollupbutton.Show() Else prerollupbutton.Hide() + If ShiftOSDesktop.boughtknowledgeinputicon = True Then prepnlicon.Show() Else prepnlicon.Hide() + If ShiftOSDesktop.boughtpanelbuttons = True Then prepnlpanelbutton.Show() Else prepnlpanelbutton.Hide() + If ShiftOSDesktop.boughtminimizebutton = True Then preminimizebutton.Show() Else preminimizebutton.Hide() + End Sub + + Public Sub setpreviewtocurrentskin() + 'ShiftOSDesktop.loadskinfiles() + + Try + + pretitlebar.BackColor = titlebarcolour + prepgtoplcorner.BackColor = titlebarcolour + prepgtoprcorner.BackColor = titlebarcolour + prepgleft.BackColor = windowborderleftcolour + prepgright.BackColor = windowborderrightcolour + prepgbottom.BackColor = windowborderbottomcolour + prepgbottomlcorner.BackColor = windowborderbottomleftcolour + prepgbottomrcorner.BackColor = windowborderbottomrightcolour + pretitlebar.Height = titlebarheight + preclosebutton.BackColor = closebuttoncolour + preclosebutton.Height = closebuttonheight + preclosebutton.Width = closebuttonwidth + prepgleft.Width = windowbordersize + prepgright.Width = windowbordersize + prepgbottom.Height = windowbordersize + preminimizebutton.BackColor = minimizebuttoncolour + preminimizebutton.Height = minimizebuttonheight + preminimizebutton.Width = minimizebuttonwidth + prepgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + prepgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + + Select Case titletextposition + Case "Left" + pretitletext.Location = New Point(titletextside, titletexttop) + Case "Centre" + pretitletext.Location = New Point((pretitlebar.Width / 2) - pretitletext.Width / 2, titletexttop) + End Select + pretitletext.ForeColor = titletextcolour + + + pretitletext.Font = New Font(titletextfont, titletextsize, titletextstyle) + + pnldesktoppreview.BackColor = desktopbackgroundcolour + predesktoppanel.Height = desktoppanelheight + setclocktime() + prepaneltimetext.ForeColor = clocktextcolour + pretimepanel.BackColor = clockbackgroundcolor + prepaneltimetext.Font = New Font(panelclocktextfont, panelclocktextsize, panelclocktextstyle) + prepaneltimetext.Location = New Point() + pretimepanel.Size = New Size(prepaneltimetext.Width + 3, pretimepanel.Height) + prepaneltimetext.Location = New Point(0, panelclocktexttop) + ApplicationsToolStripMenuItem.Text = applicationlaunchername + ApplicationsToolStripMenuItem.Font = New Font(applicationbuttontextfont, applicationbuttontextsize, applicationbuttontextstyle) + preapplaunchermenuholder.Size = ApplicationsToolStripMenuItem.Size + ToolStripManager.Renderer = New MyPreviewToolStripRenderer() + ApplicationsToolStripMenuItem.BackColor = applauncherbuttoncolour + ApplicationsToolStripMenuItem.ForeColor = applicationsbuttontextcolour + preapplaunchermenuholder.Height = applicationbuttonheight + predesktopappmenu.Height = applicationbuttonheight + ApplicationsToolStripMenuItem.Height = applicationbuttonheight + prerollupbutton.BackColor = rollupbuttoncolour + prerollupbutton.Height = rollupbuttonheight + prerollupbutton.Width = rollupbuttonwidth + predesktoppanel.BackColor = desktoppanelcolour + pnldesktoppreview.BackColor = desktopbackgroundcolour + prepnlicon.Location = New Point(titlebariconside, titlebaricontop) + prepgtoplcorner.BackColor = titlebarleftcornercolour + prepgtoprcorner.BackColor = titlebarrightcornercolour + prepgtoplcorner.Width = titlebarcornerwidth + prepgtoprcorner.Width = titlebarcornerwidth + + If ShiftOSDesktop.boughtpanelbuttons = True Then prepnlpanelbutton.Show() + pretbicon.Location = New Point(panelbuttoniconside, panelbuttonicontop) + pretbicon.Size = New Size(panelbuttoniconsize, panelbuttoniconsize) + prepnlpanelbutton.Size = New Size(panelbuttonwidth, panelbuttonheight) + prepnlpanelbutton.BackColor = panelbuttoncolour + If skinloaderskinpanelbutton(0) Is Nothing Then Else prepnlpanelbutton.BackgroundImage = skinloaderskinpanelbutton(0) + prepnlpanelbutton.BackgroundImageLayout = skinpanelbuttonstyle + pretbctext.ForeColor = panelbuttontextcolour + pretbctext.Font = New Font(panelbuttontextfont, panelbuttontextsize, panelbuttontextstyle) + pretbctext.Location = New Point(panelbuttontextside, panelbuttontexttop) + prepnlpanelbuttonholder.Padding = New Padding(panelbuttoninitialgap, 0, 0, 0) + prepnlpanelbutton.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) + If skinloaderskinpanelbutton(0) Is Nothing Then Else prepnlpanelbutton.BackColor = Color.Transparent + + Select Case desktoppanelposition + Case "Top" + predesktoppanel.Dock = DockStyle.Top + predesktopappmenu.Dock = DockStyle.Top + Case "Bottom" + predesktoppanel.Dock = DockStyle.Bottom + predesktopappmenu.Dock = DockStyle.Bottom + End Select + + If skinloaderskindesktoppanel(0) Is Nothing Then + predesktoppanel.BackColor = desktoppanelcolour + predesktoppanel.BackgroundImage = Nothing + prepnlpanelbuttonholder.BackgroundImage = Nothing + Else + predesktoppanel.BackgroundImage = skinloaderskindesktoppanel(0) + prepnlpanelbuttonholder.BackgroundImage = skinloaderskindesktoppanel(0) + predesktoppanel.BackgroundImageLayout = skindesktoppanelstyle + predesktoppanel.BackColor = Color.Transparent + End If + + If ShiftOSDesktop.boughtdesktoppanelclock = True Then + setclocktime() + prepaneltimetext.ForeColor = clocktextcolour + If skinloaderskindesktoppaneltime(0) Is Nothing Then + pretimepanel.BackColor = clockbackgroundcolor + Else + pretimepanel.BackColor = Color.Transparent + pretimepanel.BackgroundImage = skinloaderskindesktoppanel(0) + pretimepanel.BackgroundImageLayout = skindesktoppaneltimestyle + End If + prepaneltimetext.Font = New Font(panelclocktextfont, panelclocktextsize, panelclocktextstyle) + pretimepanel.Size = New Size(prepaneltimetext.Width + 3, pretimepanel.Height) + prepaneltimetext.Location = New Point(0, panelclocktexttop) + pretimepanel.Show() + Else + pretimepanel.Hide() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + preclosebutton.Location = New Point(pretitlebar.Size.Width - closebuttonside - preclosebutton.Size.Width, closebuttontop) + prerollupbutton.Location = New Point(pretitlebar.Size.Width - rollupbuttonside - prerollupbutton.Size.Width, rollupbuttontop) + preminimizebutton.Location = New Point(pretitlebar.Size.Width - minimizebuttonside - preminimizebutton.Size.Width, minimizebuttontop) + Else + preclosebutton.Location = New Point(pretitlebar.Size.Width - closebuttonside - prepgtoplcorner.Width - prepgtoprcorner.Width - preclosebutton.Size.Width, closebuttontop) + prerollupbutton.Location = New Point(pretitlebar.Size.Width - rollupbuttonside - prepgtoplcorner.Width - prepgtoprcorner.Width - prerollupbutton.Size.Width, rollupbuttontop) + preminimizebutton.Location = New Point(pretitlebar.Size.Width - minimizebuttonside - prepgtoplcorner.Width - prepgtoprcorner.Width - preminimizebutton.Size.Width, minimizebuttontop) + End If + + If showwindowcorners = True Then + prepgtoplcorner.Show() + prepgtoprcorner.Show() + Else + prepgtoplcorner.Hide() + prepgtoprcorner.Hide() + End If + + preapplaunchermenuholder.Width = applaunchermenuholderwidth + predesktopappmenu.Width = applaunchermenuholderwidth + ApplicationsToolStripMenuItem.Width = applaunchermenuholderwidth + + If skinloaderskinapplauncherbutton(0) Is Nothing Then + Else + ApplicationsToolStripMenuItem.BackColor = Color.Transparent + predesktopappmenu.BackColor = Color.Transparent + ApplicationsToolStripMenuItem.BackgroundImage = skinloaderskinapplauncherbutton(0) + ApplicationsToolStripMenuItem.Text = "" + End If + + 'skins + If firstload = False Then + If loadingsknversion = "2.0 disposal-free skinning" Then + If IsNothing(skinloaderskinclosebutton(0)) Then preclosebutton.BackgroundImage = Nothing Else preclosebutton.BackgroundImage = skinloaderskinclosebutton(0) + preclosebutton.BackgroundImageLayout = skinclosebuttonstyle + If IsNothing(skinloaderskintitlebar(0)) Then pretitlebar.BackgroundImage = Nothing Else pretitlebar.BackgroundImage = skinloaderskintitlebar(0) + pretitlebar.BackgroundImageLayout = skintitlebarstyle + If IsNothing(skinloaderskindesktopbackground(0)) Then pnldesktoppreview.BackgroundImage = Nothing Else pnldesktoppreview.BackgroundImage = skinloaderskindesktopbackground(0) + pnldesktoppreview.BackgroundImageLayout = skindesktopbackgroundstyle + If IsNothing(skinloaderskinrollupbutton(0)) Then prerollupbutton.BackgroundImage = Nothing Else prerollupbutton.BackgroundImage = skinloaderskinrollupbutton(0) + prerollupbutton.BackgroundImageLayout = skinrollupbuttonstyle + If IsNothing(skinloaderskintitlebarrightcorner(0)) Then prepgtoprcorner.BackgroundImage = Nothing Else prepgtoprcorner.BackgroundImage = skinloaderskintitlebarrightcorner(0) + prepgtoprcorner.BackgroundImageLayout = skintitlebarrightcornerstyle + If IsNothing(skinloaderskintitlebarleftcorner(0)) Then prepgtoplcorner.BackgroundImage = Nothing Else prepgtoplcorner.BackgroundImage = skinloaderskintitlebarleftcorner(0) + prepgtoplcorner.BackgroundImageLayout = skintitlebarleftcornerstyle + If IsNothing(skinloaderskindesktoppanel(0)) Then predesktoppanel.BackgroundImage = Nothing Else predesktoppanel.BackgroundImage = skinloaderskindesktoppanel(0) + If IsNothing(skinloaderskindesktoppanel(0)) Then prepnlpanelbuttonholder.BackgroundImage = Nothing Else prepnlpanelbuttonholder.BackgroundImage = skinloaderskindesktoppanel(0) + predesktoppanel.BackgroundImageLayout = skindesktoppanelstyle + prepnlpanelbuttonholder.BackgroundImageLayout = skindesktoppanelstyle + If IsNothing(skinloaderskindesktoppaneltime(0)) Then pretimepanel.BackgroundImage = Nothing Else pretimepanel.BackgroundImage = skinloaderskindesktoppaneltime(0) + pretimepanel.BackgroundImageLayout = skindesktoppaneltimestyle + If IsNothing(skinloaderskinapplauncherbutton(0)) Then ApplicationsToolStripMenuItem.BackgroundImage = Nothing Else ApplicationsToolStripMenuItem.BackgroundImage = skinloaderskinapplauncherbutton(0) + ApplicationsToolStripMenuItem.BackgroundImageLayout = skinapplauncherbuttonstyle + If IsNothing(skinloaderskinwindowborderleft(0)) Then prepgleft.BackgroundImage = Nothing Else prepgleft.BackgroundImage = skinloaderskinwindowborderleft(0) + prepgleft.BackgroundImageLayout = skinwindowborderleftstyle + If IsNothing(skinloaderskinwindowborderright(0)) Then prepgright.BackgroundImage = Nothing Else prepgright.BackgroundImage = skinloaderskinwindowborderright(0) + prepgright.BackgroundImageLayout = skinwindowborderrightstyle + If IsNothing(skinloaderskinwindowborderbottom(0)) Then prepgbottom.BackgroundImage = Nothing Else prepgbottom.BackgroundImage = skinloaderskinwindowborderbottom(0) + prepgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + If IsNothing(skinloaderskinwindowborderbottomright(0)) Then prepgbottomrcorner.BackgroundImage = Nothing Else prepgbottomrcorner.BackgroundImage = skinloaderskinwindowborderbottomright(0) + prepgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + If IsNothing(skinloaderskinwindowborderbottomleft(0)) Then prepgbottomlcorner.BackgroundImage = Nothing Else prepgbottomlcorner.BackgroundImage = skinloaderskinwindowborderbottomleft(0) + prepgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + prepgbottomlcorner.Height = windowbordersize + prepgbottomrcorner.Height = windowbordersize + If IsNothing(skinloaderskinminimizebutton(0)) Then preminimizebutton.BackgroundImage = Nothing Else preminimizebutton.BackgroundImage = skinloaderskinminimizebutton(0) + preminimizebutton.BackgroundImageLayout = skinminimizebuttonstyle + If IsNothing(skinloaderskinpanelbutton(0)) Then prepnlpanelbutton.BackgroundImage = Nothing Else prepnlpanelbutton.BackgroundImage = skinloaderskinpanelbutton(0) + prepnlpanelbutton.BackgroundImageLayout = skinpanelbuttonstyle + Else + If skinloaderskinimages(0) = "" Then preclosebutton.BackgroundImage = Nothing Else preclosebutton.BackgroundImage = GetImage(skinloaderskinimages(0)) + preclosebutton.BackgroundImageLayout = skinclosebuttonstyle + If skinloaderskinimages(3) = "" Then pretitlebar.BackgroundImage = Nothing Else pretitlebar.BackgroundImage = GetImage(skinloaderskinimages(3)) + pretitlebar.BackgroundImageLayout = skintitlebarstyle + If skinloaderskinimages(6) = "" Then pnldesktoppreview.BackgroundImage = Nothing Else pnldesktoppreview.BackgroundImage = GetImage(skinloaderskinimages(6)) + pnldesktoppreview.BackgroundImageLayout = skindesktopbackgroundstyle + If skinloaderskinimages(9) = "" Then prerollupbutton.BackgroundImage = Nothing Else prerollupbutton.BackgroundImage = GetImage(skinloaderskinimages(9)) + prerollupbutton.BackgroundImageLayout = skinrollupbuttonstyle + If skinloaderskinimages(12) = "" Then prepgtoprcorner.BackgroundImage = Nothing Else prepgtoprcorner.BackgroundImage = GetImage(skinloaderskinimages(12)) + prepgtoprcorner.BackgroundImageLayout = skintitlebarrightcornerstyle + If skinloaderskinimages(15) = "" Then prepgtoplcorner.BackgroundImage = Nothing Else prepgtoplcorner.BackgroundImage = GetImage(skinloaderskinimages(15)) + prepgtoplcorner.BackgroundImageLayout = skintitlebarleftcornerstyle + If skinloaderskinimages(18) = "" Then predesktoppanel.BackgroundImage = Nothing Else predesktoppanel.BackgroundImage = GetImage(skinloaderskinimages(18)) + If skinloaderskinimages(18) = "" Then prepnlpanelbuttonholder.BackgroundImage = Nothing Else prepnlpanelbuttonholder.BackgroundImage = GetImage(skinloaderskinimages(18)) + predesktoppanel.BackgroundImageLayout = skindesktoppanelstyle + prepnlpanelbuttonholder.BackgroundImageLayout = skindesktoppanelstyle + If skinloaderskinimages(21) = "" Then pretimepanel.BackgroundImage = Nothing Else pretimepanel.BackgroundImage = GetImage(skinloaderskinimages(21)) + pretimepanel.BackgroundImageLayout = skindesktoppaneltimestyle + If skinloaderskinimages(24) = "" Then ApplicationsToolStripMenuItem.BackgroundImage = Nothing Else ApplicationsToolStripMenuItem.BackgroundImage = GetImage(skinloaderskinimages(24)) + ApplicationsToolStripMenuItem.BackgroundImageLayout = skinapplauncherbuttonstyle + If skinloaderskinimages(27) = "" Then prepgleft.BackgroundImage = Nothing Else prepgleft.BackgroundImage = GetImage(skinloaderskinimages(27)) + prepgleft.BackgroundImageLayout = skinwindowborderleftstyle + If skinloaderskinimages(30) = "" Then prepgright.BackgroundImage = Nothing Else prepgright.BackgroundImage = GetImage(skinloaderskinimages(30)) + prepgright.BackgroundImageLayout = skinwindowborderrightstyle + If skinloaderskinimages(33) = "" Then prepgbottom.BackgroundImage = Nothing Else prepgbottom.BackgroundImage = GetImage(skinloaderskinimages(33)) + prepgbottom.BackgroundImageLayout = skinwindowborderbottomstyle + If skinloaderskinimages(36) = "" Then prepgbottomrcorner.BackgroundImage = Nothing Else prepgbottomrcorner.BackgroundImage = GetImage(skinloaderskinimages(36)) + prepgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle + If skinloaderskinimages(39) = "" Then prepgbottomlcorner.BackgroundImage = Nothing Else prepgbottomlcorner.BackgroundImage = GetImage(skinloaderskinimages(39)) + prepgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle + prepgbottomlcorner.Height = windowbordersize + prepgbottomrcorner.Height = windowbordersize + If skinloaderskinimages(42) = "" Then preminimizebutton.BackgroundImage = Nothing Else preminimizebutton.BackgroundImage = GetImage(skinloaderskinimages(42)) + preminimizebutton.BackgroundImageLayout = skinminimizebuttonstyle + If skinloaderskinimages(45) = "" Then prepnlpanelbutton.BackgroundImage = Nothing Else prepnlpanelbutton.BackgroundImage = GetImage(skinloaderskinimages(45)) + prepnlpanelbutton.BackgroundImageLayout = skinpanelbuttonstyle + End If + Else + firstload = False + End If + + If Me.Visible = True Then + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), ((Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + (Me.pretitlebar.Size.Height + Me.predesktoppanel.Size.Height - Me.oldpreheight)) + Me.oldbordersize = Skins.borderwidth + Me.oldtitlebarheight = Skins.titlebarheight + Me.rolldownsize = Me.Height + Me.oldpreheight = Me.pretitlebar.Height + Me.prepnlpanelbuttonholder.Height + Me.prepgbottom.Height + If Me.needtorollback = True Then Me.Height = Me.titlebar.Height : Me.pgleft.Hide() : Me.pgbottom.Hide() : Me.pgright.Hide() + End If + + ShiftOSDesktop.loadskinfiles() + ShiftOSDesktop.setupdesktop() + + Me.Invalidate() + Catch ex As Exception + End Try + End Sub + + Private Sub saveskintofile() + File_Saver.savingprogram = "skinloader" + File_Saver.saveextention = ".skn" + File_Saver.Show() + End Sub + + Public Sub loadskintopreview() + ReDim Preserve loadlines(200) + titlebarcolour = Color.FromArgb(loadlines(0)) + windowbordercolour = Color.FromArgb(loadlines(1)) + windowbordersize = loadlines(2) + titlebarheight = loadlines(3) + closebuttoncolour = Color.FromArgb(loadlines(4)) + closebuttonheight = loadlines(5) + closebuttonwidth = loadlines(6) + closebuttonside = loadlines(7) + closebuttontop = loadlines(8) + titletextcolour = Color.FromArgb(loadlines(9)) + titletexttop = loadlines(10) + titletextside = loadlines(11) + titletextsize = loadlines(12) + titletextfont = loadlines(13) + titletextstyle = loadlines(14) + desktoppanelcolour = Color.FromArgb(loadlines(15)) + desktopbackgroundcolour = Color.FromArgb(loadlines(16)) + desktoppanelheight = loadlines(17) + desktoppanelposition = loadlines(18) + clocktextcolour = Color.FromArgb(loadlines(19)) + clockbackgroundcolor = Color.FromArgb(loadlines(20)) + panelclocktexttop = loadlines(21) + panelclocktextsize = loadlines(22) + panelclocktextfont = loadlines(23) + panelclocktextstyle = loadlines(24) + applauncherbuttoncolour = Color.FromArgb(loadlines(25)) + applauncherbuttonclickedcolour = Color.FromArgb(loadlines(26)) + applauncherbackgroundcolour = Color.FromArgb(loadlines(27)) + applaunchermouseovercolour = Color.FromArgb(loadlines(28)) + applicationsbuttontextcolour = Color.FromArgb(loadlines(29)) + applicationbuttonheight = loadlines(30) + applicationbuttontextsize = loadlines(31) + applicationbuttontextfont = loadlines(32) + applicationbuttontextstyle = loadlines(33) + applicationlaunchername = loadlines(34) + titletextposition = loadlines(35) + rollupbuttoncolour = Color.FromArgb(loadlines(36)) + If loadlines(37) = "" Then Else rollupbuttonheight = loadlines(37) + If loadlines(38) = "" Then Else rollupbuttonwidth = loadlines(38) + If loadlines(39) = "" Then Else rollupbuttonside = loadlines(39) + If loadlines(40) = "" Then Else rollupbuttontop = loadlines(40) + If loadlines(41) = "" Then Else titlebariconside = loadlines(41) + If loadlines(42) = "" Then Else titlebaricontop = loadlines(42) + If loadlines(43) = "" Then Else showwindowcorners = loadlines(43) + If loadlines(44) = "" Then Else titlebarcornerwidth = loadlines(44) + If loadlines(45) = "" Then Else titlebarrightcornercolour = Color.FromArgb(loadlines(45)) + If loadlines(46) = "" Then Else titlebarleftcornercolour = Color.FromArgb(loadlines(46)) + If loadlines(47) = "" Then Else applaunchermenuholderwidth = loadlines(47) + If loadlines(48) = "" Then Else windowborderleftcolour = Color.FromArgb(loadlines(48)) + If loadlines(49) = "" Then Else windowborderrightcolour = Color.FromArgb(loadlines(49)) + If loadlines(50) = "" Then Else windowborderbottomcolour = Color.FromArgb(loadlines(50)) + If loadlines(51) = "" Then Else windowborderbottomrightcolour = Color.FromArgb(loadlines(51)) + If loadlines(52) = "" Then Else windowborderbottomleftcolour = Color.FromArgb(loadlines(52)) + If loadlines(53) = "" Then Else panelbuttonicontop = loadlines(53) + If loadlines(54) = "" Then Else panelbuttoniconside = loadlines(54) + If loadlines(55) = "" Then Else panelbuttoniconsize = loadlines(55) + If loadlines(56) = "" Then Else panelbuttoniconsize = loadlines(56) + If loadlines(57) = "" Then Else panelbuttonheight = loadlines(57) + If loadlines(58) = "" Then Else panelbuttonwidth = loadlines(58) + If loadlines(59) = "" Then Else panelbuttoncolour = Color.FromArgb(loadlines(59)) + If loadlines(60) = "" Then Else panelbuttontextcolour = Color.FromArgb(loadlines(60)) + If loadlines(61) = "" Then Else panelbuttontextsize = loadlines(61) + If loadlines(62) = "" Then Else panelbuttontextfont = loadlines(62) + If loadlines(63) = "" Then Else panelbuttontextstyle = loadlines(63) + If loadlines(64) = "" Then Else panelbuttontextside = loadlines(64) + If loadlines(65) = "" Then Else panelbuttontexttop = loadlines(65) + If loadlines(66) = "" Then Else panelbuttongap = loadlines(66) + If loadlines(67) = "" Then Else panelbuttonfromtop = loadlines(67) + If loadlines(68) = "" Then Else panelbuttoninitialgap = loadlines(68) + If loadlines(69) = "" Then Else minimizebuttoncolour = Color.FromArgb(loadlines(69)) + If loadlines(70) = "" Then Else minimizebuttonheight = loadlines(70) + If loadlines(71) = "" Then Else minimizebuttonwidth = loadlines(71) + If loadlines(72) = "" Then Else minimizebuttonside = loadlines(72) + If loadlines(73) = "" Then Else minimizebuttontop = loadlines(73) + + skinloaderskinimages(0) = loadlines(100) + skinloaderskinimages(1) = loadlines(101) + skinloaderskinimages(2) = loadlines(102) + skinloaderskinimages(3) = loadlines(103) + skinloaderskinimages(4) = loadlines(104) + skinloaderskinimages(5) = loadlines(105) + skinloaderskinimages(6) = loadlines(106) + skinloaderskinimages(7) = loadlines(107) + skinloaderskinimages(8) = loadlines(108) + skinloaderskinimages(9) = loadlines(109) + skinloaderskinimages(10) = loadlines(110) + skinloaderskinimages(11) = loadlines(111) + skinloaderskinimages(12) = loadlines(112) + skinloaderskinimages(13) = loadlines(113) + skinloaderskinimages(14) = loadlines(114) + skinloaderskinimages(15) = loadlines(115) + skinloaderskinimages(16) = loadlines(116) + skinloaderskinimages(17) = loadlines(117) + skinloaderskinimages(18) = loadlines(118) + skinloaderskinimages(19) = loadlines(119) + skinloaderskinimages(20) = loadlines(120) + skinloaderskinimages(21) = loadlines(121) + skinloaderskinimages(22) = loadlines(122) + skinloaderskinimages(23) = loadlines(123) + skinloaderskinimages(24) = loadlines(124) + skinloaderskinimages(25) = loadlines(125) + skinloaderskinimages(26) = loadlines(126) + skinloaderskinimages(27) = loadlines(127) + skinloaderskinimages(28) = loadlines(128) + skinloaderskinimages(29) = loadlines(129) + skinloaderskinimages(30) = loadlines(130) + skinloaderskinimages(31) = loadlines(131) + skinloaderskinimages(32) = loadlines(132) + skinloaderskinimages(33) = loadlines(133) + skinloaderskinimages(34) = loadlines(134) + skinloaderskinimages(35) = loadlines(135) + skinloaderskinimages(36) = loadlines(136) + skinloaderskinimages(37) = loadlines(137) + skinloaderskinimages(38) = loadlines(138) + skinloaderskinimages(39) = loadlines(139) + skinloaderskinimages(40) = loadlines(140) + skinloaderskinimages(41) = loadlines(141) + skinloaderskinimages(42) = loadlines(142) + skinloaderskinimages(43) = loadlines(143) + skinloaderskinimages(44) = loadlines(144) + skinloaderskinimages(45) = loadlines(145) + skinloaderskinimages(46) = loadlines(146) + skinloaderskinimages(47) = loadlines(147) + skinloaderskinimages(48) = loadlines(148) + skinloaderskinimages(49) = loadlines(149) + skinloaderskinimages(50) = loadlines(150) + + setpreviewtocurrentskin() + End Sub + + Private Sub setclocktime() + If ShiftOSDesktop.boughtsplitsecondtime = True Then + prepaneltimetext.Text = TimeOfDay + Else + If ShiftOSDesktop.boughtminuteaccuracytime = True Then + If Date.Now.Hour < 12 Then + prepaneltimetext.Text = TimeOfDay.Hour & ":" & Format(TimeOfDay.Minute, "00") & " AM" + Else + prepaneltimetext.Text = TimeOfDay.Hour - 12 & ":" & Format(TimeOfDay.Minute, "00") & " PM" + End If + Else + If ShiftOSDesktop.boughtpmandam = True Then + If Date.Now.Hour < 12 Then + prepaneltimetext.Text = TimeOfDay.Hour & " AM" + Else + prepaneltimetext.Text = TimeOfDay.Hour - 12 & " PM" + End If + Else + If ShiftOSDesktop.boughthourspastmidnight = True Then + prepaneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60 / 60) + Else + If ShiftOSDesktop.boughtminutespastmidnight = True Then + prepaneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60) + Else + If ShiftOSDesktop.boughtsecondspastmidnight = True Then + prepaneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds) + End If + End If + End If + End If + End If + End If + End Sub + + Private Sub btnsaveskin_Click(sender As Object, e As EventArgs) Handles btnsaveskin.Click + File_Saver.saveextention = ".skn" + File_Saver.savingprogram = "skinloader" + File_Saver.Show() + End Sub + + Private Sub btnloadskin_Click(sender As Object, e As EventArgs) Handles btnloadskin.Click + File_Opener.Show() + File_Opener.openingprogram = "skinloader" + File_Opener.openextention = ".skn" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Private Sub btnclose_Click(sender As Object, e As EventArgs) Handles btnclose.Click + Me.Close() + End Sub + + Public loadingskinpath As String + Public loadingsknversion As String + Private Sub btnapplyskin_Click(sender As Object, e As EventArgs) Handles btnapplyskin.Click + If skinloaded = True Then + If loadingsknversion = "2.0 disposal-free skinning" Then + If Directory.Exists(Paths.loadedskin) Then My.Computer.FileSystem.DeleteDirectory(Paths.loadedskin, FileIO.DeleteDirectoryOption.DeleteAllContents) + + + + Directory.CreateDirectory(ShiftOSPath + "Shiftum42\Skins\Loaded") + My.Computer.FileSystem.CopyDirectory(ShiftOSPath + "Shiftum42\Skins\Preview", ShiftOSPath + "Shiftum42\Skins\Loaded") + Skins.loadimages() + skinloaded = False + + Else + apply1_0skin() + skinloaded = False + End If + Else + infobox.title = "Skin Loader - No Skin!" + infobox.textinfo = "It appears you havn't loaded a new skin." & Environment.NewLine & Environment.NewLine & "Please click load skin and choose an existing .skn file to load it in the preview and press apply to apply it to your system." + infobox.Show() + End If + End Sub + + + + 'required to fix flashing applauncher button problem + Public Sub ApplicationsToolStripMenuItem_Paint(sender As Object, e As PaintEventArgs) Handles ApplicationsToolStripMenuItem.Paint + If ApplicationsToolStripMenuItem.BackgroundImage Is Nothing Then + Else + e.Graphics.DrawImage(ApplicationsToolStripMenuItem.BackgroundImage, 0, 0, ApplicationsToolStripMenuItem.BackgroundImage.Width, ApplicationsToolStripMenuItem.BackgroundImage.Height) + End If + End Sub + + Private Function GetImage(ByVal fileName As String) As Bitmap + Dim ret As Bitmap + Using img As Image = Image.FromFile(fileName) + ret = New Bitmap(img) + End Using + Return ret + End Function + + Public Sub setuppreview2_0() + + Dim savepath As String = "C:\ShiftOS\" + 'dispose of old skin + skinloaderskintitlebar(0) = Nothing + skinloaderskinwindowborderleft(0) = Nothing + skinloaderskinwindowborderright(0) = Nothing + skinloaderskinwindowborderbottom(0) = Nothing + skinloaderskinrollupbutton(1) = Nothing + skinloaderskinrollupbutton(2) = Nothing + skinloaderskinrollupbutton(0) = Nothing + skinloaderskinminimizebutton(0) = Nothing + skinloaderskinminimizebutton(1) = Nothing + skinloaderskinminimizebutton(2) = Nothing + skinloaderskintitlebarrightcorner(0) = Nothing + skinloaderskintitlebarleftcorner(0) = Nothing + skinloaderskindesktoppanel(0) = Nothing + skinloaderskindesktopbackground(0) = Nothing + skinloaderskinpanelbutton(0) = Nothing + skinloaderskinapplauncherbutton(0) = Nothing + skinloaderskindesktoppaneltime(0) = Nothing + skinloaderskinwindowborderbottomleft(0) = Nothing + skinloaderskinwindowborderbottomright(0) = Nothing + skinloaderskinclosebutton(0) = Nothing + skinloaderskinclosebutton(1) = Nothing + skinloaderskinclosebutton(2) = Nothing + + If File.Exists(savepath + "Shiftum42\Skins\Preview\titlebar") Then + skinloaderskintitlebar(0) = GetImage(savepath + "Shiftum42\Skins\Preview\titlebar".Clone) + Else : skinloaderskintitlebar(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\borderleft") Then + skinloaderskinwindowborderleft(0) = GetImage(savepath + "Shiftum42\Skins\Preview\borderleft".Clone) + Else : skinloaderskinwindowborderleft(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\borderright") Then + skinloaderskinwindowborderright(0) = GetImage(savepath + "Shiftum42\Skins\Preview\borderright".Clone) + Else : skinloaderskinwindowborderright(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\borderbottom") Then + skinloaderskinwindowborderbottom(0) = GetImage(savepath + "Shiftum42\Skins\Preview\borderbottom".Clone) + Else : skinloaderskinwindowborderbottom(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\closebtn") Then + skinloaderskinclosebutton(0) = GetImage(savepath + "Shiftum42\Skins\Preview\closebtn".Clone) + Else : skinloaderskinclosebutton(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\closebtnhover") Then + skinloaderskinclosebutton(1) = GetImage(savepath + "Shiftum42\Skins\Preview\closebtnhover".Clone) + Else : skinloaderskinclosebutton(1) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\closebtnclick") Then + skinloaderskinclosebutton(2) = GetImage(savepath + "Shiftum42\Skins\Preview\closebtnclick".Clone) + Else : skinloaderskinclosebutton(2) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\rollbtn") Then + skinloaderskinrollupbutton(0) = GetImage(savepath + "Shiftum42\Skins\Preview\rollbtn".Clone) + Else : skinloaderskinrollupbutton(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\rollbtnhover") Then + skinloaderskinrollupbutton(1) = GetImage(savepath + "Shiftum42\Skins\Preview\rollbtnhover".Clone) + Else : skinloaderskinrollupbutton(1) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\rollbtnclick") Then + skinloaderskinrollupbutton(2) = GetImage(savepath + "Shiftum42\Skins\Preview\rollbtnclick".Clone) + Else : skinloaderskinrollupbutton(2) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\minbtn") Then + skinloaderskinminimizebutton(0) = GetImage(savepath + "Shiftum42\Skins\Preview\minbtn".Clone) + Else : skinloaderskinminimizebutton(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\minbtnhover") Then + skinloaderskinminimizebutton(1) = GetImage(savepath + "Shiftum42\Skins\Preview\minbtnhover".Clone) + Else : skinloaderskinminimizebutton(1) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\minbtnclick") Then + skinloaderskinminimizebutton(2) = GetImage(savepath + "Shiftum42\Skins\Preview\minbtnclick".Clone) + Else : skinloaderskinminimizebutton(2) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\rightcorner") Then + skinloaderskintitlebarrightcorner(0) = GetImage(savepath + "Shiftum42\Skins\Preview\rightcorner".Clone) + Else : skinloaderskintitlebarrightcorner(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\leftcorner") Then + skinloaderskintitlebarleftcorner(0) = GetImage(savepath + "Shiftum42\Skins\Preview\leftcorner".Clone) + Else : skinloaderskintitlebarleftcorner(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\desktoppanel") Then + skinloaderskindesktoppanel(0) = GetImage(savepath + "Shiftum42\Skins\Preview\desktoppanel".Clone) + Else : skinloaderskindesktoppanel(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\desktopbackground") Then + skinloaderskindesktopbackground(0) = GetImage(savepath + "Shiftum42\Skins\Preview\desktopbackground".Clone) + Else : skinloaderskindesktopbackground(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\panelbutton") Then + skinloaderskinpanelbutton(0) = GetImage(savepath + "Shiftum42\Skins\Preview\panelbutton".Clone) + Else : skinloaderskinpanelbutton(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\applaunchermouseover") Then + skinloaderskinapplauncherbutton(1) = GetImage(savepath + "Shiftum42\Skins\Preview\applaunchermouseover".Clone) + Else : skinloaderskinapplauncherbutton(1) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\applauncher") Then + skinloaderskinapplauncherbutton(0) = GetImage(savepath + "Shiftum42\Skins\Preview\applauncher".Clone) + Else : skinloaderskinapplauncherbutton(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\applauncherclick") Then + skinloaderskinapplauncherbutton(2) = GetImage(savepath + "Shiftum42\Skins\Preview\applauncherclick".Clone) + Else : skinloaderskinapplauncherbutton(2) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\panelclock") Then + skinloaderskindesktoppaneltime(0) = GetImage(savepath + "Shiftum42\Skins\Preview\panelclock".Clone) + Else : skinloaderskindesktoppaneltime(0) = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\bottomleftcorner") Then + bottomleftcorner = GetImage(savepath + "Shiftum42\Skins\Preview\bottomleftcorner".Clone) + Else : bottomleftcorner = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Preview\bottomrightcorner") Then + skinloaderskinwindowborderbottomleft(0) = GetImage(savepath + "Shiftum42\Skins\Preview\bottomrightcorner".Clone) + Else : skinloaderskinwindowborderbottomleft(0) = Nothing + End If + + 'load settings + Dim loaddata(200) As String + If File.Exists("C:\ShiftOS\Shiftum42\Skins\Preview\data.dat") Then + Dim sr As StreamReader = New StreamReader(ShiftOSPath + "Shiftum42\Skins\Preview\data.dat") + + For i As Integer = 0 To 200 Step 1 + loaddata(i) = sr.ReadLine + If i = 200 Then + sr.Close() + Exit For + End If + Next + ' settings + closebuttonheight = loaddata(2) + closebuttonwidth = loaddata(1) + rollupbuttonheight = loaddata(4) + rollupbuttonwidth = loaddata(3) + minimizebuttonheight = loaddata(6) + minimizebuttonwidth = loaddata(5) + titlebarheight = loaddata(7) + closebuttontop = loaddata(8) + closebuttonside = loaddata(9) + rollupbuttontop = loaddata(10) + rollupbuttonside = loaddata(11) + minimizebuttontop = loaddata(12) + minimizebuttonside = loaddata(13) + windowbordersize = loaddata(14) + showwindowcorners = loaddata(15) + titlebarcornerwidth = loaddata(16) + titlebariconside = loaddata(17) + titlebaricontop = loaddata(18) + titletextcolour = Color.FromArgb(loaddata(19)) + windowborderleftcolour = Color.FromArgb(loaddata(20)) + windowborderrightcolour = Color.FromArgb(loaddata(21)) + windowbordercolour = Color.FromArgb(loaddata(20)) + windowborderbottomcolour = Color.FromArgb(loaddata(22)) + closebuttoncolour = Color.FromArgb(loaddata(23)) + closebuttoncolour = Color.FromArgb(loaddata(24)) + closebuttoncolour = Color.FromArgb(loaddata(25)) + rollupbuttoncolour = Color.FromArgb(loaddata(26)) + rollupbuttoncolour = Color.FromArgb(loaddata(27)) + rollupbuttoncolour = Color.FromArgb(loaddata(28)) + minimizebuttoncolour = Color.FromArgb(loaddata(29)) + minimizebuttoncolour = Color.FromArgb(loaddata(30)) + minimizebuttoncolour = Color.FromArgb(loaddata(31)) + titlebarrightcornercolour = Color.FromArgb(loaddata(32)) + titlebarleftcornercolour = Color.FromArgb(loaddata(33)) + windowborderbottomrightcolour = Color.FromArgb(loaddata(34)) + windowborderbottomleftcolour = Color.FromArgb(loaddata(35)) + titletextfont = loaddata(36) + titletextsize = loaddata(37) + titletextstyle = loaddata(38) + titletextpos = loaddata(39) + titletexttop = loaddata(40) + titletextside = loaddata(41) + titletextcolour = Color.FromArgb(loaddata(42)) + desktoppanelcolour = Color.FromArgb(loaddata(43)) + desktopbackgroundcolour = Color.FromArgb(loaddata(44)) + desktoppanelheight = loaddata(45) + desktoppanelposition = loaddata(46) + clocktextcolour = Color.FromArgb(loaddata(47)) + clockbackgroundcolor = Color.FromArgb(loaddata(48)) + panelclocktexttop = loaddata(49) + panelclocktextsize = loaddata(50) + panelclocktextfont = loaddata(51) + panelclocktextstyle = loaddata(52) + applauncherbuttoncolour = Color.FromArgb(loaddata(53)) + applauncherbuttonclickedcolour = Color.FromArgb(loaddata(54)) + applauncherbackgroundcolour = Color.FromArgb(loaddata(55)) + applaunchermouseovercolour = Color.FromArgb(loaddata(56)) + applicationsbuttontextcolour = Color.FromArgb(loaddata(57)) + applicationbuttonheight = loaddata(58) + applicationbuttontextsize = loaddata(59) + applicationbuttontextfont = loaddata(60) + applicationbuttontextstyle = loaddata(61) + applicationlaunchername = loaddata(62) + titletextposition = loaddata(63) + applaunchermenuholderwidth = loaddata(64) + panelbuttonicontop = loaddata(65) + panelbuttoniconside = loaddata(66) + panelbuttoniconsize = loaddata(67) + panelbuttoncolour = Color.FromArgb(loaddata(70)) + panelbuttonheight = loaddata(68) + panelbuttonwidth = loaddata(69) + panelbuttontextcolour = Color.FromArgb(loaddata(71)) + panelbuttontextsize = loaddata(72) + panelbuttontextfont = loaddata(73) + panelbuttontextstyle = loaddata(74) + panelbuttontextside = loaddata(75) + panelbuttontexttop = loaddata(76) + panelbuttongap = loaddata(77) + panelbuttonfromtop = loaddata(78) + panelbuttoninitialgap = loaddata(79) + + 'layout stuff + skintitlebarstyle = loaddata(89) + skinwindowborderleftstyle = loaddata(90) + skinwindowborderrightstyle = loaddata(91) + skinwindowborderbottomstyle = loaddata(92) + skinclosebuttonstyle = loaddata(93) + skinrollupbuttonstyle = loaddata(94) + skinminimizebuttonstyle = loaddata(95) + skintitlebarrightcornerstyle = loaddata(96) + skintitlebarleftcornerstyle = loaddata(97) + skindesktoppanelstyle = loaddata(98) + skindesktopbackgroundstyle = loaddata(99) + skindesktoppaneltimestyle = loaddata(100) + skinapplauncherbuttonstyle = loaddata(101) + skinpanelbuttonstyle = loaddata(102) + skinwindowborderbottomleftstyle = loaddata(103) + skinwindowborderbottomrightstyle = loaddata(104) + Else + infobox.showinfo("Incomplete Skin File", "The settings part of the skin file (data.dat) could not be found, images will be loaded with the current settings and sizes.") + End If + setpreviewtocurrentskin() + End Sub + Private Sub apply1_0skin() + ' Set skinning varibles to new values + ' WINDOWS + ' Image + Skins.titlebar = pretitlebar.BackgroundImage + Skins.titlebarlayout = pretitlebar.BackgroundImageLayout + Skins.borderleft = prepgleft.BackgroundImage + Skins.borderleftlayout = prepgleft.BackgroundImageLayout + Skins.borderright = prepgright.BackgroundImage + Skins.borderrightlayout = prepgright.BackgroundImageLayout + Skins.borderbottom = prepgbottom.BackgroundImage + Skins.borderbottomlayout = prepgbottom.BackgroundImageLayout + Skins.closebtn = preclosebutton.BackgroundImage + Skins.closebtnlayout = preclosebutton.BackgroundImageLayout + Skins.closebtnhover = preclosebutton.BackgroundImage + Skins.closebtnclick = preclosebutton.BackgroundImage + Skins.rollbtn = prerollupbutton.BackgroundImage + Skins.rollbtnlayout = prerollupbutton.BackgroundImageLayout + Skins.rollbtnhover = prerollupbutton.BackgroundImage + Skins.rollbtnclick = prerollupbutton.BackgroundImage + Skins.minbtn = preminimizebutton.BackgroundImage + Skins.minbtnlayout = preminimizebutton.BackgroundImageLayout + Skins.minbtnhover = preminimizebutton.BackgroundImage + Skins.minbtnclick = preminimizebutton.BackgroundImage + Skins.bottomrightcorner = prepgbottomrcorner.BackgroundImage + Skins.rightcornerlayout = prepgbottomrcorner.BackgroundImageLayout + Skins.bottomleftcorner = prepgbottomlcorner.BackgroundImage + Skins.leftcorner = prepgtoplcorner.BackgroundImage + Skins.leftcornerlayout = prepgtoplcorner.BackgroundImageLayout + Skins.rightcorner = prepgtoprcorner.BackgroundImage + Skins.leftcornerlayout = prepgtoprcorner.BackgroundImageLayout + 'Colour + Skins.titlebarcolour = pretitlebar.BackColor + Skins.borderleftcolour = prepgleft.BackColor + Skins.borderrightcolour = prepgright.BackColor + Skins.borderbottomcolour = prepgbottom.BackColor + Skins.closebtncolour = preclosebutton.BackColor + Skins.closebtnhovercolour = preclosebutton.BackColor + Skins.closebtnclickcolour = preclosebutton.BackColor + Skins.rollbtncolour = prerollupbutton.BackColor + Skins.rollbtnhovercolour = prerollupbutton.BackColor + Skins.rollbtnclickcolour = prerollupbutton.BackColor + Skins.minbtncolour = preminimizebutton.BackColor + Skins.minbtnhovercolour = preminimizebutton.BackColor + Skins.minbtnclickcolour = preminimizebutton.BackColor + Skins.rightcornercolour = prepgtoprcorner.BackColor + Skins.leftcornercolour = prepgtoplcorner.BackColor + Skins.bottomrightcornercolour = prepgbottomlcorner.BackColor + Skins.bottomleftcornercolour = prepgbottomrcorner.BackColor + ' Settings + Skins.closebtnsize = preclosebutton.Size + Skins.rollbtnsize = prerollupbutton.Size + Skins.minbtnsize = preminimizebutton.Size + Skins.titlebarheight = pretitlebar.Height + Skins.closebtnfromtop = closebuttontop + Skins.closebtnfromside = closebuttonside + Skins.rollbtnfromtop = rollupbuttontop + Skins.rollbtnfromside = rollupbuttonside + Skins.minbtnfromtop = minimizebuttontop + Skins.minbtnfromside = minimizebuttonside + Skins.borderwidth = prepgleft.Width + Skins.titlebarcornerwidth = prepgtoplcorner.Width + Skins.enablecorners = showwindowcorners + ' Text + Skins.titletextfontfamily = pretitletext.Font.FontFamily.Name + Skins.titletextfontsize = pretitletext.Font.Size + Skins.titletextfontstyle = pretitletext.Font.Style + Skins.titletextpos = titletextposition + Skins.titletextfromtop = titletexttop + Skins.titletextfromside = titletextside + Skins.titletextcolour = pretitletext.ForeColor + + ' DESKTOP + Skins.desktoppanelcolour = desktoppanelcolour + Skins.desktopbackgroundcolour = desktopbackgroundcolour + Skins.desktoppanelheight = desktoppanelheight + Skins.desktoppanelposition = desktoppanelposition + Skins.clocktextcolour = clocktextcolour + Skins.clockbackgroundcolor = clockbackgroundcolor + Skins.panelclocktexttop = panelclocktexttop + Skins.panelclocktextsize = panelclocktextsize + Skins.panelclocktextfont = panelclocktextfont + Skins.panelclocktextstyle = panelclocktextstyle + Skins.applauncherbuttoncolour = applauncherbuttoncolour + Skins.applauncherbuttonclickedcolour = applauncherbuttonclickedcolour + Skins.applauncherbackgroundcolour = applauncherbackgroundcolour + Skins.applaunchermouseovercolour = applauncherbuttonclickedcolour 'test + Skins.applicationsbuttontextcolour = applicationsbuttontextcolour + Skins.applicationbuttonheight = applicationbuttonheight + Skins.applicationbuttontextsize = applicationbuttontextsize + Skins.applicationbuttontextfont = applicationbuttontextfont + Skins.applicationbuttontextstyle = applicationbuttontextstyle + Skins.applicationlaunchername = applicationlaunchername + Skins.titletextpos = titletextposition + Skins.applaunchermenuholderwidth = applaunchermenuholderwidth + Skins.panelbuttonicontop = panelbuttonicontop + Skins.panelbuttoniconside = panelbuttoniconside + Skins.panelbuttoniconsize = panelbuttoniconsize + Skins.panelbuttonheight = panelbuttonheight + Skins.panelbuttonwidth = panelbuttonwidth + Skins.panelbuttoncolour = panelbuttoncolour + Skins.panelbuttontextcolour = panelbuttontextcolour + Skins.panelbuttontextsize = panelbuttontextsize + Skins.panelbuttontextfont = panelbuttontextfont + Skins.panelbuttontextstyle = panelbuttontextstyle + Skins.panelbuttontextside = panelbuttontextside + Skins.panelbuttontexttop = panelbuttontexttop + Skins.panelbuttongap = panelbuttongap + Skins.panelbuttonfromtop = panelbuttonfromtop + Skins.panelbuttoninitialgap = panelbuttoninitialgap + ' images + Skins.desktoppanel = predesktoppanel.BackgroundImage + Skins.desktoppanellayout = 3 + Skins.desktopbackground = pnldesktoppreview.BackgroundImage + Skins.desktopbackgroundlayout = pnldesktoppreview.BackgroundImageLayout + Skins.panelclock = pretimepanel.BackgroundImage + Skins.panelclocklayout = pretimepanel.BackgroundImageLayout + Skins.applaunchermouseover = ApplicationsToolStripMenuItem.BackgroundImage + Skins.applauncher = ApplicationsToolStripMenuItem.BackgroundImage + Skins.applauncherlayout = skinapplauncherbuttonstyle + Skins.applauncherclick = ApplicationsToolStripMenuItem.BackgroundImage + Skins.panelbutton = prepnlpanelbutton.BackgroundImage + Skins.panelbuttonlayout = prepnlpanelbutton.BackgroundImageLayout + Skins.bottomleftcorner = pgbottomlcorner.BackgroundImage + Skins.bottomleftcornerlayout = pgbottomlcorner.BackgroundImageLayout + Skins.bottomrightcorner = pgbottomrcorner.BackgroundImage + Skins.bottomrightcornerlayout = pgbottomrcorner.BackgroundImageLayout + + ' APPLY + Skins.saveskinfiles(True) + End Sub +End Class diff --git a/ShiftOS/Skinshifter.Designer.vb b/ShiftOS/Skinshifter.Designer.vb new file mode 100644 index 0000000..6c867fb --- /dev/null +++ b/ShiftOS/Skinshifter.Designer.vb @@ -0,0 +1,404 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Skinshifter + 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() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.btnmovedown = New System.Windows.Forms.Button() + Me.btnmoveup = New System.Windows.Forms.Button() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.lblsecondstillshift = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.btnStartStop = New System.Windows.Forms.Button() + Me.Label2 = New System.Windows.Forms.Label() + Me.txtShift = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.btnAddSkin = New System.Windows.Forms.Button() + Me.lbskinlist = New System.Windows.Forms.ListBox() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.tmrchangeskin = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.btnmovedown) + Me.pgcontents.Controls.Add(Me.btnmoveup) + Me.pgcontents.Controls.Add(Me.PictureBox1) + Me.pgcontents.Controls.Add(Me.lblsecondstillshift) + Me.pgcontents.Controls.Add(Me.Label3) + Me.pgcontents.Controls.Add(Me.btnStartStop) + Me.pgcontents.Controls.Add(Me.Label2) + Me.pgcontents.Controls.Add(Me.txtShift) + Me.pgcontents.Controls.Add(Me.Label1) + Me.pgcontents.Controls.Add(Me.btnAddSkin) + Me.pgcontents.Controls.Add(Me.lbskinlist) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(455, 199) + Me.pgcontents.TabIndex = 20 + ' + 'btnmovedown + ' + Me.btnmovedown.BackgroundImage = Global.ShiftOS.My.Resources.Resources.skindownarrow + Me.btnmovedown.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnmovedown.FlatAppearance.BorderSize = 0 + Me.btnmovedown.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnmovedown.Location = New System.Drawing.Point(346, 140) + Me.btnmovedown.Name = "btnmovedown" + Me.btnmovedown.Size = New System.Drawing.Size(21, 16) + Me.btnmovedown.TabIndex = 12 + Me.btnmovedown.UseVisualStyleBackColor = True + ' + 'btnmoveup + ' + Me.btnmoveup.BackgroundImage = Global.ShiftOS.My.Resources.Resources.skinuparrow + Me.btnmoveup.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnmoveup.FlatAppearance.BorderSize = 0 + Me.btnmoveup.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnmoveup.Location = New System.Drawing.Point(346, 121) + Me.btnmoveup.Name = "btnmoveup" + Me.btnmoveup.Size = New System.Drawing.Size(21, 16) + Me.btnmoveup.TabIndex = 11 + Me.btnmoveup.UseVisualStyleBackColor = True + ' + 'PictureBox1 + ' + Me.PictureBox1.BackColor = System.Drawing.Color.Black + Me.PictureBox1.Dock = System.Windows.Forms.DockStyle.Left + Me.PictureBox1.Location = New System.Drawing.Point(340, 0) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(1, 199) + Me.PictureBox1.TabIndex = 10 + Me.PictureBox1.TabStop = False + ' + 'lblsecondstillshift + ' + Me.lblsecondstillshift.Font = New System.Drawing.Font("Microsoft Sans Serif", 21.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblsecondstillshift.Location = New System.Drawing.Point(347, 76) + Me.lblsecondstillshift.Name = "lblsecondstillshift" + Me.lblsecondstillshift.Size = New System.Drawing.Size(100, 42) + Me.lblsecondstillshift.TabIndex = 9 + Me.lblsecondstillshift.Text = "20" + Me.lblsecondstillshift.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.Location = New System.Drawing.Point(364, 60) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(66, 16) + Me.Label3.TabIndex = 8 + Me.Label3.Text = "Next Shift:" + ' + 'btnStartStop + ' + Me.btnStartStop.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnStartStop.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnStartStop.Location = New System.Drawing.Point(346, 160) + Me.btnStartStop.Name = "btnStartStop" + Me.btnStartStop.Size = New System.Drawing.Size(104, 35) + Me.btnStartStop.TabIndex = 7 + Me.btnStartStop.Text = "Enable" + Me.btnStartStop.UseVisualStyleBackColor = True + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.Location = New System.Drawing.Point(384, 30) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(62, 16) + Me.Label2.TabIndex = 6 + Me.Label2.Text = "Seconds" + ' + 'txtShift + ' + Me.txtShift.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtShift.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtShift.Location = New System.Drawing.Point(351, 28) + Me.txtShift.Multiline = True + Me.txtShift.Name = "txtShift" + Me.txtShift.Size = New System.Drawing.Size(32, 20) + Me.txtShift.TabIndex = 5 + Me.txtShift.Text = "20" + Me.txtShift.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(358, 8) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(79, 16) + Me.Label1.TabIndex = 4 + Me.Label1.Text = "Shift Interval" + ' + 'btnAddSkin + ' + Me.btnAddSkin.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.btnAddSkin.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAddSkin.Location = New System.Drawing.Point(371, 121) + Me.btnAddSkin.Name = "btnAddSkin" + Me.btnAddSkin.Size = New System.Drawing.Size(79, 35) + Me.btnAddSkin.TabIndex = 3 + Me.btnAddSkin.Text = "Add Skin" + Me.btnAddSkin.UseVisualStyleBackColor = True + ' + 'lbskinlist + ' + Me.lbskinlist.BackColor = System.Drawing.Color.White + Me.lbskinlist.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.lbskinlist.Dock = System.Windows.Forms.DockStyle.Left + Me.lbskinlist.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed + Me.lbskinlist.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbskinlist.FormattingEnabled = True + Me.lbskinlist.ItemHeight = 15 + Me.lbskinlist.Location = New System.Drawing.Point(0, 0) + Me.lbskinlist.Name = "lbskinlist" + Me.lbskinlist.Size = New System.Drawing.Size(340, 199) + Me.lbskinlist.TabIndex = 2 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 229) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(455, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(95, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Skin Shifter" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(457, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 199) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(457, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 201) + Me.pgright.TabIndex = 22 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 199) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 201) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(459, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'tmrchangeskin + ' + Me.tmrchangeskin.Interval = 1000 + ' + 'Skinshifter + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(459, 231) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "Skinshifter" + Me.Text = "Skinshifter" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents lblsecondstillshift As System.Windows.Forms.Label + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents btnStartStop As System.Windows.Forms.Button + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents txtShift As System.Windows.Forms.TextBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents btnAddSkin As System.Windows.Forms.Button + Friend WithEvents lbskinlist As System.Windows.Forms.ListBox + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents tmrchangeskin As System.Windows.Forms.Timer + Friend WithEvents btnmovedown As System.Windows.Forms.Button + Friend WithEvents btnmoveup As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/Skinshifter.resx b/ShiftOS/Skinshifter.resx new file mode 100644 index 0000000..0f25db4 --- /dev/null +++ b/ShiftOS/Skinshifter.resx @@ -0,0 +1,135 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>917, 18</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>998, 20</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1075, 21</value> + </metadata> + <metadata name="tmrchangeskin.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1184, 21</value> + </metadata> + <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> + <value>47</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Skinshifter.vb b/ShiftOS/Skinshifter.vb new file mode 100644 index 0000000..f68d557 --- /dev/null +++ b/ShiftOS/Skinshifter.vb @@ -0,0 +1,555 @@ +Imports System.IO + +Public Class Skinshifter + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + Public ShiftOSPath As String = "C:\ShiftOS" + + Public timetillchange As Integer + Public moveitemignore As Boolean + + Dim sknfileversion As String + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.SkinShifterCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonskinshifter.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonskinshifter, ShiftOSDesktop.tbskinshiftericon, ShiftOSDesktop.tbskinshiftertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(459, 231) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.skinshiftername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.skinshiftericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub lbskinlist_DrawItem(sender As Object, e As DrawItemEventArgs) Handles lbskinlist.DrawItem + If lbskinlist.Items.Count > 0 Then + e.DrawBackground() + If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then + e.Graphics.FillRectangle(Brushes.Black, e.Bounds) + End If + + Using b As New SolidBrush(e.ForeColor) + e.Graphics.DrawString(lbskinlist.GetItemText(lbskinlist.Items(e.Index)), e.Font, b, e.Bounds) + End Using + e.DrawFocusRectangle() + End If + End Sub + + Private Sub lbskinlist_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lbskinlist.SelectedIndexChanged + If moveitemignore = False Then + If lbskinlist.SelectedIndex < -1 Then + Else + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\Preview\", FileIO.DeleteDirectoryOption.DeleteAllContents) + System.IO.Compression.ZipFile.ExtractToDirectory(lbskinlist.SelectedItem.ToString, ShiftOSPath + "Shiftum42\Skins\Preview\") + If File.Exists(ShiftOSPath + "Shiftum42\Skins\Preview\SKN-version") Then + Dim sr As System.IO.StreamReader = New IO.StreamReader(ShiftOSPath + "Shiftum42\Skins\Preview\SKN-version") + Dim i As String = sr.ReadLine + sknfileversion = sr.ReadLine + sr.Close() + End If + If sknfileversion = "2.0 disposal-free skinning" Then + Skins.loadsknfile(lbskinlist.SelectedItem.ToString) + Else + infobox.showinfo("Old Skin File", "ShiftOS 0.0.8 beta 6 use a new format in skn files, the old format is no longer compatible with the Skin Shifter." & Environment.NewLine & Environment.NewLine & "Don't worry, you can still use all those old skins, the skin loader is fully compatible and the old format and we are working on compatible for the Skin Shifter - it should be fully compatible by the next release!") + 'My.Computer.FileSystem.WriteAllText(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat", My.Computer.FileSystem.ReadAllText(ShiftOSPath + "Shiftum42\Skins\Preview\skindata.dat").Replace("\Current", "\Preview"), False) + + 'If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) + 'ShiftOSDesktop.disposeoldskindata("skinloaderapplyskin") + 'ShiftOSDesktop.loadcurrentskin() + 'ShiftOSDesktop.loadskinfiles() + 'ShiftOSDesktop.setupalltitlebars() + 'ShiftOSDesktop.setcolours() + 'ShiftOSDesktop.setupdesktop() + 'ShiftOSDesktop.setupskins() + 'ShiftOSDesktop.Invalidate() + End If + End If + Else + moveitemignore = False + End If + + End Sub + + Private Sub btnAddSkin_Click(sender As Object, e As EventArgs) Handles btnAddSkin.Click + File_Opener.Show() + File_Opener.openingprogram = "skinshifter" + File_Opener.openextention = ".skn" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Private Sub tmrchangeskin_Tick(sender As Object, e As EventArgs) Handles tmrchangeskin.Tick + If timetillchange = 0 Then + If lbskinlist.SelectedIndex < lbskinlist.Items.Count - 1 Then + lbskinlist.SelectedIndex = lbskinlist.SelectedIndex + 1 + Else + lbskinlist.SelectedIndex = 0 + End If + timetillchange = txtShift.Text + lblsecondstillshift.Text = timetillchange + Else + timetillchange = timetillchange - 1 + lblsecondstillshift.Text = timetillchange + End If + End Sub + + Private Sub btnStartStop_Click(sender As Object, e As EventArgs) Handles btnStartStop.Click + Try + If btnStartStop.Text = "Enable" Then + timetillchange = txtShift.Text + lblsecondstillshift.Text = timetillchange + tmrchangeskin.Start() + btnStartStop.Text = "Disable" + Else + tmrchangeskin.Stop() + timetillchange = txtShift.Text + lblsecondstillshift.Text = timetillchange + btnStartStop.Text = "Enable" + End If + Catch + End Try + End Sub + + Private Sub txtShift_TextChanged(sender As Object, e As EventArgs) Handles txtShift.TextChanged + Try + timetillchange = txtShift.Text + lblsecondstillshift.Text = timetillchange + Catch + End Try + End Sub + + Private Sub btnmoveup_Click(sender As Object, e As EventArgs) Handles btnmoveup.Click + If lbskinlist.SelectedIndex > 0 Then + moveitemignore = True + Dim I = lbskinlist.SelectedIndex - 1 + moveitemignore = True + lbskinlist.Items.Insert(I, lbskinlist.SelectedItem) + moveitemignore = True + lbskinlist.Items.RemoveAt(lbskinlist.SelectedIndex) + moveitemignore = True + lbskinlist.SelectedIndex = I + End If + End Sub + + Private Sub btnmovedown_Click(sender As Object, e As EventArgs) Handles btnmovedown.Click + If lbskinlist.SelectedIndex < lbskinlist.Items.Count - 1 Then + moveitemignore = True +18: Dim I = lbskinlist.SelectedIndex + 2 + moveitemignore = True +19: lbskinlist.Items.Insert(I, lbskinlist.SelectedItem) + moveitemignore = True +20: lbskinlist.Items.RemoveAt(lbskinlist.SelectedIndex) + moveitemignore = True +21: lbskinlist.SelectedIndex = I - 1 +22: End If + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Snakey.Designer.vb b/ShiftOS/Snakey.Designer.vb new file mode 100644 index 0000000..b20d301 --- /dev/null +++ b/ShiftOS/Snakey.Designer.vb @@ -0,0 +1,294 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Snakey + 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() + Me.components = New System.ComponentModel.Container() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.length = New System.Windows.Forms.Label() + Me.speed = New System.Windows.Forms.Label() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.score = New System.Windows.Forms.Label() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.tmr = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.titlebar.SuspendLayout() + Me.SuspendLayout() + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 505) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(669, 2) + Me.pgbottom.TabIndex = 33 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(63, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Snakey" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(671, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'length + ' + Me.length.AutoSize = True + Me.length.BackColor = System.Drawing.Color.Transparent + Me.length.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte)) + Me.length.ForeColor = System.Drawing.Color.White + Me.length.Location = New System.Drawing.Point(574, 15) + Me.length.Name = "length" + Me.length.Size = New System.Drawing.Size(76, 20) + Me.length.TabIndex = 13 + Me.length.Text = "Length: 5" + ' + 'speed + ' + Me.speed.AutoSize = True + Me.speed.BackColor = System.Drawing.Color.Transparent + Me.speed.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte)) + Me.speed.ForeColor = System.Drawing.Color.White + Me.speed.Location = New System.Drawing.Point(288, 15) + Me.speed.Name = "speed" + Me.speed.Size = New System.Drawing.Size(73, 20) + Me.speed.TabIndex = 12 + Me.speed.Text = "Speed: 1" + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'score + ' + Me.score.AutoSize = True + Me.score.BackColor = System.Drawing.Color.Transparent + Me.score.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte)) + Me.score.ForeColor = System.Drawing.Color.White + Me.score.Location = New System.Drawing.Point(25, 15) + Me.score.Name = "score" + Me.score.Size = New System.Drawing.Size(100, 20) + Me.score.TabIndex = 11 + Me.score.Text = "Total Points: " + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 477) + Me.pgleft.TabIndex = 31 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 475) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 475) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(671, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 477) + Me.pgright.TabIndex = 32 + ' + 'tmr + ' + Me.tmr.Enabled = True + Me.tmr.Interval = 50 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.Black + Me.pgcontents.Controls.Add(Me.length) + Me.pgcontents.Controls.Add(Me.speed) + Me.pgcontents.Controls.Add(Me.score) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(0, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(673, 477) + Me.pgcontents.TabIndex = 30 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(673, 30) + Me.titlebar.TabIndex = 29 + ' + 'Snakey + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(673, 507) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MaximumSize = New System.Drawing.Size(673, 507) + Me.MinimumSize = New System.Drawing.Size(673, 507) + Me.Name = "Snakey" + Me.Text = "Snakey" + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents length As System.Windows.Forms.Label + Friend WithEvents speed As System.Windows.Forms.Label + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents score As System.Windows.Forms.Label + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents tmr As System.Windows.Forms.Timer + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Snakey.resx b/ShiftOS/Snakey.resx new file mode 100644 index 0000000..0ac61dc --- /dev/null +++ b/ShiftOS/Snakey.resx @@ -0,0 +1,132 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>741, 57</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>835, 57</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>919, 57</value> + </metadata> + <metadata name="tmr.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1032, 57</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Snakey.vb b/ShiftOS/Snakey.vb new file mode 100644 index 0000000..1e80c46 --- /dev/null +++ b/ShiftOS/Snakey.vb @@ -0,0 +1,707 @@ +Imports System.Drawing.Drawing2D + +Public Class Snakey + + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 673 'replace with minimum size + Public minimumsizeheight As Integer = 507 'replace with minimum size + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + ' fixes growing issue + If justopened = False Then + Me.Size = New Size(Me.Width, Me.Height - (Skins.titlebarheight / 2)) + End If + + If justopened = True Then + Me.Size = New Size(673, 507) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.snakeyname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.snakeyicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Structure structSnake + Dim rect As Rectangle + Dim x As Integer + Dim y As Integer + + End Structure + + Private Enum Direction + Rightward + Downward + Leftward + Upward + End Enum + + Private Const INITIAL_SNAKE_RECT_COUNT As Integer = 5 + Private Const COLUMN_COUNT As Integer = 65 + Private Const ROW_COUNT As Integer = 47 + + Private curRecCount As Integer + Private rects(,) As Rectangle + Private isSnakePart(,) As Boolean + Private snake As Collection + Private snakeBrush As Brush = New SolidBrush(Color.FromArgb(255, 255, 255)) + Private backBrush As Brush = New SolidBrush(Color.FromArgb(1, 1, 1)) + Private tokenBrush As Brush = New SolidBrush(Color.FromArgb(255, 255, 255)) + Private curDirection As Direction + Private buffer As Bitmap + Private columnCount As Integer + Private rowCount As Integer + Private snakePoints As Integer + Private snakeSpeed As Double + Private snakeLength As Integer + Private token As Rectangle + + Private Function xyToRectIndex(ByVal X As Integer, ByVal Y As Integer) As Integer + Return (Y * (columnCount)) + X + End Function + + Private Sub rectIndexToXY(ByVal Index As Integer, ByRef X As Integer, ByRef Y As Integer) + X = Index Mod (columnCount) + Y = Index \ (columnCount) + End Sub + + Private Sub initSnake() + + Dim x As Integer + Dim y As Integer + Dim i As Integer + Dim index As Integer + Dim sSnake As structSnake + snake = New Collection + + x = ((columnCount) - 10) \ 2 + y = ((rowCount) - 6) \ 2 + + Dim snakePosition As Point = New Point(x, y) + index = xyToRectIndex(x, y) + + For i = 1 To INITIAL_SNAKE_RECT_COUNT + rectIndexToXY(index + (i - 1), x, y) + sSnake.rect = rects(x, y) + sSnake.x = x + sSnake.y = y + snake.Add(sSnake) + Next + + snakeLength = INITIAL_SNAKE_RECT_COUNT + snakeSpeed = 1 + length.Text = "Length: " & CStr(snakeLength) + speed.Text = "Speed: " & CStr(snakeSpeed) + + End Sub + + Private Sub selectRectangles() + + Dim g As Graphics = Graphics.FromImage(My.Resources.snakeyback) + Dim i As Integer + Dim sSnake As structSnake + + For i = 1 To INITIAL_SNAKE_RECT_COUNT + sSnake = snake(i) + g.FillRectangle(snakeBrush, sSnake.rect) + isSnakePart(sSnake.x, sSnake.y) = True + Next + + buffer = New Bitmap(My.Resources.snakeyback) + + g.Dispose() + Refresh() + + End Sub + + Private Sub initRectangles() + + Dim i As Integer + Dim j As Integer + + columnCount = COLUMN_COUNT + rowCount = ROW_COUNT + + ReDim rects(columnCount, rowCount) + ReDim isSnakePart(columnCount, rowCount) + + For j = 0 To rowCount + For i = 0 To columnCount + rects(i, j) = New Rectangle((i * 10) + 1, (j * 10) + 1, 9, 9) + isSnakePart(i, j) = False + Next + Next + + + End Sub + + Private Sub initialize() + + curRecCount = INITIAL_SNAKE_RECT_COUNT + curDirection = Direction.Leftward + snakePoints = 0 + initRectangles() + initSnake() + selectRectangles() + setToken() + setPoints() + tmr.Interval = 50 + tmr.Enabled = True + + End Sub + + Private Sub setPoints() + score.Text = "Total Points: " & CStr(snakePoints) + End Sub + + Private Sub setToken() + + Randomize() + Dim x As Integer + Dim y As Integer + Dim g As Graphics = Graphics.FromImage(buffer) + + x = CInt(Rnd() * columnCount) + Do While x > columnCount Or isSnakePart(x, y) = True + x = CInt(Rnd() * columnCount) + Loop + + y = CInt(Rnd() * rowCount) + Do While y > rowCount Or isSnakePart(x, y) = True + y = CInt(Rnd() * rowCount) + Loop + + token = rects(x, y) + + g.FillEllipse(tokenBrush, token) + Refresh() + g.Dispose() + + End Sub + + Private Sub main_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load + initialize() + End Sub + + Private Sub main_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown + + Select Case e.KeyCode + Case Keys.Down + If Not (curDirection = Direction.Downward Or curDirection = Direction.Upward) Then + curDirection = Direction.Downward + End If + Case Keys.Left + If Not (curDirection = Direction.Leftward Or curDirection = Direction.Rightward) Then + curDirection = Direction.Leftward + End If + Case Keys.Right + If Not (curDirection = Direction.Rightward Or curDirection = Direction.Leftward) Then + curDirection = Direction.Rightward + End If + Case Keys.Up + If Not (curDirection = Direction.Upward Or curDirection = Direction.Downward) Then + curDirection = Direction.Upward + End If + End Select + + End Sub + + Private Sub moveSnake() + + Dim sSnake As structSnake + Dim x As Integer + Dim y As Integer + Dim rect As Rectangle = New Rectangle() + Dim g As Graphics = Graphics.FromImage(buffer) + + tmr.Enabled = False + sSnake = snake(snake.Count) + g.FillRectangle(backBrush, sSnake.rect) + snake.Remove(snake.Count) + isSnakePart(sSnake.x, sSnake.y) = False + sSnake = snake.Item(1) + + x = sSnake.x + y = sSnake.y + + Select Case curDirection + Case Direction.Downward + y = y + 1 + If y > rowCount Then y = 0 + Case Direction.Leftward + x = x - 1 + If x < 0 Then x = columnCount + Case Direction.Rightward + x = x + 1 + If x > columnCount Then x = 0 + Case Direction.Upward + y = y - 1 + If y < 0 Then y = rowCount + End Select + + If isSnakePart(x, y) = True Then + tmr.Enabled = False + + If MessageBox.Show("You lost! You got a total of " & snakePoints & " codepoints. ", "Snake", MessageBoxButtons.OK, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) = Windows.Forms.DialogResult.Yes Then + initialize() + Exit Sub + Else + End + End If + + End If + + + rect = rects(x, y) + + sSnake.x = x + sSnake.y = y + sSnake.rect = rect + isSnakePart(x, y) = True + + g.FillRectangle(snakeBrush, sSnake.rect) + Me.BackgroundImage = buffer + snake.Add(sSnake, , 1) + + If rects(x, y).Equals(CObj(token)) Then + + snakePoints += 1 + setPoints() + + If snakePoints Mod 5 = 0 Then + sSnake = snake.Item(snake.Count) + Select Case curDirection + Case Direction.Downward + sSnake.y -= 1 + Case (Direction.Leftward) + sSnake.x += 1 + Case Direction.Rightward + sSnake.x -= 1 + Case Direction.Upward + sSnake.y += 1 + End Select + + sSnake.rect = rects(sSnake.x, sSnake.y) + g.FillRectangle(snakeBrush, sSnake.rect) + Me.BackgroundImage = buffer + snake.Add(sSnake, , , snake.Count) + snakeLength = snake.Count + + tmr.Interval -= 1 + If tmr.Interval < 0 Then tmr.Interval = 1 + + snakeSpeed = 1 + (50 - tmr.Interval) + length.Text = "Length: " & CStr(snakeLength) + speed.Text = "Speed: " & CStr(snakeSpeed) + + End If + + setToken() + + End If + + Refresh() + + tmr.Enabled = True + + End Sub + + Private Sub tmr_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) + moveSnake() + Application.DoEvents() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/SystemInfo.Designer.vb b/ShiftOS/SystemInfo.Designer.vb new file mode 100644 index 0000000..b836dfe --- /dev/null +++ b/ShiftOS/SystemInfo.Designer.vb @@ -0,0 +1,407 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class systeminfo + 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() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.SysInfoBox = New System.Windows.Forms.GroupBox() + Me.SysInfoTextBox5 = New System.Windows.Forms.TextBox() + Me.SysInfoLabel5 = New System.Windows.Forms.Label() + Me.SysInfoBox2 = New System.Windows.Forms.TextBox() + Me.SysInfoBox1 = New System.Windows.Forms.TextBox() + Me.SysInfoLabel2 = New System.Windows.Forms.Label() + Me.SysInfoLabel1 = New System.Windows.Forms.Label() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.SysInfoLabel3 = New System.Windows.Forms.Label() + Me.SysInfoBox3 = New System.Windows.Forms.TextBox() + Me.SysInfoBox4 = New System.Windows.Forms.TextBox() + Me.SysInfoLabel4 = New System.Windows.Forms.Label() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.Button1 = New System.Windows.Forms.Button() + Me.pgcontents.SuspendLayout() + Me.SysInfoBox.SuspendLayout() + Me.GroupBox1.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.SysInfoBox) + Me.pgcontents.Controls.Add(Me.GroupBox1) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(438, 218) + Me.pgcontents.TabIndex = 20 + ' + 'SysInfoBox + ' + Me.SysInfoBox.Controls.Add(Me.SysInfoTextBox5) + Me.SysInfoBox.Controls.Add(Me.SysInfoLabel5) + Me.SysInfoBox.Controls.Add(Me.SysInfoBox2) + Me.SysInfoBox.Controls.Add(Me.SysInfoBox1) + Me.SysInfoBox.Controls.Add(Me.SysInfoLabel2) + Me.SysInfoBox.Controls.Add(Me.SysInfoLabel1) + Me.SysInfoBox.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.SysInfoBox.Location = New System.Drawing.Point(6, 15) + Me.SysInfoBox.Name = "SysInfoBox" + Me.SysInfoBox.Size = New System.Drawing.Size(428, 98) + Me.SysInfoBox.TabIndex = 14 + Me.SysInfoBox.TabStop = False + Me.SysInfoBox.Text = "ShiftOS" + ' + 'SysInfoTextBox5 + ' + Me.SysInfoTextBox5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.SysInfoTextBox5.Cursor = System.Windows.Forms.Cursors.Arrow + Me.SysInfoTextBox5.Location = New System.Drawing.Point(145, 68) + Me.SysInfoTextBox5.Name = "SysInfoTextBox5" + Me.SysInfoTextBox5.ReadOnly = True + Me.SysInfoTextBox5.Size = New System.Drawing.Size(277, 20) + Me.SysInfoTextBox5.TabIndex = 9 + ' + 'SysInfoLabel5 + ' + Me.SysInfoLabel5.AutoSize = True + Me.SysInfoLabel5.Location = New System.Drawing.Point(7, 75) + Me.SysInfoLabel5.Name = "SysInfoLabel5" + Me.SysInfoLabel5.Size = New System.Drawing.Size(122, 13) + Me.SysInfoLabel5.TabIndex = 8 + Me.SysInfoLabel5.Text = "ShiftOS Computer Name" + ' + 'SysInfoBox2 + ' + Me.SysInfoBox2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.SysInfoBox2.Cursor = System.Windows.Forms.Cursors.Arrow + Me.SysInfoBox2.Location = New System.Drawing.Point(145, 41) + Me.SysInfoBox2.Name = "SysInfoBox2" + Me.SysInfoBox2.ReadOnly = True + Me.SysInfoBox2.Size = New System.Drawing.Size(277, 20) + Me.SysInfoBox2.TabIndex = 7 + ' + 'SysInfoBox1 + ' + Me.SysInfoBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.SysInfoBox1.Cursor = System.Windows.Forms.Cursors.Arrow + Me.SysInfoBox1.Location = New System.Drawing.Point(145, 13) + Me.SysInfoBox1.Name = "SysInfoBox1" + Me.SysInfoBox1.ReadOnly = True + Me.SysInfoBox1.Size = New System.Drawing.Size(277, 20) + Me.SysInfoBox1.TabIndex = 6 + ' + 'SysInfoLabel2 + ' + Me.SysInfoLabel2.AutoSize = True + Me.SysInfoLabel2.Location = New System.Drawing.Point(7, 48) + Me.SysInfoLabel2.Name = "SysInfoLabel2" + Me.SysInfoLabel2.Size = New System.Drawing.Size(94, 13) + Me.SysInfoLabel2.TabIndex = 1 + Me.SysInfoLabel2.Text = "ShiftOS Username" + ' + 'SysInfoLabel1 + ' + Me.SysInfoLabel1.AutoSize = True + Me.SysInfoLabel1.Location = New System.Drawing.Point(7, 20) + Me.SysInfoLabel1.Name = "SysInfoLabel1" + Me.SysInfoLabel1.Size = New System.Drawing.Size(81, 13) + Me.SysInfoLabel1.TabIndex = 0 + Me.SysInfoLabel1.Text = "ShiftOS Version" + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.Button1) + Me.GroupBox1.Controls.Add(Me.SysInfoLabel3) + Me.GroupBox1.Controls.Add(Me.SysInfoBox3) + Me.GroupBox1.Controls.Add(Me.SysInfoBox4) + Me.GroupBox1.Controls.Add(Me.SysInfoLabel4) + Me.GroupBox1.Location = New System.Drawing.Point(6, 133) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(422, 76) + Me.GroupBox1.TabIndex = 15 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "Hardware" + ' + 'SysInfoLabel3 + ' + Me.SysInfoLabel3.AutoSize = True + Me.SysInfoLabel3.Location = New System.Drawing.Point(8, 22) + Me.SysInfoLabel3.Name = "SysInfoLabel3" + Me.SysInfoLabel3.Size = New System.Drawing.Size(29, 13) + Me.SysInfoLabel3.TabIndex = 2 + Me.SysInfoLabel3.Text = "CPU" + ' + 'SysInfoBox3 + ' + Me.SysInfoBox3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.SysInfoBox3.Cursor = System.Windows.Forms.Cursors.Arrow + Me.SysInfoBox3.Location = New System.Drawing.Point(68, 15) + Me.SysInfoBox3.Name = "SysInfoBox3" + Me.SysInfoBox3.ReadOnly = True + Me.SysInfoBox3.Size = New System.Drawing.Size(220, 20) + Me.SysInfoBox3.TabIndex = 8 + ' + 'SysInfoBox4 + ' + Me.SysInfoBox4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.SysInfoBox4.Cursor = System.Windows.Forms.Cursors.Arrow + Me.SysInfoBox4.Location = New System.Drawing.Point(68, 48) + Me.SysInfoBox4.Name = "SysInfoBox4" + Me.SysInfoBox4.ReadOnly = True + Me.SysInfoBox4.Size = New System.Drawing.Size(220, 20) + Me.SysInfoBox4.TabIndex = 9 + ' + 'SysInfoLabel4 + ' + Me.SysInfoLabel4.AutoSize = True + Me.SysInfoLabel4.Location = New System.Drawing.Point(8, 48) + Me.SysInfoLabel4.Name = "SysInfoLabel4" + Me.SysInfoLabel4.Size = New System.Drawing.Size(54, 13) + Me.SysInfoLabel4.TabIndex = 3 + Me.SysInfoLabel4.Text = "RAM Size" + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 248) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(438, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(154, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "System Information" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(440, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 218) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(440, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 220) + Me.pgright.TabIndex = 22 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 218) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 220) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(442, 30) + Me.titlebar.TabIndex = 19 + ' + 'Button1 + ' + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(294, 15) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(122, 55) + Me.Button1.TabIndex = 10 + Me.Button1.Text = "Dump to Text File" + Me.Button1.UseVisualStyleBackColor = True + ' + 'systeminfo + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(442, 250) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "systeminfo" + Me.Text = "SystemInfo" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.SysInfoBox.ResumeLayout(False) + Me.SysInfoBox.PerformLayout() + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents SysInfoBox As System.Windows.Forms.GroupBox + Friend WithEvents SysInfoBox2 As System.Windows.Forms.TextBox + Friend WithEvents SysInfoBox1 As System.Windows.Forms.TextBox + Friend WithEvents SysInfoLabel2 As System.Windows.Forms.Label + Friend WithEvents SysInfoLabel1 As System.Windows.Forms.Label + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents SysInfoLabel3 As System.Windows.Forms.Label + Friend WithEvents SysInfoBox3 As System.Windows.Forms.TextBox + Friend WithEvents SysInfoBox4 As System.Windows.Forms.TextBox + Friend WithEvents SysInfoLabel4 As System.Windows.Forms.Label + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents SysInfoTextBox5 As System.Windows.Forms.TextBox + Friend WithEvents SysInfoLabel5 As System.Windows.Forms.Label + Friend WithEvents Button1 As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/SystemInfo.resx b/ShiftOS/SystemInfo.resx new file mode 100644 index 0000000..b8db819 --- /dev/null +++ b/ShiftOS/SystemInfo.resx @@ -0,0 +1,129 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 57</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>111, 57</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>195, 57</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/SystemInfo.vb b/ShiftOS/SystemInfo.vb new file mode 100644 index 0000000..7f1eeff --- /dev/null +++ b/ShiftOS/SystemInfo.vb @@ -0,0 +1,450 @@ +Public Class systeminfo + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 458 'replace with minimum size + Public minimumsizeheight As Integer = 265 'replace with minimum size + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.SystemInfoCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonsysinfo.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonsysinfo, ShiftOSDesktop.tbsysinfoicon, ShiftOSDesktop.tbsysinfotext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + 'CODE HERE + SysInfoBox1.Text = ShiftOSDesktop.ingameversion + SysInfoBox2.Text = ShiftOSDesktop.username + SysInfoTextBox5.Text = ShiftOSDesktop.osname + Dim PrcName As String + + PrcName = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", Nothing) + SysInfoBox3.Text = PrcName + SysInfoBox4.Text = (String.Format("{0} Megabytes", System.Math.Round(My.Computer.Info.TotalPhysicalMemory / (1024 * 1024)), 2).ToString) + + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(442, 250) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.sysinfoname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtsysinfoicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.sysinfoicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Public Sub updateinfo() + SysInfoBox1.Text = ShiftOSDesktop.ingameversion + SysInfoBox2.Text = ShiftOSDesktop.username + Dim PrcName As String + + PrcName = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", Nothing) + SysInfoBox3.Text = PrcName + SysInfoBox4.Text = (String.Format("{0} Megabytes", System.Math.Round(My.Computer.Info.TotalPhysicalMemory / (1024 * 1024)), 2).ToString) + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + File_Saver.savingprogram = "sysinf" + File_Saver.Show() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/TanColorScheme.vb b/ShiftOS/TanColorScheme.vb new file mode 100644 index 0000000..0ec943a --- /dev/null +++ b/ShiftOS/TanColorScheme.vb @@ -0,0 +1,308 @@ +Public Class TanColorScheme + Inherits ProfessionalColorTable + +Public Overrides ReadOnly Property ButtonCheckedGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property ButtonCheckedGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property ButtonCheckedGradientMiddle() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property ButtonPressedBorder() As +System.Drawing.Color + Get + Return Color.FromArgb(&H31, &H6A, &HC5) + End Get + End Property + +Public Overrides ReadOnly Property ButtonPressedGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&H98, &HB5, &HE2) + End Get + End Property + +Public Overrides ReadOnly Property ButtonPressedGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&H98, &HB5, &HE2) + End Get + End Property + +Public Overrides ReadOnly Property ButtonPressedGradientMiddle() As +System.Drawing.Color + Get + Return Color.FromArgb(&H98, &HB5, &HE2) + End Get + End Property + +Public Overrides ReadOnly Property ButtonSelectedBorder() As +System.Drawing.Color + Get + Return MyBase.ButtonSelectedBorder + End Get + End Property + +Public Overrides ReadOnly Property ButtonSelectedGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property ButtonSelectedGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property ButtonSelectedGradientMiddle() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property CheckBackground() As +System.Drawing.Color + Get + Return Color.FromArgb(&HE1, 230, &HE8) + End Get + End Property + +Public Overrides ReadOnly Property CheckPressedBackground() As +System.Drawing.Color + Get + Return Color.FromArgb(&H31, &H6A, &HC5) + End Get + End Property + +Public Overrides ReadOnly Property CheckSelectedBackground() As +System.Drawing.Color + Get + Return Color.FromArgb(&H31, &H6A, &HC5) + End Get + End Property + + Public Overrides ReadOnly Property GripDark() As System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 190, &HB3) + End Get + End Property + + Public Overrides ReadOnly Property GripLight() As System.Drawing.Color + Get + Return Color.FromArgb(&HFF, &HFF, &HFF) + End Get + End Property + +Public Overrides ReadOnly Property ImageMarginGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HFE, &HFE, &HFB) + End Get + End Property + +Public Overrides ReadOnly Property ImageMarginGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&HBD, &HBD, &HA3) + End Get + End Property + +Public Overrides ReadOnly Property ImageMarginGradientMiddle() As +System.Drawing.Color + Get + Return Color.FromArgb(&HEC, &HE7, &HE0) + End Get + End Property + +Public Overrides ReadOnly Property ImageMarginRevealedGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HF7, &HF6, &HEF) + End Get + End Property + +Public Overrides ReadOnly Property ImageMarginRevealedGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(230, &HE3, 210) + End Get + End Property + + Public Overrides ReadOnly Property ImageMarginRevealedGradientMiddle() +As System.Drawing.Color +Get +Return Color.FromArgb(&HF2, 240, &HE4) +End Get +End Property + + Public Overrides ReadOnly Property MenuBorder() As System.Drawing.Color + Get + Return Color.FromArgb(&H8A, &H86, &H7A) + End Get + End Property + +Public Overrides ReadOnly Property MenuItemBorder() As +System.Drawing.Color + Get + Return Color.FromArgb(&H31, &H6A, &HC5) + End Get + End Property + +Public Overrides ReadOnly Property MenuItemPressedGradientBegin() As +System.Drawing.Color + Get + Return MyBase.MenuItemPressedGradientBegin + End Get + End Property + +Public Overrides ReadOnly Property MenuItemPressedGradientEnd() As +System.Drawing.Color + Get + Return MyBase.MenuItemPressedGradientEnd + End Get + End Property + +Public Overrides ReadOnly Property MenuItemPressedGradientMiddle() As +System.Drawing.Color + Get + Return MyBase.MenuItemPressedGradientMiddle + End Get + End Property + +Public Overrides ReadOnly Property MenuItemSelected() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property MenuItemSelectedGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property MenuItemSelectedGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC1, 210, &HEE) + End Get + End Property + +Public Overrides ReadOnly Property MenuStripGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HE5, &HE5, &HD7) + End Get + End Property + +Public Overrides ReadOnly Property MenuStripGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&HF4, &HF2, &HE8) + End Get + End Property + +Public Overrides ReadOnly Property OverflowButtonGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HF3, &HF2, 240) + End Get + End Property + +Public Overrides ReadOnly Property OverflowButtonGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&H92, &H92, &H76) + End Get + End Property + +Public Overrides ReadOnly Property OverflowButtonGradientMiddle() As +System.Drawing.Color + Get + Return Color.FromArgb(&HE2, &HE1, &HDB) + End Get + End Property + +Public Overrides ReadOnly Property RaftingContainerGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HE5, &HE5, &HD7) + End Get + End Property + +Public Overrides ReadOnly Property RaftingContainerGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(&HF4, &HF2, &HE8) + End Get + End Property + +Public Overrides ReadOnly Property SeparatorDark() As +System.Drawing.Color + Get + Return Color.FromArgb(&HC5, &HC2, &HB8) + End Get + End Property + +Public Overrides ReadOnly Property SeparatorLight() As +System.Drawing.Color + Get + Return Color.FromArgb(&HFF, &HFF, &HFF) + End Get + End Property + +Public Overrides ReadOnly Property ToolStripBorder() As +System.Drawing.Color + Get + Return Color.FromArgb(&HA3, &HA3, &H7C) + End Get + End Property + +Public Overrides ReadOnly Property ToolStripDropDownBackground() As +System.Drawing.Color + Get + Return Color.FromArgb(&HFC, &HFC, &HF9) + End Get + End Property + +Public Overrides ReadOnly Property ToolStripGradientBegin() As +System.Drawing.Color + Get + Return Color.FromArgb(&HF7, &HF6, &HEF) + End Get + End Property + +Public Overrides ReadOnly Property ToolStripGradientEnd() As +System.Drawing.Color + Get + Return Color.FromArgb(230, &HE3, 210) + End Get + End Property + +Public Overrides ReadOnly Property ToolStripGradientMiddle() As +System.Drawing.Color + Get + Return Color.FromArgb(&HF2, 240, &HE4) + End Get + End Property +End Class diff --git a/ShiftOS/Terminal.Designer.vb b/ShiftOS/Terminal.Designer.vb new file mode 100644 index 0000000..ae4fda1 --- /dev/null +++ b/ShiftOS/Terminal.Designer.vb @@ -0,0 +1,275 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Terminal + 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() + Me.components = New System.ComponentModel.Container() + Me.txtterm = New System.Windows.Forms.TextBox() + Me.tmrfirstrun = New System.Windows.Forms.Timer(Me.components) + Me.tmrshutdown = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.tmrstorylineupdate = New System.Windows.Forms.Timer(Me.components) + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'txtterm + ' + Me.txtterm.BackColor = System.Drawing.Color.Black + Me.txtterm.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txtterm.Cursor = System.Windows.Forms.Cursors.No + Me.txtterm.Dock = System.Windows.Forms.DockStyle.Fill + Me.txtterm.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtterm.ForeColor = System.Drawing.Color.White + Me.txtterm.Location = New System.Drawing.Point(2, 30) + Me.txtterm.Multiline = True + Me.txtterm.Name = "txtterm" + Me.txtterm.Size = New System.Drawing.Size(646, 368) + Me.txtterm.TabIndex = 0 + ' + 'tmrfirstrun + ' + Me.tmrfirstrun.Interval = 1000 + ' + 'tmrshutdown + ' + ' + 'pgcontents + ' + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(646, 368) + Me.pgcontents.TabIndex = 20 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 370) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 368) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(648, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 370) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 368) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(650, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTerminal + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(73, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Terminal" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(648, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 398) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(646, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'tmrstorylineupdate + ' + Me.tmrstorylineupdate.Interval = 1000 + ' + 'Terminal + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.Black + Me.ClientSize = New System.Drawing.Size(650, 400) + Me.Controls.Add(Me.txtterm) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.KeyPreview = True + Me.MinimumSize = New System.Drawing.Size(350, 200) + Me.Name = "Terminal" + Me.Text = "Terminal" + Me.TopMost = True + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents txtterm As System.Windows.Forms.TextBox + Friend WithEvents tmrfirstrun As System.Windows.Forms.Timer + Friend WithEvents tmrshutdown As System.Windows.Forms.Timer + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents tmrstorylineupdate As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/Terminal.resx b/ShiftOS/Terminal.resx new file mode 100644 index 0000000..9ac946c --- /dev/null +++ b/ShiftOS/Terminal.resx @@ -0,0 +1,138 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="tmrfirstrun.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>106, 17</value> + </metadata> + <metadata name="tmrshutdown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>216, 17</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>432, 17</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>516, 17</value> + </metadata> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>629, 17</value> + </metadata> + <metadata name="tmrstorylineupdate.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>723, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Terminal.vb b/ShiftOS/Terminal.vb new file mode 100644 index 0000000..134658f --- /dev/null +++ b/ShiftOS/Terminal.vb @@ -0,0 +1,1996 @@ +Imports System.Net.Mail + +Public Class Terminal + Public cmds As String() + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 350 + Public minimumsizeheight As Integer = 200 + + Dim CreatingAlias1 As Boolean + Dim CreatingAlias2 As Boolean + + Dim Part1Alias As String + Dim Part2Alias As String + + Public StartOfAlias As String + Public EndOfAlias As String + + Dim alltext As String + Dim command As String + Dim trackpos As Integer + Dim firstrun As Integer + Dim testing As Boolean = True + Dim further As Boolean = True + + Public sendinputtomod As Boolean = False + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.TerminalCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonterminal.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonterminal, ShiftOSDesktop.tbterminalicon, ShiftOSDesktop.tbterminaltext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + txtterm.Text = txtterm.Text + ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + txtterm.Select(txtterm.Text.Length, 0) + txtterm.Cursor = Nothing + + 'transparancy key moved here from set skin to avoid cropped terminal bug + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + + If ShiftOSDesktop.terminalfullscreen = True Then + fullterminal() + Else + miniterminal() + End If + + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Go back to desktop on control + T + If e.KeyCode = Keys.T AndAlso e.Control Then + ShiftOSDesktop.Show() + ShiftOSDesktop.Visible = True + ShiftOSDesktop.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(650, 400) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.terminalname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtterminalicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.terminalicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Public Sub miniterminal() + Me.WindowState = FormWindowState.Normal + If ShiftOSDesktop.boughttitlebar = True Then + titlebar.Show() + End If + If ShiftOSDesktop.boughtwindowborders = True Then + pgright.Show() + pgleft.Show() + pgbottom.Show() + End If + If ShiftOSDesktop.boughtterminalscrollbar = True Then + txtterm.ScrollBars = ScrollBars.Vertical + End If + setuptitlebar() + setupborders() + 'ShiftOSDesktop.setcolours() + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setskin() + End Sub + + Public Sub fullterminal() + Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None + Me.WindowState = FormWindowState.Maximized + txtterm.ScrollBars = ScrollBars.None + titlebar.Hide() + pgright.Hide() + pgleft.Hide() + pgbottom.Hide() + Me.BringToFront() + End Sub + + + Private Sub ReadCommand() + command = txtterm.Lines(txtterm.Lines.Length - 1) + command = command.Replace(ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> ", "") + command = command.ToLower() + End Sub + + Private Sub txtterm_Click(sender As Object, e As EventArgs) Handles txtterm.Click, txtterm.MouseDoubleClick + txtterm.Select(txtterm.TextLength, 0) + txtterm.ScrollToCaret() + End Sub + + Private Sub txtterm_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtterm.KeyDown + If e.KeyCode = Keys.T AndAlso e.Control Then + Me.Hide() + e.SuppressKeyPress = True + End If + + Select Case e.KeyCode + Case Keys.ShiftKey + trackpos = trackpos - 1 + Case Keys.Alt + trackpos = trackpos - 1 + Case Keys.CapsLock + trackpos = trackpos - 1 + Case Keys.ControlKey + trackpos = trackpos - 1 + Case Keys.LWin + trackpos = trackpos - 1 + Case Keys.RWin + trackpos = trackpos - 1 + Case Keys.Right + If txtterm.SelectionStart = txtterm.TextLength Then + trackpos = trackpos - 1 + End If + Case Keys.Left + If trackpos < 1 Then + e.SuppressKeyPress = True + trackpos = trackpos - 1 + Else + trackpos = trackpos - 2 + End If + Case Keys.Up + e.SuppressKeyPress = True + trackpos = trackpos - 1 + Case Keys.Down + e.SuppressKeyPress = True + trackpos = trackpos - 1 + End Select + + If e.KeyCode = Keys.Enter Then + e.SuppressKeyPress = True + ReadCommand() + DoCommand() + + If command = "clear" Then + txtterm.Text = txtterm.Text + ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + txtterm.Select(txtterm.Text.Length, 0) + + Else + txtterm.Text = txtterm.Text + Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + txtterm.Select(txtterm.Text.Length, 0) + End If + + trackpos = 0 + Else + If e.KeyCode = Keys.Back Then + Else + trackpos = trackpos + 1 + End If + End If + + If e.KeyCode = Keys.Back Then + If trackpos < 1 Then + e.SuppressKeyPress = True + Else + If txtterm.SelectedText.Length < 1 Then + trackpos = trackpos - 1 + Else + e.SuppressKeyPress = True + End If + End If + End If + + If ShiftOSDesktop.boughtautoscrollterminal = True Then + txtterm.Select(txtterm.TextLength, 0) + txtterm.ScrollToCaret() + End If + + End Sub + + Private Sub DoCommand() + If command Like "speak_infobox ""*"" ""*""" Then + Dim findwords() As String = command.Split("""") + Helper.speakInfoBox(findwords(1), findwords(3)) + further = False + End If + If command Like "speak ""*""" Then + Dim findwords() As String = command.Split("""") + If Not findwords(1) = "" Then + Helper.speak(findwords(1)) + Else + Helper.speak("I'm sorry, but you didn't enter anything for me to speak.") + End If + further = False + End If + If command Like "alias *" Then + CreatingAlias1 = False + CreatingAlias2 = False + txtterm.Text = txtterm.Text & Environment.NewLine & "Now type in the alias, start the alias with 'al' and leave a space." & Environment.NewLine + CreatingAlias1 = True + End If + + If command Like "al *" And CreatingAlias1 = True Then + Part1Alias = command.Substring(5) + txtterm.Text = txtterm.Text & Environment.NewLine & "Saved the first part of the alias, now type in the command you want it to execute, starting with 'co' and a space" & Environment.NewLine + CreatingAlias1 = False + CreatingAlias2 = True + ElseIf CreatingAlias1 = False And command Like "al* " Then + wrongcommand() + End If + + If command Like "co *" And CreatingAlias2 = True Then + Part2Alias = command.Substring(5) + My.Computer.FileSystem.CreateDirectory(ShiftOSDesktop.ShiftOSPath + "\SoftwareData\Terminal-Aliases") + My.Computer.FileSystem.WriteAllText(ShiftOSDesktop.ShiftOSPath + "\SoftwareData\Terminal_Aliases\Alias1.txt", Part1Alias, False) + My.Computer.FileSystem.WriteAllText(ShiftOSDesktop.ShiftOSPath + "\SoftwareData\Terminal_Aliases\Alias2.txt", Part2Alias, False) + txtterm.Text = txtterm.Text & Environment.NewLine & "Saved the alias successfully." + CreatingAlias1 = False + CreatingAlias2 = False + ElseIf CreatingAlias2 = False And command Like "co *" Then + wrongcommand() + End If + Try + StartOfAlias = My.Computer.FileSystem.ReadAllText(ShiftOSDesktop.ShiftOSPath & "\SoftwareData\Terminal-Aliases\Alias1.txt") + + EndOfAlias = My.Computer.FileSystem.ReadAllText(ShiftOSDesktop.ShiftOSPath & "\SoftwareData\Terminal-Aliases\Alias2.txt") + Catch ex As Exception + End Try + Try + If command Like StartOfAlias.ToString And EndOfAlias.ToString Then + infobox.Show() + infobox.lbtitletext.Text = "Critical Error - Terminal" + infobox.lblintructtext.Text = "The command did not respond in time, stopping command" + ShiftOSDesktop.log = ShiftOSDesktop.log & ShiftOSDesktop.username & " found seceret in the game, may has access to source-code." + End If + Catch ex As Exception + End Try + + If command Like "log *" Then + txtterm.Text = "" + ShiftOSDesktop.log = ShiftOSDesktop.log & "Log was shown to " & ShiftOSDesktop.username & " at " & TimeOfDay + txtterm.Text = ShiftOSDesktop.log + End If + + If command Like "ctd" Then + ForceCrash() + End If + + If command Like "join *" Then + coherencemode.setupwindows(command.Substring(5)) + txtterm.Text = txtterm.Text & Environment.NewLine & "Enabling Coherence Mode for " & (command.Substring(5)) & Environment.NewLine + End If + + If command Like "set username *" Then + If ShiftOSDesktop.boughtcustomusername = True Then + ShiftOSDesktop.username = command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1)) + further = False + End If + End If + + If command Like "set osname *" Then + If ShiftOSDesktop.boughtchangeosnamecommand = True Then + ShiftOSDesktop.osname = command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1)) + further = False + End If + End If + + If command Like "give me *" Then + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1)) + further = False + End If + + If command Like "dig me *" Then + Dim amount As Decimal = command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1)) + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance + amount + Bitnote_Wallet.logtransaction(amount, "Credit From", "ShiftOS Devs - Thanks for donating!") + Bitnote_Wallet.setupbitnotestats() + further = False + End If + If command Like "show me *, *" Then + Dim term As String() + term = command.Remove(0, 8).Split(", ") + infobox.title = term(0) + infobox.textinfo = term(1) + infobox.Show() + End If + If ShiftOSDesktop.boughtwindowsanywhere = True Then + If command Like "move *" Then + command = command.Replace(", ", ",") + Dim coords As String() = command.Split(" ") + Dim xandy As String = coords(coords.Length - 1) + Dim spxandy() As String = xandy.Split(",") + Select Case coords(1) + Case "knowledge", ShiftOSDesktop.knowledgeinputname.ToLower + Knowledge_Input.Location = New Point(spxandy(0), spxandy(1)) + Case "terminal", ShiftOSDesktop.terminalname.ToLower + Me.Location = New Point(spxandy(0), spxandy(1)) + Case "shiftorium", ShiftOSDesktop.shiftoriumname.ToLower + Shiftorium.Location = New Point(spxandy(0), spxandy(1)) + Case "clock", ShiftOSDesktop.clockname.ToLower + Clock.Location = New Point(spxandy(0), spxandy(1)) + Case "shifter", ShiftOSDesktop.shiftername.ToLower + Shifter.Location = New Point(spxandy(0), spxandy(1)) + Case "colour", "color", ShiftOSDesktop.colourpickername.ToLower + Colour_Picker.Location = New Point(spxandy(0), spxandy(1)) + Case "info", "infobox" + infobox.Location = New Point(spxandy(0), spxandy(1)) + Case "pong", ShiftOSDesktop.pongname.ToLower + Pong.Location = New Point(spxandy(0), spxandy(1)) + Case "file", ShiftOSDesktop.fileskimmername.ToLower + File_Skimmer.Location = New Point(spxandy(0), spxandy(1)) + Case "textpad", ShiftOSDesktop.textpadname.ToLower + TextPad.Location = New Point(spxandy(0), spxandy(1)) + Case "fileopener", ShiftOSDesktop.fileopenername.ToLower + File_Opener.Location = New Point(spxandy(0), spxandy(1)) + Case "filesaver", ShiftOSDesktop.filesavername.ToLower + File_Saver.Location = New Point(spxandy(0), spxandy(1)) + Case "graphicpicker", "graphic", ShiftOSDesktop.graphicpickername.ToLower + Graphic_Picker.Location = New Point(spxandy(0), spxandy(1)) + Case "skinloader", "skin", ShiftOSDesktop.skinloadername.ToLower + Skin_Loader.Location = New Point(spxandy(0), spxandy(1)) + Case "artpad", "art", ShiftOSDesktop.artpadname.ToLower + ArtPad.Location = New Point(spxandy(0), spxandy(1)) + Case "calculator", "calc", ShiftOSDesktop.calculatorname.ToLower + Calculator.Location = New Point(spxandy(0), spxandy(1)) + Case "webbrowser", "web", ShiftOSDesktop.webbrowsername.ToLower + Web_Browser.Location = New Point(spxandy(0), spxandy(1)) + Case "videoplayer", "video", ShiftOSDesktop.videoplayername.ToLower + Web_Browser.Location = New Point(spxandy(0), spxandy(1)) + Case "namechanger", "name", ShiftOSDesktop.namechangername.ToLower + Name_Changer.Location = New Point(spxandy(0), spxandy(1)) + Case "iconmanager", "icon", ShiftOSDesktop.iconmanagername.ToLower + Icon_Manager.Location = New Point(spxandy(0), spxandy(1)) + Case "bitnotewallet", "wallet", ShiftOSDesktop.bitnotewalletname.ToLower + Bitnote_Wallet.Location = New Point(spxandy(0), spxandy(1)) + Case "bitnotedigger", "digger", ShiftOSDesktop.bitnotediggername.ToLower + Bitnote_Digger.Location = New Point(spxandy(0), spxandy(1)) + Case "skinshifter", ShiftOSDesktop.skinshiftername.ToLower + Skinshifter.Location = New Point(spxandy(0), spxandy(1)) + Case "shiftnet", ShiftOSDesktop.shiftnetname.ToLower + Shiftnet.Location = New Point(spxandy(0), spxandy(1)) + Case "dodge", ShiftOSDesktop.dodgename.ToLower + Dodge.Location = New Point(spxandy(0), spxandy(1)) + Case "downloadmanager", ShiftOSDesktop.downloadmanagername.ToLower + Downloadmanager.Location = New Point(spxandy(0), spxandy(1)) + Case "installer", ShiftOSDesktop.installername.ToLower + Installer.Location = New Point(spxandy(0), spxandy(1)) + Case "snakey", ShiftOSDesktop.snakeyname.ToLower + Snakey.Location = New Point(spxandy(0), spxandy(1)) + Case "orcwrite", ShiftOSDesktop.orcwritename.ToLower + OrcWrite.Location = New Point(spxandy(0), spxandy(1)) + End Select + further = False + End If + End If + + If ShiftOSDesktop.boughtmultitasking = True Then + If command Like "switch to *" Then + Dim findwords() As String = command.Split(" ") + Select Case findwords(2) + Case "knowledge", ShiftOSDesktop.knowledgeinputname.ToLower + Knowledge_Input.BringToFront() + Case "shiftorium", ShiftOSDesktop.shiftoriumname.ToLower + Shiftorium.BringToFront() + Case "clock", ShiftOSDesktop.clockname.ToLower + Clock.BringToFront() + Case "shifter", ShiftOSDesktop.shiftername.ToLower + Shifter.BringToFront() + Case "colour", ShiftOSDesktop.colourpickername.ToLower + Colour_Picker.BringToFront() + Case "info" + infobox.BringToFront() + Case "pong", ShiftOSDesktop.pongname.ToLower + Pong.BringToFront() + Case "file", ShiftOSDesktop.fileskimmername.ToLower + File_Skimmer.BringToFront() + Case "textpad", ShiftOSDesktop.textpadname.ToLower + TextPad.BringToFront() + Case "fileopener", ShiftOSDesktop.fileopenername.ToLower + File_Opener.BringToFront() + Case "filesaver", ShiftOSDesktop.filesavername.ToLower + File_Saver.BringToFront() + Case "graphic", ShiftOSDesktop.graphicpickername.ToLower + Graphic_Picker.BringToFront() + Case "skin", ShiftOSDesktop.skinloadername.ToLower + Skin_Loader.BringToFront() + Case "artpad", ShiftOSDesktop.artpadname.ToLower + ArtPad.BringToFront() + Case "calculator", ShiftOSDesktop.calculatorname.ToLower + Calculator.BringToFront() + Case "webbrowser", "web", ShiftOSDesktop.webbrowsername.ToLower + Web_Browser.BringToFront() + Case "videoplayer", "video", "video player", ShiftOSDesktop.videoplayername.ToLower + Video_Player.BringToFront() + Case "namechanger", "name", "name changer", ShiftOSDesktop.namechangername.ToLower + Name_Changer.BringToFront() + Case "iconmanager", "icon", ShiftOSDesktop.iconmanagername.ToLower + Name_Changer.BringToFront() + Case "bitnotewallet", "wallet", ShiftOSDesktop.bitnotewalletname.ToLower + Bitnote_Wallet.BringToFront() + Case "bitnotedigger", "digger", ShiftOSDesktop.bitnotediggername.ToLower + Bitnote_Digger.BringToFront() + Case "skinshifter", ShiftOSDesktop.skinshiftername.ToLower + Skinshifter.BringToFront() + Case "shiftnet", ShiftOSDesktop.shiftnetname.ToLower + Shiftnet.BringToFront() + Case "dodge", ShiftOSDesktop.dodgename.ToLower + Dodge.BringToFront() + Case "downloadmanager", ShiftOSDesktop.downloadmanagername.ToLower + Downloadmanager.BringToFront() + Case "installer", ShiftOSDesktop.installername.ToLower + Installer.BringToFront() + Case "snakey", ShiftOSDesktop.snakeyname.ToLower + Snakey.BringToFront() + Case "orcwrite", ShiftOSDesktop.orcwritename.ToLower + OrcWrite.BringToFront() + End Select + further = False + Me.BringToFront() + End If + End If + + If ShiftOSDesktop.boughtrollupcommand = True Then + If command Like "roll *" Then + Dim findwords() As String = command.Split(" ") + Select Case findwords(1) + Case "knowledge", ShiftOSDesktop.knowledgeinputname.ToLower + Knowledge_Input.rollupanddown() + Case "shiftorium", ShiftOSDesktop.shiftoriumname.ToLower + Shiftorium.rollupanddown() + Case "clock", ShiftOSDesktop.clockname.ToLower + Clock.rollupanddown() + Case "shifter", ShiftOSDesktop.shiftername.ToLower + Shifter.rollupanddown() + Case "colour", ShiftOSDesktop.colourpickername.ToLower + Colour_Picker.rollupanddown() + Case "info", "infobox" + infobox.rollupanddown() + Case "pong", ShiftOSDesktop.pongname.ToLower + Pong.rollupanddown() + Case "file", ShiftOSDesktop.fileskimmername.ToLower + File_Skimmer.rollupanddown() + Case "textpad", ShiftOSDesktop.textpadname.ToLower + TextPad.rollupanddown() + Case "fileopener", ShiftOSDesktop.fileopenername.ToLower + File_Opener.rollupanddown() + Case "filesaver", ShiftOSDesktop.filesavername.ToLower + File_Saver.rollupanddown() + Case "graphic", ShiftOSDesktop.graphicpickername.ToLower + Graphic_Picker.rollupanddown() + Case "skin", ShiftOSDesktop.skinloadername.ToLower + Skin_Loader.rollupanddown() + Case "artpad", ShiftOSDesktop.artpadname.ToLower + ArtPad.rollupanddown() + Case "calculator", ShiftOSDesktop.calculatorname.ToLower + Calculator.rollupanddown() + Case "webbrowser", "web", ShiftOSDesktop.webbrowsername.ToLower + Web_Browser.rollupanddown() + Case "videoplayer", "video", "video player", ShiftOSDesktop.videoplayername.ToLower + Video_Player.rollupanddown() + Case "namechanger", "name", "name changer", ShiftOSDesktop.namechangername.ToLower + Name_Changer.rollupanddown() + Case "iconmanager", "icon", ShiftOSDesktop.iconmanagername.ToLower + Name_Changer.rollupanddown() + Case "bitnotewallet", "wallet", ShiftOSDesktop.bitnotewalletname.ToLower + Bitnote_Wallet.rollupanddown() + Case "bitnotedigger", "digger", ShiftOSDesktop.bitnotediggername.ToLower + Bitnote_Digger.rollupanddown() + Case "skinshifter", ShiftOSDesktop.skinshiftername.ToLower + Skinshifter.rollupanddown() + Case "shiftnet", ShiftOSDesktop.shiftnetname.ToLower + Shiftnet.rollupanddown() + Case "dodge", ShiftOSDesktop.dodgename.ToLower + Dodge.rollupanddown() + Case "downloadmanager", ShiftOSDesktop.downloadmanagername.ToLower + Downloadmanager.rollupanddown() + Case "installer", ShiftOSDesktop.installername.ToLower + Installer.rollupanddown() + Case "snakey", ShiftOSDesktop.snakeyname.ToLower + Snakey.rollupanddown() + Case "orcwrite", ShiftOSDesktop.orcwritename.ToLower + OrcWrite.rollupanddown() + End Select + further = False + Me.BringToFront() + End If + End If + + If ShiftOSDesktop.boughtminimizecommand = True Then + If command Like "minimize *" Then + Dim findwords() As String = command.Split(" ") + Select Case findwords(1) + Case "knowledge", ShiftOSDesktop.knowledgeinputname.ToLower + ShiftOSDesktop.minimizeprogram(Knowledge_Input, False) + Case "shiftorium", ShiftOSDesktop.shiftoriumname.ToLower + ShiftOSDesktop.minimizeprogram(Shiftorium, False) + Case "clock", ShiftOSDesktop.clockname.ToLower + ShiftOSDesktop.minimizeprogram(Clock, False) + Case "shifter", ShiftOSDesktop.shiftername.ToLower + ShiftOSDesktop.minimizeprogram(Shifter, False) + Case "colour", ShiftOSDesktop.colourpickername.ToLower + ShiftOSDesktop.minimizeprogram(Colour_Picker, False) + Case "info", "infobox" + ShiftOSDesktop.minimizeprogram(infobox, False) + Case "pong", ShiftOSDesktop.pongname.ToLower + ShiftOSDesktop.minimizeprogram(Pong, False) + Case "file", ShiftOSDesktop.fileskimmername.ToLower + ShiftOSDesktop.minimizeprogram(File_Skimmer, False) + Case "textpad", ShiftOSDesktop.textpadname.ToLower + ShiftOSDesktop.minimizeprogram(TextPad, False) + Case "fileopener", ShiftOSDesktop.fileopenername.ToLower + ShiftOSDesktop.minimizeprogram(File_Opener, False) + Case "filesaver", ShiftOSDesktop.filesavername.ToLower + ShiftOSDesktop.minimizeprogram(File_Saver, False) + Case "graphic", ShiftOSDesktop.graphicpickername.ToLower + ShiftOSDesktop.minimizeprogram(Graphic_Picker, False) + Case "skin", ShiftOSDesktop.skinloadername.ToLower + ShiftOSDesktop.minimizeprogram(Skin_Loader, False) + Case "artpad", ShiftOSDesktop.artpadname.ToLower + ShiftOSDesktop.minimizeprogram(ArtPad, False) + Case "calculator", ShiftOSDesktop.calculatorname.ToLower + ShiftOSDesktop.minimizeprogram(Calculator, False) + Case "webbrowser", "web", ShiftOSDesktop.webbrowsername.ToLower + ShiftOSDesktop.minimizeprogram(Web_Browser, False) + Case "videoplayer", "video", "video player", ShiftOSDesktop.videoplayername.ToLower + ShiftOSDesktop.minimizeprogram(Video_Player, False) + Case "namechanger", "name", "name changer", ShiftOSDesktop.namechangername.ToLower + ShiftOSDesktop.minimizeprogram(Name_Changer, False) + Case "iconmanager", "icon", ShiftOSDesktop.iconmanagername.ToLower + ShiftOSDesktop.minimizeprogram(Name_Changer, False) + Case "bitnotewallet", "wallet", ShiftOSDesktop.bitnotewalletname.ToLower + ShiftOSDesktop.minimizeprogram(Bitnote_Wallet, False) + Case "bitnotedigger", "digger", ShiftOSDesktop.bitnotediggername.ToLower + ShiftOSDesktop.minimizeprogram(Bitnote_Digger, False) + Case "skinshifter", ShiftOSDesktop.skinshiftername.ToLower + ShiftOSDesktop.minimizeprogram(Skinshifter, False) + Case "shiftnet", ShiftOSDesktop.shiftnetname.ToLower + ShiftOSDesktop.minimizeprogram(Shiftnet, False) + Case "dodge", ShiftOSDesktop.dodgename.ToLower + ShiftOSDesktop.minimizeprogram(Dodge, False) + Case "downloadmanager", ShiftOSDesktop.downloadmanagername.ToLower + ShiftOSDesktop.minimizeprogram(Downloadmanager, False) + Case "installer", ShiftOSDesktop.installername.ToLower + ShiftOSDesktop.minimizeprogram(Installer, False) + Case "snakey", ShiftOSDesktop.snakeyname.ToLower + ShiftOSDesktop.minimizeprogram(Snakey, False) + Case "orcwrite", ShiftOSDesktop.orcwritename.ToLower + ShiftOSDesktop.minimizeprogram(OrcWrite, False) + End Select + further = False + Me.BringToFront() + End If + End If + + If further = True Then + Select Case command + Case "test fullscreen login customizer" + FullScreenLoginCustomizer.Show() + Case "test fullscreen login" + FullScreenLogin.Show() + Case "adv app launcher on" + ShiftOSDesktop.boughtadvapplauncher = True + ShiftOSDesktop.savegame() + ShiftOSDesktop.setupdesktop() + WriteLine("Advanced App Launcher has been turned on successfully. Use ""adv app launcher off"" to turn it off again.") + Case "adv app launcher off" + ShiftOSDesktop.boughtadvapplauncher = False + ShiftOSDesktop.savegame() + ShiftOSDesktop.setupdesktop() + WriteLine("Advanced App Launcher has been turned off. Use ""adv app launcher on"" to turn it on again.") + + Case "clear" + txtterm.Text = "" + Case "time" + If ShiftOSDesktop.boughtsplitsecondtime = True Then + txtterm.Text = txtterm.Text & Environment.NewLine & "The time is " & TimeOfDay & Environment.NewLine + Else + If ShiftOSDesktop.boughtminuteaccuracytime = True Then + If Date.Now.Hour < 12 Then + txtterm.Text = txtterm.Text & Environment.NewLine & "The time is " & TimeOfDay.Hour & ":" & Format(TimeOfDay.Minute, "00") & " AM" & Environment.NewLine + Else + txtterm.Text = txtterm.Text & Environment.NewLine & "The time is " & TimeOfDay.Hour - 12 & ":" & Format(TimeOfDay.Minute, "00") & " PM" & Environment.NewLine + End If + Else + If ShiftOSDesktop.boughtpmandam = True Then + If Date.Now.Hour < 12 Then + txtterm.Text = txtterm.Text & Environment.NewLine & "The time is " & TimeOfDay.Hour & " AM" & Environment.NewLine + Else + txtterm.Text = txtterm.Text & Environment.NewLine & "The time is " & TimeOfDay.Hour - 12 & " PM" & Environment.NewLine + End If + Else + If ShiftOSDesktop.boughthourspastmidnight = True Then + txtterm.Text = txtterm.Text & Environment.NewLine & "Since midnight " & Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60 / 60) & " hours have passed" & Environment.NewLine + Else + If ShiftOSDesktop.boughtminutespastmidnight = True Then + txtterm.Text = txtterm.Text & Environment.NewLine & "Since midnight " & Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60) & " minutes have passed" & Environment.NewLine + Else + If ShiftOSDesktop.boughtsecondspastmidnight = True Then + txtterm.Text = txtterm.Text & Environment.NewLine & "Since midnight " & Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds) & " seconds have passed" & Environment.NewLine + Else + wrongcommand() + End If + End If + End If + End If + End If + End If + Case "shutdown", "shut down" + ShiftOSDesktop.shutdownshiftos() + Case "save", "save game" + ShiftOSDesktop.savegame() + txtterm.Text = txtterm.Text & Environment.NewLine & "The game has been saved!" & Environment.NewLine + Case "code points" + txtterm.Text = txtterm.Text & Environment.NewLine & "You Have " & ShiftOSDesktop.codepoints & " Code Points!" & Environment.NewLine + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User has " & ShiftOSDesktop.codepoints & " Code Points!" & Environment.NewLine + Case "codepoints" + txtterm.Text = txtterm.Text & Environment.NewLine & "You Have " & ShiftOSDesktop.codepoints & " Code Points!" & Environment.NewLine + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User has " & ShiftOSDesktop.codepoints & " Code Points!" & Environment.NewLine + Case "fullscreen terminal", "full screen terminal" + If ShiftOSDesktop.boughtwindowedterminal = True Then + fullterminal() + ShiftOSDesktop.terminalfullscreen = True + Else + wrongcommand() + End If + Case "windowed terminal" + If ShiftOSDesktop.boughtwindowedterminal = True Then + miniterminal() + ShiftOSDesktop.terminalfullscreen = False + Else + wrongcommand() + End If + Case "open terminal" + txtterm.Text = txtterm.Text & Environment.NewLine & "Terminal is already running!" & Environment.NewLine + Case "open knowledge input", "knowledge input", "open " & ShiftOSDesktop.knowledgeinputname.ToLower, ShiftOSDesktop.knowledgeinputname.ToLower + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Knowledge_Input.Show() + Case "close knowledge input", "close " & ShiftOSDesktop.knowledgeinputname.ToLower, ShiftOSDesktop.knowledgeinputname.ToLower + Knowledge_Input.Close() + Case "open shiftorium", "shiftorium", "open " & ShiftOSDesktop.shiftoriumname.ToLower, ShiftOSDesktop.shiftoriumname.ToLower + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Shiftorium.Show() + Case "close shiftorium", "close " & ShiftOSDesktop.shiftoriumname.ToLower, ShiftOSDesktop.shiftoriumname.ToLower + Shiftorium.Close() + Case "open shifter", "shifter", "open " & ShiftOSDesktop.shiftername.ToLower, ShiftOSDesktop.shiftername.ToLower + If ShiftOSDesktop.boughtshifter = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Shifter.Show() + Else + wrongcommand() + End If + Case "close shifter", "close " & ShiftOSDesktop.shiftername.ToLower, ShiftOSDesktop.shiftername.ToLower + If ShiftOSDesktop.boughtshifter = True Then + Shifter.Close() + Else + wrongcommand() + End If + Case "open pong", "pong", "open " & ShiftOSDesktop.pongname.ToLower, ShiftOSDesktop.pongname.ToLower + If ShiftOSDesktop.boughtpong = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Pong.Show() + Else + wrongcommand() + End If + Case "close pong", "close " & ShiftOSDesktop.pongname.ToLower, ShiftOSDesktop.pongname.ToLower + If ShiftOSDesktop.boughtpong = True Then + Pong.Close() + Else + wrongcommand() + End If + Case "open file skimmer", "file skimmer", "open " & ShiftOSDesktop.fileskimmername.ToLower, ShiftOSDesktop.fileskimmername.ToLower + If ShiftOSDesktop.boughtfileskimmer = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + File_Skimmer.Show() + Else + wrongcommand() + End If + Case "close file skimmer", "close " & ShiftOSDesktop.fileskimmername.ToLower, ShiftOSDesktop.fileskimmername.ToLower + If ShiftOSDesktop.boughtfileskimmer = True Then + File_Skimmer.Close() + Else + wrongcommand() + End If + Case "close file opener", "close " & ShiftOSDesktop.fileopenername.ToLower, ShiftOSDesktop.fileopenername.ToLower + If ShiftOSDesktop.boughtfileskimmer = True Then + File_Opener.Close() + Else + wrongcommand() + End If + Case "close file saver", "close " & ShiftOSDesktop.filesavername.ToLower, ShiftOSDesktop.filesavername.ToLower + If ShiftOSDesktop.boughtfileskimmer = True Then + File_Saver.Close() + Else + wrongcommand() + End If + Case "close graphic picker", "close graphic", "close " & ShiftOSDesktop.graphicpickername.ToLower, ShiftOSDesktop.graphicpickername.ToLower + If ShiftOSDesktop.boughtfileskimmer = True Then + Graphic_Picker.Close() + Else + wrongcommand() + End If + Case "open textpad", "open text pad", "textpad", "text pad", "open " & ShiftOSDesktop.textpadname.ToLower, ShiftOSDesktop.textpadname.ToLower + If ShiftOSDesktop.boughttextpad = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + TextPad.Show() + Else + wrongcommand() + End If + Case "close textpad", "close text pad", "close " & ShiftOSDesktop.textpadname.ToLower, ShiftOSDesktop.textpadname.ToLower + If ShiftOSDesktop.boughttextpad = True Then + TextPad.Close() + Else + wrongcommand() + End If + Case "open skinloader", "open skin loader", "skin loader", "skinloader", "open " & ShiftOSDesktop.skinloadername.ToLower, ShiftOSDesktop.skinloadername.ToLower + If ShiftOSDesktop.boughtskinning = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Skin_Loader.Show() + Else + wrongcommand() + End If + Case "close skinloader", "close skin loader", "close " & ShiftOSDesktop.skinloadername.ToLower, ShiftOSDesktop.skinloadername.ToLower + If ShiftOSDesktop.boughtskinloader = True Then + Skin_Loader.Close() + Else + wrongcommand() + End If + Case "open art", "open artpad", "artpad", "open " & ShiftOSDesktop.artpadname.ToLower, ShiftOSDesktop.artpadname.ToLower + If ShiftOSDesktop.boughtartpad = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + ArtPad.Show() + Else + wrongcommand() + End If + Case "close art", "close artpad", "close " & ShiftOSDesktop.artpadname.ToLower, ShiftOSDesktop.artpadname.ToLower + If ShiftOSDesktop.boughtartpad = True Then + ArtPad.Close() + Else + wrongcommand() + End If + Case "open calc", "open calculator", "calculator", "open " & ShiftOSDesktop.calculatorname.ToLower, ShiftOSDesktop.calculatorname.ToLower + If ShiftOSDesktop.boughtcalculator = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Calculator.Show() + Else + wrongcommand() + End If + Case "close calc", "close calculator", "close " & ShiftOSDesktop.calculatorname.ToLower, ShiftOSDesktop.calculatorname.ToLower + If ShiftOSDesktop.boughtcalculator = True Then + Calculator.Close() + Else + wrongcommand() + End If + Case "open audio", "open audioplayer", "audioplayer", "audio", "open " & ShiftOSDesktop.audioplayername.ToLower, ShiftOSDesktop.audioplayername.ToLower + If ShiftOSDesktop.boughtaudioplayer = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Audio_Player.Show() + Else + wrongcommand() + End If + Case "close audio", "close audioplayer", "close " & ShiftOSDesktop.audioplayername.ToLower, ShiftOSDesktop.audioplayername.ToLower + If ShiftOSDesktop.boughtaudioplayer = True Then + Audio_Player.Close() + Else + wrongcommand() + End If + Case "open web", "open webbrowser", "open web browser", "web", "webbrowser", "web browser", "open " & ShiftOSDesktop.webbrowsername.ToLower, ShiftOSDesktop.webbrowsername.ToLower + If ShiftOSDesktop.boughtwebbrowser = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Web_Browser.Show() + Else + wrongcommand() + End If + Case "close web", "close webbrowser", "close web browser", "close " & ShiftOSDesktop.webbrowsername.ToLower, ShiftOSDesktop.webbrowsername.ToLower + If ShiftOSDesktop.boughtwebbrowser = True Then + Web_Browser.Close() + Else + wrongcommand() + End If + Case "open video", "open videoplayer", "open video player", "open " & ShiftOSDesktop.videoplayername.ToLower, ShiftOSDesktop.videoplayername.ToLower + If ShiftOSDesktop.boughtvideoplayer = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Video_Player.Show() + Else + wrongcommand() + End If + Case "close video", "close videoplayer", "close video player", "close " & ShiftOSDesktop.videoplayername.ToLower, ShiftOSDesktop.videoplayername.ToLower + If ShiftOSDesktop.boughtvideoplayer = True Then + Video_Player.Close() + Else + wrongcommand() + End If + Case "open name", "open namechanger", "open name changer", "open " & ShiftOSDesktop.namechangername.ToLower, ShiftOSDesktop.namechangername.ToLower + If ShiftOSDesktop.boughtnamechanger = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Name_Changer.Show() + Else + wrongcommand() + End If + Case "close name", "close namechanger", "close name changer", "close " & ShiftOSDesktop.namechangername.ToLower, ShiftOSDesktop.namechangername.ToLower + If ShiftOSDesktop.boughtnamechanger = True Then + Name_Changer.Close() + Else + wrongcommand() + End If + Case "open icon", "open iconmanager", "open icon manager", "open " & ShiftOSDesktop.iconmanagername.ToLower, ShiftOSDesktop.iconmanagername.ToLower + If ShiftOSDesktop.boughticonmanager = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Icon_Manager.Show() + Else + wrongcommand() + End If + Case "close icon", "close iconmanager", "close icon manager", "close " & ShiftOSDesktop.iconmanagername.ToLower, ShiftOSDesktop.iconmanagername.ToLower + If ShiftOSDesktop.boughticonmanager = True Then + Icon_Manager.Close() + Else + wrongcommand() + End If + Case "open clock", "clock", "open " & ShiftOSDesktop.clockname.ToLower, ShiftOSDesktop.clockname.ToLower + If ShiftOSDesktop.boughtclock = True Then + ShiftOSDesktop.closeeverything() + If ShiftOSDesktop.terminalfullscreen = True Then Me.Hide() + Clock.Show() + Else + wrongcommand() + End If + Case "close clock", "close " & ShiftOSDesktop.clockname.ToLower, ShiftOSDesktop.clockname.ToLower + Clock.Close() + Case "close colourpicker", "close colour", "close color", "close color picker", "close colour picker", "close colorpicker", "close " & ShiftOSDesktop.colourpickername.ToLower, ShiftOSDesktop.colourpickername.ToLower + Colour_Picker.Close() + Case "close infobox", "close info", "close info box" + infobox.Close() + Case "close terminal", "close " & ShiftOSDesktop.terminalname.ToLower, ShiftOSDesktop.terminalname.ToLower + txtterm.Text = "" + txtterm.Text = txtterm.Text + ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + txtterm.Select(txtterm.Text.Length, 0) + Me.Close() + Case "roll terminal" + txtterm.Text = txtterm.Text & Environment.NewLine & "Terminal has just tried to perform an illegal operation!" & Environment.NewLine + ShiftOSDesktop.log = ShiftOSDesktop.log & "Terminal attempted to peform a illegal command at " & TimeOfDay + Case "programs", "program" + listprograms() + Case "unity mode on" + If ShiftOSDesktop.boughtunitymode = True Then + ShiftOSDesktop.unitymode = True + ShiftOSDesktop.setupdesktop() + ShiftOSDesktop.log = ShiftOSDesktop.log & "Unity mode was activated at " & TimeOfDay + Else + wrongcommand() + End If + Case "unity mode off" + If ShiftOSDesktop.boughtunitymode = True Then + ShiftOSDesktop.unitymode = False + ShiftOSDesktop.setupdesktop() + ShiftOSDesktop.log = ShiftOSDesktop.log & "Unity mode was disabled at " & TimeOfDay + Else + wrongcommand() + End If + Case "template" + template.Show() + Case "05tray" + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + 1000000 + txtterm.Text = txtterm.Text & Environment.NewLine & "You have just cheated. Here is your 1000000 codepoints" & Environment.NewLine + ShiftOSDesktop.log = ShiftOSDesktop.log & ShiftOSDesktop.username & " cheated and got 1000000 codepoints, damn cheaters..." + 'txtterm.Text = txtterm.Text & Environment.NewLine & "Due to attempting to cheat you have lost all your codepoints... Kidding, but that command is disabled." & Environment.NewLine 'Wow, I don't know devX put that in! 'Talk about lolz + Case "cherryblue" + ShiftOSDesktop.bitnotebalance = ShiftOSDesktop.bitnotebalance + 1 + ShiftOSDesktop.log = ShiftOSDesktop.log & "Hacked by CherryBlue, given 1 bitnote at " & TimeOfDay + Bitnote_Wallet.logtransaction(1.0, "Credit From", "CherryBlue - The Hacker!") + Bitnote_Wallet.setupbitnotestats() + 'Case "pullme" + ' ShiftOSDesktop.boughtresizablewindows = True + ' txtterm.Text = txtterm.Text & Environment.NewLine & "Remember the resize windows feature is not refined yet (Test with Artpad)!" & Environment.NewLine + Case "sandbox" + ShiftOSDesktop.boughttitlebar = True + ShiftOSDesktop.boughtcustomusername = True + ShiftOSDesktop.boughtwindowsanywhere = True + ShiftOSDesktop.boughtmultitasking = True + ShiftOSDesktop.boughtautoscrollterminal = True + ShiftOSDesktop.boughtmovablewindows = True + ShiftOSDesktop.boughtdraggablewindows = True + ShiftOSDesktop.boughtwindowborders = True + ShiftOSDesktop.boughtpmandam = True + ShiftOSDesktop.boughtminuteaccuracytime = True + ShiftOSDesktop.boughtsplitsecondtime = True + ShiftOSDesktop.boughttitletext = True + ShiftOSDesktop.boughtclosebutton = True + ShiftOSDesktop.boughtdesktoppanel = True + ShiftOSDesktop.boughtclock = True + ShiftOSDesktop.boughtwindowedterminal = True + ShiftOSDesktop.boughtapplaunchermenu = True + ShiftOSDesktop.boughtalknowledgeinput = True + ShiftOSDesktop.boughtalclock = True + ShiftOSDesktop.boughtalshiftorium = True + ShiftOSDesktop.boughtapplaunchershutdown = True + ShiftOSDesktop.boughtdesktoppanelclock = True + ShiftOSDesktop.boughtterminalscrollbar = True + ShiftOSDesktop.boughtkiaddons = True + ShiftOSDesktop.boughtkicarbrands = True + ShiftOSDesktop.boughtkigameconsoles = True + ShiftOSDesktop.boughtshifter = True + ShiftOSDesktop.boughtalshifter = True + ShiftOSDesktop.boughtrollupcommand = True + ShiftOSDesktop.boughtrollupbutton = True + ShiftOSDesktop.boughtshiftdesktop = True + ShiftOSDesktop.boughtshiftpanelclock = True + ShiftOSDesktop.boughtshiftapplauncher = True + ShiftOSDesktop.boughtshiftdesktoppanel = True + ShiftOSDesktop.boughtshifttitlebar = True + ShiftOSDesktop.boughtshifttitletext = True + ShiftOSDesktop.boughtshifttitlebuttons = True + ShiftOSDesktop.boughtshiftborders = True + ShiftOSDesktop.boughtgray2 = True + ShiftOSDesktop.boughtgray3 = True + ShiftOSDesktop.boughtgray4 = True + ShiftOSDesktop.boughtanycolour = True + ShiftOSDesktop.boughtanycolour2 = True + ShiftOSDesktop.boughtanycolour3 = True + ShiftOSDesktop.boughtanycolour4 = True + ShiftOSDesktop.boughtpurple = True + ShiftOSDesktop.boughtpurple2 = True + ShiftOSDesktop.boughtpurple3 = True + ShiftOSDesktop.boughtpurple4 = True + ShiftOSDesktop.boughtblue = True + ShiftOSDesktop.boughtblue2 = True + ShiftOSDesktop.boughtblue3 = True + ShiftOSDesktop.boughtblue4 = True + ShiftOSDesktop.boughtgreen = True + ShiftOSDesktop.boughtgreen2 = True + ShiftOSDesktop.boughtgreen3 = True + ShiftOSDesktop.boughtgreen4 = True + ShiftOSDesktop.boughtyellow = True + ShiftOSDesktop.boughtyellow2 = True + ShiftOSDesktop.boughtyellow3 = True + ShiftOSDesktop.boughtyellow4 = True + ShiftOSDesktop.boughtorange = True + ShiftOSDesktop.boughtorange2 = True + ShiftOSDesktop.boughtorange3 = True + ShiftOSDesktop.boughtorange4 = True + ShiftOSDesktop.boughtbrown = True + ShiftOSDesktop.boughtbrown2 = True + ShiftOSDesktop.boughtbrown3 = True + ShiftOSDesktop.boughtbrown4 = True + ShiftOSDesktop.boughtred = True + ShiftOSDesktop.boughtred2 = True + ShiftOSDesktop.boughtred3 = True + ShiftOSDesktop.boughtred4 = True + ShiftOSDesktop.boughtpink = True + ShiftOSDesktop.boughtpink2 = True + ShiftOSDesktop.boughtpink3 = True + ShiftOSDesktop.boughtpink4 = True + ShiftOSDesktop.boughtpong = True + ShiftOSDesktop.boughtknowledgeinputicon = True + ShiftOSDesktop.boughtshiftericon = True + ShiftOSDesktop.boughtshiftoriumicon = True + ShiftOSDesktop.boughtclockicon = True + ShiftOSDesktop.boughtshutdownicon = True + ShiftOSDesktop.boughtpongicon = True + ShiftOSDesktop.boughtterminalicon = True + ShiftOSDesktop.boughtalpong = True + ShiftOSDesktop.boughtfileskimmer = True + ShiftOSDesktop.boughtalfileskimmer = True + ShiftOSDesktop.boughttextpad = True + ShiftOSDesktop.boughtaltextpad = True + ShiftOSDesktop.boughtfileskimmericon = True + ShiftOSDesktop.boughttextpadicon = True + ShiftOSDesktop.boughttextpadnew = True + ShiftOSDesktop.boughttextpadsave = True + ShiftOSDesktop.boughttextpadopen = True + ShiftOSDesktop.boughtfileskimmernewfolder = True + ShiftOSDesktop.boughtfileskimmerdelete = True + ShiftOSDesktop.boughtkielements = True + ShiftOSDesktop.boughtcolourpickericon = True + ShiftOSDesktop.boughtinfoboxicon = True + ShiftOSDesktop.boughtskinloader = True + ShiftOSDesktop.boughtminimizebutton = True + ShiftOSDesktop.boughtpanelbuttons = True + ShiftOSDesktop.boughtshiftpanelbuttons = True + ShiftOSDesktop.boughtartpad = True + ShiftOSDesktop.boughtalartpad = True + ShiftOSDesktop.boughtartpadicon = True + ShiftOSDesktop.boughtskinning = True + ShiftOSDesktop.boughtminimizecommand = True + ShiftOSDesktop.boughtusefulpanelbuttons = True + ShiftOSDesktop.boughtunitymode = True + ShiftOSDesktop.boughtartpadpixellimit4 = True + ShiftOSDesktop.boughtartpadpixellimit8 = True + ShiftOSDesktop.boughtartpadpixellimit16 = True + ShiftOSDesktop.boughtartpadpixellimit64 = True + ShiftOSDesktop.boughtartpadpixellimit256 = True + ShiftOSDesktop.boughtartpadpixellimit1024 = True + ShiftOSDesktop.boughtartpadpixellimit4096 = True + ShiftOSDesktop.boughtartpadpixellimit16384 = True + ShiftOSDesktop.boughtartpadpixellimit65536 = True + ShiftOSDesktop.boughtartpadlimitlesspixels = True + ShiftOSDesktop.boughtartpad4colorpallets = True + ShiftOSDesktop.boughtartpad8colorpallets = True + ShiftOSDesktop.boughtartpad16colorpallets = True + ShiftOSDesktop.boughtartpad32colorpallets = True + ShiftOSDesktop.boughtartpad64colorpallets = True + ShiftOSDesktop.boughtartpad128colorpallets = True + ShiftOSDesktop.boughtartpadcustompallets = True + ShiftOSDesktop.boughtartpadnew = True + ShiftOSDesktop.boughtartpadpixelplacer = True + ShiftOSDesktop.boughtartpadpixelplacermovementmode = True + ShiftOSDesktop.boughtartpadpencil = True + ShiftOSDesktop.boughtartpadpaintbrush = True + ShiftOSDesktop.boughtartpadlinetool = True + ShiftOSDesktop.boughtartpadovaltool = True + ShiftOSDesktop.boughtartpadrectangletool = True + ShiftOSDesktop.boughtartpaderaser = True + ShiftOSDesktop.boughtartpadfilltool = True + ShiftOSDesktop.boughtartpadtexttool = True + ShiftOSDesktop.boughtartpadundo = True + ShiftOSDesktop.boughtartpadredo = True + ShiftOSDesktop.boughtartpadsave = True + ShiftOSDesktop.boughtartpadload = True + ShiftOSDesktop.boughtresizablewindows = True + ShiftOSDesktop.boughtcalculator = True + ShiftOSDesktop.boughtaudioplayer = True + ShiftOSDesktop.boughtchangeosnamecommand = True + ShiftOSDesktop.boughtwebbrowser = True + ShiftOSDesktop.boughtvideoplayer = True + ShiftOSDesktop.boughtnamechanger = True + ShiftOSDesktop.boughticonmanager = True + ShiftOSDesktop.boughtbitnotewallet = True + ShiftOSDesktop.boughtbitnotedigger = True + ShiftOSDesktop.boughtskinshifter = True + ShiftOSDesktop.boughtshiftnet = True + ShiftOSDesktop.boughtdownloader = True + ShiftOSDesktop.boughtshiftneticon = True + ShiftOSDesktop.boughtalshiftnet = True + ShiftOSDesktop.boughtdodge = True + ShiftOSDesktop.boughtdownloadmanager = True + ShiftOSDesktop.boughtinstaller = True + ShiftOSDesktop.boughtsnakey = True + ShiftOSDesktop.boughtsysinfoicon = True + ShiftOSDesktop.boughtorcwrite = True + ShiftOSDesktop.boughtfloodgate = True + ShiftOSDesktop.boughtmaze = True + ShiftOSDesktop.boughtunitymodetoggle = True + ShiftOSDesktop.boughtunitytoggleicon = True + + ShiftOSDesktop.boughtvirusscannericon = True + + ShiftOSDesktop.boughttextpadtrm = True + ShiftOSDesktop.boughtshiftapplauncheritems = True + ShiftOSDesktop.boughtadvapplauncher = True + + + + 'Apps bought through shiftnet + ShiftOSDesktop.installedcalculator = True + ShiftOSDesktop.installedaudioplayer = True + ShiftOSDesktop.installedwebbrowser = True + ShiftOSDesktop.installedvideoplayer = True + ShiftOSDesktop.installeddodge = True + ShiftOSDesktop.installedsnakey = True + ShiftOSDesktop.installedsysinfo = True + ShiftOSDesktop.installedorcwrite = True + ShiftOSDesktop.installedfloodgate = True + ShiftOSDesktop.installedfloodgatenow = True + ShiftOSDesktop.installedmaze = True + ShiftOSDesktop.installedvirusscanner = True + + 'new 0.0.9 features + ShiftOSDesktop.boughtskinstates = True + ShiftOSDesktop.boughtdesktopicons = True + Case "infect zero.th1" + Viruses.zerogravity = True + Viruses.zerogravitythreatlevel = 1 + Viruses.setupzerovirus() + Case "infect zero.th2" + Viruses.zerogravity = True + Viruses.zerogravitythreatlevel = 2 + Viruses.setupzerovirus() + Case "infect zero.th3" + Viruses.zerogravity = True + Viruses.zerogravitythreatlevel = 3 + Viruses.setupzerovirus() + Case "infect zero.th4" + Viruses.zerogravity = True + Viruses.zerogravitythreatlevel = 4 + Viruses.setupzerovirus() + Case "zero.heal" + Viruses.removezerovirus() + Case "infect mousetrap.th1" + Viruses.mousetrap = True + Viruses.mousetrapthreatlevel = 1 + Viruses.setupmousetrapvirus() + Case "infect mousetrap.th2" + Viruses.mousetrap = True + Viruses.mousetrapthreatlevel = 2 + Viruses.setupmousetrapvirus() + Case "infect mousetrap.th3" + Viruses.mousetrap = True + Viruses.mousetrapthreatlevel = 3 + Viruses.setupmousetrapvirus() + Case "infect mousetrap.th4" + Viruses.mousetrap = True + Viruses.mousetrapthreatlevel = 4 + Viruses.setupmousetrapvirus() + Case "mousetrap.heal" + Viruses.removemousetrapvirus() + Case "infect beeper.th1" + Viruses.beeper = True + Viruses.beeperthreatlevel = 1 + Viruses.setupbeepervirus() + Case "infect beeper.th2" + Viruses.beeper = True + Viruses.beeperthreatlevel = 2 + Viruses.setupbeepervirus() + Case "infect beeper.th3" + Viruses.beeper = True + Viruses.beeperthreatlevel = 3 + Viruses.setupbeepervirus() + Case "infect beeper.th4" + Viruses.beeper = True + Viruses.beeperthreatlevel = 4 + Viruses.setupbeepervirus() + Case "beeper.heal" + Viruses.removebeepervirus() + Case "infect plague.th1" + Viruses.ThePlague = True + Viruses.theplaguethreatlevel = 1 + Viruses.setuptheplague() + Case "infect plague.th2" + Viruses.ThePlague = True + Viruses.theplaguethreatlevel = 2 + Viruses.setuptheplague() + Case "infect plague.th3" + Viruses.ThePlague = True + Viruses.theplaguethreatlevel = 3 + Viruses.setuptheplague() + Case "infect plague.th4" + Viruses.ThePlague = True + Viruses.theplaguethreatlevel = 4 + Viruses.setuptheplague() + Case "plague.heal" + Viruses.removetheplague() + Case "get all 0.0.8" 'disable in full + ShiftOSDesktop.boughtresizablewindows = True + ShiftOSDesktop.boughtcalculator = True + ShiftOSDesktop.boughtaudioplayer = True + ShiftOSDesktop.boughtchangeosnamecommand = True + ShiftOSDesktop.boughtwebbrowser = True + ShiftOSDesktop.boughtvideoplayer = True + ShiftOSDesktop.boughtnamechanger = True + ShiftOSDesktop.boughticonmanager = True + ShiftOSDesktop.boughtbitnotewallet = True + ShiftOSDesktop.boughtbitnotedigger = True + ShiftOSDesktop.boughtskinshifter = True + ShiftOSDesktop.boughtshiftnet = True + ShiftOSDesktop.boughtshiftneticon = True + ShiftOSDesktop.boughtalshiftnet = True + ShiftOSDesktop.boughtdodge = True + ShiftOSDesktop.boughtdownloadmanager = True + ShiftOSDesktop.boughtinstaller = True + ShiftOSDesktop.installedsysinfo = True + ShiftOSDesktop.boughtorcwrite = True + ShiftOSDesktop.boughtfloodgate = True + ShiftOSDesktop.boughtmaze = True + ShiftOSDesktop.boughtunitymodetoggle = True + ShiftOSDesktop.boughtunitytoggleicon = True + ShiftOSDesktop.installedvirusscanner = True + ShiftOSDesktop.boughttextpadtrm = True + ShiftOSDesktop.boughtshiftapplauncheritems = True + ShiftOSDesktop.installedcalculator = True + ShiftOSDesktop.installedaudioplayer = True + ShiftOSDesktop.installedwebbrowser = True + ShiftOSDesktop.installedvideoplayer = True + ShiftOSDesktop.installeddodge = True + ShiftOSDesktop.installedsysinfo = True + ShiftOSDesktop.installedorcwrite = True + ShiftOSDesktop.installedfloodgate = True + ShiftOSDesktop.installedfloodgatenow = True + ShiftOSDesktop.installedmaze = True + ShiftOSDesktop.installedvirusscanner = True + ShiftOSDesktop.setupdesktop() + Case "yes" + If storyline = "getshiftnet" Then + getshiftnetstoryyes = True + Else + wrongcommand() + End If + Case "no" + If storyline = "getshiftnet" Then + txtterm.Text = txtterm.Text & "Connection declined" & Environment.NewLine + storyline = "" + Else + wrongcommand() + End If + Case "help" + txtterm.Text = txtterm.Text & Environment.NewLine & Environment.NewLine & ShiftOSDesktop.osname & " Terminal Help:" & _ + Environment.NewLine & Environment.NewLine + txtterm.Text = txtterm.Text & "Tips: " & Environment.NewLine + txtterm.Text = txtterm.Text & "- Click on the desktop then press Ctrl + t to bring up the terminal (only works if you click on the desktop first)!" & Environment.NewLine + txtterm.Text = txtterm.Text & "- The terminal is not case sensitive so using or not using capital letters does not make a difference." & Environment.NewLine + txtterm.Text = txtterm.Text & "- " & ShiftOSDesktop.osname & " saves progress upon shutdown so feel free to open the terminal and type ""Shutdown"" anytime you like." & Environment.NewLine + txtterm.Text = txtterm.Text & "- This guide will evolve as you buy upgrades for " & ShiftOSDesktop.osname & " to help you understand newly unlocked features." & Environment.NewLine + txtterm.Text = txtterm.Text & Environment.NewLine & Environment.NewLine + txtterm.Text = txtterm.Text & "Terminal Commands:" & Environment.NewLine + txtterm.Text = txtterm.Text & "'Programs' - Lists all programs on your computer." & Environment.NewLine + txtterm.Text = txtterm.Text & "'Open [insert program name here]' - Opens the specified program and closes all others." & Environment.NewLine + txtterm.Text = txtterm.Text & "'Close [insert program name here]' - Closes the specified program. For example 'close knowledge input'." & Environment.NewLine + txtterm.Text = txtterm.Text & "'Code Points' - Shows the amount of codepoints you have." & Environment.NewLine + If ShiftOSDesktop.boughtsplitsecondtime = True Then + txtterm.Text = txtterm.Text & "'Time' - Shows the time with split second accuracy." & Environment.NewLine + Else + If ShiftOSDesktop.boughtminuteaccuracytime = True Then + txtterm.Text = txtterm.Text & "'Time' - Shows the time with minute accuracy." & Environment.NewLine + Else + If ShiftOSDesktop.boughtpmandam = True Then + txtterm.Text = txtterm.Text & "'Time' - Shows the time with hour accuracy." & Environment.NewLine + Else + If ShiftOSDesktop.boughthourspastmidnight = True Then + txtterm.Text = txtterm.Text & "'Time' - Shows the amount of hours that have passed since midnight." & Environment.NewLine + Else + If ShiftOSDesktop.boughtminutespastmidnight = True Then + txtterm.Text = txtterm.Text & "'Time' - Shows the amount of minutes that have passed since midnight." & Environment.NewLine + Else + If ShiftOSDesktop.boughtsecondspastmidnight = True Then + txtterm.Text = txtterm.Text & "'Time' - Shows the amount of seconds that have passed since midnight." & Environment.NewLine + End If + End If + End If + End If + End If + End If + If ShiftOSDesktop.boughtcustomusername = True Then + txtterm.Text = txtterm.Text & "'Set Username [insert name here]' - Sets the system username to anything (e.g. Set Username hacker)." & Environment.NewLine + End If + If ShiftOSDesktop.boughtmultitasking = True Then + txtterm.Text = txtterm.Text & "'Switch To [insert program here]' - Brings the specified window to the front of the screen (e.g. Switch To Shiftorium)." & Environment.NewLine + End If + If ShiftOSDesktop.boughtwindowsanywhere = True Then + txtterm.Text = txtterm.Text & "'Move [insert program here] to [x-coordinate, y-coodinate]' - Moves the specified window to the chosen point (e.g. move shiftorium to 120, 300)." & Environment.NewLine + End If + If ShiftOSDesktop.boughtwindowedterminal = True Then + txtterm.Text = txtterm.Text & "'Windowed Terminal' - Turns the terminal into a normal windowed application." & Environment.NewLine + txtterm.Text = txtterm.Text & "'Fullscreen Terminal' - Turns the terminal into a fullscreen application." & Environment.NewLine + End If + If ShiftOSDesktop.boughtrollupcommand = True Then + txtterm.Text = txtterm.Text & "'Roll [insert program here]' - Rolls up a window to it's titlebar or rolls a window down if it's already rolled up." & Environment.NewLine + End If + txtterm.Text = txtterm.Text & "'Clear' - Removes all text displayed on the terminal." & Environment.NewLine + txtterm.Text = txtterm.Text & "'Help' - Shows commands used in terminal and " & ShiftOSDesktop.osname & " tips." & Environment.NewLine + txtterm.Text = txtterm.Text & "'Save' - Saves all data. Note that data will automatically be saved when you shutdown " & ShiftOSDesktop.osname & "" & Environment.NewLine + txtterm.Text = txtterm.Text & "'Shutdown' - Turns off computer safely and saves all data." & Environment.NewLine + txtterm.Text = txtterm.Text & Environment.NewLine & Environment.NewLine + txtterm.Text = txtterm.Text & "" & ShiftOSDesktop.osname & " Usage Tips:" & Environment.NewLine + If ShiftOSDesktop.boughttitlebar = False Then + txtterm.Text = txtterm.Text & "- Open programs have no title bar." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Open programs have a title bar that may have useful features" & Environment.NewLine + End If + If ShiftOSDesktop.boughtwindowborders = False Then + txtterm.Text = txtterm.Text & "- Open programs have no borders making them difficult to distinguish between other open programs." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Open programs have borders making them easy to distinguish between other open programs." & Environment.NewLine + End If + If ShiftOSDesktop.boughtdesktoppanel = True Then + txtterm.Text = txtterm.Text & "- Programs that don't open full screen will be centred on the desktop." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Programs that don't fit full screen will be centred with a black background." & Environment.NewLine + End If + If ShiftOSDesktop.boughtwindowedterminal = True Then + txtterm.Text = txtterm.Text & "- Terminal can run windowed or full screen." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Terminal runs full screen." & Environment.NewLine + End If + If ShiftOSDesktop.boughtmultitasking = False Then + txtterm.Text = txtterm.Text & "- Only one program can be open at a time (excluding terminal) and can not be moved around the screen." & Environment.NewLine + End If + If ShiftOSDesktop.boughtanycolour4 Then + txtterm.Text = txtterm.Text & "- The screen can display the full range of 16,777,216 RGB colours." & Environment.NewLine + Else + If ShiftOSDesktop.boughtgray4 = True Then + txtterm.Text = txtterm.Text & "- The screen can display all shades of gray. It can also display: " + If ShiftOSDesktop.boughtpurple = True Then txtterm.Text = txtterm.Text & "purple, " + If ShiftOSDesktop.boughtblue = True Then txtterm.Text = txtterm.Text & "blue, " + If ShiftOSDesktop.boughtgreen = True Then txtterm.Text = txtterm.Text & "green, " + If ShiftOSDesktop.boughtyellow = True Then txtterm.Text = txtterm.Text & "yellow, " + If ShiftOSDesktop.boughtorange = True Then txtterm.Text = txtterm.Text & "orange, " + If ShiftOSDesktop.boughtbrown = True Then txtterm.Text = txtterm.Text & "brown, " + If ShiftOSDesktop.boughtred = True Then txtterm.Text = txtterm.Text & "red, " + If ShiftOSDesktop.boughtpink = True Then txtterm.Text = txtterm.Text & "pink, " + txtterm.Text = txtterm.Text & " and nothing else" & Environment.NewLine + Else + If ShiftOSDesktop.boughtgray = True Then + txtterm.Text = txtterm.Text & "- Only Black, White and Gray can be displayed on screen, no program can use any other colour." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Only Black and White can be displayed on screen, no program can use any other colour." & Environment.NewLine + End If + End If + End If + If ShiftOSDesktop.boughtapplaunchermenu = True Then + txtterm.Text = txtterm.Text & "- Applications can be opened from the application launcher on the desktop panel." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Applications can be opened by typing ""open (program name)"" in the terminal." & Environment.NewLine + End If + If ShiftOSDesktop.boughtclosebutton = True Then + txtterm.Text = txtterm.Text & "- Applications can be closed by clicking the close button in their title bar." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Applications can be closed by typing ""close (program name)"" in the terminal." & Environment.NewLine + End If + If ShiftOSDesktop.boughtmovablewindows = True Then + If ShiftOSDesktop.boughtdraggablewindows = True Then + txtterm.Text = txtterm.Text & "- Windows can be dragged around the screen by left clicking and holding a window by it's titlebar." & Environment.NewLine + Else + txtterm.Text = txtterm.Text & "- Windows can be moved around the screen by holding Ctrl and pressing the wasd keys." & Environment.NewLine + End If + End If + + txtterm.Text = txtterm.Text & Environment.NewLine & Environment.NewLine + txtterm.Text = txtterm.Text & "CodePoints:" & Environment.NewLine + txtterm.Text = txtterm.Text & "- Codepoints can be earned by performing certain tasks in various programs." & Environment.NewLine + txtterm.Text = txtterm.Text & "- Codepoints can be spent on GUI upgrades and new programs." & Environment.NewLine + txtterm.Text = txtterm.Text & "- Upgrades can be bought in the 'Shiftorium' Program." & Environment.NewLine + txtterm.Text = txtterm.Text & "- You can earn codepoints by playing knowledge input." & Environment.NewLine + If ShiftOSDesktop.boughtshifter = True Then + txtterm.Text = txtterm.Text & "- You can earn codepoints by customizing " & ShiftOSDesktop.osname & " in the 'Shifter' program." & Environment.NewLine + End If + If ShiftOSDesktop.boughtpong = True Then + txtterm.Text = txtterm.Text & "- You can earn heaps of codepoints playing pong if you cash out on a high level." & Environment.NewLine + End If + Case Else + wrongcommand() + End Select + End If + + 'cmds(UBound(cmds)) = command + further = True + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " Typed Command In Terminal: " & command & Environment.NewLine + End Sub + + Private Sub wrongcommand() + txtterm.Text = txtterm.Text & Environment.NewLine & "Command not recognized - Type 'help' for a list of commands!" & Environment.NewLine + End Sub + + Private Sub listprograms() + txtterm.Text = txtterm.Text & Environment.NewLine & Environment.NewLine & "Programs Currently Installed:" & Environment.NewLine & _ + ShiftOSDesktop.terminalname & " - A text based command-line interface that allows you to type commands to run programs and manage your computer." & Environment.NewLine & _ + ShiftOSDesktop.knowledgeinputname & " - A game that rewards Code Points when you list enough words within a category such as fruits." & Environment.NewLine & _ + ShiftOSDesktop.shiftoriumname & " - A program that allows you to spend your codepoints on a range of upgrades for " & ShiftOSDesktop.osname & "." & Environment.NewLine + If ShiftOSDesktop.boughtclock = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.clockname & " - An application that displays the time." & Environment.NewLine + End If + If ShiftOSDesktop.boughtshifter = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.shiftername & " - A settings manager that allows you to modify the appearance of " & ShiftOSDesktop.osname & "" & Environment.NewLine + End If + If ShiftOSDesktop.boughtshifter = True Then + txtterm.Text = txtterm.Text & "Infobox - A small box with a message that pops up every now and then to guide you." & Environment.NewLine + End If + If ShiftOSDesktop.boughtshiftdesktop = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.colourpickername & " - A colour manager that allows you to access a range of colours within other programs" & Environment.NewLine + End If + If ShiftOSDesktop.boughtfileskimmer = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.fileskimmername & " - A file manager that allows you to skim through the folders and files on your hard drive." & Environment.NewLine + End If + If ShiftOSDesktop.boughttextpad = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.textpadname & " - A simple text editor that allows you to write basic text files." & Environment.NewLine + End If + If ShiftOSDesktop.boughtpong = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.pongname & " - A game that simulates table tennis that rewards you more codepoints for surviving longer." & Environment.NewLine + End If + If ShiftOSDesktop.boughtskinning = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.skinloadername & " - A program that allows you to load and save skins you have made with the Shifter." & Environment.NewLine + End If + If ShiftOSDesktop.boughtartpad = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.artpadname & " - A bitmap graphics editor that allows you to draw your own images." & Environment.NewLine + End If + If ShiftOSDesktop.boughtcalculator = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.calculatorname & " - A simple calculator application that allows you to perform basic mathematical calculations." & Environment.NewLine + End If + If ShiftOSDesktop.boughtaudioplayer = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.audioplayername & " - A basic application that allows you to load up .mp3 files and output the audio through your speakers." & Environment.NewLine + End If + If ShiftOSDesktop.boughtwebbrowser = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.webbrowsername & " - An application that allows you to access the world wide web also known as the international network (internet)." & Environment.NewLine + End If + If ShiftOSDesktop.boughtvideoplayer = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.videoplayername & " - A simple program that allows you load and watch video files on your pc." & Environment.NewLine + End If + If ShiftOSDesktop.boughtnamechanger = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.namechangername & " - A system modification tool that allows you to alter the names of the programs installed on your pc." & Environment.NewLine + End If + If ShiftOSDesktop.boughticonmanager = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.iconmanagername & " - A tool that allows you to modify the icon images and their sizes that are displayed next to programs." & Environment.NewLine + End If + If ShiftOSDesktop.boughtbitnotewallet = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.bitnotewalletname & " - An application to track all your Bitnote transactions." & Environment.NewLine + End If + If ShiftOSDesktop.boughtbitnotedigger = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.bitnotediggername & " - A tool for digging bitnotes, it can be upgraded for faster speeds better performance." & Environment.NewLine + End If + If ShiftOSDesktop.boughtskinshifter = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.skinshiftername & " - A customization program that changes your skin after a given interval." & Environment.NewLine + End If + If ShiftOSDesktop.boughtshiftnet = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.shiftnetname & " - An application named after the network it is made to access, the shiftnet, a international network made specifically for ShiftOS." & Environment.NewLine + End If + If ShiftOSDesktop.boughtdodge = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.dodgename & " - A game of dodging falling objects, earn code points for playing." & Environment.NewLine + End If + If ShiftOSDesktop.boughtdownloadmanager = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.downloadmanagername & " - A tool to download files, to start a download, click a download link in the shiftnet." & Environment.NewLine + End If + If ShiftOSDesktop.boughtinstaller = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.installername & " - A system tool that installs STP files as programs on your computer." & Environment.NewLine + End If + If ShiftOSDesktop.boughtorcwrite = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.orcwritename & " - A text editing application with advanced formating options." & Environment.NewLine + End If + If ShiftOSDesktop.boughtfloodgate = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.floodgatename & " - A Flooding client application." & Environment.NewLine + End If + If ShiftOSDesktop.boughtmaze = True Then + txtterm.Text = txtterm.Text & ShiftOSDesktop.mazename & " - A simple maze escape game." & Environment.NewLine + End If + End Sub + + + Private Sub tmrfirstrun_Tick(sender As Object, e As EventArgs) Handles tmrfirstrun.Tick + Select Case firstrun + Case 1 + txtterm.Text = txtterm.Text + "Installation Successfull" & Environment.NewLine + + Case 2 + txtterm.Text = txtterm.Text + "IP 199.108.232.1 Connecting..." & Environment.NewLine & "User@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.dial_up_modem_02, AudioPlayMode.Background) + Case 12 + txtterm.Text = txtterm.Text + "IP 199.108.232.1 Connected!" & Environment.NewLine & "User@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + + For i = 0 To 127 + ShiftOSDesktop.artpadcolourpallets(i) = Color.FromArgb(-16777216) + Next + Case 15 + txtterm.Text = txtterm.Text + "DevX: Hi, my name is DevX and you are now using an early version of my operating system ""ShiftOS""." & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 22 + txtterm.Text = txtterm.Text + "DevX: Currently the terminal is open and I am using it to communicate with you remotely." & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 28 + txtterm.Text = txtterm.Text + "DevX: ShiftOS is going to be the most revolutionary operating system in the world that will run on every electronic device you can think of." & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 36 + txtterm.Text = txtterm.Text + "DevX: I can't tell you much about my future plans right now but if you can help me then I may tell you more in future" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 44 + txtterm.Text = txtterm.Text + "DevX: ShiftOS is barely usable in it's current state so I need you to help me evolve it using codepoints" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 50 + txtterm.Text = txtterm.Text + "DevX: Once you acquire codepoints you can use them to upgrade certain components of ShiftOS or add new software" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 59 + txtterm.Text = txtterm.Text + "DevX: I'll close the terminal now and send you to the blank ShiftOS desktop" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 65 + txtterm.Text = txtterm.Text + "DevX: You can open and close the terminal at any time by pressing CTRL + T" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 70 + txtterm.Text = txtterm.Text + "DevX: Once you are on the desktop open the terminal, type ""help"" and then press enter for a guide on using ShiftOS" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 80 + txtterm.Text = txtterm.Text + "DevX: Gotta run now but I'll contact you soon to see how you are going with evolving ShiftOS for me while I... Work on something else" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 89 + txtterm.Text = txtterm.Text + "DevX: Remember to always click the black desktop first and then press press CTRL + T to open the terminal otherwise the terminal won't open!" & Environment.NewLine & "User@ShiftOS $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 94 + My.Computer.Audio.Play(My.Resources.typesound, AudioPlayMode.Background) + txtterm.Text = "User@" & ShiftOSDesktop.osname & " $> " + tmrfirstrun.Stop() + Me.Close() + End Select + firstrun = firstrun + 1 + txtterm.SelectionStart = txtterm.TextLength + End Sub + + Public Sub runterminalfile(ByVal path As String) + Dim sr As System.IO.StreamReader + If My.Computer.FileSystem.FileExists(path) Then + sr = My.Computer.FileSystem.OpenTextFileReader(path) + Dim linenum As Integer = IO.File.ReadAllLines(path).Length + Dim i As Integer = 1 + While i <= linenum + command = sr.ReadLine() + DoCommand() + i = i + 1 + End While + sr.Close() + End If + End Sub + + Private Sub tmrshutdown_Tick(sender As Object, e As EventArgs) Handles tmrshutdown.Tick + ShiftOSDesktop.Close() + Me.Close() + tmrshutdown.Stop() + End Sub + + Public storyline As String + Dim getshiftnetstoryyes As Boolean + Dim getshiftnetwait As Boolean = False + Private Sub tmrstorylineupdate_Tick(sender As Object, e As EventArgs) Handles tmrstorylineupdate.Tick + 'put all storyline subs in here, they will be updated every second + Select Case storyline + Case "getshiftnet" + getshiftnetstory() + Case "storyline here" + 'storyline function + End Select + End Sub + + Dim shiftnetstorylinetiming As Integer + Private Sub getshiftnetstory() + Dim delay As Integer = 6 ' Delay between each message (in seconds) + If getshiftnetwait = False Then + txtterm.Text = txtterm.Text & "User 'MF' is trying to connect from IP:174.384.23.45 for subject: 'Shiftnet' Allow connection? yes/no" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + getshiftnetwait = True + End If + If getshiftnetstoryyes = True Then + txtterm.ReadOnly = True + Select Case shiftnetstorylinetiming + Case 1 + txtterm.Text = txtterm.Text & "MF: Thanks for accepting my connection." & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + delay + txtterm.Text = txtterm.Text & "MF: Hi, I'm Maureen Fenn. I run a website called 'Minimatch'" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (2 * delay) + txtterm.Text = txtterm.Text & "MF: Shiftnet is network browser designed to access the Shiftnet network, specially the 'main' subnetwork." & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (3 * delay) + txtterm.Text = txtterm.Text & "MF: It is a great way of finding information and applications for ShiftOS" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (4 * delay) + txtterm.Text = txtterm.Text & "MF: However, some people use it... Irresponsibly." & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (5 * delay) + txtterm.Text = txtterm.Text & "MF: I had quite a big argument with myself about giving it to you..." & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (6 * delay) + txtterm.Text = txtterm.Text & "MF: DevX was against the idea" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (7 * delay) + txtterm.Text = txtterm.Text & "MF: But my pro side won, I'm installing shiftnet for you right now" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (8 * delay) + txtterm.Text = txtterm.Text & "MF: If the website address starts with 'shiftnet.main' then you safe. Don't leave the main servers." & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (9 * delay) + txtterm.Text = txtterm.Text & "MF: All installed, Gotta run now but I'll contact you soon to see how your liking the Shiftnet. While I... work on something else" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + ShiftOSDesktop.boughtshiftnet = True + ShiftOSDesktop.boughtshiftneticon = True + ShiftOSDesktop.boughtalshiftnet = True + ShiftOSDesktop.boughtdownloadmanager = True + ShiftOSDesktop.boughtinstaller = True + ShiftOSDesktop.setupdesktop() + Case 1 + (10 * delay) + txtterm.Text = txtterm.Text & "MF: Make sure you check out shiftnet.main.minimatch/home.rnp. Bye" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) + Case 1 + (11 * delay) + txtterm.Text = txtterm.Text & "IP:174.384.23.45 disconnected" & Environment.NewLine & ShiftOSDesktop.username & "@" & ShiftOSDesktop.osname & " $> " + storyline = "" + shiftnetstorylinetiming = 0 + tmrstorylineupdate.Stop() + getshiftnetstoryyes = False + txtterm.ReadOnly = False + End Select + shiftnetstorylinetiming = shiftnetstorylinetiming + 1 + End If + End Sub + + Public Sub WriteLine(text As String) + txtterm.Text = txtterm.Text + vbNewLine + text + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/TextPad.Designer.vb b/ShiftOS/TextPad.Designer.vb new file mode 100644 index 0000000..21eec4c --- /dev/null +++ b/ShiftOS/TextPad.Designer.vb @@ -0,0 +1,358 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class TextPad + 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() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(TextPad)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.txtuserinput = New System.Windows.Forms.TextBox() + Me.pnlbreak = New System.Windows.Forms.Panel() + Me.pnloptions = New System.Windows.Forms.Panel() + Me.btnsave = New System.Windows.Forms.Button() + Me.btnopen = New System.Windows.Forms.Button() + Me.btnnew = New System.Windows.Forms.Button() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.tmrcodepointcooldown = New System.Windows.Forms.Timer(Me.components) + Me.tmrshowearnedcodepoints = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + Me.pnloptions.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.Controls.Add(Me.txtuserinput) + Me.pgcontents.Controls.Add(Me.pnlbreak) + Me.pgcontents.Controls.Add(Me.pnloptions) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(526, 298) + Me.pgcontents.TabIndex = 20 + ' + 'txtuserinput + ' + Me.txtuserinput.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtuserinput.BackColor = System.Drawing.Color.White + Me.txtuserinput.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txtuserinput.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtuserinput.ForeColor = System.Drawing.Color.Black + Me.txtuserinput.Location = New System.Drawing.Point(4, 2) + Me.txtuserinput.Multiline = True + Me.txtuserinput.Name = "txtuserinput" + Me.txtuserinput.ScrollBars = System.Windows.Forms.ScrollBars.Vertical + Me.txtuserinput.Size = New System.Drawing.Size(524, 240) + Me.txtuserinput.TabIndex = 0 + ' + 'pnlbreak + ' + Me.pnlbreak.BackColor = System.Drawing.Color.White + Me.pnlbreak.BackgroundImage = Global.ShiftOS.My.Resources.Resources.uparrow + Me.pnlbreak.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center + Me.pnlbreak.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlbreak.ForeColor = System.Drawing.Color.Black + Me.pnlbreak.Location = New System.Drawing.Point(0, 245) + Me.pnlbreak.Name = "pnlbreak" + Me.pnlbreak.Size = New System.Drawing.Size(526, 15) + Me.pnlbreak.TabIndex = 2 + ' + 'pnloptions + ' + Me.pnloptions.BackColor = System.Drawing.Color.White + Me.pnloptions.Controls.Add(Me.btnsave) + Me.pnloptions.Controls.Add(Me.btnopen) + Me.pnloptions.Controls.Add(Me.btnnew) + Me.pnloptions.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnloptions.Location = New System.Drawing.Point(0, 260) + Me.pnloptions.Name = "pnloptions" + Me.pnloptions.Size = New System.Drawing.Size(526, 38) + Me.pnloptions.TabIndex = 1 + Me.pnloptions.Visible = False + ' + 'btnsave + ' + Me.btnsave.BackColor = System.Drawing.Color.White + Me.btnsave.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsave.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnsave.Image = Global.ShiftOS.My.Resources.Resources.saveicon + Me.btnsave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnsave.Location = New System.Drawing.Point(168, 4) + Me.btnsave.Name = "btnsave" + Me.btnsave.Size = New System.Drawing.Size(76, 31) + Me.btnsave.TabIndex = 2 + Me.btnsave.Text = "Save" + Me.btnsave.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnsave.UseVisualStyleBackColor = False + ' + 'btnopen + ' + Me.btnopen.BackColor = System.Drawing.Color.White + Me.btnopen.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnopen.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnopen.Image = Global.ShiftOS.My.Resources.Resources.openicon + Me.btnopen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnopen.Location = New System.Drawing.Point(86, 4) + Me.btnopen.Name = "btnopen" + Me.btnopen.Size = New System.Drawing.Size(76, 31) + Me.btnopen.TabIndex = 1 + Me.btnopen.Text = "Open" + Me.btnopen.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnopen.UseVisualStyleBackColor = False + ' + 'btnnew + ' + Me.btnnew.BackColor = System.Drawing.Color.White + Me.btnnew.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnnew.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnnew.Image = CType(resources.GetObject("btnnew.Image"), System.Drawing.Image) + Me.btnnew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnnew.Location = New System.Drawing.Point(4, 4) + Me.btnnew.Name = "btnnew" + Me.btnnew.Size = New System.Drawing.Size(76, 31) + Me.btnnew.TabIndex = 0 + Me.btnnew.Text = "New" + Me.btnnew.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnnew.UseVisualStyleBackColor = False + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 300) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 298) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(528, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 300) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 298) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(530, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 23 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(82, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "TextPad" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(528, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 328) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(526, 2) + Me.pgbottom.TabIndex = 23 + ' + 'tmrcodepointcooldown + ' + Me.tmrcodepointcooldown.Interval = 10000 + ' + 'tmrshowearnedcodepoints + ' + Me.tmrshowearnedcodepoints.Interval = 3000 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'TextPad + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(530, 330) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(230, 230) + Me.Name = "TextPad" + Me.Text = "TextPad" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + Me.pnloptions.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents txtuserinput As System.Windows.Forms.TextBox + Friend WithEvents pnloptions As System.Windows.Forms.Panel + Friend WithEvents btnnew As System.Windows.Forms.Button + Friend WithEvents btnsave As System.Windows.Forms.Button + Friend WithEvents btnopen As System.Windows.Forms.Button + Friend WithEvents pnlbreak As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents tmrcodepointcooldown As System.Windows.Forms.Timer + Friend WithEvents tmrshowearnedcodepoints As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/TextPad.resx b/ShiftOS/TextPad.resx new file mode 100644 index 0000000..448bc23 --- /dev/null +++ b/ShiftOS/TextPad.resx @@ -0,0 +1,945 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" /> + <data name="btnnew.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAABkAAAAYCAYAAAAPtVbGAAAABHNCSVQICAgIfAhkiAAAAAFzUkdCAK7O + HOkAAAAEZ0FNQQAAsY8L/GEFAAAACXBIWXMAAAsMAAALDAE/QCLIAAAAHHRFWHRTb2Z0d2FyZQBBZG9i + ZSBGaXJld29ya3MgQ1M1cbXjNgAAABZ0RVh0Q3JlYXRpb24gVGltZQAwMy8wMS8xNIn/b8AAAADwcHJW + V3ic7dvBDYJAEIXht53Ygp3YggfjlQotwGbswDXcTADBALtv2P8le+Ew3+yQSbjwfD9e6tTlnCXlaunx + f49rUkqDc/REf38qHHxrP62Nu6/hPjZ1/wj+XI2pLGkCv66vBfu32v9RpMj98ev7E4Va91Vq/0zvX9Qf + qYZ/XH+8ocHT3fZviV/7/vj47F+788fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx9/f3zb4 + gfzdg+/lfyc1+P/mFnGZm0sf0eIyN5c+osVlbi59RIvL3Fz6KJmLrrrrppPOM18H03GZm0sfkfIB+C6t + LCI1u9UAAABIbWtCRvreyv4AAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACmkM6EAADvgbWtUU3ic7V1Zd9tGlman4ziStzg9p/thXnTO + zJx5ihsrCT6KpCipo4VNULbsFx8SJGJOvLVsKXHr4L/PXQpbsQACECVRMeJuFQmgCoXv3vruUlXg4c+d + i8vnQ3d+OQ6eDw/nl3rQH3YTxfCfR/NLUx/P2s3mJDg96PqXWvCSixf7Pf/SsIO9/RGUVjDccf3LlhEM + 3ZM5nO7sQgu++C8YHBxcXHYG8Ke7Pfp02dhoTBpe43Vj0Jg13sOneeNtsH90CGc24cx7OKM3foKz88bv + cMXbYNg7nmCj20fU9jZ02Zw5Qae3j93sHELffSjoSTruDl3k9umcu0dF54AOdn6monskGtjp0/fhiC7q + d+hbf0jFER90B/PLdjPojPjkiFsfuXyTQ26Pi/1t7OUR9koLesf6/NKBwsBmescmFX04aEBhcGFiERRC + 5m8qZBpbjW04+hm+/wSf3kI5bnyCM9ObxEy/Imb6dWH2QGC22zgDXD423sC5z41ZLjYWYzPLwUZTYuN5 + KWy0HGw8h7ExjdLo6BbDM2Z4xgyPw/A4DI8TuINXcJdJ4LqiHBwDavYYDogPxQB8KgDsNj6Acn0AGEG1 + QOmSVybBhIYJTcPOQ3NcAE1J0/LQlDRtvNrRSRA2mwoI3UGHz7hcJiH9XkDaofE4b3gC0CcCUBfA9EEX + txpD+HQOx6ZLR60SS923VjtuTa/iuB2XHbdZGD0UGO3B8TNStwM4+/66xm0JO1ACG+16sHmygM0V9WfF + lvL2EXq4MMIqa488tsrozy2PrZDSe4TOG9INxucHgU/iDH1DLZoAyefjZKwpBxk3hNMIRt0cPIm7ipO5 + cpw2Ipw+wGj7fINWLNcn8KyKQ01jaDSGRmNoNIZGY2i0gtA8UapQTFh3UYH0lSvQYyVKwsCVx+jWTX4e + QjYjZDNC9pX0aA/KceOi8eVOOo16OpyxGSabYRozTGOGKR2sPBQwbcMQOgPr3oG/5wiLAOt7AVaxYYYd + T+DTtBggOr8UIMfK4SOK7RIQTa/oGRmMkMEIWYyQxQhZHPChWFMRHz4GhStwoAyGYdw8AhX7HTj9nAO/ + fCSVozEfSL0toDQmecGzDGWp8LkymEa7GJiPBZhdULi3lIL5JUo3fJGU8p8A5RyvSkFp2YylPgnzM1Y6 + QaMxmF4elv64iJUknU1A2RRmEmuXs5OGUxhK0xFhtKlPYyzLYriRGNjv4POHxof8JJcAUTcLBzy6ZpV3 + NWyNISRSRQz9vAzEakCsqn9qUmxNGTrHY+RmK7KrWp5dNSr6Z8UgKwvQdwKgF8Bzn5XgtCS1kixqXqSI + VVP4GMu1qnKoWFSlOiJB2KlEaOFgHMLZCQ3G97kqpbdXq1O3gVkSowcRRm/IUfUAgXGUNg3R6ZLdRLrK + d9IkndINT6lVElm1vPIQWSJXOhYYmVOrsO2szvidMHMqaLI8kgMirs/LZ4MkJH2rAOv7IeujP1EQyMhw + CiDJJ1k9jgifG3ojaDnZLQk/ILLsl4QfhqUhvp9OmJWBlxySpfEEqXNpfGfCqmJlBJiy/CsFeAi4GrMZ + YyZ7JPmYVXGQ1YaDZkqyofOM8mM8co9tg6FjDIthp88Km49I8QxfGch2yWp8IdtQJTZLh2YUIlTMWBcZ + yIYjXGAKSgqiZRoqtJqMVpPRavJQZgLEDxNfGspoh4d7JXC8H1nfcePXJZlIh1FsM4rk/ydQ1K6KosUo + soopYcQ5QcTRyMHRFlk3cBM4XdIWSArFawrNa1pZYEYzcyGYvnqOM1spRzQ97DV+LTOKC2llsdBMrZY0 + mNFQT1bOf2RgaAyHQA6TloZtT7Z6hgzZp4UIONEywtS4pKKM6vvVTkwVzBtoq1mQoIazuTDl3hEoup3F + KfZ8sJIp0DMY0VuNQ/Fp1jgrMrrLaKNuz4rkr9R+43WCx+mrxXikGHZ7FKe8EfHKG/IVz5SLE8io0ljW + UtzIpniBG5VhCXk8RRME42vFrjhUYR75IIIoW9HksNdTZveMnAAudvsqxCfXpmdJUxEHJ+Gw1Z1ZCs/v + BJ7HijUxmDRFnxAn4V2aEhyLCbD8ITtWutAFvBr0VXMye96YkTSERfYMyYOeCi+QvfUlNgTYkvF0BKAO + I+qJpUaewNRzZIuMH4bhh8VFM8PoQ+hCDobC6gyHYRDjLjrkKlH8Re2Gi4z2nCLGZTO1rYqrIgqZHuEd + +WMpRSj02pqkXCNLpdhNSy0IW8xJ2mJSEsp03poN+ZDstusOhR0X39Ge6z4jrftLgd5M6HwxWMcVYSU/ + ZxmspuR0hk5SGIQTLy24nHqBQAeP9gXafUablJmw2yZJkk7jsi/E0GoWxvBBFGffAFeY00JcIUWMEVXk + prAzXHdLuO4WI2l6jCSVJpWEJA95JS2QA4AaS+gOGe2iXLAZwfuZXHxcEfWpiO8Uzg+Ec3/6eHbVuT+h + prakpmmjhv6oS6uus8ENB39RcEPgdD9y2QlAyXV/JPB7QWo4E+kNWuApBUXFJpmlub/IkSo2z4xpipI+ + fKSopOdXSm0ol85Gebc4WCfnNPwwPE5grTHW0grQ5RiXCZF8oat+Wlf98YoY9aquqhpbQxVysrOVdBCi + SFOe2iqup8WCd8NRpuAoalqhloaxuxnm3+ziSqr2Y00VkLT0OGtxsir3MRS0+KHxTlJBXryVT5emCjtp + SloZK5lacU+JqGNRAyfW8hxSxJVSDgm5gtDjDyZ/YF8J3H32lfAD+aFNjZ0lMj3DcLizpS+GaTiV2Ed3 + VIUoPkzCuIdjuox1z91rQBiqcnNq+yMwNVWYeo7a+WyLwKotcpztJrtH5CaFKaNO7HKGKSQpss8GMXSW + cOPB+4aPs7K4y0UFp24LPJtpPMclKLKpHNyaanBzXrPKQp5waKe3bhhibFNpUsmK1xR2RSbF5aP5JcX0 + +QYlzYSF5skKKV96OE+UqzClsEdpULI8n6yMcHrGUega+T6FdS72IP8FQ3dMsWQ+JdpVJ7VLGBOOGRNB + TomJMABaSYl4vC+O9/l4NHzJ2WkJX6fFrBgOYyLFPQ4tVevJTgC/92Srz8kHD33zvwpkn1Pw6NFa80+0 + dw2zdbiVaItmeHGdfv4EpDINxfPlReeEzOWBpZc2QmTHF8NKq1Q4JHwhU6yOhZL0VqTfRZjJdkgQaMrb + JNEkgnknHctnLPDLEsjTyEa9pRVpZXNY6mxgoUWToRh0ZWA6tVJJrLHSH9VnxSMn2XIZjjrAJ+SHUSZq + 0eAXhTTS4+uHdGFeSanaZttJJwZ9JSmrcybSdKenVm6VOyDvQIxTgoJQkikpRh8esGUzaTfLgX9PgG82 + ehXm4Ftl9DaPss20/y9pbas6eyi1do9jqTI4hSbuGI5/JvJdtjFKV7r95Ya6XTxDKkHWXu4ohFPwkle1 + YsBAsWA871Ls+du1A6bkxjRgnjJOCpkx7dPrN6pjDyPX/Q0tfcOZqNnCAkEZtmbVfLFefCIuyh6ZzfJL + PcIMx7KN13thIL63GIgvg+5RlM34QAH5G7AfYt1bvs6tbrdQHq85yjW7mFRJ6JxRJo+ZpXPsxLuLwc8y + BB8nEPydMkJblD0qjSGtVSuxgyHC0VoeQlZ+nQTGiAV0kJJrXkuxyoim2elA+CF0IgciYsJH5Dm4RAhF + +fegf9C7uOwnd+D6JAuXcnLzxI5An2RwRC8MeEfSOck8I2TSZ0D6rIp9Vqj+DoHWH/bokuGQz+1xcYpF + 0E+GdtwhseEXQzipS8kzJ5lnqnXJ4C5BsRv16Cn0x4teQDEVwc7nxPsUPkVD3xMzbOgweo1fQW3D11X0 + d58D8EddbnwfPu8O8B0sfX7Jikb/BYlTenhKvH8Fz73Ec9rV29ErNhGegu8EXZAS3QMhui7tSPJgVL9V + iG8oQFzUqOSZauIzWXxmLb4K4nssxDcEgDx4aEyt/CIJ8XEkKtU1JwWuqSbYMQt2XAu2gmA3o3GJeVi0 + p0nf2E/kaMNzJznnqgnQYgFatQCvMDJZEJ8p9XYWwiaNTPU1JwWuuRLl6not2QqSjd2vMb0ALF7P7Is0 + dnj8JON4NanZLDW7FtoVhDYgd9NL7Fr3RfYwPH6Scbya0FostFYttCsIrU/ATCNYQuHEx08yjlcTmsNC + c2qhVRDaIyG0HbGH9SORXtJ/eSTEpLriZOkV1UTaZpG2a5FWEOl9IdIOTc5+ima9/WhT2Vk0BuWj1cTl + sbi8WlwVxLURBYU4cvidWXI8H5+R4/n4TDXRTVl001p0V7B4L2jx52zB4sXHTzKOVxPajIU2q4V2hVh9 + EM84R0HBZuRHJs+d5JyrJkCfBeinOvYw0qZZY9LokUTe0IR4OGMUao98/mTJ+Wqd1EX2GMuengC23zNS + 38zUNyv1bcQC2KWkeBVt/SGhredw1ZC2rryk+TKeZox11lQqSlvTJkZSUbRndqxteYroCS1KKfR13WR1 + 2l4J56cSzgmEw2NZSD+L+zLRjPE4C4apD6fTJ9tyzVy0V3yjW0Y81Owdmv2l6TlaYbRLS+qgVgLvpqqL + hmZ66S5qzwwnPKtP2i19kj5rRRjpM8uHb6mzzfBkczzzND19smVnN6zLPZKlePe6f8u6sSF0A8+gg4cs + HmuDpepUu2U1dWlImNGQmEwdT8LLic42PWOmN5XPM/OnE2+6KNHb6cItS2VTSCXxmh04t2SUwrM1m80s + NXc0R0N3R63mzSY7Q0o1x4otP0vN+cYZRqcF/ys4Ste6+2uiD+yTLFpJZbdyvIHQi5AFc4V21oTHXHqf + 44XEY0qFa5tt6H+WwlkG/stSuIk9MSd6hsI1m4uaHCvcdIb/lFigkjtFrdpad/+WteFBpA0fxcw1vlD1 + 3XIGlTsGkCZPLjBQ3G9jnElAWE9u1gkS/JPps0dgFKHPde37LevCV5iFqITT44QnOKEY4TO9uEG2NUrt + 0zTTkXUoJiPQsPa4lUVGYEKaOfq3WLWVU1WXe1Ro8Kx1929ZL56kfI8oZlwWq+fxUgKATALBWir5XddN + 1gRl3JL1gVZof24cixcn/LKcqYy2NrbbWV6sMlS+QjtrwugRj8fcvgynkG7zO1fEJy7Szgrzyjv93sXl + Tj8xnTojtPZp4TVmdTrw94JeyMoo/Uj4oQ/0Llq+zteTdyx+GmRn4F5c9ro7+Odn0sOdhk8bfNFr2ofo + kzcJzsWP0fS6z+Gqb4VHBX5gou6juA/RuqQzjmBFvW8arYYt1dkBWYOG0ysDaIsnlDRPL+r8qaFJNbZp + TOAYCX9U6D3V+xTVMFM1HtJbtT6B5c+6Xr5D/Eaunni/zpiWe4TP/+eG3tCkWk+g9beURZnB/c7JfvJP + 08wpGgnvpUu1eO9PSoKxzota9xv/BSj5eM+F+z6mtwX8JhgZZT5dqL8B9bXEP7PhS0+8RyMpvwU/8U9u + 4QllF/HF04Bro0+jcba0H/KzPEhp3yG9z2u/0RO1/6dxCfqDZ5uAP0rAaPwEn/FO+AmPTekHGR041oIz + fA+brmzBXx3O4LcgddeNBPKjxheUYIZmbCaufEH7NGFURbqtL1wd61GkswkNMqWxsJHQILkfhoTTHsW5 + zH4qbUnISqrp0j6gKemMqmaWbDapJtY6Bjn/H8tI1LsH90GP8ZPECA8Ar3OaxEI2cGkcfc5EdyPc0LWA + rXzl0+hKbvMsc6TKNf8XtPRX6H+f8JuRFTkTOB5DzbeAO7/A7B3g/4H46wyOJfXyBK4/4r1U4i4PEjy8 + lWBiIu4SnH1fcHaft6nW7Fyzc83Od4CdZZxqdv4js/OQFv/+UrNzzc41O98BdrZrdv4K2HkjYudzuh/q + S83QNUPXDL3+DN2sGforYuhERrpm6Jqha4a+Awyt1wz9FTD0pmDoV6Q3r+AevzSMmqNrjq45+g5wtFVz + 9FfA0aEXneDomqFrhq4Z+g4wtFkz9B+GoRUjvl55V3N2zdkr4mx9TTi7Xnm33pwdj+KrcHa98q5m55qd + 7x471yvvviZ2rlfe1excs/PdYed65d3XwM71yruaoWuGvpsMXa+8+5oYul55VzN0zdB3i6HrlXdfA0PX + K+9qjq45+q5ydL3y7mvg6HrlXc3QNUPfTYauV979cRi6B1ehlBOSkOYJBU+tlJ2Xj60xjJF2w4J/U2jP + WcnYytc3mQ+aUj7vcaq2WsI47gyFpoa1lq2lTV7L7wSNudrJeZbFEW1CT+wb0bZQg7ZSOlRW254IbYvf + LPw6ddXXpn1jSY+KaN+fGq1r0j3ZJ79LuvdY6F7SJ5C90e+F9uG6YrAb9Zo1cb0h3aH2RW/GF9VLM9ZN + +6KmxB7ZvqisRfWKta/FE30Y8ykwdGIcXIGhh3CHOSFaM3TN0HW2IJuhZdatGbpmaJmhH8V82pjmcvST + FP5b1Fv+3cO3qSjOJcnM6VyyxjP8t8DZ/wkjpQP99umpmEteQ//PSFeRfX6D75+jZ0Y2/3fU+3s0crbw + b8mxOIHoToOzbRpTMxqLFvFUOBYx5hvDPx/GXxiR4dUOfPdhRE7h+vRY/L4xLZgTuNcYS6PqG2jNlq7x + lvCYrOfXoyHLJFpFSzZTe0PDczdtz5sS4sttrVXR/lW3GQb9epAD+gY6BLz7E+kfamSop3hsQpo6je7i + kJXxSaPRcsg2I5utrLVmK7XeVNHAh6mWbi/PZAtL75ONR0+gBf8suL66fMvmmWzJJ6vzTOo4RqUtad17 + CH2cgodxTphtJbAPf615j36l+e/QBvoT53R/tG7IUOtlIU3QLhMs3oT0bUrttIl7kpqJ56fQikZWFDW4 + Td7tlCyl7K0+hd4tPvdrwvoDHH0fsbOsNT+QBWKPVLByoXoPocZbujayphI+av9vE+qdE57L73E9OldE + V8pp319Bj84WUPy7bB/XWg+9SA/1K+nhRIFEEVk/IT1KonV7GlJOnuV05bvkGzbWRhemIFcb9EEX8v2J + rOYUrKEcQTuRdUNdQHs6hf9rpEnBDcgmjV857Dcg+g69yU9rNhrR37DgvE8os7+iA3q2QgJGQQn8AL37 + QPzmUV/Z43wNei1+HTEzlk7XeyPGwmLNP5Pe2Ll3jWtPGvxbjNl1H2f0+AxamGQyR9b9krVUd3tIzMZc + U+ROjxLXF79L9jPNMvOZec8U1yr+TNl3ynqm/Ls8VtxlmVY9Ud6piEbJaIR3TOtT3pMVq/FY2cPlWrsB + VyJHvYO/sgbpuVcm5SIzRvLKRWzlFUvJq+Wn1G+Al1XcWo6dH8D5c8oLbiXbWlOG1iOGtmqGrhm6Zuia + odecobP4tawP3SU5X5Ac1suHTke0syiiNa8Q0T6MJUvP8KExpxjwU7A7ANB2B6OLy9ODLv5i8ksugviY + Ydt8FD8Ekj6QFq68TZxtWmWbD0JdXWmr1+WDLOpmOe3ejI/AWe7d2wX9vpc5v6qai7gPT/SR5r7x+b5E + LKVaLXCdGfEpabhFGVaP5jnGNAPeljLiOGLGqVlymtmn9ZozxSx5uDoAczXTG5+3UMkrLfN70D6+23QW + SfkHkckJ33O6JVhxG2p/xBz02jAacpMJf1FyY8oKeFBaNIea9DltmrcotrLheiSxHNNlUtmkHr0Xs+W8 + /md9vH+fVo9oJA+fUPdp1jqeT9JIEjhGinr/1zUmVDim0f82mh9i7OPv64O3Dud88ietKNoKrXq1aOt6 + 8I6xy8f4Ma0IwZUMOC+yFZ5dMx9qSribNANoEeMY1GtkHItmB2yyHIguSseGc23yvFASPiHvSbj/SEiG + Tx56v2fKDP830NZNWI58aSTv/5fM3v8LynHjbcquf4PauFQTEPlwxul2NOE/CPl4pjB+quy1NmXXWNgg + S4fsUBPabxJn+mJWwaLR7JMu6aQzNq0cwnV86G07dMV4weN4mtnvxZU/7RvSpDxp5mvCw8arBr7p5t3a + 8kFb7NRBqTWj+MkgHsZdPBOSIUq5Sb7lhOTnk7dpkE+JvshN8HA2lunc17/FVWV56KmyZlUO+KGxC/XO + aWZxTrp7Wzzwi9SP5NOFzHcerdX6EaT8jPyg7H/y27rKZVa1KLNqrp2tXy61fKlvRFdvERJnitX26+Fx + GWvscalQTON+X6wlOqOV0+8jtk0dXUMZ6LQq1qcMJs/Dt4l9WwsyCFet3ZYMsrEsIokn0OJ72tXBZ7ai + FaI3yX1/JcaPe/GasrOfaIfs54I7T8qOK2uNx9UyqaS94mzsVmE18tpXWWt7weKqNU8+ui4j3yPZY0YB + VyZzfoH3qyzmF1q3qiUygnJe54iyxLjuL2TdbfIGt+Iza+bjzghFjdb9Tiij4xG+Jvm4nvBE8K9Ne3TC + leLo2c7IP8ZYWJ7ZHdNTvwacw6fO0dyU5qtqnotS3ruQtc7yulg/S5by2ON9h+m14eF7L/aoxx9uYV+C + PP+4fJ+hLtVYts8Qff+yux/k3Y/1TsN6pyFLK71qv/79ktvaa1h9945zA6z8bcaOHTULh++HO6L20ata + nOG86R1i68HEi/sJay6uubjm4vXiYrsyF9/EbEAWF38HCL8l338KfBPuWsOecmtnNNpQf7dSV65LjDSl + nH+LxlKbYqQmzfrFq0ccipFwBqfdSO7rxv/7dK08l3Nd+7uWo5rWNbQIXxSxFY6BNsV2ONfflhDzovay + a7ZpbtQsoAvfraXUfcrJWyLX6Ik5n3ZizTPv5tdAL4ru5r+ufUHrI98faeXFF6F1vE/6C3y2BEK4/nIn + 8sYO6fnIr1qzvAhKV6cR7Yh9gT7tkJ6kclJNWn1k0nwt/uXvWE7p2M3MCCyiWF0mSQ8W53fYk/ljyaZ9 + Y3ych2Z1GT2RZt1H1Bvs9x9LTrxm82ay//mIpmX1F1rZN2/w3I8L/ZmLTxjnoG+XlNb38Uq0OymfFkil + RSuiWrQyCv82yReyySLehHwWMUxL5AFhP6N1xuiBh6thwz3qA/LZP9P4e9Pgd3tiVHJB4y1570X/41vy + qbxEBC9HOMUyBtnRwTI54XzZjKIVn+I2nBmdUY1QTmPyRFo0ajSxT9kQfksbzuD6lZuQUzmk8b9DF4QY + vKK/g+3RxWWnezC/9H2N/gv6/I3/CzqDSOIbNFvxGu7HXu48kvbf4AzmeFCfB3D8d8G+25SNmcNRHr1j + yuBPg2HveHKpBZ3tozkV7vzSnDlBp7c/v9SDzuEhdAAKODwOOu4OXeT26Zy7R0XngA52fqaieyQa2OnT + 9+GILup3uBjSwSM+6A7ml+1m0Bl16OiIWx+5fJNDbo+L/e0J1DjCXmlB71ifXzpQGNhM79ikog8HDSgM + Lkwsgn6M2fc0r/Y6fveSQOxe4sjJwhGBT5/72Oen6mPnDPhGz9Ef9uiS4ZDP7XFxikUwOu1cXIY32hXE + +h4E//PF5YsBXONowZ4oR+4raA/kPtqHXo/2e/PLlj+1fJrfHJ32V9NQsHM6uLjsH0LfraB7QJ0eHNCT + DLZJEQ+O+NiQGxmMxPdjlMH24IALFx96e7tL37Z7VLjQzAyu7GGFXWxUC/4x+Of80sbS5a/HXAyw/m5/ + H4t/uHjNGMod/jrC5v7hdgjYgwEhegSd6x8d4h9xAG5jGsHzfRevDoJd9wCvP3BPsOhxceCSdLruIV60 + 03XxQY9eUpUDl77tjUjJ9kZMpj0yPTiwf6OSFrYHp3269vSQnm00pOagJhanPVLPnf4pNNAIjg6ti0v4 + M79sBlT4XOhcaFIBZR+vB9WyAyrgYY5cjdtydVEaojSp3Dnq4nWjbRp9o8ELLE7xQfSg2zmha7odEm63 + s01He9v0rQcIHvRH/qX2zA5GxwP+MNwXRzrH4kPQPSX4g8Mj6N7hUY/aDPYPSXCD/QMu8PB/UyjlUNjX + JML9iSZULTKmuDhwJhYQtsmAYnKuTRtOTAobcWMDJjZRItC7YP+ABfkSJH6w/RJo8eddPHAyJN07EPHT + C2h2Qgw7Jt/xLDg4IDgOXbrusEvN9Fg/ugdIBTvYZPdnPL5zgPcKQH/g+SIlWrifJu53P74P3FNP3Uvj + e+n599o/3I0OnB73ae8UF7RrSm+FW6loPDd5ONs8mp30YJ7MZhi1jrbxCZa166TatbhdS9mup0/NqN3B + aC9qt7ZOtXW6EevUGQ7IFI2498cj7P0Qqd5vtZzZBCjrFHV5dPwSi0G3j9gPXDo4cPngDn/b4W99/tbn + bx246aADJnDfJdvVcQ/o+KCLg2LQCTcxmuGooZt7jm8C+fZgOLWDzitoo/OKGLiz/YpYJK5oGHJNg2sa + VsGacGFYVS94U3OhppZ7U6jbRSBQAwUQhIANxQICg6ELXQie7yBSz3TDDnonpE4xNMdH1EaidgzD0upG + TnXo/9L6uqK+Wby6ll291LND/eE+YFpWJQ9Hp2BgNQ3vc6jpdEgzqNA1LnQ6p/NBgw8afKVh4Llg2IWu + D3suHiPzbgrjzqYd4CTLDngAaxySYWeaHxzDgLMsy7AcJ9g5pr5v7x6KJ5KsY7A77F1c7vIQ3OUhuIsP + ajahfMllaCXILgS7PYgod3tkJXd7PydO7fbAvsDf56iRxy5x2LFLXkow6HXhtkNi9ufDQ2aybqIY/hO5 + XB/P2s3mJEhvRX6xj4pvB3v7/MTDHYClZQRD94T4erebMFwDtNWFrNemynrdpI3SrmijtAo2qrbr14TZ + A4EZW8uP9FYLnBfNw8ZibGY52GhKbDwvhY2Wg43nMDamURod3WJ4xgzPmOFxGB6H4XECdwD235sEritK + jAgNiP5cV3woBuBTAWC8EZxfuJ28MgkmNExoGnYemuMCaEqaloempGnj1Y5OgrDZVEDoDjp8xuUyCen3 + AtIOjcd5w4sy6wxouEZmqzEUa1anS0etEkvdt1Y7bk2v4rgdlx23WRg9FBjtUUZwKvJ7769r3JawAyWw + 0a4HmycL2FxRf1ZsKW8foYcLI6yy9shjq4z+3PLYCim9R+i8Id0I90YyPokz9A21iGcT8nAy1pSDjBvC + aURzGB/vLE7mynHaiHD6QCvQbs6K5foEnlVxqGkMjcbQaAyNxtBoDI1WEJonShWKCesuKpC+cgV6rERJ + GLjyGN26yc9DyGaEbEbIvpIe7YmZky930mnU0+GMzTDZDNOYYRozTOlg5aGAaRuGEP9S8Bnt33oTrYZg + sIoNM+x4Ap+mxQDR+aUAOVYOH1Fsl4BoekXPyGCEDEbIYoQsRsjigA/Fmor48DEoXIEDZTAM42acnf+9 + wW/xX8brpnI05gOptwWUxiQveJahLBU+VwbTaBcD87EAs0uLL/gHH8J0wxdJKf8JUPLCkSSUls1Y6pMw + P2OlEzQag+nlYemPi1hJ0tkElE1hJrF2OTtpOIWhNB0RRpv6NMayLIYbiYHNWyA+5Ce5BIi6WTjg0TWr + vKthawwhkSpi6OdlIFYDYlX9U5Nia8rQOR4jN1uRXdXy7KpR0T8rBllZgL4TAOF892clOC1JrSSLmhcp + YtUUPsZyraocKhZVqY5IEHYqEVo4GIe0Bg0H4/tclcLJtVXq1G1glsToQYQR79b3aFXdWwmdbrTMJd9J + k3RKNzylVklk1fLKQ2SJXOlYYGROrcK2szrjd8LMqaDJ8kgOeI/j8tkgCUnfKsD6fsj66E8UBDIynAJI + 8klWjyPC54beCFpOdkvCD4gs+yXhh2FpiO+nE2Zl4CWHZGk8QepcGt+ZsKpYGQGmLP9KAR4CrsZsxpjJ + Hkk+ZlUcZLXhoJmSbOg8o/wYj9xj22DoGMNi2OmzwuYjUjzDVwayXbIaX8g2VInN0qEZhQgVM9ZFBrLh + CBeYgpKCaJmGCq0mo9VktJo8lJkA8cPEl4Yy2uHhXgkc70fWd9z4dUkm0mEU24wi+f8JFLWromgxiqxi + ShhxTpCXS2XjaIusG7gJnC5pCySF4jWF5jWtLDCjmbkQTF89x5mtlCOaHvYav5YZxYW0slhoplZLGsxo + qCcr5z8yMDSGQyCHSUvDtidbPUOG7NNChM+0qWXe+CipKKP6frUTUwXzBtpqFiSo4WwuTLl3BIpuZ3GK + PR+sZAr0DEb0lthx9yutuC0wustoo27PiuSv1H7jdYLH6avFeKQYdnviHQDxL27K2IWLE8io0ljWUtzI + pniBG5VhCXk8RRME42vFrjhUYR45fl1CtqLJYa+nzO4ZOQFc7PZViE+uTc+SpiIOTsJhqzuzFJ7fCTyP + FWtiMGn6gTZNJTfmLaqdPGTHShe6gFeDvmpOZs8bM5KGsMieIXnQU+EFsre+xIYAWzKejgDUYUQ9sdTI + E5h6jmyR8cMw/LC4aGYYfQhdyMFQWB1cP81BjLvokKtE8Re1Gy4y2vyeimUzta2KqyIKmR7hHfljKUUo + 9NqapFwjS6XYTUstCFvMSdpiUhLKdN6aDfmQ7LbrDoUdF9/Rnus+I637S4HeTOh8MVjHFWElP2cZrKbk + dIZOUhiEEy8tuJx6gUAHj/YF2n1Gm5SZsNsmSZJO47IvxNBqFsbwQRRn3wBXmNNCXCFFjBFV5KawM1x3 + S7juFiNpeowklSaVhCQPeSUtkAOAGkvoDhntolywGcHLb8R6T++qKOA7hfMD4dyfPp5dde5PqKktqWna + qKE/6tKq62xww8FfFNwQON2PXHYCUHLdHwn8XvB7gkR6I/lbTd9HXlWRSWZp7i9ypIrNM2OaoqQPHykq + 6fmVUhvKpbNR3i0O1sk5DT8MjxNYa4y1tAJ0OcZlQiRf6Kqf1lV/vCJGvaqrqsbWUIWc7GwlHYQo0pSn + torrabHg3XCUKTiKmlaopWHsbob5N7u4kqr9WFMFJC09zlqcrMp9DAUtfmi8k1SQF2/l06Wpwk6aklbG + SqZW3FMi6ljUwIm1PIcUcaWUQ0KuIPT4g8kf2FcCd599JfxAfmhTY2eJTM8wHO5s6YthGk4l9umnCRSI + 4sMkjHs4pstY99y9BoShKjentj8CU1OFqeeonc+2CKzaIsfZbrJ7RG5SmDLqxC5nmEKSIvtsEENnid9x + iW90QHdproJTtwWezTSe4xIU2VQObk01uDmvWWUhTzi001s3DDG2qTSpZMVrCrsik+Ly0fySYvp8g5Jm + wkLzZIWULz2cJ8pVmFLYozQoWZ5PVkY4PeModI18n8I6F3uQ/Lsz9KbUXBDtqpPaJYwJx4yJIKfERBgA + raREPN4Xx/t8PBq+5Oy0hK/TYlYMhzGR4h6Hlqr1ZPgLB+/JVp+TDx6/H4eR5bfWeLTW/JP4/cLwLUcD + 3s+8ZAJSmYbi+fKic0Lm8sDSSxshsuOLYaVVKhwSvpApVsdCSXor0u8izGQ7JAg05W2SaBLBvJOO5TMW + +GUJ5Glko97SirSyOSx1NrDQoslQDLoyMJ1aqSTWWOmP6rPikZNsuQxHHeAT8sMoE7Vo8ItCGunx9UO6 + MK+kVG2z7aQTg76SlNU5E2m601Mrt8odkHcgxilBQSjJlBSjDw/Yspm0m+XAvyfANxu9CnPwrTJ6m0fZ + Ztr/l7S2VZ09lFq7x7FUGZxCE8cvw35bYGOUrnT7yw11u3iGVIKsvdxRCKfgJa9qxYCBYsF4Dt8+fN2A + KbkxDZinjJNCZkz79PqN6tjDyHV/w69uo9e/yQsEZdiaVfPFevGJuCh7ZDbLL/UIMxzLNl7vhYH43mIg + vgy6R1E24wMF5G/ot80/Ld2zrq9ut1AerznKNbuYVEnonFEmj5mlc+zEu4vBzzIEHycQ/J0yQluUPSqN + Ia1VK7GDIcLRWh5CVn6dBMaIBXSQkmteS7HKiKbZ6UD4IXQiByJiwkfkObhECEX596B/0Lu4LPA+pQ04 + Lv8Gxknmmau+X6mfDO24Q2LDL4ZwUpeSZ04yz1TrksFdgmI36tFT6I8XvYBiKoKdz4n3KXyKhr4nZtjQ + YfQav4Lahq+r6O8+xzfydbnxffi8S2+d6fNLVsS7whKn9PCUeP8KnnuJ57Srt6NXbCI8Bd8JuiAlugdC + dF3akeTR73osii/xq9KS+JJnqonPZPGZtfgqiO+xEN9QvHqVfy46LcTHkahU15wUuKaaYMcs2HEt2AqC + 3YzGJeZh0Z4mfWM/kaMNz53knKsmQIsFaNUCvMLIDH8s6gM5TAI2aWSqrzkpcM2VKFfXa8lWkGzsfo3p + BWDxemZfpLHD4ycZx6tJzWap2bXQriC0AbmbXmLXui+yh+Hxk4zj1YTWYqG1aqFdQWh9Aib+WaFQOPHx + k4zj1YTmsNCcWmgVhPZICG1H7GH9SKSX9F8eCTGprjhZekU1kbZZpO1apBVEel+ItEOTs5+iWW8/2lR2 + Fo1B+Wg1cXksLq8WVwVxbURBIY4cfmeWHM/HZ+R4Pj5TTXRTFt20Ft0VLN6LBv82g2zx4uMnGcerCW3G + QpvVQrtCrD6IZ5yjoGAz8iOT505yzlUToM8C9FMdexhpE/6YRI8k8oYmxMMZo1B75PMnS85X66QussdY + 9vTkzy30jNQ3M/XNSn0bsQB2KSleRVt/SGjrOVw1pK0rL2m+jKcZY501lYrS1rSJkVQU/E2RSNvyFNET + WpRS6Ou6yeq0vRLOTyWcEwiHx7KQfhb3ZaIZ43EWDFMfTqdPtuWauWiv+Ea3jHio2Ts0+0vTc7TCaJeW + 1EGtBN5NVRcNzfTSXdSeGU54Vp+0W/okfdaKMNJnlg/fUmeb4cnmeOZpevpky85uWJd7JEvx7nX/lnVj + Q+hGl3667SOxeKwNlqpT7ZbV1KUhYUZDYjJ1PAkvJzrb9IyZ3lQ+z8yfTrzpokRvpwu3LJVNIZXEa3bg + 3JJRCs/WbDaz1NzRHA3dHbWaN5vsDCnVHCu2/Cw15xtnGJ0W/K/gKF3r7q+JPrBPsmglld3K8QZCL0IW + zBXaWRMec+l9jhcSjykVrm22of9ZCmcZ+C9L4Sb2xJzoGQrXbC5qcqxw0xn+U2KBSu4UtWpr3f1b1oYH + kTZ8FDPX+ELVd8sZVO4YQJo8ucBAcb+NcSYBYT25WSdI8E+mzx6BUYQ+17Xvt6wLX2EWohJOjxOe4IRi + hM/04gbZ1ii1T9NMR9ahmIxAw9rjVhYZgQlp5ujfYtVWTlVd7lGhwbPW3b9lvXiS8j2imHFZrJ7HSwkA + MgkEa6nkd103WROUcUvWB1qh/blxLF6c8MtypjLa2thuZ3mxylD5Cu2sCaNHPB5z+zKcQrrN71wRn7hI + OyvMK+/0exeXO/3EdOqM0NqnhdeY1enA3wt6ISuj9CPhhz7Qu2j5Ol9P3rH4aZCdgYu/EF/yp+2/FR5V + +oftH8V9iNYlnXEEK+p902g1bKnODsgaNJxeGUBbPOln5N9C37jOnxqaVGObxgSOkfBHhd5TvU9RDTNV + 4yG9VesTWP6s6+U7xG/k6on364xpuUf4/H9u6A1NqvUEWn9LWZQZ3O+c7Cf/NM2copHwXrpUi/f+pCQY + 67yodb/xX4AS/l60tnDfx/S2gN8EI6PMpwv1N6C+lvhnNnzpifdoJOW34Cf+yS08oewivngacG30aTTO + lvZDfpYHKe07pPd57Td6ovb/NC5Bf/BsE/BHCRiNn+Az3gk/4bEp/SCjA8fwd7n5HjZd2cJf24Yz+C1I + 3XUjgfyo8QUlmKEZm4krX9A+TRhVkW7rC1fHehTpbEKDTGksbCQ0SO6HIeG0R3Eus59KWxKykmq6tA9o + Sjqjqpklm02qibWOQc7/xzIS9e7BfdBj/CQxwgPA65wmsZANXBpHnzPR3Qg3dC1gK1/5NLqS2zzLHKly + zf8FLf0V+t8n/GZkRc4EjsdQ8y3gzi8wewf4fyD+OoNjSb08geuPeC+VuMuDBA9vJZiYiLsEZ98XnN3n + bao1O9fsXLPzHWBnGaeanf/I7Dykxb+/1Oxcs3PNzneAne2anb8Cdt6I2Pmc7of6UjN0zdA1Q68/Qzdr + hv6KGDqRka4ZumbomqHvAEPrNUN/BQy9KRj6FenNK7jHLw2j5uiao2uOvgMcbdUc/RVwdOhFJzi6Zuia + oWuGvgMMbdYM/YdhaMWIr1fe1Zxdc/aKOFtfE86uV96tN2fHo/gqnF2vvKvZuWbnu8fO9cq7r4md65V3 + NTvX7Hx32Lleefc1sHO98q5m6Jqh7yZD1yvvviaGrlfe1QxdM/TdYuh65d3XwND1yruao2uOvqscXa+8 + +xo4ul55VzN0zdB3k6HrlXd/HIbuwVUo5YQkpHlCwVMrZeflY2sMY6TdsODfFNpzVjK28vVN5oOmlM97 + nKqtljCOO0OhqWGtZWtpk9fyO0FjrnZynmVxRJvQE/tGtC3UoK2UDpXVtidC2+I3C79OXfW1ad9Y0qMi + 2venRuuadE/2ye+S7j0Wupf0CWRv9HuhfbiuGOxGvWZNXG9Id6h90ZvxRfXSjHXTvqgpsUe2LyprUb1i + 7WvxRB/GfAoMnRgHV2DoIdxhTojWDF0zdJ0tyGZomXVrhq4ZWmboRzGfNqa5HP0khf8W9ZZ/9/BtKopz + STJzOpes8Qz/LXD2f8JI6UC/fXoq5pLX0P8z0lVkn9/g++fomZHN/x31/h6NnC38W3IsTiC60+Bsm8bU + jMaiRTwVjkWM+cbwz4fxF0ZkeLUD330YkVO4Pj0Wv29MC+YE7jXG0qj6BlqzpWu8JTwm6/n1aMgyiVbR + ks3U3tDw3E3b86aE+HJba1W0f9VthkG/HuSAvoEOAe/+RPqHGhnqKR6bkKZOo7s4ZGV80mi0HLLNyGYr + a63ZSq03VTTwYaql28sz2cLS+2Tj0RNowT8Lrq8u37J5Jlvyyeo8kzqOUWlLWvceQh+n4GGcE2ZbCezD + X2veo19p/ju0gf7EOd0frRsy1HpZSBO0ywSLNyF9m1I7beKepGbi+Sm0opEVRQ1uk3c7JUspe6tPoXeL + z/2asP4AR99H7CxrzQ9kgdgjFaxcqN5DqPGWro2sqYSP2v/bhHrnhOfye1yPzhXRlXLa91fQo7MFFP8u + 28e11kMv0kP9Sno4USBRRNZPSI+SaN2ehpSTZzld+S75ho210YUpyNUGfdCFfH8iqzkFayhH0E5k3VAX + 0J5O4f8aaVJwA7JJ41cO+w2IvkNv8tOajUb0Nyw47xPK7K/ogJ6tkIBRUAI/QO8+EL951Ff2OF+DXotf + R8yMpdP13oixsFjzz6Q3du5d49qTBv8WY3bdxxk9PoMWJpnMkXW/ZC3V3R4SszHXFLnTo8T1xe+S/Uyz + zHxm3jPFtYo/U/adsp4p/y6PFXdZplVPlHcqolEyGuEd0/qU92TFajxW9nC51m7AlchR7+CvrEF67pVJ + uciMkbxyEVt5xVLyavkp9RvgZRW3lmPnB3D+nPKCW8m21pSh9YihrZqha4auGbpm6DVn6Cx+LetDd0nO + FySH9fKh0xHtLIpozStEtA9jydIzfGjMKQb8FOwOALTdweji8vSgi7+Y/JKLID5m2DYfxQ+BpA+khStv + E2ebVtnmg1BXV9rqdfkgi7pZTrs34yNwlnv3dkG/72XOr6rmIu7DE32kuW98vi8RS6lWC1xnRnxKGm5R + htWjeY4xzYC3pYw4jphxapacZvZpveZMMUserg7AXM30xuctVPJKy/wetI/vNp1FUv5BZHLC95xuCVbc + htofMQe9NoyG3GTCX5TcmLICHpQWzaEmfU6b5i2KrWy4Hkksx3SZVDapR+/FbDmv/1kf79+n1SMaycMn + 1H2atY7nkzSSBI6Rot7/dY0JFY5p9L+N5ocY+/j7+uCtwzmf/EkrirZCq14t2roevGPs8jF+TCtCcCUD + zotshWfXzIeaEu4mzQBaxDgG9RoZx6LZAZssB6KL0rHhXJs8L5SET8h7Eu4/EpLhk4fe75kyw/8NtHUT + liNfGsn7/yWz9/+Cctx4m7Lr36A2LtUERD6ccbodTfgPQj6eKYyfKnutTdk1FjbI0iE71IT2m8SZvphV + sGg0+6RLOumMTSuHcB0fetsOXTFe8DieZvZ7ceVP+4Y0KU+a+ZrwsPGqgW+6ebe2fNAWO3VQas0ofjKI + h3EXz4RkiFJukm85Ifn55G0a5FOiL3ITPJyNZTr39W9xVVkeeqqsWZUDfmjsQr1zmlmck+7eFg/8IvUj + +XQh851Ha7V+BCk/Iz8o+5/8tq5ymVUtyqyaa2frl0stX+ob0dVbhMSZYrX9enhcxhp7XCoU07jfF2uJ + zmjl9PuIbVNH11AGOq2K9SmDyfPwbWLf1oIMwlVrtyWDbCyLSOIJtPiednXwma1ohehNct9fifHjXrym + 7Own2iH7ueDOk7LjylrjcbVMKmmvOBu7VViNvPZV1tpesLhqzZOPrsvI90j2mFHAlcmcX+D9Kov5hdat + aomMoJzXOaIsMa77C1l3m7zBrfjMmvm4M0JRo3W/E8roeISvST6uJzwR/GvTHp1wpTh6tjPyjzEWlmd2 + x/TUrwHn8KlzNDel+aqa56KU9y5krbO8LtbPkqU89njfYXptePjeiz3q8Ydb2Jcgzz8u32eoSzWW7TNE + 37/s7gd592O907DeacjSSq/ar3+/5Lb2GlbfvePcACt/m7FjR83C4fvhjqh99KoWZzhveofYejDx4n7C + motrLq65eL242K7MxTcxG5DFxd8Bwm/J958C34S71rCn3NoZjTbU363UlesSI00p59+isdSmGKlJs37x + 6hGHYiScwWk3kvu68f8+XSvP5VzX/q7lqKZ1DS3CF0VshWOgTbEdzvW3JcS8qL3smm2aGzUL6MJ3ayl1 + n3Lylsg1emLOp51Y88y7+TXQi6K7+a9rX9D6yPdHWnnxRWgd75P+Ap8tgRCuv9yJvLFDej7yq9YsL4LS + 1WlEO2JfoE87pCepnFSTVh+ZNF+Lf/k7llM6djMzAosoVpdJ0oPF+R32ZP5YsmnfGB/noVldRk+kWfcR + 9Qb7/ceSE6/ZvJnsfz6iaVn9hVb2zRs89+NCf+biE8Y56NslpfV9vBLtTsqnBVJp0YqoFq2Mwr9N8oVs + sog3IZ9FDNMSeUDYz2idMXrg4WrYcI/6gHz2zzT+3jT43Z4YlVzQeEvee9H/+JZ8Ki8RwcsRTrGMQXZ0 + sExOOF82o2jFp7gNZ0ZnVCOU05g8kRaNGk3sUzaE39KGM7h+5SbkVA5p/G+wPbq47HQP5pe+r9F/QZ+/ + 8X9BZxBJeYNmKF7DPdiznUcS/hucwbwO6vAAjv8uGHebMjBzOMojdkxZ+2kw7B1PLrWgs300p8KdX5oz + J+j09ueXetA5PIQOQAGHx0HH3aGL3D6dc/eo6BzQwc7PVHSPRAM7ffo+HNFF/Q4XQzp4xAfdwfyy3Qw6 + ow4dHXHrI5dvcsjtcbG/PYEaR9grLegd6/NLBwoDm+kdm1T04aABhcGFiUXQjzH7nubSXsfvWxKI3Usc + OVk4IvDpcx/7/FR97JwB3+g5+sMeXTIc8rk9Lk6xCEannYvL8Ea7gkzfB4fuzxeXLwZwjaMFe6Icua+g + PZD7aB96PdrvzS9b/tTyaU5zdNpfTUPBzung4rJ/CH23gu4BdXpwQE8y2IbL4csRHxtyI4OR+H6MMtge + HHDh4kNvb3fp23aPCheamcGVPaywi41qwT8G/5xf2li6/PWYiwHW3+3vY/EPF68ZQ7nDX0fY3D/cDgF7 + MCBEj6Bz/aND/CMOwG1MI3i+7+LVQbDrHuD1B+4JFj0uDlySTtc9xIt2ui4+6NFLqnLg0re9ESnZ3ogJ + tEfmBgfzb1TSYvbgtE/Xnh7Ss42G1BzUxOK0R+q50z+FBhrB0aF1cQl/5pfNgAqfC50LTSqg7OP1oFp2 + QAU8zJGrcVuuLkpDlCaVO0ddvG60TaNvNHiBxSk+iB50Oyd0TbdDwu12tulob5u+9QDBg/7Iv9Se2cHo + eMAfhvviSOdYfAi6pwR/cHgE3Ts86lGbwWD3iAKtQWNMZmgLjO3+IQlzsH/ABV7637RAkFNxbVoU+BMn + GhtTsfDTp7QBh4m2WALqUaJw3OAFohQ8gpSgx8HBSxD/wfZL4Mifd/E2J0OWtphUPIBaXxr8CiGQ7AHh + csgacdglne2xonQPkBN2sLnuz3h65wBusH+4Gx04Pe7TZiYuaBuT3gr3NtFga/JYs3moOemRNpnNMIwc + bUO3g2XtOql2LW7XUrbr6VMzancw2ovarU1HbTpuxHR0hgOyEyPu/fEIez9EHvZbLWc2AT45RV0eHb/E + YtDtI/YDlw4OXD64w992+Fufv/X5WwduOuiAfdp3ybB03AM6PujioBh0wl2FZjhq6Oae45vAjD0YTu2g + 8wra6Lwieuxsv8KxkqhoGHJNg2saVsGacGFYVS94U3OhppZ7U6jbRSBQAwUQhIANxQICg6ELXQie7yBS + z3TDDnonpE4xNMdH1EaidgzD0upGTnXo/9L6uqK+Wby6ll291LND/eE+YFpWJQ9Hp2D9NA3vc6jpdEgz + qNA1LnQ6p/NBgw8afKVh4Llg2IWuD3suHiPbawrLy3YX4CSzC3gAaxyS1WWaHxzDgLMsy7AcJ9g5pr5v + 7x6KJwLXB0Z25P8sWEddWMcNCGlmwO5bsZVMWUidLaSWbyEX7hfs9iBA3O2BIYKPz/GKY5fI7tglXyP4 + f9bjj3J4otwpAAAAvm1rQlN4nF1Oyw6CMBDszd/wEwCD4BHKw4atGqgRvIGxCVdNmpjN/rstIAfnMpOZ + nc3IKjVY1HxEn1rgGj3qZrqJTGMQ7ukolEY/CqjOG42Om+toD9LStvQCgg4MQtIZTKtysPG1Bkdwkm9k + GwasZx/2ZC+2ZT7JZgo52BLPXZNXzshBGhSyXI32XEybZvpbeGntbM+joxP9g1RzHzH2SAn7UYlsxEgf + gtinRYfR0P90H+z2qw7jkChTiUFa8AWnpl9ZIO0EWAAACrVta0JU+s7K/gB/V7oAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHic7Z2N + kds4DEZTSBpJISkkjaSQFJJGUkhukJt38+4LSMlZrx3beDOe1eqHpAgSogCQ+vlzGIZhGIZhGIZhGIZh + eEm+f//+2+/Hjx//HbsnVY57l+HZ+fDhw2+/r1+//qr32r5n/Vc5qgzD+4G8z+L28Jb+ubu2jtVvJ3+u + R1cNez5+/NjW1Ur+7v9sf/r06dffb9++/fzy5ct/+qL2F7Wv8ikqL87lGOeRTv1crtrPsdpv+ZN2nVtp + Wl/VsWHPSs6d/i86+X/+/PnXNvVP/y25lAyQOTJiP+dU/sgUmdf+bBf0a84lP7cT2gLlG/bs5F8y8viv + 6OTPMeRCf7UMkXO1FfdZ5Mc14D6+OoY+AMpjPTHs2cn/rP5P+XfvDOh55F5/qy0g19q2LP3MWMnfegDo + +5WedcPQc035I9eSVV3rPkhf95jAefhZksd2uiHbifWM5V9txGkM/1J14v5ztB9dzVicbR+nX2f7KVlZ + 3ikP+m3mXdd5LJeyrG3aIHqGMcnqmmEYhmEYhmF4RRjH35NHsNen//NvL+9Z8t36Hlzqa7o29a54hMvo + 7WoHz+ZnSJ3wlva+u5b38538z9jxj3yGeZ73db7ELr2V/P+G/vMWXP70s2HPw6aOTSb9d+nbwxfka+kj + nc+Q+iQ/zl35A03nb6SMXI/9yL4s2y/t39qll/K3H+JR20DK3342H3M/KX2Jziy5IBtsvuznnPQL2GdY + ICPsdgXnUee0D5P2Z7cd2gz3Qp6ZFvLu7NmZXsrfdfSo44Gu/wN1aL3gvm0/jn17XYzQLn7IfdB2X/f/ + SjvreOdvzGdK9uv0WV2S3rPrf0C26QMu7KspmeFvcX9Dlvy/kz993z5Ax/tYn8DO35jyJy38AOTTyf8o + vVeRP8/2+puysbyL9MXbF+f63ukG9InbCbrFuhh2/saUv8/r5E+cypn0Uv6c1/nD/nbsW0s/W0F9pT8t + /Xf27eW11G3R1ZH9fTxHyGPlS4SVvzF9iLyndeXxeOZMet6mHh5V/sMwDMMwDMNQY1vsm/w8Pr9nXD32 + gBljvx+2ffGzTb6LC70Vf8P8w2dnZ9Pq/ODWCegOx4Tn3MD0LUJe6/NrX2c/zPKgr0Y/nKOzqyD/ld3X + djB8fNiO0BvYfz3Hp0i/UMbu22fnc+y34y/HaB/YkfFJDcd0/dx+F9d7kfLn+m5ep32Btu9a5vgPunlE + nuuX88/st/M16Ijp/+dYyX+l/1d28PSlp08dGyntIvuxYzDOHMt2WeCT2MULDP/nWvLvfH7guV8lL88F + LM70f3BcgMvJuXnOsOda8i/Qyek7L3iGF9bhznP1/F/pBrc5P/8dq1DM3K813btc7Vu943l83tkCGMPn + 9cSNOJ3Uz934n2cA5Pu/y8qxTHvkPwzDMAzDMAznGF/gazO+wOeGPrSS4/gCnxvb3MYX+HrkGqvJ+AJf + g538xxf4/FxT/uMLfDyuKf9ifIGPxcrnN77AYRiGYRiGYXhuLrWVdOuGHGF/Ej9sxPdeQ+OV3xF2a62s + 2L0jruD93H5l+5DuKf+0MzwzXtcH2xu2ucJr8KxkbPljf8Emt2pLK5uc5W9/ImXy+jwu48qeYJvB6l4o + M3rM8s/26HUKn8GmbNsrNrv633a07ps8mYbXEMOvhw2+azdd/y9s02MbW2D9T9r2+dBufb3X5/KahKvv + C5FHyt/rjrEGmtfEenSQEbhedt/kMil/PztXbcZy9TWd/B1v5GP2H7Of/kl67D/6vpiPkU/u93p494x7 + uSbYxyH7hWW5ei7+qfy7/Z380xfUxSLRr9HtpH/0DbndMfwU1vPkwfFHZ9f/7Xsr0o8Dt5J/1x5s+3c8 + Af09fUfdvezaRsaokF76KR/1nYG27HpJHXDkR7+V/Auv40vsAKzWnM57zXvZyd9lyO8L+5pHlX+RMTLp + x9utr89xr6eZaXVtZheXkz6/Lr/V/t19rK7N6/Kcrn6eYew/DMMwDMMwDLCaW3W0v5sr8Df4U3ZxrMPv + 7ObWrfZ5zoXnCh29P96CkX+PfRi2oeWcGlj553ftxbaR2nbMP9/lsN+p8PdE8P+Bj/la25PwLXEvlj/f + s/E9v+o8EcvMfraMm4cj/d/Z5q3/2ea7PrbT2UZr/4zbInH++HqwAXKtv1Hobwk5xsRypiz4iO6tp27N + WVs7HO2nb+Y6ASl/QA+4LWDXpy3YN4v8KHvOG7Hfr5tT0u2n3fq7QK/CteXf9Z9L5O85H+ju/Nagv8m4 + k38+DzqfbsEz6RXnCl9b/18qf+ttdLBjbezDQz7kcaT/U/60jUyT+BDHCDyyP+cSPG6ij9GvbiH/wj49 + 9+fdPPK8Nsd/O/njx6v0c/z36P7cYRiGYRiGYRiGe+B4y4yZXMV/3ord++pwHXjntj8w14u8FyP/NZ7f + 4Ph65sfRj5mDY79dprOyoXgOXvrqbIfyvKCVD9DHKBPXZvmx/zp+H5+my9PZo14BbKBpD8Vu5zUaOa+z + qReeV8fPfrdcOxTbP3b+bo6X7bv255I2Zcxypd/R/b/zVWJTfnb5p/6jXrn3VQxPN08o6Xw7K/lTz+lH + 9Pw0fD/YZu0ftP/Q97YqP8dyjpf3V37PMs9vxU7+ltmfyn+l/1P+Of/XfmSOYavnmOfy7taH3MnfbRRI + izb27G3AWP9b/91K/oX9kH7Ocy7jEtoDeZzR/5BtgzTZtk/c7e8VfEIe/61k/J7y9/gv5/jZB5j+wWI1 + /tvJv8h5/t3471XkPwzDMAzDMAzDMAzDMAzDMAzDMAzDMLwuxFAWl34PBB/+KtbOMUBHXOKfv+TcS8rw + 3hDfcktY/5i1czJ/4rEo36Xy57qOSuvstxa6OJSOjCc+4pJYQOKWvA7OUaz7Uf0aYqPg2nH0jp3yd3iJ + C+xi9ymTv+vuuF/KS3yVj5F2zhcg3twx547VTbw2EGsIZZ9lLTLHm+/6NfmfOZfzHT9LXo5FuqR+iTny + z7FR77GuWa7XRrk4lut/EQ9OP+V+Ozo9SjyX79vf/qEt7HQA8brEknlOQd4bx+lnu/5D/o4JXOH7Tv3i + WMpL6pdzKSfpXkv/Z1x+4ucyfZs27X3Us7+34e8puR7cbl1Pu/ty3h1eG8z3s2qHfoYit+57H3DmueL5 + Mjl3gDaUHNUv0C4cn3otdu06+yv9x/+j87JNe95Xlx79j/tKWbmvWvetyuq1omAlt4wN7dKkbDmPhbwS + 55XtnraZHNWvzyNPz1V6K+jBVf8/O+79E/lzjufcZJp+Hnbx4E63m4dEnec3Ki5Z56sbK3Y603llO/T4 + OMt9pn7p/918hbeyK8OR3oVO/jl/o+DdwH2Ve0LGniN0Bq/pmNd47pDj1a1zj1jJv2uvjFOsH1btm/wv + 1ee7dUo9b+oMR/2/8DyL1btMJ/+jsvNMrPI6D+REXbI23GqsZp2Z8mdMmOsEep0vryvYvVt7jpnfHbpy + 8N1D9E2uWddxpn7h6Fu7HHuPeYu8o67yzXkaCWMFyHpBv6fe9Lv0kd470+5374SrsYDHOZesE3rJc3pX + v5T7SK6c8+zzVodheDP/AKCC+iDgvyWjAAAO121rQlT6zsr+AH+SgQAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAeJztnY2RHCkMhR2I + E3EgDsSJOBAH4kQcyF7p6j7Xu2dJQM/P/livampnu2kQEgjQg56Xl8FgMBgMBoPBYDAYDAaDweA//Pr1 + 6+Xnz59/fOI696rn4nOlrABl+PfB/1Hp+Yr+M3z//v3l06dPf3ziOvcyfPny5d/PLr59+/Y777A3ZQT0 + +0dG1Pu0npWeT/W/AjbR/q72X/VR+naVppPX7d/5nV1U8qzkBF0avV6ly65n7bx7PnBq56t66+wf5Wvf + dbm0b3semg95Bar+r3ll9Y77nz9//vd76C3S/fjx4/e9eIa6qC8LRDq9HukzRP6eJvKIvLkXZateSBfX + 9XnqoGkjL09HHfR6/I3Pqv/H369fv/5+7go6+3NNZdHyI02UzzNZnyM99zL7uwxRntsIm8ff0Jmmie+M + W1xzPUUanfM4tH1FPqRHF8ip6VTu+KAL2rLKHddUH6pnLZ/xfdf++swVrPx/VmbW/+l/nbyBzP7qb6hT + VnfsHHpWfdEu4oMv0D6ofoE8VnJ2ukA+yiE/9xVVnf35kM/L3xn/7zEXuMX+6Dz6I/Xu5KX+lf19HeLA + ttg9/kZbIH/+936GrPRR2otC86FOmS7wty4r7ZG5XmV/ZNTnvfxMbytbXMUt9qcda7vv5A1k9ld/h+/N + +ih93f2P6jbucd39JL4jsz960DaW6ULTqc1pF8jv9sc/8kz85RnNN64h4zPsT19RfdCfAXX17+pvGd8c + mh6Z6Vv6PZ6lD3RrpciL+/hNwP+Rxu8hJ30vA/XGh2S60HIy+clfx0P6h//vsqj8Opep9Om6HQwGg8Fg + MBgMOjj3l91/zfJvwT24hCs4LfM0fcXbnsJj5cSlWM9kcYF7YlX+6tkVn9ZxmI/Cqc6u6Ljibe8hq8a2 + q2cqzqryH1Vcerf8W/m0R0Hl1j0TXqcrcnXx/Hu160xW5dX8/gnnVaU/Kf9WPq3Sk/OGzin6HgXneJCF + fJwDWems0oHGFbtnHml/9OOcXMV5adxeY+ZV+tPyb+HTKj0RowvAs8LzIfPK/sTtVBaVs9NZpQO1P3Jm + 8mf+/8oemhP7V5yXc9bKvVYc2W751PUqn1bZH+5Y+SPlFD3/zEbI3P1/qgPPq5J/lytboRqr4Eb0fsV5 + BUirXEyXfrf8W/m0zk/Sh6OMaA/0NZ7dtb+OGZ72VAen9r8V6m/gGpR3r3xTZheu+9zB05+Ufyuf1ukp + s7fOOxkXtOzMRgHlFrO0Ozp4Dfvr2MnH9+IpL4hPU84LebLrVfqT8m/h0zLezmUDyilWZTMnd66U55Fn + R2eZjj3vSv6uXoPBYDAYDAaDwQrEvoj5nIJ1IGuYVSyqSxNz2x3+5x7YkTWAbh5Z5q4s9wbnYlh3ewx/ + BeIfrL931ibd+vWZ+xkzrlHXlIH4TqzwUWV21x8Jj10HqK/Gt7r2r2djSK/6y57nGe5pvZ33invul/TM + QaYznun0SX/zOIbHaLPyd/LKZMzSddd3y8j0uINVHEn35FfncZSD8Dit7tXX50mjPgedK5ej8UDl7JQP + cJn0HFHFn+HzyEdj/lqXqvyd8lzGqszq+o68xBtVxhOs7N+dtwRdzNL5L/g67f/oys8zZOc7yas6Z0I5 + yFKdjcj073xHV36Vl+7XdxmrMqvrO/JmejxBx4+R34pn7Oxf6X/nbBH5+qfLF3nQ/Y7P0v6exeKz8j2v + nbOEVZnV9R15Mz2eIBv/lVv0Nl/t+7na/zNdVf1fy+7s7xz0qv9r3l3/r+Z/Xf/Xsqsyq+s78t5q/4CO + LT6G4Z90fOn4K5dpNf6r3G7/gJ7hq86fZ7pazVl8PPUxTnnFrHxFN/5r+qrM6vqOvPewP/Wu1v96L2ub + 3Nc+5Dyaz/89jc6RfU6fzeW7GIHOhfmeARn8PuV15Vd5rWSsyqyur9JkehwMBoPBYDAYDCro3Fw/VzjA + R6OSy9cfHwHP4gJZu/sezNU6gv3Sz0QVZ6v2Y75nPIsLzPYyK7K4gO7Z1f3/J+tXtRWxNr2ecW7Yn3ue + B3Lodecid7g80lRr9M4umR70XKBypJW+buUbT+D779U+VeyPmBN+Y4cjVD+j8Suu65559u97vFH5wiyP + LF6dcUYdL1jF+3Y4ui7WqWcT4dczfe3IuOICT1D5f+yPDH5uJeNoVQfeRzQOp+f4KF/7hXNufFd9VGcm + eF5j6/STLEbt/YW2x/kVsMPRrbgO8qv0tSvjigs8wcr/Iyt9L+NVdzhCzlJoX8/K7+TRfLszMyEPbZZy + XDdVOYxt6t8oe8XRnXCdmb52ZdzlAnfQ6Vv7rPp4r+sOR6jvtcz6v47fXf/fsT9nO/Us527f0r0D2m93 + OLpdrrPS15X+r8/fYn/3/8ju4z/6x09W6bw9+bha2V/zzsb/HfujI792Zfw/4eh2uc5OX1fG/52zjhWq + 9b9y3llMgOvabzuOEPmwn84xs2eyOXBWXpVHtX4+mVtf4eh2uE5Pt1P3HRmfFTMYDAaDwWAwGLx/wOfo + 2u9RuJK3vlvjHu++19jACXZlf09cFGteOADWlI+oA3Y8AetaYnq6r7LbB1wBjuEUGk/scKWOrwViFr5u + JH4W8H2svg7Hb+h6lTMY8dGYDW1L4wvoq+N2VcbO/l1eu2m0TroP3uW4Vx1B9rsjtPd4juuUq+kCkeZq + 38p0xPXsHAtxC42zOgejv89FPdANeiXWhd9x+SlDY/HVWQG1RcXR7aRxmbSuynlSR/0toSt1DCgPS1wP + +2isUNMRJ6XcKl7YobK/Xq/sr/Fx2j1tEj15fEvz8vh2xatl/InbXP2YcsiKnTQBtZ/HHz2Om/F7V+q4 + +t0x0vv7BJ07Pd235fJ4HNrrE3D7O29APvqblMiY6QZUXNSO/SseQ7GTBj0q75nJq3yYv0fwSh1PuEPK + 5QNXXfmWFXiOMS6zme+1oA85X0Wf0LGp4g29/Vb9ccf+AfV/yuMpdtIo56jjoMqRfc/sv1tH5QTx+R13 + qJyf7se6Ah3b9ON7LeKDb/S9HNxTHWTXlV/Lnu/O14PK/vgy5dQdO2lUJp93Kt/Od/qHt5mTOgbUBrqn + x8dn1622k1P+T6HjB3PM7N5qj93quu8lWo1bfl/Lr2Tp1q63pPGyK52c1vH0ucx3Xdn/NxgMBoPBYDD4 + u6DrGF3P3Gse2e1JjHWQvitlp0xdqxLvztaC7wFvQV6P57DuOz1HUqGzP5wA6Xbsr7EW1js89xb0eYK3 + IG8WjyRO7jEb57SIPTrfpVDuVuMVAZ51n6M8tMcgPCar/L/qM0ureRNDqbgYLxf5NJajHHLHKWk9tf4q + L3zOjl6QXctRuU7QnTFxjke5CI2ldz7DuXvlleELPEaq9fPzjc7BVv6fcrIyvW7Z3mxv/9iN2KfHfLFt + tm+btgIn4nFi7K3totOLy+5ynWBlf+zqZWax/xWP6DYKMAeobHqSn3NB3l+yvKsYsO4P0ng3sdbst6Mq + 7lV9je6tUq4l8xkrvbi/Q64TrPy/21/nCbfan35JXP1R9td+sWt//AZ5qc8jX7f/am8HfkR5VeUPwK5e + qvqeYDX/o55wjLoH5Rb7a7nuh2+1PzqkHNXLrv3JQ8cOtbnud9nJB3+u/J/L6z4/00t2z+U6Qbb+831F + OrfIzl+rbhwre9H+df/DPeyv87/q3HKgs5v3cc2TvsyzXT4+/8tk0X0YK734/M/lGnxMvIX14uD1MPb/ + uzH8/mAwGAzuhWz9t4plgLf0rvmOZzqFrte68baKnZ5gV9f3LDPLT+M/q72RAV2XvgVcOftQgfjX7n7N + W7Cja0//CPtX+WnsR2MVfsYp4wgdxC08ng53prwu/Y8zccx9lQ/jnn8ndqp18HckVrGSrG4ak9F24fIo + snKyusL/uK41ju8yqb2IUztXuIvK/2uMX89L0c+U8604Qi8H3cGdaPnoRc/VoB+XJ4s56nc/f0s70ng6 + 8ngb8LoFPJbsfEC2D9tjs8TPva4Vh6f5VvrgeeLGFQe7Y3/3/0Dblo5THnfNOEIHHJXyca7D7v9d+6MX + PY/pMgf0bI9C02U2Vn1l9ve5iJ6tq/JS/Si32OnDy+HeCVb+32XK9lpUHKHrhDTd+x/vYX9koq1lMgfe + kv0rbvFZ9s/mf/hC9Ze6jwKfVHGErlP8f9f/A7v+Dt+U6Tybw+/4f61bJs89/H9m/45bfIb/9w/193Ow + eu5Q5ykZR+jl6NnBqn17WteFzjOrs5luN8Vq/hdw+1fzv853ZuV09u+4Rb93z/nfW8e91zuD94Wx/2Bs + PxgMBoPBYDAYDAaDwWAwGAwGg8Fg8PfhEXvR2fv0kcF+E/+s9r2zx9LfaRFgb0z2eYQ+dW+pw99pXHGJ + 7EvzfH3/CO8A0g/7N57JU3Z1Oc1H9+3xqeyvv2PCviP22ek+tyzPam/wrfJ3e/XVhvoeEIfWG92yh0z7 + BPk9q21X6OryyDJ1X6T2jaz/ONivluXpn2pvnj+72huya3/ey0T6+N/fsaH2f228hv39dwfUPvTDDuwj + rqB9qdvLFtf1t0U6rOxP26FPOzz/rP9znfx5l5vuodR9mwHam75riX1++ozusdV8tU2Shu8nOBlDVBf+ + rqGsbyuoW1ee+oLM9oy9+IZVmeSp7+9RmfX9cif2973uXOd/rSfnknScVFm4z3f0isx6LkTzpT2o3Fd8 + 08l+cT1fob4Aeaq+Tbvc8efZ2QHNx/eWr+THj2v+AXSn72JTPTLm+3yl0rHPebRO2l99T6/uZdf5lOaR + vduP9uD98HRM4JxTNp9xYEP/7cxqHGb9tDOWI8vp3LCzP3rVMQv/6e1I7a/+Xfeak+eJ/fVcIu1Xy8ze + XeXzrMr+/E87vjInQL7s40B+dEcbzvw6uqv8qud75d11gcr+6jcBbTGLFeiZUV3fUFedH1bnGzL7U66O + 5Xpdz6V6n9JzH539kcnb1zPQxV125xaR7qrc3Xh30p703Tralz7aeYrBYPCh8Q+IJGqi63e9FgAABHlt + a0JU+s7K/gB/ojYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAHic7ZqJbeswEAVdSBpJISkkjaSQFJJGUog/NvhjPGxI2bFk+JoHDHSQ + 4rHLQyK13yullFJKKaWUUkr91/f39/7r62tKhd+Dsh6XTPsS6V9TVZ/dbjfl8/Nz//r6+nN+y3WnHlXW + LVW+f3l5Odhj6/SvrfT/+/v7L0p1rHo/o/9p+8/g/5k+Pj5+2gBzAW2jriuMdsF1hdWR+BXOvVmadcw4 + s7T6s3VOGdI/pFdQPsoxSnOkildpVv/n/JH9X3VL8EUf/4nPuIgvcpzM+aPCiF/immdLlVdd17Gemc1F + WR7yY2zK8yxbpp9UnFkbSLtUvs/g/w62m/n/7e3t8I6IfXim98dMI31BmyC80uKc9kf8nlYdyze8l5Fe + 930+k2nSnrqyLecc+Oj+n2nm/+w7fZ5MSviw7FjtJsdUylD3M/1U3iOv9N+oHWf/rvBKHx/W+WwOIB5l + 5P0n7z2K1vg/hc2Yb+nn+W6A7bFh9uvsm/S9fDcYjRX5Ppr9P8eQ9FWWJcs7q+8Sj6Kt/I8v8W32tZ5O + fy/o40mOtdn3ZvNR1oP8envI8TzTZMzpNulkmW75O+iv2sr/pbJRvgOWbft7e/c17ST9wPsEadGmeOYU + /2c8xiTyIs1eviU96vyvlFJKKaWeU5fa581072Uv+daU6yCXsGF9G82+a/r31F+19nm1P6w51JrJbM16 + jdL/fW0jv/NH3/xLayGsm/TzayjLOepH/OMxu7+U3uh6ltcsrVG/Ju5szWlW5r+K/bLc+yNf1jzynPbC + M7nOnm0k9145Zw2XezkmsHezJrzbOsuZ64l1j/Vm1pr6ulKF9zrWvUwrbVfH9BmQV16jHqfEeiX3SZe9 + 7qUyn6Pul2xvo/7PWhu2Zj++azT2V7zcxy3oI6zzrQk/Vi/sl2Ne/7ch9yEQexl1zLXKtFWm2fMa2bf/ + E0Gc0f2R/0dlPkd9/j/F/xl/9v6QduKcvRmO+DP/yVgTfmq9+pyXewL4elSn9EG3T17P8sqw0T4T97M/ + c515j8p8rrbwf99HKZ9QpjwvMdYxfjKW0Z7Xhp9SL8IYN/iPABvTvhBzbfd/H3Nyj/KY//l/IvMo9fvd + /7Myn6tj/s+5HTv0fpJ1LfXxKX2Dv4jLPLZV+DG7Zxi25P0652HGcOJi57Q1e534M/coj5WDf2vxIW0n + bcqe2cj/ozKf8y7IflvWKX1H3866Yo/RWEXcTK/n1/3Z+8GacMKW6pVh1IO5pPs35/LRNxjP9+dGefUw + 2kDfi0wbEz/znpW597VLaGm9QD2+9L9SSimllFJKKaWUUkpdTTsRERERERERERERERERERERERERERER + ERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERERER + kTvkH4eXjmrZO46cAAABU21rQlT6zsr+AH+lhQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAeJzt1uFpg2AUhlEHcREHcRAXcRAHcREH + sbyBC7emIf+KCeeBQ5tP++tNbM5TkiRJkiRJkiRJkiRJkiRJkiRJH9FxHOe+70/nOcu1d/e/uk/3b13X + cxzHc5qmx8/sGP0s99S9dRbLsjxexzAMf76HdO+yY5V9s2F2rc37PbV/1Te//o3uX7bre1Y565/lep19 + +8bZv7pe0/3Lc77vX//X53l+2j/X7P99Zdt67tfv27b9+sz357/9v6/6Htf3q/dArtV3+5xF1Z8d12uS + JEmSJEmSJEn69wYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPhAPwr5rLhS + 2ipmAAAAv21rQlT6zsr+AH++6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAeJzt0sEJADAIA0D3X9q2L93Aghe4fyCJrATrZNxkZboP + M/v7wE59fx/Y5+3fTfcBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAA4A8HGDVFOD2SbdgAAAC8bWtCVPrOyv4Af8HTAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4nO3SQQoAIBAC + QP//6Q2iSy8waIS5C5q5E74ySbaTdh9K+58PtPvQ27/dBQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4wwIV/0E8QbmIKQAAKhdta0JU+s7K/gB/ + 1PAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAHic7X0ruOwo1vaSSCwSicQikUgkFhmJxCIjkVgkEhmJjYyMjI0smX9R+5zunp7p+dT/ + 1Ihac+k+VXvXCbAu77suVObnfTaeANqzkS3G10Zgh6PDAnBdxQVrAN+FfsPzYh3ggQoQAbYKG9CeJMF3 + 3ZPZsYTB8c18c/zxQ28AlZvdQSvVcTO2vmxPFRTgeJ1A4SjpMPBhua8rP/cJEqDcVCykX40DrzeBuHNc + ndvez5heQmwxKfxDEfOV0g8PK9Rr2yjuRnlOIjj1lmRQQ8xfORbI0j5PBjAmbKs0uI9JbSv+7utukHfu + 20cXj3LFsPiNmeABPFGqg3EJD9EUCSuvl7KFSJN9DPqhrsFlobcdf3GPua5+foJbKS6jNWODiTYs1vq4 + xcDBgm0Onh0EdU+g+O+oOXBc+NP9PC8bDy8/vPy3uE7EOhKek03CmwVwKbYVIBX2xJwtHNUeMnDAJw+H + dUtxYAK+tM1ft+Da5sAf1S+4mfs2/DQdPH4AhQu0Hjc3U+obgcfhTt3VQlHX4dbt8+unqJR1TeD3e4+O + +zXIJS5Cpk7JigsYazoYCWubTsC8bYE52A/85wIqp3WBVcV8MqiG2SU70e8RgZurHbhdRuFh15Ipzwuq + UkUlSFdjME1nA8Y+u/gpL3RpaJNmmPXVCdG4WIY+ysocqBLLRcvF8uMpFZbUPA8s6Tb2czTF4cB/1jWb + euBi8D+kokof8OD2XBs8GU8cTSVPIyg35DbgOqcWPQmdqur904sHWUGj98KDSA22qwiQTKBzNpvOA02D + WOrI+UJjWJ0mx5hKvRN0BGW7Lsr2EvyozwkzLhhqZSiUzz/UPD+dLTHpJHCdTwE9AP1/eBQaEowL/9r9 + CR9dPEp0wqG3VmebmmB8SSw85LiVfeBG8w5Ral3QbyVbUGHR/QGINv0YWBJZv8084ReqPxCoWW9oAIBG + nhf8MDY34YGtHzZKRvGXR1vwhQV3dimazzc/LBzkQHeOCo0Gbk3gx6bdE23MBcprPj/16MlM2mrvD7MV + PYDdD9old4NaiGl6RlR4BoEQ9IQkEYGva1D2OJtFt5Bt8vgJakFPmfHU1/regKueHD5+/pKG5dzg2IaR + ugbpQjn6teIJhgvWpAI4Va2rSxwOQ8N2tGpi6w9MC+jl50O8Au+Aea8FoQvnHo07pG0XagtQLtQFIJf4 + 4+9Ea/EVwup3/qFV/0XCwoAz9NyowZSRlZI4eOtVwIVKyvy5cxKPoxKJnlyEswgO6Mmfjis7Bn0HBHOt + GEYQ4x1RKB5LSa3u96ZY3ZuExqgKuTELy/r+K0uP+qjoZFiMH107SsSjju9jCIh4JJ2nRNHXt94PEJ6i + E1hgadceIOyo69EQQGzMj/tybrBtJIGoxl7XOc6E73pCR8+eoFE9FcZuZhDka4RE6vasZTsKPKj9+BZh + 0/w+LLXiop6basbva4cwQp9bcCj14iS/HQC6h8egkdv2zHD9NAxuyxnLcWCUWMaT+Qn6ds+19ugY2S54 + 9UhujPuNb3KfSr6AzzWs8cHg/0jgHHWpifHq64eXjwtm4KcWDO3X12HsGJWGiVtaFxk6PjzHTUBKoznz + Av0CrOIk03FdFQGhAH09SIUWDGsE0P4zxsoYuuOv+emyunS/UZM9f4IBLAk3xscGtd+7/ezq53MNxD6Q + 46Iz+Lbv3tw2W6bRZ5WolwxSTI3Yjaqo+RGtPxe3KAyNJnfdLjdDI35CewiCXa/TCtfil1XUVwKyDDeZ + 0jF/amt+gmWUY0e7v3IWy8f5H9DjRNguGxI99MtLtNzu6wjFQN1X3cexTRID+zDlgJAD4/vt6OS8MM5c + BtryeH+Q8652z3HfTlqiCz4jBMYNg4SM4EJFlwmZpSmVgromedhBfXTlP0L76gtZ7G0owldJcOGBybHy + gPELuHy9Mpcr6P3gXDK39iDt3imQbNw4t9Z0bBgFHMFAWi5CvYCj7xgElWXxhYuNg1JT3/SBxoNtPmSY + SYHp/mz+9PInTg1hhmTEokczuSWNhrwjqyk/6LzPJAUBcx8c3wkDXzU9E7LtWRzHQlIjLWsicUdQLdBl + Ev4i52atwQjC4SXWqS3PkzMeN+rQ5MzIONRNOZkZgc+KGYosG6zo5F8qbjtIgsH6xkUWQsaxhh3WY2y/ + fvjO7rHnDcudW4OOL3Nhn2e4SRUXRQgy5Sx6A9Ix2hd0gRs6kmtMxtPnzsEGoc3tHMiZCA/lo4tHKeYc + 1HsSN8pv8MvFbmSo+KTot/DhlXtAcvVQmD4QxmvCd4xr172+oQsjuA9rWBdmeZES1kXH95rIQanNQsI5 + wnVNELDb3jRQPblfBNNskpDGZ1ePrtiH3U6VFNUjll9umYdH76RwA3ALLFqFHhL/VXWbNsiT98NWppvT + sLjlMEVLkTcqfLf9GF2ve538NzVGXOnUtrv6elHYFaB6IeGCxwcJdRVIgD7u//OmdXCastr29VTZo7tv + M1ApiPi0W+Be1Tbj1trz42AgLZpkJhLhKj22JcTAymZZkjy/XpKD2LdgXzadqN/IfGgduMzrBTPYoT6A + hDIgGVC6EPpx/9c3BxXPjrML/dUO/CxOc75qu0aZPUK1ivxgC6jtgbOVQ6fy9gRpjlWSKQFS6ZCPQEzF + 3wbSroSL/4kdArfHp21iPDITRkiTUnGwshzDuUa9HuXj+PdYHLppjeSOsvVPbaxHQf3dELf00n06tioa + vssTdQzEZgXYOh1AyqtSSJkuA/LZ74qwNsLxvLHDNo5qkOUBp2PmR09wTy0NEPqtNh1IF9L9+tzKf0ud + yUrm21XAzuwWOrpKx4O+nYr9yXY8Z3qO44zoBPEg8f8IMUYqcW2ZLTuTDUnyjRQANw0/A94e4k/sKFly + DdlkZccKz8lGBsoXDeWZCdL60aX/lnLF2EiWEB/LwWHsx8fboeilPhjGEAAsoZW4rzP/ixtE7FoIi7lF + 8crGrgHScXHw7Ng3cBuBP7iDyIzeS6wGkPfFJQ7IpySBOw/ivD8e/VGschiNNrNwUAM3YLxhmYa46V49 + hAeE/clS57ZfF4b1mbMpbaOExz7ARDMjHsKjDLxfJw3nSf7CHcmtdQ/Ni0PByi1SjW4QZeOvhLOyz/Mf + c3OVwO5Mz8w8yK0vE7XgG1IpfEx0XzG76fLBPHX1fUUKRMh6bMLxJBRI0xEOK+9OCB1fFTLsv3MHYwHb + ry3yckiRVi6gGbOliPQa/87U1o8ngJHvjJmFKH0L4G8Jsu06Xeisp9s2p0ZobHexhrxAjNJ6xns2ulBf + mT8MAbYNResb0t0Y0GizovbfuaODw3ai5kurDC/7QukiTdL+smg7wNfx8foX5wTQsaFvv+spZ1ICbSDD + JKw1vywglEWDePwoP6o6E7ZnwFXrtYUXRrw0npnqwCAJ6OAWCPO137nDRTSMgQYhlrNxPxBs5JgHkPVB + rvUOiJ8WWXa07nM6bVIeqihHB/+wWt952kdxhCt3MBEpTnr79ufhdYhZ9C3FJpWnj+jAIqJZEAk9J0mG + /c4dgzjwt+gYe7uZbYgbTC9+hLmPGYPCIf6Px/v/LuNC767g2NHMQT2onvjnvLFZmcsMfHoE9PA6Zokb + I8Ksf29ouTJYaoH4x7xJfDHW2GkzE0EofPmndhBmMcUDE6XWDU5LgIiaTMDNqxraLp/r0+s/0nLZXcNx + QlOgXiNvFvL+LmyAJQR6AuLigYsNr8T3WdLjfmmI5JSDUK4AiHEQHut1JjcohAUc+VU7QgKhkmwgekbr + eNeOBrOBootNm/fL8gssfFBmDFb11qD2a4KRJ5tOuvRizJQvoSRFTpW5qgpIA0HXad77UQs9gnUtHy9U + 5lFBRDmTo6jSZ9XsV+3w4CVZWu+uXICf2mHUpaTjNZBPrWpyqA/L0fGp+HUiOePWQth6cIPMrNZ2bKWt + bD0LgxCPHhXJuFns6Md5nxXcvjV0A/2FptIRC9dtRYOBep4r/Kod700bsb6LPqhMv2vHPYtycgw0jQP5 + 7Oqn/BQvZ/0PmkXAchL+wH5QhhimbkLfW6CuXGdbFXuhq4eSZxqj41nbA3ZSn1cnG4aHCntGZbBtMe/e + AYx7CwLdd74HA0z/1TuQHTeoJiSR5/54+mPa+MPQMJ8LgY6ebt32ifPtJhH62nXFQDVzQ+gUQ9WxbZzx + HzhIGIPjZWbx77nGdAySzjxQSlr/9I6wQIOP75D5yNz/6B2huxY0nUt8ro8jYA4XfRdhn2sRUk7i/6An + l35JVSHCa/JXAYCBTIybWtf1RJgETkuVwaUF98yhVeMGDKOcz8T3/d07tJpnzBLvTH5hKF3lr94hQmp2 + 6CjRZvLH9R+jv7n0XLfzQuUFfZJBdUj3UqGkoBEGzgIA1Wfr95juGk0f7guoPDeHDE+LtzrI7cpb9202 + de129o7dxzszjua1Pcj87ncd6ad3jG4e6Puv//j6j5cEpKQzcEv+zk2ipLalg6ire/MuAHQLriKhA/Nu + dJoaPxPg641kafGwYsxDNrPzPbDKRQmzGaAerR7VDoUsgKUb0a5PyAqynPUwuWj+dofLRxePkjsePbrv + 9U1WJaUT9vebyqqIcvynAMDkwjSdSBgNHThy5NnUBkvsjYDJeLrtQRz0OsoyDdoRZcAuqawB192fME48 + Z53r5IP4mSeIpsruzTaj6YclwcNHzDHW1rdtfe6hXmqubu3SvdNT/TAMQ3oBi8ftTFiGM/2cyFWD9oRN + O14F4v5eFX5YY7C9joABYQEa6HYDR0gFdSLh5w0xivNrTtdL/VSCPyyI2edygz3u3I6GWH02Q0IQVzbb + uwCQRt8XqFzuM5ZtezQhXTn/4but19xKNG7pFNgTNUrTc4R3gtxeDKpEn/doqA+CjfSMevaCu7aj3/04 + /5XgHFDrlF2Xep0X8PO6MbYbeKXifhcA/LVKOCNjviWBz74TrrdjRntk85cb3d8DHbq9bx33iEB3xTCJ + UXNQr+O5EppfFcyBziA/CDN5QjLEkHt8vv8FNbOnuId9yz54e3EoYb+y29GCYaE/BYCO0P5RkyXyp8xs + waz2NPSCpM+CeG1XSdeGgEftr6ZD6BrS9OwxEuoSkgjbEmvXUdb9jDNpSmgb3CzH/4D64/qJGku6mlKI + 98XE8KIVxMLI9shPAWD6yOeFyrK7ho88IfONWxCeuE532fS2YcTc+LaiWoCOwHiJXFJ0dpoB0l5aSu3d + YVwoAcoeyFqZUEWWj+v/7iAxipreowWhaI7g953seQYw91MAkEwhyHkOzVEDUA/MnhDtI1JA07EmNK9h + nzkQAicyyQGexIvgtkkVrEXHOFjJ+Ely1cQKNKgTlip5nv1iH89/i8u80xovI4kNeLDd0dw7xjJSfhcA + qosB9eIZ1uFPN8/tomjvk9WYVY7zXginawT0DbuapeOnKOS+oCyliJ8yGIf81ynPQwf3OijZkDuXHFEz + Pr3+NOEp+iWI+dRiNu4XQjgB/VygFB+zAHC19ZrJ7KtlPOq67VPpuRCQgtjs2ivTanPwxHCMhLgI3yU8 + Jhl0ezM/jKMIrHxOBilwNxFimdQCf+7j6T/UYaRp5EQTtVdsCH+SFgGhvfCIWJefAsBa2j47dfidKaRr + bwMpI1fhyM1Tmm6uY1K9ePSUe1vAc1h2MaSsOTWJEV+sGqwwS+kY9cEYihG21Zk32j6eAFRwoTWHi7jZ + tKRsGjOlU/wi2J3qTO69iFiQ6oXnnatb4TVt9qH4Dgy6v1EAPSJ1ffaRxnDPmCp4jWL21Ym67uOX4yNp + TSuz+UC7WiGQCf63z65+auDSWZTdrBUYkaG00iQePzWKlaBtBnTqdYhdIIcljkCO992FOg40aDjbg7iY + obt0dewXM8A7+grOkU+kMUEvcou/BL6ZBQobxhHPUio1wMf7/8vsadwmaiMEWR4yOrokWggoYa1k5kDf + Pid6Cp4UBoTXTBCsr7Os2wIX64e2qb02WpDRwDh8YBvGNt0iAuWMWAEx31+AD3oFJxAN7kYtqfe70Y/7 + P7D6WF4C8gtBOj8xCKIHO9jMaC9LGJ5WQif1Bwz8dk9uEh8ZzwRGU/KCvMkM9QbGpOqw78zeUXs9a2g3 + mcAXTeWvwHdYUflw/Fx2782Tzk8v/7Yuxfba8bkK9I1OM7fNSEtS8MlsikuWIptxHQ/ylB6JXlfcBLNo + gbwxd3T5HuOgC2hABwKnrNEz8GUSHzb+TnyWkhe2wamLSTt57o/zPx8DOHRbBoNb6SGRC/qltSQsH86u + TK23ZZYijwV6puUlSd6GQepr3MwXEVLkbCEzdfo44NqBeRPf6z8TX55Xxem9KYNBYkPS9en1T/khcnq/ + hGGipDVTsc1u1pejs4gRI8IUPP00M3mP3DYiqhWg0lL96tH034NDgYJRBOW/Jj64W4+8IwpCAEjNx73f + e3ahZeAF12tPw9dUyWxxKI9VSAPwzbVojw8Mu92UOBC6LEB0sLX2yMPVgkzbe3AItBmV/B+JL9gqy0wi + jRRkX3kMH+9/n2ssNO4LR8yW/dFiRD4swc8ub2sSIv1EO4Z8N5ZbLhUctUTWQ+0XQZyfEeQjiWnH5uls + //yvic+foUnWrNAW8gji894fRL9xvV0r3hhlRQmV8pZfqy0toJmDpgvasGOpHJuz6OeAXvi/pUz0Ephx + sTF+EesQQ5DfQ5P/lPieQ5M5oY4IZ06NEeTz/f/7GpP1SMgEOEIWa2jq56tKwY4jWqQtYPpWgW+nmU3L + YSA5chgRFyQAE+7VuhQDWi28aPNraPIfCh8/Q5Mktwn7XpbxdMSP9785ZCiROBZQ3YVd2raao9d3WxKi + AXdsGOnPO7WMZJXUbpfXhvRvzkur6I1k+QxIGqbehChE+q+Fr5+hSW78ScwgTe/j/F8oAPmBvA4Z8Bqc + khju8DUpNhJIL/b1zFnNMYe4ILFRUuaMax8sbsvW+1hIva0GyonwDpGDyss/FD7/GJpkZpMEAecmNrN/ + /Py9XkV/FUqWbYsSFKrpdN7Ie6VDl7WbvcxDrAJjYL3u2TDKhXYeNR3Dwng85IPzXDlZArfd/2Ph+9fQ + 5H0x2jA2Ite0IdaP85/rOepkbDonlgz7MUgiwTxITrYCJl0LxDXP9o82tjnHIRZJ7TE7IpDJHvjuWXhB + z9dLLZd59X9tfGh/H5oMZBwNoiJd8M/X/9vruQhVuS5ha6tnYmJ3MjSsjab9mIPAai25IFEOqszCAE9k + li3WBNbBOk6KFAlkR6eXy6VN2f6l8eX496FJCVb4Rz2zV/h/IQFyNumbd9FIM/OxGLsW+9JwIvEd19uL + FwwBuaGCoyNnNip4pTkf8K6E72t7SJCuPFeQqPYI7dxCFlHfjU/nvw9NVgQR+YV7S2j1n148zEZ/FYlX + DR085LVMwIbH/Tp3JHywb1mAnC1RXTwTyqvN2iHhIeWeufvwRs8ecUAQfTNmoVL4JR27mI1vFcS/D02O + o9AGcq9E9fLx/g8ry0587FnNWfyZjjb9ahuXcgMx0TEVazT4+mknWMkZ/GaDXDrcZa7evPcg3H65UDma + 5dIx7d+Nj7MK9h+GJjeOOFGhYXBl9cfx74bo9og1IDlvc6ZN2nmXCfVLBC3R23WKpHUWOebcB0JkeDdI + h1aZvtbYJqZfD6ivnSFD8qNsARhnTA4g/zA0ibF/t3lT9wKlfXz+cdmz3mvQ8OwB2frMYq5zOgFmuicv + 0PyCwA4d47yzQCH+XSW5g9x6I9c9xEqkc8dgM5d/VyBlejyNUElH8g9Dk4Ku+zCoQOg07cf7vwsD1d4e + +zW4AjVntZV4/2OO7VS/R/Tc+1UZ9COvUtQbQ0PGP3RkeMcc9Ib4TGCMxoE4p/Xr6WRnc1TiPw9NNn0s + DAJfnZqTIB+WXIJr2awE3viebHTOhGyvc6CLOm0iMtfjNbdiAWVcXQhc8gzLm9zke3hh30xvuYtR039s + UHdLN43s6T8PTe6liQBeYSzVH1/+bGIo1MAxhz/xv+uDBu3zDs8zkx2E3YxeN6Lb9jrwEIXL3oPDw166 + dXOsz5pxQrk4KsGN6GiAR3iMH7BZ/g9Dk201AoNNfu17Ux9nwDlu6JFSWJYdQ31b+auLF59oB0/OdEOb + lzEjVzPoByqa+zo7vSZfGIdHFNvbgrQmnEh8id3Q4MHoNYJMkYn/PDTJg+/yXGIFpvvH+7+GEZdEP11m + TXtWNiqCU+Q8h5vZ22WZjTAsoCGr2A1BtMvYvrzn9oXkofaMS7gIn22knG2dwcbfjcNyi529T/dvQ5Ot + pJr8vDKJCggf93/W4SODw3AnJLRGkMu/QCHSezCeF1aEEaZZV6nYwm9lrSypiieqi0gnur/3YOdy/THO + 4troFYMjms2/D01SU5Ya3RATWbqP33+SWkId0GjEfJZ4srdI80ANNttZemlXH2yEd1ETwQwRHOF9gnlx + Dxdz4K3ssyFgq7Mffnkjoi1PGN0L1ZGq9rehSaJYlfeQbdbLERR/vP4H8ajMec/xgdH1n3zv/Cowb0Ci + gRtd25OJXihgUA8RynHtq8KDdratZWa3AenPdu4nmk9BPUKA+x6Mg92CcOTvQ5NKIwq8qBAM1p6ej6f/ + cZXmNbENUtHD7he6gOuBd1Ym7YUpDNSpg9luQHBv743nsl3dzHszrHa2Ogv6DhjH+rWG3sNZkejNZiph + V+/SX4cmJwpKazBupYmir0S4eOiP+38LlFwvSJPczMlEDOF1A85xD1qWXNqMRyvllbVYC3/sWqVUPnon + ETf5UYeBcRGbhLmOvrnJjO0CI0viUi7yL0OTuwdW1txnx1HXyKyo5enj8x9cC+IQ7GC4tz9k3NsXMXmz + lOV1Tds2xrU4WlhdOMP4XnCFqndR6xZFvucNJgjvjIetMRZmchNSmgPBS2n78efQJBBHpBbOE9Pw1N2c + nY/bxwHQlRgejK/waDMngcCuwviUt5MGx3u8HBQBsZoeHjs71n5GoPZL7jM30GuaFJbMdTwIcPa1ZMqO + 5eiIK0OofxmapAiZDI1S4Q+R9016ucaP5783GyluANKACKnmBPbUIGxFAw5HHRt5zWy9hzoSzJH/SY3e + 7ZJvH7FC7DxBXI6Mmlw2j2Tw6P1GpuBxH+DPocmFUYlb4rUxPGuo7t1Owz7e/5dTJXzrgs7Qle9zAVR1 + xmxlwfWSYppBfUG46+btFp7NtP4x4/0bMMBBex/JS/mTypgbFNO6vHRq0Qfyx9BkFkxJPXKeCREPolBS + Z/P7x/NfTGK4UrOj6Q3FnusQbD+r4pCUnikhsNZbq4lGwuYIb9bnC3dpJgJrXpRDVih0QHD8VzLT97IO + 83to0niBSJdHUm6yBM2JjGURBENi+ngF1ImwgarpNkfBs6n3HZGsjVGF1mQyN1zM2KtknFORG8k9XLtG + AqdmKrww6ZEdA9ujANwOT1ADkPrHNShyhFrfmRN4UZEQWhY+CKV+R6BBZR5OLfXj+f9qWfTcN5fSvm47 + +m4/07kiULeveNJ9Foe3lRoWEB0v4E7k9hgA3lc63YomtJfXvobZOngiDOqtpdGDEDuGxFLnFO2OlLkX + DIGuY+SbhdGZ9bHx3BX9/P0XRWxtR8KnYT2PCxdoCPIWwqhCR1/mdYWz11luWuyrrUZZcyD0Vem1IhV6 + TRsmyzrL3UduuAHPde0u9URYiRqDyTVYbhQcmsGh9gKbO959ttSrJVhPP71+Mib53dgc7rgHRnJqaqIR + GKIdhTiImwt5QcrG5BcqsVcQCRGhsxOJgKnSEEmQ0hGY9wSTOS+5p3WCYin1gVqzbBg66wxz4bwOuSA4 + sgg1wMBK9Zo+fv9ptIGcgZDQ85hJPJBrne0OwrYNiNmk416iU9d4mluL6Aey1nMOgK1HRBe44RbA4yiG + ACuJlyJFo7mzSG7WhkFfm+FcRrALWvm92Rkl0swbi5LE0j/e/zRgtQSsrHed1x5fe9k3oRwcErkQIvTd + MKtZ7QbxrkCTZn2YpbbJ/+fFUEVqr23I2nY671HIHh2IvwTv0t5yTr6vW3fM9J164Cr2sYo1HAiLYz+i + ah+f/+UYlKyUZp03tbWXP0tf0RpQndEnLCBzWihvVA18kerDk1wtJerolJL7aISS7HmDwfjF88pcCWNL + LxcJy6dZR9S72pD+ho0S0XomYyIMKscoLN/Rf9z/t3ntRZ9xKJp5B5hb9byyHHFg5WGgN1jEvN3gfhD/ + wf6kvlKupdAv5sl7aJJohfHMIqZn+MMaET13CJiO992g+9WXiIqEP/rT6f/MtpF1Ek4daHvcZxcP8/o/ + dHGqnoht7SzlonWiW/dZwvPab3T/BqEr9IAUIatoZtrnLjJd7N25P4cmlZx3QeFSiLS+RsPEvuu2vhFV + Za2Cqwcl/Z1kz8tsAhuzafiBi9r+cf6XTXMm5zaZWJt3Fi0mzh4WWe2+hTMopa2ZRzmRrHtj14HM1qzH + vw9N5t07o6Kt6Rx23vD6gG6BIpfOCAHtYrUduSkEvTyD177N3PGHZV/wMbYVHfyccOjo9+d996sxMfTd + RiOR31lYg4FwFaRxFBpdl9xzjn8fmixbwiUqJhyhBrFAgx1EvGbzw9K5QYfZmWZzlAy9yyyog94+v/4z + Wc8c1JUXCDvnOiNoRUys151bAVJPZIvKEV5H6ZpBjcupZt9+WSH9y9DkReXqGPEIbhe3DvT8MK9+xeAv + q0EO3fKBCpZL5W33ggGxED5e/91XWaJxhiK1ARITpeI8GAjRhkaKss7rKmMHub06Gnjbd4R8pM2ed62X + Jf1laFJnsOXY+gHm3OZkvznntPzMlarLw3aeM8B2DURnmY1o5z4+P//yM+mJaJ9ZRGuQZ0PjKAPKuRDC + g6rUlY3011PJAbeGrNScfOgNETJRwfw5NKko8b0/T0cUlVEzNIUNZutjY7O2UG9wA1SAWWGDllcooz4f + x/9ArXTjWDSIYPBMR6bZnnCVCIvJhONh7+OaxbBsHlykWzmCY/syNvPiVQ5/DE02Ziy6ivK8ywAnmxek + EYUGnkPQ1vE0+Gk8RPduBLLvoSP4ePyX0LMNSHo1574PW6oKsl+pz8G36Bu0UXScwW2Jdk7LQ1/M8WCg + h3jo0fzifg1NYggNcwAW1xRQRXi7hsfYhzviwPdjV8EXjCpuXAKY1j+Z/4/Xv3aDOk8I9bEzQGa+H4PC + 0lLPJsZl2/L18x0V78dtBZZbbdmcQweEh+o1Zhco/AxN1uTW2U5pA7+OWVjQeNCoE6Xm1T2nNAp5xEgY + T5E85J4wfJqP538cEzP0pcwQCMxb//ZCCTp/ZDGRIlrZTyQrS3j3acySPe9zmOVKuP6A1GemiMgMBX7f + aVtSeieGGLyaB8ZHFZ4jr3aRl33aPqU/V35wH69zz6A/nv9rs95B99dLw3LFtcTFzmtAlknwfD5eePBz + uD/9XNXwYCxEG+jk9cySAamMsI77Na8H6Z1XAxeP2/zJXqMT6PjndwuARNMZtU0HiOEW+FhmXzg8JXwe + ABM4X+yZiXASUPMxhoXj7oRX/sBsbd+DmJOKZj80nv28uzq98syBD5Nfo9SUdiD7jx37TeA7a546cM3W + f7IfDuIcjV/W+eFzatiOcXddJEaHo30c/6IVu3mrDdfX+yxiGCfV6LBOh87+PdRvufbW9NQwLAr1qMf/ + urvifpbGTYseg8T7ClmVUrSJpTTiNishj5R9QH51h2qwY3SdQ9T64PVQLsVZKP14/9eOj6C913q1PzcS + MMZXWEbco75vGwOMG723r4szeg6LgYqAMAh/sBauEMFjOKhSo+pHsaJnH5sw4PYTDAKmVJdV6xr48oS9 + uwSLnXetIi80s97Wj4/3v77uQ75RYFsFe0+zkwS6Y8hur12VA7YrlXvbe63nvN7VzgtOESGBM5WBPK7e + x1btgux5eOksIUMK5plisi6g6ghsZtbX5cH4Jw6E0sFcINefzs/t4+tndSwQzry3uJp3LS8W9N8z26X5 + uvHtTrDt4lgom2MNg47T4m/1TRFE8JFzyhmiYbcj/CMwe2MNwcjA8CW1dURXQ0IBE6VagEHpzVo2uyzY + j+f7eP0LKFolh7G12Od3gNHA4YpIYgZoVGIy+f48JPfGKmPAvOYIbmv3s5Rf99eQlfCr0Pe/I3tEK0IQ + PJkh4sf8Uy+8Z/8Dw49g+DmUrS5eB12fj8OfmcZD7cwrPpnsM++DK5UF/TXG612kBnGdh4TEcKZqJwpy + rzm1vEZEyKwpfjoM4+gTup+XOUdt3OyTeDKSpfktP3MGlnJhRyJ5dlWzgXBhO1IPDwKr5+P498SDnBcg + zEGfXCYX+rmTCv8/jSPEB+xuCdvtMNplZY29tJNkfm+SceW2ra8hACHHslBeSCk+vm+168iRLq7EvAiR + 1LY9SHm7GTe0U7QtTQK9CuE/3v/0OHmjY7bOEZnfp3EThHzcIwjeNSL5MtCRC4dstW0jl/1VidHKDrvs + /WX8zqTOVobOyGIXTZAUg6TNmAX3akHMYzcGvlofCuRdPgs0vWdi9grEFf3x9XMJMldScxVLZwPtNt4I + 5ucNJ3M4cR8bevFUVFuUUptbd8QAzSlJi5c5+DV4pY7cV2r92g0jlCFuTit6UJLE2pQT4gnBSxBn4rLB + 3lRFjCwHwgHB+cfrP7Ole+leUn+oRN2lPbQEUqV1XnrDrmOvkqezzAelJkQOvASJJ2k3NPhTFctKvRzf + lI/tJkil5lWpG0fguxxbEfuC4WNyCMPNpoGKPPqSi6Ee179+Hv6JNH3ahRie7WiisM47r/zybHBBWvC0 + JZJY1FoWO3SuUT+EE7H39x0OnvN5me9rMSvGs3U2wh1bq6nM1uiGDOFE9ZljNL/GnNrz0N0qZISVQiMh + fd7/ZT7Hc2FtaKG5/+pHM2Ne5x7mlzh1OfO8tZUb4riI34LPVel5h4dCO2YLIlmQaT3WRKcLPcriHILB + NJHtiiahjpLe13y+Q/2T0jO7xPeaZ13Yfvz+m1dnagZoU0lYVQ6TkSIxQTVGHn9yNAbXEnv84dzrQeSX + 6Wxqn3e4VPDO4ZbddDY8He8vTsGgII1c+6T186tSpXTH+w6YYXwMxmmozM0+iVQumldvPj7/eIyVz6+8 + WbzmyHvnt7cAbSwHSrJ7Z2d9yXZ+KepdDxfR5nMhP3f46PdYm4mB5uiYHkeXRrClbCE3joZVnNZ8Q27h + Fmbvs4U6LkBtcSWuweiHlLF/3P/TUgYXdT8HLpaPOq/oYULrvNa6zMwPRSNHHINnJ3lYq0Tl/3WHU1e6 + 5JnHikQpjJgyMdfRtRmJVrWIYWdXrOBQjrOycY2956vPyJLPCwPNFnOUHz9/wraVQOVnIimq7arnqXNc + 1lTy4vR73gHqq2YzZ/eJbwLR/s8dXhB3Ol7rvCIAld17uRiqZCOzFRghz4Z04H2pLG7GeVdGS3YIj8KE + WJQSNJaDfDz7jUIrBKDorsI4iGk9jy07tAizWAk1HGw9L3hs6vOOd5WW5fcdbrNd7CAKGeArU9vTvCx7 + 1Z4Ary/QlOJWAKH7uys8PA3YzAikrsBvIB6f4t7n6NSHZU5w+V5P//4WvNn5jk92C3FStiCjE3dIAUYz + +92B3z1v/Y87/GB+a5JSzwN3Q9/P7bKUdcKm4xlroWpFmBN8+4lxz6mO1BQEgktWLM8L4M8qP97//nhr + 4dx9UZB4wVW56RMGnC9N2/zeA8TC4YE9nQuk1bBw/b7K5j3nipAIHs5eePpCFsuP9xfe2kt4q6fTQPBb + kPLOSZm+1FlCXRZUqqbinpAHmY/n//rRS3EFyS4C4b2AUNbbdxv/vMPTQUdc9JpXws+LgdjiOfnjDs8y + Ux6zl+VBXOiTWVyc33k9x6jwR2r3vszpx/XVosJN7kAa4ox01IK2hHYDRH++/IMOes4rstnMQg7Euly3 + n6z8vMPVrIX32es2y9trmTZM/rjKptpS319y/W6dbHxVQc+vEDwRCqK5y3ymsiGCuDu6EsE4mV8x3Gfp + c96N+cZDn4f/v+QgCz7qVkKJfuYstrmuGaDLmF//JmaZ5NVqcPEvV9nUjcp3YQD5TyC8mrBIDBIzydv7 + /r4BSWCYyPJ12PkVu/W4MerNpMn7twjIz/f/f+UrX/nKV77yla985Stf+cpXvvKVr3zlK1/5yle+8pWv + fOUrX/nKV77yla985Stf+cpXvvKVr3zlK1/5yle+8pWvfOUrX/nKV77yla985Stf+cpXvvKVr3zlK1/5 + yle+8pWvfOUrX/nKV77yla985Stf+cpXvvKVr3zlK1/5yle+8pWvfOUrX/nKV77yla985Stf+cpXvvKV + r3zlK1/5yle+8pWvfOUrX/nKV77yFYD/B92aGZl3Kab3AAAyIWlUWHRYTUw6Y29tLmFkb2JlLnhtcAAA + AAAAPD94cGFja2V0IGJlZ2luPSLvu78iIGlkPSJXNU0wTXBDZWhpSHpyZVN6TlRjemtjOWQiPz4KPHg6 + eG1wbWV0YSB4bWxuczp4PSJhZG9iZTpuczptZXRhLyIgeDp4bXB0az0iQWRvYmUgWE1QIENvcmUgNS4w + LWMwNjAgNjEuMTM0Nzc3LCAyMDEwLzAyLzEyLTE3OjMyOjAwICAgICAgICAiPgogICA8cmRmOlJERiB4 + bWxuczpyZGY9Imh0dHA6Ly93d3cudzMub3JnLzE5OTkvMDIvMjItcmRmLXN5bnRheC1ucyMiPgogICAg + ICA8cmRmOkRlc2NyaXB0aW9uIHJkZjphYm91dD0iIgogICAgICAgICAgICB4bWxuczp4bXA9Imh0dHA6 + Ly9ucy5hZG9iZS5jb20veGFwLzEuMC8iPgogICAgICAgICA8eG1wOkNyZWF0b3JUb29sPkFkb2JlIEZp + cmV3b3JrcyBDUzUgMTEuMC4wLjQ4NCBXaW5kb3dzPC94bXA6Q3JlYXRvclRvb2w+CiAgICAgICAgIDx4 + bXA6Q3JlYXRlRGF0ZT4yMDE0LTAzLTAxVDExOjI1OjU0WjwveG1wOkNyZWF0ZURhdGU+CiAgICAgICAg + IDx4bXA6TW9kaWZ5RGF0ZT4yMDE0LTAzLTAxVDExOjMxOjMzWjwveG1wOk1vZGlmeURhdGU+CiAgICAg + IDwvcmRmOkRlc2NyaXB0aW9uPgogICAgICA8cmRmOkRlc2NyaXB0aW9uIHJkZjphYm91dD0iIgogICAg + ICAgICAgICB4bWxuczpkYz0iaHR0cDovL3B1cmwub3JnL2RjL2VsZW1lbnRzLzEuMS8iPgogICAgICAg + ICA8ZGM6Zm9ybWF0PmltYWdlL3BuZzwvZGM6Zm9ybWF0PgogICAgICA8L3JkZjpEZXNjcmlwdGlvbj4K + ICAgPC9yZGY6UkRGPgo8L3g6eG1wbWV0YT4KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + CiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAK + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAog + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + IAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + CiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAKICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAK + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAogICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIAog + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + IAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAg + ICAgICAgICAgICAgICAKPD94cGFja2V0IGVuZD0idyI/PtgBTlwAAABcSURBVEhLY/iPBBgYGP4zMjKS + hZHNQWczIAuALCAHgBwHwrgAVS3BZRHVLcFmEU0sQQ92qliCHhejlpCUskeDazS4wCEwmhnxJoTRfDKa + TwYon1DSJEJuSqHX8wDL/1D5/L+gqQAAAABJRU5ErkJggg== +</value> + </data> + <metadata name="tmrcodepointcooldown.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> + <metadata name="tmrshowearnedcodepoints.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>197, 17</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1347, 18</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1431, 18</value> + </metadata> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1544, 18</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/TextPad.vb b/ShiftOS/TextPad.vb new file mode 100644 index 0000000..7269fe7 --- /dev/null +++ b/ShiftOS/TextPad.vb @@ -0,0 +1,527 @@ +Public Class TextPad + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 230 + Public minimumsizeheight As Integer = 230 + + Public needtosave As Boolean = False + Public codepointsearned As Integer + Public codepointscooldown As Boolean = False + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.TextpadCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttontextpad.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttontextpad, ShiftOSDesktop.tbtextpadicon, ShiftOSDesktop.tbtextpadtext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + txtuserinput.Size = New Size(txtuserinput.Size.Width, txtuserinput.Size.Height + pnloptions.Height) + setupoptions() + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(530, 330) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.textpadname 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughttextpadicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.textpadicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + + If needtosave = True Then + If ShiftOSDesktop.boughttextpadsave Then + e.Cancel = True + infobox.title = "Textpad - Save?" + infobox.textinfo = "It appears that your text document currently contains unsaved changes." & Environment.NewLine & Environment.NewLine & "Are you sure you want to close textpad without saving the changes?" + infobox.Show() + infobox.showyesno() + infobox.sendyesno = "textpad" + Else + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End If + Else + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End If + End Sub + + 'end of general setup +#End Region + + Private Sub pnlbreak_MouseEnter(sender As Object, e As EventArgs) Handles pnlbreak.Click + If pnloptions.Visible = False Then + pnlbreak.BackgroundImage = My.Resources.downarrow + pnloptions.Show() + txtuserinput.Size = New Size(txtuserinput.Size.Width, txtuserinput.Size.Height - pnloptions.Height) + Else + pnlbreak.BackgroundImage = My.Resources.uparrow + pnloptions.Hide() + txtuserinput.Size = New Size(txtuserinput.Size.Width, txtuserinput.Size.Height + pnloptions.Height) + End If + End Sub + + Private Sub btnnew_Click(sender As Object, e As EventArgs) Handles btnnew.Click + If needtosave = True Then + infobox.title = "Textpad - Save?" + infobox.textinfo = "It appears that your text document currently contains unsaved changes." & Environment.NewLine & Environment.NewLine & "Are you sure you want to start a new document without saving the changes?" + infobox.Show() + infobox.showyesno() + infobox.sendyesno = "textpadnew" + Else + makenewdoc() + End If + End Sub + + Public Sub makenewdoc() + txtuserinput.Text = "" + needtosave = False + codepointsearned = 0 + End Sub + + Private Sub btnsave_Click(sender As Object, e As EventArgs) Handles btnsave.Click + showsavedialog() + End Sub + + Public Sub showsavedialog() + If ShiftOSDesktop.boughttextpadtrm = True Then + File_Saver.useformatchooser = True + File_Saver.nondefaultextention(0) = ".trm" + End If + File_Saver.Show() + File_Saver.savingprogram = "textpad" + File_Saver.saveextention = ".txt" + End Sub + + Private Sub btnopen_Click(sender As Object, e As EventArgs) Handles btnopen.Click + File_Opener.Show() + File_Opener.openingprogram = "textpad" + File_Opener.openextention = ".txt" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Public Sub setupoptions() + If ShiftOSDesktop.boughttextpadnew = True Then btnnew.Show() Else btnnew.Hide() + If ShiftOSDesktop.boughttextpadopen = True Then btnopen.Show() Else btnopen.Hide() + If ShiftOSDesktop.boughttextpadsave = True Then btnsave.Show() Else btnsave.Hide() + If ShiftOSDesktop.boughttextpadnew = False AndAlso ShiftOSDesktop.boughttextpadsave = False AndAlso ShiftOSDesktop.boughttextpadopen = False Then pnlbreak.Hide() + End Sub + + Private Sub txtuserinput_TextChanged(sender As Object, e As EventArgs) Handles txtuserinput.TextChanged + needtosave = True + If codepointscooldown = True Then + Else + codepointsearned = codepointsearned + 1 + codepointscooldown = True + tmrcodepointcooldown.Start() + End If + End Sub + + Private Sub tmrcodepointcooldown_Tick(sender As Object, e As EventArgs) Handles tmrcodepointcooldown.Tick + codepointscooldown = False + tmrcodepointcooldown.Stop() + End Sub + + Private Sub tmrshowearnedcodepoints_Tick(sender As Object, e As EventArgs) Handles tmrshowearnedcodepoints.Tick + lbtitletext.Text = "Textpad" + Me.setuptitlebar() + tmrshowearnedcodepoints.Stop() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Video Player.Designer.vb b/ShiftOS/Video Player.Designer.vb new file mode 100644 index 0000000..0fa68fb --- /dev/null +++ b/ShiftOS/Video Player.Designer.vb @@ -0,0 +1,366 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Video_Player + 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() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Video_Player)) + Me.pgcontents = New System.Windows.Forms.Panel() + Me.AxWindowsMediaPlayer1 = New AxWMPLib.AxWindowsMediaPlayer() + Me.pnlcontrols = New System.Windows.Forms.Panel() + Me.picsongtrack = New System.Windows.Forms.PictureBox() + Me.btnplay = New System.Windows.Forms.Button() + Me.lbltotallength = New System.Windows.Forms.Label() + Me.btnload = New System.Windows.Forms.Button() + Me.lblcurrenttime = New System.Windows.Forms.Label() + Me.btnstop = New System.Windows.Forms.Button() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.tmrsongtrack = New System.Windows.Forms.Timer(Me.components) + Me.pgcontents.SuspendLayout() + CType(Me.AxWindowsMediaPlayer1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlcontrols.SuspendLayout() + CType(Me.picsongtrack, System.ComponentModel.ISupportInitialize).BeginInit() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgright.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.AxWindowsMediaPlayer1) + Me.pgcontents.Controls.Add(Me.pnlcontrols) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(347, 193) + Me.pgcontents.TabIndex = 20 + ' + 'AxWindowsMediaPlayer1 + ' + Me.AxWindowsMediaPlayer1.Dock = System.Windows.Forms.DockStyle.Fill + Me.AxWindowsMediaPlayer1.Enabled = True + Me.AxWindowsMediaPlayer1.Location = New System.Drawing.Point(0, 0) + Me.AxWindowsMediaPlayer1.Name = "AxWindowsMediaPlayer1" + Me.AxWindowsMediaPlayer1.OcxState = CType(resources.GetObject("AxWindowsMediaPlayer1.OcxState"), System.Windows.Forms.AxHost.State) + Me.AxWindowsMediaPlayer1.Size = New System.Drawing.Size(347, 167) + Me.AxWindowsMediaPlayer1.TabIndex = 0 + ' + 'pnlcontrols + ' + Me.pnlcontrols.BackColor = System.Drawing.Color.White + Me.pnlcontrols.Controls.Add(Me.picsongtrack) + Me.pnlcontrols.Controls.Add(Me.btnplay) + Me.pnlcontrols.Controls.Add(Me.lbltotallength) + Me.pnlcontrols.Controls.Add(Me.btnload) + Me.pnlcontrols.Controls.Add(Me.lblcurrenttime) + Me.pnlcontrols.Controls.Add(Me.btnstop) + Me.pnlcontrols.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlcontrols.Location = New System.Drawing.Point(0, 167) + Me.pnlcontrols.Name = "pnlcontrols" + Me.pnlcontrols.Size = New System.Drawing.Size(347, 26) + Me.pnlcontrols.TabIndex = 10 + ' + 'picsongtrack + ' + Me.picsongtrack.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.picsongtrack.Location = New System.Drawing.Point(90, 3) + Me.picsongtrack.Name = "picsongtrack" + Me.picsongtrack.Size = New System.Drawing.Size(145, 20) + Me.picsongtrack.TabIndex = 9 + Me.picsongtrack.TabStop = False + ' + 'btnplay + ' + Me.btnplay.BackgroundImage = Global.ShiftOS.My.Resources.Resources.pausebutton + Me.btnplay.FlatAppearance.BorderSize = 0 + Me.btnplay.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnplay.Location = New System.Drawing.Point(3, 2) + Me.btnplay.Name = "btnplay" + Me.btnplay.Size = New System.Drawing.Size(22, 22) + Me.btnplay.TabIndex = 2 + Me.btnplay.UseVisualStyleBackColor = True + ' + 'lbltotallength + ' + Me.lbltotallength.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbltotallength.BackColor = System.Drawing.Color.Transparent + Me.lbltotallength.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbltotallength.Location = New System.Drawing.Point(237, 1) + Me.lbltotallength.Name = "lbltotallength" + Me.lbltotallength.Size = New System.Drawing.Size(60, 24) + Me.lbltotallength.TabIndex = 8 + Me.lbltotallength.Text = "0:00" + Me.lbltotallength.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnload + ' + Me.btnload.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnload.BackgroundImage = Global.ShiftOS.My.Resources.Resources.loadbutton + Me.btnload.FlatAppearance.BorderSize = 0 + Me.btnload.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnload.Location = New System.Drawing.Point(323, 2) + Me.btnload.Name = "btnload" + Me.btnload.Size = New System.Drawing.Size(22, 22) + Me.btnload.TabIndex = 3 + Me.btnload.UseVisualStyleBackColor = True + ' + 'lblcurrenttime + ' + Me.lblcurrenttime.BackColor = System.Drawing.Color.Transparent + Me.lblcurrenttime.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblcurrenttime.Location = New System.Drawing.Point(27, 1) + Me.lblcurrenttime.Name = "lblcurrenttime" + Me.lblcurrenttime.Size = New System.Drawing.Size(60, 24) + Me.lblcurrenttime.TabIndex = 7 + Me.lblcurrenttime.Text = "0:00" + Me.lblcurrenttime.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'btnstop + ' + Me.btnstop.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnstop.BackgroundImage = Global.ShiftOS.My.Resources.Resources.stopbutton + Me.btnstop.FlatAppearance.BorderSize = 0 + Me.btnstop.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnstop.Location = New System.Drawing.Point(299, 2) + Me.btnstop.Name = "btnstop" + Me.btnstop.Size = New System.Drawing.Size(22, 22) + Me.btnstop.TabIndex = 4 + Me.btnstop.UseVisualStyleBackColor = True + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 223) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(347, 2) + Me.pgbottom.TabIndex = 23 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(351, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconVideoPlayer + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(126, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Video Player" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(349, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 193) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(349, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 195) + Me.pgright.TabIndex = 22 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 195) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 193) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'tmrsongtrack + ' + Me.tmrsongtrack.Enabled = True + Me.tmrsongtrack.Interval = 200 + ' + 'Video_Player + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(351, 225) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(251, 125) + Me.Name = "Video_Player" + Me.Text = "Video Player" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + CType(Me.AxWindowsMediaPlayer1, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlcontrols.ResumeLayout(False) + CType(Me.picsongtrack, System.ComponentModel.ISupportInitialize).EndInit() + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgright.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents btnplay As System.Windows.Forms.Button + Friend WithEvents AxWindowsMediaPlayer1 As AxWMPLib.AxWindowsMediaPlayer + Friend WithEvents btnstop As System.Windows.Forms.Button + Friend WithEvents btnload As System.Windows.Forms.Button + Friend WithEvents lbltotallength As System.Windows.Forms.Label + Friend WithEvents lblcurrenttime As System.Windows.Forms.Label + Friend WithEvents tmrsongtrack As System.Windows.Forms.Timer + Friend WithEvents picsongtrack As System.Windows.Forms.PictureBox + Friend WithEvents pnlcontrols As System.Windows.Forms.Panel +End Class diff --git a/ShiftOS/Video Player.resx b/ShiftOS/Video Player.resx new file mode 100644 index 0000000..92dc047 --- /dev/null +++ b/ShiftOS/Video Player.resx @@ -0,0 +1,143 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <data name="AxWindowsMediaPlayer1.OcxState" mimetype="application/x-microsoft.net.object.binary.base64"> + <value> + AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w + LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACFTeXN0 + ZW0uV2luZG93cy5Gb3Jtcy5BeEhvc3QrU3RhdGUBAAAABERhdGEHAgIAAAAJAwAAAA8DAAAAtwAAAAIB + AAAAAQAAAAAAAAAAAAAAAKIAAAAAAwAACAAAAAAABQAAAAAAAADwPwMAAAAAAAUAAAAAAAAAAAAIAAIA + AAAAAAMAAQAAAAsA//8DAAAAAAALAP//CAACAAAAAAADADIAAAALAAAACAAKAAAAbgBvAG4AZQAAAAsA + AAALAAAACwD//wsA//8LAAAACAACAAAAAAAIAAIAAAAAAAgAAgAAAAAACAACAAAAAAALAAAA3SMAAEMR + AAAL +</value> + </data> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>141, 17</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>235, 17</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>348, 17</value> + </metadata> + <metadata name="tmrsongtrack.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Video Player.vb b/ShiftOS/Video Player.vb new file mode 100644 index 0000000..a5a2ea5 --- /dev/null +++ b/ShiftOS/Video Player.vb @@ -0,0 +1,490 @@ +Public Class Video_Player + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 251 + Public minimumsizeheight As Integer = 125 + + Public clickedstop = False + Public cancelindex = False + Public trackbarcurrentwidth As Single + Public trackcurrent As Single + Public tracktotal As Single + Public cooldown As Boolean = False + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.VideoPlayerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonvideoplayer.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonvideoplayer, ShiftOSDesktop.tbvideoplayericon, ShiftOSDesktop.tbvideoplayertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + AxWindowsMediaPlayer1.uiMode = "none" + AxWindowsMediaPlayer1.URL = "" + AxWindowsMediaPlayer1.stretchToFit = True + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(351, 225) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.videoplayername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.videoplayericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub btnplay_Click(sender As Object, e As EventArgs) Handles btnplay.Click + If AxWindowsMediaPlayer1.URL = "" Then + Else + If AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsPlaying Then + AxWindowsMediaPlayer1.Ctlcontrols.pause() + btnplay.BackgroundImage = My.Resources.playbutton + Else + AxWindowsMediaPlayer1.Ctlcontrols.play() + btnplay.BackgroundImage = My.Resources.pausebutton + End If + End If + End Sub + + Private Sub btnload_Click(sender As Object, e As EventArgs) Handles btnload.Click + File_Opener.Show() + File_Opener.openingprogram = "videoplayer" + File_Opener.openextention = ".mp4" + File_Opener.lbextention.Text = File_Opener.openextention + File_Opener.showcontents() + End Sub + + Private Sub btnstop_Click(sender As Object, e As EventArgs) Handles btnstop.Click + If AxWindowsMediaPlayer1.URL = "" Then + Else + AxWindowsMediaPlayer1.Ctlcontrols.stop() + lblcurrenttime.Text = "00:00" + btnplay.BackgroundImage = My.Resources.playbutton + End If + End Sub + + Private Sub tmrsongtrack_Tick(sender As Object, e As EventArgs) Handles tmrsongtrack.Tick + If AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsPlaying Then + picsongtrack.Refresh() + lbltotallength.Text = AxWindowsMediaPlayer1.currentMedia.durationString + lblcurrenttime.Text = AxWindowsMediaPlayer1.Ctlcontrols.currentPositionString + Dim TrackBrush = New SolidBrush(Color.FromArgb(255, Color.Black)) + trackcurrent = Math.Round(AxWindowsMediaPlayer1.Ctlcontrols.currentPosition, 1) + tracktotal = Math.Round(AxWindowsMediaPlayer1.currentMedia.duration, 1) + If tracktotal = 0 Then Else trackbarcurrentwidth = (trackcurrent / tracktotal) * 100 + trackbarcurrentwidth = trackbarcurrentwidth * (picsongtrack.Width / 100) + picsongtrack.CreateGraphics.FillRectangle(TrackBrush, 0, 0, trackbarcurrentwidth, picsongtrack.Height) + TrackBrush.Dispose() + End If + End Sub + + Private Sub picsongtrack_MouseDown(sender As Object, e As MouseEventArgs) Handles picsongtrack.MouseDown + trackjumpto(e) + End Sub + + Private Sub trackjumpto(ByVal e As MouseEventArgs) + Dim xposition As Integer + xposition = e.X + AxWindowsMediaPlayer1.Ctlcontrols.currentPosition = (AxWindowsMediaPlayer1.currentMedia.duration / picsongtrack.Width) * xposition + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/VirusScanner.Designer.vb b/ShiftOS/VirusScanner.Designer.vb new file mode 100644 index 0000000..f592b51 --- /dev/null +++ b/ShiftOS/VirusScanner.Designer.vb @@ -0,0 +1,370 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class VirusScanner + 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() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(VirusScanner)) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.grpabout = New System.Windows.Forms.GroupBox() + Me.lblabout = New System.Windows.Forms.Label() + Me.grpresults = New System.Windows.Forms.GroupBox() + Me.btnremoveviruses = New System.Windows.Forms.Button() + Me.lblresults = New System.Windows.Forms.Label() + Me.btnsysscan = New System.Windows.Forms.Button() + Me.btnhomescan = New System.Windows.Forms.Button() + Me.btnfullscan = New System.Windows.Forms.Button() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.tmrprogress = New System.Windows.Forms.Timer(Me.components) + Me.ProgressBar = New ShiftOS.ProgressBarEX() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.grpabout.SuspendLayout() + Me.grpresults.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 322) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(341, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 292) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(343, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 294) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(343, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 292) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.ProgressBar) + Me.pgcontents.Controls.Add(Me.grpabout) + Me.pgcontents.Controls.Add(Me.grpresults) + Me.pgcontents.Controls.Add(Me.btnsysscan) + Me.pgcontents.Controls.Add(Me.btnhomescan) + Me.pgcontents.Controls.Add(Me.btnfullscan) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(343, 294) + Me.pgcontents.TabIndex = 20 + ' + 'grpabout + ' + Me.grpabout.Controls.Add(Me.lblabout) + Me.grpabout.Location = New System.Drawing.Point(191, 12) + Me.grpabout.Name = "grpabout" + Me.grpabout.Size = New System.Drawing.Size(139, 274) + Me.grpabout.TabIndex = 5 + Me.grpabout.TabStop = False + Me.grpabout.Text = "About" + ' + 'lblabout + ' + Me.lblabout.Location = New System.Drawing.Point(6, 20) + Me.lblabout.Name = "lblabout" + Me.lblabout.Size = New System.Drawing.Size(125, 251) + Me.lblabout.TabIndex = 0 + Me.lblabout.Text = resources.GetString("lblabout.Text") + ' + 'grpresults + ' + Me.grpresults.Controls.Add(Me.btnremoveviruses) + Me.grpresults.Controls.Add(Me.lblresults) + Me.grpresults.Location = New System.Drawing.Point(6, 99) + Me.grpresults.Name = "grpresults" + Me.grpresults.Size = New System.Drawing.Size(179, 158) + Me.grpresults.TabIndex = 3 + Me.grpresults.TabStop = False + Me.grpresults.Text = "Scan Results" + ' + 'btnremoveviruses + ' + Me.btnremoveviruses.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnremoveviruses.Location = New System.Drawing.Point(4, 129) + Me.btnremoveviruses.Name = "btnremoveviruses" + Me.btnremoveviruses.Size = New System.Drawing.Size(164, 23) + Me.btnremoveviruses.TabIndex = 1 + Me.btnremoveviruses.Text = "Remove" + Me.btnremoveviruses.UseVisualStyleBackColor = True + Me.btnremoveviruses.Visible = False + ' + 'lblresults + ' + Me.lblresults.Location = New System.Drawing.Point(6, 20) + Me.lblresults.Name = "lblresults" + Me.lblresults.Size = New System.Drawing.Size(167, 106) + Me.lblresults.TabIndex = 0 + Me.lblresults.Text = "No scan yet completed" + ' + 'btnsysscan + ' + Me.btnsysscan.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnsysscan.Location = New System.Drawing.Point(10, 70) + Me.btnsysscan.Name = "btnsysscan" + Me.btnsysscan.Size = New System.Drawing.Size(175, 23) + Me.btnsysscan.TabIndex = 2 + Me.btnsysscan.Text = "Scan System files" + Me.btnsysscan.UseVisualStyleBackColor = True + ' + 'btnhomescan + ' + Me.btnhomescan.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnhomescan.Location = New System.Drawing.Point(10, 41) + Me.btnhomescan.Name = "btnhomescan" + Me.btnhomescan.Size = New System.Drawing.Size(175, 23) + Me.btnhomescan.TabIndex = 1 + Me.btnhomescan.Text = "Scan Home Folder" + Me.btnhomescan.UseVisualStyleBackColor = True + ' + 'btnfullscan + ' + Me.btnfullscan.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnfullscan.Location = New System.Drawing.Point(10, 12) + Me.btnfullscan.Name = "btnfullscan" + Me.btnfullscan.Size = New System.Drawing.Size(175, 23) + Me.btnfullscan.TabIndex = 0 + Me.btnfullscan.Text = "Start System Wide Scan (slow)" + Me.btnfullscan.UseVisualStyleBackColor = True + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 294) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(345, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'tmrprogress + ' + ' + 'ProgressBar + ' + Me.ProgressBar.BackColor = System.Drawing.Color.White + Me.ProgressBar.BlockSeparation = 3 + Me.ProgressBar.BlockWidth = 5 + Me.ProgressBar.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.ProgressBar.Color = System.Drawing.Color.Gray + Me.ProgressBar.Location = New System.Drawing.Point(10, 263) + Me.ProgressBar.MaxValue = 100 + Me.ProgressBar.MinValue = 0 + Me.ProgressBar.Name = "ProgressBar" + Me.ProgressBar.Orientation = ShiftOS.ProgressBarEX.ProgressBarOrientation.Horizontal + Me.ProgressBar.ShowValue = False + Me.ProgressBar.Size = New System.Drawing.Size(175, 23) + Me.ProgressBar.Step = 10 + Me.ProgressBar.Style = ShiftOS.ProgressBarEX.ProgressBarExStyle.Continuous + Me.ProgressBar.TabIndex = 1 + Me.ProgressBar.Value = 0 + ' + 'VirusScanner + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(345, 324) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "VirusScanner" + Me.Text = "VirusScanner" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.grpabout.ResumeLayout(False) + Me.grpresults.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents grpresults As System.Windows.Forms.GroupBox + Friend WithEvents btnsysscan As System.Windows.Forms.Button + Friend WithEvents btnhomescan As System.Windows.Forms.Button + Friend WithEvents btnfullscan As System.Windows.Forms.Button + Friend WithEvents lblresults As System.Windows.Forms.Label + Friend WithEvents grpabout As System.Windows.Forms.GroupBox + Friend WithEvents lblabout As System.Windows.Forms.Label + Friend WithEvents tmrprogress As System.Windows.Forms.Timer + Friend WithEvents btnremoveviruses As System.Windows.Forms.Button + Friend WithEvents ProgressBar As ShiftOS.ProgressBarEX +End Class diff --git a/ShiftOS/VirusScanner.resx b/ShiftOS/VirusScanner.resx new file mode 100644 index 0000000..feff555 --- /dev/null +++ b/ShiftOS/VirusScanner.resx @@ -0,0 +1,139 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 57</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>111, 57</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>195, 57</value> + </metadata> + <data name="lblabout.Text" xml:space="preserve"> + <value>Scanner Grade: 1 + +Additional Info: Grade 1 scanners can remove threat level 1 viruses. Anything higher and the scanner will detect but be unable to remove. + +Copyright Info: Any downloading, uploading or sharing this application is strictly forbbiden. Failure to comply will result legal action.</value> + </data> + <metadata name="tmrprogress.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>308, 57</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/VirusScanner.vb b/ShiftOS/VirusScanner.vb new file mode 100644 index 0000000..169b34f --- /dev/null +++ b/ShiftOS/VirusScanner.vb @@ -0,0 +1,566 @@ +Imports System.IO + +Public Class VirusScanner +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.VirusScannerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + setupinfo() + + ShiftOSDesktop.pnlpanelbuttonvirusscanner.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonvirusscanner, ShiftOSDesktop.tbvirusscannericon, ShiftOSDesktop.tbvirusscannertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(345, 324) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.virusscannername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtvirusscannericon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.virusscannericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + 'get directory sizes + Private Overloads Function DirectorySize(ByVal sPath As String, ByVal bRecursive As Boolean) As Long + Dim lngNumberOfDirectories As Long = 0 + Dim Size As Long = 0 + + Try + Dim fil As FileInfo + Dim diDir As New DirectoryInfo(sPath) + + For Each fil In diDir.GetFiles() + Size += fil.Length + Next fil + + If bRecursive = True Then + Dim diSubDir As DirectoryInfo + For Each diSubDir In diDir.GetDirectories() + Size += DirectorySize(diSubDir.FullName, True) + lngNumberOfDirectories += 1 + Next + + End If + + Return Size + + Catch fex As System.IO.FileNotFoundException + + ' File not found. Take no action + Return 0 + + Catch ex As Exception + ' Another error occurred + Return 0 + + End Try + End Function + + Dim scantype As String + Dim virusesfound As Integer = 0 + Dim zerofound As Boolean + Dim trapfound As Boolean + Dim beeperfound As Boolean + Dim plaguefound As Boolean + Dim virusesremoved As Integer + + Private Sub setupinfo() + lblabout.Text = "Scanner Grade: " & ShiftOSDesktop.virusscannergrade & Environment.NewLine & Environment.NewLine + If ShiftOSDesktop.virusscannergrade = 0 Then + lblabout.Text = lblabout.Text & "Additional Info: Grade 0 Scanners are unable to remove viruses, they can only detect them. Please upgrade to a higher grade of Virus Scanner." & ShiftOSDesktop.virusscannergrade & Environment.NewLine & Environment.NewLine + Else + lblabout.Text = lblabout.Text & "Additional Info: Grade " & ShiftOSDesktop.virusscannergrade & " scanners can remove threat level " & ShiftOSDesktop.virusscannergrade & " viruses. Anything higher and the scanner will detect but be unable to remove." & ShiftOSDesktop.virusscannergrade & Environment.NewLine & Environment.NewLine + End If + lblabout.Text = lblabout.Text & "Copyright Info: Any downloading, uploading or sharing this application is strictly forbbiden. Failure to comply will result legal action." + End Sub + + Private Sub btnfullscan_Click(sender As Object, e As EventArgs) Handles btnfullscan.Click + Dim dirsize As Integer = DirectorySize(ShiftOSDesktop.ShiftOSPath, True) + If dirsize > 10000 Then + tmrprogress.Interval = (dirsize / 10000) + Else + tmrprogress.Interval = 1000 + End If + tmrprogress.Start() + scantype = "full" + btnremoveviruses.Visible = False + End Sub + + Private Sub btnhomescan_Click(sender As Object, e As EventArgs) Handles btnhomescan.Click + Dim dirsize As Integer = DirectorySize(ShiftOSDesktop.ShiftOSPath & "Home", True) + If dirsize > 10000 Then + tmrprogress.Interval = (dirsize / 10000) + Else + tmrprogress.Interval = 1000 + End If + tmrprogress.Start() + scantype = "home" + btnremoveviruses.Visible = False + End Sub + + Private Sub btnsysscan_Click(sender As Object, e As EventArgs) Handles btnsysscan.Click + Dim dirsize As Integer = DirectorySize(ShiftOSDesktop.ShiftOSPath & "Shiftum42", True) + If dirsize > 10000 Then + tmrprogress.Interval = (dirsize / 10000) + Else + tmrprogress.Interval = 1000 + End If + tmrprogress.Start() + scantype = "sys" + End Sub + + Private Sub tmrprogress_Tick(sender As Object, e As EventArgs) Handles tmrprogress.Tick + Select Case scantype + Case "full" + lblresults.Text = "Starting full scan..." & Environment.NewLine + If ProgressBar.Value > 50 Then + If Viruses.zerogravity = True Then + lblresults.Text = lblresults.Text & "Found ZeroGravity.th" & Viruses.zerogravitythreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + zerofound = True + End If + If Viruses.mousetrap = True Then + lblresults.Text = lblresults.Text & "Found MouseTrap.th" & Viruses.mousetrapthreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + trapfound = True + End If + If Viruses.beeper = True Then + lblresults.Text = lblresults.Text & "Found Beeper.th" & Viruses.beeperthreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + beeperfound = True + End If + If Viruses.ThePlague = True Then + lblresults.Text = lblresults.Text & "Found ThePlague.th" & Viruses.theplaguethreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + plaguefound = True + End If + End If + Case "home" + lblresults.Text = "Starting Home folder scan..." & Environment.NewLine + If ProgressBar.Value > 50 Then + Dim chance As Integer = Math.Ceiling(Rnd() * 2) + If Viruses.zerogravity = True And chance = 1 Then + lblresults.Text = lblresults.Text & "Found ZeroGravity.th" & Viruses.zerogravitythreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + zerofound = True + End If + chance = Math.Ceiling(Rnd() * 2) + If Viruses.mousetrap = True And chance = 1 Then + lblresults.Text = lblresults.Text & "Found MouseTrap.th" & Viruses.mousetrapthreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + trapfound = True + End If + chance = Math.Ceiling(Rnd() * 2) + If Viruses.beeper = True And chance = 1 Then + lblresults.Text = lblresults.Text & "Found Beeper.th" & Viruses.beeperthreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + beeperfound = True + End If + chance = Math.Ceiling(Rnd() * 2) + If Viruses.ThePlague = True Then + lblresults.Text = lblresults.Text & "Found ThePlague.th" & Viruses.theplaguethreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + plaguefound = True + End If + End If + Case "sys" + lblresults.Text = "Starting System files scan..." & Environment.NewLine + If ProgressBar.Value > 50 Then + Dim chance As Integer = Math.Ceiling(Rnd() * 2) + If Viruses.zerogravity = True And chance = 1 Then + lblresults.Text = lblresults.Text & "Found ZeroGravity.th" & Viruses.zerogravitythreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + zerofound = True + End If + chance = Math.Ceiling(Rnd() * 2) + If Viruses.mousetrap = True And chance = 1 Then + lblresults.Text = lblresults.Text & "Found MouseTrap.th" & Viruses.mousetrapthreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + trapfound = True + End If + chance = Math.Ceiling(Rnd() * 2) + If Viruses.beeper = True And chance = 1 Then + lblresults.Text = lblresults.Text & "Found Beeper.th" & Viruses.beeperthreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + beeperfound = True + End If + chance = Math.Ceiling(Rnd() * 2) + If Viruses.ThePlague = True Then + lblresults.Text = lblresults.Text & "Found ThePlague.th" & Viruses.theplaguethreatlevel & Environment.NewLine + virusesfound = virusesfound + 1 + plaguefound = True + End If + End If + End Select + If ProgressBar.Value < 100 Then + ProgressBar.Value = ProgressBar.Value + 10 + Else + lblresults.Text = lblresults.Text & "Scan completed." + ProgressBar.Value = 0 + tmrprogress.Stop() + If virusesfound >= 1 Then + If ShiftOSDesktop.virusscannergrade Then + btnremoveviruses.Visible = True + Else + infobox.title = "Upgrade required" + infobox.textinfo = "Viruses scanners of grade 0 are not able to remove any viruses. Please upgrade to grade 1 or above." + infobox.Show() + End If + End If + End If + End Sub + + Private Sub btnremoveviruses_Click(sender As Object, e As EventArgs) Handles btnremoveviruses.Click + lblresults.Text = "" + If zerofound = True And Viruses.zerogravitythreatlevel <= ShiftOSDesktop.virusscannergrade Then Viruses.removezerovirus() Else If Viruses.zerogravitythreatlevel > ShiftOSDesktop.virusscannergrade Then lblresults.Text = lblresults.Text & "ERROR: ZeroGravity Threat level too great" & Environment.NewLine + If trapfound = True And Viruses.mousetrapthreatlevel <= ShiftOSDesktop.virusscannergrade Then Viruses.removemousetrapvirus() Else If Viruses.mousetrapthreatlevel > ShiftOSDesktop.virusscannergrade Then lblresults.Text = lblresults.Text & "ERROR: MouseTrap Threat level too great" & Environment.NewLine + If beeperfound = True And Viruses.beeperthreatlevel <= ShiftOSDesktop.virusscannergrade Then Viruses.removebeepervirus() Else If Viruses.beeperthreatlevel > ShiftOSDesktop.virusscannergrade Then lblresults.Text = lblresults.Text & "ERROR: Beeper Threat level too great" & Environment.NewLine + If plaguefound = True And Viruses.theplaguethreatlevel <= ShiftOSDesktop.virusscannergrade Then Viruses.removetheplague() Else If Viruses.theplaguethreatlevel > ShiftOSDesktop.virusscannergrade Then lblresults.Text = lblresults.Text & "ERROR: ThePlague threat level too great" & Environment.NewLine + lblresults.Text = lblresults.Text & "Complete... " & virusesremoved & " Viruses were removed" + btnremoveviruses.Visible = False + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Viruses.vb b/ShiftOS/Viruses.vb new file mode 100644 index 0000000..855d7ac --- /dev/null +++ b/ShiftOS/Viruses.vb @@ -0,0 +1,555 @@ +Module Viruses + + Public Sub startactiveviruses() + If zerogravity Then setupzerovirus() + If mousetrap Then setupmousetrapvirus() + If beeper Then setupbeepervirus() + If ThePlague Then setuptheplague() + End Sub + + 'Zero Varibles + Public WithEvents zerogravitytimer As New Timer + Public zerogravity As Boolean = False + Public zerogravitythreatlevel As Integer = 1 + Public zerogravityxspeed(33) As Integer + Public zerogravityyspeed(33) As Integer + Public zerogravityspeedth1 = 1 + Public zerogravityspeedth2 = 2 + Public zerogravityspeedth3 = 4 + Public zerogravityspeedth4 = 8 + + + 'Mouse Trap Varibles + Public WithEvents mousetraptimer As New Timer + Public WithEvents cooldowntraptimer As New Timer + Public mousetrap As Boolean = False + Public mousetrapthreatlevel As Integer = 1 + Public mousetraped As Boolean = False + Public bangstoescape As Integer = 20 + Public trappedwindow As Integer = 0 + Public bangvelocity As Integer + Public bangforceneeded As Integer = 30 + Public trapcooldown As Integer = 20 + Public trap1 As Boolean = False + Public trap2 As Boolean = False + Public trap3 As Boolean = False + Public trap4 As Boolean = False + Public alreadytrapped As Boolean = False + Public trappedprogram As Form + Public bangstoescapeth1 As Integer = 20 + Public bangstoescapeth2 As Integer = 40 + Public bangstoescapeth3 As Integer = 60 + Public bangstoescapeth4 As Integer = 80 + Public bangforceneeded1 As Integer = 30 + Public bangforceneeded2 As Integer = 50 + Public bangforceneeded3 As Integer = 80 + Public bangforceneeded4 As Integer = 120 + Public trapcooldown1 As Integer = 60 + Public trapcooldown2 As Integer = 30 + Public trapcooldown3 As Integer = 15 + Public trapcooldown4 As Integer = 10 + + 'Beeper Varibles + Public WithEvents beepertimer As New Timer + Public beeper As Boolean = False + Public beeperthreatlevel As Integer = 1 + Public beepercountdown As Integer + Dim ResourceFilePath As String + Dim soundplayer As AxWMPLib.AxWindowsMediaPlayer + Dim beeperinterval As Integer = 5 + + 'ThePlague Variables + Public WithEvents theplaguebsod As New Timer + Public WithEvents theplaguetimer As New Timer + Public RandomApplicationName As String + Public theplaguethreatlevel As Integer = 1 + Public ThePlague As Boolean = False + Public ChanceOfDestroyThePlague As Integer + + 'Zero Virus + Public Sub setupzerovirus() + setupzerogravityspeeds() + zerogravitytimer.Start() + zerogravitytimer.Interval = 20 + End Sub + + Public Sub setupzerogravityspeeds() + For i = 0 To 33 + If i Mod 2 <> 0 Then + Select Case zerogravitythreatlevel + Case 1 + zerogravityxspeed(i) = zerogravityspeedth1 + zerogravityyspeed(i) = zerogravityspeedth1 + Case 2 + zerogravityxspeed(i) = zerogravityspeedth2 + zerogravityyspeed(i) = zerogravityspeedth2 + Case 3 + zerogravityxspeed(i) = zerogravityspeedth3 + zerogravityyspeed(i) = zerogravityspeedth3 + Case 4 + zerogravityxspeed(i) = zerogravityspeedth4 + zerogravityyspeed(i) = zerogravityspeedth4 + End Select + + Else + Select Case zerogravitythreatlevel + Case 1 + zerogravityxspeed(i) = -zerogravityspeedth1 + zerogravityyspeed(i) = -zerogravityspeedth1 + Case 2 + zerogravityxspeed(i) = -zerogravityspeedth2 + zerogravityyspeed(i) = -zerogravityspeedth2 + Case 3 + zerogravityxspeed(i) = -zerogravityspeedth3 + zerogravityyspeed(i) = -zerogravityspeedth3 + Case 4 + zerogravityxspeed(i) = -zerogravityspeedth4 + zerogravityyspeed(i) = -zerogravityspeedth4 + End Select + End If + Next + End Sub + + Public Sub floatingwindows() Handles zerogravitytimer.Tick + If Knowledge_Input.Visible = True Then calculatelocations(Knowledge_Input, 0) + If Shiftorium.Visible = True Then calculatelocations(Shiftorium, 1) + If Clock.Visible = True Then calculatelocations(Clock, 2) + If Shifter.Visible = True Then calculatelocations(Shifter, 3) + If Colour_Picker.Visible = True Then calculatelocations(Colour_Picker, 4) + If infobox.Visible = True Then calculatelocations(infobox, 5) + If Pong.Visible = True Then calculatelocations(Pong, 6) + If File_Skimmer.Visible = True Then calculatelocations(File_Skimmer, 7) + If File_Opener.Visible = True Then calculatelocations(File_Opener, 8) + If File_Saver.Visible = True Then calculatelocations(File_Saver, 9) + If TextPad.Visible = True Then calculatelocations(TextPad, 10) + If Graphic_Picker.Visible = True Then calculatelocations(Graphic_Picker, 11) + If Skin_Loader.Visible = True Then calculatelocations(Skin_Loader, 12) + If ArtPad.Visible = True Then calculatelocations(ArtPad, 13) + If Calculator.Visible = True Then calculatelocations(Calculator, 14) + If Audio_Player.Visible = True Then calculatelocations(Audio_Player, 15) + If Web_Browser.Visible = True Then calculatelocations(Web_Browser, 16) + If Video_Player.Visible = True Then calculatelocations(Video_Player, 17) + If Name_Changer.Visible = True Then calculatelocations(Name_Changer, 18) + If Icon_Manager.Visible = True Then calculatelocations(Icon_Manager, 19) + If Bitnote_Wallet.Visible = True Then calculatelocations(Bitnote_Wallet, 20) + If Bitnote_Digger.Visible = True Then calculatelocations(Bitnote_Digger, 21) + If Skinshifter.Visible = True Then calculatelocations(Skinshifter, 22) + If Shiftnet.Visible = True Then calculatelocations(Shiftnet, 23) + If Downloader.Visible = True Then calculatelocations(Downloader, 24) + If Dodge.Visible = True Then calculatelocations(Dodge, 25) + If Downloadmanager.Visible = True Then calculatelocations(Downloadmanager, 26) + If Installer.Visible = True Then calculatelocations(Installer, 27) + If systeminfo.Visible = True Then calculatelocations(systeminfo, 28) + If OrcWrite.Visible = True Then calculatelocations(OrcWrite, 29) + If FloodGate_Manager.Visible = True Then calculatelocations(FloodGate_Manager, 30) + If Labyrinth.Visible = True Then calculatelocations(Labyrinth, 31) + If VirusScanner.Visible = True Then calculatelocations(VirusScanner, 32) + If Terminal.Visible = True Then calculatelocations(Terminal, 33) + End Sub + + Public Sub calculatelocations(ByVal program As Form, ByVal number As Integer) + If zerogravityxspeed(number) > 0 Then + If (program.Location.X + program.Size.Width) > Screen.PrimaryScreen.Bounds.Width Then + zerogravityxspeed(number) = zerogravityxspeed(number) * -1 + End If + End If + If zerogravityxspeed(number) < 0 Then + If program.Location.X < 0 Then + zerogravityxspeed(number) = zerogravityxspeed(number) * -1 + End If + End If + If zerogravityyspeed(number) > 0 Then + If (program.Location.Y + program.Size.Height) > Screen.PrimaryScreen.Bounds.Height Then + zerogravityyspeed(number) = zerogravityyspeed(number) * -1 + End If + End If + If zerogravityyspeed(number) < 0 Then + If program.Location.Y < 0 Then + zerogravityyspeed(number) = zerogravityyspeed(number) * -1 + End If + End If + program.Location = New Point(program.Location.X + zerogravityxspeed(number), program.Location.Y + zerogravityyspeed(number)) + End Sub + + Public Sub removezerovirus() + zerogravitytimer.Stop() + Viruses.zerogravity = False + End Sub + + 'Mouse Trap Virus + Public Sub setupmousetrapvirus() + mousetraptimer.Start() + mousetraptimer.Interval = 20 + cooldowntraptimer.Start() + cooldowntraptimer.Interval = 1000 + Select Case mousetrapthreatlevel + Case 1 + trapcooldown = trapcooldown1 + bangforceneeded = bangforceneeded1 + bangstoescape = bangstoescapeth1 + Case 2 + trapcooldown = trapcooldown2 + bangforceneeded = bangforceneeded2 + bangstoescape = bangstoescapeth2 + Case 3 + trapcooldown = trapcooldown3 + bangforceneeded = bangforceneeded3 + bangstoescape = bangstoescapeth3 + Case 4 + trapcooldown = trapcooldown4 + bangforceneeded = bangforceneeded4 + bangstoescape = bangstoescapeth4 + End Select + + End Sub + + Public Sub seeifcantrap(ByVal sender As Object, ByVal e As EventArgs) Handles cooldowntraptimer.Tick + If trapcooldown < 0 Then + mousetraped = True + Else + trapcooldown = trapcooldown - 1 + End If + End Sub + + Public Sub trapmouse(ByVal sender As Object, ByVal e As EventArgs) Handles mousetraptimer.Tick + If mousetraped = True Then + If alreadytrapped = False Then detectprogramtotrap(Knowledge_Input) + If alreadytrapped = False Then detectprogramtotrap(Shiftorium) + If alreadytrapped = False Then detectprogramtotrap(Clock) + If alreadytrapped = False Then detectprogramtotrap(Shifter) + If alreadytrapped = False Then detectprogramtotrap(Colour_Picker) + If alreadytrapped = False Then detectprogramtotrap(infobox) + If alreadytrapped = False Then detectprogramtotrap(Pong) + If alreadytrapped = False Then detectprogramtotrap(File_Skimmer) + If alreadytrapped = False Then detectprogramtotrap(File_Opener) + If alreadytrapped = False Then detectprogramtotrap(File_Saver) + If alreadytrapped = False Then detectprogramtotrap(TextPad) + If alreadytrapped = False Then detectprogramtotrap(Graphic_Picker) + If alreadytrapped = False Then detectprogramtotrap(Skin_Loader) + If alreadytrapped = False Then detectprogramtotrap(ArtPad) + If alreadytrapped = False Then detectprogramtotrap(Calculator) + If alreadytrapped = False Then detectprogramtotrap(Audio_Player) + If alreadytrapped = False Then detectprogramtotrap(Web_Browser) + If alreadytrapped = False Then detectprogramtotrap(Video_Player) + If alreadytrapped = False Then detectprogramtotrap(Name_Changer) + If alreadytrapped = False Then detectprogramtotrap(Icon_Manager) + If alreadytrapped = False Then detectprogramtotrap(Bitnote_Wallet) + If alreadytrapped = False Then detectprogramtotrap(Bitnote_Digger) + If alreadytrapped = False Then detectprogramtotrap(Skinshifter) + If alreadytrapped = False Then detectprogramtotrap(Shiftnet) + If alreadytrapped = False Then detectprogramtotrap(Dodge) + If alreadytrapped = False Then detectprogramtotrap(Downloadmanager) + If alreadytrapped = False Then detectprogramtotrap(Installer) + If alreadytrapped = False Then detectprogramtotrap(systeminfo) + If alreadytrapped = False Then detectprogramtotrap(OrcWrite) + If alreadytrapped = False Then detectprogramtotrap(FloodGate_Manager) + If alreadytrapped = False Then detectprogramtotrap(Labyrinth) + If alreadytrapped = False Then detectprogramtotrap(VirusScanner) + If trappedprogram Is Nothing Then Else trapmouseinprogram(trappedprogram) + If bangstoescape < 0 Then + mousetraped = False + Select Case mousetrapthreatlevel + Case 1 + trapcooldown = trapcooldown1 + bangstoescape = bangstoescapeth1 + Case 2 + trapcooldown = trapcooldown2 + bangstoescape = bangstoescapeth2 + Case 3 + trapcooldown = trapcooldown3 + bangstoescape = bangstoescapeth3 + Case 4 + trapcooldown = trapcooldown4 + bangstoescape = bangstoescapeth4 + End Select + alreadytrapped = False + trappedprogram = Nothing + End If + End If + End Sub + + Private Sub detectprogramtotrap(ByVal program As Form) + If program.Visible = True Then + If Cursor.Position.X < program.Location.X + program.Width - ShiftOSDesktop.windowbordersize Then + trap1 = True + End If + If Cursor.Position.X > program.Location.X + ShiftOSDesktop.windowbordersize Then + trap2 = True + End If + If Cursor.Position.Y > program.Location.Y + ShiftOSDesktop.titlebarheight Then + trap3 = True + End If + If Cursor.Position.Y < program.Location.Y + program.Height - ShiftOSDesktop.windowbordersize Then + trap4 = True + End If + If trap1 = True AndAlso trap2 = True AndAlso trap3 = True AndAlso trap4 = True Then + alreadytrapped = True + trappedprogram = program + End If + End If + trap1 = False + trap2 = False + trap3 = False + trap4 = False + End Sub + + Public Sub trapmouseinprogram(ByVal program As Form) + If Cursor.Position.X > program.Location.X + program.Width - ShiftOSDesktop.windowbordersize Then + bangvelocity = Math.Abs(Cursor.Position.X - (program.Location.X + program.Width - ShiftOSDesktop.windowbordersize)) + Cursor.Position = New Point(program.Location.X + program.Width - ShiftOSDesktop.windowbordersize, Cursor.Position.Y) + If bangvelocity > bangforceneeded Then bangstoescape = bangstoescape - 1 + End If + If Cursor.Position.X < program.Location.X + ShiftOSDesktop.windowbordersize Then + bangvelocity = Math.Abs(Cursor.Position.X - (program.Location.X + ShiftOSDesktop.windowbordersize)) + Cursor.Position = New Point(program.Location.X + ShiftOSDesktop.windowbordersize, Cursor.Position.Y) + If bangvelocity > bangforceneeded Then bangstoescape = bangstoescape - 1 + End If + If Cursor.Position.Y < program.Location.Y + ShiftOSDesktop.titlebarheight Then + bangvelocity = Math.Abs(Cursor.Position.Y - (program.Location.Y + ShiftOSDesktop.titlebarheight)) + Cursor.Position = New Point(Cursor.Position.X, program.Location.Y + ShiftOSDesktop.titlebarheight) + If bangvelocity > bangforceneeded Then bangstoescape = bangstoescape - 1 + End If + If Cursor.Position.Y > program.Location.Y + program.Height - ShiftOSDesktop.windowbordersize Then + bangvelocity = Math.Abs(Cursor.Position.Y - (program.Location.Y + program.Height - ShiftOSDesktop.windowbordersize)) + Cursor.Position = New Point(Cursor.Position.X, program.Location.Y + program.Height - ShiftOSDesktop.windowbordersize) + If bangvelocity > bangforceneeded Then bangstoescape = bangstoescape - 1 + End If + End Sub + + Public Sub removemousetrapvirus() + Viruses.mousetrap = False + mousetraptimer.Stop() + mousetraped = False + cooldowntraptimer.Stop() + End Sub + + 'Beeper Virus + Public Sub setupbeepervirus() + setupbeeperintervals() + 'If System.Diagnostics.Debugger.IsAttached() Then + ' ResourceFilePath = System.IO.Path.GetFullPath(Application.StartupPath & "\..\..\resources\") + 'Else + ' ResourceFilePath = Application.StartupPath & "\resources\" + 'End If + beepertimer.Start() + beepertimer.Interval = 500 + beepercountdown = beeperinterval + End Sub + + Private Sub setupbeeperintervals() + Select Case beeperthreatlevel + Case 1 : beeperinterval = 60 + Case 2 : beeperinterval = 24 + Case 3 : beeperinterval = 8 + Case 4 : beeperinterval = 1 + End Select + End Sub + + Public Sub beepermakesound(ByVal sender As Object, ByVal e As EventArgs) Handles beepertimer.Tick + If beepercountdown = 0 Then + My.Computer.Audio.Play(My.Resources._3beepvirus, AudioPlayMode.Background) + beepercountdown = beeperinterval + Else + beepercountdown = beepercountdown - 1 + End If + End Sub + + Public Sub removebeepervirus() + Viruses.beeper = False + beepertimer.Stop() + End Sub + + Public Sub setuptheplague() + If theplaguethreatlevel = 1 Then + theplaguetimer.Start() + theplaguetimer.Interval = 10000 + ChanceOfDestroyThePlague = 10 + ElseIf theplaguethreatlevel = 2 Then + theplaguetimer.Start() + theplaguetimer.Interval = 10000 + ChanceOfDestroyThePlague = 20 + ElseIf theplaguethreatlevel = 3 Then + theplaguetimer.Start() + theplaguetimer.Interval = 7000 + ChanceOfDestroyThePlague = 35 + ElseIf theplaguethreatlevel = 4 Then + theplaguetimer.Start() + theplaguetimer.Interval = 5000 + ChanceOfDestroyThePlague = 60 + End If + End Sub + + Public Sub theplaguedestroy(ByVal sender As Object, ByVal e As EventArgs) Handles theplaguetimer.Tick + Randomize() + Dim Chance As Integer = CInt(Math.Ceiling(Rnd() * 100)) + If Chance = ChanceOfDestroyThePlague Or Chance > ChanceOfDestroyThePlague Then + GetRandomApplication() + End If + End Sub + + Public Sub GetRandomApplication() + Dim Chooser As Integer = ShiftOSDesktop.NumberOn + Select Case chooser + Case 1 + InfectApplication(ArtPad, ShiftOSDesktop.ArtpadCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 2 + InfectApplication(File_Skimmer, ShiftOSDesktop.FileSkimmerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 3 + InfectApplication(Audio_Player, ShiftOSDesktop.AudioPlayerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 4 + InfectApplication(Bitnote_Digger, ShiftOSDesktop.BitNoteDiggerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 5 + InfectApplication(Bitnote_Wallet, ShiftOSDesktop.BitNoteWalletCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 6 + InfectApplication(Calculator, ShiftOSDesktop.CalculatorCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 7 + InfectApplication(Clock, ShiftOSDesktop.ClockCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 8 + InfectApplication(coherencemodeform, ShiftOSDesktop.CoherenceModeCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 9 + InfectApplication(Colour_Picker, ShiftOSDesktop.ColourPickerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 10 + InfectApplication(Dodge, ShiftOSDesktop.DodgeCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 11 + InfectApplication(Downloadmanager, ShiftOSDesktop.DownloadManagerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 12 + InfectApplication(FloodGate_Manager, ShiftOSDesktop.FloodGateManagerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 13 + InfectApplication(Graphic_Picker, ShiftOSDesktop.GraphicPickerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 14 + InfectApplication(Icon_Manager, ShiftOSDesktop.IconManagerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 15 + InfectApplication(Installer, ShiftOSDesktop.InstallerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 16 + InfectApplication(Knowledge_Input, ShiftOSDesktop.KnowledgeInputCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 17 + InfectApplication(Labyrinth, ShiftOSDesktop.LabyrinthCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 18 + InfectApplication(Name_Changer, ShiftOSDesktop.NameChangerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 19 + InfectApplication(OrcWrite, ShiftOSDesktop.OrcWriteCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 20 + InfectApplication(Pong, ShiftOSDesktop.PongCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 21 + InfectApplication(Shifter, ShiftOSDesktop.ShifterCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 22 + InfectApplication(Shiftnet, ShiftOSDesktop.ShiftNetCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 23 + InfectApplication(Shiftorium, ShiftOSDesktop.ShiftoriumCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 24 + InfectApplication(Skin_Loader, ShiftOSDesktop.SkinLoaderCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 25 + InfectApplication(Skinshifter, ShiftOSDesktop.SkinShifterCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 26 + InfectApplication(systeminfo, ShiftOSDesktop.SystemInfoCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 27 + InfectApplication(Terminal, ShiftOSDesktop.TerminalCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 28 + InfectApplication(TextPad, ShiftOSDesktop.TextpadCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 29 + InfectApplication(Video_Player, ShiftOSDesktop.VideoPlayerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 30 + InfectApplication(VirusScanner, ShiftOSDesktop.VirusScannerCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 31 + InfectApplication(Web_Browser, ShiftOSDesktop.WebBrowserCorrupted) + ShiftOSDesktop.NumberOn = ShiftOSDesktop.NumberOn + 1 + Case 32 + crash.ThePlagueBSOD() + End Select + ' Insert code to get a random application here, use the variable RandomApplicationName + ' For example, if the randomizer chooses artpad, it should be + ' RandomApplicationName = "Artpad" + ' NOT + ' RandomApplicationName = Artpad + End Sub + + Public Sub InfectApplication(application As Form, infectvar As Boolean) + If application.Visible = True Then + If infectvar = False Then + infectvar = True + application.Close() + infobox.showinfo("The Plague.", application.Name & " has been corrupted by The Plague.") + End If + Else : GetRandomApplication() + End If + ' Insert code to infect the application, RandomApplicationName is where the application name is stored + ' The corrupted variables are booleans, they are the applications name and then corrupted, + ' e.g. FileSkimmerCorrupted + ' When the variable for the random application chosen is set to true, use this code at the end + ' 'Application Name Here'.Close + ' DO NOT USE + ' RandomApplicationName.Close + ' The RandomApplicationName variable is a string, so if a random application of artpad was chosen + ' and you put MsgBox(RandomApplicationName) in this sub, if you had this virus and it chose + ' to infect artpad, a msgbox would come up with the word artpad in that msgbox. + + ' Yea... I didn't exactly stuck to your plans... + End Sub + + Public Sub removetheplague() + Viruses.ThePlague = False + theplaguetimer.Stop() + ShiftOSDesktop.FileSkimmerCorrupted = False + ShiftOSDesktop.ArtpadCorrupted = False + ShiftOSDesktop.AudioPlayerCorrupted = False + ShiftOSDesktop.BitNoteDiggerCorrupted = False + ShiftOSDesktop.BitNoteWalletCorrupted = False + ShiftOSDesktop.CalculatorCorrupted = False + ShiftOSDesktop.ClockCorrupted = False + ShiftOSDesktop.CoherenceModeCorrupted = False + ShiftOSDesktop.ColourPickerCorrupted = False + ShiftOSDesktop.DodgeCorrupted = False + ShiftOSDesktop.DownloadManagerCorrupted = False + ShiftOSDesktop.FloodGateManagerCorrupted = False + ShiftOSDesktop.GraphicPickerCorrupted = False + ShiftOSDesktop.IconManagerCorrupted = False + ShiftOSDesktop.InstallerCorrupted = False + ShiftOSDesktop.KnowledgeInputCorrupted = False + ShiftOSDesktop.LabyrinthCorrupted = False + ShiftOSDesktop.NameChangerCorrupted = False + ShiftOSDesktop.OrcWriteCorrupted = False + ShiftOSDesktop.PongCorrupted = False + ShiftOSDesktop.ShifterCorrupted = False + ShiftOSDesktop.ShiftNetCorrupted = False + ShiftOSDesktop.ShiftoriumCorrupted = False + ShiftOSDesktop.SkinLoaderCorrupted = False + ShiftOSDesktop.SkinShifterCorrupted = False + ShiftOSDesktop.SnakeyCorrupted = False + ShiftOSDesktop.SystemInfoCorrupted = False + ShiftOSDesktop.TerminalCorrupted = False + ShiftOSDesktop.TextpadCorrupted = False + ShiftOSDesktop.VideoPlayerCorrupted = False + ShiftOSDesktop.VirusScannerCorrupted = False + ShiftOSDesktop.WebBrowserCorrupted = False + End Sub +End Module diff --git a/ShiftOS/Web Browser.Designer.vb b/ShiftOS/Web Browser.Designer.vb new file mode 100644 index 0000000..38f9234 --- /dev/null +++ b/ShiftOS/Web Browser.Designer.vb @@ -0,0 +1,459 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Web_Browser + 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() + Me.components = New System.ComponentModel.Container() + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnlwebtabholder = New System.Windows.Forms.Panel() + Me.tabs = New TabControl 'ShiftOS.ShiftOSTabs() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.btnhome = New System.Windows.Forms.Button() + Me.txtlocation = New System.Windows.Forms.TextBox() + Me.btnforward = New System.Windows.Forms.Button() + Me.btnback = New System.Windows.Forms.Button() + Me.Panel2 = New System.Windows.Forms.Panel() + Me.pnloptions = New System.Windows.Forms.Panel() + Me.btnRemTab = New System.Windows.Forms.Button() + Me.btnAddTab = New System.Windows.Forms.Button() + Me.siteloadprogress = New ShiftOS.ProgressBarEX() + Me.pgleft = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.TabText = New System.Windows.Forms.Timer(Me.components) + Me.UrlText = New System.Windows.Forms.Timer(Me.components) + Me.Progress = New System.Windows.Forms.Timer(Me.components) + Me.BrowserProgress = New ShiftOS.ProgressBarEX() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnlwebtabholder.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.pnloptions.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 598) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(1054, 2) + Me.pgbottom.TabIndex = 23 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 568) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(1056, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 570) + Me.pgright.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(110, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Web Browser" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(1056, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 568) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlwebtabholder) + Me.pgcontents.Controls.Add(Me.Panel1) + Me.pgcontents.Controls.Add(Me.pnloptions) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(1054, 568) + Me.pgcontents.TabIndex = 20 + ' + 'pnlwebtabholder + ' + Me.pnlwebtabholder.Controls.Add(Me.tabs) + Me.pnlwebtabholder.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnlwebtabholder.Location = New System.Drawing.Point(0, 36) + Me.pnlwebtabholder.Name = "pnlwebtabholder" + Me.pnlwebtabholder.Size = New System.Drawing.Size(1054, 487) + Me.pnlwebtabholder.TabIndex = 6 + ' + 'tabs + ' + Me.tabs.Dock = System.Windows.Forms.DockStyle.Fill + Me.tabs.ItemSize = New System.Drawing.Size(120, 30) + Me.tabs.Location = New System.Drawing.Point(0, 0) + Me.tabs.Name = "tabs" + Me.tabs.SelectedIndex = 0 + Me.tabs.Size = New System.Drawing.Size(1054, 487) + Me.tabs.SizeMode = System.Windows.Forms.TabSizeMode.Fixed + Me.tabs.TabIndex = 0 + ' + 'Panel1 + ' + Me.Panel1.Controls.Add(Me.btnhome) + Me.Panel1.Controls.Add(Me.txtlocation) + Me.Panel1.Controls.Add(Me.btnforward) + Me.Panel1.Controls.Add(Me.btnback) + Me.Panel1.Controls.Add(Me.Panel2) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(1054, 36) + Me.Panel1.TabIndex = 0 + ' + 'btnhome + ' + Me.btnhome.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnhome.BackColor = System.Drawing.Color.White + Me.btnhome.BackgroundImage = Global.ShiftOS.My.Resources.Resources.webhome + Me.btnhome.FlatAppearance.BorderSize = 0 + Me.btnhome.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnhome.Location = New System.Drawing.Point(1019, 5) + Me.btnhome.Name = "btnhome" + Me.btnhome.Size = New System.Drawing.Size(30, 25) + Me.btnhome.TabIndex = 10 + Me.btnhome.UseVisualStyleBackColor = False + ' + 'txtlocation + ' + Me.txtlocation.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtlocation.BackColor = System.Drawing.Color.White + Me.txtlocation.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtlocation.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtlocation.Location = New System.Drawing.Point(73, 5) + Me.txtlocation.Multiline = True + Me.txtlocation.Name = "txtlocation" + Me.txtlocation.Size = New System.Drawing.Size(942, 25) + Me.txtlocation.TabIndex = 9 + Me.txtlocation.Text = "Search or Enter an address" + ' + 'btnforward + ' + Me.btnforward.BackColor = System.Drawing.Color.White + Me.btnforward.BackgroundImage = Global.ShiftOS.My.Resources.Resources.webforward + Me.btnforward.FlatAppearance.BorderSize = 0 + Me.btnforward.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnforward.Location = New System.Drawing.Point(39, 5) + Me.btnforward.Name = "btnforward" + Me.btnforward.Size = New System.Drawing.Size(30, 25) + Me.btnforward.TabIndex = 8 + Me.btnforward.UseVisualStyleBackColor = False + ' + 'btnback + ' + Me.btnback.BackColor = System.Drawing.Color.White + Me.btnback.BackgroundImage = Global.ShiftOS.My.Resources.Resources.webback + Me.btnback.FlatAppearance.BorderSize = 0 + Me.btnback.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnback.Location = New System.Drawing.Point(5, 5) + Me.btnback.Name = "btnback" + Me.btnback.Size = New System.Drawing.Size(30, 25) + Me.btnback.TabIndex = 7 + Me.btnback.UseVisualStyleBackColor = False + ' + 'Panel2 + ' + Me.Panel2.BackColor = System.Drawing.Color.Black + Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom + Me.Panel2.Location = New System.Drawing.Point(0, 35) + Me.Panel2.Name = "Panel2" + Me.Panel2.Size = New System.Drawing.Size(1054, 1) + Me.Panel2.TabIndex = 6 + ' + 'pnloptions + ' + Me.pnloptions.Controls.Add(Me.BrowserProgress) + Me.pnloptions.Controls.Add(Me.btnRemTab) + Me.pnloptions.Controls.Add(Me.btnAddTab) + Me.pnloptions.Controls.Add(Me.siteloadprogress) + Me.pnloptions.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnloptions.Location = New System.Drawing.Point(0, 523) + Me.pnloptions.Name = "pnloptions" + Me.pnloptions.Size = New System.Drawing.Size(1054, 45) + Me.pnloptions.TabIndex = 5 + ' + 'btnRemTab + ' + Me.btnRemTab.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnRemTab.Location = New System.Drawing.Point(93, 16) + Me.btnRemTab.Name = "btnRemTab" + Me.btnRemTab.Size = New System.Drawing.Size(81, 23) + Me.btnRemTab.TabIndex = 22 + Me.btnRemTab.Text = "Remove Tab" + Me.btnRemTab.UseVisualStyleBackColor = True + ' + 'btnAddTab + ' + Me.btnAddTab.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAddTab.Location = New System.Drawing.Point(6, 16) + Me.btnAddTab.Name = "btnAddTab" + Me.btnAddTab.Size = New System.Drawing.Size(81, 23) + Me.btnAddTab.TabIndex = 21 + Me.btnAddTab.Text = "Add Tab" + Me.btnAddTab.UseVisualStyleBackColor = True + ' + 'siteloadprogress + ' + Me.siteloadprogress.BackColor = System.Drawing.Color.White + Me.siteloadprogress.BlockSeparation = 3 + Me.siteloadprogress.BlockWidth = 5 + Me.siteloadprogress.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.siteloadprogress.Color = System.Drawing.Color.Gray + Me.siteloadprogress.Dock = System.Windows.Forms.DockStyle.Top + Me.siteloadprogress.Location = New System.Drawing.Point(0, 0) + Me.siteloadprogress.MaxValue = 100 + Me.siteloadprogress.MinValue = 0 + Me.siteloadprogress.Name = "siteloadprogress" + Me.siteloadprogress.Orientation = ShiftOS.ProgressBarEX.ProgressBarOrientation.Horizontal + Me.siteloadprogress.ShowValue = False + Me.siteloadprogress.Size = New System.Drawing.Size(1054, 10) + Me.siteloadprogress.Step = 10 + Me.siteloadprogress.Style = ShiftOS.ProgressBarEX.ProgressBarExStyle.Continuous + Me.siteloadprogress.TabIndex = 20 + Me.siteloadprogress.Value = 0 + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 570) + Me.pgleft.TabIndex = 21 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(1058, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconWebBrowser + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'TabText + ' + Me.TabText.Enabled = True + ' + 'UrlText + ' + Me.UrlText.Enabled = True + ' + 'Progress + ' + ' + 'BrowserProgress + ' + Me.BrowserProgress.BackColor = System.Drawing.Color.Black + Me.BrowserProgress.BlockSeparation = 3 + Me.BrowserProgress.BlockWidth = 5 + Me.BrowserProgress.Color = System.Drawing.Color.Lime + Me.BrowserProgress.ForeColor = System.Drawing.SystemColors.ActiveCaption + Me.BrowserProgress.Location = New System.Drawing.Point(894, 16) + Me.BrowserProgress.MaxValue = 100 + Me.BrowserProgress.MinValue = 0 + Me.BrowserProgress.Name = "BrowserProgress" + Me.BrowserProgress.Orientation = ShiftOS.ProgressBarEX.ProgressBarOrientation.Horizontal + Me.BrowserProgress.ShowValue = True + Me.BrowserProgress.Size = New System.Drawing.Size(150, 23) + Me.BrowserProgress.Step = 10 + Me.BrowserProgress.Style = ShiftOS.ProgressBarEX.ProgressBarExStyle.Blocks + Me.BrowserProgress.TabIndex = 23 + Me.BrowserProgress.Value = 0 + Me.BrowserProgress.Visible = False + ' + 'Web_Browser + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(1058, 600) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.MinimumSize = New System.Drawing.Size(300, 200) + Me.Name = "Web_Browser" + Me.Text = "Web_Browser" + Me.TopMost = True + Me.pgright.ResumeLayout(False) + Me.pgcontents.ResumeLayout(False) + Me.pnlwebtabholder.ResumeLayout(False) + Me.Panel1.ResumeLayout(False) + Me.Panel1.PerformLayout() + Me.pnloptions.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents Panel1 As System.Windows.Forms.Panel + Friend WithEvents btnhome As System.Windows.Forms.Button + Friend WithEvents txtlocation As System.Windows.Forms.TextBox + Friend WithEvents btnforward As System.Windows.Forms.Button + Friend WithEvents btnback As System.Windows.Forms.Button + Friend WithEvents Panel2 As System.Windows.Forms.Panel + Friend WithEvents pnloptions As System.Windows.Forms.Panel + Friend WithEvents pnlwebtabholder As System.Windows.Forms.Panel + Friend WithEvents siteloadprogress As ShiftOS.ProgressBarEX + Friend WithEvents tabs As TabControl 'ShiftOS.ShiftOSTabs + Friend WithEvents btnAddTab As System.Windows.Forms.Button + Friend WithEvents btnRemTab As System.Windows.Forms.Button + Friend WithEvents TabText As System.Windows.Forms.Timer + Friend WithEvents UrlText As System.Windows.Forms.Timer + Friend WithEvents BrowserProgress As ShiftOS.ProgressBarEX + Friend WithEvents Progress As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/Web Browser.resx b/ShiftOS/Web Browser.resx new file mode 100644 index 0000000..3013af3 --- /dev/null +++ b/ShiftOS/Web Browser.resx @@ -0,0 +1,138 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 57</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>111, 57</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>195, 57</value> + </metadata> + <metadata name="TabText.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>308, 57</value> + </metadata> + <metadata name="UrlText.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>397, 57</value> + </metadata> + <metadata name="Progress.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>487, 57</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/Web Browser.vb b/ShiftOS/Web Browser.vb new file mode 100644 index 0000000..49b2a6d --- /dev/null +++ b/ShiftOS/Web Browser.vb @@ -0,0 +1,535 @@ +Imports Skybound.Gecko + +Public Class Web_Browser + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 696 + Public minimumsizeheight As Integer = 300 + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + If ShiftOSDesktop.WebBrowserCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") + + ShiftOSDesktop.pnlpanelbuttonwebbrowser.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonwebbrowser, ShiftOSDesktop.tbwebbrowsericon, ShiftOSDesktop.tbwebbrowsertext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + + addtab() + + 'webwindowt1.BringToFront() + 'webwindowt1.Dock = DockStyle.Fill + + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(800, 600) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.webbrowsername 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftneticon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.webbrowsericontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + 'To re add gecko, replace all refrences to WebBrowser with Skybound.Gecko.GeckoWebBrowser. I would do it but i dont have the files! + + Public Sub addtab() + Dim tab As New TabPage + Dim brwsr As New WebBrowser 'NEEDS TO CHANGE TO GECKO OR WEBKIT + tabs.TabPages.Add(tab) + tab.Controls.Add(brwsr) + brwsr.Dock = DockStyle.Fill + tabs.SelectedTab = tab + brwsr.Navigate("http://www.google.com") + End Sub + + Private Sub btnAddTab_Click(sender As Object, e As EventArgs) Handles btnAddTab.Click + addtab() + End Sub + + Private Sub TabText_Tick(sender As Object, e As EventArgs) Handles TabText.Tick + For Each opentab As TabPage In tabs.TabPages + For Each browser As WebBrowser In opentab.Controls + opentab.Text = browser.DocumentTitle + Next + Next + End Sub + + Private Sub btnback_Click(sender As Object, e As EventArgs) Handles btnback.Click + Try + CType(tabs.SelectedTab.Controls.Item(0), WebBrowser).GoBack() + Catch + End Try + End Sub + + Private Sub UrlText_Tick(sender As Object, e As EventArgs) Handles UrlText.Tick + Try + txtlocation.Text = (CType(tabs.SelectedTab.Controls.Item(0), WebBrowser).Url.AbsoluteUri.ToString) + Catch + End Try + End Sub + + Private Sub txtlocation_Click(sender As Object, e As EventArgs) Handles txtlocation.Click + txtlocation.Text = "" + UrlText.Stop() + End Sub + + Private Sub txtlocation_LostFocus(sender As Object, e As EventArgs) Handles txtlocation.LostFocus + UrlText.Start() + End Sub + + Private Sub btnforward_Click(sender As Object, e As EventArgs) Handles btnforward.Click + Try + CType(tabs.SelectedTab.Controls.Item(0), WebBrowser).GoForward() + Catch + End Try + End Sub + + Private Sub btnhome_Click(sender As Object, e As EventArgs) Handles btnhome.Click + If tabs.TabCount > 1 Then + Try + CType(tabs.SelectedTab.Controls.Item(0), WebBrowser).Navigate("http://www.google.com") + Catch + End Try + Else + addtab() + Try + CType(tabs.SelectedTab.Controls.Item(0), WebBrowser).Navigate("http://www.google.com") + Catch + End Try + End If + End Sub + + Private Sub Web_Browser_PreviewKeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles Me.PreviewKeyDown + + End Sub + + Private Sub txtlocation_PreviewKeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles txtlocation.PreviewKeyDown + If tabs.TabCount > 1 Then + If e.KeyCode = Keys.Enter Then + CType(tabs.SelectedTab.Controls.Item(0), WebBrowser).Navigate(txtlocation.Text) + End If + Else + If e.KeyCode = Keys.Enter Then + addtab() + CType(tabs.SelectedTab.Controls.Item(0), WebBrowser).Navigate(txtlocation.Text) + End If + End If + End Sub + + Private Sub btnRemTab_Click(sender As Object, e As EventArgs) Handles btnRemTab.Click + If tabs.TabCount > 1 Then + tabs.Controls.Remove(tabs.SelectedTab) + Else + tabs.Controls.Remove(tabs.SelectedTab) + Me.Close() + End If + End Sub + + Private Sub Progress_Tick(sender As Object, e As EventArgs) Handles Progress.Tick + 'BrowserProgress.MaxValue = (CType(tabs.SelectedTab.Controls.Item(0), WebBrowser) + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/Window.vb b/ShiftOS/Window.vb new file mode 100644 index 0000000..641034f --- /dev/null +++ b/ShiftOS/Window.vb @@ -0,0 +1,1127 @@ +Public Class Window + +#Region "NATIVE" + Private Enum GW + NONE = -1 + HWNDFIRST = 0 + HWNDLAST = 1 + HWNDNEXT = 2 + HWNDPREV = 3 + OWNER = 4 + CHILD = 5 + ENABLEDPOPUP = 6 + End Enum + Private Declare Function GetWindow Lib "user32.dll" (ByVal hWnd As IntPtr, ByVal uCmd As GW) As IntPtr + Private Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As IntPtr) As Integer + Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As IntPtr, ByVal lpString As System.Text.StringBuilder, ByVal cch As Integer) As Integer + Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As IntPtr, ByVal lpString As String) As Boolean + Private Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As Integer, ByVal lpClassName As System.Text.StringBuilder, ByVal nMaxCount As Integer) As Integer + Private Declare Function GetParent Lib "user32" (ByVal hWnd As IntPtr) As IntPtr + Private Declare Function SetParent Lib "user32" (ByVal hWndChild As IntPtr, ByVal hWndNewParent As IntPtr) As Integer + Private Declare Function GetWindowRect Lib "user32" (ByVal hWnd As System.Runtime.InteropServices.HandleRef, ByRef lpRect As API.WRECT) As Boolean + Private Declare Function GetClientRect Lib "user32" (ByVal hWnd As System.Runtime.InteropServices.HandleRef, ByRef lpRect As API.WRECT) As Boolean + Private Enum SWP As UInteger + ''' <summary>If the calling thread and the thread that owns the window are attached to different input queues, + ''' the system posts the request to the thread that owns the window. This prevents the calling thread from + ''' blocking its execution while other threads process the request.</summary> + ''' <remarks>SWP_ASYNCWINDOWPOS</remarks> + SynchronousWindowPosition = &H4000 + ''' <summary>Prevents generation of the WM_SYNCPAINT message.</summary> + ''' <remarks>SWP_DEFERERASE</remarks> + DeferErase = &H2000 + ''' <summary>Draws a frame (defined in the window's class description) around the window.</summary> + ''' <remarks>SWP_DRAWFRAME</remarks> + DrawFrame = &H20 + ''' <summary>Applies new frame styles set using the SetWindowLong function. Sends a WM_NCCALCSIZE message to + ''' the window, even if the window's size is not being changed. If this flag is not specified, WM_NCCALCSIZE + ''' is sent only when the window's size is being changed.</summary> + ''' <remarks>SWP_FRAMECHANGED</remarks> + FrameChanged = &H20 + ''' <summary>Hides the window.</summary> + ''' <remarks>SWP_HIDEWINDOW</remarks> + HideWindow = &H80 + ''' <summary>Does not activate the window. If this flag is not set, the window is activated and moved to the + ''' top of either the topmost or non-topmost group (depending on the setting of the hWndInsertAfter + ''' parameter).</summary> + ''' <remarks>SWP_NOACTIVATE</remarks> + DoNotActivate = &H10 + ''' <summary>Discards the entire contents of the client area. If this flag is not specified, the valid + ''' contents of the client area are saved and copied back into the client area after the window is sized or + ''' repositioned.</summary> + ''' <remarks>SWP_NOCOPYBITS</remarks> + DoNotCopyBits = &H100 + ''' <summary>Retains the current position (ignores X and Y parameters).</summary> + ''' <remarks>SWP_NOMOVE</remarks> + IgnoreMove = &H2 + ''' <summary>Does not change the owner window's position in the Z order.</summary> + ''' <remarks>SWP_NOOWNERZORDER</remarks> + DoNotChangeOwnerZOrder = &H200 + ''' <summary>Does not redraw changes. If this flag is set, no repainting of any kind occurs. This applies to + ''' the client area, the nonclient area (including the title bar and scroll bars), and any part of the parent + ''' window uncovered as a result of the window being moved. When this flag is set, the application must + ''' explicitly invalidate or redraw any parts of the window and parent window that need redrawing.</summary> + ''' <remarks>SWP_NOREDRAW</remarks> + DoNotRedraw = &H8 + ''' <summary>Same as the SWP_NOOWNERZORDER flag.</summary> + ''' <remarks>SWP_NOREPOSITION</remarks> + DoNotReposition = &H200 + ''' <summary>Prevents the window from receiving the WM_WINDOWPOSCHANGING message.</summary> + ''' <remarks>SWP_NOSENDCHANGING</remarks> + DoNotSendChangingEvent = &H400 + ''' <summary>Retains the current size (ignores the cx and cy parameters).</summary> + ''' <remarks>SWP_NOSIZE</remarks> + IgnoreResize = &H1 + ''' <summary>Retains the current Z order (ignores the hWndInsertAfter parameter).</summary> + ''' <remarks>SWP_NOZORDER</remarks> + IgnoreZOrder = &H4 + ''' <summary>Displays the window.</summary> + ''' <remarks>SWP_SHOWWINDOW</remarks> + ShowWindow = &H40 + End Enum + Private Enum HWNDafter As Integer + BOTTOM = 1 + NOTOPMOST = -2 + TOP = 0 + TOPMOST = -1 + End Enum + Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As IntPtr, ByVal hWndInsertAfter As HWNDafter, ByVal X As Integer, ByVal Y As Integer, ByVal cx As Integer, ByVal cy As Integer, ByVal uFlags As SWP) As Boolean + + Private Declare Function IsWindow Lib "user32" (ByVal hWnd As IntPtr) As Boolean + Private Declare Function IsWindowVisible Lib "user32" (ByVal hWnd As IntPtr) As Boolean + Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As IntPtr, ByVal time As Integer, ByVal flags As AnimateFlags) As Boolean + Private Declare Function RedrawWindow Lib "user32" (ByVal hWnd As IntPtr, ByVal lprcUpdate As IntPtr, ByVal hrgnUpdate As IntPtr, ByVal flags As RedrawFlags) As Boolean + Private Declare Function FlashWindow Lib "user32" (ByVal hWnd As IntPtr, ByVal bInvert As Boolean) As Boolean + Private Declare Function PrintWindow Lib "user32" (ByVal hwnd As IntPtr, ByVal hDC As IntPtr, ByVal nFlags As UInteger) As Boolean + Private Declare Function GetDC Lib "user32" (ByVal hwnd As IntPtr) As IntPtr + Private Declare Function GetWindowDC Lib "user32" (ByVal hwnd As IntPtr) As IntPtr + Private Declare Function ScreenToClient Lib "user32" (ByVal hWnd As IntPtr, ByRef lpPoint As Point) As Boolean + Private Declare Function ClientToScreen Lib "user32" (ByVal hWnd As IntPtr, ByRef lpPoint As Point) As Boolean + Private Declare Function SetCapture Lib "user32" (ByVal hwnd As IntPtr) As IntPtr + Private Declare Function ReleaseCapture Lib "user32" () As IntPtr + Private Declare Function GetCapture Lib "user32" () As IntPtr + + Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr + Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal parentHandle As IntPtr, ByVal childAfter As IntPtr, ByVal className As String, ByVal windowTitle As IntPtr) As IntPtr + Private Declare Function WindowFromPoint Lib "user32" (ByVal Point As API.WPOINT) As IntPtr + Private Declare Function ChildWindowFromPoint Lib "user32" (ByVal hWndParent As IntPtr, ByVal point As API.WPOINT) As IntPtr + Private Declare Function GetForegroundWindow Lib "user32" () As IntPtr + Private Declare Function SetForegroundWindow Lib "user32" (ByVal hWnd As IntPtr) As Boolean + Private Declare Function GetDesktopWindow Lib "user32" () As IntPtr + Private Declare Function GetTopWindow Lib "user32" (ByVal hwnd As IntPtr) As IntPtr + Private Declare Function GetFocus Lib "user32" () As IntPtr + Private Declare Function GetActiveWindow Lib "user32.dll" () As IntPtr + Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As IntPtr, ByRef lpdwProcessId As Integer) As Integer + + Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As IntPtr, ByVal bRevert As Boolean) As IntPtr + Private Declare Function GetMenu Lib "user32" (ByVal hWnd As IntPtr) As IntPtr + Private Declare Function GetSubMenu Lib "user32" (ByVal hMenu As IntPtr, ByVal nPos As Integer) As IntPtr + + Private Enum GWL As Integer + WNDPROC = -4 + HINSTANCE = -6 + HWNDPARENT = -8 + STYLE = -16 + EXSTYLE = -20 + USERDATA = -21 + ID = -12 + End Enum + Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As IntPtr, ByVal nIndex As GWL, ByVal dwNewLong As Long) As Integer + <Runtime.InteropServices.DllImport("user32.dll", EntryPoint:="GetWindowLong")> _ + Private Shared Function GetWindowLongPtr32(ByVal hWnd As Runtime.InteropServices.HandleRef, ByVal nIndex As Integer) As Long + End Function + <Runtime.InteropServices.DllImport("user32.dll", EntryPoint:="GetWindowLongPtr")> _ + Private Shared Function GetWindowLongPtr64(ByVal hWnd As Runtime.InteropServices.HandleRef, ByVal nIndex As Integer) As Long + End Function + Private Shared Function GetWindowLong(ByVal hwnd As Runtime.InteropServices.HandleRef, ByVal nIndex As GWL) As Long + If IntPtr.Size = 8 Then + Return GetWindowLongPtr64(hwnd, nIndex) + Else + Return GetWindowLongPtr32(hwnd, nIndex) + End If + End Function + + Private Structure LayeredWindowAttributes + Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As IntPtr, ByVal crKey As Integer, ByVal alpha As Byte, ByVal dwFlags As LWA) As Boolean + Private Declare Function GetLayeredWindowAttributes Lib "user32" (ByVal hWnd As IntPtr, ByRef crKey As Integer, ByRef alpha As Byte, ByRef dwFlags As LWA) As Boolean + Public Sub New(ByVal hwnd As IntPtr) + Me.hwnd = hwnd + GetLayeredWindowAttributes(Me.hwnd, Me.crKey, Me.alpha, Me.dwFlags) + End Sub + Private hwnd As IntPtr + Public crKey As Integer + Public alpha As Byte + Private dwFlags As LWA + Private Enum LWA As Integer + ColorKey = &H1 + Alpha = &H2 + End Enum + Public Property UseColorKey() As Boolean + Get + Return (Me.dwFlags And LWA.ColorKey) = LWA.ColorKey + End Get + Set(ByVal value As Boolean) + If (Me.dwFlags And LWA.ColorKey) = LWA.ColorKey <> value Then + If value = True Then Me.dwFlags += LWA.ColorKey Else Me.dwFlags -= LWA.ColorKey + End If + End Set + End Property + Public Property UseAlpha() As Boolean + Get + Return (Me.dwFlags And LWA.Alpha) = LWA.Alpha + End Get + Set(ByVal value As Boolean) + If (Me.dwFlags And LWA.Alpha) = LWA.Alpha <> value Then + If value = True Then Me.dwFlags += LWA.Alpha Else Me.dwFlags -= LWA.Alpha + End If + End Set + End Property + Public Function Apply() As Boolean + Return SetLayeredWindowAttributes(Me.hwnd, Me.crKey, Me.alpha, Me.dwFlags) + End Function + End Structure + + Private Structure WindowPlacement + Private Declare Function SetWindowPlacement Lib "user32" (ByVal hWnd As IntPtr, ByRef lpwndpl As WindowPlacement) As Boolean + Private Declare Function GetWindowPlacement Lib "user32" (ByVal hWnd As IntPtr, ByRef lpwndpl As WindowPlacement) As Boolean + Sub New(ByVal hWnd As IntPtr) + Me.length = System.Runtime.InteropServices.Marshal.SizeOf(Me) + GetWindowPlacement(hWnd, Me) + End Sub + Public Function Send(ByVal hWnd As IntPtr) As Boolean + Return SetWindowPlacement(hWnd, Me) + End Function + Public length As Integer + Public flags As WPF + Public showCmd As State + Public minimizedPosition As API.WPOINT + Public maximizedPosition As API.WPOINT + Public normalPosition As API.WRECT + Public Enum WPF As Integer + ASyncWindowPlacement = 4 + RestoreToMaximized = 2 + SetMinimizedPosition = 1 + End Enum + End Structure + Private Class Enumerator + Private Delegate Function EnumCallBackDelegate(ByVal hwnd As Integer, ByVal lParam As Integer) As Integer + Private Declare Function EnumWindows Lib "user32" (ByVal lpEnumFunc As EnumCallBackDelegate, ByVal lParam As Integer) As Integer + Private Declare Function EnumChildWindows Lib "user32" (ByVal hWndParent As Integer, ByVal lpEnumFunc As EnumCallBackDelegate, ByVal lParam As Integer) As Integer + Private Declare Function EnumThreadWindows Lib "user32" (ByVal dwThreadId As UInteger, ByVal lpfn As EnumCallBackDelegate, ByVal lParam As Integer) As Boolean + Private Declare Function EnumDesktopWindows Lib "user32" (ByVal hDesktop As IntPtr, ByVal lpfn As EnumCallBackDelegate, ByVal lparam As Integer) As Boolean + + Private Function EnumProc(ByVal hwnd As Int32, ByVal lParam As Int32) As Int32 + If lParam = 1 AndAlso GetParent(hwnd) = 0 AndAlso IsWindowVisible(hwnd) Then _list.Add(hwnd) 'toplevel + If lParam = 2 Then _list.Add(hwnd) 'childwindows + If lParam = 3 Then _list.Add(hwnd) 'threadwindows + If lParam = 4 Then _list.Add(hwnd) 'desktopwindows + Return 1 + End Function + + Private _list As List(Of IntPtr) + Public Function GetTopLevelWindows() As List(Of IntPtr) + _list = New List(Of IntPtr) + EnumWindows(AddressOf EnumProc, 1) + Return _list + End Function + Public Function GetChildWindows(ByVal hwnd As Int32) As List(Of IntPtr) + _list = New List(Of IntPtr) + EnumChildWindows(hwnd, AddressOf EnumProc, 2) + Return _list + End Function + Public Function GetThreadWindows(ByVal threadID As Integer) As List(Of IntPtr) + _list = New List(Of IntPtr) + EnumThreadWindows(threadID, AddressOf EnumProc, 3) + Return _list + End Function + Public Function GetDesktopWindows(ByVal desktop As IntPtr) As List(Of IntPtr) + _list = New List(Of IntPtr) + EnumDesktopWindows(desktop, AddressOf EnumProc, 4) + Return _list + End Function + End Class + + Public Structure KeyCommand + Sub New(ByVal Key As Keys, ByVal EventType As KeyEvent) + Dim Up As Boolean = EventType = KeyEvent.Up + Dim Alt As Boolean = (Key And Keys.Alt) = Keys.Alt + Dim F10 As Boolean = (Key And Keys.F10) = Keys.F10 + If Alt Or F10 Then EventType += 4 'offset to sys_ + + Me.Key = Key + Me.EventType = EventType + Me.Flags = EventFlag.None + If Up Then Me.Flags = EventFlag.PrevWasDown + If Up And Not Alt And Not F10 Then Me.Flags += EventFlag.Transition + If Alt And Not Up Then Me.Flags += EventFlag.AltKeyDown + + Dim extended As Boolean = False + If Key = Keys.LControlKey Or Key = Keys.RControlKey Then extended = True + If Key = Keys.LShiftKey Or Key = Keys.RShiftKey Then extended = True + If Key = Keys.LMenu Or Key = Keys.RMenu Then extended = True + If extended Then Me.Flags += EventFlag.ExtendedKey + Me.RepeatCount = 0 + Me.scancode = 0 + End Sub + Sub New(ByVal Character As Char) + Me.Key = Asc(Character) + Me.EventType = KeyEvent.CharPress + Me.Flags = EventFlag.None + End Sub + Public EventType As KeyEvent + Public Key As Keys + Public RepeatCount As UShort + Public scancode As Byte + Public Flags As Byte + Public Enum EventFlag As Byte + None = 0 + ExtendedKey = 1 + AltKeyDown = 32 + PrevWasDown = 64 + Transition = 128 + End Enum + Public Function Post(ByVal hwnd As IntPtr) As Boolean + Return API.PostMessage(hwnd, EventType, Key, API.DWORD.FromSBB(Me.RepeatCount, Me.scancode, Me.Flags)) + End Function + End Structure + Public Structure MouseCommand + Sub New(ByVal X As UShort, ByVal Y As UShort, Optional ByVal Button As MouseButtons = MouseButtons.None, Optional ByVal EventType As MouseEvent = MouseEvent.Move) + Me.EventType = EventType + Me.Button = Button + Me.Modifier = MK.NONE + Me.x = X + Me.y = Y + End Sub + Sub New(ByVal Location As Point, Optional ByVal Button As MouseButtons = MouseButtons.None, Optional ByVal EventType As MouseEvent = MouseEvent.Move) + Me.EventType = EventType + Me.Button = Button + Me.Modifier = MK.NONE + Me.x = Location.X + Me.y = Location.Y + End Sub + Public EventType As MouseEvent + Public Button As MouseButtons + Public x As UShort + Public y As UShort + Public Modifier As MK + Public Function Post(ByVal hwnd As IntPtr) As Boolean + Dim msg1 As msg = 0 + Dim msg2 As msg = 0 + Dim add As Boolean = EventType >= 0 And EventType <= 2 + Select Case Button + Case MouseButtons.Left + msg1 = msg.LBUTTONDOWN + Case MouseButtons.Middle + msg1 = msg.MBUTTONDOWN + Case MouseButtons.Right + msg1 = msg.RBUTTONDOWN + Case Else + add = False + msg1 = msg.MOUSEMOVE + End Select + If EventType = MouseEvent.DoubleClick Then + msg2 = msg1 + MouseEvent.Up + msg1 = msg1 + MouseEvent.DoubleClick + ElseIf EventType = MouseEvent.Click Then + msg2 = msg1 + MouseEvent.Up + msg1 = msg1 + MouseEvent.Down + ElseIf add Then + msg1 += EventType + End If + + Dim success As Boolean = True + If msg1 <> 0 AndAlso Not API.PostMessage(hwnd, msg1, Modifier, New API.DWORD(Me.x, Me.y)) Then success = False + If msg2 <> 0 AndAlso Not API.PostMessage(hwnd, msg2, Modifier, New API.DWORD(Me.x, Me.y)) Then success = False + Return success + End Function + Public Enum MK As Integer + 'No keys are down + NONE = &H0 + 'The CTRL key is down. + CONTROL = &H8 + 'The left mouse button is down. + LBUTTON = &H1 + 'The middle mouse button is down. + MBUTTON = &H10 + 'The right mouse button is down. + RBUTTON = &H2 + 'The SHIFT key is down. + SHIFT = &H4 + 'The first X button is down. + XBUTTON1 = &H20 + 'The second X button is down. + XBUTTON2 = &H40 + End Enum + + Private Enum msg As UInteger + MOUSEACTIVATE = &H21 + MOUSEMOVE = &H200 + LBUTTONDOWN = 513 + LBUTTONUP = 514 + LBUTTONDBLCLK = 515 + RBUTTONDOWN = 516 + RBUTTONUP = 517 + RBUTTONDBLCLK = 518 + MBUTTONDOWN = 519 + MBUTTONUP = 520 + MBUTTONDBLCLK = 521 + End Enum + End Structure +#End Region + + Public Enum KeyEvent + Down = &H100 + Up = &H101 + CharPress = &H102 + End Enum + Public Enum MouseEvent + Down = 0 + Up = 1 + DoubleClick = 2 + Click = 3 + Move = 4 + End Enum + Public Enum RedrawFlags As UInteger + ''' <summary> + ''' Invalidates the rectangle or region that you specify in lprcUpdate or hrgnUpdate. + ''' You can set only one of these parameters to a non-NULL value. If both are NULL, RDW_INVALIDATE invalidates the entire window. + ''' </summary> + Invalidate = &H1 + ''' <summary>Causes the OS to post a WM_PAINT message to the window regardless of whether a portion of the window is invalid.</summary> + InternalPaint = &H2 + ''' <summary> + ''' Causes the window to receive a WM_ERASEBKGND message when the window is repainted. + ''' Specify this value in combination with the RDW_INVALIDATE value; otherwise, RDW_ERASE has no effect. + ''' </summary> + [Erase] = &H4 + ''' <summary> + ''' Validates the rectangle or region that you specify in lprcUpdate or hrgnUpdate. + ''' You can set only one of these parameters to a non-NULL value. If both are NULL, RDW_VALIDATE validates the entire window. + ''' This value does not affect internal WM_PAINT messages. + ''' </summary> + Validate = &H8 + NoInternalPaint = &H10 + ''' <summary>Suppresses any pending WM_ERASEBKGND messages.</summary> + NoErase = &H20 + ''' <summary>Excludes child windows, if any, from the repainting operation.</summary> + NoChildren = &H40 + ''' <summary>Includes child windows, if any, in the repainting operation.</summary> + AllChildren = &H80 + ''' <summary>Causes the affected windows, which you specify by setting the RDW_ALLCHILDREN and RDW_NOCHILDREN values, to receive WM_ERASEBKGND and WM_PAINT messages before the RedrawWindow returns, if necessary.</summary> + UpdateNow = &H100 + ''' <summary> + ''' Causes the affected windows, which you specify by setting the RDW_ALLCHILDREN and RDW_NOCHILDREN values, to receive WM_ERASEBKGND messages before RedrawWindow returns, if necessary. + ''' The affected windows receive WM_PAINT messages at the ordinary time. + ''' </summary> + EraseNow = &H200 + Frame = &H400 + NoFrame = &H800 + End Enum + Public Enum AnimateFlags + HOR_POSITIVE = &H1 + HOR_NEGATIVE = &H2 + VER_POSITIVE = &H4 + VER_NEGATIVE = &H8 + CENTER = &H10 + HIDE = &H10000 + ACTIVATE = &H20000 + SLIDE = &H40000 + BLEND = &H80000 + End Enum + Public Enum State + Hidden = 0 + Normal = 1 + Minimized = 2 + Maximized = 3 + Shown = 5 + End Enum + Public Enum Styles As Long + ControlBox = &H80000L + MinimizeBox = &H20000L + MaximizeBox = &H10000L + Sizable = ThickFrame + Border = &H800000L + Caption = &HC00000L + Visible = &H10000000L + Disabled = &H8000000L + Child = &H40000000L + VScrollBar = &H200000L + HScrollBar = &H100000L + TabStop = &H10000L + Group = &H20000L + ClipSiblings = &H4000000L + ClipChildren = &H2000000L + ThickFrame = &H40000L + DialogFrame = &H400000L + + 'initial start state + Minimize = &H20000000L + Maximize = &H1000000L + + Overlapped = &H0L + Tiled = Overlapped + OverlappedWindow = (Overlapped Or Caption Or Styles.ControlBox Or ThickFrame Or MinimizeBox Or MaximizeBox) + TiledWindow = OverlappedWindow + + PopUp = &H80000000L + PopUpWindow = (PopUp Or Border Or Styles.ControlBox) + End Enum + Public Enum ExStyles As Long + AllowDrop = &H10L + TopMost = &H8L + Layered = &H80000 + Composited = &H2000000L + NoActivate = &H8000000L + NoInheritLayout = &H100000L + NoParentNotify = &H4L + ToolWindow = &H80L + MDIChild = &H40L + Transparent = &H20L + WindowEdge = &H100L + ClientEdge = &H200L + HelpButton = &H400L + RightToLeft = &H400000L + DialogModalFrame = &H1L + End Enum + + Public Enum CMD + Close = 0 + Destroy = 1 + BringToFront = 2 + SendToBack = 3 + Show = 4 + Hide = 5 + Flash = 6 + Focus = 7 + Clear = 8 + Undo = 9 + Copy = 10 + Paste = 11 + Cut = 12 + End Enum + + Private hwnd As IntPtr + Sub New() + Me.hwnd = IntPtr.Zero + End Sub + Sub New(ByVal hWnd As IntPtr) + Me.hwnd = hWnd + End Sub + Sub New(ByVal c As Control) + Me.hwnd = c.Handle + End Sub + Sub New(ByVal WindowName As String, Optional ByVal ClassName As String = Nothing) + Me.hwnd = FindWindow(ClassName, WindowName) + End Sub + Sub New(ByVal p As Process, Optional ByVal UseMainHandle As Boolean = True) + If UseMainHandle Then Me.hwnd = p.MainWindowHandle Else Me.hwnd = p.Handle + End Sub + + Public Property Handle() As IntPtr + Get + Return Me.hwnd + End Get + Set(ByVal value As IntPtr) + Me.hwnd = value + End Set + End Property + Public Property HandleRef() As Runtime.InteropServices.HandleRef + Get + Return New Runtime.InteropServices.HandleRef(Me, Me.hwnd) + End Get + Set(ByVal value As Runtime.InteropServices.HandleRef) + Me.hwnd = value.Handle + End Set + End Property + + Public Function GetDC() As API.DC + Return New API.DC(Me.hwnd, GetDC(Me.hwnd)) + End Function + Public Function GetWindowDC() As API.DC + Return New API.DC(Me.hwnd, GetWindowDC(Me.hwnd)) + End Function + + Public Property Text() As String + Get + Return API.WM.TEXT(Me.hwnd) + End Get + Set(ByVal value As String) + API.WM.TEXT(Me.hwnd) = value + End Set + End Property + Public Property Name() As String + Get + Dim length As Integer = GetWindowTextLength(Me.hwnd) + 1 + Dim s As New System.Text.StringBuilder(length) + GetWindowText(Me.hwnd, s, s.Capacity) + Return s.ToString + End Get + Set(ByVal value As String) + SetWindowText(Me.hwnd, value) + End Set + End Property + Public Property Bounds() As Rectangle + Get + Dim r As API.WRECT + If (GetWindowRect(Me.HandleRef, r)) Then + Return r.Value + Else + Return Nothing + End If + End Get + Set(ByVal value As Rectangle) + SetWindowPos(Me.hwnd, -2, value.X, value.Y, value.Width, value.Height, SWP.IgnoreZOrder) + End Set + End Property + Public ReadOnly Property ClientSize() As Size + Get + Dim r As API.WRECT + GetClientRect(Me.HandleRef, r) + Return r.Value.Size + End Get + End Property + Public ReadOnly Property ClientRectangle() As Rectangle + Get + Return New Rectangle(ClientToScreen(New Point(0, 0)), ClientSize) + End Get + End Property + Public Property Location() As Point + Get + Return Bounds.Location + End Get + Set(ByVal value As Point) + SetWindowPos(Me.hwnd, -2, value.X, value.Y, 0, 0, SWP.IgnoreResize Or SWP.IgnoreZOrder) + End Set + End Property + Public Property Size() As Size + Get + Return Bounds.Size + End Get + Set(ByVal value As Size) + SetWindowPos(Me.hwnd, -2, 0, 0, value.Width, value.Height, SWP.IgnoreMove Or SWP.IgnoreZOrder) + End Set + End Property + Public Property WindowState() As State + Get + Return New WindowPlacement(Me.hwnd).showCmd + End Get + Set(ByVal value As State) + Dim d As New WindowPlacement(Me.hwnd) + d.showCmd = value + d.Send(Me.hwnd) + End Set + End Property + Public ReadOnly Property Exists() + Get + Return IsWindow(Me.hwnd) + End Get + End Property + Public Property Visible() As Boolean + Get + Return IsWindowVisible(Me.hwnd) + End Get + Set(ByVal value As Boolean) + If value = False Then Command(CMD.Hide) + If value = True Then Command(CMD.Show) + End Set + End Property + Public Property Font() As Font + Get + Return API.WM.FONT(Me.hwnd) + End Get + Set(ByVal value As Font) + API.WM.FONT(Me.hwnd) = value + End Set + End Property + Public Property Enabled() As Boolean + Get + Return Me.Style(Styles.Disabled) = False + End Get + Set(ByVal value As Boolean) + Me.Style(Styles.Disabled) = value = False + End Set + End Property + Public Property Focused() As Boolean + Get + Return GetFocus = Me.hwnd + End Get + Set(ByVal value As Boolean) + If value Then + API.WM.SETFOCUS(Me.hwnd) + Else + API.WM.KILLFOCUS(Me.hwnd) + End If + End Set + End Property + Public Property Captured() As Boolean + Get + Return GetCapture() = Me.hwnd + End Get + Set(ByVal value As Boolean) + If value Then + SetCapture(Me.hwnd) + ElseIf Me.Captured Then + ReleaseCapture() + End If + End Set + End Property + + Public Function ScreenToClient(ByVal p As Point) As Point + ScreenToClient(Me.hwnd, p) + Return p + End Function + Public Function ScreenToClient(ByVal r As Rectangle) As Rectangle + Return New Rectangle(ScreenToClient(r.Location), r.Size) + End Function + Public Function ClientToScreen(ByVal p As Point) As Point + ClientToScreen(Me.hwnd, p) + Return p + End Function + Public Function ClientToScreen(ByVal r As Rectangle) As Rectangle + Return New Rectangle(ClientToScreen(r.Location), r.Size) + End Function + + Public Sub Animate(ByVal flags As AnimateFlags, Optional ByVal Time As Integer = 1000) + AnimateWindow(Me.hwnd, Time, flags) + End Sub + Public Sub Invalidate() + Redraw(RedrawFlags.Invalidate Or RedrawFlags.UpdateNow) + End Sub + Public Sub Redraw(ByVal flags As RedrawFlags) + RedrawWindow(Me.hwnd, Nothing, Nothing, flags) + End Sub + Public Function CreateGraphics() As Graphics + Return Graphics.FromHwnd(Me.hwnd) + End Function + + Public Sub CaptureClient(ByVal g As Graphics, ByVal srcrect As Rectangle, Optional ByVal DestX As Integer = 0, Optional ByVal DestY As Integer = 0) + Dim gdc As New API.DC(g) + Dim hdc As API.DC = Me.GetDC + hdc.CopyTo(gdc) + gdc.Dispose() + hdc.Dispose() + End Sub + Public Function CaptureClient() As Image + Return CaptureClient(New Rectangle(New Point(), Me.ClientSize)) + End Function + Public Function CaptureClient(ByVal rect As Rectangle) As Image + If rect.Width < 1 Or rect.Height < 1 Then Return Nothing + Dim img As New Bitmap(rect.Width, rect.Height) + Dim g As Graphics = Graphics.FromImage(img) + CaptureClient(g, rect) + g.Dispose() + Return img + End Function + Public Sub CaptureWindow(ByVal g As Graphics) + 'Dim Hdc As IntPtr = g.GetHdc() + 'PrintWindow(Me.hwnd, Hdc, 0) + 'g.ReleaseHdc(Hdc) + + Dim gdc As New API.DC(g) + Dim hdc As API.DC = Me.GetWindowDC + hdc.CopyTo(gdc) + gdc.Dispose() + hdc.Dispose() + End Sub + Public Function CaptureWindow() As Image + Dim s As Size = Me.Size + If s.Width < 1 Or s.Height < 1 Then Return Nothing + Dim img As New Bitmap(s.Width, s.Height) + Dim g As Graphics = Graphics.FromImage(img) + CaptureWindow(g) + g.Dispose() + Return img + End Function + + Public Property Opacity(Optional ByVal SetLayered As Boolean = True) As Byte + Get + If SetLayered Then Me.ExStyle(ExStyles.Layered) = True + Dim lwa As New LayeredWindowAttributes(Me.hwnd) + If lwa.UseAlpha = False Then Return 255 + Return lwa.alpha + End Get + Set(ByVal value As Byte) + If SetLayered Then Me.ExStyle(ExStyles.Layered) = True + Dim lwa As New LayeredWindowAttributes(Me.hwnd) + If value = 255 Then + lwa.UseAlpha = False + Else + lwa.UseAlpha = True + lwa.alpha = value + End If + lwa.Apply() + End Set + End Property + Public Property TransparencyKey(Optional ByVal SetLayered As Boolean = True) As Color + Get + If SetLayered Then Me.ExStyle(ExStyles.Layered) = True + Return ColorTranslator.FromOle(New LayeredWindowAttributes(Me.hwnd).crKey) + End Get + Set(ByVal value As Color) + If SetLayered Then Me.ExStyle(ExStyles.Layered) = True + Dim lwa As New LayeredWindowAttributes(Me.hwnd) + If IsNothing(value) Then + lwa.UseColorKey = False + Else + lwa.UseColorKey = True + lwa.crKey = value.ToArgb + End If + lwa.Apply() + End Set + End Property + + Public Property ExStyle(ByVal ex As ExStyles) As Boolean + Get + Return (Me.ExStyle And ex) = ex + End Get + Set(ByVal value As Boolean) + Dim exs As ExStyles = Me.ExStyle + If (exs And ex) = ex <> value Then + If value = True Then exs += ex Else exs -= ex + Me.ExStyle = exs + End If + End Set + End Property + Public Property ExStyle() As ExStyles + Get + Return GetWindowLong(Me.HandleRef, GWL.EXSTYLE) + End Get + Set(ByVal value As ExStyles) + SetWindowLong(Me.hwnd, GWL.EXSTYLE, value) + End Set + End Property + Public Property Style(ByVal st As Styles) As Boolean + Get + Return (Me.Style And st) = st + End Get + Set(ByVal value As Boolean) + Dim sty As Styles = Me.Style + If (sty And st) = st <> value Then + If value = True Then sty += st Else sty -= st + Me.Style = sty + End If + End Set + End Property + + Public Property Style() As Styles + Get + Return GetWindowLong(Me.HandleRef, GWL.STYLE) + End Get + Set(ByVal value As Styles) + Try + SetWindowLong(Me.hwnd, GWL.STYLE, value) + Catch ex As Exception + End Try + End Set + End Property + + Public Property AllowDrop() As Boolean + Get + Return ExStyle(ExStyles.AllowDrop) + End Get + Set(ByVal value As Boolean) + ExStyle(ExStyles.AllowDrop) = value + End Set + End Property + Public Property TopMost() As Boolean + Get + Return ExStyle(ExStyles.TopMost) + End Get + Set(ByVal value As Boolean) + ExStyle(ExStyles.TopMost) = value + End Set + End Property + Public Property TabStop() As Boolean + Get + Return Style(Styles.TabStop) + End Get + Set(ByVal value As Boolean) + Style(Styles.TabStop) = value + End Set + End Property + + Public Function SendKey(ByVal Key As Keys, ByVal EventType As KeyEvent) + Dim k As New KeyCommand(Key, EventType) + k.RepeatCount = 0 + Return SendKey(k) + End Function + Public Function SendPressedKey(ByVal key As Keys, Optional ByVal SendCount As Integer = 1) + Dim success As Boolean = True + Dim k_down As New KeyCommand(key, KeyEvent.Down) + Dim k_up As New KeyCommand(key, KeyEvent.Up) + For i As Integer = 1 To SendCount + If SendKey(k_down) = False Then success = False + If SendKey(k_up) = False Then success = False + Next + Return success + End Function + Public Function SendKey(ByVal k As KeyCommand) + Return k.Post(Me.hwnd) + End Function + Public Function SendChar(ByVal character As Char, Optional ByVal SendCount As Integer = 1) As Boolean + Dim k As New KeyCommand(character) + k.RepeatCount = SendCount - 1 + Return SendKey(k) + End Function + Public Function SendChars(ByVal text() As Char) + Dim success As Boolean = True + For Each character As Char In text + If SendChar(character) = False Then success = False + Next + Return success + End Function + Public Function SendMouse(ByVal Location As Point, Optional ByVal Buttons As MouseButtons = MouseButtons.None, Optional ByVal EventType As MouseEvent = MouseEvent.Move) + Return SendMouse(New MouseCommand(Location, Buttons, EventType)) + End Function + Public Function SendMouse(ByVal X As Integer, ByVal Y As Integer, Optional ByVal Buttons As MouseButtons = MouseButtons.None, Optional ByVal EventType As MouseEvent = MouseEvent.Move) + Return SendMouse(New MouseCommand(X, Y, Buttons, EventType)) + End Function + Public Function SendMouse(ByVal m As MouseCommand) As Boolean + Return m.Post(Me.hwnd) + End Function + + Public Sub Command(ByVal command As CMD) + Select Case command + Case CMD.Close + API.WM.CLOSE(Me.hwnd) + Case CMD.Destroy + API.WM.DESTROY(Me.hwnd) + Case CMD.BringToFront + SetWindowPos(Me.hwnd, HWNDafter.BOTTOM, 0, 0, 0, 0, SWP.IgnoreResize Or SWP.IgnoreMove) + Case CMD.SendToBack + SetWindowPos(Me.hwnd, HWNDafter.BOTTOM, 0, 0, 0, 0, SWP.IgnoreResize Or SWP.IgnoreMove Or SWP.DoNotActivate) + Case CMD.Show + Dim d As New WindowPlacement(Me.hwnd) + d.showCmd = 5 + d.Send(Me.hwnd) + Case CMD.Flash + FlashWindow(Me.hwnd, True) + Case CMD.Hide + Dim d As New WindowPlacement(Me.hwnd) + d.showCmd = 0 + d.Send(Me.hwnd) + Case CMD.Focus + Me.Focused = True + Case CMD.Clear + API.WM.CLEAR(Me.hwnd) + Case CMD.Undo + API.WM.UNDO(Me.hwnd) + Case CMD.Copy + API.WM.Copy(Me.hwnd) + Case CMD.Paste + API.WM.PASTE(Me.hwnd) + Case CMD.Cut + API.WM.CUT(Me.hwnd) + End Select + End Sub + + '-------------not sure if these work-------------- + Public ReadOnly Property SystemMenu() As Window + Get + Return New Window(GetSystemMenu(Me.hwnd, False)) + End Get + End Property + Public ReadOnly Property Menu() As Window + Get + Return New Window(GetMenu(Me.hwnd)) + End Get + End Property + Public ReadOnly Property SubMenus(ByVal index As Integer) As Window + Get + Return New Window(GetSubMenu(Me.hwnd, index)) + End Get + End Property + Public ReadOnly Property SubMenus() As Window() + Get + Dim menus As New List(Of IntPtr) + Dim currm As IntPtr = 0 + For i As Integer = 0 To Integer.MaxValue + currm = GetSubMenu(Me.hwnd, i) + If currm = 0 Then + Exit For + Else + menus.Add(currm) + End If + Next + Return All(menus) + End Get + End Property + '------------------------------------------------- + + Public ReadOnly Property Process() As Process + Get + Try + Dim ID As UInteger + GetWindowThreadProcessId(Me.hwnd, ID) + Return Process.GetProcessById(ID) + Catch + Return Nothing + End Try + End Get + End Property + Public ReadOnly Property ClassName(Optional ByVal length As Integer = 64) As String + Get + Dim s As New System.Text.StringBuilder(length) + GetClassName(Me.hwnd, s, s.Capacity) + Return s.ToString() + End Get + End Property + Public Property Parent() As Window + Get + Dim Phwnd As IntPtr = GetParent(Me.hwnd) + If Phwnd = 0 Then Return Nothing + Return New Window(Phwnd) + End Get + Set(ByVal value As Window) + SetParent(Me.hwnd, value.Handle) + End Set + End Property + Public ReadOnly Property Children() As Window() + Get + Return Window.All(New Enumerator().GetChildWindows(Me.hwnd)) + End Get + End Property + Public ReadOnly Property Children(ByVal index As Integer) As Window + Get + Return New Window(New Enumerator().GetChildWindows(Me.hwnd)(index)) + End Get + End Property + Public ReadOnly Property Children(ByVal name As String) As Window + Get + Dim hwnd As IntPtr = FindWindowEx(Me.hwnd, 0, name, vbNullString) + If hwnd = 0 Then + For Each c As Window In Me.Children + If c.Name = name Then Return c + Next + Return Nothing + End If + Return New Window(hwnd) + End Get + End Property + Public ReadOnly Property Children(ByVal Location As Point) As Window + Get + Return New Window(ChildWindowFromPoint(Me.hwnd, New API.WPOINT(Location.X, Location.Y))) + End Get + End Property + Public ReadOnly Property ChildIndex(ByVal name As String) As Integer + Get + Dim w() As Window = Me.Children + For i As Integer = 0 To w.Count - 1 + If w(i).Name = name Then Return i + Next + Return -1 + End Get + End Property + Public ReadOnly Property TopSibling() As Window + Get + Return New Window(GetWindow(Me.hwnd, GW.HWNDFIRST)) + End Get + End Property + Public ReadOnly Property BottomSibling() As Window + Get + Return New Window(GetWindow(Me.hwnd, GW.HWNDLAST)) + End Get + End Property + Public ReadOnly Property PreviousSibling() As Window + Get + Return New Window(GetWindow(Me.hwnd, GW.HWNDPREV)) + End Get + End Property + Public ReadOnly Property NextSibling() As Window + Get + Return New Window(GetWindow(Me.hwnd, GW.HWNDNEXT)) + End Get + End Property + Public Function FindChild(ByVal name As String, Optional ByVal matchcase As Boolean = False) As Window + If matchcase = False Then name = name.ToLower + For Each w As Window In Me.Children + Dim wn As String = w.Name + If matchcase = False Then wn = wn.ToLower + If wn.Contains(name) Then Return w + Next + Return Nothing + End Function + Public Property FocusedWindow() As Window + Get + Me.AttachInput() + FocusedWindow = New Window(GetFocus) + Me.DetachInput() + End Get + Set(ByVal value As Window) + value.Command(CMD.Focus) + End Set + End Property + + Public Function AttachInput(Optional ByVal attach As Boolean = True) As Boolean + Return CBool(API.AttachThreadInput(GetWindowThreadProcessId(Me.hwnd, 0), API.GetCurrentThreadId(), CInt(attach))) + End Function + Public Function DetachInput() As Boolean + Return AttachInput(False) + End Function + + Public Shared Function All(ByVal p() As Process) As Window() + Dim w As New List(Of Window) + For Each proc As Process In p + If proc.MainWindowHandle <> 0 Then w.Add(New Window(proc.MainWindowHandle)) + Next + Return w.ToArray + End Function + Public Shared Function All() As Window() + Return New Window(IntPtr.Zero).Children + End Function + Public Shared Function All(ByVal ParamArray hwnd() As IntPtr) As Window() + Dim w(hwnd.Count - 1) As Window + For i As Integer = 0 To w.Count - 1 + w(i) = New Window(hwnd(i)) + Next + Return w + End Function + Public Shared Function All(ByVal hwnd As List(Of IntPtr)) As Window() + Dim w(hwnd.Count - 1) As Window + For i As Integer = 0 To w.Count - 1 + w(i) = New Window(hwnd(i)) + Next + Return w + End Function + Public Shared Function All(ByVal p As Process) As Window() + Return All(New Enumerator().GetThreadWindows(p.Id)) + End Function + Public Shared Function AllFromDesktop(ByVal desktophwnd As IntPtr) As Window() + Return All(New Enumerator().GetDesktopWindows(desktophwnd)) + End Function + Public Shared Function AllFromDesktop() As Window() + Return AllFromDesktop(Nothing) + End Function + Public Shared Function AllFromProcessList() As Window() + Return All(Process.GetProcesses) + End Function + Public Shared Function FromControl(ByVal c As Control) As Window + Return New Window(c.Handle) + End Function + Public Shared Function FromPoint(ByVal p As Point) As Window + Return New Window(WindowFromPoint(New API.WPOINT(p.X, p.Y))) + End Function + Public Shared Function FromHandle(ByVal hwnd As IntPtr) As Window + Return New Window(hwnd) + End Function + Public Shared Function Find(ByVal name As String, Optional ByVal matchcase As Boolean = False) As Window + Return New Window(IntPtr.Zero).FindChild(name, matchcase) + End Function + Public Shared Function GetActive() As Window + Return New Window(GetForegroundWindow) + End Function + Public Shared Function GetDesktop() As Window + Return New Window(GetDesktopWindow()) + End Function + Public Shared Function GetTop(ByVal parent As Window) As Window + Return New Window(GetTopWindow(parent.hwnd)) + End Function + Public Shared Function GetTop() As Window + Return New Window(GetTopWindow(Nothing)) + End Function + Public Shared Function GetForeground() As Window + Return New Window(GetForegroundWindow()) + End Function + Public Shared Function GetFocused() As Window + Return GetForeground.FocusedWindow + End Function +End Class \ No newline at end of file diff --git a/ShiftOS/app.manifest b/ShiftOS/app.manifest new file mode 100644 index 0000000..0ed877a --- /dev/null +++ b/ShiftOS/app.manifest @@ -0,0 +1,52 @@ +<?xml version="1.0" encoding="utf-8"?> +<asmv1:assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> + <assemblyIdentity version="1.0.0.0" name="MyApplication.app" /> + <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2"> + <security> + <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3"> + <!-- UAC Manifest Options + If you want to change the Windows User Account Control level replace the + requestedExecutionLevel node with one of the following. + + <requestedExecutionLevel level="asInvoker" uiAccess="false" /> + <requestedExecutionLevel level="requireAdministrator" uiAccess="false" /> + <requestedExecutionLevel level="highestAvailable" uiAccess="false" /> + + Specifying requestedExecutionLevel node will disable file and registry virtualization. + If you want to utilize File and Registry Virtualization for backward + compatibility then delete the requestedExecutionLevel node. + --> + <requestedExecutionLevel level="asInvoker" uiAccess="false" /> + </requestedPrivileges> + <applicationRequestMinimum> + <defaultAssemblyRequest permissionSetReference="Custom" /> + <PermissionSet ID="Custom" SameSite="site" Unrestricted="true" /> + </applicationRequestMinimum> + </security> + </trustInfo> + <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1"> + <application> + <!-- A list of all Windows versions that this application is designed to work with. + Windows will automatically select the most compatible environment.--> + <!-- If your application is designed to work with Windows Vista, uncomment the following supportedOS node--> + <!--<supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}"></supportedOS>--> + <!-- If your application is designed to work with Windows 7, uncomment the following supportedOS node--> + <!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>--> + <!-- If your application is designed to work with Windows 8, uncomment the following supportedOS node--> + <!--<supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}"></supportedOS>--> + </application> + </compatibility> + <!-- Enable themes for Windows common controls and dialogs (Windows XP and later) --> + <!-- <dependency> + <dependentAssembly> + <assemblyIdentity + type="win32" + name="Microsoft.Windows.Common-Controls" + version="6.0.0.0" + processorArchitecture="*" + publicKeyToken="6595b64144ccf1df" + language="*" + /> + </dependentAssembly> + </dependency>--> +</asmv1:assembly> \ No newline at end of file diff --git a/ShiftOS/coherencemode.vb b/ShiftOS/coherencemode.vb new file mode 100644 index 0000000..42352fb --- /dev/null +++ b/ShiftOS/coherencemode.vb @@ -0,0 +1,39 @@ +Module coherencemode + Private CoherenceModeProgramForm As New coherencemodeform + Public AnyOtherProgram As Boolean = False + + Public Sub setupwindows(ByVal programname As String) + If AnyOtherProgram = False Then + Try + Dim NewProgramName As String = programname.ToLower + Dim win As Window = Window.Find(NewProgramName) + Dim PreviouwWindowSize As System.Drawing.Size = win.Size + CoherenceModeProgramForm.programnametokeep = win + win.Style(Window.Styles.Border) = False + win.Style(Window.Styles.Sizable) = False + win.Invalidate() + 'win.Size = New Size(0, 0) + 'win.Size = PreviouwWindowSize + + CoherenceModeProgramForm.Show() + win.Location = New Point(CoherenceModeProgramForm.Location.X, CoherenceModeProgramForm.Location.Y + ShiftOSDesktop.titlebarheight) + win.TopMost = True + CoherenceModeProgramForm.TopMost = True + CoherenceModeProgramForm.Focus() + CoherenceModeProgramForm.Size = PreviouwWindowSize + win.Text = CoherenceModeProgramForm.lbtitletext.Text + CoherenceModeProgramForm.resettitlebar() + CoherenceModeProgramForm.setuptitlebar() + CoherenceModeProgramForm.setupborders() + CoherenceModeProgramForm.pgcontents.BackColor = Color.FromArgb(1, 0, 1) + + AnyOtherProgram = True + Catch ex As Exception + infobox.showinfo("Critical Error - Coherence Mode", "A Critical error occured whilst attempting to join the program") + End Try + Else + infobox.showinfo("Information - Coherence Mode", "You can only have one program within coherence mode at any given time, this includes only one mod open for the moment, this is soon to change") + End If + End Sub + +End Module diff --git a/ShiftOS/coherencemodeform.Designer.vb b/ShiftOS/coherencemodeform.Designer.vb new file mode 100644 index 0000000..792c1e2 --- /dev/null +++ b/ShiftOS/coherencemodeform.Designer.vb @@ -0,0 +1,242 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class coherencemodeform + 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() + Me.components = New System.ComponentModel.Container() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.forcetitle = New System.Windows.Forms.Timer(Me.components) + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 313) + Me.pgleft.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(807, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 313) + Me.pgright.TabIndex = 17 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(809, 30) + Me.titlebar.TabIndex = 14 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(807, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 341) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(805, 2) + Me.pgbottom.TabIndex = 18 + ' + 'pgcontents + ' + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(805, 311) + Me.pgcontents.TabIndex = 15 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'forcetitle + ' + ' + 'coherencemodeform + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(809, 343) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "coherencemodeform" + Me.Text = "template" + Me.TopMost = True + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents forcetitle As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/coherencemodeform.resx b/ShiftOS/coherencemodeform.resx new file mode 100644 index 0000000..3ef34f5 --- /dev/null +++ b/ShiftOS/coherencemodeform.resx @@ -0,0 +1,132 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>117, 17</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>201, 17</value> + </metadata> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>314, 17</value> + </metadata> + <metadata name="forcetitle.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/coherencemodeform.vb b/ShiftOS/coherencemodeform.vb new file mode 100644 index 0000000..3146f46 --- /dev/null +++ b/ShiftOS/coherencemodeform.vb @@ -0,0 +1,447 @@ +Class coherencemodeform +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + + Public programnametokeep As Window + Public RollUpAndDownHW As System.Drawing.Size + + Private PosicionMouseHeader As Point + Private tmpPoint As Point + Private MouseDown As Boolean + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + forcetitle.Start() + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + ' fixes growing issue + If justopened = False Then + Me.Size = New Size(Me.Width, Me.Height - (Skins.titlebarheight / 2)) + End If + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.dodgename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub titlebar_MouseMove(sender As Object, e As MouseEventArgs) Handles titlebar.MouseMove + If MouseDown = True Then + tmpPoint = Me.Location + e.Location - PosicionMouseHeader + Me.Location = tmpPoint + programnametokeep.Location = New Point(tmpPoint.X, tmpPoint.Y + ShiftOSDesktop.titlebarheight) + End If + End Sub + + Private Sub titlebar_MouseUp(sender As Object, e As MouseEventArgs) Handles titlebar.MouseUp + MouseDown = False + End Sub + + Private Sub forcetitle_Tick(sender As Object, e As EventArgs) Handles forcetitle.Tick + If Me.Focused = False And programnametokeep.Focused = False Then + Try + programnametokeep.Text = lbtitletext.Text + Catch ex As Exception + infobox.Show() + infobox.lbtitletext.Text = "Error - Coherence Mode" + infobox.lblintructtext.Text = "Lost focus on application, make sure you type in the program name instead of a variable." + Me.Close() + End Try + End If + End Sub +End Class diff --git a/ShiftOS/crash.vb b/ShiftOS/crash.vb new file mode 100644 index 0000000..4b82d4d --- /dev/null +++ b/ShiftOS/crash.vb @@ -0,0 +1,205 @@ +Imports System.Diagnostics +Imports System.Math +Module crash + + Public Sub ForceCrash() + crash_pic.Show() + + ShiftOSDesktop.Close() + ArtPad.Close() + Audio_Player.Close() + Bitnote_Digger.Close() + Bitnote_Wallet.Close() + Calculator.Close() + Clock.Close() + coherencemodeform.Close() + Colour_Picker.Close() + Dodge.Close() + Downloader.Close() + Downloadmanager.Close() + File_Opener.Close() + File_Saver.Close() + File_Skimmer.Close() + FloodGate_Manager.Close() + Graphic_Picker.Close() + Icon_Manager.Close() + infobox.Close() + Installer.Close() + Knowledge_Input.Close() + Labyrinth.Close() + Name_Changer.Close() + OrcWrite.Close() + Pong.Close() + ShiftDock.Close() + Shifter.Close() + Shiftnet.Close() + Shiftorium.Close() + Skin_Loader.Close() + Skinshifter.Close() + Snakey.Close() + SystemInfo.Close() + Terminal.Close() + TextPad.Close() + Video_Player.Close() + VirusScanner.Close() + Web_Browser.Close() + + crash_pic.pic_crash.Image = My.Resources.crash_force + End Sub + + Public Sub OutOfMemory() + crash_pic.Show() + + ShiftOSDesktop.Close() + ArtPad.Close() + Audio_Player.Close() + Bitnote_Digger.Close() + Bitnote_Wallet.Close() + Calculator.Close() + Clock.Close() + coherencemodeform.Close() + Colour_Picker.Close() + Dodge.Close() + Downloader.Close() + Downloadmanager.Close() + File_Opener.Close() + File_Saver.Close() + File_Skimmer.Close() + FloodGate_Manager.Close() + Graphic_Picker.Close() + Icon_Manager.Close() + infobox.Close() + Installer.Close() + Knowledge_Input.Close() + Labyrinth.Close() + Name_Changer.Close() + OrcWrite.Close() + Pong.Close() + ShiftDock.Close() + Shifter.Close() + Shiftnet.Close() + Shiftorium.Close() + Skin_Loader.Close() + Skinshifter.Close() + Snakey.Close() + SystemInfo.Close() + Terminal.Close() + TextPad.Close() + Video_Player.Close() + VirusScanner.Close() + Web_Browser.Close() + + crash_pic.pic_crash.Image = My.Resources.crash_ofm + End Sub + + Public Sub ThePlagueBSOD() + crash_pic.Show() + + ShiftOSDesktop.Close() + ArtPad.Close() + Audio_Player.Close() + Bitnote_Digger.Close() + Bitnote_Wallet.Close() + Calculator.Close() + Clock.Close() + coherencemodeform.Close() + Colour_Picker.Close() + Dodge.Close() + Downloader.Close() + Downloadmanager.Close() + File_Opener.Close() + File_Saver.Close() + File_Skimmer.Close() + FloodGate_Manager.Close() + Graphic_Picker.Close() + Icon_Manager.Close() + infobox.Close() + Installer.Close() + Knowledge_Input.Close() + Labyrinth.Close() + Name_Changer.Close() + OrcWrite.Close() + Pong.Close() + ShiftDock.Close() + Shifter.Close() + Shiftnet.Close() + Shiftorium.Close() + Skin_Loader.Close() + Skinshifter.Close() + Snakey.Close() + systeminfo.Close() + Terminal.Close() + TextPad.Close() + Video_Player.Close() + VirusScanner.Close() + Web_Browser.Close() + + crash_pic.pic_crash.Image = My.Resources.crash + End Sub + + Public Sub FindProc() + Dim myProcesses() As Process = Process.GetProcesses + + For Each p As Process In myProcesses + If p.MainWindowTitle.Contains("Cheat Engine") Then + If My.Settings.ShouldCrashOccur = 3 Then + crash_pic.Show() + + ShiftOSDesktop.Close() + ArtPad.Close() + Audio_Player.Close() + Bitnote_Digger.Close() + Bitnote_Wallet.Close() + Calculator.Close() + Clock.Close() + coherencemodeform.Close() + Colour_Picker.Close() + Dodge.Close() + Downloader.Close() + Downloadmanager.Close() + File_Opener.Close() + File_Saver.Close() + File_Skimmer.Close() + FloodGate_Manager.Close() + Graphic_Picker.Close() + Icon_Manager.Close() + infobox.Close() + Installer.Close() + Knowledge_Input.Close() + Labyrinth.Close() + Name_Changer.Close() + OrcWrite.Close() + Pong.Close() + ShiftDock.Close() + Shifter.Close() + Shiftnet.Close() + Shiftorium.Close() + Skin_Loader.Close() + Skinshifter.Close() + Snakey.Close() + SystemInfo.Close() + Terminal.Close() + TextPad.Close() + Video_Player.Close() + VirusScanner.Close() + Web_Browser.Close() + + crash_pic.pic_crash.Image = My.Resources.crash_force + Else + If My.Settings.ShouldCrashOccur = 0 Then + My.Settings.ShouldCrashOccur = 1 + ElseIf My.Settings.ShouldCrashOccur = 1 Then + My.Settings.ShouldCrashOccur = 2 + ElseIf My.Settings.ShouldCrashOccur = 2 Then + My.Settings.ShouldCrashOccur = 3 + End If + p.CloseMainWindow() + infobox.title = "System Modification Detected!" + infobox.textinfo = "A dangerous modification to ShiftOS has been detected. It has been terminated." + infobox.Show() + End If + End If + Next + + End Sub +End Module diff --git a/ShiftOS/crash_pic.Designer.vb b/ShiftOS/crash_pic.Designer.vb new file mode 100644 index 0000000..80ca4f1 --- /dev/null +++ b/ShiftOS/crash_pic.Designer.vb @@ -0,0 +1,79 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class crash_pic + 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() + Me.components = New System.ComponentModel.Container() + Me.pnl_holdtogether = New System.Windows.Forms.Panel() + Me.killme = New System.Windows.Forms.Timer(Me.components) + Me.pic_crash = New System.Windows.Forms.PictureBox() + Me.pnl_holdtogether.SuspendLayout() + CType(Me.pic_crash, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pnl_holdtogether + ' + Me.pnl_holdtogether.Controls.Add(Me.pic_crash) + Me.pnl_holdtogether.Dock = System.Windows.Forms.DockStyle.Fill + Me.pnl_holdtogether.Location = New System.Drawing.Point(0, 0) + Me.pnl_holdtogether.Name = "pnl_holdtogether" + Me.pnl_holdtogether.Size = New System.Drawing.Size(728, 422) + Me.pnl_holdtogether.TabIndex = 1 + ' + 'killme + ' + Me.killme.Interval = 10000 + ' + 'pic_crash + ' + Me.pic_crash.Dock = System.Windows.Forms.DockStyle.Fill + Me.pic_crash.Image = Global.ShiftOS.My.Resources.Resources.crash_cheat + Me.pic_crash.Location = New System.Drawing.Point(0, 0) + Me.pic_crash.Name = "pic_crash" + Me.pic_crash.Size = New System.Drawing.Size(728, 422) + Me.pic_crash.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom + Me.pic_crash.TabIndex = 0 + Me.pic_crash.TabStop = False + ' + 'crash_pic + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackgroundImage = Global.ShiftOS.My.Resources.Resources.crash_cheat + Me.ClientSize = New System.Drawing.Size(728, 422) + Me.Controls.Add(Me.pnl_holdtogether) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "crash_pic" + Me.ShowIcon = False + Me.ShowInTaskbar = False + Me.Text = "crash_pic" + Me.TopMost = True + Me.WindowState = System.Windows.Forms.FormWindowState.Maximized + Me.pnl_holdtogether.ResumeLayout(False) + CType(Me.pic_crash, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pnl_holdtogether As System.Windows.Forms.Panel + Friend WithEvents killme As System.Windows.Forms.Timer + Friend WithEvents pic_crash As System.Windows.Forms.PictureBox +End Class diff --git a/ShiftOS/crash_pic.resx b/ShiftOS/crash_pic.resx new file mode 100644 index 0000000..ca71df2 --- /dev/null +++ b/ShiftOS/crash_pic.resx @@ -0,0 +1,123 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="killme.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/crash_pic.vb b/ShiftOS/crash_pic.vb new file mode 100644 index 0000000..e4aa6ca --- /dev/null +++ b/ShiftOS/crash_pic.vb @@ -0,0 +1,11 @@ +Public Class crash_pic + + + Private Sub crash_pic_Load(sender As Object, e As EventArgs) Handles MyBase.Load + killme.Start() + End Sub + + Private Sub killme_Tick(sender As Object, e As EventArgs) Handles killme.Tick + Application.Exit() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/defaultdropdownmenu.vb b/ShiftOS/defaultdropdownmenu.vb new file mode 100644 index 0000000..f217104 --- /dev/null +++ b/ShiftOS/defaultdropdownmenu.vb @@ -0,0 +1,293 @@ +' <auto-generated> +' This code was generated by the .NET ToolStrip Customizer. +' http://toolstripcustomizer.codeplex.com/ +' </auto-generated> + +Imports System.Drawing +Imports System.Windows.Forms + +Namespace MyNamespace + Class defaultdropdownmenu + Inherits ProfessionalColorTable + Public Overrides ReadOnly Property ButtonSelectedHighlight() As Color + Get + Return ButtonSelectedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedHighlightBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedHighlight() As Color + Get + Return ButtonPressedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedHighlightBorder() As Color + Get + Return ButtonPressedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedHighlight() As Color + Get + Return ButtonCheckedGradientMiddle + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedHighlightBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedBorder() As Color + Get + Return ButtonSelectedBorder + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedBorder() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonCheckedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonSelectedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ButtonPressedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckSelectedBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property CheckPressedBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property GripDark() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property GripLight() As Color + Get + Return Color.FromName("Window") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientMiddle() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientBegin() As Color + Get + Return Color.FromArgb(255, 249, 249, 249) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientMiddle() As Color + Get + Return Color.FromArgb(255, 245, 245, 245) + End Get + End Property + Public Overrides ReadOnly Property ImageMarginRevealedGradientEnd() As Color + Get + Return Color.FromArgb(255, 242, 242, 242) + End Get + End Property + Public Overrides ReadOnly Property MenuStripGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property MenuStripGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelected() As Color + Get + Return Color.FromName("White") + End Get + End Property + Public Overrides ReadOnly Property MenuItemBorder() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property MenuBorder() As Color + Get + Return Color.FromArgb(255, 128, 128, 128) + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelectedGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property MenuItemSelectedGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientBegin() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientMiddle() As Color + Get + Return Color.FromArgb(255, 245, 245, 245) + End Get + End Property + Public Overrides ReadOnly Property MenuItemPressedGradientEnd() As Color + Get + Return Color.FromArgb(255, 248, 248, 248) + End Get + End Property + Public Overrides ReadOnly Property RaftingContainerGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property RaftingContainerGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property SeparatorDark() As Color + Get + Return Color.FromName("Black") + End Get + End Property + Public Overrides ReadOnly Property SeparatorLight() As Color + Get + Return Color.FromName("ButtonHighlight") + End Get + End Property + Public Overrides ReadOnly Property StatusStripGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property StatusStripGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property ToolStripBorder() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripDropDownBackground() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientBegin() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientMiddle() As Color + Get + Return Color.FromArgb(255, 248, 248, 248) + End Get + End Property + Public Overrides ReadOnly Property ToolStripGradientEnd() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property ToolStripContentPanelGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property ToolStripContentPanelGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property ToolStripPanelGradientBegin() As Color + Get + Return Color.FromName("ButtonFace") + End Get + End Property + Public Overrides ReadOnly Property ToolStripPanelGradientEnd() As Color + Get + Return Color.FromArgb(255, 252, 252, 252) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientBegin() As Color + Get + Return Color.FromArgb(255, 245, 245, 245) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientMiddle() As Color + Get + Return Color.FromArgb(255, 242, 242, 242) + End Get + End Property + Public Overrides ReadOnly Property OverflowButtonGradientEnd() As Color + Get + Return Color.FromName("Gray") + End Get + End Property + End Class +End Namespace \ No newline at end of file diff --git a/ShiftOS/infobox.Designer.vb b/ShiftOS/infobox.Designer.vb new file mode 100644 index 0000000..ec0da96 --- /dev/null +++ b/ShiftOS/infobox.Designer.vb @@ -0,0 +1,352 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class infobox + 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() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.txtuserinput = New System.Windows.Forms.TextBox() + Me.btnok = New System.Windows.Forms.Button() + Me.txtmessage = New System.Windows.Forms.Label() + Me.pboximage = New System.Windows.Forms.PictureBox() + Me.lblintructtext = New System.Windows.Forms.Label() + Me.pnlyesno = New System.Windows.Forms.Panel() + Me.btnno = New System.Windows.Forms.Button() + Me.btnyes = New System.Windows.Forms.Button() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents.SuspendLayout() + CType(Me.pboximage, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlyesno.SuspendLayout() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnlyesno) + Me.pgcontents.Controls.Add(Me.txtuserinput) + Me.pgcontents.Controls.Add(Me.btnok) + Me.pgcontents.Controls.Add(Me.txtmessage) + Me.pgcontents.Controls.Add(Me.pboximage) + Me.pgcontents.Controls.Add(Me.lblintructtext) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(367, 122) + Me.pgcontents.TabIndex = 20 + ' + 'txtuserinput + ' + Me.txtuserinput.Anchor = System.Windows.Forms.AnchorStyles.Bottom + Me.txtuserinput.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txtuserinput.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtuserinput.Location = New System.Drawing.Point(101, 54) + Me.txtuserinput.Multiline = True + Me.txtuserinput.Name = "txtuserinput" + Me.txtuserinput.Size = New System.Drawing.Size(256, 23) + Me.txtuserinput.TabIndex = 8 + Me.txtuserinput.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + Me.txtuserinput.Visible = False + ' + 'btnok + ' + Me.btnok.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnok.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnok.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnok.ForeColor = System.Drawing.Color.Black + Me.btnok.Location = New System.Drawing.Point(134, 86) + Me.btnok.Name = "btnok" + Me.btnok.Size = New System.Drawing.Size(105, 30) + Me.btnok.TabIndex = 7 + Me.btnok.TabStop = False + Me.btnok.Text = "Ok" + Me.btnok.UseVisualStyleBackColor = True + ' + 'txtmessage + ' + Me.txtmessage.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtmessage.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtmessage.Location = New System.Drawing.Point(98, 7) + Me.txtmessage.Name = "txtmessage" + Me.txtmessage.Size = New System.Drawing.Size(266, 70) + Me.txtmessage.TabIndex = 2 + Me.txtmessage.Text = "It appears that this application may be infected. It is highly recommended that y" & _ + "ou close it immediatly with a terminal emulator such as Sterm. To close this app" & _ + "lication just type ""Close""" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + Me.txtmessage.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'pboximage + ' + Me.pboximage.Image = Global.ShiftOS.My.Resources.Resources.Symbolinfo + Me.pboximage.Location = New System.Drawing.Point(12, 7) + Me.pboximage.Name = "pboximage" + Me.pboximage.Size = New System.Drawing.Size(80, 70) + Me.pboximage.TabIndex = 0 + Me.pboximage.TabStop = False + ' + 'lblintructtext + ' + Me.lblintructtext.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblintructtext.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) + Me.lblintructtext.Location = New System.Drawing.Point(101, 7) + Me.lblintructtext.Name = "lblintructtext" + Me.lblintructtext.Size = New System.Drawing.Size(256, 44) + Me.lblintructtext.TabIndex = 9 + Me.lblintructtext.Text = "Please enter a name for your new folder:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Or " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Die" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + Me.lblintructtext.TextAlign = System.Drawing.ContentAlignment.TopCenter + Me.lblintructtext.Visible = False + ' + 'pnlyesno + ' + Me.pnlyesno.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.pnlyesno.Controls.Add(Me.btnno) + Me.pnlyesno.Controls.Add(Me.btnyes) + Me.pnlyesno.Location = New System.Drawing.Point(57, 83) + Me.pnlyesno.Name = "pnlyesno" + Me.pnlyesno.Size = New System.Drawing.Size(265, 33) + Me.pnlyesno.TabIndex = 10 + Me.pnlyesno.Visible = False + ' + 'btnno + ' + Me.btnno.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnno.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnno.ForeColor = System.Drawing.Color.Black + Me.btnno.Location = New System.Drawing.Point(142, 2) + Me.btnno.Name = "btnno" + Me.btnno.Size = New System.Drawing.Size(105, 30) + Me.btnno.TabIndex = 9 + Me.btnno.TabStop = False + Me.btnno.Text = "No" + Me.btnno.UseVisualStyleBackColor = True + ' + 'btnyes + ' + Me.btnyes.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnyes.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnyes.ForeColor = System.Drawing.Color.Black + Me.btnyes.Location = New System.Drawing.Point(29, 2) + Me.btnyes.Name = "btnyes" + Me.btnyes.Size = New System.Drawing.Size(105, 30) + Me.btnyes.TabIndex = 8 + Me.btnyes.TabStop = False + Me.btnyes.Text = "Yes" + Me.btnyes.UseVisualStyleBackColor = True + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 124) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 122) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(369, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 124) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 122) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(371, 30) + Me.titlebar.TabIndex = 19 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 3) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconInfoBox + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(36, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Info" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(369, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 152) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(367, 2) + Me.pgbottom.TabIndex = 23 + ' + 'infobox + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(371, 154) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.DoubleBuffered = True + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.KeyPreview = True + Me.Name = "infobox" + Me.Text = "infobox" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pgcontents.PerformLayout() + CType(Me.pboximage, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlyesno.ResumeLayout(False) + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents btnok As System.Windows.Forms.Button + Friend WithEvents txtmessage As System.Windows.Forms.Label + Friend WithEvents pboximage As System.Windows.Forms.PictureBox + Friend WithEvents lblintructtext As System.Windows.Forms.Label + Friend WithEvents txtuserinput As System.Windows.Forms.TextBox + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pnlyesno As System.Windows.Forms.Panel + Friend WithEvents btnno As System.Windows.Forms.Button + Friend WithEvents btnyes As System.Windows.Forms.Button +End Class diff --git a/ShiftOS/infobox.resx b/ShiftOS/infobox.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/infobox.resx @@ -0,0 +1,120 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> +</root> \ No newline at end of file diff --git a/ShiftOS/infobox.vb b/ShiftOS/infobox.vb new file mode 100644 index 0000000..d5e15bf --- /dev/null +++ b/ShiftOS/infobox.vb @@ -0,0 +1,599 @@ +Imports ShiftOS.Helper +Imports ShiftOS.Paths +Public Class infobox + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + + Public textinfo As String + Public title As String + Public state As String + Public sendyesno As String + Public txtString As String + Public showTextBox As Boolean + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + txtmessage.Text = textinfo + lbtitletext.Text = title + + If showTextBox Then + txtuserinput.Visible = True + End If + ShiftOSDesktop.pnlpanelbuttoninfobox.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoninfobox, ShiftOSDesktop.tbinfoboxicon, ShiftOSDesktop.tbinfoboxtext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + Try + playSound(sounddir & "infobox.wav", AudioPlayMode.Background) + Catch + + End Try + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(371, 154) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtinfoboxicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.infoboxicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Private Sub makeinfobox() + txtmessage.Text = textinfo + lbtitletext.Text = title + End Sub + + Private Sub btnok_Click(sender As Object, e As EventArgs) Handles btnok.Click + If txtuserinput.Visible = True Then + txtuserinput.Hide() + lblintructtext.Hide() + If state = "makingfolder" Then + File_Skimmer.makefolder() + ElseIf state = "makingdesktopfolder" Then + ShiftOSDesktop.makefolder() + ElseIf state = "generatingskin" Then + Skins.saveskin("C:/ShiftOS/Home/Desktop" & " / " & txtuserinput.Text & ".skn") + ShiftOSDesktop.refreshIcons() + Me.Close() + ElseIf state = "generatingdump" Then + Dim sw As New IO.StreamWriter("C:/ShiftOS/Home/Desktop/" & txtuserinput.Text & ".txt") + sw.WriteLine("### SHIFTOS SYSTEM INFORMATION DUMP ###") + sw.WriteLine(" ") + sw.WriteLine("ShiftOS Version: " & ShiftOSDesktop.ingameversion) + sw.WriteLine("User Name: " & ShiftOSDesktop.username) + Dim PrcName As String + + PrcName = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", Nothing) + sw.WriteLine("CPU: " & PrcName) + sw.WriteLine("Random Access Memory (RAM): " & (String.Format("{0} Megabytes", System.Math.Round(My.Computer.Info.TotalPhysicalMemory / (1024 * 1024)), 2).ToString)) + sw.Close() + Me.Close() + ShiftOSDesktop.refreshIcons() + ElseIf state = "newtextdocondesktop" Then + Dim sw As New IO.StreamWriter("C:/ShiftOS/Home/Desktop/" & txtuserinput.Text & ".txt") + sw.Write("[New Text Document]") + sw.Close() + Me.Close() + ShiftOSDesktop.refreshIcons() + ElseIf state = "generatingshortcut" Then + ShiftOSDesktop.generateShortCut(txtuserinput.Text, txtString) + ShiftOSDesktop.refreshIcons() + Me.Close() + Else + txtString = txtuserinput.Text + Me.Close() + End If + Else + Me.Close() + End If + End Sub + + Public Sub showyesno() + pnlyesno.Show() + End Sub + + Private Sub btnyes_Click(sender As Object, e As EventArgs) Handles btnyes.Click + Select Case sendyesno + Case "textpad" + TextPad.needtosave = False + TextPad.Close() + Me.Close() + Case "textpadnew" + TextPad.makenewdoc() + Me.Close() + Case "artpad" + ArtPad.needtosave = False + ArtPad.Close() + Me.Close() + Case "fileskimmertextpad" + TextPad.txtuserinput.Text = My.Computer.FileSystem.ReadAllText(File_Skimmer.lbllocation.Text & "/" & File_Skimmer.lvfiles.SelectedItems(0).Text) + TextPad.needtosave = False + Me.Close() + Case "fileopenertextpad" + TextPad.txtuserinput.Text = My.Computer.FileSystem.ReadAllText(File_Opener.lbllocation.Text & "/" & File_Opener.lvfiles.SelectedItems(0).Text) + TextPad.needtosave = False + File_Opener.Close() + Me.Close() + Case "fileskimmerartpad" + ArtPad.savelocation = File_Skimmer.lbllocation.Text & "/" & File_Skimmer.lvfiles.SelectedItems(0).Text + ArtPad.openpic() + ArtPad.needtosave = False + Me.Close() + Case "fileopenerartpad" + ArtPad.savelocation = File_Skimmer.lbllocation.Text & "/" & File_Skimmer.lvfiles.SelectedItems(0).Text + ArtPad.needtosave = False + File_Opener.Close() + Me.Close() + Case "shiftnetdodge" + startdownload("Dodge.stp", "shiftnet.main.minimatch/filetrans.dwnld?file=dodge.stp", 500) 'WHY??? + sendyesno = "" + Me.Close() + Case "shiftnetwebbrowser" + startdownload("WebBrowser.stp", "shiftnet.main.appsacpe/filetrans.dwnld?file=WebBrowser.stp", 20000) + sendyesno = "" + Me.Close() + Case "shiftnetaudioplayer" + startdownload("Audioplayer.stp", "shiftnet.main.appsacpe/filetrans.dwnld?file=AudioPlayer.stp", 1500) + sendyesno = "" + Me.Close() + Case "shiftnetvideoplayer" + startdownload("VideoPlayer.stp", "shiftnet.main.appsacpe/filetrans.dwnld?file=VideoPlayer.stp", 2000) + sendyesno = "" + Me.Close() + Case "shiftnetcalculator" + startdownload("Calculator.stp", "shiftnet.main.appsacpe/filetrans.dwnld?file=Calculator.stp", 100) + sendyesno = "" + Me.Close() + Case "shiftnetwallet" + startdownload("BitnoteWallet.stp", "shiftnet.main.bitnote/filetrans.dwnld?file=BitnoteWallet.stp", 1000) + sendyesno = "" + Me.Close() + Case "shiftnetdigger" + startdownload("BitnoteDigger.stp", "shiftnet.main.bitnote/filetrans.dwnld?file=BitnoteDigger.stp", 1000) + sendyesno = "" + Me.Close() + Case "shiftnetfg" + startdownload("FloodGate.stp", "shiftnet.main.floodgate/filetrans.dwnld?file=FloodGate.stp", 25000) + sendyesno = "" + Me.Close() + Case "shiftnetlinuxmintskn" + startdownload("LinuxMint7.skn", "shiftnet.main.shiftomizer/filetrans.dwnld?file=LinuxMint7.skn", 3590) + Me.Close() + Case "shiftnetindustrialskn" + startdownload("Industrial.skn", "shiftnet.main.shiftomizer/filetrans.dwnld?file=Industrial.skn", 3590) + Me.Close() + Case "shiftnetskinchanger" + startdownload("SkinChanger.stp", "shiftnet.main.shiftomizer/filetrans.dwnld?file=SC", 3000) + Me.Close() + Case "shiftnetnamechanger" + startdownload("NameChanger.stp", "shiftnet.main.shiftomizer/filetrans.dwnld?file=NC", 3000) + Me.Close() + Case "shiftneticonmanager" + startdownload("IconManager.stp", "shiftnet.main.shiftomizer/filetrans.dwnld?file=IM", 3000) + Me.Close() + Case "shiftnetfloodgate" + startdownload("FloodGate.stp", "shiftnet.pirateboat/filetrans.dwnld?file=floodgate", 5000) + Me.Close() + Case "shiftnetmaze" + startdownload("Labyrinth.stp", "shiftnet.main.minimatch/filetrans.dwnld?file=maze", 5000) + Me.Close() + Case "shiftnetorcwrite" + startdownload("OrcWrite.stp", "shiftnet.main.appscape/filetrans.dwnld?file=OW", 7000) + Me.Close() + Case "orcwritesave" + OrcWrite.Show() + OrcWrite.RichTextBox1.Rtf = state + state = "" + File_Saver.savingprogram = "orcwrite" + File_Saver.saveextention = ".owd" + File_Saver.Show() + sendyesno = "" + Me.Close() + End Select + End Sub + + Private Sub btnno_Click(sender As Object, e As EventArgs) Handles btnno.Click + Select Case sendyesno + Case "textpad" + TextPad.showsavedialog() + Me.Close() + Case "textpadnew" + TextPad.showsavedialog() + Me.Close() + Case "artpad" + ArtPad.showsavedialog() + Me.Close() + Case "fileskimmertextpad" + TextPad.showsavedialog() + Me.Close() + Case "fileopenertextpad" + File_Opener.Close() + Me.Close() + Case "fileskimmerartpad" + ArtPad.showsavedialog() + Me.Close() + Case "fileopenerartpad" + ArtPad.showsavedialog() + Me.Close() + Case "orcwritesave" + state = "" + Me.Close() + Case Else + Me.Close() + End Select + End Sub + + Private Sub startdownload(ByVal name As String, ByVal source As String, ByVal size As Integer) + If ShiftOSDesktop.boughtdownloadmanager = True Then + Downloadmanager.Show() + Downloadmanager.adddownload(name, source, size) + Else + title = "Program not found" + textinfo = "The program 'Download Manager' cannot be found. Unable to download the requested file." ' + Me.Show() + End If + End Sub + + 'Just loads the infobox and resizes it. + Public Sub resizeAndLoad(x As Integer, y As Integer) + Me.Show() + Me.Size = New Size(x, y) + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + End Sub + + Public Sub showinfo(ByVal titletxt As String, ByVal msg As String) + title = titletxt + textinfo = msg + Me.Show() + End Sub +End Class \ No newline at end of file diff --git a/ShiftOS/loginform.Designer.vb b/ShiftOS/loginform.Designer.vb new file mode 100644 index 0000000..3c9b37d --- /dev/null +++ b/ShiftOS/loginform.Designer.vb @@ -0,0 +1,315 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class loginform + 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() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pnllogin = New System.Windows.Forms.Panel() + Me.lbmsgtext = New System.Windows.Forms.Label() + Me.btnok = New System.Windows.Forms.Button() + Me.pboximage = New System.Windows.Forms.PictureBox() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.Label1 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.txtusername = New System.Windows.Forms.TextBox() + Me.txtpassword = New System.Windows.Forms.TextBox() + Me.txtconfirm = New System.Windows.Forms.TextBox() + Me.pgcontents.SuspendLayout() + Me.pnllogin.SuspendLayout() + CType(Me.pboximage, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgcontents + ' + Me.pgcontents.BackColor = System.Drawing.Color.White + Me.pgcontents.Controls.Add(Me.pnllogin) + Me.pgcontents.Controls.Add(Me.btnok) + Me.pgcontents.Controls.Add(Me.pboximage) + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(367, 185) + Me.pgcontents.TabIndex = 20 + ' + 'pnllogin + ' + Me.pnllogin.Controls.Add(Me.txtconfirm) + Me.pnllogin.Controls.Add(Me.txtpassword) + Me.pnllogin.Controls.Add(Me.txtusername) + Me.pnllogin.Controls.Add(Me.Label3) + Me.pnllogin.Controls.Add(Me.Label2) + Me.pnllogin.Controls.Add(Me.Label1) + Me.pnllogin.Controls.Add(Me.lbmsgtext) + Me.pnllogin.Location = New System.Drawing.Point(115, 7) + Me.pnllogin.Name = "pnllogin" + Me.pnllogin.Size = New System.Drawing.Size(246, 136) + Me.pnllogin.TabIndex = 8 + ' + 'lbmsgtext + ' + Me.lbmsgtext.Location = New System.Drawing.Point(4, 18) + Me.lbmsgtext.Name = "lbmsgtext" + Me.lbmsgtext.Size = New System.Drawing.Size(238, 38) + Me.lbmsgtext.TabIndex = 0 + Me.lbmsgtext.Text = "Please log into ShiftOS to continue." + ' + 'btnok + ' + Me.btnok.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnok.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnok.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnok.ForeColor = System.Drawing.Color.Black + Me.btnok.Location = New System.Drawing.Point(134, 149) + Me.btnok.Name = "btnok" + Me.btnok.Size = New System.Drawing.Size(105, 30) + Me.btnok.TabIndex = 7 + Me.btnok.TabStop = False + Me.btnok.Text = "Log In" + Me.btnok.UseVisualStyleBackColor = True + ' + 'pboximage + ' + Me.pboximage.Image = Global.ShiftOS.My.Resources.Resources.Symbolinfo + Me.pboximage.Location = New System.Drawing.Point(12, 7) + Me.pboximage.Name = "pboximage" + Me.pboximage.Size = New System.Drawing.Size(80, 70) + Me.pboximage.TabIndex = 0 + Me.pboximage.TabStop = False + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 187) + Me.pgleft.TabIndex = 21 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 185) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(369, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 187) + Me.pgright.TabIndex = 22 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 185) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(371, 30) + Me.titlebar.TabIndex = 19 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconInfoBox + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(132, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Log into ShiftOS" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(369, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 215) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(367, 2) + Me.pgbottom.TabIndex = 23 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(7, 56) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(58, 13) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "Username:" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(7, 78) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(56, 13) + Me.Label2.TabIndex = 2 + Me.Label2.Text = "Password:" + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(7, 100) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(45, 13) + Me.Label3.TabIndex = 3 + Me.Label3.Text = "Confirm:" + ' + 'txtusername + ' + Me.txtusername.Location = New System.Drawing.Point(71, 53) + Me.txtusername.Name = "txtusername" + Me.txtusername.Size = New System.Drawing.Size(158, 20) + Me.txtusername.TabIndex = 4 + ' + 'txtpassword + ' + Me.txtpassword.Location = New System.Drawing.Point(71, 78) + Me.txtpassword.Name = "txtpassword" + Me.txtpassword.Size = New System.Drawing.Size(158, 20) + Me.txtpassword.TabIndex = 5 + Me.txtpassword.UseSystemPasswordChar = True + ' + 'txtconfirm + ' + Me.txtconfirm.Location = New System.Drawing.Point(71, 100) + Me.txtconfirm.Name = "txtconfirm" + Me.txtconfirm.Size = New System.Drawing.Size(158, 20) + Me.txtconfirm.TabIndex = 6 + Me.txtconfirm.UseSystemPasswordChar = True + ' + 'loginform + ' + Me.AcceptButton = Me.btnok + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(371, 217) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.titlebar) + Me.DoubleBuffered = True + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.KeyPreview = True + Me.Name = "loginform" + Me.Text = "infobox" + Me.TopMost = True + Me.pgcontents.ResumeLayout(False) + Me.pnllogin.ResumeLayout(False) + Me.pnllogin.PerformLayout() + CType(Me.pboximage, System.ComponentModel.ISupportInitialize).EndInit() + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents btnok As System.Windows.Forms.Button + Friend WithEvents pboximage As System.Windows.Forms.PictureBox + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents pnllogin As System.Windows.Forms.Panel + Friend WithEvents lbmsgtext As System.Windows.Forms.Label + Friend WithEvents txtpassword As System.Windows.Forms.TextBox + Friend WithEvents txtusername As System.Windows.Forms.TextBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents txtconfirm As System.Windows.Forms.TextBox +End Class diff --git a/ShiftOS/loginform.resx b/ShiftOS/loginform.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/ShiftOS/loginform.resx @@ -0,0 +1,120 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> +</root> \ No newline at end of file diff --git a/ShiftOS/loginform.vb b/ShiftOS/loginform.vb new file mode 100644 index 0000000..6385e8c --- /dev/null +++ b/ShiftOS/loginform.vb @@ -0,0 +1,345 @@ +Imports ShiftOS.Helper +Imports ShiftOS.Paths +Public Class loginform + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 + Public minimumsizeheight As Integer = 0 + + Public throwRegister As Boolean = False + + +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + If throwRegister = True Then + lbmsgtext.Text = "Create a user account for ShiftOS. You will then use this to log in in the future." + btnok.Text = "Register" + txtconfirm.Show() + Else + Label3.Hide() + lbmsgtext.Text = "Please log into your ShiftOS account." + btnok.Text = "Log In" + txtconfirm.Hide() + End If + + setupall() + + + + ShiftOSDesktop.pnlpanelbuttoninfobox.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoninfobox, ShiftOSDesktop.tbinfoboxicon, ShiftOSDesktop.tbinfoboxtext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + Try + playSound(sounddir & "infobox.wav", AudioPlayMode.Background) + Catch + + End Try + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + + + + + + + + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(371, 225) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Show() + End If + + + + + If ShiftOSDesktop.boughtwindowborders = True Then + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtinfoboxicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.infoboxicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Public Sub setskin() + 'disposals + titlebar.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + 'apply new skin + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + + + Private Sub btnok_Click(sender As Object, e As EventArgs) Handles btnok.Click + If throwRegister = False Then + If txtusername.Text = ShiftOSDesktop.username And txtpassword.Text = ShiftOSDesktop.password Then ' The bulk of this code is handled by ShiftOSDesktop.vb. + Me.Close() + Else + lbtitletext.Text = "Invalid Username or Password" + End If + Else + If Not txtusername.Text = "" Then + If txtpassword.Text = txtconfirm.Text Then + ShiftOSDesktop.username = txtusername.Text + ShiftOSDesktop.password = txtpassword.Text + ShiftOSDesktop.savegame() + Me.Close() + Else + lbtitletext.Text = "Passwords do not match." + End If + Else + lbtitletext.Text = "Username cannot be empty!" + End If + End If + End Sub + + + + + + +End Class \ No newline at end of file diff --git a/ShiftOS/modform.Designer.vb b/ShiftOS/modform.Designer.vb new file mode 100644 index 0000000..52162e3 --- /dev/null +++ b/ShiftOS/modform.Designer.vb @@ -0,0 +1,242 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class ModForm + 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() + Me.components = New System.ComponentModel.Container() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.forcetitle = New System.Windows.Forms.Timer(Me.components) + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 313) + Me.pgleft.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(807, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 313) + Me.pgright.TabIndex = 17 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(809, 30) + Me.titlebar.TabIndex = 14 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(807, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 341) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(805, 2) + Me.pgbottom.TabIndex = 18 + ' + 'pgcontents + ' + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(805, 311) + Me.pgcontents.TabIndex = 15 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'forcetitle + ' + ' + 'coherencemodeform + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(809, 343) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "coherencemodeform" + Me.Text = "template" + Me.TopMost = True + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer + Friend WithEvents forcetitle As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/modform.resx b/ShiftOS/modform.resx new file mode 100644 index 0000000..3ef34f5 --- /dev/null +++ b/ShiftOS/modform.resx @@ -0,0 +1,132 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>117, 17</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>201, 17</value> + </metadata> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>314, 17</value> + </metadata> + <metadata name="forcetitle.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 17</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/modform.vb b/ShiftOS/modform.vb new file mode 100644 index 0000000..4d139b9 --- /dev/null +++ b/ShiftOS/modform.vb @@ -0,0 +1,466 @@ +Class ModForm + Private SelectedLabel As Label + + +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + + Public programnametokeep As Window + Public RollUpAndDownHW As System.Drawing.Size + + Private PosicionMouseHeader As Point + Private tmpPoint As Point + Private MouseDown As Boolean + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + forcetitle.Start() + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + 'Old skinning system - No idea what this does + ''Private Sub titlebar_MouseEnter(sender As Object, e As EventArgs) Handles titlebar.MouseEnter, titlebar.MouseUp, lbtitletext.MouseEnter, pnlicon.MouseEnter, closebutton.MouseEnter, rollupbutton.MouseEnter + '' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(1) + ''End Sub + + 'Private Sub titlebar_MouseLeave(sender As Object, e As EventArgs) Handles titlebar.MouseLeave, lbtitletext.MouseLeave, pnlicon.MouseLeave, closebutton.MouseLeave, rollupbutton.MouseLeave + ' If ShiftOSDesktop.skinimages(3) = ShiftOSDesktop.skinimages(4) Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0) + 'End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + ' fixes growing issue + If justopened = False Then + Me.Size = New Size(Me.Width, Me.Height - (Skins.titlebarheight / 2)) + End If + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + 'Me.Hide() + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + 'Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) 'Just put a little algebra in the first size setting and comment out the mess + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + 'Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + 'Me.Size = New Size(Me.Width + Skins. borderwidth + Skins. borderwidth, Me.Height + Skins. borderwidth) + 'rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + 'Me.Show() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.dodgename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region + + Public Sub CreateLabel(ByVal LabelName As String) + Try + Dim NewLabel As New Label + NewLabel.Name = LabelName + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + End Sub + + Public Sub SelectLabel(ByVal LabelName As String) + Try + SelectedLabel.Name = LabelName + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + End Sub + + Public Sub MoveSelectedLabelLocationX(ByVal XLocation As Integer) + Try + SelectedLabel.Location = New Point(XLocation, SelectedLabel.Location.Y) + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + End Sub + + Public Sub MoveSelectedLabelLocationY(ByVal YLocation As Integer) + Try + SelectedLabel.Location = New Point(SelectedLabel.Location.X, YLocation) + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + End Sub + + Public Sub SelectedLabelText(ByVal LabelText As String) + Try + SelectedLabel.Text = LabelText + Catch ex As Exception + infobox.showinfo("Critical Modification Application Error", "A critical error occured whilst trying to add to your codepoint value - please contact the developer of your mod") + End Try + End Sub +End Class diff --git a/ShiftOS/skins.vb b/ShiftOS/skins.vb new file mode 100644 index 0000000..867541b --- /dev/null +++ b/ShiftOS/skins.vb @@ -0,0 +1,866 @@ +Imports System.IO +Module Skins +#Region "Declarations" + Dim savepath As String = ShiftOSDesktop.ShiftOSPath + Dim firstrun As Boolean = True + 'WINDOW SETTINGS/IMAGES + 'images + Public titlebar As Image = Nothing + Public titlebarlayout As String = 3 + Public borderleft As Image = Nothing + Public borderleftlayout As String = 3 + Public borderright As Image = Nothing + Public borderrightlayout As String = 3 + Public borderbottom As Image = Nothing + Public borderbottomlayout As String = 3 + Public closebtn As Image = Nothing + Public closebtnlayout As String = 3 + Public closebtnhover As Image = Nothing + Public closebtnclick As Image = Nothing + Public rollbtn As Image = Nothing + Public rollbtnlayout As String = 3 + Public rollbtnhover As Image = Nothing + Public rollbtnclick As Image = Nothing + Public minbtn As Image = Nothing + Public minbtnlayout As String = 3 + Public minbtnhover As Image = Nothing + Public minbtnclick As Image = Nothing + Public rightcorner As Image = Nothing + Public rightcornerlayout As String = 3 + Public leftcorner As Image = Nothing + Public leftcornerlayout As String = 3 + ' Late entry: need to fix window code to include this + Public bottomleftcorner As Image = Nothing + Public bottomleftcornerlayout As String = 3 + Public bottomrightcorner As Image = Nothing + Public bottomrightcornerlayout As String = 3 + Public bottomleftcornercolour As Color = Color.Gray + Public bottomrightcornercolour As Color = Color.Gray + + Public enablebordercorners As Boolean = False + + ' settings + Public closebtnsize As Size = New Size(22, 22) + Public rollbtnsize As Size = New Size(22, 22) + Public minbtnsize As Size = New Size(22, 22) + Public titlebarheight As Integer = 30 + Public closebtnfromtop As Integer = 5 + Public closebtnfromside As Integer = 2 + Public rollbtnfromtop As Integer = 5 + Public rollbtnfromside As Integer = 26 + Public minbtnfromtop As Integer = 5 + Public minbtnfromside As Integer = 52 + Public borderwidth As Integer = 2 + Public enablecorners As Boolean = False + Public titlebarcornerwidth As Integer = 5 + Public titleiconfromside As Integer = 4 + Public titleiconfromtop As Integer = 4 + 'colours + Public titlebarcolour As Color = Color.Gray + Public borderleftcolour As Color = Color.Gray + Public borderrightcolour As Color = Color.Gray + Public borderbottomcolour As Color = Color.Gray + Public closebtncolour As Color = Color.Black + Public closebtnhovercolour As Color = Color.Black + Public closebtnclickcolour As Color = Color.Black + Public rollbtncolour As Color = Color.Black + Public rollbtnhovercolour As Color = Color.Black + Public rollbtnclickcolour As Color = Color.Black + Public minbtncolour As Color = Color.Black + Public minbtnhovercolour As Color = Color.Black + Public minbtnclickcolour As Color = Color.Black + Public rightcornercolour As Color = Color.Gray + Public leftcornercolour As Color = Color.Gray + ' Text + Public titletextfontfamily As String = "Microsoft Sans Serif" + Public titletextfontsize As Integer = 10 + Public titletextfontstyle As String = FontStyle.Bold + Public titletextpos As String = "Left" + Public titletextfromtop As Integer = 3 + Public titletextfromside As Integer = 24 + Public titletextcolour As Color = Color.White + + 'DESKTOP + Public desktoppanelcolour As Color = Color.Gray + Public desktopbackgroundcolour As Color + Public desktoppanelheight As Integer = 24 + Public desktoppanelposition As String = "Top" + Public clocktextcolour As Color = Color.Black + Public clockbackgroundcolor As Color = Color.Gray + Public panelclocktexttop As Integer = 3 + Public panelclocktextsize As Integer = 10 + Public panelclocktextfont As String = "Byington" + Public panelclocktextstyle As FontStyle = FontStyle.Bold + Public applauncherbuttoncolour As Color = Color.Gray + Public applauncherbuttonclickedcolour As Color = Color.Gray + Public applauncherbackgroundcolour As Color = Color.Gray + Public applaunchermouseovercolour As Color = Color.Gray + Public applicationsbuttontextcolour As Color = Color.Black + Public applicationbuttonheight As Integer = 24 + Public applicationbuttontextsize As Integer = 10 + Public applicationbuttontextfont As String = "Byington" + Public applicationbuttontextstyle As FontStyle = FontStyle.Bold + Public applicationlaunchername As String = "Applications" + Public titletextposition As String = "Left" + Public applaunchermenuholderwidth As Integer = 100 + Public panelbuttonicontop As Integer = 3 + Public panelbuttoniconside As Integer = 4 + Public panelbuttoniconsize As Integer = 16 + Public panelbuttonheight As Integer = 20 + Public panelbuttonwidth As Integer = 185 + Public panelbuttoncolour As Color = Color.Black + Public panelbuttontextcolour As Color = Color.White + Public panelbuttontextsize As Integer = 10 + Public panelbuttontextfont As String = "Byington" + Public panelbuttontextstyle As FontStyle = FontStyle.Regular + Public panelbuttontextside As Integer = 16 + Public panelbuttontexttop As Integer = 2 + Public panelbuttongap As Integer = 4 + Public panelbuttonfromtop As Integer = 2 + Public panelbuttoninitialgap As Integer = 8 + + Public launcheritemsize As Integer = 10 + Public launcheritemfont As String = "Byington" + Public launcheritemstyle As FontStyle = FontStyle.Regular + Public launcheritemcolour As Color = Color.Black + + ' Images + Public desktoppanel As Image = Nothing + Public desktoppanellayout As String = 3 + Public desktopbackground As Image = Nothing + Public desktopbackgroundlayout As String = 3 + Public panelclock As Image = Nothing + Public panelclocklayout As String = 3 + Public applaunchermouseover As Image = Nothing + Public applauncher As Image = Nothing + Public applauncherlayout As String = 3 + Public applauncherclick As Image = Nothing + Public panelbutton As Image = Nothing + Public panelbuttonlayout As String = 3 + + 'Below is all for the Desktop Icons patch. + + Public enabledraggableicons As Boolean = True + Public icontextcolor As Color = Color.White + Public showicons As Boolean = True + Public iconview1 As View = View.LargeIcon + Public iconview2 As View = View.Tile + + 'DevX's Advanced App Launcher (coded by The Ultimate Hacker) + + Public topBarHeight As Integer = 50 + Public bottomBarHeight As Integer = 50 + Public placesSide As String = "Left" + Public startHeight As Integer = 526 + Public startWidth As Integer = 320 + Public shutdownstring As String = "Shut Down ShiftOS" + Public userNamePosition = "Middle, Right" + Public recentIconsHorizontal As Boolean = False + Public usernametextcolor As Color = Color.White + Public usernamefont As String = "Trebuchet MS" + Public usernamefontsize As Integer = 12 + Public usernamefontstyle As FontStyle = FontStyle.Bold + Public userNamePanelBackgroundColor As Color = Color.Gray + Public userNamePanelBackground As Image + Public powerPanelBackgroundColor As Color = Color.Gray + Public powerPanelBackgroundImage As Image + Public shutdownTextColor As Color = Color.White + Public shutdownTextFont As String = "Trebuchet MS" + Public shutdownTextSize As Integer = 12 + Public shutdownTextStyle As FontStyle = FontStyle.Italic + Public usrPanelBackgroundLayout As ImageLayout = ImageLayout.Stretch + Public pwrPanelBackgroundLayout As ImageLayout = ImageLayout.Stretch + Public useClassicAppLauncher As Boolean = True + + + '0.0.9 ALPHA 2 + + 'Login Screen + + Public autologin As Boolean = True + Public fullScreen As Boolean = False + Public inputfont As String = "Trebuchet MS" + Public inputfontsize As Integer = 12 + Public inputfontstyle As FontStyle = FontStyle.Regular + Public inputforecolor As Color = Color.Gray + Public inputbackcolor As Color = Color.Black + Public buttonfont As String = "Trebuchet MS" + Public buttonfontsize As Integer = 12 + Public buttonfontstyle As FontStyle = FontStyle.Italic + + Public userimagesize As Integer = 128 + Public userimagelocation As Point = New Point(36, 202) + Public userimage As Image + Public userimagelayout As ImageLayout = ImageLayout.Stretch + + Public loginbg As Image + Public loginbgcolor As Color = Color.Black + Public loginbglayout As ImageLayout = ImageLayout.Stretch + + 'Locations... + + Public userTextboxX As Integer = 171 + Public userTextBoxY As Integer = 202 + Public passTextBoxX As Integer = 171 + Public passTextBoxY As Integer = 243 + Public loginbtnX As Integer = 268 + Public loginbtnY As Integer = 286 + Public shutdownbtnX As Integer = 1755 + Public shutdownbtnY As Integer = 979 + + + Private Function GetImage(ByVal fileName As String) As Bitmap + Dim ret As Bitmap + Using img As Image = Image.FromFile(fileName) + ret = New Bitmap(img) + End Using + Return ret + End Function + +#End Region + + ' LOAD SKIN FROM SKN FILE + Public Sub loadsknfile(ByVal filepath As String) + If Directory.Exists(loadedskin) Then My.Computer.FileSystem.DeleteDirectory(savepath + "Shiftum42\Skins\Loaded", FileIO.DeleteDirectoryOption.DeleteAllContents) + Directory.CreateDirectory(savepath + "Shiftum42\Skins\Loaded") + System.IO.Compression.ZipFile.ExtractToDirectory(filepath, savepath + "Shiftum42\Skins\Loaded") + loadimages() + End Sub + ' LOAD SKIN FROM SAVE FOLDER + Public Sub loadimages() + If File.Exists(loadedskin & "userpic") Then + userimage = GetImage(loadedskin & "userpic") + End If + If File.Exists(loadedskin & "loginbg") Then + loginbg = GetImage(loadedskin & "loginbg") + End If + If File.Exists(loadedskin & "userbar") Then + userNamePanelBackground = GetImage(loadedskin & "userbar") + End If + If File.Exists(loadedskin & "powerbar") Then + powerPanelBackgroundImage = GetImage(loadedskin & "powerbar") + End If + If File.Exists(loadedskin & "titlebar") Then + titlebar = GetImage(loadedskin & "titlebar") + Else : titlebar = Nothing + End If + If File.Exists(loadedskin & "borderleft") Then + borderleft = GetImage(loadedskin & "borderleft") + Else : borderleft = Nothing + End If + If File.Exists(loadedskin & "borderright") Then + borderright = GetImage(loadedskin & "borderright".Clone) + Else : borderright = Nothing + End If + If File.Exists(loadedskin & "borderbottom") Then + borderbottom = GetImage(loadedskin & "borderbottom".Clone) + Else : borderbottom = Nothing + End If + If File.Exists(loadedskin & "closebtn") Then + closebtn = GetImage(loadedskin & "closebtn".Clone) + Else : closebtn = Nothing + End If + If File.Exists(loadedskin & "closebtnhover") Then + closebtnhover = GetImage(loadedskin & "closebtnhover".Clone) + Else : closebtnhover = Nothing + End If + If File.Exists(loadedskin & "closebtnclick") Then + closebtnclick = GetImage(loadedskin & "closebtnclick".Clone) + Else : closebtnclick = Nothing + End If + If File.Exists(loadedskin & "rollbtn") Then + rollbtn = GetImage(loadedskin & "rollbtn".Clone) + Else : rollbtn = Nothing + End If + If File.Exists(loadedskin & "rollbtnhover") Then + rollbtnhover = GetImage(loadedskin & "rollbtnhover".Clone) + Else : rollbtnhover = Nothing + End If + If File.Exists(loadedskin & "rollbtnclick") Then + rollbtnclick = GetImage(loadedskin & "rollbtnclick".Clone) + Else : rollbtnclick = Nothing + End If + If File.Exists(loadedskin & "minbtn") Then + minbtn = GetImage(loadedskin & "minbtn".Clone) + Else : minbtn = Nothing + End If + If File.Exists(loadedskin & "minbtnhover") Then + minbtnhover = GetImage(loadedskin & "minbtnhover".Clone) + Else : minbtnhover = Nothing + End If + If File.Exists(loadedskin & "minbtnclick") Then + minbtnclick = GetImage(loadedskin & "minbtnclick".Clone) + Else : minbtnclick = Nothing + End If + If File.Exists(loadedskin & "rightcorner") Then + rightcorner = GetImage(loadedskin & "rightcorner".Clone) + Else : rightcorner = Nothing + End If + If File.Exists(loadedskin & "leftcorner") Then + leftcorner = GetImage(loadedskin & "leftcorner".Clone) + Else : leftcorner = Nothing + End If + If File.Exists(loadedskin & "desktoppanel") Then + desktoppanel = GetImage(loadedskin & "desktoppanel".Clone) + Else : desktoppanel = Nothing + End If + If File.Exists(loadedskin & "desktopbackground") Then + desktopbackground = GetImage(loadedskin & "desktopbackground".Clone) + Else : desktopbackground = Nothing + End If + If File.Exists(loadedskin & "panelbutton") Then + panelbutton = GetImage(loadedskin & "panelbutton".Clone) + Else : panelbutton = Nothing + End If + If File.Exists(loadedskin & "applaunchermouseover") Then + applaunchermouseover = GetImage(loadedskin & "applaunchermouseover".Clone) + Else : applaunchermouseover = Nothing + End If + If File.Exists(loadedskin & "applauncher") Then + applauncher = GetImage(loadedskin & "applauncher".Clone) + Else : applauncher = Nothing + End If + If File.Exists(loadedskin & "applauncherclick") Then + applauncherclick = GetImage(loadedskin & "applauncherclick".Clone) + Else : applauncherclick = Nothing + End If + If File.Exists(loadedskin & "panelclock") Then + panelclock = GetImage(loadedskin & "panelclock".Clone) + Else : panelclock = Nothing + End If + If File.Exists(loadedskin & "bottomleftcorner") Then + bottomleftcorner = GetImage(loadedskin & "bottomleftcorner".Clone) + Else : bottomleftcorner = Nothing + End If + If File.Exists(loadedskin & "bottomrightcorner") Then + bottomrightcorner = GetImage(loadedskin & "bottomrightcorner".Clone) + Else : bottomrightcorner = Nothing + End If + 'load settings + Dim loaddata(200) As String + If File.Exists(loadedskin & "data.dat") Then + Dim sr As StreamReader = New StreamReader(loadedskin & "data.dat") + + For i As Integer = 0 To 200 Step 1 + loaddata(i) = sr.ReadLine + If i = 200 Then + sr.Close() + Exit For + End If + Next + + ' settings + + + closebtnsize = New Size(loaddata(1), loaddata(2)) + rollbtnsize = New Size(loaddata(3), loaddata(4)) + minbtnsize = New Size(loaddata(5), loaddata(6)) + titlebarheight = loaddata(7) + closebtnfromtop = loaddata(8) + closebtnfromside = loaddata(9) + rollbtnfromtop = loaddata(10) + rollbtnfromside = loaddata(11) + minbtnfromtop = loaddata(12) + minbtnfromside = loaddata(13) + borderwidth = loaddata(14) + enablecorners = loaddata(15) + titlebarcornerwidth = loaddata(16) + titleiconfromside = loaddata(17) + titleiconfromtop = loaddata(18) + titlebarcolour = Color.FromArgb(loaddata(19)) + borderleftcolour = Color.FromArgb(loaddata(20)) + borderrightcolour = Color.FromArgb(loaddata(21)) + borderbottomcolour = Color.FromArgb(loaddata(22)) + closebtncolour = Color.FromArgb(loaddata(23)) + closebtnhovercolour = Color.FromArgb(loaddata(24)) + closebtnclickcolour = Color.FromArgb(loaddata(25)) + rollbtncolour = Color.FromArgb(loaddata(26)) + rollbtnhovercolour = Color.FromArgb(loaddata(27)) + rollbtnclickcolour = Color.FromArgb(loaddata(28)) + minbtncolour = Color.FromArgb(loaddata(29)) + minbtnhovercolour = Color.FromArgb(loaddata(30)) + minbtnclickcolour = Color.FromArgb(loaddata(31)) + rightcornercolour = Color.FromArgb(loaddata(32)) + leftcornercolour = Color.FromArgb(loaddata(33)) + bottomrightcornercolour = Color.FromArgb(loaddata(34)) + bottomleftcornercolour = Color.FromArgb(loaddata(35)) + titletextfontfamily = loaddata(36) + titletextfontsize = loaddata(37) + titletextfontstyle = loaddata(38) + titletextpos = loaddata(39) + titletextfromtop = loaddata(40) + titletextfromside = loaddata(41) + titletextcolour = Color.FromArgb(loaddata(42)) + desktoppanelcolour = Color.FromArgb(loaddata(43)) + desktopbackgroundcolour = Color.FromArgb(loaddata(44)) + desktoppanelheight = loaddata(45) + desktoppanelposition = loaddata(46) + clocktextcolour = Color.FromArgb(loaddata(47)) + clockbackgroundcolor = Color.FromArgb(loaddata(48)) + panelclocktexttop = loaddata(49) + panelclocktextsize = loaddata(50) + panelclocktextfont = loaddata(51) + panelclocktextstyle = loaddata(52) + applauncherbuttoncolour = Color.FromArgb(loaddata(53)) + applauncherbuttonclickedcolour = Color.FromArgb(loaddata(54)) + applauncherbackgroundcolour = Color.FromArgb(loaddata(55)) + applaunchermouseovercolour = Color.FromArgb(loaddata(56)) + applicationsbuttontextcolour = Color.FromArgb(loaddata(57)) + applicationbuttonheight = loaddata(58) + applicationbuttontextsize = loaddata(59) + applicationbuttontextfont = loaddata(60) + applicationbuttontextstyle = loaddata(61) + applicationlaunchername = loaddata(62) + titletextposition = loaddata(63) + applaunchermenuholderwidth = loaddata(64) + panelbuttonicontop = loaddata(65) + panelbuttoniconside = loaddata(66) + panelbuttoniconsize = loaddata(67) + panelbuttonheight = loaddata(68) + panelbuttonwidth = loaddata(69) + panelbuttoncolour = Color.FromArgb(loaddata(70)) + panelbuttontextcolour = Color.FromArgb(loaddata(71)) + panelbuttontextsize = loaddata(72) + panelbuttontextfont = loaddata(73) + panelbuttontextstyle = loaddata(74) + panelbuttontextside = loaddata(75) + panelbuttontexttop = loaddata(76) + panelbuttongap = loaddata(77) + panelbuttonfromtop = loaddata(78) + panelbuttoninitialgap = loaddata(79) + + 'layout stuff + titlebarlayout = loaddata(89) + borderleftlayout = loaddata(90) + borderrightlayout = loaddata(91) + borderbottomlayout = loaddata(92) + closebtnlayout = loaddata(93) + rollbtnlayout = loaddata(94) + minbtnlayout = loaddata(95) + rightcornerlayout = loaddata(96) + leftcornerlayout = loaddata(97) + desktoppanellayout = loaddata(98) + desktopbackgroundlayout = loaddata(99) + panelclocklayout = loaddata(100) + applauncherlayout = loaddata(101) + panelbuttonlayout = loaddata(102) + bottomleftcornerlayout = loaddata(103) + bottomrightcornerlayout = loaddata(104) + ' End of 0.0.8 beta 6 save file, check if exists for future features + If Not loaddata(105) = "" Then launcheritemcolour = Color.FromArgb(loaddata(105)) + If Not loaddata(106) = "" Then launcheritemfont = loaddata(106) + If Not loaddata(107) = "" Then launcheritemsize = loaddata(107) + If Not loaddata(108) = "" Then launcheritemstyle = loaddata(108) + If Not loaddata(109) = "" Then enablebordercorners = loaddata(109) + + 'for adding extra features, check: + + If loaddata(110) = "" Or loaddata(110) = "End of skin data" Then loaddata(110) = enabledraggableicons Else enabledraggableicons = loaddata(110) + If loaddata(111) = "" Or loaddata(111) = "End of skin data" Then loaddata(111) = icontextcolor.ToArgb Else icontextcolor = Color.FromArgb(loaddata(111)) + If loaddata(112) = "" Or loaddata(112) = "End of skin data" Then loaddata(112) = showicons Else showicons = loaddata(112) + If loaddata(113) = "" Or loaddata(113) = "End of skin data" Then loaddata(113) = iconview1 Else iconview1 = loaddata(113) + Try + If loaddata(114) = "" Then topBarHeight = 50 Else topBarHeight = loaddata(114) + Catch ex As Exception + topBarHeight = 50 + infobox.showinfo("Error - Bad Skin File", "It appears that there was an error loading parts of this skin. The unloadable data has been reset to default values.") + End Try + If loaddata(115) = "" Then bottomBarHeight = 50 Else bottomBarHeight = loaddata(115) + If loaddata(116) = "" Then placesSide = "Left" Else placesSide = loaddata(116) + If loaddata(117) = "" Then startHeight = 526 Else startHeight = loaddata(117) + If loaddata(118) = "" Then startWidth = 320 Else startWidth = loaddata(118) + If loaddata(119) = "" Then shutdownstring = "Shut Down ShiftOS" Else shutdownstring = loaddata(119) + If loaddata(120) = "" Then userNamePosition = "Middle, Right" Else userNamePosition = loaddata(120) + If loaddata(121) = "" Then recentIconsHorizontal = False Else recentIconsHorizontal = loaddata(121) + If loaddata(122) = "" Then usernametextcolor = Color.White Else usernametextcolor = Color.FromArgb(loaddata(122)) + If loaddata(123) = "" Then usernamefont = "Trebuchet MS" Else usernamefont = loaddata(123) + If loaddata(124) = "" Then usernamefontsize = 12 Else usernamefontsize = loaddata(124) + If loaddata(125) = "" Then usernamefontstyle = FontStyle.Bold Else usernamefontstyle = loaddata(125) + If loaddata(126) = "" Then userNamePanelBackgroundColor = Color.Gray Else userNamePanelBackgroundColor = Color.FromArgb(loaddata(126)) + If loaddata(127) = "" Then powerPanelBackgroundColor = Color.Gray Else powerPanelBackgroundColor = Color.FromArgb(loaddata(127)) + If loaddata(128) = "" Then shutdownTextColor = Color.White Else shutdownTextColor = Color.FromArgb(loaddata(128)) + If loaddata(129) = "" Then shutdownTextFont = "Trebuchet MS" Else shutdownTextFont = loaddata(129) + If loaddata(130) = "" Then shutdownTextSize = 12 Else shutdownTextSize = loaddata(130) + If loaddata(131) = "" Then shutdownTextStyle = FontStyle.Italic Else shutdownTextStyle = loaddata(132) + If loaddata(132) = "" Then usrPanelBackgroundLayout = ImageLayout.Stretch Else usrPanelBackgroundLayout = loaddata(132) + If loaddata(133) = "" Then pwrPanelBackgroundLayout = ImageLayout.Stretch Else pwrPanelBackgroundLayout = loaddata(133) + If loaddata(134) = "" Then useClassicAppLauncher = False Else useClassicAppLauncher = loaddata(134) + If loaddata(135) = "" Then autologin = True Else autologin = loaddata(135) + If loaddata(136) = "" Then fullScreen = False Else fullScreen = loaddata(136) + If loaddata(137) = "" Then inputfont = "Trebuchet MS" Else inputfont = loaddata(137) + If loaddata(138) = "" Then inputfontsize = 12 Else inputfontsize = loaddata(138) + If loaddata(139) = "" Then inputfontstyle = FontStyle.Regular Else inputfontstyle = loaddata(139) + If loaddata(140) = "" Then inputforecolor = Color.Gray Else inputforecolor = Color.FromArgb(loaddata(140)) + If loaddata(141) = "" Then inputbackcolor = Color.Black Else inputbackcolor = Color.FromArgb(loaddata(141)) + If loaddata(142) = "" Then buttonfont = "Trebuchet MS" Else buttonfont = loaddata(142) + If loaddata(143) = "" Then buttonfontsize = 12 Else buttonfontsize = loaddata(143) + If loaddata(144) = "" Then buttonfontstyle = FontStyle.Italic Else buttonfontstyle = loaddata(144) + If loaddata(145) = "" Then userimagesize = 128 Else userimagesize = loaddata(145) + If loaddata(146) = "" And loaddata(147) = "" Then userimagelocation = New Point(36, 202) Else userimagelocation = New Point(loaddata(146), loaddata(147)) + If loaddata(148) = "" Then userimagelayout = ImageLayout.Stretch Else userimagelayout = loaddata(148) + If loaddata(149) = "" Then loginbgcolor = Color.Black Else loginbgcolor = Color.FromArgb(loaddata(149)) + If loaddata(150) = "" Then loginbglayout = ImageLayout.Stretch Else loginbglayout = loaddata(150) + + Else + setupdefaults() + End If + ' Christmas easteregg + Try ' If user's PC uses weird/non-numeric dating system - eg: http://puu.sh/eFq6l/8da8a03617.png + Dim d() As String = Split(Date.Today, "/") + If (d(0) = 25 And d(1) = 12) Or (d(0) = 12 And d(1) = 25) Then + desktopbackground = My.Resources.christmaseasteregg + desktopbackgroundlayout = 2 + desktopbackgroundcolour = Color.Black + End If + Catch ex As Exception + End Try + applyskin() + End Sub + ' SET SKIN + Public Sub applyskin() + ShiftOSDesktop.addtitlebars() + ShiftOSDesktop.setupdesktop() + End Sub + ' SAVE TO SKN FILE + Public Sub saveskin(ByVal path As String) + If Not File.Exists(path) Then + Dim sw As StreamWriter = New StreamWriter(Paths.loadedskin & "SKN-version") 'tells skin loader which system to use when openning the file + sw.WriteLine("Name of skinning system used to create this skn file:") + sw.WriteLine("2.0 disposal-free skinning") + sw.WriteLine("Skinning system created by william.1008 on December 2014, based on 1.0 system by DevX") + sw.Close() + saveskinfiles(False) + Compression.ZipFile.CreateFromDirectory(Paths.loadedskin, path) + File.Delete(Paths.loadedskin & "SKN-version") + Else + infobox.showinfo("File Exists", "That file location is already taken, please choose another.") + End If + End Sub + ' SAVE TO SAVE FOLDER + Public Sub saveskinfiles(ByVal apply As Boolean) + If File.Exists(Paths.loadedskin) Then + Directory.Delete(Paths.loadedskin) + End If + Directory.CreateDirectory(Paths.loadedskin) + saveimage(titlebar, "titlebar") + saveimage(borderleft, "borderleft") + saveimage(borderright, "borderright") + saveimage(borderbottom, "borderbottom") + saveimage(closebtn, "closebtn") + saveimage(closebtnhover, "closebtnhover") + saveimage(closebtnclick, "closebtnclick") + saveimage(rollbtn, "rollbtn") + saveimage(rollbtnhover, "rollbtnhover") + saveimage(rollbtnclick, "rollbtnclick") + saveimage(minbtn, "minbtn") + saveimage(minbtnhover, "minbtnhover") + saveimage(minbtnclick, "minbtnclick") + saveimage(rightcorner, "rightcorner") + saveimage(leftcorner, "leftcorner") + saveimage(desktoppanel, "desktoppanel") + saveimage(desktopbackground, "desktopbackground") + saveimage(panelclock, "panelclock") + saveimage(applaunchermouseover, "applaunchermouseover") + saveimage(applauncher, "applauncher") + saveimage(applauncherclick, "applauncherclick") + saveimage(panelbutton, "panelbutton") + saveimage(bottomleftcorner, "bottomleftcorner") + saveimage(bottomrightcorner, "bottomrightcorner") + saveimage(userNamePanelBackground, "userbar") + saveimage(powerPanelBackgroundImage, "powerbar") + saveimage(userimage, "userpic") + saveimage(loginbg, "loginbg") + 'save settings to dat file + Dim savedata(200) As String + ' setting and colour as saved in the order they are declared, image's are saved in sepporate preset files, + ' image layout options are saved at the end of file + savedata(0) = "ShiftOS skin data - Beware: Editing may result in skinning errors" + savedata(2) = closebtnsize.Height + savedata(1) = closebtnsize.Width + savedata(4) = rollbtnsize.Height + savedata(3) = rollbtnsize.Width + savedata(6) = minbtnsize.Height + savedata(5) = minbtnsize.Width + savedata(7) = titlebarheight + savedata(8) = closebtnfromtop + savedata(9) = closebtnfromside + savedata(10) = rollbtnfromtop + savedata(11) = rollbtnfromside + savedata(12) = minbtnfromtop + savedata(13) = minbtnfromside + savedata(14) = borderwidth + savedata(15) = enablecorners + savedata(16) = titlebarcornerwidth + savedata(17) = titleiconfromside + savedata(18) = titleiconfromtop + savedata(19) = titlebarcolour.ToArgb + savedata(20) = borderleftcolour.ToArgb + savedata(21) = borderrightcolour.ToArgb + savedata(22) = borderbottomcolour.ToArgb + savedata(23) = closebtncolour.ToArgb + savedata(24) = closebtnhovercolour.ToArgb + savedata(25) = closebtnclickcolour.ToArgb + savedata(26) = rollbtncolour.ToArgb + savedata(27) = rollbtnhovercolour.ToArgb + savedata(28) = rollbtnclickcolour.ToArgb + savedata(29) = minbtncolour.ToArgb + savedata(30) = minbtnhovercolour.ToArgb + savedata(31) = minbtnclickcolour.ToArgb + savedata(32) = rightcornercolour.ToArgb + savedata(33) = leftcornercolour.ToArgb + savedata(34) = bottomrightcornercolour.ToArgb + savedata(35) = bottomleftcornercolour.ToArgb + savedata(36) = titletextfontfamily + savedata(37) = titletextfontsize + savedata(38) = titletextfontstyle + savedata(39) = titletextpos + savedata(40) = titletextfromtop + savedata(41) = titletextfromside + savedata(42) = titletextcolour.ToArgb + savedata(43) = desktoppanelcolour.ToArgb + savedata(44) = desktopbackgroundcolour.ToArgb + savedata(45) = desktoppanelheight + savedata(46) = desktoppanelposition + savedata(47) = clocktextcolour.ToArgb + savedata(48) = clockbackgroundcolor.ToArgb + savedata(49) = panelclocktexttop + savedata(50) = panelclocktextsize + savedata(51) = panelclocktextfont + savedata(52) = panelclocktextstyle + savedata(53) = applauncherbuttoncolour.ToArgb + savedata(54) = applauncherbuttonclickedcolour.ToArgb + savedata(55) = applauncherbackgroundcolour.ToArgb + savedata(56) = applaunchermouseovercolour.ToArgb + savedata(57) = applicationsbuttontextcolour.ToArgb + savedata(58) = applicationbuttonheight + savedata(59) = applicationbuttontextsize + savedata(60) = applicationbuttontextfont + savedata(61) = applicationbuttontextstyle + savedata(62) = applicationlaunchername + savedata(63) = titletextposition + savedata(64) = applaunchermenuholderwidth + savedata(65) = panelbuttonicontop + savedata(66) = panelbuttoniconside + savedata(67) = panelbuttoniconsize + savedata(68) = panelbuttonheight + savedata(69) = panelbuttonwidth + savedata(70) = panelbuttoncolour.ToArgb + savedata(71) = panelbuttontextcolour.ToArgb + savedata(72) = panelbuttontextsize + savedata(73) = panelbuttontextfont + savedata(74) = panelbuttontextstyle + savedata(75) = panelbuttontextside + savedata(76) = panelbuttontexttop + savedata(77) = panelbuttongap + savedata(78) = panelbuttonfromtop + savedata(79) = panelbuttoninitialgap + 'Image layout options + savedata(89) = titlebarlayout + savedata(90) = borderleftlayout + savedata(91) = borderrightlayout + savedata(92) = borderbottomlayout + savedata(93) = closebtnlayout + savedata(94) = rollbtnlayout + savedata(95) = minbtnlayout + savedata(96) = rightcornerlayout + savedata(97) = leftcornerlayout + savedata(98) = desktoppanellayout + savedata(99) = desktopbackgroundlayout + savedata(100) = panelclocklayout + savedata(101) = applauncherlayout + savedata(102) = panelbuttonlayout + savedata(103) = bottomleftcornerlayout + savedata(104) = bottomrightcornerlayout + + savedata(105) = launcheritemcolour.ToArgb + savedata(106) = launcheritemfont + savedata(107) = launcheritemsize + savedata(108) = launcheritemstyle + savedata(109) = enablebordercorners + savedata(110) = enabledraggableicons + savedata(111) = icontextcolor.ToArgb + savedata(112) = showicons + savedata(113) = iconview1 + savedata(114) = topBarHeight + savedata(115) = bottomBarHeight + savedata(116) = placesSide + savedata(117) = startHeight + savedata(118) = startWidth + savedata(119) = shutdownstring + savedata(120) = userNamePosition + savedata(121) = recentIconsHorizontal + savedata(122) = usernametextcolor.ToArgb + savedata(123) = usernamefont + savedata(124) = usernamefontsize + savedata(125) = usernamefontstyle + savedata(126) = userNamePanelBackgroundColor.ToArgb + savedata(127) = powerPanelBackgroundColor.ToArgb + savedata(128) = shutdownTextColor.ToArgb + savedata(129) = shutdownTextFont + savedata(130) = shutdownTextSize + savedata(131) = shutdownTextStyle + savedata(132) = usrPanelBackgroundLayout + savedata(133) = pwrPanelBackgroundLayout + savedata(134) = useClassicAppLauncher + savedata(135) = autologin + savedata(136) = fullScreen + savedata(137) = inputfont + savedata(138) = inputfontsize + savedata(139) = inputfontstyle + savedata(140) = inputforecolor.ToArgb + savedata(141) = inputbackcolor.ToArgb + savedata(142) = buttonfont + savedata(143) = buttonfontsize + savedata(144) = buttonfontstyle + savedata(145) = userimagesize + savedata(146) = userimagelocation.X + savedata(147) = userimagelocation.Y + savedata(148) = userimagelayout + savedata(149) = loginbgcolor.ToArgb + savedata(150) = loginbglayout + + + ' End of skin data text was at line 110, if adding future items, check for "End of skin data" on line 110 + savedata(200) = "End of skin data" + File.WriteAllLines(Paths.loadedskin & "data.dat", savedata) + If apply = True Then + applyskin() + End If + End Sub + Public Sub setupdefaults() + titlebar = Nothing + titlebarlayout = 3 + borderleft = Nothing + borderleftlayout = 3 + borderright = Nothing + borderrightlayout = 3 + borderbottom = Nothing + borderbottomlayout = 3 + closebtn = Nothing + closebtnlayout = 3 + closebtnhover = Nothing + closebtnclick = Nothing + rollbtn = Nothing + rollbtnlayout = 3 + rollbtnhover = Nothing + rollbtnclick = Nothing + minbtn = Nothing + minbtnlayout = 3 + minbtnhover = Nothing + minbtnclick = Nothing + rightcorner = Nothing + rightcornerlayout = 3 + leftcorner = Nothing + leftcornerlayout = 3 + bottomleftcorner = Nothing + bottomleftcornerlayout = 3 + bottomrightcorner = Nothing + bottomrightcornerlayout = 3 + bottomleftcornercolour = Color.Gray + bottomrightcornercolour = Color.Gray + enablebordercorners = False + closebtnsize = New Size(22, 22) + rollbtnsize = New Size(22, 22) + minbtnsize = New Size(22, 22) + titlebarheight = 30 + closebtnfromtop = 5 + closebtnfromside = 2 + rollbtnfromtop = 5 + rollbtnfromside = 26 + minbtnfromtop = 5 + minbtnfromside = 52 + borderwidth = 2 + enablecorners = False + titlebarcornerwidth = 5 + titleiconfromside = 4 + titleiconfromtop = 4 + titlebarcolour = Color.Gray + borderleftcolour = Color.Gray + borderrightcolour = Color.Gray + borderbottomcolour = Color.Gray + closebtncolour = Color.Black + closebtnhovercolour = Color.Black + closebtnclickcolour = Color.Black + rollbtncolour = Color.Black + rollbtnhovercolour = Color.Black + rollbtnclickcolour = Color.Black + minbtncolour = Color.Black + minbtnhovercolour = Color.Black + minbtnclickcolour = Color.Black + rightcornercolour = Color.Gray + leftcornercolour = Color.Gray + titletextfontfamily = "Microsoft Sans Serif" + titletextfontsize = 10 + titletextfontstyle = FontStyle.Bold + titletextpos = "Left" + titletextfromtop = 3 + titletextfromside = 24 + titletextcolour = Color.White + desktoppanelcolour = Color.Gray + desktopbackgroundcolour = Color.Black + desktoppanelheight = 24 + desktoppanelposition = "Top" + clocktextcolour = Color.Black + clockbackgroundcolor = Color.Gray + panelclocktexttop = 3 + panelclocktextsize = 10 + panelclocktextfont = "Byington" + panelclocktextstyle = FontStyle.Bold + applauncherbuttoncolour = Color.Gray + applauncherbuttonclickedcolour = Color.Gray + applauncherbackgroundcolour = Color.Gray + applaunchermouseovercolour = Color.Gray + applicationsbuttontextcolour = Color.Black + applicationbuttonheight = 24 + applicationbuttontextsize = 10 + applicationbuttontextfont = "Byington" + applicationbuttontextstyle = FontStyle.Bold + applicationlaunchername = "Applications" + titletextposition = "Left" + applaunchermenuholderwidth = 100 + panelbuttonicontop = 3 + panelbuttoniconside = 4 + panelbuttoniconsize = 16 + panelbuttonheight = 20 + panelbuttonwidth = 185 + panelbuttoncolour = Color.Black + panelbuttontextcolour = Color.White + panelbuttontextsize = 10 + panelbuttontextfont = "Byington" + panelbuttontextstyle = FontStyle.Regular + panelbuttontextside = 16 + panelbuttontexttop = 2 + panelbuttongap = 4 + panelbuttonfromtop = 2 + panelbuttoninitialgap = 8 + launcheritemsize = 10 + launcheritemfont = "Byington" + launcheritemstyle = FontStyle.Regular + launcheritemcolour = Color.Black + desktoppanel = Nothing + desktoppanellayout = 3 + desktopbackground = Nothing + desktopbackgroundlayout = 3 + panelclock = Nothing + panelclocklayout = 3 + applaunchermouseover = Nothing + applauncher = Nothing + applauncherlayout = 3 + applauncherclick = Nothing + panelbutton = Nothing + panelbuttonlayout = 3 + enabledraggableicons = True + End Sub + Private Sub saveimage(ByVal img As Image, ByVal name As String) + If Not IsNothing(img) Then + If File.Exists(loadedskin & name) Then File.Delete(loadedskin & name) + Try + img.Save(loadedskin & name, System.Drawing.Imaging.ImageFormat.Png) + Catch ex As Exception + infobox.showinfo("Saving Error", "Oops, an error occured when saving the file " & loadedskin & name & ". Please contact the devs to report the problem.") + End Try + Else + If File.Exists(loadedskin & name) Then File.Delete(loadedskin & name) + End If + End Sub +End Module \ No newline at end of file diff --git a/ShiftOS/template.Designer.vb b/ShiftOS/template.Designer.vb new file mode 100644 index 0000000..da477d0 --- /dev/null +++ b/ShiftOS/template.Designer.vb @@ -0,0 +1,237 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class template + 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() + Me.components = New System.ComponentModel.Container() + Me.pgleft = New System.Windows.Forms.Panel() + Me.pgbottomlcorner = New System.Windows.Forms.Panel() + Me.pgright = New System.Windows.Forms.Panel() + Me.pgbottomrcorner = New System.Windows.Forms.Panel() + Me.titlebar = New System.Windows.Forms.Panel() + Me.minimizebutton = New System.Windows.Forms.Panel() + Me.pnlicon = New System.Windows.Forms.PictureBox() + Me.rollupbutton = New System.Windows.Forms.Panel() + Me.closebutton = New System.Windows.Forms.Panel() + Me.lbtitletext = New System.Windows.Forms.Label() + Me.pgtoplcorner = New System.Windows.Forms.Panel() + Me.pgtoprcorner = New System.Windows.Forms.Panel() + Me.pgbottom = New System.Windows.Forms.Panel() + Me.pgcontents = New System.Windows.Forms.Panel() + Me.pullbs = New System.Windows.Forms.Timer(Me.components) + Me.pullbottom = New System.Windows.Forms.Timer(Me.components) + Me.pullside = New System.Windows.Forms.Timer(Me.components) + Me.pgleft.SuspendLayout() + Me.pgright.SuspendLayout() + Me.titlebar.SuspendLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'pgleft + ' + Me.pgleft.BackColor = System.Drawing.Color.Gray + Me.pgleft.Controls.Add(Me.pgbottomlcorner) + Me.pgleft.Dock = System.Windows.Forms.DockStyle.Left + Me.pgleft.Location = New System.Drawing.Point(0, 30) + Me.pgleft.Name = "pgleft" + Me.pgleft.Size = New System.Drawing.Size(2, 313) + Me.pgleft.TabIndex = 16 + ' + 'pgbottomlcorner + ' + Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomlcorner.Name = "pgbottomlcorner" + Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomlcorner.TabIndex = 14 + ' + 'pgright + ' + Me.pgright.BackColor = System.Drawing.Color.Gray + Me.pgright.Controls.Add(Me.pgbottomrcorner) + Me.pgright.Dock = System.Windows.Forms.DockStyle.Right + Me.pgright.Location = New System.Drawing.Point(807, 30) + Me.pgright.Name = "pgright" + Me.pgright.Size = New System.Drawing.Size(2, 313) + Me.pgright.TabIndex = 17 + ' + 'pgbottomrcorner + ' + Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red + Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 311) + Me.pgbottomrcorner.Name = "pgbottomrcorner" + Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) + Me.pgbottomrcorner.TabIndex = 15 + ' + 'titlebar + ' + Me.titlebar.BackColor = System.Drawing.Color.Gray + Me.titlebar.Controls.Add(Me.minimizebutton) + Me.titlebar.Controls.Add(Me.pnlicon) + Me.titlebar.Controls.Add(Me.rollupbutton) + Me.titlebar.Controls.Add(Me.closebutton) + Me.titlebar.Controls.Add(Me.lbtitletext) + Me.titlebar.Controls.Add(Me.pgtoplcorner) + Me.titlebar.Controls.Add(Me.pgtoprcorner) + Me.titlebar.Dock = System.Windows.Forms.DockStyle.Top + Me.titlebar.ForeColor = System.Drawing.Color.White + Me.titlebar.Location = New System.Drawing.Point(0, 0) + Me.titlebar.Name = "titlebar" + Me.titlebar.Size = New System.Drawing.Size(809, 30) + Me.titlebar.TabIndex = 14 + ' + 'minimizebutton + ' + Me.minimizebutton.BackColor = System.Drawing.Color.Black + Me.minimizebutton.Location = New System.Drawing.Point(246, 5) + Me.minimizebutton.Name = "minimizebutton" + Me.minimizebutton.Size = New System.Drawing.Size(22, 22) + Me.minimizebutton.TabIndex = 24 + ' + 'pnlicon + ' + Me.pnlicon.BackColor = System.Drawing.Color.Transparent + Me.pnlicon.Image = Global.ShiftOS.My.Resources.Resources.iconTextPad + Me.pnlicon.Location = New System.Drawing.Point(8, 8) + Me.pnlicon.Name = "pnlicon" + Me.pnlicon.Size = New System.Drawing.Size(16, 16) + Me.pnlicon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.pnlicon.TabIndex = 24 + Me.pnlicon.TabStop = False + Me.pnlicon.Visible = False + ' + 'rollupbutton + ' + Me.rollupbutton.BackColor = System.Drawing.Color.Black + Me.rollupbutton.Location = New System.Drawing.Point(274, 3) + Me.rollupbutton.Name = "rollupbutton" + Me.rollupbutton.Size = New System.Drawing.Size(22, 22) + Me.rollupbutton.TabIndex = 22 + ' + 'closebutton + ' + Me.closebutton.BackColor = System.Drawing.Color.Black + Me.closebutton.Location = New System.Drawing.Point(302, 3) + Me.closebutton.Name = "closebutton" + Me.closebutton.Size = New System.Drawing.Size(22, 22) + Me.closebutton.TabIndex = 20 + ' + 'lbtitletext + ' + Me.lbtitletext.AutoSize = True + Me.lbtitletext.BackColor = System.Drawing.Color.Transparent + Me.lbtitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbtitletext.Location = New System.Drawing.Point(26, 7) + Me.lbtitletext.Name = "lbtitletext" + Me.lbtitletext.Size = New System.Drawing.Size(89, 18) + Me.lbtitletext.TabIndex = 19 + Me.lbtitletext.Text = "Template" + ' + 'pgtoplcorner + ' + Me.pgtoplcorner.BackColor = System.Drawing.Color.Red + Me.pgtoplcorner.Dock = System.Windows.Forms.DockStyle.Left + Me.pgtoplcorner.Location = New System.Drawing.Point(0, 0) + Me.pgtoplcorner.Name = "pgtoplcorner" + Me.pgtoplcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoplcorner.TabIndex = 17 + ' + 'pgtoprcorner + ' + Me.pgtoprcorner.BackColor = System.Drawing.Color.Red + Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right + Me.pgtoprcorner.Location = New System.Drawing.Point(807, 0) + Me.pgtoprcorner.Name = "pgtoprcorner" + Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) + Me.pgtoprcorner.TabIndex = 16 + ' + 'pgbottom + ' + Me.pgbottom.BackColor = System.Drawing.Color.Gray + Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pgbottom.Location = New System.Drawing.Point(2, 341) + Me.pgbottom.Name = "pgbottom" + Me.pgbottom.Size = New System.Drawing.Size(805, 2) + Me.pgbottom.TabIndex = 18 + ' + 'pgcontents + ' + Me.pgcontents.Dock = System.Windows.Forms.DockStyle.Fill + Me.pgcontents.Location = New System.Drawing.Point(2, 30) + Me.pgcontents.Name = "pgcontents" + Me.pgcontents.Size = New System.Drawing.Size(805, 311) + Me.pgcontents.TabIndex = 15 + ' + 'pullbs + ' + Me.pullbs.Interval = 1 + ' + 'pullbottom + ' + Me.pullbottom.Interval = 1 + ' + 'pullside + ' + Me.pullside.Interval = 1 + ' + 'template + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(809, 343) + Me.Controls.Add(Me.pgcontents) + Me.Controls.Add(Me.pgbottom) + Me.Controls.Add(Me.pgright) + Me.Controls.Add(Me.pgleft) + Me.Controls.Add(Me.titlebar) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "template" + Me.Text = "template" + Me.TopMost = True + Me.pgleft.ResumeLayout(False) + Me.pgright.ResumeLayout(False) + Me.titlebar.ResumeLayout(False) + Me.titlebar.PerformLayout() + CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents pgleft As System.Windows.Forms.Panel + Friend WithEvents pgbottomlcorner As System.Windows.Forms.Panel + Friend WithEvents pgright As System.Windows.Forms.Panel + Friend WithEvents pgbottomrcorner As System.Windows.Forms.Panel + Friend WithEvents titlebar As System.Windows.Forms.Panel + Friend WithEvents pgtoplcorner As System.Windows.Forms.Panel + Friend WithEvents pgtoprcorner As System.Windows.Forms.Panel + Friend WithEvents pgbottom As System.Windows.Forms.Panel + Friend WithEvents pgcontents As System.Windows.Forms.Panel + Friend WithEvents lbtitletext As System.Windows.Forms.Label + Friend WithEvents closebutton As System.Windows.Forms.Panel + Friend WithEvents rollupbutton As System.Windows.Forms.Panel + Friend WithEvents pnlicon As System.Windows.Forms.PictureBox + Friend WithEvents minimizebutton As System.Windows.Forms.Panel + Friend WithEvents pullbs As System.Windows.Forms.Timer + Friend WithEvents pullbottom As System.Windows.Forms.Timer + Friend WithEvents pullside As System.Windows.Forms.Timer +End Class diff --git a/ShiftOS/template.resx b/ShiftOS/template.resx new file mode 100644 index 0000000..79f713a --- /dev/null +++ b/ShiftOS/template.resx @@ -0,0 +1,129 @@ +<?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=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1056, 18</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1140, 18</value> + </metadata> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>1253, 18</value> + </metadata> +</root> \ No newline at end of file diff --git a/ShiftOS/template.vb b/ShiftOS/template.vb new file mode 100644 index 0000000..e5dfe18 --- /dev/null +++ b/ShiftOS/template.vb @@ -0,0 +1,408 @@ +Public Class template +#Region "Template Code" + Public rolldownsize As Integer + Public oldbordersize As Integer + Public oldtitlebarheight As Integer + Public justopened As Boolean = False + Public needtorollback As Boolean = False + Public minimumsizewidth As Integer = 0 'replace with minimum size + Public minimumsizeheight As Integer = 0 'replace with minimum size + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load + justopened = True + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + setupall() + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME + ShiftOSDesktop.setuppanelbuttons() + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub + + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() + End Sub + + Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown + 'Make terminal appear + If e.KeyCode = Keys.T AndAlso e.Control Then + Terminal.Show() + Terminal.Visible = True + Terminal.BringToFront() + End If + + 'Movable Windows + If ShiftOSDesktop.boughtmovablewindows = True Then + If e.KeyCode = Keys.A AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.D AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X + ShiftOSDesktop.movablewindownumber, Me.Location.Y) + End If + If e.KeyCode = Keys.W AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y - ShiftOSDesktop.movablewindownumber) + End If + If e.KeyCode = Keys.S AndAlso e.Control Then + e.Handled = True + Me.Location = New Point(Me.Location.X, Me.Location.Y + ShiftOSDesktop.movablewindownumber) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " to " & Me.Location.ToString & " with " & e.KeyCode.ToString & Environment.NewLine + End If + End Sub + + Private Sub titlebar_MouseDown(sender As Object, e As MouseEventArgs) Handles titlebar.MouseDown, lbtitletext.MouseDown, pnlicon.MouseDown, pgtoplcorner.MouseDown, pgtoprcorner.MouseDown + ' Handle Draggable Windows + If ShiftOSDesktop.boughtdraggablewindows = True Then + If e.Button = MouseButtons.Left Then + titlebar.Capture = False + lbtitletext.Capture = False + pnlicon.Capture = False + pgtoplcorner.Capture = False + pgtoprcorner.Capture = False + Const WM_NCLBUTTONDOWN As Integer = &HA1S + Const HTCAPTION As Integer = 2 + Dim msg As Message = _ + Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _ + New IntPtr(HTCAPTION), IntPtr.Zero) + Me.DefWndProc(msg) + End If + ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User dragged " & Me.Name & " to " & Me.Location.ToString & Environment.NewLine + End If + End Sub + + Public Sub setupborders() + If ShiftOSDesktop.boughtwindowborders = False Then + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + Me.Size = New Size(Me.Width - pgleft.Width - pgright.Width, Me.Height - pgbottom.Height) + End If + End Sub + + Private Sub closebutton_Click(sender As Object, e As EventArgs) Handles closebutton.Click + Me.Close() + End Sub + + Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp + closebutton.BackgroundImage = Skins.closebtnhover + End Sub + + Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave + closebutton.BackgroundImage = Skins.closebtn + End Sub + + Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown + closebutton.BackgroundImage = Skins.closebtnclick + End Sub + + Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click + ShiftOSDesktop.minimizeprogram(Me, False) + End Sub + + Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click + rollupanddown() + End Sub + + Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp + rollupbutton.BackgroundImage = Skins.rollbtnhover + End Sub + + Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave + rollupbutton.BackgroundImage = Skins.rollbtn + End Sub + + Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown + rollupbutton.BackgroundImage = Skins.rollbtnclick + End Sub + + Public Sub setuptitlebar() + + setupborders() + + If Me.Height = Me.titlebar.Height Then pgleft.Show() : pgbottom.Show() : pgright.Show() : Me.Height = rolldownsize : needtorollback = True + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight + + If justopened = True Then + Me.Size = New Size(420, 510) 'put the default size of your window here + Me.Size = New Size(Me.Width, Me.Height + Skins.titlebarheight - 30) + Me.Size = New Size(Me.Width + Skins.borderwidth + Skins.borderwidth, Me.Height + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + justopened = False + Else + If Me.Visible = True Then + Me.Size = New Size(Me.Width - (2 * oldbordersize) + (2 * Skins.borderwidth), (Me.Height - oldtitlebarheight - oldbordersize) + Skins.titlebarheight + Skins.borderwidth) + oldbordersize = Skins.borderwidth + oldtitlebarheight = Skins.titlebarheight + rolldownsize = Me.Height + If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() + End If + End If + + If Skins.enablecorners = True Then + pgtoplcorner.Show() + pgtoprcorner.Show() + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth + Else + pgtoplcorner.Hide() + pgtoprcorner.Hide() + End If + + If ShiftOSDesktop.boughttitlebar = False Then + titlebar.Hide() + Me.Size = New Size(Me.Width, Me.Size.Height - titlebar.Height) + End If + + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(Skins.titletextfontfamily, Skins.titletextfontsize, Skins.titletextfontstyle, GraphicsUnit.Point) + lbtitletext.Text = ShiftOSDesktop.dodgename 'Remember to change to name of program!!!! + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtclosebutton = False Then + closebutton.Hide() + Else + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize + closebutton.Show() + End If + + If ShiftOSDesktop.boughtrollupbutton = False Then + rollupbutton.Hide() + Else + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize + rollupbutton.Show() + End If + + If ShiftOSDesktop.boughtminimizebutton = False Then + minimizebutton.Hide() + Else + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize + minimizebutton.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtknowledgeinputicon = True Then ' Change to program's icon + pnlicon.Visible = True + pnlicon.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) + pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. + End If + + End Sub + + Public Sub rollupanddown() + If Me.Height = Me.titlebar.Height Then + pgleft.Show() + pgbottom.Show() + pgright.Show() + Me.Height = rolldownsize + Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) + Else + Me.MinimumSize = New Size(0, 0) + pgleft.Hide() + pgbottom.Hide() + pgright.Hide() + rolldownsize = Me.Height + Me.Height = Me.titlebar.Height + End If + End Sub + + Public Sub resettitlebar() + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - Skins.closebtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, Skins.closebtnfromtop) + rollupbutton.Location = New Point(titlebar.Size.Width - Skins.rollbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, Skins.rollbtnfromtop) + minimizebutton.Location = New Point(titlebar.Size.Width - Skins.minbtnfromside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, Skins.minbtnfromtop) + Select Case Skins.titletextpos + Case "Left" + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) + End Select + lbtitletext.ForeColor = Skins.titletextcolour + End If + End Sub + + Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullside.Tick + Me.Width = Cursor.Position.X - Me.Location.X + resettitlebar() + End Sub + + Private Sub pullbottom_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pullbottom.Tick + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + Private Sub pullbs_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles pullbs.Tick + Me.Width = Cursor.Position.X - Me.Location.X + Me.Height = Cursor.Position.Y - Me.Location.Y + resettitlebar() + End Sub + + 'delete this for non-resizable windows + Private Sub Rightpull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Start() + End If + End Sub + + Private Sub RightCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeWE + End If + End Sub + + Private Sub bottomCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottom.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNS + End If + End Sub + + Private Sub CornerCursorOn_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgbottomrcorner.MouseEnter + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.SizeNWSE + End If + End Sub + + Private Sub SizeCursoroff_MouseDown(ByVal sender As Object, ByVal e As System.EventArgs) Handles pgright.MouseLeave, pgbottom.MouseLeave, pgbottomrcorner.MouseLeave + If ShiftOSDesktop.boughtresizablewindows = True Then + Cursor = Cursors.Default + End If + End Sub + + Private Sub rightpull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgright.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullside.Stop() + End If + End Sub + + Private Sub bottompull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Start() + End If + End Sub + + Private Sub buttompull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottom.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbottom.Stop() + End If + End Sub + + Private Sub bspull_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseDown + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Start() + End If + End Sub + + Private Sub bspull_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pgbottomrcorner.MouseUp + If ShiftOSDesktop.boughtresizablewindows = True Then + pullbs.Stop() + End If + End Sub + + Public Sub setskin() + 'disposals + closebutton.BackgroundImage = Nothing + titlebar.BackgroundImage = Nothing + rollupbutton.BackgroundImage = Nothing + pgtoplcorner.BackgroundImage = Nothing + pgtoprcorner.BackgroundImage = Nothing + minimizebutton.BackgroundImage = Nothing + 'apply new skin + If Skins.closebtn Is Nothing Then closebutton.BackColor = Skins.closebtncolour Else closebutton.BackgroundImage = Skins.closebtn + closebutton.BackgroundImageLayout = Skins.closebtnlayout + If Skins.titlebar Is Nothing Then titlebar.BackColor = Skins.titlebarcolour Else titlebar.BackgroundImage = Skins.titlebar + titlebar.BackgroundImageLayout = Skins.titlebarlayout + If Skins.rollbtn Is Nothing Then rollupbutton.BackColor = Skins.rollbtncolour Else rollupbutton.BackgroundImage = Skins.rollbtn + rollupbutton.BackgroundImageLayout = Skins.rollbtnlayout + If Skins.leftcorner Is Nothing Then pgtoplcorner.BackColor = Skins.leftcornercolour Else pgtoplcorner.BackgroundImage = Skins.leftcorner + pgtoplcorner.BackgroundImageLayout = Skins.leftcornerlayout + If Skins.rightcorner Is Nothing Then pgtoprcorner.BackColor = Skins.rightcornercolour Else pgtoprcorner.BackgroundImage = Skins.rightcorner + pgtoprcorner.BackgroundImageLayout = Skins.rightcornerlayout + If Skins.minbtn Is Nothing Then minimizebutton.BackColor = Skins.minbtncolour Else minimizebutton.BackgroundImage = Skins.minbtn + minimizebutton.BackgroundImageLayout = Skins.minbtnlayout + If Skins.borderleft Is Nothing Then pgleft.BackColor = Skins.borderleftcolour Else pgleft.BackgroundImage = Skins.borderleft + pgleft.BackgroundImageLayout = Skins.borderleftlayout + If Skins.borderright Is Nothing Then pgright.BackColor = Skins.borderrightcolour Else pgright.BackgroundImage = Skins.borderright + pgleft.BackgroundImageLayout = Skins.borderrightlayout + If Skins.borderbottom Is Nothing Then pgbottom.BackColor = Skins.borderbottomcolour Else pgbottom.BackgroundImage = Skins.borderbottom + pgbottom.BackgroundImageLayout = Skins.borderbottomlayout + If enablebordercorners = True Then + If Skins.bottomleftcorner Is Nothing Then pgbottomlcorner.BackColor = Skins.bottomleftcornercolour Else pgbottomlcorner.BackgroundImage = Skins.bottomleftcorner + pgbottomlcorner.BackgroundImageLayout = Skins.bottomleftcornerlayout + If Skins.bottomrightcorner Is Nothing Then pgbottomrcorner.BackColor = Skins.bottomrightcornercolour Else pgbottomrcorner.BackgroundImage = Skins.bottomrightcorner + pgbottomrcorner.BackgroundImageLayout = Skins.bottomrightcornerlayout + Else + pgbottomlcorner.BackColor = Skins.borderrightcolour + pgbottomrcorner.BackColor = Skins.borderrightcolour + pgbottomlcorner.BackgroundImage = Nothing + pgbottomrcorner.BackgroundImage = Nothing + End If + + 'set bottom border corner size + pgbottomlcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomrcorner.Size = New Size(Skins.borderwidth, Skins.borderwidth) + pgbottomlcorner.Location = New Point(0, Me.Height - Skins.borderwidth) + pgbottomrcorner.Location = New Point(Me.Width, Me.Height - Skins.borderwidth) + + Me.TransparencyKey = ShiftOSDesktop.globaltransparencycolour + End Sub + + Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 + Me.Hide() + ShiftOSDesktop.setuppanelbuttons() + End Sub + + 'end of general setup +#End Region +End Class diff --git a/ShiftOS/undo.vb b/ShiftOS/undo.vb new file mode 100644 index 0000000..ed3a483 --- /dev/null +++ b/ShiftOS/undo.vb @@ -0,0 +1,6 @@ +Public Class undo + + Public undoStack As New Stack(Of Image) + Public redoStack As New Stack(Of Image) + +End Class